Further TLS extension updates
[openssl.git] / ssl / s3_lib.c
1 /* ssl/s3_lib.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  * Copyright (c) 1998-2006 The OpenSSL Project.  All rights reserved.
60  *
61  * Redistribution and use in source and binary forms, with or without
62  * modification, are permitted provided that the following conditions
63  * are met:
64  *
65  * 1. Redistributions of source code must retain the above copyright
66  *    notice, this list of conditions and the following disclaimer. 
67  *
68  * 2. Redistributions in binary form must reproduce the above copyright
69  *    notice, this list of conditions and the following disclaimer in
70  *    the documentation and/or other materials provided with the
71  *    distribution.
72  *
73  * 3. All advertising materials mentioning features or use of this
74  *    software must display the following acknowledgment:
75  *    "This product includes software developed by the OpenSSL Project
76  *    for use in the OpenSSL Toolkit. (http://www.openssl.org/)"
77  *
78  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
79  *    endorse or promote products derived from this software without
80  *    prior written permission. For written permission, please contact
81  *    openssl-core@openssl.org.
82  *
83  * 5. Products derived from this software may not be called "OpenSSL"
84  *    nor may "OpenSSL" appear in their names without prior written
85  *    permission of the OpenSSL Project.
86  *
87  * 6. Redistributions of any form whatsoever must retain the following
88  *    acknowledgment:
89  *    "This product includes software developed by the OpenSSL Project
90  *    for use in the OpenSSL Toolkit (http://www.openssl.org/)"
91  *
92  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
93  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
94  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
95  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
96  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
97  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
98  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
99  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
100  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
101  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
102  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
103  * OF THE POSSIBILITY OF SUCH DAMAGE.
104  * ====================================================================
105  *
106  * This product includes cryptographic software written by Eric Young
107  * (eay@cryptsoft.com).  This product includes software written by Tim
108  * Hudson (tjh@cryptsoft.com).
109  *
110  */
111 /* ====================================================================
112  * Copyright 2002 Sun Microsystems, Inc. ALL RIGHTS RESERVED.
113  *
114  * Portions of the attached software ("Contribution") are developed by 
115  * SUN MICROSYSTEMS, INC., and are contributed to the OpenSSL project.
116  *
117  * The Contribution is licensed pursuant to the OpenSSL open source
118  * license provided above.
119  *
120  * ECC cipher suite support in OpenSSL originally written by
121  * Vipul Gupta and Sumit Gupta of Sun Microsystems Laboratories.
122  *
123  */
124
125 #include <stdio.h>
126 #include <openssl/objects.h>
127 #include "ssl_locl.h"
128 #include "kssl_lcl.h"
129 #include <openssl/md5.h>
130 #ifndef OPENSSL_NO_DH
131 #include <openssl/dh.h>
132 #endif
133
134 const char *ssl3_version_str="SSLv3" OPENSSL_VERSION_PTEXT;
135
136 #define SSL3_NUM_CIPHERS        (sizeof(ssl3_ciphers)/sizeof(SSL_CIPHER))
137
138 /* list of available SSLv3 ciphers (sorted by id) */
139 OPENSSL_GLOBAL SSL_CIPHER ssl3_ciphers[]={
140 /* The RSA ciphers */
141 /* Cipher 01 */
142         {
143         1,
144         SSL3_TXT_RSA_NULL_MD5,
145         SSL3_CK_RSA_NULL_MD5,
146         SSL_kRSA|SSL_aRSA|SSL_eNULL |SSL_MD5|SSL_SSLV3,
147         SSL_NOT_EXP|SSL_STRONG_NONE,
148         0,
149         0,
150         0,
151         SSL_ALL_CIPHERS,
152         SSL_ALL_STRENGTHS,
153         },
154 /* Cipher 02 */
155         {
156         1,
157         SSL3_TXT_RSA_NULL_SHA,
158         SSL3_CK_RSA_NULL_SHA,
159         SSL_kRSA|SSL_aRSA|SSL_eNULL |SSL_SHA1|SSL_SSLV3,
160         SSL_NOT_EXP|SSL_STRONG_NONE,
161         0,
162         0,
163         0,
164         SSL_ALL_CIPHERS,
165         SSL_ALL_STRENGTHS,
166         },
167 /* Cipher 03 */
168         {
169         1,
170         SSL3_TXT_RSA_RC4_40_MD5,
171         SSL3_CK_RSA_RC4_40_MD5,
172         SSL_kRSA|SSL_aRSA|SSL_RC4  |SSL_MD5 |SSL_SSLV3,
173         SSL_EXPORT|SSL_EXP40,
174         0,
175         40,
176         128,
177         SSL_ALL_CIPHERS,
178         SSL_ALL_STRENGTHS,
179         },
180 /* Cipher 04 */
181         {
182         1,
183         SSL3_TXT_RSA_RC4_128_MD5,
184         SSL3_CK_RSA_RC4_128_MD5,
185         SSL_kRSA|SSL_aRSA|SSL_RC4  |SSL_MD5|SSL_SSLV3,
186         SSL_NOT_EXP|SSL_MEDIUM,
187         0,
188         128,
189         128,
190         SSL_ALL_CIPHERS,
191         SSL_ALL_STRENGTHS,
192         },
193 /* Cipher 05 */
194         {
195         1,
196         SSL3_TXT_RSA_RC4_128_SHA,
197         SSL3_CK_RSA_RC4_128_SHA,
198         SSL_kRSA|SSL_aRSA|SSL_RC4  |SSL_SHA1|SSL_SSLV3,
199         SSL_NOT_EXP|SSL_MEDIUM,
200         0,
201         128,
202         128,
203         SSL_ALL_CIPHERS,
204         SSL_ALL_STRENGTHS,
205         },
206 /* Cipher 06 */
207         {
208         1,
209         SSL3_TXT_RSA_RC2_40_MD5,
210         SSL3_CK_RSA_RC2_40_MD5,
211         SSL_kRSA|SSL_aRSA|SSL_RC2  |SSL_MD5 |SSL_SSLV3,
212         SSL_EXPORT|SSL_EXP40,
213         0,
214         40,
215         128,
216         SSL_ALL_CIPHERS,
217         SSL_ALL_STRENGTHS,
218         },
219 /* Cipher 07 */
220 #ifndef OPENSSL_NO_IDEA
221         {
222         1,
223         SSL3_TXT_RSA_IDEA_128_SHA,
224         SSL3_CK_RSA_IDEA_128_SHA,
225         SSL_kRSA|SSL_aRSA|SSL_IDEA |SSL_SHA1|SSL_SSLV3,
226         SSL_NOT_EXP|SSL_MEDIUM,
227         0,
228         128,
229         128,
230         SSL_ALL_CIPHERS,
231         SSL_ALL_STRENGTHS,
232         },
233 #endif
234 /* Cipher 08 */
235         {
236         1,
237         SSL3_TXT_RSA_DES_40_CBC_SHA,
238         SSL3_CK_RSA_DES_40_CBC_SHA,
239         SSL_kRSA|SSL_aRSA|SSL_DES|SSL_SHA1|SSL_SSLV3,
240         SSL_EXPORT|SSL_EXP40,
241         0,
242         40,
243         56,
244         SSL_ALL_CIPHERS,
245         SSL_ALL_STRENGTHS,
246         },
247 /* Cipher 09 */
248         {
249         1,
250         SSL3_TXT_RSA_DES_64_CBC_SHA,
251         SSL3_CK_RSA_DES_64_CBC_SHA,
252         SSL_kRSA|SSL_aRSA|SSL_DES  |SSL_SHA1|SSL_SSLV3,
253         SSL_NOT_EXP|SSL_LOW,
254         0,
255         56,
256         56,
257         SSL_ALL_CIPHERS,
258         SSL_ALL_STRENGTHS,
259         },
260 /* Cipher 0A */
261         {
262         1,
263         SSL3_TXT_RSA_DES_192_CBC3_SHA,
264         SSL3_CK_RSA_DES_192_CBC3_SHA,
265         SSL_kRSA|SSL_aRSA|SSL_3DES |SSL_SHA1|SSL_SSLV3,
266         SSL_NOT_EXP|SSL_HIGH,
267         0,
268         168,
269         168,
270         SSL_ALL_CIPHERS,
271         SSL_ALL_STRENGTHS,
272         },
273 /* The DH ciphers */
274 /* Cipher 0B */
275         {
276         0,
277         SSL3_TXT_DH_DSS_DES_40_CBC_SHA,
278         SSL3_CK_DH_DSS_DES_40_CBC_SHA,
279         SSL_kDHd |SSL_aDH|SSL_DES|SSL_SHA1|SSL_SSLV3,
280         SSL_EXPORT|SSL_EXP40,
281         0,
282         40,
283         56,
284         SSL_ALL_CIPHERS,
285         SSL_ALL_STRENGTHS,
286         },
287 /* Cipher 0C */
288         {
289         0,
290         SSL3_TXT_DH_DSS_DES_64_CBC_SHA,
291         SSL3_CK_DH_DSS_DES_64_CBC_SHA,
292         SSL_kDHd |SSL_aDH|SSL_DES  |SSL_SHA1|SSL_SSLV3,
293         SSL_NOT_EXP|SSL_LOW,
294         0,
295         56,
296         56,
297         SSL_ALL_CIPHERS,
298         SSL_ALL_STRENGTHS,
299         },
300 /* Cipher 0D */
301         {
302         0,
303         SSL3_TXT_DH_DSS_DES_192_CBC3_SHA,
304         SSL3_CK_DH_DSS_DES_192_CBC3_SHA,
305         SSL_kDHd |SSL_aDH|SSL_3DES |SSL_SHA1|SSL_SSLV3,
306         SSL_NOT_EXP|SSL_HIGH,
307         0,
308         168,
309         168,
310         SSL_ALL_CIPHERS,
311         SSL_ALL_STRENGTHS,
312         },
313 /* Cipher 0E */
314         {
315         0,
316         SSL3_TXT_DH_RSA_DES_40_CBC_SHA,
317         SSL3_CK_DH_RSA_DES_40_CBC_SHA,
318         SSL_kDHr |SSL_aDH|SSL_DES|SSL_SHA1|SSL_SSLV3,
319         SSL_EXPORT|SSL_EXP40,
320         0,
321         40,
322         56,
323         SSL_ALL_CIPHERS,
324         SSL_ALL_STRENGTHS,
325         },
326 /* Cipher 0F */
327         {
328         0,
329         SSL3_TXT_DH_RSA_DES_64_CBC_SHA,
330         SSL3_CK_DH_RSA_DES_64_CBC_SHA,
331         SSL_kDHr |SSL_aDH|SSL_DES  |SSL_SHA1|SSL_SSLV3,
332         SSL_NOT_EXP|SSL_LOW,
333         0,
334         56,
335         56,
336         SSL_ALL_CIPHERS,
337         SSL_ALL_STRENGTHS,
338         },
339 /* Cipher 10 */
340         {
341         0,
342         SSL3_TXT_DH_RSA_DES_192_CBC3_SHA,
343         SSL3_CK_DH_RSA_DES_192_CBC3_SHA,
344         SSL_kDHr |SSL_aDH|SSL_3DES |SSL_SHA1|SSL_SSLV3,
345         SSL_NOT_EXP|SSL_HIGH,
346         0,
347         168,
348         168,
349         SSL_ALL_CIPHERS,
350         SSL_ALL_STRENGTHS,
351         },
352
353 /* The Ephemeral DH ciphers */
354 /* Cipher 11 */
355         {
356         1,
357         SSL3_TXT_EDH_DSS_DES_40_CBC_SHA,
358         SSL3_CK_EDH_DSS_DES_40_CBC_SHA,
359         SSL_kEDH|SSL_aDSS|SSL_DES|SSL_SHA1|SSL_SSLV3,
360         SSL_EXPORT|SSL_EXP40,
361         0,
362         40,
363         56,
364         SSL_ALL_CIPHERS,
365         SSL_ALL_STRENGTHS,
366         },
367 /* Cipher 12 */
368         {
369         1,
370         SSL3_TXT_EDH_DSS_DES_64_CBC_SHA,
371         SSL3_CK_EDH_DSS_DES_64_CBC_SHA,
372         SSL_kEDH|SSL_aDSS|SSL_DES  |SSL_SHA1|SSL_SSLV3,
373         SSL_NOT_EXP|SSL_LOW,
374         0,
375         56,
376         56,
377         SSL_ALL_CIPHERS,
378         SSL_ALL_STRENGTHS,
379         },
380 /* Cipher 13 */
381         {
382         1,
383         SSL3_TXT_EDH_DSS_DES_192_CBC3_SHA,
384         SSL3_CK_EDH_DSS_DES_192_CBC3_SHA,
385         SSL_kEDH|SSL_aDSS|SSL_3DES |SSL_SHA1|SSL_SSLV3,
386         SSL_NOT_EXP|SSL_HIGH,
387         0,
388         168,
389         168,
390         SSL_ALL_CIPHERS,
391         SSL_ALL_STRENGTHS,
392         },
393 /* Cipher 14 */
394         {
395         1,
396         SSL3_TXT_EDH_RSA_DES_40_CBC_SHA,
397         SSL3_CK_EDH_RSA_DES_40_CBC_SHA,
398         SSL_kEDH|SSL_aRSA|SSL_DES|SSL_SHA1|SSL_SSLV3,
399         SSL_EXPORT|SSL_EXP40,
400         0,
401         40,
402         56,
403         SSL_ALL_CIPHERS,
404         SSL_ALL_STRENGTHS,
405         },
406 /* Cipher 15 */
407         {
408         1,
409         SSL3_TXT_EDH_RSA_DES_64_CBC_SHA,
410         SSL3_CK_EDH_RSA_DES_64_CBC_SHA,
411         SSL_kEDH|SSL_aRSA|SSL_DES  |SSL_SHA1|SSL_SSLV3,
412         SSL_NOT_EXP|SSL_LOW,
413         0,
414         56,
415         56,
416         SSL_ALL_CIPHERS,
417         SSL_ALL_STRENGTHS,
418         },
419 /* Cipher 16 */
420         {
421         1,
422         SSL3_TXT_EDH_RSA_DES_192_CBC3_SHA,
423         SSL3_CK_EDH_RSA_DES_192_CBC3_SHA,
424         SSL_kEDH|SSL_aRSA|SSL_3DES |SSL_SHA1|SSL_SSLV3,
425         SSL_NOT_EXP|SSL_HIGH,
426         0,
427         168,
428         168,
429         SSL_ALL_CIPHERS,
430         SSL_ALL_STRENGTHS,
431         },
432 /* Cipher 17 */
433         {
434         1,
435         SSL3_TXT_ADH_RC4_40_MD5,
436         SSL3_CK_ADH_RC4_40_MD5,
437         SSL_kEDH |SSL_aNULL|SSL_RC4  |SSL_MD5 |SSL_SSLV3,
438         SSL_EXPORT|SSL_EXP40,
439         0,
440         40,
441         128,
442         SSL_ALL_CIPHERS,
443         SSL_ALL_STRENGTHS,
444         },
445 /* Cipher 18 */
446         {
447         1,
448         SSL3_TXT_ADH_RC4_128_MD5,
449         SSL3_CK_ADH_RC4_128_MD5,
450         SSL_kEDH |SSL_aNULL|SSL_RC4  |SSL_MD5 |SSL_SSLV3,
451         SSL_NOT_EXP|SSL_MEDIUM,
452         0,
453         128,
454         128,
455         SSL_ALL_CIPHERS,
456         SSL_ALL_STRENGTHS,
457         },
458 /* Cipher 19 */
459         {
460         1,
461         SSL3_TXT_ADH_DES_40_CBC_SHA,
462         SSL3_CK_ADH_DES_40_CBC_SHA,
463         SSL_kEDH |SSL_aNULL|SSL_DES|SSL_SHA1|SSL_SSLV3,
464         SSL_EXPORT|SSL_EXP40,
465         0,
466         40,
467         128,
468         SSL_ALL_CIPHERS,
469         SSL_ALL_STRENGTHS,
470         },
471 /* Cipher 1A */
472         {
473         1,
474         SSL3_TXT_ADH_DES_64_CBC_SHA,
475         SSL3_CK_ADH_DES_64_CBC_SHA,
476         SSL_kEDH |SSL_aNULL|SSL_DES  |SSL_SHA1|SSL_SSLV3,
477         SSL_NOT_EXP|SSL_LOW,
478         0,
479         56,
480         56,
481         SSL_ALL_CIPHERS,
482         SSL_ALL_STRENGTHS,
483         },
484 /* Cipher 1B */
485         {
486         1,
487         SSL3_TXT_ADH_DES_192_CBC_SHA,
488         SSL3_CK_ADH_DES_192_CBC_SHA,
489         SSL_kEDH |SSL_aNULL|SSL_3DES |SSL_SHA1|SSL_SSLV3,
490         SSL_NOT_EXP|SSL_HIGH,
491         0,
492         168,
493         168,
494         SSL_ALL_CIPHERS,
495         SSL_ALL_STRENGTHS,
496         },
497
498 /* Fortezza */
499 /* Cipher 1C */
500         {
501         0,
502         SSL3_TXT_FZA_DMS_NULL_SHA,
503         SSL3_CK_FZA_DMS_NULL_SHA,
504         SSL_kFZA|SSL_aFZA |SSL_eNULL |SSL_SHA1|SSL_SSLV3,
505         SSL_NOT_EXP|SSL_STRONG_NONE,
506         0,
507         0,
508         0,
509         SSL_ALL_CIPHERS,
510         SSL_ALL_STRENGTHS,
511         },
512
513 /* Cipher 1D */
514         {
515         0,
516         SSL3_TXT_FZA_DMS_FZA_SHA,
517         SSL3_CK_FZA_DMS_FZA_SHA,
518         SSL_kFZA|SSL_aFZA |SSL_eFZA |SSL_SHA1|SSL_SSLV3,
519         SSL_NOT_EXP|SSL_STRONG_NONE,
520         0,
521         0,
522         0,
523         SSL_ALL_CIPHERS,
524         SSL_ALL_STRENGTHS,
525         },
526
527 #if 0
528 /* Cipher 1E */
529         {
530         0,
531         SSL3_TXT_FZA_DMS_RC4_SHA,
532         SSL3_CK_FZA_DMS_RC4_SHA,
533         SSL_kFZA|SSL_aFZA |SSL_RC4  |SSL_SHA1|SSL_SSLV3,
534         SSL_NOT_EXP|SSL_MEDIUM,
535         0,
536         128,
537         128,
538         SSL_ALL_CIPHERS,
539         SSL_ALL_STRENGTHS,
540         },
541 #endif
542
543 #ifndef OPENSSL_NO_KRB5
544 /* The Kerberos ciphers
545 ** 20000107 VRS: And the first shall be last,
546 ** in hopes of avoiding the lynx ssl renegotiation problem.
547 */
548 /* Cipher 1E VRS */
549         {
550         1,
551         SSL3_TXT_KRB5_DES_64_CBC_SHA,
552         SSL3_CK_KRB5_DES_64_CBC_SHA,
553         SSL_kKRB5|SSL_aKRB5|  SSL_DES|SSL_SHA1   |SSL_SSLV3,
554         SSL_NOT_EXP|SSL_LOW,
555         0,
556         56,
557         56,
558         SSL_ALL_CIPHERS,
559         SSL_ALL_STRENGTHS,
560         },
561
562 /* Cipher 1F VRS */
563         {
564         1,
565         SSL3_TXT_KRB5_DES_192_CBC3_SHA,
566         SSL3_CK_KRB5_DES_192_CBC3_SHA,
567         SSL_kKRB5|SSL_aKRB5|  SSL_3DES|SSL_SHA1  |SSL_SSLV3,
568         SSL_NOT_EXP|SSL_HIGH,
569         0,
570         112,
571         168,
572         SSL_ALL_CIPHERS,
573         SSL_ALL_STRENGTHS,
574         },
575
576 /* Cipher 20 VRS */
577         {
578         1,
579         SSL3_TXT_KRB5_RC4_128_SHA,
580         SSL3_CK_KRB5_RC4_128_SHA,
581         SSL_kKRB5|SSL_aKRB5|  SSL_RC4|SSL_SHA1  |SSL_SSLV3,
582         SSL_NOT_EXP|SSL_MEDIUM,
583         0,
584         128,
585         128,
586         SSL_ALL_CIPHERS,
587         SSL_ALL_STRENGTHS,
588         },
589
590 /* Cipher 21 VRS */
591         {
592         1,
593         SSL3_TXT_KRB5_IDEA_128_CBC_SHA,
594         SSL3_CK_KRB5_IDEA_128_CBC_SHA,
595         SSL_kKRB5|SSL_aKRB5|  SSL_IDEA|SSL_SHA1  |SSL_SSLV3,
596         SSL_NOT_EXP|SSL_MEDIUM,
597         0,
598         128,
599         128,
600         SSL_ALL_CIPHERS,
601         SSL_ALL_STRENGTHS,
602         },
603
604 /* Cipher 22 VRS */
605         {
606         1,
607         SSL3_TXT_KRB5_DES_64_CBC_MD5,
608         SSL3_CK_KRB5_DES_64_CBC_MD5,
609         SSL_kKRB5|SSL_aKRB5|  SSL_DES|SSL_MD5    |SSL_SSLV3,
610         SSL_NOT_EXP|SSL_LOW,
611         0,
612         56,
613         56,
614         SSL_ALL_CIPHERS,
615         SSL_ALL_STRENGTHS,
616         },
617
618 /* Cipher 23 VRS */
619         {
620         1,
621         SSL3_TXT_KRB5_DES_192_CBC3_MD5,
622         SSL3_CK_KRB5_DES_192_CBC3_MD5,
623         SSL_kKRB5|SSL_aKRB5|  SSL_3DES|SSL_MD5   |SSL_SSLV3,
624         SSL_NOT_EXP|SSL_HIGH,
625         0,
626         112,
627         168,
628         SSL_ALL_CIPHERS,
629         SSL_ALL_STRENGTHS,
630         },
631
632 /* Cipher 24 VRS */
633         {
634         1,
635         SSL3_TXT_KRB5_RC4_128_MD5,
636         SSL3_CK_KRB5_RC4_128_MD5,
637         SSL_kKRB5|SSL_aKRB5|  SSL_RC4|SSL_MD5  |SSL_SSLV3,
638         SSL_NOT_EXP|SSL_MEDIUM,
639         0,
640         128,
641         128,
642         SSL_ALL_CIPHERS,
643         SSL_ALL_STRENGTHS,
644         },
645
646 /* Cipher 25 VRS */
647         {
648         1,
649         SSL3_TXT_KRB5_IDEA_128_CBC_MD5,
650         SSL3_CK_KRB5_IDEA_128_CBC_MD5,
651         SSL_kKRB5|SSL_aKRB5|  SSL_IDEA|SSL_MD5  |SSL_SSLV3,
652         SSL_NOT_EXP|SSL_MEDIUM,
653         0,
654         128,
655         128,
656         SSL_ALL_CIPHERS,
657         SSL_ALL_STRENGTHS,
658         },
659
660 /* Cipher 26 VRS */
661         {
662         1,
663         SSL3_TXT_KRB5_DES_40_CBC_SHA,
664         SSL3_CK_KRB5_DES_40_CBC_SHA,
665         SSL_kKRB5|SSL_aKRB5|  SSL_DES|SSL_SHA1   |SSL_SSLV3,
666         SSL_EXPORT|SSL_EXP40,
667         0,
668         40,
669         56,
670         SSL_ALL_CIPHERS,
671         SSL_ALL_STRENGTHS,
672         },
673
674 /* Cipher 27 VRS */
675         {
676         1,
677         SSL3_TXT_KRB5_RC2_40_CBC_SHA,
678         SSL3_CK_KRB5_RC2_40_CBC_SHA,
679         SSL_kKRB5|SSL_aKRB5|  SSL_RC2|SSL_SHA1   |SSL_SSLV3,
680         SSL_EXPORT|SSL_EXP40,
681         0,
682         40,
683         128,
684         SSL_ALL_CIPHERS,
685         SSL_ALL_STRENGTHS,
686         },
687
688 /* Cipher 28 VRS */
689         {
690         1,
691         SSL3_TXT_KRB5_RC4_40_SHA,
692         SSL3_CK_KRB5_RC4_40_SHA,
693         SSL_kKRB5|SSL_aKRB5|  SSL_RC4|SSL_SHA1   |SSL_SSLV3,
694         SSL_EXPORT|SSL_EXP40,
695         0,
696         128,
697         128,
698         SSL_ALL_CIPHERS,
699         SSL_ALL_STRENGTHS,
700         },
701
702 /* Cipher 29 VRS */
703         {
704         1,
705         SSL3_TXT_KRB5_DES_40_CBC_MD5,
706         SSL3_CK_KRB5_DES_40_CBC_MD5,
707         SSL_kKRB5|SSL_aKRB5|  SSL_DES|SSL_MD5    |SSL_SSLV3,
708         SSL_EXPORT|SSL_EXP40,
709         0,
710         40,
711         56,
712         SSL_ALL_CIPHERS,
713         SSL_ALL_STRENGTHS,
714         },
715
716 /* Cipher 2A VRS */
717         {
718         1,
719         SSL3_TXT_KRB5_RC2_40_CBC_MD5,
720         SSL3_CK_KRB5_RC2_40_CBC_MD5,
721         SSL_kKRB5|SSL_aKRB5|  SSL_RC2|SSL_MD5    |SSL_SSLV3,
722         SSL_EXPORT|SSL_EXP40,
723         0,
724         40,
725         128,
726         SSL_ALL_CIPHERS,
727         SSL_ALL_STRENGTHS,
728         },
729
730 /* Cipher 2B VRS */
731         {
732         1,
733         SSL3_TXT_KRB5_RC4_40_MD5,
734         SSL3_CK_KRB5_RC4_40_MD5,
735         SSL_kKRB5|SSL_aKRB5|  SSL_RC4|SSL_MD5    |SSL_SSLV3,
736         SSL_EXPORT|SSL_EXP40,
737         0,
738         128,
739         128,
740         SSL_ALL_CIPHERS,
741         SSL_ALL_STRENGTHS,
742         },
743 #endif  /* OPENSSL_NO_KRB5 */
744 /* New AES ciphersuites */
745
746 /* Cipher 2F */
747         {
748         1,
749         TLS1_TXT_RSA_WITH_AES_128_SHA,
750         TLS1_CK_RSA_WITH_AES_128_SHA,
751         SSL_kRSA|SSL_aRSA|SSL_AES|SSL_SHA |SSL_TLSV1,
752         SSL_NOT_EXP|SSL_HIGH,
753         0,
754         128,
755         128,
756         SSL_ALL_CIPHERS,
757         SSL_ALL_STRENGTHS,
758         },
759 /* Cipher 30 */
760         {
761         0,
762         TLS1_TXT_DH_DSS_WITH_AES_128_SHA,
763         TLS1_CK_DH_DSS_WITH_AES_128_SHA,
764         SSL_kDHd|SSL_aDH|SSL_AES|SSL_SHA|SSL_TLSV1,
765         SSL_NOT_EXP|SSL_HIGH,
766         0,
767         128,
768         128,
769         SSL_ALL_CIPHERS,
770         SSL_ALL_STRENGTHS,
771         },
772 /* Cipher 31 */
773         {
774         0,
775         TLS1_TXT_DH_RSA_WITH_AES_128_SHA,
776         TLS1_CK_DH_RSA_WITH_AES_128_SHA,
777         SSL_kDHr|SSL_aDH|SSL_AES|SSL_SHA|SSL_TLSV1,
778         SSL_NOT_EXP|SSL_HIGH,
779         0,
780         128,
781         128,
782         SSL_ALL_CIPHERS,
783         SSL_ALL_STRENGTHS,
784         },
785 /* Cipher 32 */
786         {
787         1,
788         TLS1_TXT_DHE_DSS_WITH_AES_128_SHA,
789         TLS1_CK_DHE_DSS_WITH_AES_128_SHA,
790         SSL_kEDH|SSL_aDSS|SSL_AES|SSL_SHA|SSL_TLSV1,
791         SSL_NOT_EXP|SSL_HIGH,
792         0,
793         128,
794         128,
795         SSL_ALL_CIPHERS,
796         SSL_ALL_STRENGTHS,
797         },
798 /* Cipher 33 */
799         {
800         1,
801         TLS1_TXT_DHE_RSA_WITH_AES_128_SHA,
802         TLS1_CK_DHE_RSA_WITH_AES_128_SHA,
803         SSL_kEDH|SSL_aRSA|SSL_AES|SSL_SHA|SSL_TLSV1,
804         SSL_NOT_EXP|SSL_HIGH,
805         0,
806         128,
807         128,
808         SSL_ALL_CIPHERS,
809         SSL_ALL_STRENGTHS,
810         },
811 /* Cipher 34 */
812         {
813         1,
814         TLS1_TXT_ADH_WITH_AES_128_SHA,
815         TLS1_CK_ADH_WITH_AES_128_SHA,
816         SSL_kEDH|SSL_aNULL|SSL_AES|SSL_SHA|SSL_TLSV1,
817         SSL_NOT_EXP|SSL_HIGH,
818         0,
819         128,
820         128,
821         SSL_ALL_CIPHERS,
822         SSL_ALL_STRENGTHS,
823         },
824
825 /* Cipher 35 */
826         {
827         1,
828         TLS1_TXT_RSA_WITH_AES_256_SHA,
829         TLS1_CK_RSA_WITH_AES_256_SHA,
830         SSL_kRSA|SSL_aRSA|SSL_AES|SSL_SHA |SSL_TLSV1,
831         SSL_NOT_EXP|SSL_HIGH,
832         0,
833         256,
834         256,
835         SSL_ALL_CIPHERS,
836         SSL_ALL_STRENGTHS,
837         },
838 /* Cipher 36 */
839         {
840         0,
841         TLS1_TXT_DH_DSS_WITH_AES_256_SHA,
842         TLS1_CK_DH_DSS_WITH_AES_256_SHA,
843         SSL_kDHd|SSL_aDH|SSL_AES|SSL_SHA|SSL_TLSV1,
844         SSL_NOT_EXP|SSL_HIGH,
845         0,
846         256,
847         256,
848         SSL_ALL_CIPHERS,
849         SSL_ALL_STRENGTHS,
850         },
851 /* Cipher 37 */
852         {
853         0,
854         TLS1_TXT_DH_RSA_WITH_AES_256_SHA,
855         TLS1_CK_DH_RSA_WITH_AES_256_SHA,
856         SSL_kDHr|SSL_aDH|SSL_AES|SSL_SHA|SSL_TLSV1,
857         SSL_NOT_EXP|SSL_HIGH,
858         0,
859         256,
860         256,
861         SSL_ALL_CIPHERS,
862         SSL_ALL_STRENGTHS,
863         },
864 /* Cipher 38 */
865         {
866         1,
867         TLS1_TXT_DHE_DSS_WITH_AES_256_SHA,
868         TLS1_CK_DHE_DSS_WITH_AES_256_SHA,
869         SSL_kEDH|SSL_aDSS|SSL_AES|SSL_SHA|SSL_TLSV1,
870         SSL_NOT_EXP|SSL_HIGH,
871         0,
872         256,
873         256,
874         SSL_ALL_CIPHERS,
875         SSL_ALL_STRENGTHS,
876         },
877 /* Cipher 39 */
878         {
879         1,
880         TLS1_TXT_DHE_RSA_WITH_AES_256_SHA,
881         TLS1_CK_DHE_RSA_WITH_AES_256_SHA,
882         SSL_kEDH|SSL_aRSA|SSL_AES|SSL_SHA|SSL_TLSV1,
883         SSL_NOT_EXP|SSL_HIGH,
884         0,
885         256,
886         256,
887         SSL_ALL_CIPHERS,
888         SSL_ALL_STRENGTHS,
889         },
890         /* Cipher 3A */
891         {
892         1,
893         TLS1_TXT_ADH_WITH_AES_256_SHA,
894         TLS1_CK_ADH_WITH_AES_256_SHA,
895         SSL_kEDH|SSL_aNULL|SSL_AES|SSL_SHA|SSL_TLSV1,
896         SSL_NOT_EXP|SSL_HIGH,
897         0,
898         256,
899         256,
900         SSL_ALL_CIPHERS,
901         SSL_ALL_STRENGTHS,
902         },
903
904 #ifndef OPENSSL_NO_ECDH
905         /* Cipher C001 */
906             {
907             1,
908             TLS1_TXT_ECDH_ECDSA_WITH_NULL_SHA,
909             TLS1_CK_ECDH_ECDSA_WITH_NULL_SHA,
910             SSL_kECDH|SSL_aECDSA|SSL_eNULL|SSL_SHA|SSL_TLSV1,
911             SSL_NOT_EXP,
912             0,
913             0,
914             0,
915             SSL_ALL_CIPHERS,
916             SSL_ALL_STRENGTHS,
917             },
918
919         /* Cipher C002 */
920             {
921             1,
922             TLS1_TXT_ECDH_ECDSA_WITH_RC4_128_SHA,
923             TLS1_CK_ECDH_ECDSA_WITH_RC4_128_SHA,
924             SSL_kECDH|SSL_aECDSA|SSL_RC4|SSL_SHA|SSL_TLSV1,
925             SSL_NOT_EXP,
926             0,
927             128,
928             128,
929             SSL_ALL_CIPHERS,
930             SSL_ALL_STRENGTHS,
931             },
932
933         /* Cipher C003 */
934             {
935             1,
936             TLS1_TXT_ECDH_ECDSA_WITH_DES_192_CBC3_SHA,
937             TLS1_CK_ECDH_ECDSA_WITH_DES_192_CBC3_SHA,
938             SSL_kECDH|SSL_aECDSA|SSL_3DES|SSL_SHA|SSL_TLSV1,
939             SSL_NOT_EXP|SSL_HIGH,
940             0,
941             168,
942             168,
943             SSL_ALL_CIPHERS,
944             SSL_ALL_STRENGTHS,
945             },
946
947         /* Cipher C004 */
948             {
949             1,
950             TLS1_TXT_ECDH_ECDSA_WITH_AES_128_CBC_SHA,
951             TLS1_CK_ECDH_ECDSA_WITH_AES_128_CBC_SHA,
952             SSL_kECDH|SSL_aECDSA|SSL_AES|SSL_SHA|SSL_TLSV1,
953             SSL_NOT_EXP|SSL_HIGH,
954             0,
955             128,
956             128,
957             SSL_ALL_CIPHERS,
958             SSL_ALL_STRENGTHS,
959             },
960
961         /* Cipher C005 */
962             {
963             1,
964             TLS1_TXT_ECDH_ECDSA_WITH_AES_256_CBC_SHA,
965             TLS1_CK_ECDH_ECDSA_WITH_AES_256_CBC_SHA,
966             SSL_kECDH|SSL_aECDSA|SSL_AES|SSL_SHA|SSL_TLSV1,
967             SSL_NOT_EXP|SSL_HIGH,
968             0,
969             256,
970             256,
971             SSL_ALL_CIPHERS,
972             SSL_ALL_STRENGTHS,
973             },
974
975         /* Cipher C006 */
976             {
977             1,
978             TLS1_TXT_ECDHE_ECDSA_WITH_NULL_SHA,
979             TLS1_CK_ECDHE_ECDSA_WITH_NULL_SHA,
980             SSL_kECDHE|SSL_aECDSA|SSL_eNULL|SSL_SHA|SSL_TLSV1,
981             SSL_NOT_EXP,
982             0,
983             0,
984             0,
985             SSL_ALL_CIPHERS,
986             SSL_ALL_STRENGTHS,
987             },
988
989         /* Cipher C007 */
990             {
991             1,
992             TLS1_TXT_ECDHE_ECDSA_WITH_RC4_128_SHA,
993             TLS1_CK_ECDHE_ECDSA_WITH_RC4_128_SHA,
994             SSL_kECDHE|SSL_aECDSA|SSL_RC4|SSL_SHA|SSL_TLSV1,
995             SSL_NOT_EXP,
996             0,
997             128,
998             128,
999             SSL_ALL_CIPHERS,
1000             SSL_ALL_STRENGTHS,
1001             },
1002
1003         /* Cipher C008 */
1004             {
1005             1,
1006             TLS1_TXT_ECDHE_ECDSA_WITH_DES_192_CBC3_SHA,
1007             TLS1_CK_ECDHE_ECDSA_WITH_DES_192_CBC3_SHA,
1008             SSL_kECDHE|SSL_aECDSA|SSL_3DES|SSL_SHA|SSL_TLSV1,
1009             SSL_NOT_EXP|SSL_HIGH,
1010             0,
1011             168,
1012             168,
1013             SSL_ALL_CIPHERS,
1014             SSL_ALL_STRENGTHS,
1015             },
1016
1017         /* Cipher C009 */
1018             {
1019             1,
1020             TLS1_TXT_ECDHE_ECDSA_WITH_AES_128_CBC_SHA,
1021             TLS1_CK_ECDHE_ECDSA_WITH_AES_128_CBC_SHA,
1022             SSL_kECDHE|SSL_aECDSA|SSL_AES|SSL_SHA|SSL_TLSV1,
1023             SSL_NOT_EXP|SSL_HIGH,
1024             0,
1025             128,
1026             128,
1027             SSL_ALL_CIPHERS,
1028             SSL_ALL_STRENGTHS,
1029             },
1030
1031         /* Cipher C00A */
1032             {
1033             1,
1034             TLS1_TXT_ECDHE_ECDSA_WITH_AES_256_CBC_SHA,
1035             TLS1_CK_ECDHE_ECDSA_WITH_AES_256_CBC_SHA,
1036             SSL_kECDHE|SSL_aECDSA|SSL_AES|SSL_SHA|SSL_TLSV1,
1037             SSL_NOT_EXP|SSL_HIGH,
1038             0,
1039             256,
1040             256,
1041             SSL_ALL_CIPHERS,
1042             SSL_ALL_STRENGTHS,
1043             },
1044
1045         /* Cipher C00B */
1046             {
1047             1,
1048             TLS1_TXT_ECDH_RSA_WITH_NULL_SHA,
1049             TLS1_CK_ECDH_RSA_WITH_NULL_SHA,
1050             SSL_kECDH|SSL_aRSA|SSL_eNULL|SSL_SHA|SSL_TLSV1,
1051             SSL_NOT_EXP,
1052             0,
1053             0,
1054             0,
1055             SSL_ALL_CIPHERS,
1056             SSL_ALL_STRENGTHS,
1057             },
1058
1059         /* Cipher C00C */
1060             {
1061             1,
1062             TLS1_TXT_ECDH_RSA_WITH_RC4_128_SHA,
1063             TLS1_CK_ECDH_RSA_WITH_RC4_128_SHA,
1064             SSL_kECDH|SSL_aRSA|SSL_RC4|SSL_SHA|SSL_TLSV1,
1065             SSL_NOT_EXP,
1066             0,
1067             128,
1068             128,
1069             SSL_ALL_CIPHERS,
1070             SSL_ALL_STRENGTHS,
1071             },
1072
1073         /* Cipher C00D */
1074             {
1075             1,
1076             TLS1_TXT_ECDH_RSA_WITH_DES_192_CBC3_SHA,
1077             TLS1_CK_ECDH_RSA_WITH_DES_192_CBC3_SHA,
1078             SSL_kECDH|SSL_aRSA|SSL_3DES|SSL_SHA|SSL_TLSV1,
1079             SSL_NOT_EXP|SSL_HIGH,
1080             0,
1081             168,
1082             168,
1083             SSL_ALL_CIPHERS,
1084             SSL_ALL_STRENGTHS,
1085             },
1086
1087         /* Cipher C00E */
1088             {
1089             1,
1090             TLS1_TXT_ECDH_RSA_WITH_AES_128_CBC_SHA,
1091             TLS1_CK_ECDH_RSA_WITH_AES_128_CBC_SHA,
1092             SSL_kECDH|SSL_aRSA|SSL_AES|SSL_SHA|SSL_TLSV1,
1093             SSL_NOT_EXP|SSL_HIGH,
1094             0,
1095             128,
1096             128,
1097             SSL_ALL_CIPHERS,
1098             SSL_ALL_STRENGTHS,
1099             },
1100
1101         /* Cipher C00F */
1102             {
1103             1,
1104             TLS1_TXT_ECDH_RSA_WITH_AES_256_CBC_SHA,
1105             TLS1_CK_ECDH_RSA_WITH_AES_256_CBC_SHA,
1106             SSL_kECDH|SSL_aRSA|SSL_AES|SSL_SHA|SSL_TLSV1,
1107             SSL_NOT_EXP|SSL_HIGH,
1108             0,
1109             256,
1110             256,
1111             SSL_ALL_CIPHERS,
1112             SSL_ALL_STRENGTHS,
1113             },
1114
1115         /* Cipher C010 */
1116             {
1117             1,
1118             TLS1_TXT_ECDHE_RSA_WITH_NULL_SHA,
1119             TLS1_CK_ECDHE_RSA_WITH_NULL_SHA,
1120             SSL_kECDHE|SSL_aRSA|SSL_eNULL|SSL_SHA|SSL_TLSV1,
1121             SSL_NOT_EXP,
1122             0,
1123             0,
1124             0,
1125             SSL_ALL_CIPHERS,
1126             SSL_ALL_STRENGTHS,
1127             },
1128
1129         /* Cipher C011 */
1130             {
1131             1,
1132             TLS1_TXT_ECDHE_RSA_WITH_RC4_128_SHA,
1133             TLS1_CK_ECDHE_RSA_WITH_RC4_128_SHA,
1134             SSL_kECDHE|SSL_aRSA|SSL_RC4|SSL_SHA|SSL_TLSV1,
1135             SSL_NOT_EXP,
1136             0,
1137             128,
1138             128,
1139             SSL_ALL_CIPHERS,
1140             SSL_ALL_STRENGTHS,
1141             },
1142
1143         /* Cipher C012 */
1144             {
1145             1,
1146             TLS1_TXT_ECDHE_RSA_WITH_DES_192_CBC3_SHA,
1147             TLS1_CK_ECDHE_RSA_WITH_DES_192_CBC3_SHA,
1148             SSL_kECDHE|SSL_aRSA|SSL_3DES|SSL_SHA|SSL_TLSV1,
1149             SSL_NOT_EXP|SSL_HIGH,
1150             0,
1151             168,
1152             168,
1153             SSL_ALL_CIPHERS,
1154             SSL_ALL_STRENGTHS,
1155             },
1156
1157         /* Cipher C013 */
1158             {
1159             1,
1160             TLS1_TXT_ECDHE_RSA_WITH_AES_128_CBC_SHA,
1161             TLS1_CK_ECDHE_RSA_WITH_AES_128_CBC_SHA,
1162             SSL_kECDHE|SSL_aRSA|SSL_AES|SSL_SHA|SSL_TLSV1,
1163             SSL_NOT_EXP|SSL_HIGH,
1164             0,
1165             128,
1166             128,
1167             SSL_ALL_CIPHERS,
1168             SSL_ALL_STRENGTHS,
1169             },
1170
1171         /* Cipher C014 */
1172             {
1173             1,
1174             TLS1_TXT_ECDHE_RSA_WITH_AES_256_CBC_SHA,
1175             TLS1_CK_ECDHE_RSA_WITH_AES_256_CBC_SHA,
1176             SSL_kECDHE|SSL_aRSA|SSL_AES|SSL_SHA|SSL_TLSV1,
1177             SSL_NOT_EXP|SSL_HIGH,
1178             0,
1179             256,
1180             256,
1181             SSL_ALL_CIPHERS,
1182             SSL_ALL_STRENGTHS,
1183             },
1184
1185         /* Cipher C015 */
1186             {
1187             1,
1188             TLS1_TXT_ECDH_anon_WITH_NULL_SHA,
1189             TLS1_CK_ECDH_anon_WITH_NULL_SHA,
1190             SSL_kECDHE|SSL_aNULL|SSL_eNULL|SSL_SHA|SSL_TLSV1,
1191             SSL_NOT_EXP,
1192             0,
1193             0,
1194             0,
1195             SSL_ALL_CIPHERS,
1196             SSL_ALL_STRENGTHS,
1197             },
1198
1199         /* Cipher C016 */
1200             {
1201             1,
1202             TLS1_TXT_ECDH_anon_WITH_RC4_128_SHA,
1203             TLS1_CK_ECDH_anon_WITH_RC4_128_SHA,
1204             SSL_kECDHE|SSL_aNULL|SSL_RC4|SSL_SHA|SSL_TLSV1,
1205             SSL_NOT_EXP,
1206             0,
1207             128,
1208             128,
1209             SSL_ALL_CIPHERS,
1210             SSL_ALL_STRENGTHS,
1211             },
1212
1213         /* Cipher C017 */
1214             {
1215             1,
1216             TLS1_TXT_ECDH_anon_WITH_DES_192_CBC3_SHA,
1217             TLS1_CK_ECDH_anon_WITH_DES_192_CBC3_SHA,
1218             SSL_kECDHE|SSL_aNULL|SSL_3DES|SSL_SHA|SSL_TLSV1,
1219             SSL_NOT_EXP|SSL_HIGH,
1220             0,
1221             168,
1222             168,
1223             SSL_ALL_CIPHERS,
1224             SSL_ALL_STRENGTHS,
1225             },
1226
1227         /* Cipher C018 */
1228             {
1229             1,
1230             TLS1_TXT_ECDH_anon_WITH_AES_128_CBC_SHA,
1231             TLS1_CK_ECDH_anon_WITH_AES_128_CBC_SHA,
1232             SSL_kECDHE|SSL_aNULL|SSL_AES|SSL_SHA|SSL_TLSV1,
1233             SSL_NOT_EXP|SSL_HIGH,
1234             0,
1235             128,
1236             128,
1237             SSL_ALL_CIPHERS,
1238             SSL_ALL_STRENGTHS,
1239             },
1240
1241         /* Cipher C019 */
1242             {
1243             1,
1244             TLS1_TXT_ECDH_anon_WITH_AES_256_CBC_SHA,
1245             TLS1_CK_ECDH_anon_WITH_AES_256_CBC_SHA,
1246             SSL_kECDHE|SSL_aNULL|SSL_AES|SSL_SHA|SSL_TLSV1,
1247             SSL_NOT_EXP|SSL_HIGH,
1248             0,
1249             256,
1250             256,
1251             SSL_ALL_CIPHERS,
1252             SSL_ALL_STRENGTHS,
1253             },
1254 #endif  /* OPENSSL_NO_ECDH */
1255
1256 #if TLS1_ALLOW_EXPERIMENTAL_CIPHERSUITES
1257         /* New TLS Export CipherSuites from expired ID */
1258 #if 0
1259         /* Cipher 60 */
1260             {
1261             1,
1262             TLS1_TXT_RSA_EXPORT1024_WITH_RC4_56_MD5,
1263             TLS1_CK_RSA_EXPORT1024_WITH_RC4_56_MD5,
1264             SSL_kRSA|SSL_aRSA|SSL_RC4|SSL_MD5|SSL_TLSV1,
1265             SSL_EXPORT|SSL_EXP56,
1266             0,
1267             56,
1268             128,
1269             SSL_ALL_CIPHERS,
1270             SSL_ALL_STRENGTHS,
1271             },
1272         /* Cipher 61 */
1273             {
1274             1,
1275             TLS1_TXT_RSA_EXPORT1024_WITH_RC2_CBC_56_MD5,
1276             TLS1_CK_RSA_EXPORT1024_WITH_RC2_CBC_56_MD5,
1277             SSL_kRSA|SSL_aRSA|SSL_RC2|SSL_MD5|SSL_TLSV1,
1278             SSL_EXPORT|SSL_EXP56,
1279             0,
1280             56,
1281             128,
1282             SSL_ALL_CIPHERS,
1283             SSL_ALL_STRENGTHS,
1284             },
1285 #endif
1286         /* Cipher 62 */
1287             {
1288             1,
1289             TLS1_TXT_RSA_EXPORT1024_WITH_DES_CBC_SHA,
1290             TLS1_CK_RSA_EXPORT1024_WITH_DES_CBC_SHA,
1291             SSL_kRSA|SSL_aRSA|SSL_DES|SSL_SHA|SSL_TLSV1,
1292             SSL_EXPORT|SSL_EXP56,
1293             0,
1294             56,
1295             56,
1296             SSL_ALL_CIPHERS,
1297             SSL_ALL_STRENGTHS,
1298             },
1299         /* Cipher 63 */
1300             {
1301             1,
1302             TLS1_TXT_DHE_DSS_EXPORT1024_WITH_DES_CBC_SHA,
1303             TLS1_CK_DHE_DSS_EXPORT1024_WITH_DES_CBC_SHA,
1304             SSL_kEDH|SSL_aDSS|SSL_DES|SSL_SHA|SSL_TLSV1,
1305             SSL_EXPORT|SSL_EXP56,
1306             0,
1307             56,
1308             56,
1309             SSL_ALL_CIPHERS,
1310             SSL_ALL_STRENGTHS,
1311             },
1312         /* Cipher 64 */
1313             {
1314             1,
1315             TLS1_TXT_RSA_EXPORT1024_WITH_RC4_56_SHA,
1316             TLS1_CK_RSA_EXPORT1024_WITH_RC4_56_SHA,
1317             SSL_kRSA|SSL_aRSA|SSL_RC4|SSL_SHA|SSL_TLSV1,
1318             SSL_EXPORT|SSL_EXP56,
1319             0,
1320             56,
1321             128,
1322             SSL_ALL_CIPHERS,
1323             SSL_ALL_STRENGTHS,
1324             },
1325         /* Cipher 65 */
1326             {
1327             1,
1328             TLS1_TXT_DHE_DSS_EXPORT1024_WITH_RC4_56_SHA,
1329             TLS1_CK_DHE_DSS_EXPORT1024_WITH_RC4_56_SHA,
1330             SSL_kEDH|SSL_aDSS|SSL_RC4|SSL_SHA|SSL_TLSV1,
1331             SSL_EXPORT|SSL_EXP56,
1332             0,
1333             56,
1334             128,
1335             SSL_ALL_CIPHERS,
1336             SSL_ALL_STRENGTHS,
1337             },
1338         /* Cipher 66 */
1339             {
1340             1,
1341             TLS1_TXT_DHE_DSS_WITH_RC4_128_SHA,
1342             TLS1_CK_DHE_DSS_WITH_RC4_128_SHA,
1343             SSL_kEDH|SSL_aDSS|SSL_RC4|SSL_SHA|SSL_TLSV1,
1344             SSL_NOT_EXP|SSL_MEDIUM,
1345             0,
1346             128,
1347             128,
1348             SSL_ALL_CIPHERS,
1349             SSL_ALL_STRENGTHS
1350             },
1351 #endif
1352
1353 /* end of list */
1354         };
1355
1356 SSL3_ENC_METHOD SSLv3_enc_data={
1357         ssl3_enc,
1358         ssl3_mac,
1359         ssl3_setup_key_block,
1360         ssl3_generate_master_secret,
1361         ssl3_change_cipher_state,
1362         ssl3_final_finish_mac,
1363         MD5_DIGEST_LENGTH+SHA_DIGEST_LENGTH,
1364         ssl3_cert_verify_mac,
1365         SSL3_MD_CLIENT_FINISHED_CONST,4,
1366         SSL3_MD_SERVER_FINISHED_CONST,4,
1367         ssl3_alert_code,
1368         };
1369
1370 long ssl3_default_timeout(void)
1371         {
1372         /* 2 hours, the 24 hours mentioned in the SSLv3 spec
1373          * is way too long for http, the cache would over fill */
1374         return(60*60*2);
1375         }
1376
1377 int ssl3_num_ciphers(void)
1378         {
1379         return(SSL3_NUM_CIPHERS);
1380         }
1381
1382 SSL_CIPHER *ssl3_get_cipher(unsigned int u)
1383         {
1384         if (u < SSL3_NUM_CIPHERS)
1385                 return(&(ssl3_ciphers[SSL3_NUM_CIPHERS-1-u]));
1386         else
1387                 return(NULL);
1388         }
1389
1390 int ssl3_pending(const SSL *s)
1391         {
1392         if (s->rstate == SSL_ST_READ_BODY)
1393                 return 0;
1394         
1395         return (s->s3->rrec.type == SSL3_RT_APPLICATION_DATA) ? s->s3->rrec.length : 0;
1396         }
1397
1398 int ssl3_new(SSL *s)
1399         {
1400         SSL3_STATE *s3;
1401
1402         if ((s3=OPENSSL_malloc(sizeof *s3)) == NULL) goto err;
1403         memset(s3,0,sizeof *s3);
1404         EVP_MD_CTX_init(&s3->finish_dgst1);
1405         EVP_MD_CTX_init(&s3->finish_dgst2);
1406         memset(s3->rrec.seq_num,0,sizeof(s3->rrec.seq_num));
1407         memset(s3->wrec.seq_num,0,sizeof(s3->wrec.seq_num));
1408
1409         s->s3=s3;
1410
1411         s->method->ssl_clear(s);
1412         return(1);
1413 err:
1414         return(0);
1415         }
1416
1417 void ssl3_free(SSL *s)
1418         {
1419         if(s == NULL)
1420             return;
1421
1422         ssl3_cleanup_key_block(s);
1423         if (s->s3->rbuf.buf != NULL)
1424                 OPENSSL_free(s->s3->rbuf.buf);
1425         if (s->s3->wbuf.buf != NULL)
1426                 OPENSSL_free(s->s3->wbuf.buf);
1427         if (s->s3->rrec.comp != NULL)
1428                 OPENSSL_free(s->s3->rrec.comp);
1429 #ifndef OPENSSL_NO_DH
1430         if (s->s3->tmp.dh != NULL)
1431                 DH_free(s->s3->tmp.dh);
1432 #endif
1433 #ifndef OPENSSL_NO_ECDH
1434         if (s->s3->tmp.ecdh != NULL)
1435                 EC_KEY_free(s->s3->tmp.ecdh);
1436 #endif
1437
1438         if (s->s3->tmp.ca_names != NULL)
1439                 sk_X509_NAME_pop_free(s->s3->tmp.ca_names,X509_NAME_free);
1440         EVP_MD_CTX_cleanup(&s->s3->finish_dgst1);
1441         EVP_MD_CTX_cleanup(&s->s3->finish_dgst2);
1442
1443         OPENSSL_cleanse(s->s3,sizeof *s->s3);
1444         OPENSSL_free(s->s3);
1445         s->s3=NULL;
1446         }
1447
1448 void ssl3_clear(SSL *s)
1449         {
1450         unsigned char *rp,*wp;
1451         size_t rlen, wlen;
1452
1453         ssl3_cleanup_key_block(s);
1454         if (s->s3->tmp.ca_names != NULL)
1455                 sk_X509_NAME_pop_free(s->s3->tmp.ca_names,X509_NAME_free);
1456
1457         if (s->s3->rrec.comp != NULL)
1458                 {
1459                 OPENSSL_free(s->s3->rrec.comp);
1460                 s->s3->rrec.comp=NULL;
1461                 }
1462 #ifndef OPENSSL_NO_DH
1463         if (s->s3->tmp.dh != NULL)
1464                 DH_free(s->s3->tmp.dh);
1465 #endif
1466 #ifndef OPENSSL_NO_ECDH
1467         if (s->s3->tmp.ecdh != NULL)
1468                 EC_KEY_free(s->s3->tmp.ecdh);
1469 #endif
1470
1471         rp = s->s3->rbuf.buf;
1472         wp = s->s3->wbuf.buf;
1473         rlen = s->s3->rbuf.len;
1474         wlen = s->s3->wbuf.len;
1475
1476         EVP_MD_CTX_cleanup(&s->s3->finish_dgst1);
1477         EVP_MD_CTX_cleanup(&s->s3->finish_dgst2);
1478
1479         memset(s->s3,0,sizeof *s->s3);
1480         s->s3->rbuf.buf = rp;
1481         s->s3->wbuf.buf = wp;
1482         s->s3->rbuf.len = rlen;
1483         s->s3->wbuf.len = wlen;
1484
1485         ssl_free_wbio_buffer(s);
1486
1487         s->packet_length=0;
1488         s->s3->renegotiate=0;
1489         s->s3->total_renegotiations=0;
1490         s->s3->num_renegotiations=0;
1491         s->s3->in_read_app_data=0;
1492         s->version=SSL3_VERSION;
1493         }
1494
1495 long ssl3_ctrl(SSL *s, int cmd, long larg, void *parg)
1496         {
1497         int ret=0;
1498
1499 #if !defined(OPENSSL_NO_DSA) || !defined(OPENSSL_NO_RSA)
1500         if (
1501 #ifndef OPENSSL_NO_RSA
1502             cmd == SSL_CTRL_SET_TMP_RSA ||
1503             cmd == SSL_CTRL_SET_TMP_RSA_CB ||
1504 #endif
1505 #ifndef OPENSSL_NO_DSA
1506             cmd == SSL_CTRL_SET_TMP_DH ||
1507             cmd == SSL_CTRL_SET_TMP_DH_CB ||
1508 #endif
1509                 0)
1510                 {
1511                 if (!ssl_cert_inst(&s->cert))
1512                         {
1513                         SSLerr(SSL_F_SSL3_CTRL, ERR_R_MALLOC_FAILURE);
1514                         return(0);
1515                         }
1516                 }
1517 #endif
1518
1519         switch (cmd)
1520                 {
1521         case SSL_CTRL_GET_SESSION_REUSED:
1522                 ret=s->hit;
1523                 break;
1524         case SSL_CTRL_GET_CLIENT_CERT_REQUEST:
1525                 break;
1526         case SSL_CTRL_GET_NUM_RENEGOTIATIONS:
1527                 ret=s->s3->num_renegotiations;
1528                 break;
1529         case SSL_CTRL_CLEAR_NUM_RENEGOTIATIONS:
1530                 ret=s->s3->num_renegotiations;
1531                 s->s3->num_renegotiations=0;
1532                 break;
1533         case SSL_CTRL_GET_TOTAL_RENEGOTIATIONS:
1534                 ret=s->s3->total_renegotiations;
1535                 break;
1536         case SSL_CTRL_GET_FLAGS:
1537                 ret=(int)(s->s3->flags);
1538                 break;
1539 #ifndef OPENSSL_NO_RSA
1540         case SSL_CTRL_NEED_TMP_RSA:
1541                 if ((s->cert != NULL) && (s->cert->rsa_tmp == NULL) &&
1542                     ((s->cert->pkeys[SSL_PKEY_RSA_ENC].privatekey == NULL) ||
1543                      (EVP_PKEY_size(s->cert->pkeys[SSL_PKEY_RSA_ENC].privatekey) > (512/8))))
1544                         ret = 1;
1545                 break;
1546         case SSL_CTRL_SET_TMP_RSA:
1547                 {
1548                         RSA *rsa = (RSA *)parg;
1549                         if (rsa == NULL)
1550                                 {
1551                                 SSLerr(SSL_F_SSL3_CTRL, ERR_R_PASSED_NULL_PARAMETER);
1552                                 return(ret);
1553                                 }
1554                         if ((rsa = RSAPrivateKey_dup(rsa)) == NULL)
1555                                 {
1556                                 SSLerr(SSL_F_SSL3_CTRL, ERR_R_RSA_LIB);
1557                                 return(ret);
1558                                 }
1559                         if (s->cert->rsa_tmp != NULL)
1560                                 RSA_free(s->cert->rsa_tmp);
1561                         s->cert->rsa_tmp = rsa;
1562                         ret = 1;
1563                 }
1564                 break;
1565         case SSL_CTRL_SET_TMP_RSA_CB:
1566                 {
1567                 SSLerr(SSL_F_SSL3_CTRL, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
1568                 return(ret);
1569                 }
1570                 break;
1571 #endif
1572 #ifndef OPENSSL_NO_DH
1573         case SSL_CTRL_SET_TMP_DH:
1574                 {
1575                         DH *dh = (DH *)parg;
1576                         if (dh == NULL)
1577                                 {
1578                                 SSLerr(SSL_F_SSL3_CTRL, ERR_R_PASSED_NULL_PARAMETER);
1579                                 return(ret);
1580                                 }
1581                         if ((dh = DHparams_dup(dh)) == NULL)
1582                                 {
1583                                 SSLerr(SSL_F_SSL3_CTRL, ERR_R_DH_LIB);
1584                                 return(ret);
1585                                 }
1586                         if (!(s->options & SSL_OP_SINGLE_DH_USE))
1587                                 {
1588                                 if (!DH_generate_key(dh))
1589                                         {
1590                                         DH_free(dh);
1591                                         SSLerr(SSL_F_SSL3_CTRL, ERR_R_DH_LIB);
1592                                         return(ret);
1593                                         }
1594                                 }
1595                         if (s->cert->dh_tmp != NULL)
1596                                 DH_free(s->cert->dh_tmp);
1597                         s->cert->dh_tmp = dh;
1598                         ret = 1;
1599                 }
1600                 break;
1601         case SSL_CTRL_SET_TMP_DH_CB:
1602                 {
1603                 SSLerr(SSL_F_SSL3_CTRL, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
1604                 return(ret);
1605                 }
1606                 break;
1607 #endif
1608 #ifndef OPENSSL_NO_ECDH
1609         case SSL_CTRL_SET_TMP_ECDH:
1610                 {
1611                 EC_KEY *ecdh = NULL;
1612                         
1613                 if (parg == NULL)
1614                         {
1615                         SSLerr(SSL_F_SSL3_CTRL, ERR_R_PASSED_NULL_PARAMETER);
1616                         return(ret);
1617                         }
1618                 if (!EC_KEY_up_ref((EC_KEY *)parg))
1619                         {
1620                         SSLerr(SSL_F_SSL3_CTRL,ERR_R_ECDH_LIB);
1621                         return(ret);
1622                         }
1623                 ecdh = (EC_KEY *)parg;
1624                 if (!(s->options & SSL_OP_SINGLE_ECDH_USE))
1625                         {
1626                         if (!EC_KEY_generate_key(ecdh))
1627                                 {
1628                                 EC_KEY_free(ecdh);
1629                                 SSLerr(SSL_F_SSL3_CTRL,ERR_R_ECDH_LIB);
1630                                 return(ret);
1631                                 }
1632                         }
1633                 if (s->cert->ecdh_tmp != NULL)
1634                         EC_KEY_free(s->cert->ecdh_tmp);
1635                 s->cert->ecdh_tmp = ecdh;
1636                 ret = 1;
1637                 }
1638                 break;
1639         case SSL_CTRL_SET_TMP_ECDH_CB:
1640                 {
1641                 SSLerr(SSL_F_SSL3_CTRL, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
1642                 return(ret);
1643                 }
1644                 break;
1645 #endif /* !OPENSSL_NO_ECDH */
1646 #ifndef OPENSSL_NO_TLSEXT
1647         case SSL_CTRL_SET_TLSEXT_HOSTNAME:
1648                 if (larg == TLSEXT_NAMETYPE_host_name)
1649                         {
1650                         if (s->tlsext_hostname != NULL) 
1651                                 OPENSSL_free(s->tlsext_hostname);
1652                         s->tlsext_hostname = NULL;
1653
1654                         ret = 1;
1655                         if (parg == NULL) 
1656                                 break;
1657                         if (strlen((char *)parg) > TLSEXT_MAXLEN_host_name)
1658                                 {
1659                                 SSLerr(SSL_F_SSL3_CTRL, SSL_R_SSL3_EXT_INVALID_SERVERNAME);
1660                                 return 0;
1661                                 }
1662                         if ((s->tlsext_hostname = BUF_strdup((char *)parg)) == NULL)
1663                                 {
1664                                 SSLerr(SSL_F_SSL3_CTRL, ERR_R_INTERNAL_ERROR);
1665                                 return 0;
1666                                 }
1667                         }
1668                 else
1669                         {
1670                         SSLerr(SSL_F_SSL3_CTRL, SSL_R_SSL3_EXT_INVALID_SERVERNAME_TYPE);
1671                         return 0;
1672                         }
1673                 s->options |= SSL_OP_NO_SSLv2; /* can't use extension w/ SSL 2.0 format */
1674                 break;
1675 #endif /* !OPENSSL_NO_TLSEXT */
1676         default:
1677                 break;
1678                 }
1679         return(ret);
1680         }
1681
1682 long ssl3_callback_ctrl(SSL *s, int cmd, void (*fp)(void))
1683         {
1684         int ret=0;
1685
1686 #if !defined(OPENSSL_NO_DSA) || !defined(OPENSSL_NO_RSA)
1687         if (
1688 #ifndef OPENSSL_NO_RSA
1689             cmd == SSL_CTRL_SET_TMP_RSA_CB ||
1690 #endif
1691 #ifndef OPENSSL_NO_DSA
1692             cmd == SSL_CTRL_SET_TMP_DH_CB ||
1693 #endif
1694                 0)
1695                 {
1696                 if (!ssl_cert_inst(&s->cert))
1697                         {
1698                         SSLerr(SSL_F_SSL3_CALLBACK_CTRL, ERR_R_MALLOC_FAILURE);
1699                         return(0);
1700                         }
1701                 }
1702 #endif
1703
1704         switch (cmd)
1705                 {
1706 #ifndef OPENSSL_NO_RSA
1707         case SSL_CTRL_SET_TMP_RSA_CB:
1708                 {
1709                 s->cert->rsa_tmp_cb = (RSA *(*)(SSL *, int, int))fp;
1710                 }
1711                 break;
1712 #endif
1713 #ifndef OPENSSL_NO_DH
1714         case SSL_CTRL_SET_TMP_DH_CB:
1715                 {
1716                 s->cert->dh_tmp_cb = (DH *(*)(SSL *, int, int))fp;
1717                 }
1718                 break;
1719 #endif
1720 #ifndef OPENSSL_NO_ECDH
1721         case SSL_CTRL_SET_TMP_ECDH_CB:
1722                 {
1723                 s->cert->ecdh_tmp_cb = (EC_KEY *(*)(SSL *, int, int))fp;
1724                 }
1725                 break;
1726 #endif
1727         default:
1728                 break;
1729                 }
1730         return(ret);
1731         }
1732
1733 long ssl3_ctx_ctrl(SSL_CTX *ctx, int cmd, long larg, void *parg)
1734         {
1735         CERT *cert;
1736
1737         cert=ctx->cert;
1738
1739         switch (cmd)
1740                 {
1741 #ifndef OPENSSL_NO_RSA
1742         case SSL_CTRL_NEED_TMP_RSA:
1743                 if (    (cert->rsa_tmp == NULL) &&
1744                         ((cert->pkeys[SSL_PKEY_RSA_ENC].privatekey == NULL) ||
1745                          (EVP_PKEY_size(cert->pkeys[SSL_PKEY_RSA_ENC].privatekey) > (512/8)))
1746                         )
1747                         return(1);
1748                 else
1749                         return(0);
1750                 /* break; */
1751         case SSL_CTRL_SET_TMP_RSA:
1752                 {
1753                 RSA *rsa;
1754                 int i;
1755
1756                 rsa=(RSA *)parg;
1757                 i=1;
1758                 if (rsa == NULL)
1759                         i=0;
1760                 else
1761                         {
1762                         if ((rsa=RSAPrivateKey_dup(rsa)) == NULL)
1763                                 i=0;
1764                         }
1765                 if (!i)
1766                         {
1767                         SSLerr(SSL_F_SSL3_CTX_CTRL,ERR_R_RSA_LIB);
1768                         return(0);
1769                         }
1770                 else
1771                         {
1772                         if (cert->rsa_tmp != NULL)
1773                                 RSA_free(cert->rsa_tmp);
1774                         cert->rsa_tmp=rsa;
1775                         return(1);
1776                         }
1777                 }
1778                 /* break; */
1779         case SSL_CTRL_SET_TMP_RSA_CB:
1780                 {
1781                 SSLerr(SSL_F_SSL3_CTX_CTRL, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
1782                 return(0);
1783                 }
1784                 break;
1785 #endif
1786 #ifndef OPENSSL_NO_DH
1787         case SSL_CTRL_SET_TMP_DH:
1788                 {
1789                 DH *new=NULL,*dh;
1790
1791                 dh=(DH *)parg;
1792                 if ((new=DHparams_dup(dh)) == NULL)
1793                         {
1794                         SSLerr(SSL_F_SSL3_CTX_CTRL,ERR_R_DH_LIB);
1795                         return 0;
1796                         }
1797                 if (!(ctx->options & SSL_OP_SINGLE_DH_USE))
1798                         {
1799                         if (!DH_generate_key(new))
1800                                 {
1801                                 SSLerr(SSL_F_SSL3_CTX_CTRL,ERR_R_DH_LIB);
1802                                 DH_free(new);
1803                                 return 0;
1804                                 }
1805                         }
1806                 if (cert->dh_tmp != NULL)
1807                         DH_free(cert->dh_tmp);
1808                 cert->dh_tmp=new;
1809                 return 1;
1810                 }
1811                 /*break; */
1812         case SSL_CTRL_SET_TMP_DH_CB:
1813                 {
1814                 SSLerr(SSL_F_SSL3_CTX_CTRL, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
1815                 return(0);
1816                 }
1817                 break;
1818 #endif
1819 #ifndef OPENSSL_NO_ECDH
1820         case SSL_CTRL_SET_TMP_ECDH:
1821                 {
1822                 EC_KEY *ecdh = NULL;
1823                         
1824                 if (parg == NULL)
1825                         {
1826                         SSLerr(SSL_F_SSL3_CTX_CTRL,ERR_R_ECDH_LIB);
1827                         return 0;
1828                         }
1829                 ecdh = EC_KEY_dup((EC_KEY *)parg);
1830                 if (ecdh == NULL)
1831                         {
1832                         SSLerr(SSL_F_SSL3_CTX_CTRL,ERR_R_EC_LIB);
1833                         return 0;
1834                         }
1835                 if (!(ctx->options & SSL_OP_SINGLE_ECDH_USE))
1836                         {
1837                         if (!EC_KEY_generate_key(ecdh))
1838                                 {
1839                                 EC_KEY_free(ecdh);
1840                                 SSLerr(SSL_F_SSL3_CTX_CTRL,ERR_R_ECDH_LIB);
1841                                 return 0;
1842                                 }
1843                         }
1844
1845                 if (cert->ecdh_tmp != NULL)
1846                         {
1847                         EC_KEY_free(cert->ecdh_tmp);
1848                         }
1849                 cert->ecdh_tmp = ecdh;
1850                 return 1;
1851                 }
1852                 /* break; */
1853         case SSL_CTRL_SET_TMP_ECDH_CB:
1854                 {
1855                 SSLerr(SSL_F_SSL3_CTX_CTRL, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
1856                 return(0);
1857                 }
1858                 break;
1859 #endif /* !OPENSSL_NO_ECDH */
1860 #ifndef OPENSSL_NO_TLSEXT
1861         case SSL_CTRL_SET_TLSEXT_SERVERNAME_ARG:
1862                 ctx->tlsext_servername_arg=parg;
1863                 break;
1864 #endif /* !OPENSSL_NO_TLSEXT */
1865         /* A Thawte special :-) */
1866         case SSL_CTRL_EXTRA_CHAIN_CERT:
1867                 if (ctx->extra_certs == NULL)
1868                         {
1869                         if ((ctx->extra_certs=sk_X509_new_null()) == NULL)
1870                                 return(0);
1871                         }
1872                 sk_X509_push(ctx->extra_certs,(X509 *)parg);
1873                 break;
1874
1875         default:
1876                 return(0);
1877                 }
1878         return(1);
1879         }
1880
1881 long ssl3_ctx_callback_ctrl(SSL_CTX *ctx, int cmd, void (*fp)(void))
1882         {
1883         CERT *cert;
1884
1885         cert=ctx->cert;
1886
1887         switch (cmd)
1888                 {
1889 #ifndef OPENSSL_NO_RSA
1890         case SSL_CTRL_SET_TMP_RSA_CB:
1891                 {
1892                 cert->rsa_tmp_cb = (RSA *(*)(SSL *, int, int))fp;
1893                 }
1894                 break;
1895 #endif
1896 #ifndef OPENSSL_NO_DH
1897         case SSL_CTRL_SET_TMP_DH_CB:
1898                 {
1899                 cert->dh_tmp_cb = (DH *(*)(SSL *, int, int))fp;
1900                 }
1901                 break;
1902 #endif
1903 #ifndef OPENSSL_NO_ECDH
1904         case SSL_CTRL_SET_TMP_ECDH_CB:
1905                 {
1906                 cert->ecdh_tmp_cb = (EC_KEY *(*)(SSL *, int, int))fp;
1907                 }
1908                 break;
1909 #endif
1910 #ifndef OPENSSL_NO_TLSEXT
1911         case SSL_CTRL_SET_TLSEXT_SERVERNAME_CB:
1912                 ctx->tlsext_servername_callback=(int (*)(SSL *,int *,void *))fp;
1913                 break;
1914 #endif
1915         default:
1916                 return(0);
1917                 }
1918         return(1);
1919         }
1920
1921 /* This function needs to check if the ciphers required are actually
1922  * available */
1923 SSL_CIPHER *ssl3_get_cipher_by_char(const unsigned char *p)
1924         {
1925         SSL_CIPHER c,*cp;
1926         unsigned long id;
1927
1928         id=0x03000000L|((unsigned long)p[0]<<8L)|(unsigned long)p[1];
1929         c.id=id;
1930         cp = (SSL_CIPHER *)OBJ_bsearch((char *)&c,
1931                 (char *)ssl3_ciphers,
1932                 SSL3_NUM_CIPHERS,sizeof(SSL_CIPHER),
1933                 FP_ICC ssl_cipher_id_cmp);
1934         if (cp == NULL || cp->valid == 0)
1935                 return NULL;
1936         else
1937                 return cp;
1938         }
1939
1940 int ssl3_put_cipher_by_char(const SSL_CIPHER *c, unsigned char *p)
1941         {
1942         long l;
1943
1944         if (p != NULL)
1945                 {
1946                 l=c->id;
1947                 if ((l & 0xff000000) != 0x03000000) return(0);
1948                 p[0]=((unsigned char)(l>> 8L))&0xFF;
1949                 p[1]=((unsigned char)(l     ))&0xFF;
1950                 }
1951         return(2);
1952         }
1953
1954 SSL_CIPHER *ssl3_choose_cipher(SSL *s, STACK_OF(SSL_CIPHER) *clnt,
1955              STACK_OF(SSL_CIPHER) *srvr)
1956         {
1957         SSL_CIPHER *c,*ret=NULL;
1958         STACK_OF(SSL_CIPHER) *prio, *allow;
1959         int i,j,ok;
1960         CERT *cert;
1961         unsigned long alg,mask,emask;
1962
1963         /* Let's see which ciphers we can support */
1964         cert=s->cert;
1965
1966 #if 0
1967         /* Do not set the compare functions, because this may lead to a
1968          * reordering by "id". We want to keep the original ordering.
1969          * We may pay a price in performance during sk_SSL_CIPHER_find(),
1970          * but would have to pay with the price of sk_SSL_CIPHER_dup().
1971          */
1972         sk_SSL_CIPHER_set_cmp_func(srvr, ssl_cipher_ptr_id_cmp);
1973         sk_SSL_CIPHER_set_cmp_func(clnt, ssl_cipher_ptr_id_cmp);
1974 #endif
1975
1976 #ifdef CIPHER_DEBUG
1977         printf("Server has %d from %p:\n", sk_SSL_CIPHER_num(srvr), srvr);
1978         for(i=0 ; i < sk_SSL_CIPHER_num(srvr) ; ++i)
1979             {
1980             c=sk_SSL_CIPHER_value(srvr,i);
1981             printf("%p:%s\n",c,c->name);
1982             }
1983         printf("Client sent %d from %p:\n", sk_SSL_CIPHER_num(clnt), clnt);
1984         for(i=0 ; i < sk_SSL_CIPHER_num(clnt) ; ++i)
1985             {
1986             c=sk_SSL_CIPHER_value(clnt,i);
1987             printf("%p:%s\n",c,c->name);
1988             }
1989 #endif
1990
1991         if (s->options & SSL_OP_CIPHER_SERVER_PREFERENCE)
1992             {
1993             prio = srvr;
1994             allow = clnt;
1995             }
1996         else
1997             {
1998             prio = clnt;
1999             allow = srvr;
2000             }
2001
2002         for (i=0; i<sk_SSL_CIPHER_num(prio); i++)
2003                 {
2004                 c=sk_SSL_CIPHER_value(prio,i);
2005
2006                 ssl_set_cert_masks(cert,c);
2007                 mask=cert->mask;
2008                 emask=cert->export_mask;
2009                         
2010 #ifdef KSSL_DEBUG
2011                 printf("ssl3_choose_cipher %d alg= %lx\n", i,c->algorithms);
2012 #endif    /* KSSL_DEBUG */
2013
2014                 alg=c->algorithms&(SSL_MKEY_MASK|SSL_AUTH_MASK);
2015 #ifndef OPENSSL_NO_KRB5
2016                 if (alg & SSL_KRB5) 
2017                         {
2018                         if ( !kssl_keytab_is_available(s->kssl_ctx) )
2019                             continue;
2020                         }
2021 #endif /* OPENSSL_NO_KRB5 */
2022                 if (SSL_C_IS_EXPORT(c))
2023                         {
2024                         ok=((alg & emask) == alg)?1:0;
2025 #ifdef CIPHER_DEBUG
2026                         printf("%d:[%08lX:%08lX]%p:%s (export)\n",ok,alg,emask,
2027                                c,c->name);
2028 #endif
2029                         }
2030                 else
2031                         {
2032                         ok=((alg & mask) == alg)?1:0;
2033 #ifdef CIPHER_DEBUG
2034                         printf("%d:[%08lX:%08lX]%p:%s\n",ok,alg,mask,c,
2035                                c->name);
2036 #endif
2037                         }
2038
2039                 if (!ok) continue;
2040                 j=sk_SSL_CIPHER_find(allow,c);
2041                 if (j >= 0)
2042                         {
2043                         ret=sk_SSL_CIPHER_value(allow,j);
2044                         break;
2045                         }
2046                 }
2047         return(ret);
2048         }
2049
2050 int ssl3_get_req_cert_type(SSL *s, unsigned char *p)
2051         {
2052         int ret=0;
2053         unsigned long alg;
2054
2055         alg=s->s3->tmp.new_cipher->algorithms;
2056
2057 #ifndef OPENSSL_NO_DH
2058         if (alg & (SSL_kDHr|SSL_kEDH))
2059                 {
2060 #  ifndef OPENSSL_NO_RSA
2061                 p[ret++]=SSL3_CT_RSA_FIXED_DH;
2062 #  endif
2063 #  ifndef OPENSSL_NO_DSA
2064                 p[ret++]=SSL3_CT_DSS_FIXED_DH;
2065 #  endif
2066                 }
2067         if ((s->version == SSL3_VERSION) &&
2068                 (alg & (SSL_kEDH|SSL_kDHd|SSL_kDHr)))
2069                 {
2070 #  ifndef OPENSSL_NO_RSA
2071                 p[ret++]=SSL3_CT_RSA_EPHEMERAL_DH;
2072 #  endif
2073 #  ifndef OPENSSL_NO_DSA
2074                 p[ret++]=SSL3_CT_DSS_EPHEMERAL_DH;
2075 #  endif
2076                 }
2077 #endif /* !OPENSSL_NO_DH */
2078 #ifndef OPENSSL_NO_RSA
2079         p[ret++]=SSL3_CT_RSA_SIGN;
2080 #endif
2081 #ifndef OPENSSL_NO_DSA
2082         p[ret++]=SSL3_CT_DSS_SIGN;
2083 #endif
2084 #ifndef OPENSSL_NO_ECDH
2085         /* We should ask for fixed ECDH certificates only
2086          * for SSL_kECDH (and not SSL_kECDHE)
2087          */
2088         if ((alg & SSL_kECDH) && (s->version >= TLS1_VERSION))
2089                 {
2090                 p[ret++]=TLS_CT_RSA_FIXED_ECDH;
2091                 p[ret++]=TLS_CT_ECDSA_FIXED_ECDH;
2092                 }
2093 #endif
2094
2095 #ifndef OPENSSL_NO_ECDSA
2096         /* ECDSA certs can be used with RSA cipher suites as well 
2097          * so we don't need to check for SSL_kECDH or SSL_kECDHE
2098          */
2099         if (s->version >= TLS1_VERSION)
2100                 {
2101                 p[ret++]=TLS_CT_ECDSA_SIGN;
2102                 }
2103 #endif  
2104         return(ret);
2105         }
2106
2107 int ssl3_shutdown(SSL *s)
2108         {
2109
2110         /* Don't do anything much if we have not done the handshake or
2111          * we don't want to send messages :-) */
2112         if ((s->quiet_shutdown) || (s->state == SSL_ST_BEFORE))
2113                 {
2114                 s->shutdown=(SSL_SENT_SHUTDOWN|SSL_RECEIVED_SHUTDOWN);
2115                 return(1);
2116                 }
2117
2118         if (!(s->shutdown & SSL_SENT_SHUTDOWN))
2119                 {
2120                 s->shutdown|=SSL_SENT_SHUTDOWN;
2121 #if 1
2122                 ssl3_send_alert(s,SSL3_AL_WARNING,SSL_AD_CLOSE_NOTIFY);
2123 #endif
2124                 /* our shutdown alert has been sent now, and if it still needs
2125                  * to be written, s->s3->alert_dispatch will be true */
2126                 }
2127         else if (s->s3->alert_dispatch)
2128                 {
2129                 /* resend it if not sent */
2130 #if 1
2131                 s->method->ssl_dispatch_alert(s);
2132 #endif
2133                 }
2134         else if (!(s->shutdown & SSL_RECEIVED_SHUTDOWN))
2135                 {
2136                 /* If we are waiting for a close from our peer, we are closed */
2137                 s->method->ssl_read_bytes(s,0,NULL,0,0);
2138                 }
2139
2140         if ((s->shutdown == (SSL_SENT_SHUTDOWN|SSL_RECEIVED_SHUTDOWN)) &&
2141                 !s->s3->alert_dispatch)
2142                 return(1);
2143         else
2144                 return(0);
2145         }
2146
2147 int ssl3_write(SSL *s, const void *buf, int len)
2148         {
2149         int ret,n;
2150
2151 #if 0
2152         if (s->shutdown & SSL_SEND_SHUTDOWN)
2153                 {
2154                 s->rwstate=SSL_NOTHING;
2155                 return(0);
2156                 }
2157 #endif
2158         clear_sys_error();
2159         if (s->s3->renegotiate) ssl3_renegotiate_check(s);
2160
2161         /* This is an experimental flag that sends the
2162          * last handshake message in the same packet as the first
2163          * use data - used to see if it helps the TCP protocol during
2164          * session-id reuse */
2165         /* The second test is because the buffer may have been removed */
2166         if ((s->s3->flags & SSL3_FLAGS_POP_BUFFER) && (s->wbio == s->bbio))
2167                 {
2168                 /* First time through, we write into the buffer */
2169                 if (s->s3->delay_buf_pop_ret == 0)
2170                         {
2171                         ret=ssl3_write_bytes(s,SSL3_RT_APPLICATION_DATA,
2172                                              buf,len);
2173                         if (ret <= 0) return(ret);
2174
2175                         s->s3->delay_buf_pop_ret=ret;
2176                         }
2177
2178                 s->rwstate=SSL_WRITING;
2179                 n=BIO_flush(s->wbio);
2180                 if (n <= 0) return(n);
2181                 s->rwstate=SSL_NOTHING;
2182
2183                 /* We have flushed the buffer, so remove it */
2184                 ssl_free_wbio_buffer(s);
2185                 s->s3->flags&= ~SSL3_FLAGS_POP_BUFFER;
2186
2187                 ret=s->s3->delay_buf_pop_ret;
2188                 s->s3->delay_buf_pop_ret=0;
2189                 }
2190         else
2191                 {
2192                 ret=s->method->ssl_write_bytes(s,SSL3_RT_APPLICATION_DATA,
2193                         buf,len);
2194                 if (ret <= 0) return(ret);
2195                 }
2196
2197         return(ret);
2198         }
2199
2200 static int ssl3_read_internal(SSL *s, void *buf, int len, int peek)
2201         {
2202         int ret;
2203         
2204         clear_sys_error();
2205         if (s->s3->renegotiate) ssl3_renegotiate_check(s);
2206         s->s3->in_read_app_data=1;
2207         ret=s->method->ssl_read_bytes(s,SSL3_RT_APPLICATION_DATA,buf,len,peek);
2208         if ((ret == -1) && (s->s3->in_read_app_data == 2))
2209                 {
2210                 /* ssl3_read_bytes decided to call s->handshake_func, which
2211                  * called ssl3_read_bytes to read handshake data.
2212                  * However, ssl3_read_bytes actually found application data
2213                  * and thinks that application data makes sense here; so disable
2214                  * handshake processing and try to read application data again. */
2215                 s->in_handshake++;
2216                 ret=s->method->ssl_read_bytes(s,SSL3_RT_APPLICATION_DATA,buf,len,peek);
2217                 s->in_handshake--;
2218                 }
2219         else
2220                 s->s3->in_read_app_data=0;
2221
2222         return(ret);
2223         }
2224
2225 int ssl3_read(SSL *s, void *buf, int len)
2226         {
2227         return ssl3_read_internal(s, buf, len, 0);
2228         }
2229
2230 int ssl3_peek(SSL *s, void *buf, int len)
2231         {
2232         return ssl3_read_internal(s, buf, len, 1);
2233         }
2234
2235 int ssl3_renegotiate(SSL *s)
2236         {
2237         if (s->handshake_func == NULL)
2238                 return(1);
2239
2240         if (s->s3->flags & SSL3_FLAGS_NO_RENEGOTIATE_CIPHERS)
2241                 return(0);
2242
2243         s->s3->renegotiate=1;
2244         return(1);
2245         }
2246
2247 int ssl3_renegotiate_check(SSL *s)
2248         {
2249         int ret=0;
2250
2251         if (s->s3->renegotiate)
2252                 {
2253                 if (    (s->s3->rbuf.left == 0) &&
2254                         (s->s3->wbuf.left == 0) &&
2255                         !SSL_in_init(s))
2256                         {
2257 /*
2258 if we are the server, and we have sent a 'RENEGOTIATE' message, we
2259 need to go to SSL_ST_ACCEPT.
2260 */
2261                         /* SSL_ST_ACCEPT */
2262                         s->state=SSL_ST_RENEGOTIATE;
2263                         s->s3->renegotiate=0;
2264                         s->s3->num_renegotiations++;
2265                         s->s3->total_renegotiations++;
2266                         ret=1;
2267                         }
2268                 }
2269         return(ret);
2270         }
2271