]>
Commit | Line | Data |
---|---|---|
d02b48c6 | 1 | /* crypto/dsa/dsatest.c */ |
58964a49 | 2 | /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) |
d02b48c6 RE |
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 | ||
e9224c71 GT |
59 | /* Until the key-gen callbacks are modified to use newer prototypes, we allow |
60 | * deprecated functions for openssl-internal code */ | |
61 | #ifdef OPENSSL_NO_DEPRECATED | |
62 | #undef OPENSSL_NO_DEPRECATED | |
63 | #endif | |
64 | ||
d02b48c6 RE |
65 | #include <stdio.h> |
66 | #include <stdlib.h> | |
67 | #include <string.h> | |
68 | #include <sys/types.h> | |
69 | #include <sys/stat.h> | |
55f78baf RL |
70 | |
71 | #include "../e_os.h" | |
72 | ||
ec577822 BM |
73 | #include <openssl/crypto.h> |
74 | #include <openssl/rand.h> | |
75 | #include <openssl/bio.h> | |
76 | #include <openssl/err.h> | |
0b13e9f0 | 77 | #ifndef OPENSSL_NO_ENGINE |
cb78486d | 78 | #include <openssl/engine.h> |
0b13e9f0 | 79 | #endif |
bc36ee62 | 80 | #ifdef OPENSSL_SYS_WINDOWS |
d02b48c6 RE |
81 | #include "../bio/bss_file.c" |
82 | #endif | |
83 | ||
cf1b7d96 | 84 | #ifdef OPENSSL_NO_DSA |
f5d7a031 UM |
85 | int main(int argc, char *argv[]) |
86 | { | |
87 | printf("No DSA support\n"); | |
88 | return(0); | |
89 | } | |
90 | #else | |
91 | #include <openssl/dsa.h> | |
92 | ||
bc36ee62 | 93 | #ifdef OPENSSL_SYS_WIN16 |
d02b48c6 RE |
94 | #define MS_CALLBACK _far _loadds |
95 | #else | |
96 | #define MS_CALLBACK | |
97 | #endif | |
98 | ||
82fc1d9c | 99 | static void MS_CALLBACK dsa_cb(int p, int n, void *arg); |
a87030a1 BM |
100 | |
101 | /* seed, out_p, out_q, out_g are taken from the updated Appendix 5 to | |
102 | * FIPS PUB 186 and also appear in Appendix 5 to FIPS PIB 186-1 */ | |
d02b48c6 RE |
103 | static unsigned char seed[20]={ |
104 | 0xd5,0x01,0x4e,0x4b,0x60,0xef,0x2b,0xa8,0xb6,0x21,0x1b,0x40, | |
105 | 0x62,0xba,0x32,0x24,0xe0,0x42,0x7d,0xd3, | |
106 | }; | |
107 | ||
108 | static unsigned char out_p[]={ | |
109 | 0x8d,0xf2,0xa4,0x94,0x49,0x22,0x76,0xaa, | |
110 | 0x3d,0x25,0x75,0x9b,0xb0,0x68,0x69,0xcb, | |
111 | 0xea,0xc0,0xd8,0x3a,0xfb,0x8d,0x0c,0xf7, | |
112 | 0xcb,0xb8,0x32,0x4f,0x0d,0x78,0x82,0xe5, | |
113 | 0xd0,0x76,0x2f,0xc5,0xb7,0x21,0x0e,0xaf, | |
114 | 0xc2,0xe9,0xad,0xac,0x32,0xab,0x7a,0xac, | |
115 | 0x49,0x69,0x3d,0xfb,0xf8,0x37,0x24,0xc2, | |
116 | 0xec,0x07,0x36,0xee,0x31,0xc8,0x02,0x91, | |
117 | }; | |
118 | ||
119 | static unsigned char out_q[]={ | |
120 | 0xc7,0x73,0x21,0x8c,0x73,0x7e,0xc8,0xee, | |
121 | 0x99,0x3b,0x4f,0x2d,0xed,0x30,0xf4,0x8e, | |
122 | 0xda,0xce,0x91,0x5f, | |
123 | }; | |
124 | ||
125 | static unsigned char out_g[]={ | |
126 | 0x62,0x6d,0x02,0x78,0x39,0xea,0x0a,0x13, | |
127 | 0x41,0x31,0x63,0xa5,0x5b,0x4c,0xb5,0x00, | |
128 | 0x29,0x9d,0x55,0x22,0x95,0x6c,0xef,0xcb, | |
129 | 0x3b,0xff,0x10,0xf3,0x99,0xce,0x2c,0x2e, | |
130 | 0x71,0xcb,0x9d,0xe5,0xfa,0x24,0xba,0xbf, | |
131 | 0x58,0xe5,0xb7,0x95,0x21,0x92,0x5c,0x9c, | |
132 | 0xc4,0x2e,0x9f,0x6f,0x46,0x4b,0x08,0x8c, | |
133 | 0xc5,0x72,0xaf,0x53,0xe6,0xd7,0x88,0x02, | |
134 | }; | |
135 | ||
61f5b6f3 BL |
136 | static const unsigned char str1[]="12345678901234567890"; |
137 | ||
7d388202 BM |
138 | static const char rnd_seed[] = "string to make the random number generator think it has entropy"; |
139 | ||
d02b48c6 RE |
140 | static BIO *bio_err=NULL; |
141 | ||
6b691a5c | 142 | int main(int argc, char **argv) |
d02b48c6 RE |
143 | { |
144 | DSA *dsa=NULL; | |
145 | int counter,ret=0,i,j; | |
146 | unsigned char buf[256]; | |
147 | unsigned long h; | |
a8da8918 | 148 | unsigned char sig[256]; |
61f5b6f3 | 149 | unsigned int siglen; |
d02b48c6 RE |
150 | |
151 | if (bio_err == NULL) | |
152 | bio_err=BIO_new_fp(stderr,BIO_NOCLOSE); | |
153 | ||
10654d3a BM |
154 | CRYPTO_malloc_debug_init(); |
155 | CRYPTO_dbg_set_options(V_CRYPTO_MDEBUG_ALL); | |
777ab7e6 | 156 | CRYPTO_mem_ctrl(CRYPTO_MEM_CHECK_ON); |
227cd06f | 157 | |
cb78486d GT |
158 | ERR_load_crypto_strings(); |
159 | RAND_seed(rnd_seed, sizeof rnd_seed); | |
160 | ||
d02b48c6 | 161 | BIO_printf(bio_err,"test generation of DSA parameters\n"); |
a87030a1 | 162 | |
82fc1d9c | 163 | dsa=DSA_generate_parameters(512,seed,20,&counter,&h,dsa_cb,bio_err); |
d02b48c6 RE |
164 | |
165 | BIO_printf(bio_err,"seed\n"); | |
166 | for (i=0; i<20; i+=4) | |
167 | { | |
168 | BIO_printf(bio_err,"%02X%02X%02X%02X ", | |
169 | seed[i],seed[i+1],seed[i+2],seed[i+3]); | |
170 | } | |
171 | BIO_printf(bio_err,"\ncounter=%d h=%d\n",counter,h); | |
172 | ||
173 | if (dsa == NULL) goto end; | |
174 | DSA_print(bio_err,dsa,0); | |
175 | if (counter != 105) | |
176 | { | |
177 | BIO_printf(bio_err,"counter should be 105\n"); | |
178 | goto end; | |
179 | } | |
180 | if (h != 2) | |
181 | { | |
182 | BIO_printf(bio_err,"h should be 2\n"); | |
183 | goto end; | |
184 | } | |
185 | ||
186 | i=BN_bn2bin(dsa->q,buf); | |
187 | j=sizeof(out_q); | |
188 | if ((i != j) || (memcmp(buf,out_q,i) != 0)) | |
189 | { | |
190 | BIO_printf(bio_err,"q value is wrong\n"); | |
191 | goto end; | |
192 | } | |
193 | ||
194 | i=BN_bn2bin(dsa->p,buf); | |
195 | j=sizeof(out_p); | |
196 | if ((i != j) || (memcmp(buf,out_p,i) != 0)) | |
197 | { | |
198 | BIO_printf(bio_err,"p value is wrong\n"); | |
199 | goto end; | |
200 | } | |
201 | ||
202 | i=BN_bn2bin(dsa->g,buf); | |
203 | j=sizeof(out_g); | |
204 | if ((i != j) || (memcmp(buf,out_g,i) != 0)) | |
205 | { | |
206 | BIO_printf(bio_err,"g value is wrong\n"); | |
207 | goto end; | |
208 | } | |
a8da8918 | 209 | DSA_generate_key(dsa); |
61f5b6f3 BL |
210 | DSA_sign(0, str1, 20, sig, &siglen, dsa); |
211 | if (DSA_verify(0, str1, 20, sig, siglen, dsa) == 1) | |
a8da8918 | 212 | ret=1; |
d02b48c6 RE |
213 | end: |
214 | if (!ret) | |
215 | ERR_print_errors(bio_err); | |
d02b48c6 | 216 | if (dsa != NULL) DSA_free(dsa); |
79aa04ef | 217 | CRYPTO_cleanup_all_ex_data(); |
29a28ee5 | 218 | ERR_remove_state(0); |
cb78486d | 219 | ERR_free_strings(); |
227cd06f | 220 | CRYPTO_mem_leaks(bio_err); |
79875776 BM |
221 | if (bio_err != NULL) |
222 | { | |
223 | BIO_free(bio_err); | |
224 | bio_err = NULL; | |
225 | } | |
55f78baf | 226 | EXIT(!ret); |
d02b48c6 RE |
227 | return(0); |
228 | } | |
229 | ||
848f735a RL |
230 | static int cb_exit(int ec) |
231 | { | |
232 | EXIT(ec); | |
3dda0dd2 | 233 | return(0); /* To keep some compilers quiet */ |
848f735a RL |
234 | } |
235 | ||
82fc1d9c | 236 | static void MS_CALLBACK dsa_cb(int p, int n, void *arg) |
d02b48c6 RE |
237 | { |
238 | char c='*'; | |
239 | static int ok=0,num=0; | |
240 | ||
241 | if (p == 0) { c='.'; num++; }; | |
242 | if (p == 1) c='+'; | |
243 | if (p == 2) { c='*'; ok++; } | |
244 | if (p == 3) c='\n'; | |
82fc1d9c DSH |
245 | BIO_write(arg,&c,1); |
246 | (void)BIO_flush(arg); | |
d02b48c6 RE |
247 | |
248 | if (!ok && (p == 0) && (num > 1)) | |
249 | { | |
58964a49 | 250 | BIO_printf((BIO *)arg,"error in dsatest\n"); |
848f735a | 251 | cb_exit(1); |
d02b48c6 RE |
252 | } |
253 | } | |
f5d7a031 | 254 | #endif |