diff options
Diffstat (limited to 'src/lib/libssl/s23_clnt.c')
-rw-r--r-- | src/lib/libssl/s23_clnt.c | 509 |
1 files changed, 509 insertions, 0 deletions
diff --git a/src/lib/libssl/s23_clnt.c b/src/lib/libssl/s23_clnt.c new file mode 100644 index 0000000000..779e94a35c --- /dev/null +++ b/src/lib/libssl/s23_clnt.c | |||
@@ -0,0 +1,509 @@ | |||
1 | /* ssl/s23_clnt.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 "ssl_locl.h" | ||
61 | #include <openssl/buffer.h> | ||
62 | #include <openssl/rand.h> | ||
63 | #include <openssl/objects.h> | ||
64 | #include <openssl/evp.h> | ||
65 | |||
66 | static SSL_METHOD *ssl23_get_client_method(int ver); | ||
67 | static int ssl23_client_hello(SSL *s); | ||
68 | static int ssl23_get_server_hello(SSL *s); | ||
69 | static SSL_METHOD *ssl23_get_client_method(int ver) | ||
70 | { | ||
71 | #ifndef OPENSSL_NO_SSL2 | ||
72 | if (ver == SSL2_VERSION) | ||
73 | return(SSLv2_client_method()); | ||
74 | #endif | ||
75 | if (ver == SSL3_VERSION) | ||
76 | return(SSLv3_client_method()); | ||
77 | else if (ver == TLS1_VERSION) | ||
78 | return(TLSv1_client_method()); | ||
79 | else | ||
80 | return(NULL); | ||
81 | } | ||
82 | |||
83 | SSL_METHOD *SSLv23_client_method(void) | ||
84 | { | ||
85 | static int init=1; | ||
86 | static SSL_METHOD SSLv23_client_data; | ||
87 | |||
88 | if (init) | ||
89 | { | ||
90 | CRYPTO_w_lock(CRYPTO_LOCK_SSL_METHOD); | ||
91 | |||
92 | if (init) | ||
93 | { | ||
94 | memcpy((char *)&SSLv23_client_data, | ||
95 | (char *)sslv23_base_method(),sizeof(SSL_METHOD)); | ||
96 | SSLv23_client_data.ssl_connect=ssl23_connect; | ||
97 | SSLv23_client_data.get_ssl_method=ssl23_get_client_method; | ||
98 | init=0; | ||
99 | } | ||
100 | |||
101 | CRYPTO_w_unlock(CRYPTO_LOCK_SSL_METHOD); | ||
102 | } | ||
103 | return(&SSLv23_client_data); | ||
104 | } | ||
105 | |||
106 | int ssl23_connect(SSL *s) | ||
107 | { | ||
108 | BUF_MEM *buf=NULL; | ||
109 | unsigned long Time=time(NULL); | ||
110 | void (*cb)(const SSL *ssl,int type,int val)=NULL; | ||
111 | int ret= -1; | ||
112 | int new_state,state; | ||
113 | |||
114 | RAND_add(&Time,sizeof(Time),0); | ||
115 | ERR_clear_error(); | ||
116 | clear_sys_error(); | ||
117 | |||
118 | if (s->info_callback != NULL) | ||
119 | cb=s->info_callback; | ||
120 | else if (s->ctx->info_callback != NULL) | ||
121 | cb=s->ctx->info_callback; | ||
122 | |||
123 | s->in_handshake++; | ||
124 | if (!SSL_in_init(s) || SSL_in_before(s)) SSL_clear(s); | ||
125 | |||
126 | for (;;) | ||
127 | { | ||
128 | state=s->state; | ||
129 | |||
130 | switch(s->state) | ||
131 | { | ||
132 | case SSL_ST_BEFORE: | ||
133 | case SSL_ST_CONNECT: | ||
134 | case SSL_ST_BEFORE|SSL_ST_CONNECT: | ||
135 | case SSL_ST_OK|SSL_ST_CONNECT: | ||
136 | |||
137 | if (s->session != NULL) | ||
138 | { | ||
139 | SSLerr(SSL_F_SSL23_CONNECT,SSL_R_SSL23_DOING_SESSION_ID_REUSE); | ||
140 | ret= -1; | ||
141 | goto end; | ||
142 | } | ||
143 | s->server=0; | ||
144 | if (cb != NULL) cb(s,SSL_CB_HANDSHAKE_START,1); | ||
145 | |||
146 | /* s->version=TLS1_VERSION; */ | ||
147 | s->type=SSL_ST_CONNECT; | ||
148 | |||
149 | if (s->init_buf == NULL) | ||
150 | { | ||
151 | if ((buf=BUF_MEM_new()) == NULL) | ||
152 | { | ||
153 | ret= -1; | ||
154 | goto end; | ||
155 | } | ||
156 | if (!BUF_MEM_grow(buf,SSL3_RT_MAX_PLAIN_LENGTH)) | ||
157 | { | ||
158 | ret= -1; | ||
159 | goto end; | ||
160 | } | ||
161 | s->init_buf=buf; | ||
162 | buf=NULL; | ||
163 | } | ||
164 | |||
165 | if (!ssl3_setup_buffers(s)) { ret= -1; goto end; } | ||
166 | |||
167 | ssl3_init_finished_mac(s); | ||
168 | |||
169 | s->state=SSL23_ST_CW_CLNT_HELLO_A; | ||
170 | s->ctx->stats.sess_connect++; | ||
171 | s->init_num=0; | ||
172 | break; | ||
173 | |||
174 | case SSL23_ST_CW_CLNT_HELLO_A: | ||
175 | case SSL23_ST_CW_CLNT_HELLO_B: | ||
176 | |||
177 | s->shutdown=0; | ||
178 | ret=ssl23_client_hello(s); | ||
179 | if (ret <= 0) goto end; | ||
180 | s->state=SSL23_ST_CR_SRVR_HELLO_A; | ||
181 | s->init_num=0; | ||
182 | |||
183 | break; | ||
184 | |||
185 | case SSL23_ST_CR_SRVR_HELLO_A: | ||
186 | case SSL23_ST_CR_SRVR_HELLO_B: | ||
187 | ret=ssl23_get_server_hello(s); | ||
188 | if (ret >= 0) cb=NULL; | ||
189 | goto end; | ||
190 | /* break; */ | ||
191 | |||
192 | default: | ||
193 | SSLerr(SSL_F_SSL23_CONNECT,SSL_R_UNKNOWN_STATE); | ||
194 | ret= -1; | ||
195 | goto end; | ||
196 | /* break; */ | ||
197 | } | ||
198 | |||
199 | if (s->debug) { (void)BIO_flush(s->wbio); } | ||
200 | |||
201 | if ((cb != NULL) && (s->state != state)) | ||
202 | { | ||
203 | new_state=s->state; | ||
204 | s->state=state; | ||
205 | cb(s,SSL_CB_CONNECT_LOOP,1); | ||
206 | s->state=new_state; | ||
207 | } | ||
208 | } | ||
209 | end: | ||
210 | s->in_handshake--; | ||
211 | if (buf != NULL) | ||
212 | BUF_MEM_free(buf); | ||
213 | if (cb != NULL) | ||
214 | cb(s,SSL_CB_CONNECT_EXIT,ret); | ||
215 | return(ret); | ||
216 | } | ||
217 | |||
218 | |||
219 | static int ssl23_client_hello(SSL *s) | ||
220 | { | ||
221 | unsigned char *buf; | ||
222 | unsigned char *p,*d; | ||
223 | int i,ch_len; | ||
224 | int ret; | ||
225 | |||
226 | buf=(unsigned char *)s->init_buf->data; | ||
227 | if (s->state == SSL23_ST_CW_CLNT_HELLO_A) | ||
228 | { | ||
229 | #if 0 | ||
230 | /* don't reuse session-id's */ | ||
231 | if (!ssl_get_new_session(s,0)) | ||
232 | { | ||
233 | return(-1); | ||
234 | } | ||
235 | #endif | ||
236 | |||
237 | p=s->s3->client_random; | ||
238 | if(RAND_pseudo_bytes(p,SSL3_RANDOM_SIZE) <= 0) | ||
239 | return -1; | ||
240 | |||
241 | /* Do the message type and length last */ | ||
242 | d= &(buf[2]); | ||
243 | p=d+9; | ||
244 | |||
245 | *(d++)=SSL2_MT_CLIENT_HELLO; | ||
246 | if (!(s->options & SSL_OP_NO_TLSv1)) | ||
247 | { | ||
248 | *(d++)=TLS1_VERSION_MAJOR; | ||
249 | *(d++)=TLS1_VERSION_MINOR; | ||
250 | s->client_version=TLS1_VERSION; | ||
251 | } | ||
252 | #ifdef OPENSSL_FIPS | ||
253 | else if(FIPS_mode()) | ||
254 | { | ||
255 | SSLerr(SSL_F_SSL23_CLIENT_HELLO, | ||
256 | SSL_R_ONLY_TLS_ALLOWED_IN_FIPS_MODE); | ||
257 | return -1; | ||
258 | } | ||
259 | #endif | ||
260 | else if (!(s->options & SSL_OP_NO_SSLv3)) | ||
261 | { | ||
262 | *(d++)=SSL3_VERSION_MAJOR; | ||
263 | *(d++)=SSL3_VERSION_MINOR; | ||
264 | s->client_version=SSL3_VERSION; | ||
265 | } | ||
266 | else if (!(s->options & SSL_OP_NO_SSLv2)) | ||
267 | { | ||
268 | *(d++)=SSL2_VERSION_MAJOR; | ||
269 | *(d++)=SSL2_VERSION_MINOR; | ||
270 | s->client_version=SSL2_VERSION; | ||
271 | } | ||
272 | else | ||
273 | { | ||
274 | SSLerr(SSL_F_SSL23_CLIENT_HELLO,SSL_R_NO_PROTOCOLS_AVAILABLE); | ||
275 | return(-1); | ||
276 | } | ||
277 | |||
278 | /* Ciphers supported */ | ||
279 | i=ssl_cipher_list_to_bytes(s,SSL_get_ciphers(s),p); | ||
280 | if (i == 0) | ||
281 | { | ||
282 | /* no ciphers */ | ||
283 | SSLerr(SSL_F_SSL23_CLIENT_HELLO,SSL_R_NO_CIPHERS_AVAILABLE); | ||
284 | return(-1); | ||
285 | } | ||
286 | s2n(i,d); | ||
287 | p+=i; | ||
288 | |||
289 | /* put in the session-id, zero since there is no | ||
290 | * reuse. */ | ||
291 | #if 0 | ||
292 | s->session->session_id_length=0; | ||
293 | #endif | ||
294 | s2n(0,d); | ||
295 | |||
296 | if (s->options & SSL_OP_NETSCAPE_CHALLENGE_BUG) | ||
297 | ch_len=SSL2_CHALLENGE_LENGTH; | ||
298 | else | ||
299 | ch_len=SSL2_MAX_CHALLENGE_LENGTH; | ||
300 | |||
301 | /* write out sslv2 challenge */ | ||
302 | if (SSL3_RANDOM_SIZE < ch_len) | ||
303 | i=SSL3_RANDOM_SIZE; | ||
304 | else | ||
305 | i=ch_len; | ||
306 | s2n(i,d); | ||
307 | memset(&(s->s3->client_random[0]),0,SSL3_RANDOM_SIZE); | ||
308 | if(RAND_pseudo_bytes(&(s->s3->client_random[SSL3_RANDOM_SIZE-i]),i) <= 0) | ||
309 | return -1; | ||
310 | |||
311 | memcpy(p,&(s->s3->client_random[SSL3_RANDOM_SIZE-i]),i); | ||
312 | p+=i; | ||
313 | |||
314 | i= p- &(buf[2]); | ||
315 | buf[0]=((i>>8)&0xff)|0x80; | ||
316 | buf[1]=(i&0xff); | ||
317 | |||
318 | s->state=SSL23_ST_CW_CLNT_HELLO_B; | ||
319 | /* number of bytes to write */ | ||
320 | s->init_num=i+2; | ||
321 | s->init_off=0; | ||
322 | |||
323 | ssl3_finish_mac(s,&(buf[2]),i); | ||
324 | } | ||
325 | |||
326 | /* SSL3_ST_CW_CLNT_HELLO_B */ | ||
327 | ret = ssl23_write_bytes(s); | ||
328 | if (ret >= 2) | ||
329 | if (s->msg_callback) | ||
330 | s->msg_callback(1, SSL2_VERSION, 0, s->init_buf->data+2, ret-2, s, s->msg_callback_arg); /* CLIENT-HELLO */ | ||
331 | return ret; | ||
332 | } | ||
333 | |||
334 | static int ssl23_get_server_hello(SSL *s) | ||
335 | { | ||
336 | char buf[8]; | ||
337 | unsigned char *p; | ||
338 | int i; | ||
339 | int n; | ||
340 | |||
341 | n=ssl23_read_bytes(s,7); | ||
342 | |||
343 | if (n != 7) return(n); | ||
344 | p=s->packet; | ||
345 | |||
346 | memcpy(buf,p,n); | ||
347 | |||
348 | if ((p[0] & 0x80) && (p[2] == SSL2_MT_SERVER_HELLO) && | ||
349 | (p[5] == 0x00) && (p[6] == 0x02)) | ||
350 | { | ||
351 | #ifdef OPENSSL_NO_SSL2 | ||
352 | SSLerr(SSL_F_SSL23_GET_SERVER_HELLO,SSL_R_UNSUPPORTED_PROTOCOL); | ||
353 | goto err; | ||
354 | #else | ||
355 | /* we are talking sslv2 */ | ||
356 | /* we need to clean up the SSLv3 setup and put in the | ||
357 | * sslv2 stuff. */ | ||
358 | int ch_len; | ||
359 | |||
360 | if (s->options & SSL_OP_NO_SSLv2) | ||
361 | { | ||
362 | SSLerr(SSL_F_SSL23_GET_SERVER_HELLO,SSL_R_UNSUPPORTED_PROTOCOL); | ||
363 | goto err; | ||
364 | } | ||
365 | if (s->s2 == NULL) | ||
366 | { | ||
367 | if (!ssl2_new(s)) | ||
368 | goto err; | ||
369 | } | ||
370 | else | ||
371 | ssl2_clear(s); | ||
372 | |||
373 | if (s->options & SSL_OP_NETSCAPE_CHALLENGE_BUG) | ||
374 | ch_len=SSL2_CHALLENGE_LENGTH; | ||
375 | else | ||
376 | ch_len=SSL2_MAX_CHALLENGE_LENGTH; | ||
377 | |||
378 | /* write out sslv2 challenge */ | ||
379 | i=(SSL3_RANDOM_SIZE < ch_len) | ||
380 | ?SSL3_RANDOM_SIZE:ch_len; | ||
381 | s->s2->challenge_length=i; | ||
382 | memcpy(s->s2->challenge, | ||
383 | &(s->s3->client_random[SSL3_RANDOM_SIZE-i]),i); | ||
384 | |||
385 | if (s->s3 != NULL) ssl3_free(s); | ||
386 | |||
387 | if (!BUF_MEM_grow_clean(s->init_buf, | ||
388 | SSL2_MAX_RECORD_LENGTH_3_BYTE_HEADER)) | ||
389 | { | ||
390 | SSLerr(SSL_F_SSL23_GET_SERVER_HELLO,ERR_R_BUF_LIB); | ||
391 | goto err; | ||
392 | } | ||
393 | |||
394 | s->state=SSL2_ST_GET_SERVER_HELLO_A; | ||
395 | if (!(s->client_version == SSL2_VERSION)) | ||
396 | /* use special padding (SSL 3.0 draft/RFC 2246, App. E.2) */ | ||
397 | s->s2->ssl2_rollback=1; | ||
398 | |||
399 | /* setup the 5 bytes we have read so we get them from | ||
400 | * the sslv2 buffer */ | ||
401 | s->rstate=SSL_ST_READ_HEADER; | ||
402 | s->packet_length=n; | ||
403 | s->packet= &(s->s2->rbuf[0]); | ||
404 | memcpy(s->packet,buf,n); | ||
405 | s->s2->rbuf_left=n; | ||
406 | s->s2->rbuf_offs=0; | ||
407 | |||
408 | /* we have already written one */ | ||
409 | s->s2->write_sequence=1; | ||
410 | |||
411 | s->method=SSLv2_client_method(); | ||
412 | s->handshake_func=s->method->ssl_connect; | ||
413 | #endif | ||
414 | } | ||
415 | else if ((p[0] == SSL3_RT_HANDSHAKE) && | ||
416 | (p[1] == SSL3_VERSION_MAJOR) && | ||
417 | ((p[2] == SSL3_VERSION_MINOR) || | ||
418 | (p[2] == TLS1_VERSION_MINOR)) && | ||
419 | (p[5] == SSL3_MT_SERVER_HELLO)) | ||
420 | { | ||
421 | /* we have sslv3 or tls1 */ | ||
422 | |||
423 | if (!ssl_init_wbio_buffer(s,1)) goto err; | ||
424 | |||
425 | /* we are in this state */ | ||
426 | s->state=SSL3_ST_CR_SRVR_HELLO_A; | ||
427 | |||
428 | /* put the 5 bytes we have read into the input buffer | ||
429 | * for SSLv3 */ | ||
430 | s->rstate=SSL_ST_READ_HEADER; | ||
431 | s->packet_length=n; | ||
432 | s->packet= &(s->s3->rbuf.buf[0]); | ||
433 | memcpy(s->packet,buf,n); | ||
434 | s->s3->rbuf.left=n; | ||
435 | s->s3->rbuf.offset=0; | ||
436 | |||
437 | if ((p[2] == SSL3_VERSION_MINOR) && | ||
438 | !(s->options & SSL_OP_NO_SSLv3)) | ||
439 | { | ||
440 | #ifdef OPENSSL_FIPS | ||
441 | if(FIPS_mode()) | ||
442 | { | ||
443 | SSLerr(SSL_F_SSL23_GET_SERVER_HELLO, | ||
444 | SSL_R_ONLY_TLS_ALLOWED_IN_FIPS_MODE); | ||
445 | goto err; | ||
446 | } | ||
447 | #endif | ||
448 | s->version=SSL3_VERSION; | ||
449 | s->method=SSLv3_client_method(); | ||
450 | } | ||
451 | else if ((p[2] == TLS1_VERSION_MINOR) && | ||
452 | !(s->options & SSL_OP_NO_TLSv1)) | ||
453 | { | ||
454 | s->version=TLS1_VERSION; | ||
455 | s->method=TLSv1_client_method(); | ||
456 | } | ||
457 | else | ||
458 | { | ||
459 | SSLerr(SSL_F_SSL23_GET_SERVER_HELLO,SSL_R_UNSUPPORTED_PROTOCOL); | ||
460 | goto err; | ||
461 | } | ||
462 | |||
463 | s->handshake_func=s->method->ssl_connect; | ||
464 | } | ||
465 | else if ((p[0] == SSL3_RT_ALERT) && | ||
466 | (p[1] == SSL3_VERSION_MAJOR) && | ||
467 | ((p[2] == SSL3_VERSION_MINOR) || | ||
468 | (p[2] == TLS1_VERSION_MINOR)) && | ||
469 | (p[3] == 0) && | ||
470 | (p[4] == 2)) | ||
471 | { | ||
472 | void (*cb)(const SSL *ssl,int type,int val)=NULL; | ||
473 | int j; | ||
474 | |||
475 | /* An alert */ | ||
476 | if (s->info_callback != NULL) | ||
477 | cb=s->info_callback; | ||
478 | else if (s->ctx->info_callback != NULL) | ||
479 | cb=s->ctx->info_callback; | ||
480 | |||
481 | i=p[5]; | ||
482 | if (cb != NULL) | ||
483 | { | ||
484 | j=(i<<8)|p[6]; | ||
485 | cb(s,SSL_CB_READ_ALERT,j); | ||
486 | } | ||
487 | |||
488 | s->rwstate=SSL_NOTHING; | ||
489 | SSLerr(SSL_F_SSL23_GET_SERVER_HELLO,SSL_AD_REASON_OFFSET+p[6]); | ||
490 | goto err; | ||
491 | } | ||
492 | else | ||
493 | { | ||
494 | SSLerr(SSL_F_SSL23_GET_SERVER_HELLO,SSL_R_UNKNOWN_PROTOCOL); | ||
495 | goto err; | ||
496 | } | ||
497 | s->init_num=0; | ||
498 | |||
499 | /* Since, if we are sending a ssl23 client hello, we are not | ||
500 | * reusing a session-id */ | ||
501 | if (!ssl_get_new_session(s,0)) | ||
502 | goto err; | ||
503 | |||
504 | s->first_packet=1; | ||
505 | return(SSL_connect(s)); | ||
506 | err: | ||
507 | return(-1); | ||
508 | } | ||
509 | |||