1 files changed, 76 insertions, 0 deletions
diff --git a/programs/util/strerror.c b/programs/util/strerror.c
new file mode 100644
index 000000000..66052fdab
--- /dev/null
+++ b/programs/util/strerror.c
@@ -0,0 +1,76 @@
+/*
+ *  Translate error code to error string
+ *
+ *  Copyright The Mbed TLS Contributors
+ *  SPDX-License-Identifier: Apache-2.0
+ *
+ *  Licensed under the Apache License, Version 2.0 (the "License"); you may
+ *  not use this file except in compliance with the License.
+ *  You may obtain a copy of the License at
+ *
+ *  http://www.apache.org/licenses/LICENSE-2.0
+ *
+ *  Unless required by applicable law or agreed to in writing, software
+ *  distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
+ *  WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ *  See the License for the specific language governing permissions and
+ *  limitations under the License.
+ */
+
+#include "mbedtls/build_info.h"
+
+#include "mbedtls/platform.h"
+
+#if defined(MBEDTLS_ERROR_C) || defined(MBEDTLS_ERROR_STRERROR_DUMMY)
+#include "mbedtls/error.h"
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#endif
+
+#define USAGE \
+    "\n usage: strerror <errorcode>\n" \
+    "\n where <errorcode> can be a decimal or hexadecimal (starts with 0x or -0x)\n"
+
+#if !defined(MBEDTLS_ERROR_C) && !defined(MBEDTLS_ERROR_STRERROR_DUMMY)
+int main( void )
+{
+    mbedtls_printf("MBEDTLS_ERROR_C and/or MBEDTLS_ERROR_STRERROR_DUMMY not defined.\n");
+    mbedtls_exit( 0 );
+}
+#else
+int main( int argc, char *argv[] )
+{
+    long int val;
+    char *end = argv[1];
+
+    if( argc != 2 )
+    {
+        mbedtls_printf( USAGE );
+        mbedtls_exit( 0 );
+    }
+
+    val = strtol( argv[1], &end, 10 );
+    if( *end != '\0' )
+    {
+        val = strtol( argv[1], &end, 16 );
+        if( *end != '\0' )
+        {
+            mbedtls_printf( USAGE );
+            return( 0 );
+        }
+    }
+    if( val > 0 )
+        val = -val;
+
+    if( val != 0 )
+    {
+        char error_buf[200];
+        mbedtls_strerror( val, error_buf, 200 );
+        mbedtls_printf("Last error was: -0x%04x - %s\n\n", (unsigned int) -val, error_buf );
+    }
+
+    mbedtls_exit( val );
+}
+#endif /* MBEDTLS_ERROR_C */