Option to set current cert to server certificate.
[openssl.git] / crypto / rand / randtest.c
index da96e3f6959a0ddd9072584d72c72687f24d3eec..9e92a70b033c032de9e23983f1a63b9fb59d11ce 100644 (file)
 #include <stdlib.h>
 #include <openssl/rand.h>
 
+#include "../e_os.h"
+
 /* some FIPS 140-1 random number test */
 /* some simple tests */
 
-int main()
+int main(int argc,char **argv)
        {
        unsigned char buf[2500];
        int i,j,k,s,sign,nsign,err=0;
@@ -73,7 +75,13 @@ int main()
        /*double d; */
        long d;
 
-       RAND_pseudo_bytes(buf,2500);
+       i = RAND_pseudo_bytes(buf,2500);
+       if (i < 0)
+               {
+               printf ("init failed, the rand method is not properly installed\n");
+               err++;
+               goto err;
+               }
 
        n1=0;
        for (i=0; i<16; i++) n2[i]=0;
@@ -201,7 +209,11 @@ int main()
                err++;
                }
        printf("test 4 done\n");
+ err:
        err=((err)?1:0);
-       exit(err);
+#ifdef OPENSSL_SYS_NETWARE
+    if (err) printf("ERROR: %d\n", err);
+#endif
+       EXIT(err);
        return(err);
        }