Branch data Line data Source code
1 : : /* crypto/rand/randtest.c */
2 : : /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
3 : : * All rights reserved.
4 : : *
5 : : * This package is an SSL implementation written
6 : : * by Eric Young (eay@cryptsoft.com).
7 : : * The implementation was written so as to conform with Netscapes SSL.
8 : : *
9 : : * This library is free for commercial and non-commercial use as long as
10 : : * the following conditions are aheared to. The following conditions
11 : : * apply to all code found in this distribution, be it the RC4, RSA,
12 : : * lhash, DES, etc., code; not just the SSL code. The SSL documentation
13 : : * included with this distribution is covered by the same copyright terms
14 : : * except that the holder is Tim Hudson (tjh@cryptsoft.com).
15 : : *
16 : : * Copyright remains Eric Young's, and as such any Copyright notices in
17 : : * the code are not to be removed.
18 : : * If this package is used in a product, Eric Young should be given attribution
19 : : * as the author of the parts of the library used.
20 : : * This can be in the form of a textual message at program startup or
21 : : * in documentation (online or textual) provided with the package.
22 : : *
23 : : * Redistribution and use in source and binary forms, with or without
24 : : * modification, are permitted provided that the following conditions
25 : : * are met:
26 : : * 1. Redistributions of source code must retain the copyright
27 : : * notice, this list of conditions and the following disclaimer.
28 : : * 2. Redistributions in binary form must reproduce the above copyright
29 : : * notice, this list of conditions and the following disclaimer in the
30 : : * documentation and/or other materials provided with the distribution.
31 : : * 3. All advertising materials mentioning features or use of this software
32 : : * must display the following acknowledgement:
33 : : * "This product includes cryptographic software written by
34 : : * Eric Young (eay@cryptsoft.com)"
35 : : * The word 'cryptographic' can be left out if the rouines from the library
36 : : * being used are not cryptographic related :-).
37 : : * 4. If you include any Windows specific code (or a derivative thereof) from
38 : : * the apps directory (application code) you must include an acknowledgement:
39 : : * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
40 : : *
41 : : * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
42 : : * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
43 : : * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
44 : : * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
45 : : * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
46 : : * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
47 : : * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48 : : * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
49 : : * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
50 : : * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
51 : : * SUCH DAMAGE.
52 : : *
53 : : * The licence and distribution terms for any publically available version or
54 : : * derivative of this code cannot be changed. i.e. this code cannot simply be
55 : : * copied and put under another distribution licence
56 : : * [including the GNU Public Licence.]
57 : : */
58 : :
59 : : #include <stdio.h>
60 : : #include <stdlib.h>
61 : : #include <openssl/rand.h>
62 : :
63 : : #include "../e_os.h"
64 : :
65 : : /* some FIPS 140-1 random number test */
66 : : /* some simple tests */
67 : :
68 : 1 : int main(int argc,char **argv)
69 : : {
70 : : unsigned char buf[2500];
71 : 1 : int i,j,k,s,sign,nsign,err=0;
72 : : unsigned long n1;
73 : : unsigned long n2[16];
74 : : unsigned long runs[2][34];
75 : : /*double d; */
76 : : long d;
77 : :
78 : 1 : i = RAND_pseudo_bytes(buf,2500);
79 [ + - ]: 1 : if (i < 0)
80 : : {
81 : : printf ("init failed, the rand method is not properly installed\n");
82 : 0 : err++;
83 : 0 : goto err;
84 : : }
85 : :
86 : : n1=0;
87 [ + + ]: 17 : for (i=0; i<16; i++) n2[i]=0;
88 [ + + ]: 35 : for (i=0; i<34; i++) runs[0][i]=runs[1][i]=0;
89 : :
90 : : /* test 1 and 2 */
91 : : sign=0;
92 : : nsign=0;
93 [ + + ]: 2501 : for (i=0; i<2500; i++)
94 : : {
95 : 2500 : j=buf[i];
96 : :
97 : 2500 : n2[j&0x0f]++;
98 : 2500 : n2[(j>>4)&0x0f]++;
99 : :
100 [ + + ]: 22500 : for (k=0; k<8; k++)
101 : : {
102 : 20000 : s=(j&0x01);
103 [ + + ]: 20000 : if (s == sign)
104 : 10045 : nsign++;
105 : : else
106 : : {
107 [ - + ]: 9955 : if (nsign > 34) nsign=34;
108 [ + + ]: 9955 : if (nsign != 0)
109 : : {
110 : 9954 : runs[sign][nsign-1]++;
111 [ + + ]: 9954 : if (nsign > 6)
112 : 157 : runs[sign][5]++;
113 : : }
114 : 9955 : sign=s;
115 : 9955 : nsign=1;
116 : : }
117 : :
118 [ + + ]: 20000 : if (s) n1++;
119 : 20000 : j>>=1;
120 : : }
121 : : }
122 [ - + ]: 1 : if (nsign > 34) nsign=34;
123 [ + - ]: 1 : if (nsign != 0) runs[sign][nsign-1]++;
124 : :
125 : : /* test 1 */
126 [ - + ]: 1 : if (!((9654 < n1) && (n1 < 10346)))
127 : : {
128 : : printf("test 1 failed, X=%lu\n",n1);
129 : 0 : err++;
130 : : }
131 : : printf("test 1 done\n");
132 : :
133 : : /* test 2 */
134 : : #ifdef undef
135 : : d=0;
136 : : for (i=0; i<16; i++)
137 : : d+=n2[i]*n2[i];
138 : : d=d*16.0/5000.0-5000.0;
139 : : if (!((1.03 < d) && (d < 57.4)))
140 : : {
141 : : printf("test 2 failed, X=%.2f\n",d);
142 : : err++;
143 : : }
144 : : #endif
145 : 1 : d=0;
146 [ + + ]: 17 : for (i=0; i<16; i++)
147 : 16 : d+=n2[i]*n2[i];
148 : 1 : d=(d*8)/25-500000;
149 [ - + ]: 1 : if (!((103 < d) && (d < 5740)))
150 : : {
151 : 0 : printf("test 2 failed, X=%ld.%02ld\n",d/100L,d%100L);
152 : 0 : err++;
153 : : }
154 : : printf("test 2 done\n");
155 : :
156 : : /* test 3 */
157 [ + + ]: 3 : for (i=0; i<2; i++)
158 : : {
159 [ - + ]: 2 : if (!((2267 < runs[i][0]) && (runs[i][0] < 2733)))
160 : : {
161 : 0 : printf("test 3 failed, bit=%d run=%d num=%lu\n",
162 : : i,1,runs[i][0]);
163 : 0 : err++;
164 : : }
165 [ - + ]: 2 : if (!((1079 < runs[i][1]) && (runs[i][1] < 1421)))
166 : : {
167 : 0 : printf("test 3 failed, bit=%d run=%d num=%lu\n",
168 : : i,2,runs[i][1]);
169 : 0 : err++;
170 : : }
171 [ - + ]: 2 : if (!(( 502 < runs[i][2]) && (runs[i][2] < 748)))
172 : : {
173 : 0 : printf("test 3 failed, bit=%d run=%d num=%lu\n",
174 : : i,3,runs[i][2]);
175 : 0 : err++;
176 : : }
177 [ - + ]: 2 : if (!(( 223 < runs[i][3]) && (runs[i][3] < 402)))
178 : : {
179 : 0 : printf("test 3 failed, bit=%d run=%d num=%lu\n",
180 : : i,4,runs[i][3]);
181 : 0 : err++;
182 : : }
183 [ - + ]: 2 : if (!(( 90 < runs[i][4]) && (runs[i][4] < 223)))
184 : : {
185 : 0 : printf("test 3 failed, bit=%d run=%d num=%lu\n",
186 : : i,5,runs[i][4]);
187 : 0 : err++;
188 : : }
189 [ - + ]: 2 : if (!(( 90 < runs[i][5]) && (runs[i][5] < 223)))
190 : : {
191 : 0 : printf("test 3 failed, bit=%d run=%d num=%lu\n",
192 : : i,6,runs[i][5]);
193 : 0 : err++;
194 : : }
195 : : }
196 : : printf("test 3 done\n");
197 : :
198 : : /* test 4 */
199 [ - + ]: 1 : if (runs[0][33] != 0)
200 : : {
201 : 0 : printf("test 4 failed, bit=%d run=%d num=%lu\n",
202 : : 0,34,runs[0][33]);
203 : 0 : err++;
204 : : }
205 [ - + ]: 1 : if (runs[1][33] != 0)
206 : : {
207 : 0 : printf("test 4 failed, bit=%d run=%d num=%lu\n",
208 : : 1,34,runs[1][33]);
209 : 0 : err++;
210 : : }
211 : : printf("test 4 done\n");
212 : : err:
213 : 1 : err=((err)?1:0);
214 : : #ifdef OPENSSL_SYS_NETWARE
215 : : if (err) printf("ERROR: %d\n", err);
216 : : #endif
217 : 1 : EXIT(err);
218 : : return(err);
219 : : }
|
