Make objxref.pl output in correct format
[openssl.git] / test / fips_algvs.c
index a662d01..18a5bab 100644 (file)
@@ -1,6 +1,7 @@
 /* test/fips_algvs.c */
-/* Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL
- * project 2011
+/*
+ * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL project
+ * 2011
  */
 /* ====================================================================
  * Copyright (c) 2011 The OpenSSL Project.  All rights reserved.
@@ -10,7 +11,7 @@
  * are met:
  *
  * 1. Redistributions of source code must retain the above copyright
- *    notice, this list of conditions and the following disclaimer. 
+ *    notice, this list of conditions and the following disclaimer.
  *
  * 2. Redistributions in binary form must reproduce the above copyright
  *    notice, this list of conditions and the following disclaimer in
@@ -61,7 +62,7 @@
 #include <openssl/opensslconf.h>
 
 #ifndef OPENSSL_FIPS
-#include <stdio.h>
+# include <stdio.h>
 
 int main(int argc, char **argv)
 {
@@ -70,13 +71,13 @@ int main(int argc, char **argv)
 }
 #else
 
-#define FIPS_ALGVS
+# define FIPS_ALGVS
 
 extern int fips_aesavs_main(int argc, char **argv);
 extern int fips_cmactest_main(int argc, char **argv);
 extern int fips_desmovs_main(int argc, char **argv);
 extern int fips_dhvs_main(int argc, char **argv);
-extern int fips_drbgvs_main(int argc,char **argv);
+extern int fips_drbgvs_main(int argc, char **argv);
 extern int fips_dssvs_main(int argc, char **argv);
 extern int fips_ecdhvs_main(int argc, char **argv);
 extern int fips_ecdsavs_main(int argc, char **argv);
@@ -89,224 +90,223 @@ extern int fips_rsavtest_main(int argc, char **argv);
 extern int fips_shatest_main(int argc, char **argv);
 extern int fips_test_suite_main(int argc, char **argv);
 
-#include "fips_aesavs.c"
-#include "fips_cmactest.c"
-#include "fips_desmovs.c"
-#include "fips_dhvs.c"
-#include "fips_drbgvs.c"
-#include "fips_dssvs.c"
-#include "fips_ecdhvs.c"
-#include "fips_ecdsavs.c"
-#include "fips_gcmtest.c"
-#include "fips_hmactest.c"
-#include "fips_rngvs.c"
-#include "fips_rsagtest.c"
-#include "fips_rsastest.c"
-#include "fips_rsavtest.c"
-#include "fips_shatest.c"
-#include "fips_test_suite.c"
+# include "fips_aesavs.c"
+# include "fips_cmactest.c"
+# include "fips_desmovs.c"
+# include "fips_dhvs.c"
+# include "fips_drbgvs.c"
+# include "fips_dssvs.c"
+# include "fips_ecdhvs.c"
+# include "fips_ecdsavs.c"
+# include "fips_gcmtest.c"
+# include "fips_hmactest.c"
+# include "fips_rngvs.c"
+# include "fips_rsagtest.c"
+# include "fips_rsastest.c"
+# include "fips_rsavtest.c"
+# include "fips_shatest.c"
+# include "fips_test_suite.c"
 
-typedef struct
-       {
-       const char *name;
-       int (*func)(int argc, char **argv);
-       } ALGVS_FUNCTION;
+typedef struct {
+    const char *name;
+    int (*func) (int argc, char **argv);
+} ALGVS_FUNCTION;
 
 static ALGVS_FUNCTION algvs[] = {
-       {"fips_aesavs", fips_aesavs_main}, 
-       {"fips_cmactest", fips_cmactest_main}, 
-       {"fips_desmovs", fips_desmovs_main}, 
-       {"fips_dhvs", fips_dhvs_main}, 
-       {"fips_drbgvs", fips_drbgvs_main}, 
-       {"fips_dssvs", fips_dssvs_main}, 
-       {"fips_ecdhvs", fips_ecdhvs_main}, 
-       {"fips_ecdsavs", fips_ecdsavs_main}, 
-       {"fips_gcmtest", fips_gcmtest_main}, 
-       {"fips_hmactest", fips_hmactest_main}, 
-       {"fips_rngvs", fips_rngvs_main}, 
-       {"fips_rsagtest", fips_rsagtest_main}, 
-       {"fips_rsastest", fips_rsastest_main}, 
-       {"fips_rsavtest", fips_rsavtest_main}, 
-       {"fips_shatest", fips_shatest_main}, 
-       {"fips_test_suite", fips_test_suite_main}, 
-       {NULL, 0}
-       };
+    {"fips_aesavs", fips_aesavs_main},
+    {"fips_cmactest", fips_cmactest_main},
+    {"fips_desmovs", fips_desmovs_main},
+    {"fips_dhvs", fips_dhvs_main},
+    {"fips_drbgvs", fips_drbgvs_main},
+    {"fips_dssvs", fips_dssvs_main},
+    {"fips_ecdhvs", fips_ecdhvs_main},
+    {"fips_ecdsavs", fips_ecdsavs_main},
+    {"fips_gcmtest", fips_gcmtest_main},
+    {"fips_hmactest", fips_hmactest_main},
+    {"fips_rngvs", fips_rngvs_main},
+    {"fips_rsagtest", fips_rsagtest_main},
+    {"fips_rsastest", fips_rsastest_main},
+    {"fips_rsavtest", fips_rsavtest_main},
+    {"fips_shatest", fips_shatest_main},
+    {"fips_test_suite", fips_test_suite_main},
+    {NULL, 0}
+};
 
 /* Argument parsing taken from apps/apps.c */
 
-typedef struct args_st
-       {
-       char **data;
-       int count;
-       } ARGS;
+typedef struct args_st {
+    char **data;
+    int count;
+} ARGS;
 
 static int chopup_args(ARGS *arg, char *buf, int *argc, char **argv[])
-       {
-       int num,i;
-       char *p;
+{
+    int num, i;
+    char *p;
 
-       *argc=0;
-       *argv=NULL;
+    *argc = 0;
+    *argv = NULL;
 
-       i=0;
-       if (arg->count == 0)
-               {
-               arg->count=20;
-               arg->data=(char **)OPENSSL_malloc(sizeof(char *)*arg->count);
-               }
-       for (i=0; i<arg->count; i++)
-               arg->data[i]=NULL;
+    i = 0;
+    if (arg->count == 0) {
+        arg->count = 20;
+        arg->data = (char **)OPENSSL_malloc(sizeof(char *) * arg->count);
+    }
+    for (i = 0; i < arg->count; i++)
+        arg->data[i] = NULL;
 
-       num=0;
-       p=buf;
-       for (;;)
-               {
-               /* first scan over white space */
-               if (!*p) break;
-               while (*p && ((*p == ' ') || (*p == '\t') || (*p == '\n')))
-                       p++;
-               if (!*p) break;
+    num = 0;
+    p = buf;
+    for (;;) {
+        /* first scan over white space */
+        if (!*p)
+            break;
+        while (*p && ((*p == ' ') || (*p == '\t') || (*p == '\n')))
+            p++;
+        if (!*p)
+            break;
 
-               /* The start of something good :-) */
-               if (num >= arg->count)
-                       {
-                       fprintf(stderr, "Too many arguments!!\n");
-                       return 0;
-                       }
-               arg->data[num++]=p;
+        /* The start of something good :-) */
+        if (num >= arg->count) {
+            fprintf(stderr, "Too many arguments!!\n");
+            return 0;
+        }
+        arg->data[num++] = p;
 
-               /* now look for the end of this */
-               if ((*p == '\'') || (*p == '\"')) /* scan for closing quote */
-                       {
-                       i= *(p++);
-                       arg->data[num-1]++; /* jump over quote */
-                       while (*p && (*p != i))
-                               p++;
-                       *p='\0';
-                       }
-               else
-                       {
-                       while (*p && ((*p != ' ') &&
-                               (*p != '\t') && (*p != '\n')))
-                               p++;
+        /* now look for the end of this */
+        if ((*p == '\'') || (*p == '\"')) { /* scan for closing quote */
+            i = *(p++);
+            arg->data[num - 1]++; /* jump over quote */
+            while (*p && (*p != i))
+                p++;
+            *p = '\0';
+        } else {
+            while (*p && ((*p != ' ') && (*p != '\t') && (*p != '\n')))
+                p++;
 
-                       if (*p == '\0')
-                               p--;
-                       else
-                               *p='\0';
-                       }
-               p++;
-               }
-       *argc=num;
-       *argv=arg->data;
-       return(1);
-       }
+            if (*p == '\0')
+                p--;
+            else
+                *p = '\0';
+        }
+        p++;
+    }
+    *argc = num;
+    *argv = arg->data;
+    return (1);
+}
 
 static int run_prg(int argc, char **argv)
-       {
-       ALGVS_FUNCTION *t;
-       const char *prg_name;
-       prg_name = strrchr(argv[0], '/');
-       if (prg_name)
-               prg_name++;
-       else
-               prg_name = argv[0];
-       for (t = algvs; t->name; t++)
-               {
-               if (!strcmp(prg_name, t->name))
-                       return t->func(argc, argv);
-               }
-       return -100;
-       }
+{
+    ALGVS_FUNCTION *t;
+    const char *prg_name;
+    prg_name = strrchr(argv[0], '/');
+    if (prg_name)
+        prg_name++;
+    else
+        prg_name = argv[0];
+    for (t = algvs; t->name; t++) {
+        if (!strcmp(prg_name, t->name))
+            return t->func(argc, argv);
+    }
+    return -100;
+}
 
 int main(int argc, char **argv)
-       {
-       char buf[1024];
-       char **args = argv + 1;
-       const char *sname = "fipstests.sh";
-       ARGS arg;
-       int xargc;
-       char **xargv;
-       int lineno = 0, badarg = 0;
-       int nerr = 0, quiet = 0, verbose = 0;
-       FILE *in = NULL;
-       if (*args && *args[0] != '-')
-               return run_prg(argc - 1, args);
-       while (!badarg && *args && *args[0] == '-')
-               {
-               if (!strcmp(*args, "-script"))
-                       {
-                       if (args[1])
-                               {
-                               args++;
-                               sname = *args;
-                               }
-                       else
-                               badarg = 1;
-                       }
-               else if (!strcmp(*args, "-quiet"))
-                       quiet = 1;
-               else if (!strcmp(*args, "-verbose"))
-                       verbose = 1;
-               else
-                       badarg = 1;
-               args++;
-               }
+{
+    char buf[1024];
+    char **args = argv + 1;
+    const char *sname = "fipstests.sh";
+    ARGS arg;
+    int xargc;
+    char **xargv;
+    int lineno = 0, badarg = 0;
+    int nerr = 0, quiet = 0, verbose = 0;
+    int rv;
+    FILE *in = NULL;
+# ifdef FIPS_ALGVS_MEMCHECK
+    CRYPTO_malloc_debug_init();
+    OPENSSL_init();
+    CRYPTO_set_mem_debug_options(V_CRYPTO_MDEBUG_ALL);
+    CRYPTO_mem_ctrl(CRYPTO_MEM_CHECK_ON);
+# endif
 
-       if (badarg)
-               {
-               fprintf(stderr, "Error processing arguments\n");
-               return 1;
-               }
+    if (*args && *args[0] != '-') {
+        rv = run_prg(argc - 1, args);
+# ifdef FIPS_ALGVS_MEMCHECK
+        CRYPTO_mem_leaks_fp(stderr);
+# endif
+        return rv;
+    }
+    while (!badarg && *args && *args[0] == '-') {
+        if (!strcmp(*args, "-script")) {
+            if (args[1]) {
+                args++;
+                sname = *args;
+            } else
+                badarg = 1;
+        } else if (!strcmp(*args, "-quiet"))
+            quiet = 1;
+        else if (!strcmp(*args, "-verbose"))
+            verbose = 1;
+        else
+            badarg = 1;
+        args++;
+    }
 
-       in = fopen(sname, "r");
-       if (!in)
-               {
-               fprintf(stderr, "Error opening script file \"%s\"\n", sname);
-               return 1;
-               }
+    if (badarg) {
+        fprintf(stderr, "Error processing arguments\n");
+        return 1;
+    }
 
-       arg.data = NULL;
-       arg.count = 0;
+    in = fopen(sname, "r");
+    if (!in) {
+        fprintf(stderr, "Error opening script file \"%s\"\n", sname);
+        return 1;
+    }
 
-       while (fgets(buf, sizeof(buf), in))
-               {
-               lineno++;
-               if (!chopup_args(&arg, buf, &xargc, &xargv))
-                       fprintf(stderr, "Error processing line %d\n", lineno);
-               else
-                       {
-                       int rv;
-                       if (!quiet)
-                               {
-                               int i;
-                               int narg = verbose ? xargc : xargc - 2;
-                               printf("Running command line:");
-                               for (i = 0; i < narg; i++)
-                                       printf(" %s", xargv[i]);
-                               printf("\n");
-                               }
-                       rv = run_prg(xargc, xargv);
-                       if (FIPS_module_mode())
-                               FIPS_module_mode_set(0, NULL);
-                       if (rv != 0)
-                               nerr++;
-                       if (rv == -100)
-                               fprintf(stderr, "ERROR: Command not found\n");
-                       else if (rv != 0)
-                               fprintf(stderr, "ERROR: returned %d\n", rv);
-                       else if (verbose)
-                               printf("\tCommand run successfully\n");
-                       }
-               }
+    arg.data = NULL;
+    arg.count = 0;
 
-       if (!quiet)
-               printf("Completed with %d errors\n", nerr);
+    while (fgets(buf, sizeof(buf), in)) {
+        lineno++;
+        if (!chopup_args(&arg, buf, &xargc, &xargv))
+            fprintf(stderr, "Error processing line %d\n", lineno);
+        else {
+            if (!quiet) {
+                int i;
+                int narg = verbose ? xargc : xargc - 2;
+                printf("Running command line:");
+                for (i = 0; i < narg; i++)
+                    printf(" %s", xargv[i]);
+                printf("\n");
+            }
+            rv = run_prg(xargc, xargv);
+            if (FIPS_module_mode())
+                FIPS_module_mode_set(0, NULL);
+            if (rv != 0)
+                nerr++;
+            if (rv == -100)
+                fprintf(stderr, "ERROR: Command not found\n");
+            else if (rv != 0)
+                fprintf(stderr, "ERROR: returned %d\n", rv);
+            else if (verbose)
+                printf("\tCommand run successfully\n");
+        }
+    }
 
-       fclose(in);
-       if (nerr == 0)
-               return 0;
-       return 1;
-       }
+    if (!quiet)
+        printf("Completed with %d errors\n", nerr);
 
+    if (arg.data)
+        OPENSSL_free(arg.data);
+
+    fclose(in);
+# ifdef FIPS_ALGVS_MEMCHECK
+    CRYPTO_mem_leaks_fp(stderr);
+# endif
+    if (nerr == 0)
+        return 0;
+    return 1;
+}
 #endif