diff options
Diffstat (limited to '')
-rw-r--r-- | src/lib/libssl/ssl.h | 1854 | ||||
-rw-r--r-- | src/lib/libssl/ssl2.h | 268 | ||||
-rw-r--r-- | src/lib/libssl/ssl23.h | 83 | ||||
-rw-r--r-- | src/lib/libssl/ssl3.h | 526 | ||||
-rw-r--r-- | src/lib/libssl/ssl_algs.c | 111 | ||||
-rw-r--r-- | src/lib/libssl/ssl_asn1.c | 398 | ||||
-rw-r--r-- | src/lib/libssl/ssl_cert.c | 860 | ||||
-rw-r--r-- | src/lib/libssl/ssl_ciph.c | 1145 | ||||
-rw-r--r-- | src/lib/libssl/ssl_err.c | 461 | ||||
-rw-r--r-- | src/lib/libssl/ssl_err2.c | 70 | ||||
-rw-r--r-- | src/lib/libssl/ssl_lib.c | 2319 | ||||
-rw-r--r-- | src/lib/libssl/ssl_locl.h | 620 | ||||
-rw-r--r-- | src/lib/libssl/ssl_rsa.c | 817 | ||||
-rw-r--r-- | src/lib/libssl/ssl_sess.c | 754 | ||||
-rw-r--r-- | src/lib/libssl/ssl_stat.c | 502 | ||||
-rw-r--r-- | src/lib/libssl/ssl_txt.c | 186 |
16 files changed, 0 insertions, 10974 deletions
diff --git a/src/lib/libssl/ssl.h b/src/lib/libssl/ssl.h deleted file mode 100644 index 4ae8458259..0000000000 --- a/src/lib/libssl/ssl.h +++ /dev/null | |||
@@ -1,1854 +0,0 @@ | |||
1 | /* ssl/ssl.h */ | ||
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-2001 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 (c) 1998-2002 The OpenSSL Project. All rights reserved. | ||
113 | * | ||
114 | * Redistribution and use in source and binary forms, with or without | ||
115 | * modification, are permitted provided that the following conditions | ||
116 | * are met: | ||
117 | * | ||
118 | * 1. Redistributions of source code must retain the above copyright | ||
119 | * notice, this list of conditions and the following disclaimer. | ||
120 | * | ||
121 | * 2. Redistributions in binary form must reproduce the above copyright | ||
122 | * notice, this list of conditions and the following disclaimer in | ||
123 | * the documentation and/or other materials provided with the | ||
124 | * distribution. | ||
125 | * | ||
126 | * 3. All advertising materials mentioning features or use of this | ||
127 | * software must display the following acknowledgment: | ||
128 | * "This product includes software developed by the OpenSSL Project | ||
129 | * for use in the OpenSSL Toolkit. (http://www.openssl.org/)" | ||
130 | * | ||
131 | * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to | ||
132 | * endorse or promote products derived from this software without | ||
133 | * prior written permission. For written permission, please contact | ||
134 | * openssl-core@openssl.org. | ||
135 | * | ||
136 | * 5. Products derived from this software may not be called "OpenSSL" | ||
137 | * nor may "OpenSSL" appear in their names without prior written | ||
138 | * permission of the OpenSSL Project. | ||
139 | * | ||
140 | * 6. Redistributions of any form whatsoever must retain the following | ||
141 | * acknowledgment: | ||
142 | * "This product includes software developed by the OpenSSL Project | ||
143 | * for use in the OpenSSL Toolkit (http://www.openssl.org/)" | ||
144 | * | ||
145 | * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY | ||
146 | * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||
147 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR | ||
148 | * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR | ||
149 | * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, | ||
150 | * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | ||
151 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; | ||
152 | * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | ||
153 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, | ||
154 | * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | ||
155 | * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED | ||
156 | * OF THE POSSIBILITY OF SUCH DAMAGE. | ||
157 | * ==================================================================== | ||
158 | * | ||
159 | * This product includes cryptographic software written by Eric Young | ||
160 | * (eay@cryptsoft.com). This product includes software written by Tim | ||
161 | * Hudson (tjh@cryptsoft.com). | ||
162 | * | ||
163 | */ | ||
164 | |||
165 | #ifndef HEADER_SSL_H | ||
166 | #define HEADER_SSL_H | ||
167 | |||
168 | #include <openssl/e_os2.h> | ||
169 | |||
170 | #ifndef OPENSSL_NO_COMP | ||
171 | #include <openssl/comp.h> | ||
172 | #endif | ||
173 | #ifndef OPENSSL_NO_BIO | ||
174 | #include <openssl/bio.h> | ||
175 | #endif | ||
176 | #ifndef OPENSSL_NO_X509 | ||
177 | #include <openssl/x509.h> | ||
178 | #endif | ||
179 | #include <openssl/kssl.h> | ||
180 | #include <openssl/safestack.h> | ||
181 | #include <openssl/symhacks.h> | ||
182 | |||
183 | #ifdef __cplusplus | ||
184 | extern "C" { | ||
185 | #endif | ||
186 | |||
187 | /* SSLeay version number for ASN.1 encoding of the session information */ | ||
188 | /* Version 0 - initial version | ||
189 | * Version 1 - added the optional peer certificate | ||
190 | */ | ||
191 | #define SSL_SESSION_ASN1_VERSION 0x0001 | ||
192 | |||
193 | /* text strings for the ciphers */ | ||
194 | #define SSL_TXT_NULL_WITH_MD5 SSL2_TXT_NULL_WITH_MD5 | ||
195 | #define SSL_TXT_RC4_128_WITH_MD5 SSL2_TXT_RC4_128_WITH_MD5 | ||
196 | #define SSL_TXT_RC4_128_EXPORT40_WITH_MD5 SSL2_TXT_RC4_128_EXPORT40_WITH_MD5 | ||
197 | #define SSL_TXT_RC2_128_CBC_WITH_MD5 SSL2_TXT_RC2_128_CBC_WITH_MD5 | ||
198 | #define SSL_TXT_RC2_128_CBC_EXPORT40_WITH_MD5 SSL2_TXT_RC2_128_CBC_EXPORT40_WITH_MD5 | ||
199 | #define SSL_TXT_IDEA_128_CBC_WITH_MD5 SSL2_TXT_IDEA_128_CBC_WITH_MD5 | ||
200 | #define SSL_TXT_DES_64_CBC_WITH_MD5 SSL2_TXT_DES_64_CBC_WITH_MD5 | ||
201 | #define SSL_TXT_DES_64_CBC_WITH_SHA SSL2_TXT_DES_64_CBC_WITH_SHA | ||
202 | #define SSL_TXT_DES_192_EDE3_CBC_WITH_MD5 SSL2_TXT_DES_192_EDE3_CBC_WITH_MD5 | ||
203 | #define SSL_TXT_DES_192_EDE3_CBC_WITH_SHA SSL2_TXT_DES_192_EDE3_CBC_WITH_SHA | ||
204 | |||
205 | /* VRS Additional Kerberos5 entries | ||
206 | */ | ||
207 | #define SSL_TXT_KRB5_DES_64_CBC_SHA SSL3_TXT_KRB5_DES_64_CBC_SHA | ||
208 | #define SSL_TXT_KRB5_DES_192_CBC3_SHA SSL3_TXT_KRB5_DES_192_CBC3_SHA | ||
209 | #define SSL_TXT_KRB5_RC4_128_SHA SSL3_TXT_KRB5_RC4_128_SHA | ||
210 | #define SSL_TXT_KRB5_IDEA_128_CBC_SHA SSL3_TXT_KRB5_IDEA_128_CBC_SHA | ||
211 | #define SSL_TXT_KRB5_DES_64_CBC_MD5 SSL3_TXT_KRB5_DES_64_CBC_MD5 | ||
212 | #define SSL_TXT_KRB5_DES_192_CBC3_MD5 SSL3_TXT_KRB5_DES_192_CBC3_MD5 | ||
213 | #define SSL_TXT_KRB5_RC4_128_MD5 SSL3_TXT_KRB5_RC4_128_MD5 | ||
214 | #define SSL_TXT_KRB5_IDEA_128_CBC_MD5 SSL3_TXT_KRB5_IDEA_128_CBC_MD5 | ||
215 | |||
216 | #define SSL_TXT_KRB5_DES_40_CBC_SHA SSL3_TXT_KRB5_DES_40_CBC_SHA | ||
217 | #define SSL_TXT_KRB5_RC2_40_CBC_SHA SSL3_TXT_KRB5_RC2_40_CBC_SHA | ||
218 | #define SSL_TXT_KRB5_RC4_40_SHA SSL3_TXT_KRB5_RC4_40_SHA | ||
219 | #define SSL_TXT_KRB5_DES_40_CBC_MD5 SSL3_TXT_KRB5_DES_40_CBC_MD5 | ||
220 | #define SSL_TXT_KRB5_RC2_40_CBC_MD5 SSL3_TXT_KRB5_RC2_40_CBC_MD5 | ||
221 | #define SSL_TXT_KRB5_RC4_40_MD5 SSL3_TXT_KRB5_RC4_40_MD5 | ||
222 | |||
223 | #define SSL_TXT_KRB5_DES_40_CBC_SHA SSL3_TXT_KRB5_DES_40_CBC_SHA | ||
224 | #define SSL_TXT_KRB5_DES_40_CBC_MD5 SSL3_TXT_KRB5_DES_40_CBC_MD5 | ||
225 | #define SSL_TXT_KRB5_DES_64_CBC_SHA SSL3_TXT_KRB5_DES_64_CBC_SHA | ||
226 | #define SSL_TXT_KRB5_DES_64_CBC_MD5 SSL3_TXT_KRB5_DES_64_CBC_MD5 | ||
227 | #define SSL_TXT_KRB5_DES_192_CBC3_SHA SSL3_TXT_KRB5_DES_192_CBC3_SHA | ||
228 | #define SSL_TXT_KRB5_DES_192_CBC3_MD5 SSL3_TXT_KRB5_DES_192_CBC3_MD5 | ||
229 | #define SSL_MAX_KRB5_PRINCIPAL_LENGTH 256 | ||
230 | |||
231 | #define SSL_MAX_SSL_SESSION_ID_LENGTH 32 | ||
232 | #define SSL_MAX_SID_CTX_LENGTH 32 | ||
233 | |||
234 | #define SSL_MIN_RSA_MODULUS_LENGTH_IN_BYTES (512/8) | ||
235 | #define SSL_MAX_KEY_ARG_LENGTH 8 | ||
236 | #define SSL_MAX_MASTER_KEY_LENGTH 48 | ||
237 | |||
238 | /* These are used to specify which ciphers to use and not to use */ | ||
239 | #define SSL_TXT_LOW "LOW" | ||
240 | #define SSL_TXT_MEDIUM "MEDIUM" | ||
241 | #define SSL_TXT_HIGH "HIGH" | ||
242 | #define SSL_TXT_kFZA "kFZA" | ||
243 | #define SSL_TXT_aFZA "aFZA" | ||
244 | #define SSL_TXT_eFZA "eFZA" | ||
245 | #define SSL_TXT_FZA "FZA" | ||
246 | |||
247 | #define SSL_TXT_aNULL "aNULL" | ||
248 | #define SSL_TXT_eNULL "eNULL" | ||
249 | #define SSL_TXT_NULL "NULL" | ||
250 | |||
251 | #define SSL_TXT_kKRB5 "kKRB5" | ||
252 | #define SSL_TXT_aKRB5 "aKRB5" | ||
253 | #define SSL_TXT_KRB5 "KRB5" | ||
254 | |||
255 | #define SSL_TXT_kRSA "kRSA" | ||
256 | #define SSL_TXT_kDHr "kDHr" | ||
257 | #define SSL_TXT_kDHd "kDHd" | ||
258 | #define SSL_TXT_kEDH "kEDH" | ||
259 | #define SSL_TXT_aRSA "aRSA" | ||
260 | #define SSL_TXT_aDSS "aDSS" | ||
261 | #define SSL_TXT_aDH "aDH" | ||
262 | #define SSL_TXT_DSS "DSS" | ||
263 | #define SSL_TXT_DH "DH" | ||
264 | #define SSL_TXT_EDH "EDH" | ||
265 | #define SSL_TXT_ADH "ADH" | ||
266 | #define SSL_TXT_RSA "RSA" | ||
267 | #define SSL_TXT_DES "DES" | ||
268 | #define SSL_TXT_3DES "3DES" | ||
269 | #define SSL_TXT_RC4 "RC4" | ||
270 | #define SSL_TXT_RC2 "RC2" | ||
271 | #define SSL_TXT_IDEA "IDEA" | ||
272 | #define SSL_TXT_AES "AES" | ||
273 | #define SSL_TXT_MD5 "MD5" | ||
274 | #define SSL_TXT_SHA1 "SHA1" | ||
275 | #define SSL_TXT_SHA "SHA" | ||
276 | #define SSL_TXT_EXP "EXP" | ||
277 | #define SSL_TXT_EXPORT "EXPORT" | ||
278 | #define SSL_TXT_EXP40 "EXPORT40" | ||
279 | #define SSL_TXT_EXP56 "EXPORT56" | ||
280 | #define SSL_TXT_SSLV2 "SSLv2" | ||
281 | #define SSL_TXT_SSLV3 "SSLv3" | ||
282 | #define SSL_TXT_TLSV1 "TLSv1" | ||
283 | #define SSL_TXT_ALL "ALL" | ||
284 | |||
285 | /* | ||
286 | * COMPLEMENTOF* definitions. These identifiers are used to (de-select) | ||
287 | * ciphers normally not being used. | ||
288 | * Example: "RC4" will activate all ciphers using RC4 including ciphers | ||
289 | * without authentication, which would normally disabled by DEFAULT (due | ||
290 | * the "!ADH" being part of default). Therefore "RC4:!COMPLEMENTOFDEFAULT" | ||
291 | * will make sure that it is also disabled in the specific selection. | ||
292 | * COMPLEMENTOF* identifiers are portable between version, as adjustments | ||
293 | * to the default cipher setup will also be included here. | ||
294 | * | ||
295 | * COMPLEMENTOFDEFAULT does not experience the same special treatment that | ||
296 | * DEFAULT gets, as only selection is being done and no sorting as needed | ||
297 | * for DEFAULT. | ||
298 | */ | ||
299 | #define SSL_TXT_CMPALL "COMPLEMENTOFALL" | ||
300 | #define SSL_TXT_CMPDEF "COMPLEMENTOFDEFAULT" | ||
301 | |||
302 | /* The following cipher list is used by default. | ||
303 | * It also is substituted when an application-defined cipher list string | ||
304 | * starts with 'DEFAULT'. */ | ||
305 | #define SSL_DEFAULT_CIPHER_LIST "ALL:!ADH:+RC4:@STRENGTH" /* low priority for RC4 */ | ||
306 | |||
307 | /* Used in SSL_set_shutdown()/SSL_get_shutdown(); */ | ||
308 | #define SSL_SENT_SHUTDOWN 1 | ||
309 | #define SSL_RECEIVED_SHUTDOWN 2 | ||
310 | |||
311 | #ifdef __cplusplus | ||
312 | } | ||
313 | #endif | ||
314 | |||
315 | #include <openssl/crypto.h> | ||
316 | #include <openssl/lhash.h> | ||
317 | #include <openssl/buffer.h> | ||
318 | #include <openssl/pem.h> | ||
319 | |||
320 | #ifdef __cplusplus | ||
321 | extern "C" { | ||
322 | #endif | ||
323 | |||
324 | #if (defined(OPENSSL_NO_RSA) || defined(OPENSSL_NO_MD5)) && !defined(OPENSSL_NO_SSL2) | ||
325 | #define OPENSSL_NO_SSL2 | ||
326 | #endif | ||
327 | |||
328 | #define SSL_FILETYPE_ASN1 X509_FILETYPE_ASN1 | ||
329 | #define SSL_FILETYPE_PEM X509_FILETYPE_PEM | ||
330 | |||
331 | /* This is needed to stop compilers complaining about the | ||
332 | * 'struct ssl_st *' function parameters used to prototype callbacks | ||
333 | * in SSL_CTX. */ | ||
334 | typedef struct ssl_st *ssl_crock_st; | ||
335 | |||
336 | /* used to hold info on the particular ciphers used */ | ||
337 | typedef struct ssl_cipher_st | ||
338 | { | ||
339 | int valid; | ||
340 | const char *name; /* text name */ | ||
341 | unsigned long id; /* id, 4 bytes, first is version */ | ||
342 | unsigned long algorithms; /* what ciphers are used */ | ||
343 | unsigned long algo_strength; /* strength and export flags */ | ||
344 | unsigned long algorithm2; /* Extra flags */ | ||
345 | int strength_bits; /* Number of bits really used */ | ||
346 | int alg_bits; /* Number of bits for algorithm */ | ||
347 | unsigned long mask; /* used for matching */ | ||
348 | unsigned long mask_strength; /* also used for matching */ | ||
349 | } SSL_CIPHER; | ||
350 | |||
351 | DECLARE_STACK_OF(SSL_CIPHER) | ||
352 | |||
353 | typedef struct ssl_st SSL; | ||
354 | typedef struct ssl_ctx_st SSL_CTX; | ||
355 | |||
356 | /* Used to hold functions for SSLv2 or SSLv3/TLSv1 functions */ | ||
357 | typedef struct ssl_method_st | ||
358 | { | ||
359 | int version; | ||
360 | int (*ssl_new)(SSL *s); | ||
361 | void (*ssl_clear)(SSL *s); | ||
362 | void (*ssl_free)(SSL *s); | ||
363 | int (*ssl_accept)(SSL *s); | ||
364 | int (*ssl_connect)(SSL *s); | ||
365 | int (*ssl_read)(SSL *s,void *buf,int len); | ||
366 | int (*ssl_peek)(SSL *s,void *buf,int len); | ||
367 | int (*ssl_write)(SSL *s,const void *buf,int len); | ||
368 | int (*ssl_shutdown)(SSL *s); | ||
369 | int (*ssl_renegotiate)(SSL *s); | ||
370 | int (*ssl_renegotiate_check)(SSL *s); | ||
371 | long (*ssl_ctrl)(SSL *s,int cmd,long larg,void *parg); | ||
372 | long (*ssl_ctx_ctrl)(SSL_CTX *ctx,int cmd,long larg,void *parg); | ||
373 | SSL_CIPHER *(*get_cipher_by_char)(const unsigned char *ptr); | ||
374 | int (*put_cipher_by_char)(const SSL_CIPHER *cipher,unsigned char *ptr); | ||
375 | int (*ssl_pending)(SSL *s); | ||
376 | int (*num_ciphers)(void); | ||
377 | SSL_CIPHER *(*get_cipher)(unsigned ncipher); | ||
378 | struct ssl_method_st *(*get_ssl_method)(int version); | ||
379 | long (*get_timeout)(void); | ||
380 | struct ssl3_enc_method *ssl3_enc; /* Extra SSLv3/TLS stuff */ | ||
381 | int (*ssl_version)(); | ||
382 | long (*ssl_callback_ctrl)(SSL *s, int cb_id, void (*fp)()); | ||
383 | long (*ssl_ctx_callback_ctrl)(SSL_CTX *s, int cb_id, void (*fp)()); | ||
384 | } SSL_METHOD; | ||
385 | |||
386 | /* Lets make this into an ASN.1 type structure as follows | ||
387 | * SSL_SESSION_ID ::= SEQUENCE { | ||
388 | * version INTEGER, -- structure version number | ||
389 | * SSLversion INTEGER, -- SSL version number | ||
390 | * Cipher OCTET_STRING, -- the 3 byte cipher ID | ||
391 | * Session_ID OCTET_STRING, -- the Session ID | ||
392 | * Master_key OCTET_STRING, -- the master key | ||
393 | * KRB5_principal OCTET_STRING -- optional Kerberos principal | ||
394 | * Key_Arg [ 0 ] IMPLICIT OCTET_STRING, -- the optional Key argument | ||
395 | * Time [ 1 ] EXPLICIT INTEGER, -- optional Start Time | ||
396 | * Timeout [ 2 ] EXPLICIT INTEGER, -- optional Timeout ins seconds | ||
397 | * Peer [ 3 ] EXPLICIT X509, -- optional Peer Certificate | ||
398 | * Session_ID_context [ 4 ] EXPLICIT OCTET_STRING, -- the Session ID context | ||
399 | * Verify_result [ 5 ] EXPLICIT INTEGER -- X509_V_... code for `Peer' | ||
400 | * Compression [6] IMPLICIT ASN1_OBJECT -- compression OID XXXXX | ||
401 | * } | ||
402 | * Look in ssl/ssl_asn1.c for more details | ||
403 | * I'm using EXPLICIT tags so I can read the damn things using asn1parse :-). | ||
404 | */ | ||
405 | typedef struct ssl_session_st | ||
406 | { | ||
407 | int ssl_version; /* what ssl version session info is | ||
408 | * being kept in here? */ | ||
409 | |||
410 | /* only really used in SSLv2 */ | ||
411 | unsigned int key_arg_length; | ||
412 | unsigned char key_arg[SSL_MAX_KEY_ARG_LENGTH]; | ||
413 | int master_key_length; | ||
414 | unsigned char master_key[SSL_MAX_MASTER_KEY_LENGTH]; | ||
415 | /* session_id - valid? */ | ||
416 | unsigned int session_id_length; | ||
417 | unsigned char session_id[SSL_MAX_SSL_SESSION_ID_LENGTH]; | ||
418 | /* this is used to determine whether the session is being reused in | ||
419 | * the appropriate context. It is up to the application to set this, | ||
420 | * via SSL_new */ | ||
421 | unsigned int sid_ctx_length; | ||
422 | unsigned char sid_ctx[SSL_MAX_SID_CTX_LENGTH]; | ||
423 | |||
424 | #ifndef OPENSSL_NO_KRB5 | ||
425 | unsigned int krb5_client_princ_len; | ||
426 | unsigned char krb5_client_princ[SSL_MAX_KRB5_PRINCIPAL_LENGTH]; | ||
427 | #endif /* OPENSSL_NO_KRB5 */ | ||
428 | |||
429 | int not_resumable; | ||
430 | |||
431 | /* The cert is the certificate used to establish this connection */ | ||
432 | struct sess_cert_st /* SESS_CERT */ *sess_cert; | ||
433 | |||
434 | /* This is the cert for the other end. | ||
435 | * On clients, it will be the same as sess_cert->peer_key->x509 | ||
436 | * (the latter is not enough as sess_cert is not retained | ||
437 | * in the external representation of sessions, see ssl_asn1.c). */ | ||
438 | X509 *peer; | ||
439 | /* when app_verify_callback accepts a session where the peer's certificate | ||
440 | * is not ok, we must remember the error for session reuse: */ | ||
441 | long verify_result; /* only for servers */ | ||
442 | |||
443 | int references; | ||
444 | long timeout; | ||
445 | long time; | ||
446 | |||
447 | int compress_meth; /* Need to lookup the method */ | ||
448 | |||
449 | SSL_CIPHER *cipher; | ||
450 | unsigned long cipher_id; /* when ASN.1 loaded, this | ||
451 | * needs to be used to load | ||
452 | * the 'cipher' structure */ | ||
453 | |||
454 | STACK_OF(SSL_CIPHER) *ciphers; /* shared ciphers? */ | ||
455 | |||
456 | CRYPTO_EX_DATA ex_data; /* application specific data */ | ||
457 | |||
458 | /* These are used to make removal of session-ids more | ||
459 | * efficient and to implement a maximum cache size. */ | ||
460 | struct ssl_session_st *prev,*next; | ||
461 | } SSL_SESSION; | ||
462 | |||
463 | |||
464 | #define SSL_OP_MICROSOFT_SESS_ID_BUG 0x00000001L | ||
465 | #define SSL_OP_NETSCAPE_CHALLENGE_BUG 0x00000002L | ||
466 | #define SSL_OP_NETSCAPE_REUSE_CIPHER_CHANGE_BUG 0x00000008L | ||
467 | #define SSL_OP_SSLREF2_REUSE_CERT_TYPE_BUG 0x00000010L | ||
468 | #define SSL_OP_MICROSOFT_BIG_SSLV3_BUFFER 0x00000020L | ||
469 | #define SSL_OP_MSIE_SSLV2_RSA_PADDING 0x00000040L | ||
470 | #define SSL_OP_SSLEAY_080_CLIENT_DH_BUG 0x00000080L | ||
471 | #define SSL_OP_TLS_D5_BUG 0x00000100L | ||
472 | #define SSL_OP_TLS_BLOCK_PADDING_BUG 0x00000200L | ||
473 | |||
474 | /* Disable SSL 3.0/TLS 1.0 CBC vulnerability workaround that was added | ||
475 | * in OpenSSL 0.9.6d. Usually (depending on the application protocol) | ||
476 | * the workaround is not needed. Unfortunately some broken SSL/TLS | ||
477 | * implementations cannot handle it at all, which is why we include | ||
478 | * it in SSL_OP_ALL. */ | ||
479 | #define SSL_OP_DONT_INSERT_EMPTY_FRAGMENTS 0x00000800L /* added in 0.9.6e */ | ||
480 | |||
481 | /* SSL_OP_ALL: various bug workarounds that should be rather harmless. | ||
482 | * This used to be 0x000FFFFFL before 0.9.7. */ | ||
483 | #define SSL_OP_ALL 0x00000FFFL | ||
484 | |||
485 | /* As server, disallow session resumption on renegotiation */ | ||
486 | #define SSL_OP_NO_SESSION_RESUMPTION_ON_RENEGOTIATION 0x00010000L | ||
487 | /* If set, always create a new key when using tmp_dh parameters */ | ||
488 | #define SSL_OP_SINGLE_DH_USE 0x00100000L | ||
489 | /* Set to always use the tmp_rsa key when doing RSA operations, | ||
490 | * even when this violates protocol specs */ | ||
491 | #define SSL_OP_EPHEMERAL_RSA 0x00200000L | ||
492 | /* Set on servers to choose the cipher according to the server's | ||
493 | * preferences */ | ||
494 | #define SSL_OP_CIPHER_SERVER_PREFERENCE 0x00400000L | ||
495 | /* If set, a server will allow a client to issue a SSLv3.0 version number | ||
496 | * as latest version supported in the premaster secret, even when TLSv1.0 | ||
497 | * (version 3.1) was announced in the client hello. Normally this is | ||
498 | * forbidden to prevent version rollback attacks. */ | ||
499 | #define SSL_OP_TLS_ROLLBACK_BUG 0x00800000L | ||
500 | |||
501 | #define SSL_OP_NO_SSLv2 0x01000000L | ||
502 | #define SSL_OP_NO_SSLv3 0x02000000L | ||
503 | #define SSL_OP_NO_TLSv1 0x04000000L | ||
504 | |||
505 | /* The next flag deliberately changes the ciphertest, this is a check | ||
506 | * for the PKCS#1 attack */ | ||
507 | #define SSL_OP_PKCS1_CHECK_1 0x08000000L | ||
508 | #define SSL_OP_PKCS1_CHECK_2 0x10000000L | ||
509 | #define SSL_OP_NETSCAPE_CA_DN_BUG 0x20000000L | ||
510 | #define SSL_OP_NETSCAPE_DEMO_CIPHER_CHANGE_BUG 0x40000000L | ||
511 | |||
512 | |||
513 | /* Allow SSL_write(..., n) to return r with 0 < r < n (i.e. report success | ||
514 | * when just a single record has been written): */ | ||
515 | #define SSL_MODE_ENABLE_PARTIAL_WRITE 0x00000001L | ||
516 | /* Make it possible to retry SSL_write() with changed buffer location | ||
517 | * (buffer contents must stay the same!); this is not the default to avoid | ||
518 | * the misconception that non-blocking SSL_write() behaves like | ||
519 | * non-blocking write(): */ | ||
520 | #define SSL_MODE_ACCEPT_MOVING_WRITE_BUFFER 0x00000002L | ||
521 | /* Never bother the application with retries if the transport | ||
522 | * is blocking: */ | ||
523 | #define SSL_MODE_AUTO_RETRY 0x00000004L | ||
524 | /* Don't attempt to automatically build certificate chain */ | ||
525 | #define SSL_MODE_NO_AUTO_CHAIN 0x00000008L | ||
526 | |||
527 | |||
528 | /* Note: SSL[_CTX]_set_{options,mode} use |= op on the previous value, | ||
529 | * they cannot be used to clear bits. */ | ||
530 | |||
531 | #define SSL_CTX_set_options(ctx,op) \ | ||
532 | SSL_CTX_ctrl((ctx),SSL_CTRL_OPTIONS,(op),NULL) | ||
533 | #define SSL_CTX_get_options(ctx) \ | ||
534 | SSL_CTX_ctrl((ctx),SSL_CTRL_OPTIONS,0,NULL) | ||
535 | #define SSL_set_options(ssl,op) \ | ||
536 | SSL_ctrl((ssl),SSL_CTRL_OPTIONS,(op),NULL) | ||
537 | #define SSL_get_options(ssl) \ | ||
538 | SSL_ctrl((ssl),SSL_CTRL_OPTIONS,0,NULL) | ||
539 | |||
540 | #define SSL_CTX_set_mode(ctx,op) \ | ||
541 | SSL_CTX_ctrl((ctx),SSL_CTRL_MODE,(op),NULL) | ||
542 | #define SSL_CTX_get_mode(ctx) \ | ||
543 | SSL_CTX_ctrl((ctx),SSL_CTRL_MODE,0,NULL) | ||
544 | #define SSL_set_mode(ssl,op) \ | ||
545 | SSL_ctrl((ssl),SSL_CTRL_MODE,(op),NULL) | ||
546 | #define SSL_get_mode(ssl) \ | ||
547 | SSL_ctrl((ssl),SSL_CTRL_MODE,0,NULL) | ||
548 | |||
549 | |||
550 | void SSL_CTX_set_msg_callback(SSL_CTX *ctx, void (*cb)(int write_p, int version, int content_type, const void *buf, size_t len, SSL *ssl, void *arg)); | ||
551 | void SSL_set_msg_callback(SSL *ssl, void (*cb)(int write_p, int version, int content_type, const void *buf, size_t len, SSL *ssl, void *arg)); | ||
552 | #define SSL_CTX_set_msg_callback_arg(ctx, arg) SSL_CTX_ctrl((ctx), SSL_CTRL_SET_MSG_CALLBACK_ARG, 0, (arg)) | ||
553 | #define SSL_set_msg_callback_arg(ssl, arg) SSL_ctrl((ssl), SSL_CTRL_SET_MSG_CALLBACK_ARG, 0, (arg)) | ||
554 | |||
555 | |||
556 | |||
557 | #if defined(OPENSSL_SYS_MSDOS) && !defined(OPENSSL_SYS_WIN32) | ||
558 | #define SSL_MAX_CERT_LIST_DEFAULT 1024*30 /* 30k max cert list :-) */ | ||
559 | #else | ||
560 | #define SSL_MAX_CERT_LIST_DEFAULT 1024*100 /* 100k max cert list :-) */ | ||
561 | #endif | ||
562 | |||
563 | #define SSL_SESSION_CACHE_MAX_SIZE_DEFAULT (1024*20) | ||
564 | |||
565 | /* This callback type is used inside SSL_CTX, SSL, and in the functions that set | ||
566 | * them. It is used to override the generation of SSL/TLS session IDs in a | ||
567 | * server. Return value should be zero on an error, non-zero to proceed. Also, | ||
568 | * callbacks should themselves check if the id they generate is unique otherwise | ||
569 | * the SSL handshake will fail with an error - callbacks can do this using the | ||
570 | * 'ssl' value they're passed by; | ||
571 | * SSL_has_matching_session_id(ssl, id, *id_len) | ||
572 | * The length value passed in is set at the maximum size the session ID can be. | ||
573 | * In SSLv2 this is 16 bytes, whereas SSLv3/TLSv1 it is 32 bytes. The callback | ||
574 | * can alter this length to be less if desired, but under SSLv2 session IDs are | ||
575 | * supposed to be fixed at 16 bytes so the id will be padded after the callback | ||
576 | * returns in this case. It is also an error for the callback to set the size to | ||
577 | * zero. */ | ||
578 | typedef int (*GEN_SESSION_CB)(const SSL *ssl, unsigned char *id, | ||
579 | unsigned int *id_len); | ||
580 | |||
581 | typedef struct ssl_comp_st | ||
582 | { | ||
583 | int id; | ||
584 | char *name; | ||
585 | #ifndef OPENSSL_NO_COMP | ||
586 | COMP_METHOD *method; | ||
587 | #else | ||
588 | char *method; | ||
589 | #endif | ||
590 | } SSL_COMP; | ||
591 | |||
592 | DECLARE_STACK_OF(SSL_COMP) | ||
593 | |||
594 | struct ssl_ctx_st | ||
595 | { | ||
596 | SSL_METHOD *method; | ||
597 | |||
598 | STACK_OF(SSL_CIPHER) *cipher_list; | ||
599 | /* same as above but sorted for lookup */ | ||
600 | STACK_OF(SSL_CIPHER) *cipher_list_by_id; | ||
601 | |||
602 | struct x509_store_st /* X509_STORE */ *cert_store; | ||
603 | struct lhash_st /* LHASH */ *sessions; /* a set of SSL_SESSIONs */ | ||
604 | /* Most session-ids that will be cached, default is | ||
605 | * SSL_SESSION_CACHE_MAX_SIZE_DEFAULT. 0 is unlimited. */ | ||
606 | unsigned long session_cache_size; | ||
607 | struct ssl_session_st *session_cache_head; | ||
608 | struct ssl_session_st *session_cache_tail; | ||
609 | |||
610 | /* This can have one of 2 values, ored together, | ||
611 | * SSL_SESS_CACHE_CLIENT, | ||
612 | * SSL_SESS_CACHE_SERVER, | ||
613 | * Default is SSL_SESSION_CACHE_SERVER, which means only | ||
614 | * SSL_accept which cache SSL_SESSIONS. */ | ||
615 | int session_cache_mode; | ||
616 | |||
617 | /* If timeout is not 0, it is the default timeout value set | ||
618 | * when SSL_new() is called. This has been put in to make | ||
619 | * life easier to set things up */ | ||
620 | long session_timeout; | ||
621 | |||
622 | /* If this callback is not null, it will be called each | ||
623 | * time a session id is added to the cache. If this function | ||
624 | * returns 1, it means that the callback will do a | ||
625 | * SSL_SESSION_free() when it has finished using it. Otherwise, | ||
626 | * on 0, it means the callback has finished with it. | ||
627 | * If remove_session_cb is not null, it will be called when | ||
628 | * a session-id is removed from the cache. After the call, | ||
629 | * OpenSSL will SSL_SESSION_free() it. */ | ||
630 | int (*new_session_cb)(struct ssl_st *ssl,SSL_SESSION *sess); | ||
631 | void (*remove_session_cb)(struct ssl_ctx_st *ctx,SSL_SESSION *sess); | ||
632 | SSL_SESSION *(*get_session_cb)(struct ssl_st *ssl, | ||
633 | unsigned char *data,int len,int *copy); | ||
634 | |||
635 | struct | ||
636 | { | ||
637 | int sess_connect; /* SSL new conn - started */ | ||
638 | int sess_connect_renegotiate;/* SSL reneg - requested */ | ||
639 | int sess_connect_good; /* SSL new conne/reneg - finished */ | ||
640 | int sess_accept; /* SSL new accept - started */ | ||
641 | int sess_accept_renegotiate;/* SSL reneg - requested */ | ||
642 | int sess_accept_good; /* SSL accept/reneg - finished */ | ||
643 | int sess_miss; /* session lookup misses */ | ||
644 | int sess_timeout; /* reuse attempt on timeouted session */ | ||
645 | int sess_cache_full; /* session removed due to full cache */ | ||
646 | int sess_hit; /* session reuse actually done */ | ||
647 | int sess_cb_hit; /* session-id that was not | ||
648 | * in the cache was | ||
649 | * passed back via the callback. This | ||
650 | * indicates that the application is | ||
651 | * supplying session-id's from other | ||
652 | * processes - spooky :-) */ | ||
653 | } stats; | ||
654 | |||
655 | int references; | ||
656 | |||
657 | /* if defined, these override the X509_verify_cert() calls */ | ||
658 | int (*app_verify_callback)(X509_STORE_CTX *, void *); | ||
659 | void *app_verify_arg; | ||
660 | /* before OpenSSL 0.9.7, 'app_verify_arg' was ignored | ||
661 | * ('app_verify_callback' was called with just one argument) */ | ||
662 | |||
663 | /* Default password callback. */ | ||
664 | pem_password_cb *default_passwd_callback; | ||
665 | |||
666 | /* Default password callback user data. */ | ||
667 | void *default_passwd_callback_userdata; | ||
668 | |||
669 | /* get client cert callback */ | ||
670 | int (*client_cert_cb)(SSL *ssl, X509 **x509, EVP_PKEY **pkey); | ||
671 | |||
672 | CRYPTO_EX_DATA ex_data; | ||
673 | |||
674 | const EVP_MD *rsa_md5;/* For SSLv2 - name is 'ssl2-md5' */ | ||
675 | const EVP_MD *md5; /* For SSLv3/TLSv1 'ssl3-md5' */ | ||
676 | const EVP_MD *sha1; /* For SSLv3/TLSv1 'ssl3->sha1' */ | ||
677 | |||
678 | STACK_OF(X509) *extra_certs; | ||
679 | STACK_OF(SSL_COMP) *comp_methods; /* stack of SSL_COMP, SSLv3/TLSv1 */ | ||
680 | |||
681 | |||
682 | /* Default values used when no per-SSL value is defined follow */ | ||
683 | |||
684 | void (*info_callback)(const SSL *ssl,int type,int val); /* used if SSL's info_callback is NULL */ | ||
685 | |||
686 | /* what we put in client cert requests */ | ||
687 | STACK_OF(X509_NAME) *client_CA; | ||
688 | |||
689 | |||
690 | /* Default values to use in SSL structures follow (these are copied by SSL_new) */ | ||
691 | |||
692 | unsigned long options; | ||
693 | unsigned long mode; | ||
694 | long max_cert_list; | ||
695 | |||
696 | struct cert_st /* CERT */ *cert; | ||
697 | int read_ahead; | ||
698 | |||
699 | /* callback that allows applications to peek at protocol messages */ | ||
700 | void (*msg_callback)(int write_p, int version, int content_type, const void *buf, size_t len, SSL *ssl, void *arg); | ||
701 | void *msg_callback_arg; | ||
702 | |||
703 | int verify_mode; | ||
704 | int verify_depth; | ||
705 | unsigned int sid_ctx_length; | ||
706 | unsigned char sid_ctx[SSL_MAX_SID_CTX_LENGTH]; | ||
707 | int (*default_verify_callback)(int ok,X509_STORE_CTX *ctx); /* called 'verify_callback' in the SSL */ | ||
708 | |||
709 | /* Default generate session ID callback. */ | ||
710 | GEN_SESSION_CB generate_session_id; | ||
711 | |||
712 | int purpose; /* Purpose setting */ | ||
713 | int trust; /* Trust setting */ | ||
714 | |||
715 | int quiet_shutdown; | ||
716 | }; | ||
717 | |||
718 | #define SSL_SESS_CACHE_OFF 0x0000 | ||
719 | #define SSL_SESS_CACHE_CLIENT 0x0001 | ||
720 | #define SSL_SESS_CACHE_SERVER 0x0002 | ||
721 | #define SSL_SESS_CACHE_BOTH (SSL_SESS_CACHE_CLIENT|SSL_SESS_CACHE_SERVER) | ||
722 | #define SSL_SESS_CACHE_NO_AUTO_CLEAR 0x0080 | ||
723 | /* enough comments already ... see SSL_CTX_set_session_cache_mode(3) */ | ||
724 | #define SSL_SESS_CACHE_NO_INTERNAL_LOOKUP 0x0100 | ||
725 | #define SSL_SESS_CACHE_NO_INTERNAL_STORE 0x0200 | ||
726 | #define SSL_SESS_CACHE_NO_INTERNAL \ | ||
727 | (SSL_SESS_CACHE_NO_INTERNAL_LOOKUP|SSL_SESS_CACHE_NO_INTERNAL_STORE) | ||
728 | |||
729 | struct lhash_st *SSL_CTX_sessions(SSL_CTX *ctx); | ||
730 | #define SSL_CTX_sess_number(ctx) \ | ||
731 | SSL_CTX_ctrl(ctx,SSL_CTRL_SESS_NUMBER,0,NULL) | ||
732 | #define SSL_CTX_sess_connect(ctx) \ | ||
733 | SSL_CTX_ctrl(ctx,SSL_CTRL_SESS_CONNECT,0,NULL) | ||
734 | #define SSL_CTX_sess_connect_good(ctx) \ | ||
735 | SSL_CTX_ctrl(ctx,SSL_CTRL_SESS_CONNECT_GOOD,0,NULL) | ||
736 | #define SSL_CTX_sess_connect_renegotiate(ctx) \ | ||
737 | SSL_CTX_ctrl(ctx,SSL_CTRL_SESS_CONNECT_RENEGOTIATE,0,NULL) | ||
738 | #define SSL_CTX_sess_accept(ctx) \ | ||
739 | SSL_CTX_ctrl(ctx,SSL_CTRL_SESS_ACCEPT,0,NULL) | ||
740 | #define SSL_CTX_sess_accept_renegotiate(ctx) \ | ||
741 | SSL_CTX_ctrl(ctx,SSL_CTRL_SESS_ACCEPT_RENEGOTIATE,0,NULL) | ||
742 | #define SSL_CTX_sess_accept_good(ctx) \ | ||
743 | SSL_CTX_ctrl(ctx,SSL_CTRL_SESS_ACCEPT_GOOD,0,NULL) | ||
744 | #define SSL_CTX_sess_hits(ctx) \ | ||
745 | SSL_CTX_ctrl(ctx,SSL_CTRL_SESS_HIT,0,NULL) | ||
746 | #define SSL_CTX_sess_cb_hits(ctx) \ | ||
747 | SSL_CTX_ctrl(ctx,SSL_CTRL_SESS_CB_HIT,0,NULL) | ||
748 | #define SSL_CTX_sess_misses(ctx) \ | ||
749 | SSL_CTX_ctrl(ctx,SSL_CTRL_SESS_MISSES,0,NULL) | ||
750 | #define SSL_CTX_sess_timeouts(ctx) \ | ||
751 | SSL_CTX_ctrl(ctx,SSL_CTRL_SESS_TIMEOUTS,0,NULL) | ||
752 | #define SSL_CTX_sess_cache_full(ctx) \ | ||
753 | SSL_CTX_ctrl(ctx,SSL_CTRL_SESS_CACHE_FULL,0,NULL) | ||
754 | |||
755 | #define SSL_CTX_sess_set_new_cb(ctx,cb) ((ctx)->new_session_cb=(cb)) | ||
756 | #define SSL_CTX_sess_get_new_cb(ctx) ((ctx)->new_session_cb) | ||
757 | #define SSL_CTX_sess_set_remove_cb(ctx,cb) ((ctx)->remove_session_cb=(cb)) | ||
758 | #define SSL_CTX_sess_get_remove_cb(ctx) ((ctx)->remove_session_cb) | ||
759 | #define SSL_CTX_sess_set_get_cb(ctx,cb) ((ctx)->get_session_cb=(cb)) | ||
760 | #define SSL_CTX_sess_get_get_cb(ctx) ((ctx)->get_session_cb) | ||
761 | #define SSL_CTX_set_info_callback(ctx,cb) ((ctx)->info_callback=(cb)) | ||
762 | #define SSL_CTX_get_info_callback(ctx) ((ctx)->info_callback) | ||
763 | #define SSL_CTX_set_client_cert_cb(ctx,cb) ((ctx)->client_cert_cb=(cb)) | ||
764 | #define SSL_CTX_get_client_cert_cb(ctx) ((ctx)->client_cert_cb) | ||
765 | |||
766 | #define SSL_NOTHING 1 | ||
767 | #define SSL_WRITING 2 | ||
768 | #define SSL_READING 3 | ||
769 | #define SSL_X509_LOOKUP 4 | ||
770 | |||
771 | /* These will only be used when doing non-blocking IO */ | ||
772 | #define SSL_want_nothing(s) (SSL_want(s) == SSL_NOTHING) | ||
773 | #define SSL_want_read(s) (SSL_want(s) == SSL_READING) | ||
774 | #define SSL_want_write(s) (SSL_want(s) == SSL_WRITING) | ||
775 | #define SSL_want_x509_lookup(s) (SSL_want(s) == SSL_X509_LOOKUP) | ||
776 | |||
777 | struct ssl_st | ||
778 | { | ||
779 | /* protocol version | ||
780 | * (one of SSL2_VERSION, SSL3_VERSION, TLS1_VERSION) | ||
781 | */ | ||
782 | int version; | ||
783 | int type; /* SSL_ST_CONNECT or SSL_ST_ACCEPT */ | ||
784 | |||
785 | SSL_METHOD *method; /* SSLv3 */ | ||
786 | |||
787 | /* There are 2 BIO's even though they are normally both the | ||
788 | * same. This is so data can be read and written to different | ||
789 | * handlers */ | ||
790 | |||
791 | #ifndef OPENSSL_NO_BIO | ||
792 | BIO *rbio; /* used by SSL_read */ | ||
793 | BIO *wbio; /* used by SSL_write */ | ||
794 | BIO *bbio; /* used during session-id reuse to concatenate | ||
795 | * messages */ | ||
796 | #else | ||
797 | char *rbio; /* used by SSL_read */ | ||
798 | char *wbio; /* used by SSL_write */ | ||
799 | char *bbio; | ||
800 | #endif | ||
801 | /* This holds a variable that indicates what we were doing | ||
802 | * when a 0 or -1 is returned. This is needed for | ||
803 | * non-blocking IO so we know what request needs re-doing when | ||
804 | * in SSL_accept or SSL_connect */ | ||
805 | int rwstate; | ||
806 | |||
807 | /* true when we are actually in SSL_accept() or SSL_connect() */ | ||
808 | int in_handshake; | ||
809 | int (*handshake_func)(); | ||
810 | |||
811 | /* Imagine that here's a boolean member "init" that is | ||
812 | * switched as soon as SSL_set_{accept/connect}_state | ||
813 | * is called for the first time, so that "state" and | ||
814 | * "handshake_func" are properly initialized. But as | ||
815 | * handshake_func is == 0 until then, we use this | ||
816 | * test instead of an "init" member. | ||
817 | */ | ||
818 | |||
819 | int server; /* are we the server side? - mostly used by SSL_clear*/ | ||
820 | |||
821 | int new_session;/* 1 if we are to use a new session. | ||
822 | * 2 if we are a server and are inside a handshake | ||
823 | * (i.e. not just sending a HelloRequest) | ||
824 | * NB: For servers, the 'new' session may actually be a previously | ||
825 | * cached session or even the previous session unless | ||
826 | * SSL_OP_NO_SESSION_RESUMPTION_ON_RENEGOTIATION is set */ | ||
827 | int quiet_shutdown;/* don't send shutdown packets */ | ||
828 | int shutdown; /* we have shut things down, 0x01 sent, 0x02 | ||
829 | * for received */ | ||
830 | int state; /* where we are */ | ||
831 | int rstate; /* where we are when reading */ | ||
832 | |||
833 | BUF_MEM *init_buf; /* buffer used during init */ | ||
834 | void *init_msg; /* pointer to handshake message body, set by ssl3_get_message() */ | ||
835 | int init_num; /* amount read/written */ | ||
836 | int init_off; /* amount read/written */ | ||
837 | |||
838 | /* used internally to point at a raw packet */ | ||
839 | unsigned char *packet; | ||
840 | unsigned int packet_length; | ||
841 | |||
842 | struct ssl2_state_st *s2; /* SSLv2 variables */ | ||
843 | struct ssl3_state_st *s3; /* SSLv3 variables */ | ||
844 | |||
845 | int read_ahead; /* Read as many input bytes as possible | ||
846 | * (for non-blocking reads) */ | ||
847 | |||
848 | /* callback that allows applications to peek at protocol messages */ | ||
849 | void (*msg_callback)(int write_p, int version, int content_type, const void *buf, size_t len, SSL *ssl, void *arg); | ||
850 | void *msg_callback_arg; | ||
851 | |||
852 | int hit; /* reusing a previous session */ | ||
853 | |||
854 | int purpose; /* Purpose setting */ | ||
855 | int trust; /* Trust setting */ | ||
856 | |||
857 | /* crypto */ | ||
858 | STACK_OF(SSL_CIPHER) *cipher_list; | ||
859 | STACK_OF(SSL_CIPHER) *cipher_list_by_id; | ||
860 | |||
861 | /* These are the ones being used, the ones in SSL_SESSION are | ||
862 | * the ones to be 'copied' into these ones */ | ||
863 | |||
864 | EVP_CIPHER_CTX *enc_read_ctx; /* cryptographic state */ | ||
865 | const EVP_MD *read_hash; /* used for mac generation */ | ||
866 | #ifndef OPENSSL_NO_COMP | ||
867 | COMP_CTX *expand; /* uncompress */ | ||
868 | #else | ||
869 | char *expand; | ||
870 | #endif | ||
871 | |||
872 | EVP_CIPHER_CTX *enc_write_ctx; /* cryptographic state */ | ||
873 | const EVP_MD *write_hash; /* used for mac generation */ | ||
874 | #ifndef OPENSSL_NO_COMP | ||
875 | COMP_CTX *compress; /* compression */ | ||
876 | #else | ||
877 | char *compress; | ||
878 | #endif | ||
879 | |||
880 | /* session info */ | ||
881 | |||
882 | /* client cert? */ | ||
883 | /* This is used to hold the server certificate used */ | ||
884 | struct cert_st /* CERT */ *cert; | ||
885 | |||
886 | /* the session_id_context is used to ensure sessions are only reused | ||
887 | * in the appropriate context */ | ||
888 | unsigned int sid_ctx_length; | ||
889 | unsigned char sid_ctx[SSL_MAX_SID_CTX_LENGTH]; | ||
890 | |||
891 | /* This can also be in the session once a session is established */ | ||
892 | SSL_SESSION *session; | ||
893 | |||
894 | /* Default generate session ID callback. */ | ||
895 | GEN_SESSION_CB generate_session_id; | ||
896 | |||
897 | /* Used in SSL2 and SSL3 */ | ||
898 | int verify_mode; /* 0 don't care about verify failure. | ||
899 | * 1 fail if verify fails */ | ||
900 | int verify_depth; | ||
901 | int (*verify_callback)(int ok,X509_STORE_CTX *ctx); /* fail if callback returns 0 */ | ||
902 | |||
903 | void (*info_callback)(const SSL *ssl,int type,int val); /* optional informational callback */ | ||
904 | |||
905 | int error; /* error bytes to be written */ | ||
906 | int error_code; /* actual code */ | ||
907 | |||
908 | #ifndef OPENSSL_NO_KRB5 | ||
909 | KSSL_CTX *kssl_ctx; /* Kerberos 5 context */ | ||
910 | #endif /* OPENSSL_NO_KRB5 */ | ||
911 | |||
912 | SSL_CTX *ctx; | ||
913 | /* set this flag to 1 and a sleep(1) is put into all SSL_read() | ||
914 | * and SSL_write() calls, good for nbio debuging :-) */ | ||
915 | int debug; | ||
916 | |||
917 | /* extra application data */ | ||
918 | long verify_result; | ||
919 | CRYPTO_EX_DATA ex_data; | ||
920 | |||
921 | /* for server side, keep the list of CA_dn we can use */ | ||
922 | STACK_OF(X509_NAME) *client_CA; | ||
923 | |||
924 | int references; | ||
925 | unsigned long options; /* protocol behaviour */ | ||
926 | unsigned long mode; /* API behaviour */ | ||
927 | long max_cert_list; | ||
928 | int first_packet; | ||
929 | int client_version; /* what was passed, used for | ||
930 | * SSLv3/TLS rollback check */ | ||
931 | }; | ||
932 | |||
933 | #ifdef __cplusplus | ||
934 | } | ||
935 | #endif | ||
936 | |||
937 | #include <openssl/ssl2.h> | ||
938 | #include <openssl/ssl3.h> | ||
939 | #include <openssl/tls1.h> /* This is mostly sslv3 with a few tweaks */ | ||
940 | #include <openssl/ssl23.h> | ||
941 | |||
942 | #ifdef __cplusplus | ||
943 | extern "C" { | ||
944 | #endif | ||
945 | |||
946 | /* compatibility */ | ||
947 | #define SSL_set_app_data(s,arg) (SSL_set_ex_data(s,0,(char *)arg)) | ||
948 | #define SSL_get_app_data(s) (SSL_get_ex_data(s,0)) | ||
949 | #define SSL_SESSION_set_app_data(s,a) (SSL_SESSION_set_ex_data(s,0,(char *)a)) | ||
950 | #define SSL_SESSION_get_app_data(s) (SSL_SESSION_get_ex_data(s,0)) | ||
951 | #define SSL_CTX_get_app_data(ctx) (SSL_CTX_get_ex_data(ctx,0)) | ||
952 | #define SSL_CTX_set_app_data(ctx,arg) (SSL_CTX_set_ex_data(ctx,0,(char *)arg)) | ||
953 | |||
954 | /* The following are the possible values for ssl->state are are | ||
955 | * used to indicate where we are up to in the SSL connection establishment. | ||
956 | * The macros that follow are about the only things you should need to use | ||
957 | * and even then, only when using non-blocking IO. | ||
958 | * It can also be useful to work out where you were when the connection | ||
959 | * failed */ | ||
960 | |||
961 | #define SSL_ST_CONNECT 0x1000 | ||
962 | #define SSL_ST_ACCEPT 0x2000 | ||
963 | #define SSL_ST_MASK 0x0FFF | ||
964 | #define SSL_ST_INIT (SSL_ST_CONNECT|SSL_ST_ACCEPT) | ||
965 | #define SSL_ST_BEFORE 0x4000 | ||
966 | #define SSL_ST_OK 0x03 | ||
967 | #define SSL_ST_RENEGOTIATE (0x04|SSL_ST_INIT) | ||
968 | |||
969 | #define SSL_CB_LOOP 0x01 | ||
970 | #define SSL_CB_EXIT 0x02 | ||
971 | #define SSL_CB_READ 0x04 | ||
972 | #define SSL_CB_WRITE 0x08 | ||
973 | #define SSL_CB_ALERT 0x4000 /* used in callback */ | ||
974 | #define SSL_CB_READ_ALERT (SSL_CB_ALERT|SSL_CB_READ) | ||
975 | #define SSL_CB_WRITE_ALERT (SSL_CB_ALERT|SSL_CB_WRITE) | ||
976 | #define SSL_CB_ACCEPT_LOOP (SSL_ST_ACCEPT|SSL_CB_LOOP) | ||
977 | #define SSL_CB_ACCEPT_EXIT (SSL_ST_ACCEPT|SSL_CB_EXIT) | ||
978 | #define SSL_CB_CONNECT_LOOP (SSL_ST_CONNECT|SSL_CB_LOOP) | ||
979 | #define SSL_CB_CONNECT_EXIT (SSL_ST_CONNECT|SSL_CB_EXIT) | ||
980 | #define SSL_CB_HANDSHAKE_START 0x10 | ||
981 | #define SSL_CB_HANDSHAKE_DONE 0x20 | ||
982 | |||
983 | /* Is the SSL_connection established? */ | ||
984 | #define SSL_get_state(a) SSL_state(a) | ||
985 | #define SSL_is_init_finished(a) (SSL_state(a) == SSL_ST_OK) | ||
986 | #define SSL_in_init(a) (SSL_state(a)&SSL_ST_INIT) | ||
987 | #define SSL_in_before(a) (SSL_state(a)&SSL_ST_BEFORE) | ||
988 | #define SSL_in_connect_init(a) (SSL_state(a)&SSL_ST_CONNECT) | ||
989 | #define SSL_in_accept_init(a) (SSL_state(a)&SSL_ST_ACCEPT) | ||
990 | |||
991 | /* The following 2 states are kept in ssl->rstate when reads fail, | ||
992 | * you should not need these */ | ||
993 | #define SSL_ST_READ_HEADER 0xF0 | ||
994 | #define SSL_ST_READ_BODY 0xF1 | ||
995 | #define SSL_ST_READ_DONE 0xF2 | ||
996 | |||
997 | /* Obtain latest Finished message | ||
998 | * -- that we sent (SSL_get_finished) | ||
999 | * -- that we expected from peer (SSL_get_peer_finished). | ||
1000 | * Returns length (0 == no Finished so far), copies up to 'count' bytes. */ | ||
1001 | size_t SSL_get_finished(SSL *s, void *buf, size_t count); | ||
1002 | size_t SSL_get_peer_finished(SSL *s, void *buf, size_t count); | ||
1003 | |||
1004 | /* use either SSL_VERIFY_NONE or SSL_VERIFY_PEER, the last 2 options | ||
1005 | * are 'ored' with SSL_VERIFY_PEER if they are desired */ | ||
1006 | #define SSL_VERIFY_NONE 0x00 | ||
1007 | #define SSL_VERIFY_PEER 0x01 | ||
1008 | #define SSL_VERIFY_FAIL_IF_NO_PEER_CERT 0x02 | ||
1009 | #define SSL_VERIFY_CLIENT_ONCE 0x04 | ||
1010 | |||
1011 | #define OpenSSL_add_ssl_algorithms() SSL_library_init() | ||
1012 | #define SSLeay_add_ssl_algorithms() SSL_library_init() | ||
1013 | |||
1014 | /* this is for backward compatibility */ | ||
1015 | #if 0 /* NEW_SSLEAY */ | ||
1016 | #define SSL_CTX_set_default_verify(a,b,c) SSL_CTX_set_verify(a,b,c) | ||
1017 | #define SSL_set_pref_cipher(c,n) SSL_set_cipher_list(c,n) | ||
1018 | #define SSL_add_session(a,b) SSL_CTX_add_session((a),(b)) | ||
1019 | #define SSL_remove_session(a,b) SSL_CTX_remove_session((a),(b)) | ||
1020 | #define SSL_flush_sessions(a,b) SSL_CTX_flush_sessions((a),(b)) | ||
1021 | #endif | ||
1022 | /* More backward compatibility */ | ||
1023 | #define SSL_get_cipher(s) \ | ||
1024 | SSL_CIPHER_get_name(SSL_get_current_cipher(s)) | ||
1025 | #define SSL_get_cipher_bits(s,np) \ | ||
1026 | SSL_CIPHER_get_bits(SSL_get_current_cipher(s),np) | ||
1027 | #define SSL_get_cipher_version(s) \ | ||
1028 | SSL_CIPHER_get_version(SSL_get_current_cipher(s)) | ||
1029 | #define SSL_get_cipher_name(s) \ | ||
1030 | SSL_CIPHER_get_name(SSL_get_current_cipher(s)) | ||
1031 | #define SSL_get_time(a) SSL_SESSION_get_time(a) | ||
1032 | #define SSL_set_time(a,b) SSL_SESSION_set_time((a),(b)) | ||
1033 | #define SSL_get_timeout(a) SSL_SESSION_get_timeout(a) | ||
1034 | #define SSL_set_timeout(a,b) SSL_SESSION_set_timeout((a),(b)) | ||
1035 | |||
1036 | #if 1 /*SSLEAY_MACROS*/ | ||
1037 | #define d2i_SSL_SESSION_bio(bp,s_id) (SSL_SESSION *)ASN1_d2i_bio( \ | ||
1038 | (char *(*)())SSL_SESSION_new,(char *(*)())d2i_SSL_SESSION, \ | ||
1039 | (bp),(unsigned char **)(s_id)) | ||
1040 | #define i2d_SSL_SESSION_bio(bp,s_id) ASN1_i2d_bio(i2d_SSL_SESSION, \ | ||
1041 | bp,(unsigned char *)s_id) | ||
1042 | #define PEM_read_SSL_SESSION(fp,x,cb,u) (SSL_SESSION *)PEM_ASN1_read( \ | ||
1043 | (char *(*)())d2i_SSL_SESSION,PEM_STRING_SSL_SESSION,fp,(char **)x,cb,u) | ||
1044 | #define PEM_read_bio_SSL_SESSION(bp,x,cb,u) (SSL_SESSION *)PEM_ASN1_read_bio( \ | ||
1045 | (char *(*)())d2i_SSL_SESSION,PEM_STRING_SSL_SESSION,bp,(char **)x,cb,u) | ||
1046 | #define PEM_write_SSL_SESSION(fp,x) \ | ||
1047 | PEM_ASN1_write((int (*)())i2d_SSL_SESSION, \ | ||
1048 | PEM_STRING_SSL_SESSION,fp, (char *)x, NULL,NULL,0,NULL,NULL) | ||
1049 | #define PEM_write_bio_SSL_SESSION(bp,x) \ | ||
1050 | PEM_ASN1_write_bio((int (*)())i2d_SSL_SESSION, \ | ||
1051 | PEM_STRING_SSL_SESSION,bp, (char *)x, NULL,NULL,0,NULL,NULL) | ||
1052 | #endif | ||
1053 | |||
1054 | #define SSL_AD_REASON_OFFSET 1000 | ||
1055 | /* These alert types are for SSLv3 and TLSv1 */ | ||
1056 | #define SSL_AD_CLOSE_NOTIFY SSL3_AD_CLOSE_NOTIFY | ||
1057 | #define SSL_AD_UNEXPECTED_MESSAGE SSL3_AD_UNEXPECTED_MESSAGE /* fatal */ | ||
1058 | #define SSL_AD_BAD_RECORD_MAC SSL3_AD_BAD_RECORD_MAC /* fatal */ | ||
1059 | #define SSL_AD_DECRYPTION_FAILED TLS1_AD_DECRYPTION_FAILED | ||
1060 | #define SSL_AD_RECORD_OVERFLOW TLS1_AD_RECORD_OVERFLOW | ||
1061 | #define SSL_AD_DECOMPRESSION_FAILURE SSL3_AD_DECOMPRESSION_FAILURE/* fatal */ | ||
1062 | #define SSL_AD_HANDSHAKE_FAILURE SSL3_AD_HANDSHAKE_FAILURE/* fatal */ | ||
1063 | #define SSL_AD_NO_CERTIFICATE SSL3_AD_NO_CERTIFICATE /* Not for TLS */ | ||
1064 | #define SSL_AD_BAD_CERTIFICATE SSL3_AD_BAD_CERTIFICATE | ||
1065 | #define SSL_AD_UNSUPPORTED_CERTIFICATE SSL3_AD_UNSUPPORTED_CERTIFICATE | ||
1066 | #define SSL_AD_CERTIFICATE_REVOKED SSL3_AD_CERTIFICATE_REVOKED | ||
1067 | #define SSL_AD_CERTIFICATE_EXPIRED SSL3_AD_CERTIFICATE_EXPIRED | ||
1068 | #define SSL_AD_CERTIFICATE_UNKNOWN SSL3_AD_CERTIFICATE_UNKNOWN | ||
1069 | #define SSL_AD_ILLEGAL_PARAMETER SSL3_AD_ILLEGAL_PARAMETER /* fatal */ | ||
1070 | #define SSL_AD_UNKNOWN_CA TLS1_AD_UNKNOWN_CA /* fatal */ | ||
1071 | #define SSL_AD_ACCESS_DENIED TLS1_AD_ACCESS_DENIED /* fatal */ | ||
1072 | #define SSL_AD_DECODE_ERROR TLS1_AD_DECODE_ERROR /* fatal */ | ||
1073 | #define SSL_AD_DECRYPT_ERROR TLS1_AD_DECRYPT_ERROR | ||
1074 | #define SSL_AD_EXPORT_RESTRICTION TLS1_AD_EXPORT_RESTRICTION/* fatal */ | ||
1075 | #define SSL_AD_PROTOCOL_VERSION TLS1_AD_PROTOCOL_VERSION /* fatal */ | ||
1076 | #define SSL_AD_INSUFFICIENT_SECURITY TLS1_AD_INSUFFICIENT_SECURITY/* fatal */ | ||
1077 | #define SSL_AD_INTERNAL_ERROR TLS1_AD_INTERNAL_ERROR /* fatal */ | ||
1078 | #define SSL_AD_USER_CANCELLED TLS1_AD_USER_CANCELLED | ||
1079 | #define SSL_AD_NO_RENEGOTIATION TLS1_AD_NO_RENEGOTIATION | ||
1080 | |||
1081 | #define SSL_ERROR_NONE 0 | ||
1082 | #define SSL_ERROR_SSL 1 | ||
1083 | #define SSL_ERROR_WANT_READ 2 | ||
1084 | #define SSL_ERROR_WANT_WRITE 3 | ||
1085 | #define SSL_ERROR_WANT_X509_LOOKUP 4 | ||
1086 | #define SSL_ERROR_SYSCALL 5 /* look at error stack/return value/errno */ | ||
1087 | #define SSL_ERROR_ZERO_RETURN 6 | ||
1088 | #define SSL_ERROR_WANT_CONNECT 7 | ||
1089 | #define SSL_ERROR_WANT_ACCEPT 8 | ||
1090 | |||
1091 | #define SSL_CTRL_NEED_TMP_RSA 1 | ||
1092 | #define SSL_CTRL_SET_TMP_RSA 2 | ||
1093 | #define SSL_CTRL_SET_TMP_DH 3 | ||
1094 | #define SSL_CTRL_SET_TMP_RSA_CB 4 | ||
1095 | #define SSL_CTRL_SET_TMP_DH_CB 5 | ||
1096 | |||
1097 | #define SSL_CTRL_GET_SESSION_REUSED 6 | ||
1098 | #define SSL_CTRL_GET_CLIENT_CERT_REQUEST 7 | ||
1099 | #define SSL_CTRL_GET_NUM_RENEGOTIATIONS 8 | ||
1100 | #define SSL_CTRL_CLEAR_NUM_RENEGOTIATIONS 9 | ||
1101 | #define SSL_CTRL_GET_TOTAL_RENEGOTIATIONS 10 | ||
1102 | #define SSL_CTRL_GET_FLAGS 11 | ||
1103 | #define SSL_CTRL_EXTRA_CHAIN_CERT 12 | ||
1104 | |||
1105 | #define SSL_CTRL_SET_MSG_CALLBACK 13 | ||
1106 | #define SSL_CTRL_SET_MSG_CALLBACK_ARG 14 | ||
1107 | |||
1108 | /* Stats */ | ||
1109 | #define SSL_CTRL_SESS_NUMBER 20 | ||
1110 | #define SSL_CTRL_SESS_CONNECT 21 | ||
1111 | #define SSL_CTRL_SESS_CONNECT_GOOD 22 | ||
1112 | #define SSL_CTRL_SESS_CONNECT_RENEGOTIATE 23 | ||
1113 | #define SSL_CTRL_SESS_ACCEPT 24 | ||
1114 | #define SSL_CTRL_SESS_ACCEPT_GOOD 25 | ||
1115 | #define SSL_CTRL_SESS_ACCEPT_RENEGOTIATE 26 | ||
1116 | #define SSL_CTRL_SESS_HIT 27 | ||
1117 | #define SSL_CTRL_SESS_CB_HIT 28 | ||
1118 | #define SSL_CTRL_SESS_MISSES 29 | ||
1119 | #define SSL_CTRL_SESS_TIMEOUTS 30 | ||
1120 | #define SSL_CTRL_SESS_CACHE_FULL 31 | ||
1121 | #define SSL_CTRL_OPTIONS 32 | ||
1122 | #define SSL_CTRL_MODE 33 | ||
1123 | |||
1124 | #define SSL_CTRL_GET_READ_AHEAD 40 | ||
1125 | #define SSL_CTRL_SET_READ_AHEAD 41 | ||
1126 | #define SSL_CTRL_SET_SESS_CACHE_SIZE 42 | ||
1127 | #define SSL_CTRL_GET_SESS_CACHE_SIZE 43 | ||
1128 | #define SSL_CTRL_SET_SESS_CACHE_MODE 44 | ||
1129 | #define SSL_CTRL_GET_SESS_CACHE_MODE 45 | ||
1130 | |||
1131 | #define SSL_CTRL_GET_MAX_CERT_LIST 50 | ||
1132 | #define SSL_CTRL_SET_MAX_CERT_LIST 51 | ||
1133 | |||
1134 | #define SSL_session_reused(ssl) \ | ||
1135 | SSL_ctrl((ssl),SSL_CTRL_GET_SESSION_REUSED,0,NULL) | ||
1136 | #define SSL_num_renegotiations(ssl) \ | ||
1137 | SSL_ctrl((ssl),SSL_CTRL_GET_NUM_RENEGOTIATIONS,0,NULL) | ||
1138 | #define SSL_clear_num_renegotiations(ssl) \ | ||
1139 | SSL_ctrl((ssl),SSL_CTRL_CLEAR_NUM_RENEGOTIATIONS,0,NULL) | ||
1140 | #define SSL_total_renegotiations(ssl) \ | ||
1141 | SSL_ctrl((ssl),SSL_CTRL_GET_TOTAL_RENEGOTIATIONS,0,NULL) | ||
1142 | |||
1143 | #define SSL_CTX_need_tmp_RSA(ctx) \ | ||
1144 | SSL_CTX_ctrl(ctx,SSL_CTRL_NEED_TMP_RSA,0,NULL) | ||
1145 | #define SSL_CTX_set_tmp_rsa(ctx,rsa) \ | ||
1146 | SSL_CTX_ctrl(ctx,SSL_CTRL_SET_TMP_RSA,0,(char *)rsa) | ||
1147 | #define SSL_CTX_set_tmp_dh(ctx,dh) \ | ||
1148 | SSL_CTX_ctrl(ctx,SSL_CTRL_SET_TMP_DH,0,(char *)dh) | ||
1149 | |||
1150 | #define SSL_need_tmp_RSA(ssl) \ | ||
1151 | SSL_ctrl(ssl,SSL_CTRL_NEED_TMP_RSA,0,NULL) | ||
1152 | #define SSL_set_tmp_rsa(ssl,rsa) \ | ||
1153 | SSL_ctrl(ssl,SSL_CTRL_SET_TMP_RSA,0,(char *)rsa) | ||
1154 | #define SSL_set_tmp_dh(ssl,dh) \ | ||
1155 | SSL_ctrl(ssl,SSL_CTRL_SET_TMP_DH,0,(char *)dh) | ||
1156 | |||
1157 | #define SSL_CTX_add_extra_chain_cert(ctx,x509) \ | ||
1158 | SSL_CTX_ctrl(ctx,SSL_CTRL_EXTRA_CHAIN_CERT,0,(char *)x509) | ||
1159 | |||
1160 | #ifndef OPENSSL_NO_BIO | ||
1161 | BIO_METHOD *BIO_f_ssl(void); | ||
1162 | BIO *BIO_new_ssl(SSL_CTX *ctx,int client); | ||
1163 | BIO *BIO_new_ssl_connect(SSL_CTX *ctx); | ||
1164 | BIO *BIO_new_buffer_ssl_connect(SSL_CTX *ctx); | ||
1165 | int BIO_ssl_copy_session_id(BIO *to,BIO *from); | ||
1166 | void BIO_ssl_shutdown(BIO *ssl_bio); | ||
1167 | |||
1168 | #endif | ||
1169 | |||
1170 | int SSL_CTX_set_cipher_list(SSL_CTX *,const char *str); | ||
1171 | SSL_CTX *SSL_CTX_new(SSL_METHOD *meth); | ||
1172 | void SSL_CTX_free(SSL_CTX *); | ||
1173 | long SSL_CTX_set_timeout(SSL_CTX *ctx,long t); | ||
1174 | long SSL_CTX_get_timeout(SSL_CTX *ctx); | ||
1175 | X509_STORE *SSL_CTX_get_cert_store(SSL_CTX *); | ||
1176 | void SSL_CTX_set_cert_store(SSL_CTX *,X509_STORE *); | ||
1177 | int SSL_want(SSL *s); | ||
1178 | int SSL_clear(SSL *s); | ||
1179 | |||
1180 | void SSL_CTX_flush_sessions(SSL_CTX *ctx,long tm); | ||
1181 | |||
1182 | SSL_CIPHER *SSL_get_current_cipher(SSL *s); | ||
1183 | int SSL_CIPHER_get_bits(SSL_CIPHER *c,int *alg_bits); | ||
1184 | char * SSL_CIPHER_get_version(SSL_CIPHER *c); | ||
1185 | const char * SSL_CIPHER_get_name(SSL_CIPHER *c); | ||
1186 | |||
1187 | int SSL_get_fd(SSL *s); | ||
1188 | int SSL_get_rfd(SSL *s); | ||
1189 | int SSL_get_wfd(SSL *s); | ||
1190 | const char * SSL_get_cipher_list(SSL *s,int n); | ||
1191 | char * SSL_get_shared_ciphers(SSL *s, char *buf, int len); | ||
1192 | int SSL_get_read_ahead(SSL * s); | ||
1193 | int SSL_pending(SSL *s); | ||
1194 | #ifndef OPENSSL_NO_SOCK | ||
1195 | int SSL_set_fd(SSL *s, int fd); | ||
1196 | int SSL_set_rfd(SSL *s, int fd); | ||
1197 | int SSL_set_wfd(SSL *s, int fd); | ||
1198 | #endif | ||
1199 | #ifndef OPENSSL_NO_BIO | ||
1200 | void SSL_set_bio(SSL *s, BIO *rbio,BIO *wbio); | ||
1201 | BIO * SSL_get_rbio(SSL *s); | ||
1202 | BIO * SSL_get_wbio(SSL *s); | ||
1203 | #endif | ||
1204 | int SSL_set_cipher_list(SSL *s, const char *str); | ||
1205 | void SSL_set_read_ahead(SSL *s, int yes); | ||
1206 | int SSL_get_verify_mode(SSL *s); | ||
1207 | int SSL_get_verify_depth(SSL *s); | ||
1208 | int (*SSL_get_verify_callback(SSL *s))(int,X509_STORE_CTX *); | ||
1209 | void SSL_set_verify(SSL *s, int mode, | ||
1210 | int (*callback)(int ok,X509_STORE_CTX *ctx)); | ||
1211 | void SSL_set_verify_depth(SSL *s, int depth); | ||
1212 | #ifndef OPENSSL_NO_RSA | ||
1213 | int SSL_use_RSAPrivateKey(SSL *ssl, RSA *rsa); | ||
1214 | #endif | ||
1215 | int SSL_use_RSAPrivateKey_ASN1(SSL *ssl, unsigned char *d, long len); | ||
1216 | int SSL_use_PrivateKey(SSL *ssl, EVP_PKEY *pkey); | ||
1217 | int SSL_use_PrivateKey_ASN1(int pk,SSL *ssl, unsigned char *d, long len); | ||
1218 | int SSL_use_certificate(SSL *ssl, X509 *x); | ||
1219 | int SSL_use_certificate_ASN1(SSL *ssl, unsigned char *d, int len); | ||
1220 | |||
1221 | #ifndef OPENSSL_NO_STDIO | ||
1222 | int SSL_use_RSAPrivateKey_file(SSL *ssl, const char *file, int type); | ||
1223 | int SSL_use_PrivateKey_file(SSL *ssl, const char *file, int type); | ||
1224 | int SSL_use_certificate_file(SSL *ssl, const char *file, int type); | ||
1225 | int SSL_CTX_use_RSAPrivateKey_file(SSL_CTX *ctx, const char *file, int type); | ||
1226 | int SSL_CTX_use_PrivateKey_file(SSL_CTX *ctx, const char *file, int type); | ||
1227 | int SSL_CTX_use_certificate_file(SSL_CTX *ctx, const char *file, int type); | ||
1228 | int SSL_CTX_use_certificate_chain_file(SSL_CTX *ctx, const char *file); /* PEM type */ | ||
1229 | STACK_OF(X509_NAME) *SSL_load_client_CA_file(const char *file); | ||
1230 | int SSL_add_file_cert_subjects_to_stack(STACK_OF(X509_NAME) *stackCAs, | ||
1231 | const char *file); | ||
1232 | #ifndef OPENSSL_SYS_VMS | ||
1233 | #ifndef OPENSSL_SYS_MACINTOSH_CLASSIC /* XXXXX: Better scheme needed! [was: #ifndef MAC_OS_pre_X] */ | ||
1234 | int SSL_add_dir_cert_subjects_to_stack(STACK_OF(X509_NAME) *stackCAs, | ||
1235 | const char *dir); | ||
1236 | #endif | ||
1237 | #endif | ||
1238 | |||
1239 | #endif | ||
1240 | |||
1241 | void SSL_load_error_strings(void ); | ||
1242 | const char *SSL_state_string(const SSL *s); | ||
1243 | const char *SSL_rstate_string(const SSL *s); | ||
1244 | const char *SSL_state_string_long(const SSL *s); | ||
1245 | const char *SSL_rstate_string_long(const SSL *s); | ||
1246 | long SSL_SESSION_get_time(SSL_SESSION *s); | ||
1247 | long SSL_SESSION_set_time(SSL_SESSION *s, long t); | ||
1248 | long SSL_SESSION_get_timeout(SSL_SESSION *s); | ||
1249 | long SSL_SESSION_set_timeout(SSL_SESSION *s, long t); | ||
1250 | void SSL_copy_session_id(SSL *to,SSL *from); | ||
1251 | |||
1252 | SSL_SESSION *SSL_SESSION_new(void); | ||
1253 | unsigned long SSL_SESSION_hash(SSL_SESSION *a); | ||
1254 | int SSL_SESSION_cmp(SSL_SESSION *a,SSL_SESSION *b); | ||
1255 | #ifndef OPENSSL_NO_FP_API | ||
1256 | int SSL_SESSION_print_fp(FILE *fp,SSL_SESSION *ses); | ||
1257 | #endif | ||
1258 | #ifndef OPENSSL_NO_BIO | ||
1259 | int SSL_SESSION_print(BIO *fp,SSL_SESSION *ses); | ||
1260 | #endif | ||
1261 | void SSL_SESSION_free(SSL_SESSION *ses); | ||
1262 | int i2d_SSL_SESSION(SSL_SESSION *in,unsigned char **pp); | ||
1263 | int SSL_set_session(SSL *to, SSL_SESSION *session); | ||
1264 | int SSL_CTX_add_session(SSL_CTX *s, SSL_SESSION *c); | ||
1265 | int SSL_CTX_remove_session(SSL_CTX *,SSL_SESSION *c); | ||
1266 | int SSL_CTX_set_generate_session_id(SSL_CTX *, GEN_SESSION_CB); | ||
1267 | int SSL_set_generate_session_id(SSL *, GEN_SESSION_CB); | ||
1268 | int SSL_has_matching_session_id(const SSL *ssl, const unsigned char *id, | ||
1269 | unsigned int id_len); | ||
1270 | SSL_SESSION *d2i_SSL_SESSION(SSL_SESSION **a,unsigned char **pp,long length); | ||
1271 | |||
1272 | #ifdef HEADER_X509_H | ||
1273 | X509 * SSL_get_peer_certificate(SSL *s); | ||
1274 | #endif | ||
1275 | |||
1276 | STACK_OF(X509) *SSL_get_peer_cert_chain(SSL *s); | ||
1277 | |||
1278 | int SSL_CTX_get_verify_mode(SSL_CTX *ctx); | ||
1279 | int SSL_CTX_get_verify_depth(SSL_CTX *ctx); | ||
1280 | int (*SSL_CTX_get_verify_callback(SSL_CTX *ctx))(int,X509_STORE_CTX *); | ||
1281 | void SSL_CTX_set_verify(SSL_CTX *ctx,int mode, | ||
1282 | int (*callback)(int, X509_STORE_CTX *)); | ||
1283 | void SSL_CTX_set_verify_depth(SSL_CTX *ctx,int depth); | ||
1284 | void SSL_CTX_set_cert_verify_callback(SSL_CTX *ctx, int (*cb)(X509_STORE_CTX *,void *), void *arg); | ||
1285 | #ifndef OPENSSL_NO_RSA | ||
1286 | int SSL_CTX_use_RSAPrivateKey(SSL_CTX *ctx, RSA *rsa); | ||
1287 | #endif | ||
1288 | int SSL_CTX_use_RSAPrivateKey_ASN1(SSL_CTX *ctx, unsigned char *d, long len); | ||
1289 | int SSL_CTX_use_PrivateKey(SSL_CTX *ctx, EVP_PKEY *pkey); | ||
1290 | int SSL_CTX_use_PrivateKey_ASN1(int pk,SSL_CTX *ctx, | ||
1291 | unsigned char *d, long len); | ||
1292 | int SSL_CTX_use_certificate(SSL_CTX *ctx, X509 *x); | ||
1293 | int SSL_CTX_use_certificate_ASN1(SSL_CTX *ctx, int len, unsigned char *d); | ||
1294 | |||
1295 | void SSL_CTX_set_default_passwd_cb(SSL_CTX *ctx, pem_password_cb *cb); | ||
1296 | void SSL_CTX_set_default_passwd_cb_userdata(SSL_CTX *ctx, void *u); | ||
1297 | |||
1298 | int SSL_CTX_check_private_key(SSL_CTX *ctx); | ||
1299 | int SSL_check_private_key(SSL *ctx); | ||
1300 | |||
1301 | int SSL_CTX_set_session_id_context(SSL_CTX *ctx,const unsigned char *sid_ctx, | ||
1302 | unsigned int sid_ctx_len); | ||
1303 | |||
1304 | SSL * SSL_new(SSL_CTX *ctx); | ||
1305 | int SSL_set_session_id_context(SSL *ssl,const unsigned char *sid_ctx, | ||
1306 | unsigned int sid_ctx_len); | ||
1307 | |||
1308 | int SSL_CTX_set_purpose(SSL_CTX *s, int purpose); | ||
1309 | int SSL_set_purpose(SSL *s, int purpose); | ||
1310 | int SSL_CTX_set_trust(SSL_CTX *s, int trust); | ||
1311 | int SSL_set_trust(SSL *s, int trust); | ||
1312 | |||
1313 | void SSL_free(SSL *ssl); | ||
1314 | int SSL_accept(SSL *ssl); | ||
1315 | int SSL_connect(SSL *ssl); | ||
1316 | int SSL_read(SSL *ssl,void *buf,int num); | ||
1317 | int SSL_peek(SSL *ssl,void *buf,int num); | ||
1318 | int SSL_write(SSL *ssl,const void *buf,int num); | ||
1319 | long SSL_ctrl(SSL *ssl,int cmd, long larg, void *parg); | ||
1320 | long SSL_callback_ctrl(SSL *, int, void (*)()); | ||
1321 | long SSL_CTX_ctrl(SSL_CTX *ctx,int cmd, long larg, void *parg); | ||
1322 | long SSL_CTX_callback_ctrl(SSL_CTX *, int, void (*)()); | ||
1323 | |||
1324 | int SSL_get_error(SSL *s,int ret_code); | ||
1325 | const char *SSL_get_version(SSL *s); | ||
1326 | |||
1327 | /* This sets the 'default' SSL version that SSL_new() will create */ | ||
1328 | int SSL_CTX_set_ssl_version(SSL_CTX *ctx,SSL_METHOD *meth); | ||
1329 | |||
1330 | SSL_METHOD *SSLv2_method(void); /* SSLv2 */ | ||
1331 | SSL_METHOD *SSLv2_server_method(void); /* SSLv2 */ | ||
1332 | SSL_METHOD *SSLv2_client_method(void); /* SSLv2 */ | ||
1333 | |||
1334 | SSL_METHOD *SSLv3_method(void); /* SSLv3 */ | ||
1335 | SSL_METHOD *SSLv3_server_method(void); /* SSLv3 */ | ||
1336 | SSL_METHOD *SSLv3_client_method(void); /* SSLv3 */ | ||
1337 | |||
1338 | SSL_METHOD *SSLv23_method(void); /* SSLv3 but can rollback to v2 */ | ||
1339 | SSL_METHOD *SSLv23_server_method(void); /* SSLv3 but can rollback to v2 */ | ||
1340 | SSL_METHOD *SSLv23_client_method(void); /* SSLv3 but can rollback to v2 */ | ||
1341 | |||
1342 | SSL_METHOD *TLSv1_method(void); /* TLSv1.0 */ | ||
1343 | SSL_METHOD *TLSv1_server_method(void); /* TLSv1.0 */ | ||
1344 | SSL_METHOD *TLSv1_client_method(void); /* TLSv1.0 */ | ||
1345 | |||
1346 | STACK_OF(SSL_CIPHER) *SSL_get_ciphers(SSL *s); | ||
1347 | |||
1348 | int SSL_do_handshake(SSL *s); | ||
1349 | int SSL_renegotiate(SSL *s); | ||
1350 | int SSL_renegotiate_pending(SSL *s); | ||
1351 | int SSL_shutdown(SSL *s); | ||
1352 | |||
1353 | SSL_METHOD *SSL_get_ssl_method(SSL *s); | ||
1354 | int SSL_set_ssl_method(SSL *s,SSL_METHOD *method); | ||
1355 | const char *SSL_alert_type_string_long(int value); | ||
1356 | const char *SSL_alert_type_string(int value); | ||
1357 | const char *SSL_alert_desc_string_long(int value); | ||
1358 | const char *SSL_alert_desc_string(int value); | ||
1359 | |||
1360 | void SSL_set_client_CA_list(SSL *s, STACK_OF(X509_NAME) *list); | ||
1361 | void SSL_CTX_set_client_CA_list(SSL_CTX *ctx, STACK_OF(X509_NAME) *list); | ||
1362 | STACK_OF(X509_NAME) *SSL_get_client_CA_list(SSL *s); | ||
1363 | STACK_OF(X509_NAME) *SSL_CTX_get_client_CA_list(SSL_CTX *s); | ||
1364 | int SSL_add_client_CA(SSL *ssl,X509 *x); | ||
1365 | int SSL_CTX_add_client_CA(SSL_CTX *ctx,X509 *x); | ||
1366 | |||
1367 | void SSL_set_connect_state(SSL *s); | ||
1368 | void SSL_set_accept_state(SSL *s); | ||
1369 | |||
1370 | long SSL_get_default_timeout(SSL *s); | ||
1371 | |||
1372 | int SSL_library_init(void ); | ||
1373 | |||
1374 | char *SSL_CIPHER_description(SSL_CIPHER *,char *buf,int size); | ||
1375 | STACK_OF(X509_NAME) *SSL_dup_CA_list(STACK_OF(X509_NAME) *sk); | ||
1376 | |||
1377 | SSL *SSL_dup(SSL *ssl); | ||
1378 | |||
1379 | X509 *SSL_get_certificate(SSL *ssl); | ||
1380 | /* EVP_PKEY */ struct evp_pkey_st *SSL_get_privatekey(SSL *ssl); | ||
1381 | |||
1382 | void SSL_CTX_set_quiet_shutdown(SSL_CTX *ctx,int mode); | ||
1383 | int SSL_CTX_get_quiet_shutdown(SSL_CTX *ctx); | ||
1384 | void SSL_set_quiet_shutdown(SSL *ssl,int mode); | ||
1385 | int SSL_get_quiet_shutdown(SSL *ssl); | ||
1386 | void SSL_set_shutdown(SSL *ssl,int mode); | ||
1387 | int SSL_get_shutdown(SSL *ssl); | ||
1388 | int SSL_version(SSL *ssl); | ||
1389 | int SSL_CTX_set_default_verify_paths(SSL_CTX *ctx); | ||
1390 | int SSL_CTX_load_verify_locations(SSL_CTX *ctx, const char *CAfile, | ||
1391 | const char *CApath); | ||
1392 | #define SSL_get0_session SSL_get_session /* just peek at pointer */ | ||
1393 | SSL_SESSION *SSL_get_session(SSL *ssl); | ||
1394 | SSL_SESSION *SSL_get1_session(SSL *ssl); /* obtain a reference count */ | ||
1395 | SSL_CTX *SSL_get_SSL_CTX(SSL *ssl); | ||
1396 | void SSL_set_info_callback(SSL *ssl, | ||
1397 | void (*cb)(const SSL *ssl,int type,int val)); | ||
1398 | void (*SSL_get_info_callback(SSL *ssl))(const SSL *ssl,int type,int val); | ||
1399 | int SSL_state(SSL *ssl); | ||
1400 | |||
1401 | void SSL_set_verify_result(SSL *ssl,long v); | ||
1402 | long SSL_get_verify_result(SSL *ssl); | ||
1403 | |||
1404 | int SSL_set_ex_data(SSL *ssl,int idx,void *data); | ||
1405 | void *SSL_get_ex_data(SSL *ssl,int idx); | ||
1406 | int SSL_get_ex_new_index(long argl, void *argp, CRYPTO_EX_new *new_func, | ||
1407 | CRYPTO_EX_dup *dup_func, CRYPTO_EX_free *free_func); | ||
1408 | |||
1409 | int SSL_SESSION_set_ex_data(SSL_SESSION *ss,int idx,void *data); | ||
1410 | void *SSL_SESSION_get_ex_data(SSL_SESSION *ss,int idx); | ||
1411 | int SSL_SESSION_get_ex_new_index(long argl, void *argp, CRYPTO_EX_new *new_func, | ||
1412 | CRYPTO_EX_dup *dup_func, CRYPTO_EX_free *free_func); | ||
1413 | |||
1414 | int SSL_CTX_set_ex_data(SSL_CTX *ssl,int idx,void *data); | ||
1415 | void *SSL_CTX_get_ex_data(SSL_CTX *ssl,int idx); | ||
1416 | int SSL_CTX_get_ex_new_index(long argl, void *argp, CRYPTO_EX_new *new_func, | ||
1417 | CRYPTO_EX_dup *dup_func, CRYPTO_EX_free *free_func); | ||
1418 | |||
1419 | int SSL_get_ex_data_X509_STORE_CTX_idx(void ); | ||
1420 | |||
1421 | #define SSL_CTX_sess_set_cache_size(ctx,t) \ | ||
1422 | SSL_CTX_ctrl(ctx,SSL_CTRL_SET_SESS_CACHE_SIZE,t,NULL) | ||
1423 | #define SSL_CTX_sess_get_cache_size(ctx) \ | ||
1424 | SSL_CTX_ctrl(ctx,SSL_CTRL_GET_SESS_CACHE_SIZE,0,NULL) | ||
1425 | #define SSL_CTX_set_session_cache_mode(ctx,m) \ | ||
1426 | SSL_CTX_ctrl(ctx,SSL_CTRL_SET_SESS_CACHE_MODE,m,NULL) | ||
1427 | #define SSL_CTX_get_session_cache_mode(ctx) \ | ||
1428 | SSL_CTX_ctrl(ctx,SSL_CTRL_GET_SESS_CACHE_MODE,0,NULL) | ||
1429 | |||
1430 | #define SSL_CTX_get_default_read_ahead(ctx) SSL_CTX_get_read_ahead(ctx) | ||
1431 | #define SSL_CTX_set_default_read_ahead(ctx,m) SSL_CTX_set_read_ahead(ctx,m) | ||
1432 | #define SSL_CTX_get_read_ahead(ctx) \ | ||
1433 | SSL_CTX_ctrl(ctx,SSL_CTRL_GET_READ_AHEAD,0,NULL) | ||
1434 | #define SSL_CTX_set_read_ahead(ctx,m) \ | ||
1435 | SSL_CTX_ctrl(ctx,SSL_CTRL_SET_READ_AHEAD,m,NULL) | ||
1436 | #define SSL_CTX_get_max_cert_list(ctx) \ | ||
1437 | SSL_CTX_ctrl(ctx,SSL_CTRL_GET_MAX_CERT_LIST,0,NULL) | ||
1438 | #define SSL_CTX_set_max_cert_list(ctx,m) \ | ||
1439 | SSL_CTX_ctrl(ctx,SSL_CTRL_SET_MAX_CERT_LIST,m,NULL) | ||
1440 | #define SSL_get_max_cert_list(ssl) \ | ||
1441 | SSL_ctrl(ssl,SSL_CTRL_GET_MAX_CERT_LIST,0,NULL) | ||
1442 | #define SSL_set_max_cert_list(ssl,m) \ | ||
1443 | SSL_ctrl(ssl,SSL_CTRL_SET_MAX_CERT_LIST,m,NULL) | ||
1444 | |||
1445 | /* NB: the keylength is only applicable when is_export is true */ | ||
1446 | #ifndef OPENSSL_NO_RSA | ||
1447 | void SSL_CTX_set_tmp_rsa_callback(SSL_CTX *ctx, | ||
1448 | RSA *(*cb)(SSL *ssl,int is_export, | ||
1449 | int keylength)); | ||
1450 | |||
1451 | void SSL_set_tmp_rsa_callback(SSL *ssl, | ||
1452 | RSA *(*cb)(SSL *ssl,int is_export, | ||
1453 | int keylength)); | ||
1454 | #endif | ||
1455 | #ifndef OPENSSL_NO_DH | ||
1456 | void SSL_CTX_set_tmp_dh_callback(SSL_CTX *ctx, | ||
1457 | DH *(*dh)(SSL *ssl,int is_export, | ||
1458 | int keylength)); | ||
1459 | void SSL_set_tmp_dh_callback(SSL *ssl, | ||
1460 | DH *(*dh)(SSL *ssl,int is_export, | ||
1461 | int keylength)); | ||
1462 | #endif | ||
1463 | |||
1464 | #ifndef OPENSSL_NO_COMP | ||
1465 | int SSL_COMP_add_compression_method(int id,COMP_METHOD *cm); | ||
1466 | #else | ||
1467 | int SSL_COMP_add_compression_method(int id,char *cm); | ||
1468 | #endif | ||
1469 | |||
1470 | /* BEGIN ERROR CODES */ | ||
1471 | /* The following lines are auto generated by the script mkerr.pl. Any changes | ||
1472 | * made after this point may be overwritten when the script is next run. | ||
1473 | */ | ||
1474 | void ERR_load_SSL_strings(void); | ||
1475 | |||
1476 | /* Error codes for the SSL functions. */ | ||
1477 | |||
1478 | /* Function codes. */ | ||
1479 | #define SSL_F_CLIENT_CERTIFICATE 100 | ||
1480 | #define SSL_F_CLIENT_FINISHED 238 | ||
1481 | #define SSL_F_CLIENT_HELLO 101 | ||
1482 | #define SSL_F_CLIENT_MASTER_KEY 102 | ||
1483 | #define SSL_F_D2I_SSL_SESSION 103 | ||
1484 | #define SSL_F_DO_SSL3_WRITE 104 | ||
1485 | #define SSL_F_GET_CLIENT_FINISHED 105 | ||
1486 | #define SSL_F_GET_CLIENT_HELLO 106 | ||
1487 | #define SSL_F_GET_CLIENT_MASTER_KEY 107 | ||
1488 | #define SSL_F_GET_SERVER_FINISHED 108 | ||
1489 | #define SSL_F_GET_SERVER_HELLO 109 | ||
1490 | #define SSL_F_GET_SERVER_VERIFY 110 | ||
1491 | #define SSL_F_I2D_SSL_SESSION 111 | ||
1492 | #define SSL_F_READ_N 112 | ||
1493 | #define SSL_F_REQUEST_CERTIFICATE 113 | ||
1494 | #define SSL_F_SERVER_FINISH 239 | ||
1495 | #define SSL_F_SERVER_HELLO 114 | ||
1496 | #define SSL_F_SERVER_VERIFY 240 | ||
1497 | #define SSL_F_SSL23_ACCEPT 115 | ||
1498 | #define SSL_F_SSL23_CLIENT_HELLO 116 | ||
1499 | #define SSL_F_SSL23_CONNECT 117 | ||
1500 | #define SSL_F_SSL23_GET_CLIENT_HELLO 118 | ||
1501 | #define SSL_F_SSL23_GET_SERVER_HELLO 119 | ||
1502 | #define SSL_F_SSL23_PEEK 237 | ||
1503 | #define SSL_F_SSL23_READ 120 | ||
1504 | #define SSL_F_SSL23_WRITE 121 | ||
1505 | #define SSL_F_SSL2_ACCEPT 122 | ||
1506 | #define SSL_F_SSL2_CONNECT 123 | ||
1507 | #define SSL_F_SSL2_ENC_INIT 124 | ||
1508 | #define SSL_F_SSL2_GENERATE_KEY_MATERIAL 241 | ||
1509 | #define SSL_F_SSL2_PEEK 234 | ||
1510 | #define SSL_F_SSL2_READ 125 | ||
1511 | #define SSL_F_SSL2_READ_INTERNAL 236 | ||
1512 | #define SSL_F_SSL2_SET_CERTIFICATE 126 | ||
1513 | #define SSL_F_SSL2_WRITE 127 | ||
1514 | #define SSL_F_SSL3_ACCEPT 128 | ||
1515 | #define SSL_F_SSL3_CALLBACK_CTRL 233 | ||
1516 | #define SSL_F_SSL3_CHANGE_CIPHER_STATE 129 | ||
1517 | #define SSL_F_SSL3_CHECK_CERT_AND_ALGORITHM 130 | ||
1518 | #define SSL_F_SSL3_CLIENT_HELLO 131 | ||
1519 | #define SSL_F_SSL3_CONNECT 132 | ||
1520 | #define SSL_F_SSL3_CTRL 213 | ||
1521 | #define SSL_F_SSL3_CTX_CTRL 133 | ||
1522 | #define SSL_F_SSL3_ENC 134 | ||
1523 | #define SSL_F_SSL3_GENERATE_KEY_BLOCK 238 | ||
1524 | #define SSL_F_SSL3_GET_CERTIFICATE_REQUEST 135 | ||
1525 | #define SSL_F_SSL3_GET_CERT_VERIFY 136 | ||
1526 | #define SSL_F_SSL3_GET_CLIENT_CERTIFICATE 137 | ||
1527 | #define SSL_F_SSL3_GET_CLIENT_HELLO 138 | ||
1528 | #define SSL_F_SSL3_GET_CLIENT_KEY_EXCHANGE 139 | ||
1529 | #define SSL_F_SSL3_GET_FINISHED 140 | ||
1530 | #define SSL_F_SSL3_GET_KEY_EXCHANGE 141 | ||
1531 | #define SSL_F_SSL3_GET_MESSAGE 142 | ||
1532 | #define SSL_F_SSL3_GET_RECORD 143 | ||
1533 | #define SSL_F_SSL3_GET_SERVER_CERTIFICATE 144 | ||
1534 | #define SSL_F_SSL3_GET_SERVER_DONE 145 | ||
1535 | #define SSL_F_SSL3_GET_SERVER_HELLO 146 | ||
1536 | #define SSL_F_SSL3_OUTPUT_CERT_CHAIN 147 | ||
1537 | #define SSL_F_SSL3_PEEK 235 | ||
1538 | #define SSL_F_SSL3_READ_BYTES 148 | ||
1539 | #define SSL_F_SSL3_READ_N 149 | ||
1540 | #define SSL_F_SSL3_SEND_CERTIFICATE_REQUEST 150 | ||
1541 | #define SSL_F_SSL3_SEND_CLIENT_CERTIFICATE 151 | ||
1542 | #define SSL_F_SSL3_SEND_CLIENT_KEY_EXCHANGE 152 | ||
1543 | #define SSL_F_SSL3_SEND_CLIENT_VERIFY 153 | ||
1544 | #define SSL_F_SSL3_SEND_SERVER_CERTIFICATE 154 | ||
1545 | #define SSL_F_SSL3_SEND_SERVER_HELLO 242 | ||
1546 | #define SSL_F_SSL3_SEND_SERVER_KEY_EXCHANGE 155 | ||
1547 | #define SSL_F_SSL3_SETUP_BUFFERS 156 | ||
1548 | #define SSL_F_SSL3_SETUP_KEY_BLOCK 157 | ||
1549 | #define SSL_F_SSL3_WRITE_BYTES 158 | ||
1550 | #define SSL_F_SSL3_WRITE_PENDING 159 | ||
1551 | #define SSL_F_SSL_ADD_DIR_CERT_SUBJECTS_TO_STACK 215 | ||
1552 | #define SSL_F_SSL_ADD_FILE_CERT_SUBJECTS_TO_STACK 216 | ||
1553 | #define SSL_F_SSL_BAD_METHOD 160 | ||
1554 | #define SSL_F_SSL_BYTES_TO_CIPHER_LIST 161 | ||
1555 | #define SSL_F_SSL_CERT_DUP 221 | ||
1556 | #define SSL_F_SSL_CERT_INST 222 | ||
1557 | #define SSL_F_SSL_CERT_INSTANTIATE 214 | ||
1558 | #define SSL_F_SSL_CERT_NEW 162 | ||
1559 | #define SSL_F_SSL_CHECK_PRIVATE_KEY 163 | ||
1560 | #define SSL_F_SSL_CIPHER_PROCESS_RULESTR 230 | ||
1561 | #define SSL_F_SSL_CIPHER_STRENGTH_SORT 231 | ||
1562 | #define SSL_F_SSL_CLEAR 164 | ||
1563 | #define SSL_F_SSL_COMP_ADD_COMPRESSION_METHOD 165 | ||
1564 | #define SSL_F_SSL_CREATE_CIPHER_LIST 166 | ||
1565 | #define SSL_F_SSL_CTRL 232 | ||
1566 | #define SSL_F_SSL_CTX_CHECK_PRIVATE_KEY 168 | ||
1567 | #define SSL_F_SSL_CTX_NEW 169 | ||
1568 | #define SSL_F_SSL_CTX_SET_PURPOSE 226 | ||
1569 | #define SSL_F_SSL_CTX_SET_SESSION_ID_CONTEXT 219 | ||
1570 | #define SSL_F_SSL_CTX_SET_SSL_VERSION 170 | ||
1571 | #define SSL_F_SSL_CTX_SET_TRUST 229 | ||
1572 | #define SSL_F_SSL_CTX_USE_CERTIFICATE 171 | ||
1573 | #define SSL_F_SSL_CTX_USE_CERTIFICATE_ASN1 172 | ||
1574 | #define SSL_F_SSL_CTX_USE_CERTIFICATE_CHAIN_FILE 220 | ||
1575 | #define SSL_F_SSL_CTX_USE_CERTIFICATE_FILE 173 | ||
1576 | #define SSL_F_SSL_CTX_USE_PRIVATEKEY 174 | ||
1577 | #define SSL_F_SSL_CTX_USE_PRIVATEKEY_ASN1 175 | ||
1578 | #define SSL_F_SSL_CTX_USE_PRIVATEKEY_FILE 176 | ||
1579 | #define SSL_F_SSL_CTX_USE_RSAPRIVATEKEY 177 | ||
1580 | #define SSL_F_SSL_CTX_USE_RSAPRIVATEKEY_ASN1 178 | ||
1581 | #define SSL_F_SSL_CTX_USE_RSAPRIVATEKEY_FILE 179 | ||
1582 | #define SSL_F_SSL_DO_HANDSHAKE 180 | ||
1583 | #define SSL_F_SSL_GET_NEW_SESSION 181 | ||
1584 | #define SSL_F_SSL_GET_PREV_SESSION 217 | ||
1585 | #define SSL_F_SSL_GET_SERVER_SEND_CERT 182 | ||
1586 | #define SSL_F_SSL_GET_SIGN_PKEY 183 | ||
1587 | #define SSL_F_SSL_INIT_WBIO_BUFFER 184 | ||
1588 | #define SSL_F_SSL_LOAD_CLIENT_CA_FILE 185 | ||
1589 | #define SSL_F_SSL_NEW 186 | ||
1590 | #define SSL_F_SSL_READ 223 | ||
1591 | #define SSL_F_SSL_RSA_PRIVATE_DECRYPT 187 | ||
1592 | #define SSL_F_SSL_RSA_PUBLIC_ENCRYPT 188 | ||
1593 | #define SSL_F_SSL_SESSION_NEW 189 | ||
1594 | #define SSL_F_SSL_SESSION_PRINT_FP 190 | ||
1595 | #define SSL_F_SSL_SESS_CERT_NEW 225 | ||
1596 | #define SSL_F_SSL_SET_CERT 191 | ||
1597 | #define SSL_F_SSL_SET_FD 192 | ||
1598 | #define SSL_F_SSL_SET_PKEY 193 | ||
1599 | #define SSL_F_SSL_SET_PURPOSE 227 | ||
1600 | #define SSL_F_SSL_SET_RFD 194 | ||
1601 | #define SSL_F_SSL_SET_SESSION 195 | ||
1602 | #define SSL_F_SSL_SET_SESSION_ID_CONTEXT 218 | ||
1603 | #define SSL_F_SSL_SET_TRUST 228 | ||
1604 | #define SSL_F_SSL_SET_WFD 196 | ||
1605 | #define SSL_F_SSL_SHUTDOWN 224 | ||
1606 | #define SSL_F_SSL_UNDEFINED_FUNCTION 197 | ||
1607 | #define SSL_F_SSL_USE_CERTIFICATE 198 | ||
1608 | #define SSL_F_SSL_USE_CERTIFICATE_ASN1 199 | ||
1609 | #define SSL_F_SSL_USE_CERTIFICATE_FILE 200 | ||
1610 | #define SSL_F_SSL_USE_PRIVATEKEY 201 | ||
1611 | #define SSL_F_SSL_USE_PRIVATEKEY_ASN1 202 | ||
1612 | #define SSL_F_SSL_USE_PRIVATEKEY_FILE 203 | ||
1613 | #define SSL_F_SSL_USE_RSAPRIVATEKEY 204 | ||
1614 | #define SSL_F_SSL_USE_RSAPRIVATEKEY_ASN1 205 | ||
1615 | #define SSL_F_SSL_USE_RSAPRIVATEKEY_FILE 206 | ||
1616 | #define SSL_F_SSL_VERIFY_CERT_CHAIN 207 | ||
1617 | #define SSL_F_SSL_WRITE 208 | ||
1618 | #define SSL_F_TLS1_CHANGE_CIPHER_STATE 209 | ||
1619 | #define SSL_F_TLS1_ENC 210 | ||
1620 | #define SSL_F_TLS1_SETUP_KEY_BLOCK 211 | ||
1621 | #define SSL_F_WRITE_PENDING 212 | ||
1622 | |||
1623 | /* Reason codes. */ | ||
1624 | #define SSL_R_APP_DATA_IN_HANDSHAKE 100 | ||
1625 | #define SSL_R_ATTEMPT_TO_REUSE_SESSION_IN_DIFFERENT_CONTEXT 272 | ||
1626 | #define SSL_R_BAD_ALERT_RECORD 101 | ||
1627 | #define SSL_R_BAD_AUTHENTICATION_TYPE 102 | ||
1628 | #define SSL_R_BAD_CHANGE_CIPHER_SPEC 103 | ||
1629 | #define SSL_R_BAD_CHECKSUM 104 | ||
1630 | #define SSL_R_BAD_DATA_RETURNED_BY_CALLBACK 106 | ||
1631 | #define SSL_R_BAD_DECOMPRESSION 107 | ||
1632 | #define SSL_R_BAD_DH_G_LENGTH 108 | ||
1633 | #define SSL_R_BAD_DH_PUB_KEY_LENGTH 109 | ||
1634 | #define SSL_R_BAD_DH_P_LENGTH 110 | ||
1635 | #define SSL_R_BAD_DIGEST_LENGTH 111 | ||
1636 | #define SSL_R_BAD_DSA_SIGNATURE 112 | ||
1637 | #define SSL_R_BAD_HELLO_REQUEST 105 | ||
1638 | #define SSL_R_BAD_LENGTH 271 | ||
1639 | #define SSL_R_BAD_MAC_DECODE 113 | ||
1640 | #define SSL_R_BAD_MESSAGE_TYPE 114 | ||
1641 | #define SSL_R_BAD_PACKET_LENGTH 115 | ||
1642 | #define SSL_R_BAD_PROTOCOL_VERSION_NUMBER 116 | ||
1643 | #define SSL_R_BAD_RESPONSE_ARGUMENT 117 | ||
1644 | #define SSL_R_BAD_RSA_DECRYPT 118 | ||
1645 | #define SSL_R_BAD_RSA_ENCRYPT 119 | ||
1646 | #define SSL_R_BAD_RSA_E_LENGTH 120 | ||
1647 | #define SSL_R_BAD_RSA_MODULUS_LENGTH 121 | ||
1648 | #define SSL_R_BAD_RSA_SIGNATURE 122 | ||
1649 | #define SSL_R_BAD_SIGNATURE 123 | ||
1650 | #define SSL_R_BAD_SSL_FILETYPE 124 | ||
1651 | #define SSL_R_BAD_SSL_SESSION_ID_LENGTH 125 | ||
1652 | #define SSL_R_BAD_STATE 126 | ||
1653 | #define SSL_R_BAD_WRITE_RETRY 127 | ||
1654 | #define SSL_R_BIO_NOT_SET 128 | ||
1655 | #define SSL_R_BLOCK_CIPHER_PAD_IS_WRONG 129 | ||
1656 | #define SSL_R_BN_LIB 130 | ||
1657 | #define SSL_R_CA_DN_LENGTH_MISMATCH 131 | ||
1658 | #define SSL_R_CA_DN_TOO_LONG 132 | ||
1659 | #define SSL_R_CCS_RECEIVED_EARLY 133 | ||
1660 | #define SSL_R_CERTIFICATE_VERIFY_FAILED 134 | ||
1661 | #define SSL_R_CERT_LENGTH_MISMATCH 135 | ||
1662 | #define SSL_R_CHALLENGE_IS_DIFFERENT 136 | ||
1663 | #define SSL_R_CIPHER_CODE_WRONG_LENGTH 137 | ||
1664 | #define SSL_R_CIPHER_OR_HASH_UNAVAILABLE 138 | ||
1665 | #define SSL_R_CIPHER_TABLE_SRC_ERROR 139 | ||
1666 | #define SSL_R_COMPRESSED_LENGTH_TOO_LONG 140 | ||
1667 | #define SSL_R_COMPRESSION_FAILURE 141 | ||
1668 | #define SSL_R_COMPRESSION_LIBRARY_ERROR 142 | ||
1669 | #define SSL_R_CONNECTION_ID_IS_DIFFERENT 143 | ||
1670 | #define SSL_R_CONNECTION_TYPE_NOT_SET 144 | ||
1671 | #define SSL_R_DATA_BETWEEN_CCS_AND_FINISHED 145 | ||
1672 | #define SSL_R_DATA_LENGTH_TOO_LONG 146 | ||
1673 | #define SSL_R_DECRYPTION_FAILED 147 | ||
1674 | #define SSL_R_DECRYPTION_FAILED_OR_BAD_RECORD_MAC 1109 | ||
1675 | #define SSL_R_DH_PUBLIC_VALUE_LENGTH_IS_WRONG 148 | ||
1676 | #define SSL_R_DIGEST_CHECK_FAILED 149 | ||
1677 | #define SSL_R_ENCRYPTED_LENGTH_TOO_LONG 150 | ||
1678 | #define SSL_R_ERROR_GENERATING_TMP_RSA_KEY 1092 | ||
1679 | #define SSL_R_ERROR_IN_RECEIVED_CIPHER_LIST 151 | ||
1680 | #define SSL_R_EXCESSIVE_MESSAGE_SIZE 152 | ||
1681 | #define SSL_R_EXTRA_DATA_IN_MESSAGE 153 | ||
1682 | #define SSL_R_GOT_A_FIN_BEFORE_A_CCS 154 | ||
1683 | #define SSL_R_HTTPS_PROXY_REQUEST 155 | ||
1684 | #define SSL_R_HTTP_REQUEST 156 | ||
1685 | #define SSL_R_ILLEGAL_PADDING 1110 | ||
1686 | #define SSL_R_INVALID_CHALLENGE_LENGTH 158 | ||
1687 | #define SSL_R_INVALID_COMMAND 280 | ||
1688 | #define SSL_R_INVALID_PURPOSE 278 | ||
1689 | #define SSL_R_INVALID_TRUST 279 | ||
1690 | #define SSL_R_KEY_ARG_TOO_LONG 1112 | ||
1691 | #define SSL_R_KRB5 1104 | ||
1692 | #define SSL_R_KRB5_C_CC_PRINC 1094 | ||
1693 | #define SSL_R_KRB5_C_GET_CRED 1095 | ||
1694 | #define SSL_R_KRB5_C_INIT 1096 | ||
1695 | #define SSL_R_KRB5_C_MK_REQ 1097 | ||
1696 | #define SSL_R_KRB5_S_BAD_TICKET 1098 | ||
1697 | #define SSL_R_KRB5_S_INIT 1099 | ||
1698 | #define SSL_R_KRB5_S_RD_REQ 1108 | ||
1699 | #define SSL_R_KRB5_S_TKT_EXPIRED 1105 | ||
1700 | #define SSL_R_KRB5_S_TKT_NYV 1106 | ||
1701 | #define SSL_R_KRB5_S_TKT_SKEW 1107 | ||
1702 | #define SSL_R_LENGTH_MISMATCH 159 | ||
1703 | #define SSL_R_LENGTH_TOO_SHORT 160 | ||
1704 | #define SSL_R_LIBRARY_BUG 274 | ||
1705 | #define SSL_R_LIBRARY_HAS_NO_CIPHERS 161 | ||
1706 | #define SSL_R_MASTER_KEY_TOO_LONG 1112 | ||
1707 | #define SSL_R_MESSAGE_TOO_LONG 1111 | ||
1708 | #define SSL_R_MISSING_DH_DSA_CERT 162 | ||
1709 | #define SSL_R_MISSING_DH_KEY 163 | ||
1710 | #define SSL_R_MISSING_DH_RSA_CERT 164 | ||
1711 | #define SSL_R_MISSING_DSA_SIGNING_CERT 165 | ||
1712 | #define SSL_R_MISSING_EXPORT_TMP_DH_KEY 166 | ||
1713 | #define SSL_R_MISSING_EXPORT_TMP_RSA_KEY 167 | ||
1714 | #define SSL_R_MISSING_RSA_CERTIFICATE 168 | ||
1715 | #define SSL_R_MISSING_RSA_ENCRYPTING_CERT 169 | ||
1716 | #define SSL_R_MISSING_RSA_SIGNING_CERT 170 | ||
1717 | #define SSL_R_MISSING_TMP_DH_KEY 171 | ||
1718 | #define SSL_R_MISSING_TMP_RSA_KEY 172 | ||
1719 | #define SSL_R_MISSING_TMP_RSA_PKEY 173 | ||
1720 | #define SSL_R_MISSING_VERIFY_MESSAGE 174 | ||
1721 | #define SSL_R_NON_SSLV2_INITIAL_PACKET 175 | ||
1722 | #define SSL_R_NO_CERTIFICATES_RETURNED 176 | ||
1723 | #define SSL_R_NO_CERTIFICATE_ASSIGNED 177 | ||
1724 | #define SSL_R_NO_CERTIFICATE_RETURNED 178 | ||
1725 | #define SSL_R_NO_CERTIFICATE_SET 179 | ||
1726 | #define SSL_R_NO_CERTIFICATE_SPECIFIED 180 | ||
1727 | #define SSL_R_NO_CIPHERS_AVAILABLE 181 | ||
1728 | #define SSL_R_NO_CIPHERS_PASSED 182 | ||
1729 | #define SSL_R_NO_CIPHERS_SPECIFIED 183 | ||
1730 | #define SSL_R_NO_CIPHER_LIST 184 | ||
1731 | #define SSL_R_NO_CIPHER_MATCH 185 | ||
1732 | #define SSL_R_NO_CLIENT_CERT_RECEIVED 186 | ||
1733 | #define SSL_R_NO_COMPRESSION_SPECIFIED 187 | ||
1734 | #define SSL_R_NO_METHOD_SPECIFIED 188 | ||
1735 | #define SSL_R_NO_PRIVATEKEY 189 | ||
1736 | #define SSL_R_NO_PRIVATE_KEY_ASSIGNED 190 | ||
1737 | #define SSL_R_NO_PROTOCOLS_AVAILABLE 191 | ||
1738 | #define SSL_R_NO_PUBLICKEY 192 | ||
1739 | #define SSL_R_NO_SHARED_CIPHER 193 | ||
1740 | #define SSL_R_NO_VERIFY_CALLBACK 194 | ||
1741 | #define SSL_R_NULL_SSL_CTX 195 | ||
1742 | #define SSL_R_NULL_SSL_METHOD_PASSED 196 | ||
1743 | #define SSL_R_OLD_SESSION_CIPHER_NOT_RETURNED 197 | ||
1744 | #define SSL_R_PACKET_LENGTH_TOO_LONG 198 | ||
1745 | #define SSL_R_PATH_TOO_LONG 270 | ||
1746 | #define SSL_R_PEER_DID_NOT_RETURN_A_CERTIFICATE 199 | ||
1747 | #define SSL_R_PEER_ERROR 200 | ||
1748 | #define SSL_R_PEER_ERROR_CERTIFICATE 201 | ||
1749 | #define SSL_R_PEER_ERROR_NO_CERTIFICATE 202 | ||
1750 | #define SSL_R_PEER_ERROR_NO_CIPHER 203 | ||
1751 | #define SSL_R_PEER_ERROR_UNSUPPORTED_CERTIFICATE_TYPE 204 | ||
1752 | #define SSL_R_PRE_MAC_LENGTH_TOO_LONG 205 | ||
1753 | #define SSL_R_PROBLEMS_MAPPING_CIPHER_FUNCTIONS 206 | ||
1754 | #define SSL_R_PROTOCOL_IS_SHUTDOWN 207 | ||
1755 | #define SSL_R_PUBLIC_KEY_ENCRYPT_ERROR 208 | ||
1756 | #define SSL_R_PUBLIC_KEY_IS_NOT_RSA 209 | ||
1757 | #define SSL_R_PUBLIC_KEY_NOT_RSA 210 | ||
1758 | #define SSL_R_READ_BIO_NOT_SET 211 | ||
1759 | #define SSL_R_READ_WRONG_PACKET_TYPE 212 | ||
1760 | #define SSL_R_RECORD_LENGTH_MISMATCH 213 | ||
1761 | #define SSL_R_RECORD_TOO_LARGE 214 | ||
1762 | #define SSL_R_RECORD_TOO_SMALL 1093 | ||
1763 | #define SSL_R_REQUIRED_CIPHER_MISSING 215 | ||
1764 | #define SSL_R_REUSE_CERT_LENGTH_NOT_ZERO 216 | ||
1765 | #define SSL_R_REUSE_CERT_TYPE_NOT_ZERO 217 | ||
1766 | #define SSL_R_REUSE_CIPHER_LIST_NOT_ZERO 218 | ||
1767 | #define SSL_R_SESSION_ID_CONTEXT_UNINITIALIZED 277 | ||
1768 | #define SSL_R_SHORT_READ 219 | ||
1769 | #define SSL_R_SIGNATURE_FOR_NON_SIGNING_CERTIFICATE 220 | ||
1770 | #define SSL_R_SSL23_DOING_SESSION_ID_REUSE 221 | ||
1771 | #define SSL_R_SSL2_CONNECTION_ID_TOO_LONG 1114 | ||
1772 | #define SSL_R_SSL3_SESSION_ID_TOO_LONG 1113 | ||
1773 | #define SSL_R_SSL3_SESSION_ID_TOO_SHORT 222 | ||
1774 | #define SSL_R_SSLV3_ALERT_BAD_CERTIFICATE 1042 | ||
1775 | #define SSL_R_SSLV3_ALERT_BAD_RECORD_MAC 1020 | ||
1776 | #define SSL_R_SSLV3_ALERT_CERTIFICATE_EXPIRED 1045 | ||
1777 | #define SSL_R_SSLV3_ALERT_CERTIFICATE_REVOKED 1044 | ||
1778 | #define SSL_R_SSLV3_ALERT_CERTIFICATE_UNKNOWN 1046 | ||
1779 | #define SSL_R_SSLV3_ALERT_DECOMPRESSION_FAILURE 1030 | ||
1780 | #define SSL_R_SSLV3_ALERT_HANDSHAKE_FAILURE 1040 | ||
1781 | #define SSL_R_SSLV3_ALERT_ILLEGAL_PARAMETER 1047 | ||
1782 | #define SSL_R_SSLV3_ALERT_NO_CERTIFICATE 1041 | ||
1783 | #define SSL_R_SSLV3_ALERT_PEER_ERROR_CERTIFICATE 223 | ||
1784 | #define SSL_R_SSLV3_ALERT_PEER_ERROR_NO_CERTIFICATE 224 | ||
1785 | #define SSL_R_SSLV3_ALERT_PEER_ERROR_NO_CIPHER 225 | ||
1786 | #define SSL_R_SSLV3_ALERT_PEER_ERROR_UNSUPPORTED_CERTIFICATE_TYPE 226 | ||
1787 | #define SSL_R_SSLV3_ALERT_UNEXPECTED_MESSAGE 1010 | ||
1788 | #define SSL_R_SSLV3_ALERT_UNKNOWN_REMOTE_ERROR_TYPE 227 | ||
1789 | #define SSL_R_SSLV3_ALERT_UNSUPPORTED_CERTIFICATE 1043 | ||
1790 | #define SSL_R_SSL_CTX_HAS_NO_DEFAULT_SSL_VERSION 228 | ||
1791 | #define SSL_R_SSL_HANDSHAKE_FAILURE 229 | ||
1792 | #define SSL_R_SSL_LIBRARY_HAS_NO_CIPHERS 230 | ||
1793 | #define SSL_R_SSL_SESSION_ID_CALLBACK_FAILED 1102 | ||
1794 | #define SSL_R_SSL_SESSION_ID_CONFLICT 1103 | ||
1795 | #define SSL_R_SSL_SESSION_ID_CONTEXT_TOO_LONG 273 | ||
1796 | #define SSL_R_SSL_SESSION_ID_HAS_BAD_LENGTH 1101 | ||
1797 | #define SSL_R_SSL_SESSION_ID_IS_DIFFERENT 231 | ||
1798 | #define SSL_R_TLSV1_ALERT_ACCESS_DENIED 1049 | ||
1799 | #define SSL_R_TLSV1_ALERT_DECODE_ERROR 1050 | ||
1800 | #define SSL_R_TLSV1_ALERT_DECRYPTION_FAILED 1021 | ||
1801 | #define SSL_R_TLSV1_ALERT_DECRYPT_ERROR 1051 | ||
1802 | #define SSL_R_TLSV1_ALERT_EXPORT_RESTRICTION 1060 | ||
1803 | #define SSL_R_TLSV1_ALERT_INSUFFICIENT_SECURITY 1071 | ||
1804 | #define SSL_R_TLSV1_ALERT_INTERNAL_ERROR 1080 | ||
1805 | #define SSL_R_TLSV1_ALERT_NO_RENEGOTIATION 1100 | ||
1806 | #define SSL_R_TLSV1_ALERT_PROTOCOL_VERSION 1070 | ||
1807 | #define SSL_R_TLSV1_ALERT_RECORD_OVERFLOW 1022 | ||
1808 | #define SSL_R_TLSV1_ALERT_UNKNOWN_CA 1048 | ||
1809 | #define SSL_R_TLSV1_ALERT_USER_CANCELLED 1090 | ||
1810 | #define SSL_R_TLS_CLIENT_CERT_REQ_WITH_ANON_CIPHER 232 | ||
1811 | #define SSL_R_TLS_PEER_DID_NOT_RESPOND_WITH_CERTIFICATE_LIST 233 | ||
1812 | #define SSL_R_TLS_RSA_ENCRYPTED_VALUE_LENGTH_IS_WRONG 234 | ||
1813 | #define SSL_R_TRIED_TO_USE_UNSUPPORTED_CIPHER 235 | ||
1814 | #define SSL_R_UNABLE_TO_DECODE_DH_CERTS 236 | ||
1815 | #define SSL_R_UNABLE_TO_EXTRACT_PUBLIC_KEY 237 | ||
1816 | #define SSL_R_UNABLE_TO_FIND_DH_PARAMETERS 238 | ||
1817 | #define SSL_R_UNABLE_TO_FIND_PUBLIC_KEY_PARAMETERS 239 | ||
1818 | #define SSL_R_UNABLE_TO_FIND_SSL_METHOD 240 | ||
1819 | #define SSL_R_UNABLE_TO_LOAD_SSL2_MD5_ROUTINES 241 | ||
1820 | #define SSL_R_UNABLE_TO_LOAD_SSL3_MD5_ROUTINES 242 | ||
1821 | #define SSL_R_UNABLE_TO_LOAD_SSL3_SHA1_ROUTINES 243 | ||
1822 | #define SSL_R_UNEXPECTED_MESSAGE 244 | ||
1823 | #define SSL_R_UNEXPECTED_RECORD 245 | ||
1824 | #define SSL_R_UNINITIALIZED 276 | ||
1825 | #define SSL_R_UNKNOWN_ALERT_TYPE 246 | ||
1826 | #define SSL_R_UNKNOWN_CERTIFICATE_TYPE 247 | ||
1827 | #define SSL_R_UNKNOWN_CIPHER_RETURNED 248 | ||
1828 | #define SSL_R_UNKNOWN_CIPHER_TYPE 249 | ||
1829 | #define SSL_R_UNKNOWN_KEY_EXCHANGE_TYPE 250 | ||
1830 | #define SSL_R_UNKNOWN_PKEY_TYPE 251 | ||
1831 | #define SSL_R_UNKNOWN_PROTOCOL 252 | ||
1832 | #define SSL_R_UNKNOWN_REMOTE_ERROR_TYPE 253 | ||
1833 | #define SSL_R_UNKNOWN_SSL_VERSION 254 | ||
1834 | #define SSL_R_UNKNOWN_STATE 255 | ||
1835 | #define SSL_R_UNSUPPORTED_CIPHER 256 | ||
1836 | #define SSL_R_UNSUPPORTED_COMPRESSION_ALGORITHM 257 | ||
1837 | #define SSL_R_UNSUPPORTED_OPTION 1091 | ||
1838 | #define SSL_R_UNSUPPORTED_PROTOCOL 258 | ||
1839 | #define SSL_R_UNSUPPORTED_SSL_VERSION 259 | ||
1840 | #define SSL_R_WRITE_BIO_NOT_SET 260 | ||
1841 | #define SSL_R_WRONG_CIPHER_RETURNED 261 | ||
1842 | #define SSL_R_WRONG_MESSAGE_TYPE 262 | ||
1843 | #define SSL_R_WRONG_NUMBER_OF_KEY_BITS 263 | ||
1844 | #define SSL_R_WRONG_SIGNATURE_LENGTH 264 | ||
1845 | #define SSL_R_WRONG_SIGNATURE_SIZE 265 | ||
1846 | #define SSL_R_WRONG_SSL_VERSION 266 | ||
1847 | #define SSL_R_WRONG_VERSION_NUMBER 267 | ||
1848 | #define SSL_R_X509_LIB 268 | ||
1849 | #define SSL_R_X509_VERIFICATION_SETUP_PROBLEMS 269 | ||
1850 | |||
1851 | #ifdef __cplusplus | ||
1852 | } | ||
1853 | #endif | ||
1854 | #endif | ||
diff --git a/src/lib/libssl/ssl2.h b/src/lib/libssl/ssl2.h deleted file mode 100644 index 99a52ea0dd..0000000000 --- a/src/lib/libssl/ssl2.h +++ /dev/null | |||
@@ -1,268 +0,0 @@ | |||
1 | /* ssl/ssl2.h */ | ||
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 | #ifndef HEADER_SSL2_H | ||
60 | #define HEADER_SSL2_H | ||
61 | |||
62 | #ifdef __cplusplus | ||
63 | extern "C" { | ||
64 | #endif | ||
65 | |||
66 | /* Protocol Version Codes */ | ||
67 | #define SSL2_VERSION 0x0002 | ||
68 | #define SSL2_VERSION_MAJOR 0x00 | ||
69 | #define SSL2_VERSION_MINOR 0x02 | ||
70 | /* #define SSL2_CLIENT_VERSION 0x0002 */ | ||
71 | /* #define SSL2_SERVER_VERSION 0x0002 */ | ||
72 | |||
73 | /* Protocol Message Codes */ | ||
74 | #define SSL2_MT_ERROR 0 | ||
75 | #define SSL2_MT_CLIENT_HELLO 1 | ||
76 | #define SSL2_MT_CLIENT_MASTER_KEY 2 | ||
77 | #define SSL2_MT_CLIENT_FINISHED 3 | ||
78 | #define SSL2_MT_SERVER_HELLO 4 | ||
79 | #define SSL2_MT_SERVER_VERIFY 5 | ||
80 | #define SSL2_MT_SERVER_FINISHED 6 | ||
81 | #define SSL2_MT_REQUEST_CERTIFICATE 7 | ||
82 | #define SSL2_MT_CLIENT_CERTIFICATE 8 | ||
83 | |||
84 | /* Error Message Codes */ | ||
85 | #define SSL2_PE_UNDEFINED_ERROR 0x0000 | ||
86 | #define SSL2_PE_NO_CIPHER 0x0001 | ||
87 | #define SSL2_PE_NO_CERTIFICATE 0x0002 | ||
88 | #define SSL2_PE_BAD_CERTIFICATE 0x0004 | ||
89 | #define SSL2_PE_UNSUPPORTED_CERTIFICATE_TYPE 0x0006 | ||
90 | |||
91 | /* Cipher Kind Values */ | ||
92 | #define SSL2_CK_NULL_WITH_MD5 0x02000000 /* v3 */ | ||
93 | #define SSL2_CK_RC4_128_WITH_MD5 0x02010080 | ||
94 | #define SSL2_CK_RC4_128_EXPORT40_WITH_MD5 0x02020080 | ||
95 | #define SSL2_CK_RC2_128_CBC_WITH_MD5 0x02030080 | ||
96 | #define SSL2_CK_RC2_128_CBC_EXPORT40_WITH_MD5 0x02040080 | ||
97 | #define SSL2_CK_IDEA_128_CBC_WITH_MD5 0x02050080 | ||
98 | #define SSL2_CK_DES_64_CBC_WITH_MD5 0x02060040 | ||
99 | #define SSL2_CK_DES_64_CBC_WITH_SHA 0x02060140 /* v3 */ | ||
100 | #define SSL2_CK_DES_192_EDE3_CBC_WITH_MD5 0x020700c0 | ||
101 | #define SSL2_CK_DES_192_EDE3_CBC_WITH_SHA 0x020701c0 /* v3 */ | ||
102 | #define SSL2_CK_RC4_64_WITH_MD5 0x02080080 /* MS hack */ | ||
103 | |||
104 | #define SSL2_CK_DES_64_CFB64_WITH_MD5_1 0x02ff0800 /* SSLeay */ | ||
105 | #define SSL2_CK_NULL 0x02ff0810 /* SSLeay */ | ||
106 | |||
107 | #define SSL2_TXT_DES_64_CFB64_WITH_MD5_1 "DES-CFB-M1" | ||
108 | #define SSL2_TXT_NULL_WITH_MD5 "NULL-MD5" | ||
109 | #define SSL2_TXT_RC4_128_WITH_MD5 "RC4-MD5" | ||
110 | #define SSL2_TXT_RC4_128_EXPORT40_WITH_MD5 "EXP-RC4-MD5" | ||
111 | #define SSL2_TXT_RC2_128_CBC_WITH_MD5 "RC2-CBC-MD5" | ||
112 | #define SSL2_TXT_RC2_128_CBC_EXPORT40_WITH_MD5 "EXP-RC2-CBC-MD5" | ||
113 | #define SSL2_TXT_IDEA_128_CBC_WITH_MD5 "IDEA-CBC-MD5" | ||
114 | #define SSL2_TXT_DES_64_CBC_WITH_MD5 "DES-CBC-MD5" | ||
115 | #define SSL2_TXT_DES_64_CBC_WITH_SHA "DES-CBC-SHA" | ||
116 | #define SSL2_TXT_DES_192_EDE3_CBC_WITH_MD5 "DES-CBC3-MD5" | ||
117 | #define SSL2_TXT_DES_192_EDE3_CBC_WITH_SHA "DES-CBC3-SHA" | ||
118 | #define SSL2_TXT_RC4_64_WITH_MD5 "RC4-64-MD5" | ||
119 | |||
120 | #define SSL2_TXT_NULL "NULL" | ||
121 | |||
122 | /* Flags for the SSL_CIPHER.algorithm2 field */ | ||
123 | #define SSL2_CF_5_BYTE_ENC 0x01 | ||
124 | #define SSL2_CF_8_BYTE_ENC 0x02 | ||
125 | |||
126 | /* Certificate Type Codes */ | ||
127 | #define SSL2_CT_X509_CERTIFICATE 0x01 | ||
128 | |||
129 | /* Authentication Type Code */ | ||
130 | #define SSL2_AT_MD5_WITH_RSA_ENCRYPTION 0x01 | ||
131 | |||
132 | #define SSL2_MAX_SSL_SESSION_ID_LENGTH 32 | ||
133 | |||
134 | /* Upper/Lower Bounds */ | ||
135 | #define SSL2_MAX_MASTER_KEY_LENGTH_IN_BITS 256 | ||
136 | #ifdef OPENSSL_SYS_MPE | ||
137 | #define SSL2_MAX_RECORD_LENGTH_2_BYTE_HEADER 29998u | ||
138 | #else | ||
139 | #define SSL2_MAX_RECORD_LENGTH_2_BYTE_HEADER 32767u /* 2^15-1 */ | ||
140 | #endif | ||
141 | #define SSL2_MAX_RECORD_LENGTH_3_BYTE_HEADER 16383 /* 2^14-1 */ | ||
142 | |||
143 | #define SSL2_CHALLENGE_LENGTH 16 | ||
144 | /*#define SSL2_CHALLENGE_LENGTH 32 */ | ||
145 | #define SSL2_MIN_CHALLENGE_LENGTH 16 | ||
146 | #define SSL2_MAX_CHALLENGE_LENGTH 32 | ||
147 | #define SSL2_CONNECTION_ID_LENGTH 16 | ||
148 | #define SSL2_MAX_CONNECTION_ID_LENGTH 16 | ||
149 | #define SSL2_SSL_SESSION_ID_LENGTH 16 | ||
150 | #define SSL2_MAX_CERT_CHALLENGE_LENGTH 32 | ||
151 | #define SSL2_MIN_CERT_CHALLENGE_LENGTH 16 | ||
152 | #define SSL2_MAX_KEY_MATERIAL_LENGTH 24 | ||
153 | |||
154 | #ifndef HEADER_SSL_LOCL_H | ||
155 | #define CERT char | ||
156 | #endif | ||
157 | |||
158 | typedef struct ssl2_state_st | ||
159 | { | ||
160 | int three_byte_header; | ||
161 | int clear_text; /* clear text */ | ||
162 | int escape; /* not used in SSLv2 */ | ||
163 | int ssl2_rollback; /* used if SSLv23 rolled back to SSLv2 */ | ||
164 | |||
165 | /* non-blocking io info, used to make sure the same | ||
166 | * args were passwd */ | ||
167 | unsigned int wnum; /* number of bytes sent so far */ | ||
168 | int wpend_tot; | ||
169 | const unsigned char *wpend_buf; | ||
170 | |||
171 | int wpend_off; /* offset to data to write */ | ||
172 | int wpend_len; /* number of bytes passwd to write */ | ||
173 | int wpend_ret; /* number of bytes to return to caller */ | ||
174 | |||
175 | /* buffer raw data */ | ||
176 | int rbuf_left; | ||
177 | int rbuf_offs; | ||
178 | unsigned char *rbuf; | ||
179 | unsigned char *wbuf; | ||
180 | |||
181 | unsigned char *write_ptr;/* used to point to the start due to | ||
182 | * 2/3 byte header. */ | ||
183 | |||
184 | unsigned int padding; | ||
185 | unsigned int rlength; /* passed to ssl2_enc */ | ||
186 | int ract_data_length; /* Set when things are encrypted. */ | ||
187 | unsigned int wlength; /* passed to ssl2_enc */ | ||
188 | int wact_data_length; /* Set when things are decrypted. */ | ||
189 | unsigned char *ract_data; | ||
190 | unsigned char *wact_data; | ||
191 | unsigned char *mac_data; | ||
192 | |||
193 | unsigned char *read_key; | ||
194 | unsigned char *write_key; | ||
195 | |||
196 | /* Stuff specifically to do with this SSL session */ | ||
197 | unsigned int challenge_length; | ||
198 | unsigned char challenge[SSL2_MAX_CHALLENGE_LENGTH]; | ||
199 | unsigned int conn_id_length; | ||
200 | unsigned char conn_id[SSL2_MAX_CONNECTION_ID_LENGTH]; | ||
201 | unsigned int key_material_length; | ||
202 | unsigned char key_material[SSL2_MAX_KEY_MATERIAL_LENGTH*2]; | ||
203 | |||
204 | unsigned long read_sequence; | ||
205 | unsigned long write_sequence; | ||
206 | |||
207 | struct { | ||
208 | unsigned int conn_id_length; | ||
209 | unsigned int cert_type; | ||
210 | unsigned int cert_length; | ||
211 | unsigned int csl; | ||
212 | unsigned int clear; | ||
213 | unsigned int enc; | ||
214 | unsigned char ccl[SSL2_MAX_CERT_CHALLENGE_LENGTH]; | ||
215 | unsigned int cipher_spec_length; | ||
216 | unsigned int session_id_length; | ||
217 | unsigned int clen; | ||
218 | unsigned int rlen; | ||
219 | } tmp; | ||
220 | } SSL2_STATE; | ||
221 | |||
222 | /* SSLv2 */ | ||
223 | /* client */ | ||
224 | #define SSL2_ST_SEND_CLIENT_HELLO_A (0x10|SSL_ST_CONNECT) | ||
225 | #define SSL2_ST_SEND_CLIENT_HELLO_B (0x11|SSL_ST_CONNECT) | ||
226 | #define SSL2_ST_GET_SERVER_HELLO_A (0x20|SSL_ST_CONNECT) | ||
227 | #define SSL2_ST_GET_SERVER_HELLO_B (0x21|SSL_ST_CONNECT) | ||
228 | #define SSL2_ST_SEND_CLIENT_MASTER_KEY_A (0x30|SSL_ST_CONNECT) | ||
229 | #define SSL2_ST_SEND_CLIENT_MASTER_KEY_B (0x31|SSL_ST_CONNECT) | ||
230 | #define SSL2_ST_SEND_CLIENT_FINISHED_A (0x40|SSL_ST_CONNECT) | ||
231 | #define SSL2_ST_SEND_CLIENT_FINISHED_B (0x41|SSL_ST_CONNECT) | ||
232 | #define SSL2_ST_SEND_CLIENT_CERTIFICATE_A (0x50|SSL_ST_CONNECT) | ||
233 | #define SSL2_ST_SEND_CLIENT_CERTIFICATE_B (0x51|SSL_ST_CONNECT) | ||
234 | #define SSL2_ST_SEND_CLIENT_CERTIFICATE_C (0x52|SSL_ST_CONNECT) | ||
235 | #define SSL2_ST_SEND_CLIENT_CERTIFICATE_D (0x53|SSL_ST_CONNECT) | ||
236 | #define SSL2_ST_GET_SERVER_VERIFY_A (0x60|SSL_ST_CONNECT) | ||
237 | #define SSL2_ST_GET_SERVER_VERIFY_B (0x61|SSL_ST_CONNECT) | ||
238 | #define SSL2_ST_GET_SERVER_FINISHED_A (0x70|SSL_ST_CONNECT) | ||
239 | #define SSL2_ST_GET_SERVER_FINISHED_B (0x71|SSL_ST_CONNECT) | ||
240 | #define SSL2_ST_CLIENT_START_ENCRYPTION (0x80|SSL_ST_CONNECT) | ||
241 | #define SSL2_ST_X509_GET_CLIENT_CERTIFICATE (0x90|SSL_ST_CONNECT) | ||
242 | /* server */ | ||
243 | #define SSL2_ST_GET_CLIENT_HELLO_A (0x10|SSL_ST_ACCEPT) | ||
244 | #define SSL2_ST_GET_CLIENT_HELLO_B (0x11|SSL_ST_ACCEPT) | ||
245 | #define SSL2_ST_GET_CLIENT_HELLO_C (0x12|SSL_ST_ACCEPT) | ||
246 | #define SSL2_ST_SEND_SERVER_HELLO_A (0x20|SSL_ST_ACCEPT) | ||
247 | #define SSL2_ST_SEND_SERVER_HELLO_B (0x21|SSL_ST_ACCEPT) | ||
248 | #define SSL2_ST_GET_CLIENT_MASTER_KEY_A (0x30|SSL_ST_ACCEPT) | ||
249 | #define SSL2_ST_GET_CLIENT_MASTER_KEY_B (0x31|SSL_ST_ACCEPT) | ||
250 | #define SSL2_ST_SEND_SERVER_VERIFY_A (0x40|SSL_ST_ACCEPT) | ||
251 | #define SSL2_ST_SEND_SERVER_VERIFY_B (0x41|SSL_ST_ACCEPT) | ||
252 | #define SSL2_ST_SEND_SERVER_VERIFY_C (0x42|SSL_ST_ACCEPT) | ||
253 | #define SSL2_ST_GET_CLIENT_FINISHED_A (0x50|SSL_ST_ACCEPT) | ||
254 | #define SSL2_ST_GET_CLIENT_FINISHED_B (0x51|SSL_ST_ACCEPT) | ||
255 | #define SSL2_ST_SEND_SERVER_FINISHED_A (0x60|SSL_ST_ACCEPT) | ||
256 | #define SSL2_ST_SEND_SERVER_FINISHED_B (0x61|SSL_ST_ACCEPT) | ||
257 | #define SSL2_ST_SEND_REQUEST_CERTIFICATE_A (0x70|SSL_ST_ACCEPT) | ||
258 | #define SSL2_ST_SEND_REQUEST_CERTIFICATE_B (0x71|SSL_ST_ACCEPT) | ||
259 | #define SSL2_ST_SEND_REQUEST_CERTIFICATE_C (0x72|SSL_ST_ACCEPT) | ||
260 | #define SSL2_ST_SEND_REQUEST_CERTIFICATE_D (0x73|SSL_ST_ACCEPT) | ||
261 | #define SSL2_ST_SERVER_START_ENCRYPTION (0x80|SSL_ST_ACCEPT) | ||
262 | #define SSL2_ST_X509_GET_SERVER_CERTIFICATE (0x90|SSL_ST_ACCEPT) | ||
263 | |||
264 | #ifdef __cplusplus | ||
265 | } | ||
266 | #endif | ||
267 | #endif | ||
268 | |||
diff --git a/src/lib/libssl/ssl23.h b/src/lib/libssl/ssl23.h deleted file mode 100644 index d3228983c7..0000000000 --- a/src/lib/libssl/ssl23.h +++ /dev/null | |||
@@ -1,83 +0,0 @@ | |||
1 | /* ssl/ssl23.h */ | ||
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 | #ifndef HEADER_SSL23_H | ||
60 | #define HEADER_SSL23_H | ||
61 | |||
62 | #ifdef __cplusplus | ||
63 | extern "C" { | ||
64 | #endif | ||
65 | |||
66 | /*client */ | ||
67 | /* write to server */ | ||
68 | #define SSL23_ST_CW_CLNT_HELLO_A (0x210|SSL_ST_CONNECT) | ||
69 | #define SSL23_ST_CW_CLNT_HELLO_B (0x211|SSL_ST_CONNECT) | ||
70 | /* read from server */ | ||
71 | #define SSL23_ST_CR_SRVR_HELLO_A (0x220|SSL_ST_CONNECT) | ||
72 | #define SSL23_ST_CR_SRVR_HELLO_B (0x221|SSL_ST_CONNECT) | ||
73 | |||
74 | /* server */ | ||
75 | /* read from client */ | ||
76 | #define SSL23_ST_SR_CLNT_HELLO_A (0x210|SSL_ST_ACCEPT) | ||
77 | #define SSL23_ST_SR_CLNT_HELLO_B (0x211|SSL_ST_ACCEPT) | ||
78 | |||
79 | #ifdef __cplusplus | ||
80 | } | ||
81 | #endif | ||
82 | #endif | ||
83 | |||
diff --git a/src/lib/libssl/ssl3.h b/src/lib/libssl/ssl3.h deleted file mode 100644 index 1153aeda74..0000000000 --- a/src/lib/libssl/ssl3.h +++ /dev/null | |||
@@ -1,526 +0,0 @@ | |||
1 | /* ssl/ssl3.h */ | ||
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-2002 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 | #ifndef HEADER_SSL3_H | ||
113 | #define HEADER_SSL3_H | ||
114 | |||
115 | #ifndef OPENSSL_NO_COMP | ||
116 | #include <openssl/comp.h> | ||
117 | #endif | ||
118 | #include <openssl/buffer.h> | ||
119 | #include <openssl/evp.h> | ||
120 | #include <openssl/ssl.h> | ||
121 | |||
122 | #ifdef __cplusplus | ||
123 | extern "C" { | ||
124 | #endif | ||
125 | |||
126 | #define SSL3_CK_RSA_NULL_MD5 0x03000001 | ||
127 | #define SSL3_CK_RSA_NULL_SHA 0x03000002 | ||
128 | #define SSL3_CK_RSA_RC4_40_MD5 0x03000003 | ||
129 | #define SSL3_CK_RSA_RC4_128_MD5 0x03000004 | ||
130 | #define SSL3_CK_RSA_RC4_128_SHA 0x03000005 | ||
131 | #define SSL3_CK_RSA_RC2_40_MD5 0x03000006 | ||
132 | #define SSL3_CK_RSA_IDEA_128_SHA 0x03000007 | ||
133 | #define SSL3_CK_RSA_DES_40_CBC_SHA 0x03000008 | ||
134 | #define SSL3_CK_RSA_DES_64_CBC_SHA 0x03000009 | ||
135 | #define SSL3_CK_RSA_DES_192_CBC3_SHA 0x0300000A | ||
136 | |||
137 | #define SSL3_CK_DH_DSS_DES_40_CBC_SHA 0x0300000B | ||
138 | #define SSL3_CK_DH_DSS_DES_64_CBC_SHA 0x0300000C | ||
139 | #define SSL3_CK_DH_DSS_DES_192_CBC3_SHA 0x0300000D | ||
140 | #define SSL3_CK_DH_RSA_DES_40_CBC_SHA 0x0300000E | ||
141 | #define SSL3_CK_DH_RSA_DES_64_CBC_SHA 0x0300000F | ||
142 | #define SSL3_CK_DH_RSA_DES_192_CBC3_SHA 0x03000010 | ||
143 | |||
144 | #define SSL3_CK_EDH_DSS_DES_40_CBC_SHA 0x03000011 | ||
145 | #define SSL3_CK_EDH_DSS_DES_64_CBC_SHA 0x03000012 | ||
146 | #define SSL3_CK_EDH_DSS_DES_192_CBC3_SHA 0x03000013 | ||
147 | #define SSL3_CK_EDH_RSA_DES_40_CBC_SHA 0x03000014 | ||
148 | #define SSL3_CK_EDH_RSA_DES_64_CBC_SHA 0x03000015 | ||
149 | #define SSL3_CK_EDH_RSA_DES_192_CBC3_SHA 0x03000016 | ||
150 | |||
151 | #define SSL3_CK_ADH_RC4_40_MD5 0x03000017 | ||
152 | #define SSL3_CK_ADH_RC4_128_MD5 0x03000018 | ||
153 | #define SSL3_CK_ADH_DES_40_CBC_SHA 0x03000019 | ||
154 | #define SSL3_CK_ADH_DES_64_CBC_SHA 0x0300001A | ||
155 | #define SSL3_CK_ADH_DES_192_CBC_SHA 0x0300001B | ||
156 | |||
157 | #define SSL3_CK_FZA_DMS_NULL_SHA 0x0300001C | ||
158 | #define SSL3_CK_FZA_DMS_FZA_SHA 0x0300001D | ||
159 | #if 0 /* Because it clashes with KRB5, is never used any more, and is safe | ||
160 | to remove according to David Hopwood <david.hopwood@zetnet.co.uk> | ||
161 | of the ietf-tls list */ | ||
162 | #define SSL3_CK_FZA_DMS_RC4_SHA 0x0300001E | ||
163 | #endif | ||
164 | |||
165 | /* VRS Additional Kerberos5 entries | ||
166 | */ | ||
167 | #define SSL3_CK_KRB5_DES_64_CBC_SHA 0x0300001E | ||
168 | #define SSL3_CK_KRB5_DES_192_CBC3_SHA 0x0300001F | ||
169 | #define SSL3_CK_KRB5_RC4_128_SHA 0x03000020 | ||
170 | #define SSL3_CK_KRB5_IDEA_128_CBC_SHA 0x03000021 | ||
171 | #define SSL3_CK_KRB5_DES_64_CBC_MD5 0x03000022 | ||
172 | #define SSL3_CK_KRB5_DES_192_CBC3_MD5 0x03000023 | ||
173 | #define SSL3_CK_KRB5_RC4_128_MD5 0x03000024 | ||
174 | #define SSL3_CK_KRB5_IDEA_128_CBC_MD5 0x03000025 | ||
175 | |||
176 | #define SSL3_CK_KRB5_DES_40_CBC_SHA 0x03000026 | ||
177 | #define SSL3_CK_KRB5_RC2_40_CBC_SHA 0x03000027 | ||
178 | #define SSL3_CK_KRB5_RC4_40_SHA 0x03000028 | ||
179 | #define SSL3_CK_KRB5_DES_40_CBC_MD5 0x03000029 | ||
180 | #define SSL3_CK_KRB5_RC2_40_CBC_MD5 0x0300002A | ||
181 | #define SSL3_CK_KRB5_RC4_40_MD5 0x0300002B | ||
182 | |||
183 | #define SSL3_TXT_RSA_NULL_MD5 "NULL-MD5" | ||
184 | #define SSL3_TXT_RSA_NULL_SHA "NULL-SHA" | ||
185 | #define SSL3_TXT_RSA_RC4_40_MD5 "EXP-RC4-MD5" | ||
186 | #define SSL3_TXT_RSA_RC4_128_MD5 "RC4-MD5" | ||
187 | #define SSL3_TXT_RSA_RC4_128_SHA "RC4-SHA" | ||
188 | #define SSL3_TXT_RSA_RC2_40_MD5 "EXP-RC2-CBC-MD5" | ||
189 | #define SSL3_TXT_RSA_IDEA_128_SHA "IDEA-CBC-SHA" | ||
190 | #define SSL3_TXT_RSA_DES_40_CBC_SHA "EXP-DES-CBC-SHA" | ||
191 | #define SSL3_TXT_RSA_DES_64_CBC_SHA "DES-CBC-SHA" | ||
192 | #define SSL3_TXT_RSA_DES_192_CBC3_SHA "DES-CBC3-SHA" | ||
193 | |||
194 | #define SSL3_TXT_DH_DSS_DES_40_CBC_SHA "EXP-DH-DSS-DES-CBC-SHA" | ||
195 | #define SSL3_TXT_DH_DSS_DES_64_CBC_SHA "DH-DSS-DES-CBC-SHA" | ||
196 | #define SSL3_TXT_DH_DSS_DES_192_CBC3_SHA "DH-DSS-DES-CBC3-SHA" | ||
197 | #define SSL3_TXT_DH_RSA_DES_40_CBC_SHA "EXP-DH-RSA-DES-CBC-SHA" | ||
198 | #define SSL3_TXT_DH_RSA_DES_64_CBC_SHA "DH-RSA-DES-CBC-SHA" | ||
199 | #define SSL3_TXT_DH_RSA_DES_192_CBC3_SHA "DH-RSA-DES-CBC3-SHA" | ||
200 | |||
201 | #define SSL3_TXT_EDH_DSS_DES_40_CBC_SHA "EXP-EDH-DSS-DES-CBC-SHA" | ||
202 | #define SSL3_TXT_EDH_DSS_DES_64_CBC_SHA "EDH-DSS-DES-CBC-SHA" | ||
203 | #define SSL3_TXT_EDH_DSS_DES_192_CBC3_SHA "EDH-DSS-DES-CBC3-SHA" | ||
204 | #define SSL3_TXT_EDH_RSA_DES_40_CBC_SHA "EXP-EDH-RSA-DES-CBC-SHA" | ||
205 | #define SSL3_TXT_EDH_RSA_DES_64_CBC_SHA "EDH-RSA-DES-CBC-SHA" | ||
206 | #define SSL3_TXT_EDH_RSA_DES_192_CBC3_SHA "EDH-RSA-DES-CBC3-SHA" | ||
207 | |||
208 | #define SSL3_TXT_ADH_RC4_40_MD5 "EXP-ADH-RC4-MD5" | ||
209 | #define SSL3_TXT_ADH_RC4_128_MD5 "ADH-RC4-MD5" | ||
210 | #define SSL3_TXT_ADH_DES_40_CBC_SHA "EXP-ADH-DES-CBC-SHA" | ||
211 | #define SSL3_TXT_ADH_DES_64_CBC_SHA "ADH-DES-CBC-SHA" | ||
212 | #define SSL3_TXT_ADH_DES_192_CBC_SHA "ADH-DES-CBC3-SHA" | ||
213 | |||
214 | #define SSL3_TXT_FZA_DMS_NULL_SHA "FZA-NULL-SHA" | ||
215 | #define SSL3_TXT_FZA_DMS_FZA_SHA "FZA-FZA-CBC-SHA" | ||
216 | #define SSL3_TXT_FZA_DMS_RC4_SHA "FZA-RC4-SHA" | ||
217 | |||
218 | #define SSL3_TXT_KRB5_DES_64_CBC_SHA "KRB5-DES-CBC-SHA" | ||
219 | #define SSL3_TXT_KRB5_DES_192_CBC3_SHA "KRB5-DES-CBC3-SHA" | ||
220 | #define SSL3_TXT_KRB5_RC4_128_SHA "KRB5-RC4-SHA" | ||
221 | #define SSL3_TXT_KRB5_IDEA_128_CBC_SHA "KRB5-IDEA-CBC-SHA" | ||
222 | #define SSL3_TXT_KRB5_DES_64_CBC_MD5 "KRB5-DES-CBC-MD5" | ||
223 | #define SSL3_TXT_KRB5_DES_192_CBC3_MD5 "KRB5-DES-CBC3-MD5" | ||
224 | #define SSL3_TXT_KRB5_RC4_128_MD5 "KRB5-RC4-MD5" | ||
225 | #define SSL3_TXT_KRB5_IDEA_128_CBC_MD5 "KRB5-IDEA-CBC-MD5" | ||
226 | |||
227 | #define SSL3_TXT_KRB5_DES_40_CBC_SHA "EXP-KRB5-DES-CBC-SHA" | ||
228 | #define SSL3_TXT_KRB5_RC2_40_CBC_SHA "EXP-KRB5-RC2-CBC-SHA" | ||
229 | #define SSL3_TXT_KRB5_RC4_40_SHA "EXP-KRB5-RC4-SHA" | ||
230 | #define SSL3_TXT_KRB5_DES_40_CBC_MD5 "EXP-KRB5-DES-CBC-MD5" | ||
231 | #define SSL3_TXT_KRB5_RC2_40_CBC_MD5 "EXP-KRB5-RC2-CBC-MD5" | ||
232 | #define SSL3_TXT_KRB5_RC4_40_MD5 "EXP-KRB5-RC4-MD5" | ||
233 | |||
234 | #define SSL3_SSL_SESSION_ID_LENGTH 32 | ||
235 | #define SSL3_MAX_SSL_SESSION_ID_LENGTH 32 | ||
236 | |||
237 | #define SSL3_MASTER_SECRET_SIZE 48 | ||
238 | #define SSL3_RANDOM_SIZE 32 | ||
239 | #define SSL3_SESSION_ID_SIZE 32 | ||
240 | #define SSL3_RT_HEADER_LENGTH 5 | ||
241 | |||
242 | /* Due to MS stuffing up, this can change.... */ | ||
243 | #if defined(OPENSSL_SYS_WIN16) || \ | ||
244 | (defined(OPENSSL_SYS_MSDOS) && !defined(OPENSSL_SYS_WIN32)) | ||
245 | #define SSL3_RT_MAX_EXTRA (14000) | ||
246 | #else | ||
247 | #define SSL3_RT_MAX_EXTRA (16384) | ||
248 | #endif | ||
249 | |||
250 | #define SSL3_RT_MAX_PLAIN_LENGTH 16384 | ||
251 | #define SSL3_RT_MAX_COMPRESSED_LENGTH (1024+SSL3_RT_MAX_PLAIN_LENGTH) | ||
252 | #define SSL3_RT_MAX_ENCRYPTED_LENGTH (1024+SSL3_RT_MAX_COMPRESSED_LENGTH) | ||
253 | #define SSL3_RT_MAX_PACKET_SIZE (SSL3_RT_MAX_ENCRYPTED_LENGTH+SSL3_RT_HEADER_LENGTH) | ||
254 | #define SSL3_RT_MAX_DATA_SIZE (1024*1024) | ||
255 | |||
256 | #define SSL3_MD_CLIENT_FINISHED_CONST "\x43\x4C\x4E\x54" | ||
257 | #define SSL3_MD_SERVER_FINISHED_CONST "\x53\x52\x56\x52" | ||
258 | |||
259 | #define SSL3_VERSION 0x0300 | ||
260 | #define SSL3_VERSION_MAJOR 0x03 | ||
261 | #define SSL3_VERSION_MINOR 0x00 | ||
262 | |||
263 | #define SSL3_RT_CHANGE_CIPHER_SPEC 20 | ||
264 | #define SSL3_RT_ALERT 21 | ||
265 | #define SSL3_RT_HANDSHAKE 22 | ||
266 | #define SSL3_RT_APPLICATION_DATA 23 | ||
267 | |||
268 | #define SSL3_AL_WARNING 1 | ||
269 | #define SSL3_AL_FATAL 2 | ||
270 | |||
271 | #define SSL3_AD_CLOSE_NOTIFY 0 | ||
272 | #define SSL3_AD_UNEXPECTED_MESSAGE 10 /* fatal */ | ||
273 | #define SSL3_AD_BAD_RECORD_MAC 20 /* fatal */ | ||
274 | #define SSL3_AD_DECOMPRESSION_FAILURE 30 /* fatal */ | ||
275 | #define SSL3_AD_HANDSHAKE_FAILURE 40 /* fatal */ | ||
276 | #define SSL3_AD_NO_CERTIFICATE 41 | ||
277 | #define SSL3_AD_BAD_CERTIFICATE 42 | ||
278 | #define SSL3_AD_UNSUPPORTED_CERTIFICATE 43 | ||
279 | #define SSL3_AD_CERTIFICATE_REVOKED 44 | ||
280 | #define SSL3_AD_CERTIFICATE_EXPIRED 45 | ||
281 | #define SSL3_AD_CERTIFICATE_UNKNOWN 46 | ||
282 | #define SSL3_AD_ILLEGAL_PARAMETER 47 /* fatal */ | ||
283 | |||
284 | typedef struct ssl3_record_st | ||
285 | { | ||
286 | /*r */ int type; /* type of record */ | ||
287 | /*rw*/ unsigned int length; /* How many bytes available */ | ||
288 | /*r */ unsigned int off; /* read/write offset into 'buf' */ | ||
289 | /*rw*/ unsigned char *data; /* pointer to the record data */ | ||
290 | /*rw*/ unsigned char *input; /* where the decode bytes are */ | ||
291 | /*r */ unsigned char *comp; /* only used with decompression - malloc()ed */ | ||
292 | } SSL3_RECORD; | ||
293 | |||
294 | typedef struct ssl3_buffer_st | ||
295 | { | ||
296 | unsigned char *buf; /* at least SSL3_RT_MAX_PACKET_SIZE bytes, | ||
297 | * see ssl3_setup_buffers() */ | ||
298 | size_t len; /* buffer size */ | ||
299 | int offset; /* where to 'copy from' */ | ||
300 | int left; /* how many bytes left */ | ||
301 | } SSL3_BUFFER; | ||
302 | |||
303 | #define SSL3_CT_RSA_SIGN 1 | ||
304 | #define SSL3_CT_DSS_SIGN 2 | ||
305 | #define SSL3_CT_RSA_FIXED_DH 3 | ||
306 | #define SSL3_CT_DSS_FIXED_DH 4 | ||
307 | #define SSL3_CT_RSA_EPHEMERAL_DH 5 | ||
308 | #define SSL3_CT_DSS_EPHEMERAL_DH 6 | ||
309 | #define SSL3_CT_FORTEZZA_DMS 20 | ||
310 | #define SSL3_CT_NUMBER 7 | ||
311 | |||
312 | #define SSL3_FLAGS_NO_RENEGOTIATE_CIPHERS 0x0001 | ||
313 | #define SSL3_FLAGS_DELAY_CLIENT_FINISHED 0x0002 | ||
314 | #define SSL3_FLAGS_POP_BUFFER 0x0004 | ||
315 | #define TLS1_FLAGS_TLS_PADDING_BUG 0x0008 | ||
316 | |||
317 | typedef struct ssl3_state_st | ||
318 | { | ||
319 | long flags; | ||
320 | int delay_buf_pop_ret; | ||
321 | |||
322 | unsigned char read_sequence[8]; | ||
323 | unsigned char read_mac_secret[EVP_MAX_MD_SIZE]; | ||
324 | unsigned char write_sequence[8]; | ||
325 | unsigned char write_mac_secret[EVP_MAX_MD_SIZE]; | ||
326 | |||
327 | unsigned char server_random[SSL3_RANDOM_SIZE]; | ||
328 | unsigned char client_random[SSL3_RANDOM_SIZE]; | ||
329 | |||
330 | /* flags for countermeasure against known-IV weakness */ | ||
331 | int need_empty_fragments; | ||
332 | int empty_fragment_done; | ||
333 | |||
334 | SSL3_BUFFER rbuf; /* read IO goes into here */ | ||
335 | SSL3_BUFFER wbuf; /* write IO goes into here */ | ||
336 | |||
337 | SSL3_RECORD rrec; /* each decoded record goes in here */ | ||
338 | SSL3_RECORD wrec; /* goes out from here */ | ||
339 | |||
340 | /* storage for Alert/Handshake protocol data received but not | ||
341 | * yet processed by ssl3_read_bytes: */ | ||
342 | unsigned char alert_fragment[2]; | ||
343 | unsigned int alert_fragment_len; | ||
344 | unsigned char handshake_fragment[4]; | ||
345 | unsigned int handshake_fragment_len; | ||
346 | |||
347 | /* partial write - check the numbers match */ | ||
348 | unsigned int wnum; /* number of bytes sent so far */ | ||
349 | int wpend_tot; /* number bytes written */ | ||
350 | int wpend_type; | ||
351 | int wpend_ret; /* number of bytes submitted */ | ||
352 | const unsigned char *wpend_buf; | ||
353 | |||
354 | /* used during startup, digest all incoming/outgoing packets */ | ||
355 | EVP_MD_CTX finish_dgst1; | ||
356 | EVP_MD_CTX finish_dgst2; | ||
357 | |||
358 | /* this is set whenerver we see a change_cipher_spec message | ||
359 | * come in when we are not looking for one */ | ||
360 | int change_cipher_spec; | ||
361 | |||
362 | int warn_alert; | ||
363 | int fatal_alert; | ||
364 | /* we allow one fatal and one warning alert to be outstanding, | ||
365 | * send close alert via the warning alert */ | ||
366 | int alert_dispatch; | ||
367 | unsigned char send_alert[2]; | ||
368 | |||
369 | /* This flag is set when we should renegotiate ASAP, basically when | ||
370 | * there is no more data in the read or write buffers */ | ||
371 | int renegotiate; | ||
372 | int total_renegotiations; | ||
373 | int num_renegotiations; | ||
374 | |||
375 | int in_read_app_data; | ||
376 | |||
377 | struct { | ||
378 | /* actually only needs to be 16+20 */ | ||
379 | unsigned char cert_verify_md[EVP_MAX_MD_SIZE*2]; | ||
380 | |||
381 | /* actually only need to be 16+20 for SSLv3 and 12 for TLS */ | ||
382 | unsigned char finish_md[EVP_MAX_MD_SIZE*2]; | ||
383 | int finish_md_len; | ||
384 | unsigned char peer_finish_md[EVP_MAX_MD_SIZE*2]; | ||
385 | int peer_finish_md_len; | ||
386 | |||
387 | unsigned long message_size; | ||
388 | int message_type; | ||
389 | |||
390 | /* used to hold the new cipher we are going to use */ | ||
391 | SSL_CIPHER *new_cipher; | ||
392 | #ifndef OPENSSL_NO_DH | ||
393 | DH *dh; | ||
394 | #endif | ||
395 | /* used when SSL_ST_FLUSH_DATA is entered */ | ||
396 | int next_state; | ||
397 | |||
398 | int reuse_message; | ||
399 | |||
400 | /* used for certificate requests */ | ||
401 | int cert_req; | ||
402 | int ctype_num; | ||
403 | char ctype[SSL3_CT_NUMBER]; | ||
404 | STACK_OF(X509_NAME) *ca_names; | ||
405 | |||
406 | int use_rsa_tmp; | ||
407 | |||
408 | int key_block_length; | ||
409 | unsigned char *key_block; | ||
410 | |||
411 | const EVP_CIPHER *new_sym_enc; | ||
412 | const EVP_MD *new_hash; | ||
413 | #ifndef OPENSSL_NO_COMP | ||
414 | const SSL_COMP *new_compression; | ||
415 | #else | ||
416 | char *new_compression; | ||
417 | #endif | ||
418 | int cert_request; | ||
419 | } tmp; | ||
420 | |||
421 | } SSL3_STATE; | ||
422 | |||
423 | /* SSLv3 */ | ||
424 | /*client */ | ||
425 | /* extra state */ | ||
426 | #define SSL3_ST_CW_FLUSH (0x100|SSL_ST_CONNECT) | ||
427 | /* write to server */ | ||
428 | #define SSL3_ST_CW_CLNT_HELLO_A (0x110|SSL_ST_CONNECT) | ||
429 | #define SSL3_ST_CW_CLNT_HELLO_B (0x111|SSL_ST_CONNECT) | ||
430 | /* read from server */ | ||
431 | #define SSL3_ST_CR_SRVR_HELLO_A (0x120|SSL_ST_CONNECT) | ||
432 | #define SSL3_ST_CR_SRVR_HELLO_B (0x121|SSL_ST_CONNECT) | ||
433 | #define SSL3_ST_CR_CERT_A (0x130|SSL_ST_CONNECT) | ||
434 | #define SSL3_ST_CR_CERT_B (0x131|SSL_ST_CONNECT) | ||
435 | #define SSL3_ST_CR_KEY_EXCH_A (0x140|SSL_ST_CONNECT) | ||
436 | #define SSL3_ST_CR_KEY_EXCH_B (0x141|SSL_ST_CONNECT) | ||
437 | #define SSL3_ST_CR_CERT_REQ_A (0x150|SSL_ST_CONNECT) | ||
438 | #define SSL3_ST_CR_CERT_REQ_B (0x151|SSL_ST_CONNECT) | ||
439 | #define SSL3_ST_CR_SRVR_DONE_A (0x160|SSL_ST_CONNECT) | ||
440 | #define SSL3_ST_CR_SRVR_DONE_B (0x161|SSL_ST_CONNECT) | ||
441 | /* write to server */ | ||
442 | #define SSL3_ST_CW_CERT_A (0x170|SSL_ST_CONNECT) | ||
443 | #define SSL3_ST_CW_CERT_B (0x171|SSL_ST_CONNECT) | ||
444 | #define SSL3_ST_CW_CERT_C (0x172|SSL_ST_CONNECT) | ||
445 | #define SSL3_ST_CW_CERT_D (0x173|SSL_ST_CONNECT) | ||
446 | #define SSL3_ST_CW_KEY_EXCH_A (0x180|SSL_ST_CONNECT) | ||
447 | #define SSL3_ST_CW_KEY_EXCH_B (0x181|SSL_ST_CONNECT) | ||
448 | #define SSL3_ST_CW_CERT_VRFY_A (0x190|SSL_ST_CONNECT) | ||
449 | #define SSL3_ST_CW_CERT_VRFY_B (0x191|SSL_ST_CONNECT) | ||
450 | #define SSL3_ST_CW_CHANGE_A (0x1A0|SSL_ST_CONNECT) | ||
451 | #define SSL3_ST_CW_CHANGE_B (0x1A1|SSL_ST_CONNECT) | ||
452 | #define SSL3_ST_CW_FINISHED_A (0x1B0|SSL_ST_CONNECT) | ||
453 | #define SSL3_ST_CW_FINISHED_B (0x1B1|SSL_ST_CONNECT) | ||
454 | /* read from server */ | ||
455 | #define SSL3_ST_CR_CHANGE_A (0x1C0|SSL_ST_CONNECT) | ||
456 | #define SSL3_ST_CR_CHANGE_B (0x1C1|SSL_ST_CONNECT) | ||
457 | #define SSL3_ST_CR_FINISHED_A (0x1D0|SSL_ST_CONNECT) | ||
458 | #define SSL3_ST_CR_FINISHED_B (0x1D1|SSL_ST_CONNECT) | ||
459 | |||
460 | /* server */ | ||
461 | /* extra state */ | ||
462 | #define SSL3_ST_SW_FLUSH (0x100|SSL_ST_ACCEPT) | ||
463 | /* read from client */ | ||
464 | /* Do not change the number values, they do matter */ | ||
465 | #define SSL3_ST_SR_CLNT_HELLO_A (0x110|SSL_ST_ACCEPT) | ||
466 | #define SSL3_ST_SR_CLNT_HELLO_B (0x111|SSL_ST_ACCEPT) | ||
467 | #define SSL3_ST_SR_CLNT_HELLO_C (0x112|SSL_ST_ACCEPT) | ||
468 | /* write to client */ | ||
469 | #define SSL3_ST_SW_HELLO_REQ_A (0x120|SSL_ST_ACCEPT) | ||
470 | #define SSL3_ST_SW_HELLO_REQ_B (0x121|SSL_ST_ACCEPT) | ||
471 | #define SSL3_ST_SW_HELLO_REQ_C (0x122|SSL_ST_ACCEPT) | ||
472 | #define SSL3_ST_SW_SRVR_HELLO_A (0x130|SSL_ST_ACCEPT) | ||
473 | #define SSL3_ST_SW_SRVR_HELLO_B (0x131|SSL_ST_ACCEPT) | ||
474 | #define SSL3_ST_SW_CERT_A (0x140|SSL_ST_ACCEPT) | ||
475 | #define SSL3_ST_SW_CERT_B (0x141|SSL_ST_ACCEPT) | ||
476 | #define SSL3_ST_SW_KEY_EXCH_A (0x150|SSL_ST_ACCEPT) | ||
477 | #define SSL3_ST_SW_KEY_EXCH_B (0x151|SSL_ST_ACCEPT) | ||
478 | #define SSL3_ST_SW_CERT_REQ_A (0x160|SSL_ST_ACCEPT) | ||
479 | #define SSL3_ST_SW_CERT_REQ_B (0x161|SSL_ST_ACCEPT) | ||
480 | #define SSL3_ST_SW_SRVR_DONE_A (0x170|SSL_ST_ACCEPT) | ||
481 | #define SSL3_ST_SW_SRVR_DONE_B (0x171|SSL_ST_ACCEPT) | ||
482 | /* read from client */ | ||
483 | #define SSL3_ST_SR_CERT_A (0x180|SSL_ST_ACCEPT) | ||
484 | #define SSL3_ST_SR_CERT_B (0x181|SSL_ST_ACCEPT) | ||
485 | #define SSL3_ST_SR_KEY_EXCH_A (0x190|SSL_ST_ACCEPT) | ||
486 | #define SSL3_ST_SR_KEY_EXCH_B (0x191|SSL_ST_ACCEPT) | ||
487 | #define SSL3_ST_SR_CERT_VRFY_A (0x1A0|SSL_ST_ACCEPT) | ||
488 | #define SSL3_ST_SR_CERT_VRFY_B (0x1A1|SSL_ST_ACCEPT) | ||
489 | #define SSL3_ST_SR_CHANGE_A (0x1B0|SSL_ST_ACCEPT) | ||
490 | #define SSL3_ST_SR_CHANGE_B (0x1B1|SSL_ST_ACCEPT) | ||
491 | #define SSL3_ST_SR_FINISHED_A (0x1C0|SSL_ST_ACCEPT) | ||
492 | #define SSL3_ST_SR_FINISHED_B (0x1C1|SSL_ST_ACCEPT) | ||
493 | /* write to client */ | ||
494 | #define SSL3_ST_SW_CHANGE_A (0x1D0|SSL_ST_ACCEPT) | ||
495 | #define SSL3_ST_SW_CHANGE_B (0x1D1|SSL_ST_ACCEPT) | ||
496 | #define SSL3_ST_SW_FINISHED_A (0x1E0|SSL_ST_ACCEPT) | ||
497 | #define SSL3_ST_SW_FINISHED_B (0x1E1|SSL_ST_ACCEPT) | ||
498 | |||
499 | #define SSL3_MT_HELLO_REQUEST 0 | ||
500 | #define SSL3_MT_CLIENT_HELLO 1 | ||
501 | #define SSL3_MT_SERVER_HELLO 2 | ||
502 | #define SSL3_MT_CERTIFICATE 11 | ||
503 | #define SSL3_MT_SERVER_KEY_EXCHANGE 12 | ||
504 | #define SSL3_MT_CERTIFICATE_REQUEST 13 | ||
505 | #define SSL3_MT_SERVER_DONE 14 | ||
506 | #define SSL3_MT_CERTIFICATE_VERIFY 15 | ||
507 | #define SSL3_MT_CLIENT_KEY_EXCHANGE 16 | ||
508 | #define SSL3_MT_FINISHED 20 | ||
509 | |||
510 | #define SSL3_MT_CCS 1 | ||
511 | |||
512 | /* These are used when changing over to a new cipher */ | ||
513 | #define SSL3_CC_READ 0x01 | ||
514 | #define SSL3_CC_WRITE 0x02 | ||
515 | #define SSL3_CC_CLIENT 0x10 | ||
516 | #define SSL3_CC_SERVER 0x20 | ||
517 | #define SSL3_CHANGE_CIPHER_CLIENT_WRITE (SSL3_CC_CLIENT|SSL3_CC_WRITE) | ||
518 | #define SSL3_CHANGE_CIPHER_SERVER_READ (SSL3_CC_SERVER|SSL3_CC_READ) | ||
519 | #define SSL3_CHANGE_CIPHER_CLIENT_READ (SSL3_CC_CLIENT|SSL3_CC_READ) | ||
520 | #define SSL3_CHANGE_CIPHER_SERVER_WRITE (SSL3_CC_SERVER|SSL3_CC_WRITE) | ||
521 | |||
522 | #ifdef __cplusplus | ||
523 | } | ||
524 | #endif | ||
525 | #endif | ||
526 | |||
diff --git a/src/lib/libssl/ssl_algs.c b/src/lib/libssl/ssl_algs.c deleted file mode 100644 index 3d1299ee7b..0000000000 --- a/src/lib/libssl/ssl_algs.c +++ /dev/null | |||
@@ -1,111 +0,0 @@ | |||
1 | /* ssl/ssl_algs.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 <openssl/objects.h> | ||
61 | #include <openssl/lhash.h> | ||
62 | #include "ssl_locl.h" | ||
63 | |||
64 | int SSL_library_init(void) | ||
65 | { | ||
66 | |||
67 | #ifndef OPENSSL_NO_DES | ||
68 | EVP_add_cipher(EVP_des_cbc()); | ||
69 | EVP_add_cipher(EVP_des_ede3_cbc()); | ||
70 | #endif | ||
71 | #ifndef OPENSSL_NO_IDEA | ||
72 | EVP_add_cipher(EVP_idea_cbc()); | ||
73 | #endif | ||
74 | #ifndef OPENSSL_NO_RC4 | ||
75 | EVP_add_cipher(EVP_rc4()); | ||
76 | #endif | ||
77 | #ifndef OPENSSL_NO_RC2 | ||
78 | EVP_add_cipher(EVP_rc2_cbc()); | ||
79 | #endif | ||
80 | #ifndef OPENSSL_NO_AES | ||
81 | EVP_add_cipher(EVP_aes_128_cbc()); | ||
82 | EVP_add_cipher(EVP_aes_192_cbc()); | ||
83 | EVP_add_cipher(EVP_aes_256_cbc()); | ||
84 | #endif | ||
85 | #ifndef OPENSSL_NO_MD2 | ||
86 | EVP_add_digest(EVP_md2()); | ||
87 | #endif | ||
88 | #ifndef OPENSSL_NO_MD5 | ||
89 | EVP_add_digest(EVP_md5()); | ||
90 | EVP_add_digest_alias(SN_md5,"ssl2-md5"); | ||
91 | EVP_add_digest_alias(SN_md5,"ssl3-md5"); | ||
92 | #endif | ||
93 | #ifndef OPENSSL_NO_SHA | ||
94 | EVP_add_digest(EVP_sha1()); /* RSA with sha1 */ | ||
95 | EVP_add_digest_alias(SN_sha1,"ssl3-sha1"); | ||
96 | EVP_add_digest_alias(SN_sha1WithRSAEncryption,SN_sha1WithRSA); | ||
97 | #endif | ||
98 | #if !defined(OPENSSL_NO_SHA) && !defined(OPENSSL_NO_DSA) | ||
99 | EVP_add_digest(EVP_dss1()); /* DSA with sha1 */ | ||
100 | EVP_add_digest_alias(SN_dsaWithSHA1,SN_dsaWithSHA1_2); | ||
101 | EVP_add_digest_alias(SN_dsaWithSHA1,"DSS1"); | ||
102 | EVP_add_digest_alias(SN_dsaWithSHA1,"dss1"); | ||
103 | #endif | ||
104 | /* If you want support for phased out ciphers, add the following */ | ||
105 | #if 0 | ||
106 | EVP_add_digest(EVP_sha()); | ||
107 | EVP_add_digest(EVP_dss()); | ||
108 | #endif | ||
109 | return(1); | ||
110 | } | ||
111 | |||
diff --git a/src/lib/libssl/ssl_asn1.c b/src/lib/libssl/ssl_asn1.c deleted file mode 100644 index d8ff8fc4a3..0000000000 --- a/src/lib/libssl/ssl_asn1.c +++ /dev/null | |||
@@ -1,398 +0,0 @@ | |||
1 | /* ssl/ssl_asn1.c */ | ||
2 | /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) | ||
3 | * All rights reserved. | ||
4 | * | ||
5 | * This package is an SSL implementation written | ||
6 | * by Eric Young (eay@cryptsoft.com). | ||
7 | * The implementation was written so as to conform with Netscapes SSL. | ||
8 | * | ||
9 | * This library is free for commercial and non-commercial use as long as | ||
10 | * the following conditions are aheared to. The following conditions | ||
11 | * apply to all code found in this distribution, be it the RC4, RSA, | ||
12 | * lhash, DES, etc., code; not just the SSL code. The SSL documentation | ||
13 | * included with this distribution is covered by the same copyright terms | ||
14 | * except that the holder is Tim Hudson (tjh@cryptsoft.com). | ||
15 | * | ||
16 | * Copyright remains Eric Young's, and as such any Copyright notices in | ||
17 | * the code are not to be removed. | ||
18 | * If this package is used in a product, Eric Young should be given attribution | ||
19 | * as the author of the parts of the library used. | ||
20 | * This can be in the form of a textual message at program startup or | ||
21 | * in documentation (online or textual) provided with the package. | ||
22 | * | ||
23 | * Redistribution and use in source and binary forms, with or without | ||
24 | * modification, are permitted provided that the following conditions | ||
25 | * are met: | ||
26 | * 1. Redistributions of source code must retain the copyright | ||
27 | * notice, this list of conditions and the following disclaimer. | ||
28 | * 2. Redistributions in binary form must reproduce the above copyright | ||
29 | * notice, this list of conditions and the following disclaimer in the | ||
30 | * documentation and/or other materials provided with the distribution. | ||
31 | * 3. All advertising materials mentioning features or use of this software | ||
32 | * must display the following acknowledgement: | ||
33 | * "This product includes cryptographic software written by | ||
34 | * Eric Young (eay@cryptsoft.com)" | ||
35 | * The word 'cryptographic' can be left out if the rouines from the library | ||
36 | * being used are not cryptographic related :-). | ||
37 | * 4. If you include any Windows specific code (or a derivative thereof) from | ||
38 | * the apps directory (application code) you must include an acknowledgement: | ||
39 | * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)" | ||
40 | * | ||
41 | * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND | ||
42 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||
43 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||
44 | * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE | ||
45 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | ||
46 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | ||
47 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | ||
48 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | ||
49 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | ||
50 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | ||
51 | * SUCH DAMAGE. | ||
52 | * | ||
53 | * The licence and distribution terms for any publically available version or | ||
54 | * derivative of this code cannot be changed. i.e. this code cannot simply be | ||
55 | * copied and put under another distribution licence | ||
56 | * [including the GNU Public Licence.] | ||
57 | */ | ||
58 | |||
59 | #include <stdio.h> | ||
60 | #include <stdlib.h> | ||
61 | #include "ssl_locl.h" | ||
62 | #include <openssl/asn1_mac.h> | ||
63 | #include <openssl/objects.h> | ||
64 | #include <openssl/x509.h> | ||
65 | |||
66 | typedef struct ssl_session_asn1_st | ||
67 | { | ||
68 | ASN1_INTEGER version; | ||
69 | ASN1_INTEGER ssl_version; | ||
70 | ASN1_OCTET_STRING cipher; | ||
71 | ASN1_OCTET_STRING master_key; | ||
72 | ASN1_OCTET_STRING session_id; | ||
73 | ASN1_OCTET_STRING session_id_context; | ||
74 | ASN1_OCTET_STRING key_arg; | ||
75 | #ifndef OPENSSL_NO_KRB5 | ||
76 | ASN1_OCTET_STRING krb5_princ; | ||
77 | #endif /* OPENSSL_NO_KRB5 */ | ||
78 | ASN1_INTEGER time; | ||
79 | ASN1_INTEGER timeout; | ||
80 | ASN1_INTEGER verify_result; | ||
81 | } SSL_SESSION_ASN1; | ||
82 | |||
83 | int i2d_SSL_SESSION(SSL_SESSION *in, unsigned char **pp) | ||
84 | { | ||
85 | #define LSIZE2 (sizeof(long)*2) | ||
86 | int v1=0,v2=0,v3=0,v4=0,v5=0; | ||
87 | unsigned char buf[4],ibuf1[LSIZE2],ibuf2[LSIZE2]; | ||
88 | unsigned char ibuf3[LSIZE2],ibuf4[LSIZE2],ibuf5[LSIZE2]; | ||
89 | long l; | ||
90 | SSL_SESSION_ASN1 a; | ||
91 | M_ASN1_I2D_vars(in); | ||
92 | |||
93 | if ((in == NULL) || ((in->cipher == NULL) && (in->cipher_id == 0))) | ||
94 | return(0); | ||
95 | |||
96 | /* Note that I cheat in the following 2 assignments. I know | ||
97 | * that if the ASN1_INTEGER passed to ASN1_INTEGER_set | ||
98 | * is > sizeof(long)+1, the buffer will not be re-OPENSSL_malloc()ed. | ||
99 | * This is a bit evil but makes things simple, no dynamic allocation | ||
100 | * to clean up :-) */ | ||
101 | a.version.length=LSIZE2; | ||
102 | a.version.type=V_ASN1_INTEGER; | ||
103 | a.version.data=ibuf1; | ||
104 | ASN1_INTEGER_set(&(a.version),SSL_SESSION_ASN1_VERSION); | ||
105 | |||
106 | a.ssl_version.length=LSIZE2; | ||
107 | a.ssl_version.type=V_ASN1_INTEGER; | ||
108 | a.ssl_version.data=ibuf2; | ||
109 | ASN1_INTEGER_set(&(a.ssl_version),in->ssl_version); | ||
110 | |||
111 | a.cipher.type=V_ASN1_OCTET_STRING; | ||
112 | a.cipher.data=buf; | ||
113 | |||
114 | if (in->cipher == NULL) | ||
115 | l=in->cipher_id; | ||
116 | else | ||
117 | l=in->cipher->id; | ||
118 | if (in->ssl_version == SSL2_VERSION) | ||
119 | { | ||
120 | a.cipher.length=3; | ||
121 | buf[0]=((unsigned char)(l>>16L))&0xff; | ||
122 | buf[1]=((unsigned char)(l>> 8L))&0xff; | ||
123 | buf[2]=((unsigned char)(l ))&0xff; | ||
124 | } | ||
125 | else | ||
126 | { | ||
127 | a.cipher.length=2; | ||
128 | buf[0]=((unsigned char)(l>>8L))&0xff; | ||
129 | buf[1]=((unsigned char)(l ))&0xff; | ||
130 | } | ||
131 | |||
132 | a.master_key.length=in->master_key_length; | ||
133 | a.master_key.type=V_ASN1_OCTET_STRING; | ||
134 | a.master_key.data=in->master_key; | ||
135 | |||
136 | a.session_id.length=in->session_id_length; | ||
137 | a.session_id.type=V_ASN1_OCTET_STRING; | ||
138 | a.session_id.data=in->session_id; | ||
139 | |||
140 | a.session_id_context.length=in->sid_ctx_length; | ||
141 | a.session_id_context.type=V_ASN1_OCTET_STRING; | ||
142 | a.session_id_context.data=in->sid_ctx; | ||
143 | |||
144 | a.key_arg.length=in->key_arg_length; | ||
145 | a.key_arg.type=V_ASN1_OCTET_STRING; | ||
146 | a.key_arg.data=in->key_arg; | ||
147 | |||
148 | #ifndef OPENSSL_NO_KRB5 | ||
149 | if (in->krb5_client_princ_len) | ||
150 | { | ||
151 | a.krb5_princ.length=in->krb5_client_princ_len; | ||
152 | a.krb5_princ.type=V_ASN1_OCTET_STRING; | ||
153 | a.krb5_princ.data=in->krb5_client_princ; | ||
154 | } | ||
155 | #endif /* OPENSSL_NO_KRB5 */ | ||
156 | |||
157 | if (in->time != 0L) | ||
158 | { | ||
159 | a.time.length=LSIZE2; | ||
160 | a.time.type=V_ASN1_INTEGER; | ||
161 | a.time.data=ibuf3; | ||
162 | ASN1_INTEGER_set(&(a.time),in->time); | ||
163 | } | ||
164 | |||
165 | if (in->timeout != 0L) | ||
166 | { | ||
167 | a.timeout.length=LSIZE2; | ||
168 | a.timeout.type=V_ASN1_INTEGER; | ||
169 | a.timeout.data=ibuf4; | ||
170 | ASN1_INTEGER_set(&(a.timeout),in->timeout); | ||
171 | } | ||
172 | |||
173 | if (in->verify_result != X509_V_OK) | ||
174 | { | ||
175 | a.verify_result.length=LSIZE2; | ||
176 | a.verify_result.type=V_ASN1_INTEGER; | ||
177 | a.verify_result.data=ibuf5; | ||
178 | ASN1_INTEGER_set(&a.verify_result,in->verify_result); | ||
179 | } | ||
180 | |||
181 | |||
182 | M_ASN1_I2D_len(&(a.version), i2d_ASN1_INTEGER); | ||
183 | M_ASN1_I2D_len(&(a.ssl_version), i2d_ASN1_INTEGER); | ||
184 | M_ASN1_I2D_len(&(a.cipher), i2d_ASN1_OCTET_STRING); | ||
185 | M_ASN1_I2D_len(&(a.session_id), i2d_ASN1_OCTET_STRING); | ||
186 | M_ASN1_I2D_len(&(a.master_key), i2d_ASN1_OCTET_STRING); | ||
187 | #ifndef OPENSSL_NO_KRB5 | ||
188 | if (in->krb5_client_princ_len) | ||
189 | M_ASN1_I2D_len(&(a.krb5_princ), i2d_ASN1_OCTET_STRING); | ||
190 | #endif /* OPENSSL_NO_KRB5 */ | ||
191 | if (in->key_arg_length > 0) | ||
192 | M_ASN1_I2D_len_IMP_opt(&(a.key_arg),i2d_ASN1_OCTET_STRING); | ||
193 | if (in->time != 0L) | ||
194 | M_ASN1_I2D_len_EXP_opt(&(a.time),i2d_ASN1_INTEGER,1,v1); | ||
195 | if (in->timeout != 0L) | ||
196 | M_ASN1_I2D_len_EXP_opt(&(a.timeout),i2d_ASN1_INTEGER,2,v2); | ||
197 | if (in->peer != NULL) | ||
198 | M_ASN1_I2D_len_EXP_opt(in->peer,i2d_X509,3,v3); | ||
199 | M_ASN1_I2D_len_EXP_opt(&a.session_id_context,i2d_ASN1_OCTET_STRING,4,v4); | ||
200 | if (in->verify_result != X509_V_OK) | ||
201 | M_ASN1_I2D_len_EXP_opt(&(a.verify_result),i2d_ASN1_INTEGER,5,v5); | ||
202 | |||
203 | M_ASN1_I2D_seq_total(); | ||
204 | |||
205 | M_ASN1_I2D_put(&(a.version), i2d_ASN1_INTEGER); | ||
206 | M_ASN1_I2D_put(&(a.ssl_version), i2d_ASN1_INTEGER); | ||
207 | M_ASN1_I2D_put(&(a.cipher), i2d_ASN1_OCTET_STRING); | ||
208 | M_ASN1_I2D_put(&(a.session_id), i2d_ASN1_OCTET_STRING); | ||
209 | M_ASN1_I2D_put(&(a.master_key), i2d_ASN1_OCTET_STRING); | ||
210 | #ifndef OPENSSL_NO_KRB5 | ||
211 | if (in->krb5_client_princ_len) | ||
212 | M_ASN1_I2D_put(&(a.krb5_princ), i2d_ASN1_OCTET_STRING); | ||
213 | #endif /* OPENSSL_NO_KRB5 */ | ||
214 | if (in->key_arg_length > 0) | ||
215 | M_ASN1_I2D_put_IMP_opt(&(a.key_arg),i2d_ASN1_OCTET_STRING,0); | ||
216 | if (in->time != 0L) | ||
217 | M_ASN1_I2D_put_EXP_opt(&(a.time),i2d_ASN1_INTEGER,1,v1); | ||
218 | if (in->timeout != 0L) | ||
219 | M_ASN1_I2D_put_EXP_opt(&(a.timeout),i2d_ASN1_INTEGER,2,v2); | ||
220 | if (in->peer != NULL) | ||
221 | M_ASN1_I2D_put_EXP_opt(in->peer,i2d_X509,3,v3); | ||
222 | M_ASN1_I2D_put_EXP_opt(&a.session_id_context,i2d_ASN1_OCTET_STRING,4, | ||
223 | v4); | ||
224 | if (in->verify_result != X509_V_OK) | ||
225 | M_ASN1_I2D_put_EXP_opt(&a.verify_result,i2d_ASN1_INTEGER,5,v5); | ||
226 | M_ASN1_I2D_finish(); | ||
227 | } | ||
228 | |||
229 | SSL_SESSION *d2i_SSL_SESSION(SSL_SESSION **a, unsigned char **pp, | ||
230 | long length) | ||
231 | { | ||
232 | int version,ssl_version=0,i; | ||
233 | long id; | ||
234 | ASN1_INTEGER ai,*aip; | ||
235 | ASN1_OCTET_STRING os,*osp; | ||
236 | M_ASN1_D2I_vars(a,SSL_SESSION *,SSL_SESSION_new); | ||
237 | |||
238 | aip= &ai; | ||
239 | osp= &os; | ||
240 | |||
241 | M_ASN1_D2I_Init(); | ||
242 | M_ASN1_D2I_start_sequence(); | ||
243 | |||
244 | ai.data=NULL; ai.length=0; | ||
245 | M_ASN1_D2I_get(aip,d2i_ASN1_INTEGER); | ||
246 | version=(int)ASN1_INTEGER_get(aip); | ||
247 | if (ai.data != NULL) { OPENSSL_free(ai.data); ai.data=NULL; ai.length=0; } | ||
248 | |||
249 | /* we don't care about the version right now :-) */ | ||
250 | M_ASN1_D2I_get(aip,d2i_ASN1_INTEGER); | ||
251 | ssl_version=(int)ASN1_INTEGER_get(aip); | ||
252 | ret->ssl_version=ssl_version; | ||
253 | if (ai.data != NULL) { OPENSSL_free(ai.data); ai.data=NULL; ai.length=0; } | ||
254 | |||
255 | os.data=NULL; os.length=0; | ||
256 | M_ASN1_D2I_get(osp,d2i_ASN1_OCTET_STRING); | ||
257 | if (ssl_version == SSL2_VERSION) | ||
258 | { | ||
259 | if (os.length != 3) | ||
260 | { | ||
261 | c.error=SSL_R_CIPHER_CODE_WRONG_LENGTH; | ||
262 | goto err; | ||
263 | } | ||
264 | id=0x02000000L| | ||
265 | ((unsigned long)os.data[0]<<16L)| | ||
266 | ((unsigned long)os.data[1]<< 8L)| | ||
267 | (unsigned long)os.data[2]; | ||
268 | } | ||
269 | else if ((ssl_version>>8) == 3) | ||
270 | { | ||
271 | if (os.length != 2) | ||
272 | { | ||
273 | c.error=SSL_R_CIPHER_CODE_WRONG_LENGTH; | ||
274 | goto err; | ||
275 | } | ||
276 | id=0x03000000L| | ||
277 | ((unsigned long)os.data[0]<<8L)| | ||
278 | (unsigned long)os.data[1]; | ||
279 | } | ||
280 | else | ||
281 | { | ||
282 | SSLerr(SSL_F_D2I_SSL_SESSION,SSL_R_UNKNOWN_SSL_VERSION); | ||
283 | return(NULL); | ||
284 | } | ||
285 | |||
286 | ret->cipher=NULL; | ||
287 | ret->cipher_id=id; | ||
288 | |||
289 | M_ASN1_D2I_get(osp,d2i_ASN1_OCTET_STRING); | ||
290 | if ((ssl_version>>8) == SSL3_VERSION) | ||
291 | i=SSL3_MAX_SSL_SESSION_ID_LENGTH; | ||
292 | else /* if (ssl_version == SSL2_VERSION) */ | ||
293 | i=SSL2_MAX_SSL_SESSION_ID_LENGTH; | ||
294 | |||
295 | if (os.length > i) | ||
296 | os.length = i; | ||
297 | if (os.length > sizeof ret->session_id) /* can't happen */ | ||
298 | os.length = sizeof ret->session_id; | ||
299 | |||
300 | ret->session_id_length=os.length; | ||
301 | OPENSSL_assert(os.length <= sizeof ret->session_id); | ||
302 | memcpy(ret->session_id,os.data,os.length); | ||
303 | |||
304 | M_ASN1_D2I_get(osp,d2i_ASN1_OCTET_STRING); | ||
305 | if (ret->master_key_length > SSL_MAX_MASTER_KEY_LENGTH) | ||
306 | ret->master_key_length=SSL_MAX_MASTER_KEY_LENGTH; | ||
307 | else | ||
308 | ret->master_key_length=os.length; | ||
309 | memcpy(ret->master_key,os.data,ret->master_key_length); | ||
310 | |||
311 | os.length=0; | ||
312 | |||
313 | #ifndef OPENSSL_NO_KRB5 | ||
314 | os.length=0; | ||
315 | M_ASN1_D2I_get_opt(osp,d2i_ASN1_OCTET_STRING,V_ASN1_OCTET_STRING); | ||
316 | if (os.data) | ||
317 | { | ||
318 | if (os.length > SSL_MAX_KRB5_PRINCIPAL_LENGTH) | ||
319 | ret->krb5_client_princ_len=0; | ||
320 | else | ||
321 | ret->krb5_client_princ_len=os.length; | ||
322 | memcpy(ret->krb5_client_princ,os.data,ret->krb5_client_princ_len); | ||
323 | OPENSSL_free(os.data); | ||
324 | os.data = NULL; | ||
325 | os.length = 0; | ||
326 | } | ||
327 | else | ||
328 | ret->krb5_client_princ_len=0; | ||
329 | #endif /* OPENSSL_NO_KRB5 */ | ||
330 | |||
331 | M_ASN1_D2I_get_IMP_opt(osp,d2i_ASN1_OCTET_STRING,0,V_ASN1_OCTET_STRING); | ||
332 | if (os.length > SSL_MAX_KEY_ARG_LENGTH) | ||
333 | ret->key_arg_length=SSL_MAX_KEY_ARG_LENGTH; | ||
334 | else | ||
335 | ret->key_arg_length=os.length; | ||
336 | memcpy(ret->key_arg,os.data,ret->key_arg_length); | ||
337 | if (os.data != NULL) OPENSSL_free(os.data); | ||
338 | |||
339 | ai.length=0; | ||
340 | M_ASN1_D2I_get_EXP_opt(aip,d2i_ASN1_INTEGER,1); | ||
341 | if (ai.data != NULL) | ||
342 | { | ||
343 | ret->time=ASN1_INTEGER_get(aip); | ||
344 | OPENSSL_free(ai.data); ai.data=NULL; ai.length=0; | ||
345 | } | ||
346 | else | ||
347 | ret->time=time(NULL); | ||
348 | |||
349 | ai.length=0; | ||
350 | M_ASN1_D2I_get_EXP_opt(aip,d2i_ASN1_INTEGER,2); | ||
351 | if (ai.data != NULL) | ||
352 | { | ||
353 | ret->timeout=ASN1_INTEGER_get(aip); | ||
354 | OPENSSL_free(ai.data); ai.data=NULL; ai.length=0; | ||
355 | } | ||
356 | else | ||
357 | ret->timeout=3; | ||
358 | |||
359 | if (ret->peer != NULL) | ||
360 | { | ||
361 | X509_free(ret->peer); | ||
362 | ret->peer=NULL; | ||
363 | } | ||
364 | M_ASN1_D2I_get_EXP_opt(ret->peer,d2i_X509,3); | ||
365 | |||
366 | os.length=0; | ||
367 | os.data=NULL; | ||
368 | M_ASN1_D2I_get_EXP_opt(osp,d2i_ASN1_OCTET_STRING,4); | ||
369 | |||
370 | if(os.data != NULL) | ||
371 | { | ||
372 | if (os.length > SSL_MAX_SID_CTX_LENGTH) | ||
373 | { | ||
374 | ret->sid_ctx_length=os.length; | ||
375 | SSLerr(SSL_F_D2I_SSL_SESSION,SSL_R_BAD_LENGTH); | ||
376 | } | ||
377 | else | ||
378 | { | ||
379 | ret->sid_ctx_length=os.length; | ||
380 | memcpy(ret->sid_ctx,os.data,os.length); | ||
381 | } | ||
382 | OPENSSL_free(os.data); os.data=NULL; os.length=0; | ||
383 | } | ||
384 | else | ||
385 | ret->sid_ctx_length=0; | ||
386 | |||
387 | ai.length=0; | ||
388 | M_ASN1_D2I_get_EXP_opt(aip,d2i_ASN1_INTEGER,5); | ||
389 | if (ai.data != NULL) | ||
390 | { | ||
391 | ret->verify_result=ASN1_INTEGER_get(aip); | ||
392 | OPENSSL_free(ai.data); ai.data=NULL; ai.length=0; | ||
393 | } | ||
394 | else | ||
395 | ret->verify_result=X509_V_OK; | ||
396 | |||
397 | M_ASN1_D2I_Finish(a,SSL_SESSION_free,SSL_F_D2I_SSL_SESSION); | ||
398 | } | ||
diff --git a/src/lib/libssl/ssl_cert.c b/src/lib/libssl/ssl_cert.c deleted file mode 100644 index da90078a37..0000000000 --- a/src/lib/libssl/ssl_cert.c +++ /dev/null | |||
@@ -1,860 +0,0 @@ | |||
1 | /*! \file ssl/ssl_cert.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) 1999 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 | |||
107 | #include <stdio.h> | ||
108 | |||
109 | #include "e_os.h" | ||
110 | #ifndef NO_SYS_TYPES_H | ||
111 | # include <sys/types.h> | ||
112 | #endif | ||
113 | |||
114 | #if !defined(OPENSSL_SYS_WIN32) && !defined(OPENSSL_SYS_VMS) && !defined(NeXT) && !defined(MAC_OS_pre_X) | ||
115 | #include <dirent.h> | ||
116 | #endif | ||
117 | |||
118 | #if defined(WIN32) | ||
119 | #include <windows.h> | ||
120 | #endif | ||
121 | |||
122 | #ifdef NeXT | ||
123 | #include <sys/dir.h> | ||
124 | #define dirent direct | ||
125 | #endif | ||
126 | |||
127 | #include <openssl/objects.h> | ||
128 | #include <openssl/bio.h> | ||
129 | #include <openssl/pem.h> | ||
130 | #include <openssl/x509v3.h> | ||
131 | #include "ssl_locl.h" | ||
132 | |||
133 | int SSL_get_ex_data_X509_STORE_CTX_idx(void) | ||
134 | { | ||
135 | static volatile int ssl_x509_store_ctx_idx= -1; | ||
136 | |||
137 | if (ssl_x509_store_ctx_idx < 0) | ||
138 | { | ||
139 | /* any write lock will do; usually this branch | ||
140 | * will only be taken once anyway */ | ||
141 | CRYPTO_w_lock(CRYPTO_LOCK_SSL_CTX); | ||
142 | |||
143 | if (ssl_x509_store_ctx_idx < 0) | ||
144 | { | ||
145 | ssl_x509_store_ctx_idx=X509_STORE_CTX_get_ex_new_index( | ||
146 | 0,"SSL for verify callback",NULL,NULL,NULL); | ||
147 | } | ||
148 | |||
149 | CRYPTO_w_unlock(CRYPTO_LOCK_SSL_CTX); | ||
150 | } | ||
151 | return ssl_x509_store_ctx_idx; | ||
152 | } | ||
153 | |||
154 | CERT *ssl_cert_new(void) | ||
155 | { | ||
156 | CERT *ret; | ||
157 | |||
158 | ret=(CERT *)OPENSSL_malloc(sizeof(CERT)); | ||
159 | if (ret == NULL) | ||
160 | { | ||
161 | SSLerr(SSL_F_SSL_CERT_NEW,ERR_R_MALLOC_FAILURE); | ||
162 | return(NULL); | ||
163 | } | ||
164 | memset(ret,0,sizeof(CERT)); | ||
165 | |||
166 | ret->key= &(ret->pkeys[SSL_PKEY_RSA_ENC]); | ||
167 | ret->references=1; | ||
168 | |||
169 | return(ret); | ||
170 | } | ||
171 | |||
172 | CERT *ssl_cert_dup(CERT *cert) | ||
173 | { | ||
174 | CERT *ret; | ||
175 | int i; | ||
176 | |||
177 | ret = (CERT *)OPENSSL_malloc(sizeof(CERT)); | ||
178 | if (ret == NULL) | ||
179 | { | ||
180 | SSLerr(SSL_F_SSL_CERT_DUP, ERR_R_MALLOC_FAILURE); | ||
181 | return(NULL); | ||
182 | } | ||
183 | |||
184 | memset(ret, 0, sizeof(CERT)); | ||
185 | |||
186 | ret->key = &ret->pkeys[cert->key - &cert->pkeys[0]]; | ||
187 | /* or ret->key = ret->pkeys + (cert->key - cert->pkeys), | ||
188 | * if you find that more readable */ | ||
189 | |||
190 | ret->valid = cert->valid; | ||
191 | ret->mask = cert->mask; | ||
192 | ret->export_mask = cert->export_mask; | ||
193 | |||
194 | #ifndef OPENSSL_NO_RSA | ||
195 | if (cert->rsa_tmp != NULL) | ||
196 | { | ||
197 | RSA_up_ref(cert->rsa_tmp); | ||
198 | ret->rsa_tmp = cert->rsa_tmp; | ||
199 | } | ||
200 | ret->rsa_tmp_cb = cert->rsa_tmp_cb; | ||
201 | #endif | ||
202 | |||
203 | #ifndef OPENSSL_NO_DH | ||
204 | if (cert->dh_tmp != NULL) | ||
205 | { | ||
206 | /* DH parameters don't have a reference count */ | ||
207 | ret->dh_tmp = DHparams_dup(cert->dh_tmp); | ||
208 | if (ret->dh_tmp == NULL) | ||
209 | { | ||
210 | SSLerr(SSL_F_SSL_CERT_DUP, ERR_R_DH_LIB); | ||
211 | goto err; | ||
212 | } | ||
213 | if (cert->dh_tmp->priv_key) | ||
214 | { | ||
215 | BIGNUM *b = BN_dup(cert->dh_tmp->priv_key); | ||
216 | if (!b) | ||
217 | { | ||
218 | SSLerr(SSL_F_SSL_CERT_DUP, ERR_R_BN_LIB); | ||
219 | goto err; | ||
220 | } | ||
221 | ret->dh_tmp->priv_key = b; | ||
222 | } | ||
223 | if (cert->dh_tmp->pub_key) | ||
224 | { | ||
225 | BIGNUM *b = BN_dup(cert->dh_tmp->pub_key); | ||
226 | if (!b) | ||
227 | { | ||
228 | SSLerr(SSL_F_SSL_CERT_DUP, ERR_R_BN_LIB); | ||
229 | goto err; | ||
230 | } | ||
231 | ret->dh_tmp->pub_key = b; | ||
232 | } | ||
233 | } | ||
234 | ret->dh_tmp_cb = cert->dh_tmp_cb; | ||
235 | #endif | ||
236 | |||
237 | for (i = 0; i < SSL_PKEY_NUM; i++) | ||
238 | { | ||
239 | if (cert->pkeys[i].x509 != NULL) | ||
240 | { | ||
241 | ret->pkeys[i].x509 = cert->pkeys[i].x509; | ||
242 | CRYPTO_add(&ret->pkeys[i].x509->references, 1, | ||
243 | CRYPTO_LOCK_X509); | ||
244 | } | ||
245 | |||
246 | if (cert->pkeys[i].privatekey != NULL) | ||
247 | { | ||
248 | ret->pkeys[i].privatekey = cert->pkeys[i].privatekey; | ||
249 | CRYPTO_add(&ret->pkeys[i].privatekey->references, 1, | ||
250 | CRYPTO_LOCK_EVP_PKEY); | ||
251 | |||
252 | switch(i) | ||
253 | { | ||
254 | /* If there was anything special to do for | ||
255 | * certain types of keys, we'd do it here. | ||
256 | * (Nothing at the moment, I think.) */ | ||
257 | |||
258 | case SSL_PKEY_RSA_ENC: | ||
259 | case SSL_PKEY_RSA_SIGN: | ||
260 | /* We have an RSA key. */ | ||
261 | break; | ||
262 | |||
263 | case SSL_PKEY_DSA_SIGN: | ||
264 | /* We have a DSA key. */ | ||
265 | break; | ||
266 | |||
267 | case SSL_PKEY_DH_RSA: | ||
268 | case SSL_PKEY_DH_DSA: | ||
269 | /* We have a DH key. */ | ||
270 | break; | ||
271 | |||
272 | default: | ||
273 | /* Can't happen. */ | ||
274 | SSLerr(SSL_F_SSL_CERT_DUP, SSL_R_LIBRARY_BUG); | ||
275 | } | ||
276 | } | ||
277 | } | ||
278 | |||
279 | /* ret->extra_certs *should* exist, but currently the own certificate | ||
280 | * chain is held inside SSL_CTX */ | ||
281 | |||
282 | ret->references=1; | ||
283 | |||
284 | return(ret); | ||
285 | |||
286 | #ifndef OPENSSL_NO_DH /* avoid 'unreferenced label' warning if OPENSSL_NO_DH is defined */ | ||
287 | err: | ||
288 | #endif | ||
289 | #ifndef OPENSSL_NO_RSA | ||
290 | if (ret->rsa_tmp != NULL) | ||
291 | RSA_free(ret->rsa_tmp); | ||
292 | #endif | ||
293 | #ifndef OPENSSL_NO_DH | ||
294 | if (ret->dh_tmp != NULL) | ||
295 | DH_free(ret->dh_tmp); | ||
296 | #endif | ||
297 | |||
298 | for (i = 0; i < SSL_PKEY_NUM; i++) | ||
299 | { | ||
300 | if (ret->pkeys[i].x509 != NULL) | ||
301 | X509_free(ret->pkeys[i].x509); | ||
302 | if (ret->pkeys[i].privatekey != NULL) | ||
303 | EVP_PKEY_free(ret->pkeys[i].privatekey); | ||
304 | } | ||
305 | |||
306 | return NULL; | ||
307 | } | ||
308 | |||
309 | |||
310 | void ssl_cert_free(CERT *c) | ||
311 | { | ||
312 | int i; | ||
313 | |||
314 | if(c == NULL) | ||
315 | return; | ||
316 | |||
317 | i=CRYPTO_add(&c->references,-1,CRYPTO_LOCK_SSL_CERT); | ||
318 | #ifdef REF_PRINT | ||
319 | REF_PRINT("CERT",c); | ||
320 | #endif | ||
321 | if (i > 0) return; | ||
322 | #ifdef REF_CHECK | ||
323 | if (i < 0) | ||
324 | { | ||
325 | fprintf(stderr,"ssl_cert_free, bad reference count\n"); | ||
326 | abort(); /* ok */ | ||
327 | } | ||
328 | #endif | ||
329 | |||
330 | #ifndef OPENSSL_NO_RSA | ||
331 | if (c->rsa_tmp) RSA_free(c->rsa_tmp); | ||
332 | #endif | ||
333 | #ifndef OPENSSL_NO_DH | ||
334 | if (c->dh_tmp) DH_free(c->dh_tmp); | ||
335 | #endif | ||
336 | |||
337 | for (i=0; i<SSL_PKEY_NUM; i++) | ||
338 | { | ||
339 | if (c->pkeys[i].x509 != NULL) | ||
340 | X509_free(c->pkeys[i].x509); | ||
341 | if (c->pkeys[i].privatekey != NULL) | ||
342 | EVP_PKEY_free(c->pkeys[i].privatekey); | ||
343 | #if 0 | ||
344 | if (c->pkeys[i].publickey != NULL) | ||
345 | EVP_PKEY_free(c->pkeys[i].publickey); | ||
346 | #endif | ||
347 | } | ||
348 | OPENSSL_free(c); | ||
349 | } | ||
350 | |||
351 | int ssl_cert_inst(CERT **o) | ||
352 | { | ||
353 | /* Create a CERT if there isn't already one | ||
354 | * (which cannot really happen, as it is initially created in | ||
355 | * SSL_CTX_new; but the earlier code usually allows for that one | ||
356 | * being non-existant, so we follow that behaviour, as it might | ||
357 | * turn out that there actually is a reason for it -- but I'm | ||
358 | * not sure that *all* of the existing code could cope with | ||
359 | * s->cert being NULL, otherwise we could do without the | ||
360 | * initialization in SSL_CTX_new). | ||
361 | */ | ||
362 | |||
363 | if (o == NULL) | ||
364 | { | ||
365 | SSLerr(SSL_F_SSL_CERT_INST, ERR_R_PASSED_NULL_PARAMETER); | ||
366 | return(0); | ||
367 | } | ||
368 | if (*o == NULL) | ||
369 | { | ||
370 | if ((*o = ssl_cert_new()) == NULL) | ||
371 | { | ||
372 | SSLerr(SSL_F_SSL_CERT_INST, ERR_R_MALLOC_FAILURE); | ||
373 | return(0); | ||
374 | } | ||
375 | } | ||
376 | return(1); | ||
377 | } | ||
378 | |||
379 | |||
380 | SESS_CERT *ssl_sess_cert_new(void) | ||
381 | { | ||
382 | SESS_CERT *ret; | ||
383 | |||
384 | ret = OPENSSL_malloc(sizeof *ret); | ||
385 | if (ret == NULL) | ||
386 | { | ||
387 | SSLerr(SSL_F_SSL_SESS_CERT_NEW, ERR_R_MALLOC_FAILURE); | ||
388 | return NULL; | ||
389 | } | ||
390 | |||
391 | memset(ret, 0 ,sizeof *ret); | ||
392 | ret->peer_key = &(ret->peer_pkeys[SSL_PKEY_RSA_ENC]); | ||
393 | ret->references = 1; | ||
394 | |||
395 | return ret; | ||
396 | } | ||
397 | |||
398 | void ssl_sess_cert_free(SESS_CERT *sc) | ||
399 | { | ||
400 | int i; | ||
401 | |||
402 | if (sc == NULL) | ||
403 | return; | ||
404 | |||
405 | i = CRYPTO_add(&sc->references, -1, CRYPTO_LOCK_SSL_SESS_CERT); | ||
406 | #ifdef REF_PRINT | ||
407 | REF_PRINT("SESS_CERT", sc); | ||
408 | #endif | ||
409 | if (i > 0) | ||
410 | return; | ||
411 | #ifdef REF_CHECK | ||
412 | if (i < 0) | ||
413 | { | ||
414 | fprintf(stderr,"ssl_sess_cert_free, bad reference count\n"); | ||
415 | abort(); /* ok */ | ||
416 | } | ||
417 | #endif | ||
418 | |||
419 | /* i == 0 */ | ||
420 | if (sc->cert_chain != NULL) | ||
421 | sk_X509_pop_free(sc->cert_chain, X509_free); | ||
422 | for (i = 0; i < SSL_PKEY_NUM; i++) | ||
423 | { | ||
424 | if (sc->peer_pkeys[i].x509 != NULL) | ||
425 | X509_free(sc->peer_pkeys[i].x509); | ||
426 | #if 0 /* We don't have the peer's private key. These lines are just | ||
427 | * here as a reminder that we're still using a not-quite-appropriate | ||
428 | * data structure. */ | ||
429 | if (sc->peer_pkeys[i].privatekey != NULL) | ||
430 | EVP_PKEY_free(sc->peer_pkeys[i].privatekey); | ||
431 | #endif | ||
432 | } | ||
433 | |||
434 | #ifndef OPENSSL_NO_RSA | ||
435 | if (sc->peer_rsa_tmp != NULL) | ||
436 | RSA_free(sc->peer_rsa_tmp); | ||
437 | #endif | ||
438 | #ifndef OPENSSL_NO_DH | ||
439 | if (sc->peer_dh_tmp != NULL) | ||
440 | DH_free(sc->peer_dh_tmp); | ||
441 | #endif | ||
442 | |||
443 | OPENSSL_free(sc); | ||
444 | } | ||
445 | |||
446 | int ssl_set_peer_cert_type(SESS_CERT *sc,int type) | ||
447 | { | ||
448 | sc->peer_cert_type = type; | ||
449 | return(1); | ||
450 | } | ||
451 | |||
452 | int ssl_verify_cert_chain(SSL *s,STACK_OF(X509) *sk) | ||
453 | { | ||
454 | X509 *x; | ||
455 | int i; | ||
456 | X509_STORE_CTX ctx; | ||
457 | |||
458 | if ((sk == NULL) || (sk_X509_num(sk) == 0)) | ||
459 | return(0); | ||
460 | |||
461 | x=sk_X509_value(sk,0); | ||
462 | if(!X509_STORE_CTX_init(&ctx,s->ctx->cert_store,x,sk)) | ||
463 | { | ||
464 | SSLerr(SSL_F_SSL_VERIFY_CERT_CHAIN,ERR_R_X509_LIB); | ||
465 | return(0); | ||
466 | } | ||
467 | if (SSL_get_verify_depth(s) >= 0) | ||
468 | X509_STORE_CTX_set_depth(&ctx, SSL_get_verify_depth(s)); | ||
469 | X509_STORE_CTX_set_ex_data(&ctx,SSL_get_ex_data_X509_STORE_CTX_idx(),s); | ||
470 | |||
471 | /* We need to set the verify purpose. The purpose can be determined by | ||
472 | * the context: if its a server it will verify SSL client certificates | ||
473 | * or vice versa. | ||
474 | */ | ||
475 | if (s->server) | ||
476 | i = X509_PURPOSE_SSL_CLIENT; | ||
477 | else | ||
478 | i = X509_PURPOSE_SSL_SERVER; | ||
479 | |||
480 | X509_STORE_CTX_purpose_inherit(&ctx, i, s->purpose, s->trust); | ||
481 | |||
482 | if (s->verify_callback) | ||
483 | X509_STORE_CTX_set_verify_cb(&ctx, s->verify_callback); | ||
484 | |||
485 | if (s->ctx->app_verify_callback != NULL) | ||
486 | #if 1 /* new with OpenSSL 0.9.7 */ | ||
487 | i=s->ctx->app_verify_callback(&ctx, s->ctx->app_verify_arg); | ||
488 | #else | ||
489 | i=s->ctx->app_verify_callback(&ctx); /* should pass app_verify_arg */ | ||
490 | #endif | ||
491 | else | ||
492 | { | ||
493 | #ifndef OPENSSL_NO_X509_VERIFY | ||
494 | i=X509_verify_cert(&ctx); | ||
495 | #else | ||
496 | i=0; | ||
497 | ctx.error=X509_V_ERR_APPLICATION_VERIFICATION; | ||
498 | SSLerr(SSL_F_SSL_VERIFY_CERT_CHAIN,SSL_R_NO_VERIFY_CALLBACK); | ||
499 | #endif | ||
500 | } | ||
501 | |||
502 | s->verify_result=ctx.error; | ||
503 | X509_STORE_CTX_cleanup(&ctx); | ||
504 | |||
505 | return(i); | ||
506 | } | ||
507 | |||
508 | static void set_client_CA_list(STACK_OF(X509_NAME) **ca_list,STACK_OF(X509_NAME) *list) | ||
509 | { | ||
510 | if (*ca_list != NULL) | ||
511 | sk_X509_NAME_pop_free(*ca_list,X509_NAME_free); | ||
512 | |||
513 | *ca_list=list; | ||
514 | } | ||
515 | |||
516 | STACK_OF(X509_NAME) *SSL_dup_CA_list(STACK_OF(X509_NAME) *sk) | ||
517 | { | ||
518 | int i; | ||
519 | STACK_OF(X509_NAME) *ret; | ||
520 | X509_NAME *name; | ||
521 | |||
522 | ret=sk_X509_NAME_new_null(); | ||
523 | for (i=0; i<sk_X509_NAME_num(sk); i++) | ||
524 | { | ||
525 | name=X509_NAME_dup(sk_X509_NAME_value(sk,i)); | ||
526 | if ((name == NULL) || !sk_X509_NAME_push(ret,name)) | ||
527 | { | ||
528 | sk_X509_NAME_pop_free(ret,X509_NAME_free); | ||
529 | return(NULL); | ||
530 | } | ||
531 | } | ||
532 | return(ret); | ||
533 | } | ||
534 | |||
535 | void SSL_set_client_CA_list(SSL *s,STACK_OF(X509_NAME) *list) | ||
536 | { | ||
537 | set_client_CA_list(&(s->client_CA),list); | ||
538 | } | ||
539 | |||
540 | void SSL_CTX_set_client_CA_list(SSL_CTX *ctx,STACK_OF(X509_NAME) *list) | ||
541 | { | ||
542 | set_client_CA_list(&(ctx->client_CA),list); | ||
543 | } | ||
544 | |||
545 | STACK_OF(X509_NAME) *SSL_CTX_get_client_CA_list(SSL_CTX *ctx) | ||
546 | { | ||
547 | return(ctx->client_CA); | ||
548 | } | ||
549 | |||
550 | STACK_OF(X509_NAME) *SSL_get_client_CA_list(SSL *s) | ||
551 | { | ||
552 | if (s->type == SSL_ST_CONNECT) | ||
553 | { /* we are in the client */ | ||
554 | if (((s->version>>8) == SSL3_VERSION_MAJOR) && | ||
555 | (s->s3 != NULL)) | ||
556 | return(s->s3->tmp.ca_names); | ||
557 | else | ||
558 | return(NULL); | ||
559 | } | ||
560 | else | ||
561 | { | ||
562 | if (s->client_CA != NULL) | ||
563 | return(s->client_CA); | ||
564 | else | ||
565 | return(s->ctx->client_CA); | ||
566 | } | ||
567 | } | ||
568 | |||
569 | static int add_client_CA(STACK_OF(X509_NAME) **sk,X509 *x) | ||
570 | { | ||
571 | X509_NAME *name; | ||
572 | |||
573 | if (x == NULL) return(0); | ||
574 | if ((*sk == NULL) && ((*sk=sk_X509_NAME_new_null()) == NULL)) | ||
575 | return(0); | ||
576 | |||
577 | if ((name=X509_NAME_dup(X509_get_subject_name(x))) == NULL) | ||
578 | return(0); | ||
579 | |||
580 | if (!sk_X509_NAME_push(*sk,name)) | ||
581 | { | ||
582 | X509_NAME_free(name); | ||
583 | return(0); | ||
584 | } | ||
585 | return(1); | ||
586 | } | ||
587 | |||
588 | int SSL_add_client_CA(SSL *ssl,X509 *x) | ||
589 | { | ||
590 | return(add_client_CA(&(ssl->client_CA),x)); | ||
591 | } | ||
592 | |||
593 | int SSL_CTX_add_client_CA(SSL_CTX *ctx,X509 *x) | ||
594 | { | ||
595 | return(add_client_CA(&(ctx->client_CA),x)); | ||
596 | } | ||
597 | |||
598 | static int xname_cmp(const X509_NAME * const *a, const X509_NAME * const *b) | ||
599 | { | ||
600 | return(X509_NAME_cmp(*a,*b)); | ||
601 | } | ||
602 | |||
603 | #ifndef OPENSSL_NO_STDIO | ||
604 | /*! | ||
605 | * Load CA certs from a file into a ::STACK. Note that it is somewhat misnamed; | ||
606 | * it doesn't really have anything to do with clients (except that a common use | ||
607 | * for a stack of CAs is to send it to the client). Actually, it doesn't have | ||
608 | * much to do with CAs, either, since it will load any old cert. | ||
609 | * \param file the file containing one or more certs. | ||
610 | * \return a ::STACK containing the certs. | ||
611 | */ | ||
612 | STACK_OF(X509_NAME) *SSL_load_client_CA_file(const char *file) | ||
613 | { | ||
614 | BIO *in; | ||
615 | X509 *x=NULL; | ||
616 | X509_NAME *xn=NULL; | ||
617 | STACK_OF(X509_NAME) *ret,*sk; | ||
618 | |||
619 | ret=sk_X509_NAME_new_null(); | ||
620 | sk=sk_X509_NAME_new(xname_cmp); | ||
621 | |||
622 | in=BIO_new(BIO_s_file_internal()); | ||
623 | |||
624 | if ((ret == NULL) || (sk == NULL) || (in == NULL)) | ||
625 | { | ||
626 | SSLerr(SSL_F_SSL_LOAD_CLIENT_CA_FILE,ERR_R_MALLOC_FAILURE); | ||
627 | goto err; | ||
628 | } | ||
629 | |||
630 | if (!BIO_read_filename(in,file)) | ||
631 | goto err; | ||
632 | |||
633 | for (;;) | ||
634 | { | ||
635 | if (PEM_read_bio_X509(in,&x,NULL,NULL) == NULL) | ||
636 | break; | ||
637 | if ((xn=X509_get_subject_name(x)) == NULL) goto err; | ||
638 | /* check for duplicates */ | ||
639 | xn=X509_NAME_dup(xn); | ||
640 | if (xn == NULL) goto err; | ||
641 | if (sk_X509_NAME_find(sk,xn) >= 0) | ||
642 | X509_NAME_free(xn); | ||
643 | else | ||
644 | { | ||
645 | sk_X509_NAME_push(sk,xn); | ||
646 | sk_X509_NAME_push(ret,xn); | ||
647 | } | ||
648 | } | ||
649 | |||
650 | if (0) | ||
651 | { | ||
652 | err: | ||
653 | if (ret != NULL) sk_X509_NAME_pop_free(ret,X509_NAME_free); | ||
654 | ret=NULL; | ||
655 | } | ||
656 | if (sk != NULL) sk_X509_NAME_free(sk); | ||
657 | if (in != NULL) BIO_free(in); | ||
658 | if (x != NULL) X509_free(x); | ||
659 | return(ret); | ||
660 | } | ||
661 | #endif | ||
662 | |||
663 | /*! | ||
664 | * Add a file of certs to a stack. | ||
665 | * \param stack the stack to add to. | ||
666 | * \param file the file to add from. All certs in this file that are not | ||
667 | * already in the stack will be added. | ||
668 | * \return 1 for success, 0 for failure. Note that in the case of failure some | ||
669 | * certs may have been added to \c stack. | ||
670 | */ | ||
671 | |||
672 | int SSL_add_file_cert_subjects_to_stack(STACK_OF(X509_NAME) *stack, | ||
673 | const char *file) | ||
674 | { | ||
675 | BIO *in; | ||
676 | X509 *x=NULL; | ||
677 | X509_NAME *xn=NULL; | ||
678 | int ret=1; | ||
679 | int (*oldcmp)(const X509_NAME * const *a, const X509_NAME * const *b); | ||
680 | |||
681 | oldcmp=sk_X509_NAME_set_cmp_func(stack,xname_cmp); | ||
682 | |||
683 | in=BIO_new(BIO_s_file_internal()); | ||
684 | |||
685 | if (in == NULL) | ||
686 | { | ||
687 | SSLerr(SSL_F_SSL_ADD_FILE_CERT_SUBJECTS_TO_STACK,ERR_R_MALLOC_FAILURE); | ||
688 | goto err; | ||
689 | } | ||
690 | |||
691 | if (!BIO_read_filename(in,file)) | ||
692 | goto err; | ||
693 | |||
694 | for (;;) | ||
695 | { | ||
696 | if (PEM_read_bio_X509(in,&x,NULL,NULL) == NULL) | ||
697 | break; | ||
698 | if ((xn=X509_get_subject_name(x)) == NULL) goto err; | ||
699 | xn=X509_NAME_dup(xn); | ||
700 | if (xn == NULL) goto err; | ||
701 | if (sk_X509_NAME_find(stack,xn) >= 0) | ||
702 | X509_NAME_free(xn); | ||
703 | else | ||
704 | sk_X509_NAME_push(stack,xn); | ||
705 | } | ||
706 | |||
707 | if (0) | ||
708 | { | ||
709 | err: | ||
710 | ret=0; | ||
711 | } | ||
712 | if(in != NULL) | ||
713 | BIO_free(in); | ||
714 | if(x != NULL) | ||
715 | X509_free(x); | ||
716 | |||
717 | sk_X509_NAME_set_cmp_func(stack,oldcmp); | ||
718 | |||
719 | return ret; | ||
720 | } | ||
721 | |||
722 | /*! | ||
723 | * Add a directory of certs to a stack. | ||
724 | * \param stack the stack to append to. | ||
725 | * \param dir the directory to append from. All files in this directory will be | ||
726 | * examined as potential certs. Any that are acceptable to | ||
727 | * SSL_add_dir_cert_subjects_to_stack() that are not already in the stack will be | ||
728 | * included. | ||
729 | * \return 1 for success, 0 for failure. Note that in the case of failure some | ||
730 | * certs may have been added to \c stack. | ||
731 | */ | ||
732 | |||
733 | #ifndef OPENSSL_SYS_WIN32 | ||
734 | #ifndef OPENSSL_SYS_VMS /* XXXX This may be fixed in the future */ | ||
735 | #ifndef OPENSSL_SYS_MACINTOSH_CLASSIC /* XXXXX: Better scheme needed! */ | ||
736 | |||
737 | int SSL_add_dir_cert_subjects_to_stack(STACK_OF(X509_NAME) *stack, | ||
738 | const char *dir) | ||
739 | { | ||
740 | DIR *d; | ||
741 | struct dirent *dstruct; | ||
742 | int ret = 0; | ||
743 | |||
744 | CRYPTO_w_lock(CRYPTO_LOCK_READDIR); | ||
745 | d = opendir(dir); | ||
746 | |||
747 | /* Note that a side effect is that the CAs will be sorted by name */ | ||
748 | if(!d) | ||
749 | { | ||
750 | SYSerr(SYS_F_OPENDIR, get_last_sys_error()); | ||
751 | ERR_add_error_data(3, "opendir('", dir, "')"); | ||
752 | SSLerr(SSL_F_SSL_ADD_DIR_CERT_SUBJECTS_TO_STACK, ERR_R_SYS_LIB); | ||
753 | goto err; | ||
754 | } | ||
755 | |||
756 | while((dstruct=readdir(d))) | ||
757 | { | ||
758 | char buf[1024]; | ||
759 | int r; | ||
760 | |||
761 | if(strlen(dir)+strlen(dstruct->d_name)+2 > sizeof buf) | ||
762 | { | ||
763 | SSLerr(SSL_F_SSL_ADD_DIR_CERT_SUBJECTS_TO_STACK,SSL_R_PATH_TOO_LONG); | ||
764 | goto err; | ||
765 | } | ||
766 | |||
767 | r = BIO_snprintf(buf,sizeof buf,"%s/%s",dir,dstruct->d_name); | ||
768 | if (r <= 0 || r >= sizeof buf) | ||
769 | goto err; | ||
770 | if(!SSL_add_file_cert_subjects_to_stack(stack,buf)) | ||
771 | goto err; | ||
772 | } | ||
773 | ret = 1; | ||
774 | |||
775 | err: | ||
776 | if (d) closedir(d); | ||
777 | CRYPTO_w_unlock(CRYPTO_LOCK_READDIR); | ||
778 | return ret; | ||
779 | } | ||
780 | |||
781 | #endif | ||
782 | #endif | ||
783 | |||
784 | #else /* OPENSSL_SYS_WIN32 */ | ||
785 | |||
786 | int SSL_add_dir_cert_subjects_to_stack(STACK_OF(X509_NAME) *stack, | ||
787 | const char *dir) | ||
788 | { | ||
789 | WIN32_FIND_DATA FindFileData; | ||
790 | HANDLE hFind; | ||
791 | int ret = 0; | ||
792 | #ifdef OPENSSL_SYS_WINCE | ||
793 | WCHAR* wdir = NULL; | ||
794 | #endif | ||
795 | |||
796 | CRYPTO_w_lock(CRYPTO_LOCK_READDIR); | ||
797 | |||
798 | #ifdef OPENSSL_SYS_WINCE | ||
799 | /* convert strings to UNICODE */ | ||
800 | { | ||
801 | BOOL result = FALSE; | ||
802 | int i; | ||
803 | wdir = malloc((strlen(dir)+1)*2); | ||
804 | if (wdir == NULL) | ||
805 | goto err_noclose; | ||
806 | for (i=0; i<(int)strlen(dir)+1; i++) | ||
807 | wdir[i] = (short)dir[i]; | ||
808 | } | ||
809 | #endif | ||
810 | |||
811 | #ifdef OPENSSL_SYS_WINCE | ||
812 | hFind = FindFirstFile(wdir, &FindFileData); | ||
813 | #else | ||
814 | hFind = FindFirstFile(dir, &FindFileData); | ||
815 | #endif | ||
816 | /* Note that a side effect is that the CAs will be sorted by name */ | ||
817 | if(hFind == INVALID_HANDLE_VALUE) | ||
818 | { | ||
819 | SYSerr(SYS_F_OPENDIR, get_last_sys_error()); | ||
820 | ERR_add_error_data(3, "opendir('", dir, "')"); | ||
821 | SSLerr(SSL_F_SSL_ADD_DIR_CERT_SUBJECTS_TO_STACK, ERR_R_SYS_LIB); | ||
822 | goto err_noclose; | ||
823 | } | ||
824 | |||
825 | do | ||
826 | { | ||
827 | char buf[1024]; | ||
828 | int r; | ||
829 | |||
830 | #ifdef OPENSSL_SYS_WINCE | ||
831 | if(strlen(dir)+_tcslen(FindFileData.cFileName)+2 > sizeof buf) | ||
832 | #else | ||
833 | if(strlen(dir)+strlen(FindFileData.cFileName)+2 > sizeof buf) | ||
834 | #endif | ||
835 | { | ||
836 | SSLerr(SSL_F_SSL_ADD_DIR_CERT_SUBJECTS_TO_STACK,SSL_R_PATH_TOO_LONG); | ||
837 | goto err; | ||
838 | } | ||
839 | |||
840 | r = BIO_snprintf(buf,sizeof buf,"%s/%s",dir,FindFileData.cFileName); | ||
841 | if (r <= 0 || r >= sizeof buf) | ||
842 | goto err; | ||
843 | if(!SSL_add_file_cert_subjects_to_stack(stack,buf)) | ||
844 | goto err; | ||
845 | } | ||
846 | while (FindNextFile(hFind, &FindFileData) != FALSE); | ||
847 | ret = 1; | ||
848 | |||
849 | err: | ||
850 | FindClose(hFind); | ||
851 | err_noclose: | ||
852 | #ifdef OPENSSL_SYS_WINCE | ||
853 | if (wdir != NULL) | ||
854 | free(wdir); | ||
855 | #endif | ||
856 | CRYPTO_w_unlock(CRYPTO_LOCK_READDIR); | ||
857 | return ret; | ||
858 | } | ||
859 | |||
860 | #endif | ||
diff --git a/src/lib/libssl/ssl_ciph.c b/src/lib/libssl/ssl_ciph.c deleted file mode 100644 index 532fb4e80d..0000000000 --- a/src/lib/libssl/ssl_ciph.c +++ /dev/null | |||
@@ -1,1145 +0,0 @@ | |||
1 | /* ssl/ssl_ciph.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 <openssl/objects.h> | ||
61 | #include <openssl/comp.h> | ||
62 | #include "ssl_locl.h" | ||
63 | |||
64 | #define SSL_ENC_DES_IDX 0 | ||
65 | #define SSL_ENC_3DES_IDX 1 | ||
66 | #define SSL_ENC_RC4_IDX 2 | ||
67 | #define SSL_ENC_RC2_IDX 3 | ||
68 | #define SSL_ENC_IDEA_IDX 4 | ||
69 | #define SSL_ENC_eFZA_IDX 5 | ||
70 | #define SSL_ENC_NULL_IDX 6 | ||
71 | #define SSL_ENC_AES128_IDX 7 | ||
72 | #define SSL_ENC_AES256_IDX 8 | ||
73 | #define SSL_ENC_NUM_IDX 9 | ||
74 | |||
75 | static const EVP_CIPHER *ssl_cipher_methods[SSL_ENC_NUM_IDX]={ | ||
76 | NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL | ||
77 | }; | ||
78 | |||
79 | static STACK_OF(SSL_COMP) *ssl_comp_methods=NULL; | ||
80 | |||
81 | #define SSL_MD_MD5_IDX 0 | ||
82 | #define SSL_MD_SHA1_IDX 1 | ||
83 | #define SSL_MD_NUM_IDX 2 | ||
84 | static const EVP_MD *ssl_digest_methods[SSL_MD_NUM_IDX]={ | ||
85 | NULL,NULL, | ||
86 | }; | ||
87 | |||
88 | #define CIPHER_ADD 1 | ||
89 | #define CIPHER_KILL 2 | ||
90 | #define CIPHER_DEL 3 | ||
91 | #define CIPHER_ORD 4 | ||
92 | #define CIPHER_SPECIAL 5 | ||
93 | |||
94 | typedef struct cipher_order_st | ||
95 | { | ||
96 | SSL_CIPHER *cipher; | ||
97 | int active; | ||
98 | int dead; | ||
99 | struct cipher_order_st *next,*prev; | ||
100 | } CIPHER_ORDER; | ||
101 | |||
102 | static const SSL_CIPHER cipher_aliases[]={ | ||
103 | /* Don't include eNULL unless specifically enabled. */ | ||
104 | {0,SSL_TXT_ALL, 0,SSL_ALL & ~SSL_eNULL, SSL_ALL ,0,0,0,SSL_ALL,SSL_ALL}, /* must be first */ | ||
105 | {0,SSL_TXT_CMPALL,0,SSL_eNULL,0,0,0,0,SSL_ENC_MASK,0}, /* COMPLEMENT OF ALL */ | ||
106 | {0,SSL_TXT_CMPDEF,0,SSL_ADH, 0,0,0,0,SSL_AUTH_MASK,0}, | ||
107 | {0,SSL_TXT_kKRB5,0,SSL_kKRB5,0,0,0,0,SSL_MKEY_MASK,0}, /* VRS Kerberos5 */ | ||
108 | {0,SSL_TXT_kRSA,0,SSL_kRSA, 0,0,0,0,SSL_MKEY_MASK,0}, | ||
109 | {0,SSL_TXT_kDHr,0,SSL_kDHr, 0,0,0,0,SSL_MKEY_MASK,0}, | ||
110 | {0,SSL_TXT_kDHd,0,SSL_kDHd, 0,0,0,0,SSL_MKEY_MASK,0}, | ||
111 | {0,SSL_TXT_kEDH,0,SSL_kEDH, 0,0,0,0,SSL_MKEY_MASK,0}, | ||
112 | {0,SSL_TXT_kFZA,0,SSL_kFZA, 0,0,0,0,SSL_MKEY_MASK,0}, | ||
113 | {0,SSL_TXT_DH, 0,SSL_DH, 0,0,0,0,SSL_MKEY_MASK,0}, | ||
114 | {0,SSL_TXT_EDH, 0,SSL_EDH, 0,0,0,0,SSL_MKEY_MASK|SSL_AUTH_MASK,0}, | ||
115 | |||
116 | {0,SSL_TXT_aKRB5,0,SSL_aKRB5,0,0,0,0,SSL_AUTH_MASK,0}, /* VRS Kerberos5 */ | ||
117 | {0,SSL_TXT_aRSA,0,SSL_aRSA, 0,0,0,0,SSL_AUTH_MASK,0}, | ||
118 | {0,SSL_TXT_aDSS,0,SSL_aDSS, 0,0,0,0,SSL_AUTH_MASK,0}, | ||
119 | {0,SSL_TXT_aFZA,0,SSL_aFZA, 0,0,0,0,SSL_AUTH_MASK,0}, | ||
120 | {0,SSL_TXT_aNULL,0,SSL_aNULL,0,0,0,0,SSL_AUTH_MASK,0}, | ||
121 | {0,SSL_TXT_aDH, 0,SSL_aDH, 0,0,0,0,SSL_AUTH_MASK,0}, | ||
122 | {0,SSL_TXT_DSS, 0,SSL_DSS, 0,0,0,0,SSL_AUTH_MASK,0}, | ||
123 | |||
124 | {0,SSL_TXT_DES, 0,SSL_DES, 0,0,0,0,SSL_ENC_MASK,0}, | ||
125 | {0,SSL_TXT_3DES,0,SSL_3DES, 0,0,0,0,SSL_ENC_MASK,0}, | ||
126 | {0,SSL_TXT_RC4, 0,SSL_RC4, 0,0,0,0,SSL_ENC_MASK,0}, | ||
127 | {0,SSL_TXT_RC2, 0,SSL_RC2, 0,0,0,0,SSL_ENC_MASK,0}, | ||
128 | #ifndef OPENSSL_NO_IDEA | ||
129 | {0,SSL_TXT_IDEA,0,SSL_IDEA, 0,0,0,0,SSL_ENC_MASK,0}, | ||
130 | #endif | ||
131 | {0,SSL_TXT_eNULL,0,SSL_eNULL,0,0,0,0,SSL_ENC_MASK,0}, | ||
132 | {0,SSL_TXT_eFZA,0,SSL_eFZA, 0,0,0,0,SSL_ENC_MASK,0}, | ||
133 | {0,SSL_TXT_AES, 0,SSL_AES, 0,0,0,0,SSL_ENC_MASK,0}, | ||
134 | |||
135 | {0,SSL_TXT_MD5, 0,SSL_MD5, 0,0,0,0,SSL_MAC_MASK,0}, | ||
136 | {0,SSL_TXT_SHA1,0,SSL_SHA1, 0,0,0,0,SSL_MAC_MASK,0}, | ||
137 | {0,SSL_TXT_SHA, 0,SSL_SHA, 0,0,0,0,SSL_MAC_MASK,0}, | ||
138 | |||
139 | {0,SSL_TXT_NULL,0,SSL_NULL, 0,0,0,0,SSL_ENC_MASK,0}, | ||
140 | {0,SSL_TXT_KRB5,0,SSL_KRB5, 0,0,0,0,SSL_AUTH_MASK|SSL_MKEY_MASK,0}, | ||
141 | {0,SSL_TXT_RSA, 0,SSL_RSA, 0,0,0,0,SSL_AUTH_MASK|SSL_MKEY_MASK,0}, | ||
142 | {0,SSL_TXT_ADH, 0,SSL_ADH, 0,0,0,0,SSL_AUTH_MASK|SSL_MKEY_MASK,0}, | ||
143 | {0,SSL_TXT_FZA, 0,SSL_FZA, 0,0,0,0,SSL_AUTH_MASK|SSL_MKEY_MASK|SSL_ENC_MASK,0}, | ||
144 | |||
145 | {0,SSL_TXT_SSLV2, 0,SSL_SSLV2, 0,0,0,0,SSL_SSL_MASK,0}, | ||
146 | {0,SSL_TXT_SSLV3, 0,SSL_SSLV3, 0,0,0,0,SSL_SSL_MASK,0}, | ||
147 | {0,SSL_TXT_TLSV1, 0,SSL_TLSV1, 0,0,0,0,SSL_SSL_MASK,0}, | ||
148 | |||
149 | {0,SSL_TXT_EXP ,0, 0,SSL_EXPORT, 0,0,0,0,SSL_EXP_MASK}, | ||
150 | {0,SSL_TXT_EXPORT,0, 0,SSL_EXPORT, 0,0,0,0,SSL_EXP_MASK}, | ||
151 | {0,SSL_TXT_EXP40, 0, 0, SSL_EXP40, 0,0,0,0,SSL_STRONG_MASK}, | ||
152 | {0,SSL_TXT_EXP56, 0, 0, SSL_EXP56, 0,0,0,0,SSL_STRONG_MASK}, | ||
153 | {0,SSL_TXT_LOW, 0, 0, SSL_LOW, 0,0,0,0,SSL_STRONG_MASK}, | ||
154 | {0,SSL_TXT_MEDIUM,0, 0,SSL_MEDIUM, 0,0,0,0,SSL_STRONG_MASK}, | ||
155 | {0,SSL_TXT_HIGH, 0, 0, SSL_HIGH, 0,0,0,0,SSL_STRONG_MASK}, | ||
156 | }; | ||
157 | |||
158 | static int init_ciphers=1; | ||
159 | |||
160 | static void load_ciphers(void) | ||
161 | { | ||
162 | init_ciphers=0; | ||
163 | ssl_cipher_methods[SSL_ENC_DES_IDX]= | ||
164 | EVP_get_cipherbyname(SN_des_cbc); | ||
165 | ssl_cipher_methods[SSL_ENC_3DES_IDX]= | ||
166 | EVP_get_cipherbyname(SN_des_ede3_cbc); | ||
167 | ssl_cipher_methods[SSL_ENC_RC4_IDX]= | ||
168 | EVP_get_cipherbyname(SN_rc4); | ||
169 | ssl_cipher_methods[SSL_ENC_RC2_IDX]= | ||
170 | EVP_get_cipherbyname(SN_rc2_cbc); | ||
171 | #ifndef OPENSSL_NO_IDEA | ||
172 | ssl_cipher_methods[SSL_ENC_IDEA_IDX]= | ||
173 | EVP_get_cipherbyname(SN_idea_cbc); | ||
174 | #else | ||
175 | ssl_cipher_methods[SSL_ENC_IDEA_IDX]= NULL; | ||
176 | #endif | ||
177 | ssl_cipher_methods[SSL_ENC_AES128_IDX]= | ||
178 | EVP_get_cipherbyname(SN_aes_128_cbc); | ||
179 | ssl_cipher_methods[SSL_ENC_AES256_IDX]= | ||
180 | EVP_get_cipherbyname(SN_aes_256_cbc); | ||
181 | |||
182 | ssl_digest_methods[SSL_MD_MD5_IDX]= | ||
183 | EVP_get_digestbyname(SN_md5); | ||
184 | ssl_digest_methods[SSL_MD_SHA1_IDX]= | ||
185 | EVP_get_digestbyname(SN_sha1); | ||
186 | } | ||
187 | |||
188 | int ssl_cipher_get_evp(SSL_SESSION *s, const EVP_CIPHER **enc, | ||
189 | const EVP_MD **md, SSL_COMP **comp) | ||
190 | { | ||
191 | int i; | ||
192 | SSL_CIPHER *c; | ||
193 | |||
194 | c=s->cipher; | ||
195 | if (c == NULL) return(0); | ||
196 | if (comp != NULL) | ||
197 | { | ||
198 | SSL_COMP ctmp; | ||
199 | |||
200 | if (s->compress_meth == 0) | ||
201 | *comp=NULL; | ||
202 | else if (ssl_comp_methods == NULL) | ||
203 | { | ||
204 | /* bad */ | ||
205 | *comp=NULL; | ||
206 | } | ||
207 | else | ||
208 | { | ||
209 | |||
210 | ctmp.id=s->compress_meth; | ||
211 | i=sk_SSL_COMP_find(ssl_comp_methods,&ctmp); | ||
212 | if (i >= 0) | ||
213 | *comp=sk_SSL_COMP_value(ssl_comp_methods,i); | ||
214 | else | ||
215 | *comp=NULL; | ||
216 | } | ||
217 | } | ||
218 | |||
219 | if ((enc == NULL) || (md == NULL)) return(0); | ||
220 | |||
221 | switch (c->algorithms & SSL_ENC_MASK) | ||
222 | { | ||
223 | case SSL_DES: | ||
224 | i=SSL_ENC_DES_IDX; | ||
225 | break; | ||
226 | case SSL_3DES: | ||
227 | i=SSL_ENC_3DES_IDX; | ||
228 | break; | ||
229 | case SSL_RC4: | ||
230 | i=SSL_ENC_RC4_IDX; | ||
231 | break; | ||
232 | case SSL_RC2: | ||
233 | i=SSL_ENC_RC2_IDX; | ||
234 | break; | ||
235 | case SSL_IDEA: | ||
236 | i=SSL_ENC_IDEA_IDX; | ||
237 | break; | ||
238 | case SSL_eNULL: | ||
239 | i=SSL_ENC_NULL_IDX; | ||
240 | break; | ||
241 | case SSL_AES: | ||
242 | switch(c->alg_bits) | ||
243 | { | ||
244 | case 128: i=SSL_ENC_AES128_IDX; break; | ||
245 | case 256: i=SSL_ENC_AES256_IDX; break; | ||
246 | default: i=-1; break; | ||
247 | } | ||
248 | break; | ||
249 | default: | ||
250 | i= -1; | ||
251 | break; | ||
252 | } | ||
253 | |||
254 | if ((i < 0) || (i >= SSL_ENC_NUM_IDX)) | ||
255 | *enc=NULL; | ||
256 | else | ||
257 | { | ||
258 | if (i == SSL_ENC_NULL_IDX) | ||
259 | *enc=EVP_enc_null(); | ||
260 | else | ||
261 | *enc=ssl_cipher_methods[i]; | ||
262 | } | ||
263 | |||
264 | switch (c->algorithms & SSL_MAC_MASK) | ||
265 | { | ||
266 | case SSL_MD5: | ||
267 | i=SSL_MD_MD5_IDX; | ||
268 | break; | ||
269 | case SSL_SHA1: | ||
270 | i=SSL_MD_SHA1_IDX; | ||
271 | break; | ||
272 | default: | ||
273 | i= -1; | ||
274 | break; | ||
275 | } | ||
276 | if ((i < 0) || (i >= SSL_MD_NUM_IDX)) | ||
277 | *md=NULL; | ||
278 | else | ||
279 | *md=ssl_digest_methods[i]; | ||
280 | |||
281 | if ((*enc != NULL) && (*md != NULL)) | ||
282 | return(1); | ||
283 | else | ||
284 | return(0); | ||
285 | } | ||
286 | |||
287 | #define ITEM_SEP(a) \ | ||
288 | (((a) == ':') || ((a) == ' ') || ((a) == ';') || ((a) == ',')) | ||
289 | |||
290 | static void ll_append_tail(CIPHER_ORDER **head, CIPHER_ORDER *curr, | ||
291 | CIPHER_ORDER **tail) | ||
292 | { | ||
293 | if (curr == *tail) return; | ||
294 | if (curr == *head) | ||
295 | *head=curr->next; | ||
296 | if (curr->prev != NULL) | ||
297 | curr->prev->next=curr->next; | ||
298 | if (curr->next != NULL) /* should always be true */ | ||
299 | curr->next->prev=curr->prev; | ||
300 | (*tail)->next=curr; | ||
301 | curr->prev= *tail; | ||
302 | curr->next=NULL; | ||
303 | *tail=curr; | ||
304 | } | ||
305 | |||
306 | static unsigned long ssl_cipher_get_disabled(void) | ||
307 | { | ||
308 | unsigned long mask; | ||
309 | |||
310 | mask = SSL_kFZA; | ||
311 | #ifdef OPENSSL_NO_RSA | ||
312 | mask |= SSL_aRSA|SSL_kRSA; | ||
313 | #endif | ||
314 | #ifdef OPENSSL_NO_DSA | ||
315 | mask |= SSL_aDSS; | ||
316 | #endif | ||
317 | #ifdef OPENSSL_NO_DH | ||
318 | mask |= SSL_kDHr|SSL_kDHd|SSL_kEDH|SSL_aDH; | ||
319 | #endif | ||
320 | #ifdef OPENSSL_NO_KRB5 | ||
321 | mask |= SSL_kKRB5|SSL_aKRB5; | ||
322 | #endif | ||
323 | |||
324 | #ifdef SSL_FORBID_ENULL | ||
325 | mask |= SSL_eNULL; | ||
326 | #endif | ||
327 | |||
328 | mask |= (ssl_cipher_methods[SSL_ENC_DES_IDX ] == NULL) ? SSL_DES :0; | ||
329 | mask |= (ssl_cipher_methods[SSL_ENC_3DES_IDX] == NULL) ? SSL_3DES:0; | ||
330 | mask |= (ssl_cipher_methods[SSL_ENC_RC4_IDX ] == NULL) ? SSL_RC4 :0; | ||
331 | mask |= (ssl_cipher_methods[SSL_ENC_RC2_IDX ] == NULL) ? SSL_RC2 :0; | ||
332 | mask |= (ssl_cipher_methods[SSL_ENC_IDEA_IDX] == NULL) ? SSL_IDEA:0; | ||
333 | mask |= (ssl_cipher_methods[SSL_ENC_eFZA_IDX] == NULL) ? SSL_eFZA:0; | ||
334 | mask |= (ssl_cipher_methods[SSL_ENC_AES128_IDX] == NULL) ? SSL_AES:0; | ||
335 | |||
336 | mask |= (ssl_digest_methods[SSL_MD_MD5_IDX ] == NULL) ? SSL_MD5 :0; | ||
337 | mask |= (ssl_digest_methods[SSL_MD_SHA1_IDX] == NULL) ? SSL_SHA1:0; | ||
338 | |||
339 | return(mask); | ||
340 | } | ||
341 | |||
342 | static void ssl_cipher_collect_ciphers(const SSL_METHOD *ssl_method, | ||
343 | int num_of_ciphers, unsigned long mask, CIPHER_ORDER *list, | ||
344 | CIPHER_ORDER **head_p, CIPHER_ORDER **tail_p) | ||
345 | { | ||
346 | int i, list_num; | ||
347 | SSL_CIPHER *c; | ||
348 | |||
349 | /* | ||
350 | * We have num_of_ciphers descriptions compiled in, depending on the | ||
351 | * method selected (SSLv2 and/or SSLv3, TLSv1 etc). | ||
352 | * These will later be sorted in a linked list with at most num | ||
353 | * entries. | ||
354 | */ | ||
355 | |||
356 | /* Get the initial list of ciphers */ | ||
357 | list_num = 0; /* actual count of ciphers */ | ||
358 | for (i = 0; i < num_of_ciphers; i++) | ||
359 | { | ||
360 | c = ssl_method->get_cipher(i); | ||
361 | /* drop those that use any of that is not available */ | ||
362 | if ((c != NULL) && c->valid && !(c->algorithms & mask)) | ||
363 | { | ||
364 | list[list_num].cipher = c; | ||
365 | list[list_num].next = NULL; | ||
366 | list[list_num].prev = NULL; | ||
367 | list[list_num].active = 0; | ||
368 | list_num++; | ||
369 | #ifdef KSSL_DEBUG | ||
370 | printf("\t%d: %s %lx %lx\n",i,c->name,c->id,c->algorithms); | ||
371 | #endif /* KSSL_DEBUG */ | ||
372 | /* | ||
373 | if (!sk_push(ca_list,(char *)c)) goto err; | ||
374 | */ | ||
375 | } | ||
376 | } | ||
377 | |||
378 | /* | ||
379 | * Prepare linked list from list entries | ||
380 | */ | ||
381 | for (i = 1; i < list_num - 1; i++) | ||
382 | { | ||
383 | list[i].prev = &(list[i-1]); | ||
384 | list[i].next = &(list[i+1]); | ||
385 | } | ||
386 | if (list_num > 0) | ||
387 | { | ||
388 | (*head_p) = &(list[0]); | ||
389 | (*head_p)->prev = NULL; | ||
390 | (*head_p)->next = &(list[1]); | ||
391 | (*tail_p) = &(list[list_num - 1]); | ||
392 | (*tail_p)->prev = &(list[list_num - 2]); | ||
393 | (*tail_p)->next = NULL; | ||
394 | } | ||
395 | } | ||
396 | |||
397 | static void ssl_cipher_collect_aliases(SSL_CIPHER **ca_list, | ||
398 | int num_of_group_aliases, unsigned long mask, | ||
399 | CIPHER_ORDER *head) | ||
400 | { | ||
401 | CIPHER_ORDER *ciph_curr; | ||
402 | SSL_CIPHER **ca_curr; | ||
403 | int i; | ||
404 | |||
405 | /* | ||
406 | * First, add the real ciphers as already collected | ||
407 | */ | ||
408 | ciph_curr = head; | ||
409 | ca_curr = ca_list; | ||
410 | while (ciph_curr != NULL) | ||
411 | { | ||
412 | *ca_curr = ciph_curr->cipher; | ||
413 | ca_curr++; | ||
414 | ciph_curr = ciph_curr->next; | ||
415 | } | ||
416 | |||
417 | /* | ||
418 | * Now we add the available ones from the cipher_aliases[] table. | ||
419 | * They represent either an algorithm, that must be fully | ||
420 | * supported (not match any bit in mask) or represent a cipher | ||
421 | * strength value (will be added in any case because algorithms=0). | ||
422 | */ | ||
423 | for (i = 0; i < num_of_group_aliases; i++) | ||
424 | { | ||
425 | if ((i == 0) || /* always fetch "ALL" */ | ||
426 | !(cipher_aliases[i].algorithms & mask)) | ||
427 | { | ||
428 | *ca_curr = (SSL_CIPHER *)(cipher_aliases + i); | ||
429 | ca_curr++; | ||
430 | } | ||
431 | } | ||
432 | |||
433 | *ca_curr = NULL; /* end of list */ | ||
434 | } | ||
435 | |||
436 | static void ssl_cipher_apply_rule(unsigned long algorithms, unsigned long mask, | ||
437 | unsigned long algo_strength, unsigned long mask_strength, | ||
438 | int rule, int strength_bits, CIPHER_ORDER *list, | ||
439 | CIPHER_ORDER **head_p, CIPHER_ORDER **tail_p) | ||
440 | { | ||
441 | CIPHER_ORDER *head, *tail, *curr, *curr2, *tail2; | ||
442 | SSL_CIPHER *cp; | ||
443 | unsigned long ma, ma_s; | ||
444 | |||
445 | #ifdef CIPHER_DEBUG | ||
446 | printf("Applying rule %d with %08lx %08lx %08lx %08lx (%d)\n", | ||
447 | rule, algorithms, mask, algo_strength, mask_strength, | ||
448 | strength_bits); | ||
449 | #endif | ||
450 | |||
451 | curr = head = *head_p; | ||
452 | curr2 = head; | ||
453 | tail2 = tail = *tail_p; | ||
454 | for (;;) | ||
455 | { | ||
456 | if ((curr == NULL) || (curr == tail2)) break; | ||
457 | curr = curr2; | ||
458 | curr2 = curr->next; | ||
459 | |||
460 | cp = curr->cipher; | ||
461 | |||
462 | /* | ||
463 | * Selection criteria is either the number of strength_bits | ||
464 | * or the algorithm used. | ||
465 | */ | ||
466 | if (strength_bits == -1) | ||
467 | { | ||
468 | ma = mask & cp->algorithms; | ||
469 | ma_s = mask_strength & cp->algo_strength; | ||
470 | |||
471 | #ifdef CIPHER_DEBUG | ||
472 | printf("\nName: %s:\nAlgo = %08lx Algo_strength = %08lx\nMask = %08lx Mask_strength %08lx\n", cp->name, cp->algorithms, cp->algo_strength, mask, mask_strength); | ||
473 | printf("ma = %08lx ma_s %08lx, ma&algo=%08lx, ma_s&algos=%08lx\n", ma, ma_s, ma&algorithms, ma_s&algo_strength); | ||
474 | #endif | ||
475 | /* | ||
476 | * Select: if none of the mask bit was met from the | ||
477 | * cipher or not all of the bits were met, the | ||
478 | * selection does not apply. | ||
479 | */ | ||
480 | if (((ma == 0) && (ma_s == 0)) || | ||
481 | ((ma & algorithms) != ma) || | ||
482 | ((ma_s & algo_strength) != ma_s)) | ||
483 | continue; /* does not apply */ | ||
484 | } | ||
485 | else if (strength_bits != cp->strength_bits) | ||
486 | continue; /* does not apply */ | ||
487 | |||
488 | #ifdef CIPHER_DEBUG | ||
489 | printf("Action = %d\n", rule); | ||
490 | #endif | ||
491 | |||
492 | /* add the cipher if it has not been added yet. */ | ||
493 | if (rule == CIPHER_ADD) | ||
494 | { | ||
495 | if (!curr->active) | ||
496 | { | ||
497 | ll_append_tail(&head, curr, &tail); | ||
498 | curr->active = 1; | ||
499 | } | ||
500 | } | ||
501 | /* Move the added cipher to this location */ | ||
502 | else if (rule == CIPHER_ORD) | ||
503 | { | ||
504 | if (curr->active) | ||
505 | { | ||
506 | ll_append_tail(&head, curr, &tail); | ||
507 | } | ||
508 | } | ||
509 | else if (rule == CIPHER_DEL) | ||
510 | curr->active = 0; | ||
511 | else if (rule == CIPHER_KILL) | ||
512 | { | ||
513 | if (head == curr) | ||
514 | head = curr->next; | ||
515 | else | ||
516 | curr->prev->next = curr->next; | ||
517 | if (tail == curr) | ||
518 | tail = curr->prev; | ||
519 | curr->active = 0; | ||
520 | if (curr->next != NULL) | ||
521 | curr->next->prev = curr->prev; | ||
522 | if (curr->prev != NULL) | ||
523 | curr->prev->next = curr->next; | ||
524 | curr->next = NULL; | ||
525 | curr->prev = NULL; | ||
526 | } | ||
527 | } | ||
528 | |||
529 | *head_p = head; | ||
530 | *tail_p = tail; | ||
531 | } | ||
532 | |||
533 | static int ssl_cipher_strength_sort(CIPHER_ORDER *list, CIPHER_ORDER **head_p, | ||
534 | CIPHER_ORDER **tail_p) | ||
535 | { | ||
536 | int max_strength_bits, i, *number_uses; | ||
537 | CIPHER_ORDER *curr; | ||
538 | |||
539 | /* | ||
540 | * This routine sorts the ciphers with descending strength. The sorting | ||
541 | * must keep the pre-sorted sequence, so we apply the normal sorting | ||
542 | * routine as '+' movement to the end of the list. | ||
543 | */ | ||
544 | max_strength_bits = 0; | ||
545 | curr = *head_p; | ||
546 | while (curr != NULL) | ||
547 | { | ||
548 | if (curr->active && | ||
549 | (curr->cipher->strength_bits > max_strength_bits)) | ||
550 | max_strength_bits = curr->cipher->strength_bits; | ||
551 | curr = curr->next; | ||
552 | } | ||
553 | |||
554 | number_uses = OPENSSL_malloc((max_strength_bits + 1) * sizeof(int)); | ||
555 | if (!number_uses) | ||
556 | { | ||
557 | SSLerr(SSL_F_SSL_CIPHER_STRENGTH_SORT,ERR_R_MALLOC_FAILURE); | ||
558 | return(0); | ||
559 | } | ||
560 | memset(number_uses, 0, (max_strength_bits + 1) * sizeof(int)); | ||
561 | |||
562 | /* | ||
563 | * Now find the strength_bits values actually used | ||
564 | */ | ||
565 | curr = *head_p; | ||
566 | while (curr != NULL) | ||
567 | { | ||
568 | if (curr->active) | ||
569 | number_uses[curr->cipher->strength_bits]++; | ||
570 | curr = curr->next; | ||
571 | } | ||
572 | /* | ||
573 | * Go through the list of used strength_bits values in descending | ||
574 | * order. | ||
575 | */ | ||
576 | for (i = max_strength_bits; i >= 0; i--) | ||
577 | if (number_uses[i] > 0) | ||
578 | ssl_cipher_apply_rule(0, 0, 0, 0, CIPHER_ORD, i, | ||
579 | list, head_p, tail_p); | ||
580 | |||
581 | OPENSSL_free(number_uses); | ||
582 | return(1); | ||
583 | } | ||
584 | |||
585 | static int ssl_cipher_process_rulestr(const char *rule_str, | ||
586 | CIPHER_ORDER *list, CIPHER_ORDER **head_p, | ||
587 | CIPHER_ORDER **tail_p, SSL_CIPHER **ca_list) | ||
588 | { | ||
589 | unsigned long algorithms, mask, algo_strength, mask_strength; | ||
590 | const char *l, *start, *buf; | ||
591 | int j, multi, found, rule, retval, ok, buflen; | ||
592 | char ch; | ||
593 | |||
594 | retval = 1; | ||
595 | l = rule_str; | ||
596 | for (;;) | ||
597 | { | ||
598 | ch = *l; | ||
599 | |||
600 | if (ch == '\0') | ||
601 | break; /* done */ | ||
602 | if (ch == '-') | ||
603 | { rule = CIPHER_DEL; l++; } | ||
604 | else if (ch == '+') | ||
605 | { rule = CIPHER_ORD; l++; } | ||
606 | else if (ch == '!') | ||
607 | { rule = CIPHER_KILL; l++; } | ||
608 | else if (ch == '@') | ||
609 | { rule = CIPHER_SPECIAL; l++; } | ||
610 | else | ||
611 | { rule = CIPHER_ADD; } | ||
612 | |||
613 | if (ITEM_SEP(ch)) | ||
614 | { | ||
615 | l++; | ||
616 | continue; | ||
617 | } | ||
618 | |||
619 | algorithms = mask = algo_strength = mask_strength = 0; | ||
620 | |||
621 | start=l; | ||
622 | for (;;) | ||
623 | { | ||
624 | ch = *l; | ||
625 | buf = l; | ||
626 | buflen = 0; | ||
627 | #ifndef CHARSET_EBCDIC | ||
628 | while ( ((ch >= 'A') && (ch <= 'Z')) || | ||
629 | ((ch >= '0') && (ch <= '9')) || | ||
630 | ((ch >= 'a') && (ch <= 'z')) || | ||
631 | (ch == '-')) | ||
632 | #else | ||
633 | while ( isalnum(ch) || (ch == '-')) | ||
634 | #endif | ||
635 | { | ||
636 | ch = *(++l); | ||
637 | buflen++; | ||
638 | } | ||
639 | |||
640 | if (buflen == 0) | ||
641 | { | ||
642 | /* | ||
643 | * We hit something we cannot deal with, | ||
644 | * it is no command or separator nor | ||
645 | * alphanumeric, so we call this an error. | ||
646 | */ | ||
647 | SSLerr(SSL_F_SSL_CIPHER_PROCESS_RULESTR, | ||
648 | SSL_R_INVALID_COMMAND); | ||
649 | retval = found = 0; | ||
650 | l++; | ||
651 | break; | ||
652 | } | ||
653 | |||
654 | if (rule == CIPHER_SPECIAL) | ||
655 | { | ||
656 | found = 0; /* unused -- avoid compiler warning */ | ||
657 | break; /* special treatment */ | ||
658 | } | ||
659 | |||
660 | /* check for multi-part specification */ | ||
661 | if (ch == '+') | ||
662 | { | ||
663 | multi=1; | ||
664 | l++; | ||
665 | } | ||
666 | else | ||
667 | multi=0; | ||
668 | |||
669 | /* | ||
670 | * Now search for the cipher alias in the ca_list. Be careful | ||
671 | * with the strncmp, because the "buflen" limitation | ||
672 | * will make the rule "ADH:SOME" and the cipher | ||
673 | * "ADH-MY-CIPHER" look like a match for buflen=3. | ||
674 | * So additionally check whether the cipher name found | ||
675 | * has the correct length. We can save a strlen() call: | ||
676 | * just checking for the '\0' at the right place is | ||
677 | * sufficient, we have to strncmp() anyway. (We cannot | ||
678 | * use strcmp(), because buf is not '\0' terminated.) | ||
679 | */ | ||
680 | j = found = 0; | ||
681 | while (ca_list[j]) | ||
682 | { | ||
683 | if (!strncmp(buf, ca_list[j]->name, buflen) && | ||
684 | (ca_list[j]->name[buflen] == '\0')) | ||
685 | { | ||
686 | found = 1; | ||
687 | break; | ||
688 | } | ||
689 | else | ||
690 | j++; | ||
691 | } | ||
692 | if (!found) | ||
693 | break; /* ignore this entry */ | ||
694 | |||
695 | algorithms |= ca_list[j]->algorithms; | ||
696 | mask |= ca_list[j]->mask; | ||
697 | algo_strength |= ca_list[j]->algo_strength; | ||
698 | mask_strength |= ca_list[j]->mask_strength; | ||
699 | |||
700 | if (!multi) break; | ||
701 | } | ||
702 | |||
703 | /* | ||
704 | * Ok, we have the rule, now apply it | ||
705 | */ | ||
706 | if (rule == CIPHER_SPECIAL) | ||
707 | { /* special command */ | ||
708 | ok = 0; | ||
709 | if ((buflen == 8) && | ||
710 | !strncmp(buf, "STRENGTH", 8)) | ||
711 | ok = ssl_cipher_strength_sort(list, | ||
712 | head_p, tail_p); | ||
713 | else | ||
714 | SSLerr(SSL_F_SSL_CIPHER_PROCESS_RULESTR, | ||
715 | SSL_R_INVALID_COMMAND); | ||
716 | if (ok == 0) | ||
717 | retval = 0; | ||
718 | /* | ||
719 | * We do not support any "multi" options | ||
720 | * together with "@", so throw away the | ||
721 | * rest of the command, if any left, until | ||
722 | * end or ':' is found. | ||
723 | */ | ||
724 | while ((*l != '\0') && ITEM_SEP(*l)) | ||
725 | l++; | ||
726 | } | ||
727 | else if (found) | ||
728 | { | ||
729 | ssl_cipher_apply_rule(algorithms, mask, | ||
730 | algo_strength, mask_strength, rule, -1, | ||
731 | list, head_p, tail_p); | ||
732 | } | ||
733 | else | ||
734 | { | ||
735 | while ((*l != '\0') && ITEM_SEP(*l)) | ||
736 | l++; | ||
737 | } | ||
738 | if (*l == '\0') break; /* done */ | ||
739 | } | ||
740 | |||
741 | return(retval); | ||
742 | } | ||
743 | |||
744 | STACK_OF(SSL_CIPHER) *ssl_create_cipher_list(const SSL_METHOD *ssl_method, | ||
745 | STACK_OF(SSL_CIPHER) **cipher_list, | ||
746 | STACK_OF(SSL_CIPHER) **cipher_list_by_id, | ||
747 | const char *rule_str) | ||
748 | { | ||
749 | int ok, num_of_ciphers, num_of_alias_max, num_of_group_aliases; | ||
750 | unsigned long disabled_mask; | ||
751 | STACK_OF(SSL_CIPHER) *cipherstack; | ||
752 | const char *rule_p; | ||
753 | CIPHER_ORDER *list = NULL, *head = NULL, *tail = NULL, *curr; | ||
754 | SSL_CIPHER **ca_list = NULL; | ||
755 | |||
756 | /* | ||
757 | * Return with error if nothing to do. | ||
758 | */ | ||
759 | if (rule_str == NULL) return(NULL); | ||
760 | |||
761 | if (init_ciphers) | ||
762 | { | ||
763 | CRYPTO_w_lock(CRYPTO_LOCK_SSL); | ||
764 | if (init_ciphers) load_ciphers(); | ||
765 | CRYPTO_w_unlock(CRYPTO_LOCK_SSL); | ||
766 | } | ||
767 | |||
768 | /* | ||
769 | * To reduce the work to do we only want to process the compiled | ||
770 | * in algorithms, so we first get the mask of disabled ciphers. | ||
771 | */ | ||
772 | disabled_mask = ssl_cipher_get_disabled(); | ||
773 | |||
774 | /* | ||
775 | * Now we have to collect the available ciphers from the compiled | ||
776 | * in ciphers. We cannot get more than the number compiled in, so | ||
777 | * it is used for allocation. | ||
778 | */ | ||
779 | num_of_ciphers = ssl_method->num_ciphers(); | ||
780 | #ifdef KSSL_DEBUG | ||
781 | printf("ssl_create_cipher_list() for %d ciphers\n", num_of_ciphers); | ||
782 | #endif /* KSSL_DEBUG */ | ||
783 | list = (CIPHER_ORDER *)OPENSSL_malloc(sizeof(CIPHER_ORDER) * num_of_ciphers); | ||
784 | if (list == NULL) | ||
785 | { | ||
786 | SSLerr(SSL_F_SSL_CREATE_CIPHER_LIST,ERR_R_MALLOC_FAILURE); | ||
787 | return(NULL); /* Failure */ | ||
788 | } | ||
789 | |||
790 | ssl_cipher_collect_ciphers(ssl_method, num_of_ciphers, disabled_mask, | ||
791 | list, &head, &tail); | ||
792 | |||
793 | /* | ||
794 | * We also need cipher aliases for selecting based on the rule_str. | ||
795 | * There might be two types of entries in the rule_str: 1) names | ||
796 | * of ciphers themselves 2) aliases for groups of ciphers. | ||
797 | * For 1) we need the available ciphers and for 2) the cipher | ||
798 | * groups of cipher_aliases added together in one list (otherwise | ||
799 | * we would be happy with just the cipher_aliases table). | ||
800 | */ | ||
801 | num_of_group_aliases = sizeof(cipher_aliases) / sizeof(SSL_CIPHER); | ||
802 | num_of_alias_max = num_of_ciphers + num_of_group_aliases + 1; | ||
803 | ca_list = | ||
804 | (SSL_CIPHER **)OPENSSL_malloc(sizeof(SSL_CIPHER *) * num_of_alias_max); | ||
805 | if (ca_list == NULL) | ||
806 | { | ||
807 | OPENSSL_free(list); | ||
808 | SSLerr(SSL_F_SSL_CREATE_CIPHER_LIST,ERR_R_MALLOC_FAILURE); | ||
809 | return(NULL); /* Failure */ | ||
810 | } | ||
811 | ssl_cipher_collect_aliases(ca_list, num_of_group_aliases, disabled_mask, | ||
812 | head); | ||
813 | |||
814 | /* | ||
815 | * If the rule_string begins with DEFAULT, apply the default rule | ||
816 | * before using the (possibly available) additional rules. | ||
817 | */ | ||
818 | ok = 1; | ||
819 | rule_p = rule_str; | ||
820 | if (strncmp(rule_str,"DEFAULT",7) == 0) | ||
821 | { | ||
822 | ok = ssl_cipher_process_rulestr(SSL_DEFAULT_CIPHER_LIST, | ||
823 | list, &head, &tail, ca_list); | ||
824 | rule_p += 7; | ||
825 | if (*rule_p == ':') | ||
826 | rule_p++; | ||
827 | } | ||
828 | |||
829 | if (ok && (strlen(rule_p) > 0)) | ||
830 | ok = ssl_cipher_process_rulestr(rule_p, list, &head, &tail, | ||
831 | ca_list); | ||
832 | |||
833 | OPENSSL_free(ca_list); /* Not needed anymore */ | ||
834 | |||
835 | if (!ok) | ||
836 | { /* Rule processing failure */ | ||
837 | OPENSSL_free(list); | ||
838 | return(NULL); | ||
839 | } | ||
840 | /* | ||
841 | * Allocate new "cipherstack" for the result, return with error | ||
842 | * if we cannot get one. | ||
843 | */ | ||
844 | if ((cipherstack = sk_SSL_CIPHER_new_null()) == NULL) | ||
845 | { | ||
846 | OPENSSL_free(list); | ||
847 | return(NULL); | ||
848 | } | ||
849 | |||
850 | /* | ||
851 | * The cipher selection for the list is done. The ciphers are added | ||
852 | * to the resulting precedence to the STACK_OF(SSL_CIPHER). | ||
853 | */ | ||
854 | for (curr = head; curr != NULL; curr = curr->next) | ||
855 | { | ||
856 | if (curr->active) | ||
857 | { | ||
858 | sk_SSL_CIPHER_push(cipherstack, curr->cipher); | ||
859 | #ifdef CIPHER_DEBUG | ||
860 | printf("<%s>\n",curr->cipher->name); | ||
861 | #endif | ||
862 | } | ||
863 | } | ||
864 | OPENSSL_free(list); /* Not needed any longer */ | ||
865 | |||
866 | /* | ||
867 | * The following passage is a little bit odd. If pointer variables | ||
868 | * were supplied to hold STACK_OF(SSL_CIPHER) return information, | ||
869 | * the old memory pointed to is free()ed. Then, however, the | ||
870 | * cipher_list entry will be assigned just a copy of the returned | ||
871 | * cipher stack. For cipher_list_by_id a copy of the cipher stack | ||
872 | * will be created. See next comment... | ||
873 | */ | ||
874 | if (cipher_list != NULL) | ||
875 | { | ||
876 | if (*cipher_list != NULL) | ||
877 | sk_SSL_CIPHER_free(*cipher_list); | ||
878 | *cipher_list = cipherstack; | ||
879 | } | ||
880 | |||
881 | if (cipher_list_by_id != NULL) | ||
882 | { | ||
883 | if (*cipher_list_by_id != NULL) | ||
884 | sk_SSL_CIPHER_free(*cipher_list_by_id); | ||
885 | *cipher_list_by_id = sk_SSL_CIPHER_dup(cipherstack); | ||
886 | } | ||
887 | |||
888 | /* | ||
889 | * Now it is getting really strange. If something failed during | ||
890 | * the previous pointer assignment or if one of the pointers was | ||
891 | * not requested, the error condition is met. That might be | ||
892 | * discussable. The strange thing is however that in this case | ||
893 | * the memory "ret" pointed to is "free()ed" and hence the pointer | ||
894 | * cipher_list becomes wild. The memory reserved for | ||
895 | * cipher_list_by_id however is not "free()ed" and stays intact. | ||
896 | */ | ||
897 | if ( (cipher_list_by_id == NULL) || | ||
898 | (*cipher_list_by_id == NULL) || | ||
899 | (cipher_list == NULL) || | ||
900 | (*cipher_list == NULL)) | ||
901 | { | ||
902 | sk_SSL_CIPHER_free(cipherstack); | ||
903 | return(NULL); | ||
904 | } | ||
905 | |||
906 | sk_SSL_CIPHER_set_cmp_func(*cipher_list_by_id,ssl_cipher_ptr_id_cmp); | ||
907 | |||
908 | return(cipherstack); | ||
909 | } | ||
910 | |||
911 | char *SSL_CIPHER_description(SSL_CIPHER *cipher, char *buf, int len) | ||
912 | { | ||
913 | int is_export,pkl,kl; | ||
914 | char *ver,*exp; | ||
915 | char *kx,*au,*enc,*mac; | ||
916 | unsigned long alg,alg2,alg_s; | ||
917 | #ifdef KSSL_DEBUG | ||
918 | static char *format="%-23s %s Kx=%-8s Au=%-4s Enc=%-9s Mac=%-4s%s AL=%lx\n"; | ||
919 | #else | ||
920 | static char *format="%-23s %s Kx=%-8s Au=%-4s Enc=%-9s Mac=%-4s%s\n"; | ||
921 | #endif /* KSSL_DEBUG */ | ||
922 | |||
923 | alg=cipher->algorithms; | ||
924 | alg_s=cipher->algo_strength; | ||
925 | alg2=cipher->algorithm2; | ||
926 | |||
927 | is_export=SSL_C_IS_EXPORT(cipher); | ||
928 | pkl=SSL_C_EXPORT_PKEYLENGTH(cipher); | ||
929 | kl=SSL_C_EXPORT_KEYLENGTH(cipher); | ||
930 | exp=is_export?" export":""; | ||
931 | |||
932 | if (alg & SSL_SSLV2) | ||
933 | ver="SSLv2"; | ||
934 | else if (alg & SSL_SSLV3) | ||
935 | ver="SSLv3"; | ||
936 | else | ||
937 | ver="unknown"; | ||
938 | |||
939 | switch (alg&SSL_MKEY_MASK) | ||
940 | { | ||
941 | case SSL_kRSA: | ||
942 | kx=is_export?(pkl == 512 ? "RSA(512)" : "RSA(1024)"):"RSA"; | ||
943 | break; | ||
944 | case SSL_kDHr: | ||
945 | kx="DH/RSA"; | ||
946 | break; | ||
947 | case SSL_kDHd: | ||
948 | kx="DH/DSS"; | ||
949 | break; | ||
950 | case SSL_kKRB5: /* VRS */ | ||
951 | case SSL_KRB5: /* VRS */ | ||
952 | kx="KRB5"; | ||
953 | break; | ||
954 | case SSL_kFZA: | ||
955 | kx="Fortezza"; | ||
956 | break; | ||
957 | case SSL_kEDH: | ||
958 | kx=is_export?(pkl == 512 ? "DH(512)" : "DH(1024)"):"DH"; | ||
959 | break; | ||
960 | default: | ||
961 | kx="unknown"; | ||
962 | } | ||
963 | |||
964 | switch (alg&SSL_AUTH_MASK) | ||
965 | { | ||
966 | case SSL_aRSA: | ||
967 | au="RSA"; | ||
968 | break; | ||
969 | case SSL_aDSS: | ||
970 | au="DSS"; | ||
971 | break; | ||
972 | case SSL_aDH: | ||
973 | au="DH"; | ||
974 | break; | ||
975 | case SSL_aKRB5: /* VRS */ | ||
976 | case SSL_KRB5: /* VRS */ | ||
977 | au="KRB5"; | ||
978 | break; | ||
979 | case SSL_aFZA: | ||
980 | case SSL_aNULL: | ||
981 | au="None"; | ||
982 | break; | ||
983 | default: | ||
984 | au="unknown"; | ||
985 | break; | ||
986 | } | ||
987 | |||
988 | switch (alg&SSL_ENC_MASK) | ||
989 | { | ||
990 | case SSL_DES: | ||
991 | enc=(is_export && kl == 5)?"DES(40)":"DES(56)"; | ||
992 | break; | ||
993 | case SSL_3DES: | ||
994 | enc="3DES(168)"; | ||
995 | break; | ||
996 | case SSL_RC4: | ||
997 | enc=is_export?(kl == 5 ? "RC4(40)" : "RC4(56)") | ||
998 | :((alg2&SSL2_CF_8_BYTE_ENC)?"RC4(64)":"RC4(128)"); | ||
999 | break; | ||
1000 | case SSL_RC2: | ||
1001 | enc=is_export?(kl == 5 ? "RC2(40)" : "RC2(56)"):"RC2(128)"; | ||
1002 | break; | ||
1003 | case SSL_IDEA: | ||
1004 | enc="IDEA(128)"; | ||
1005 | break; | ||
1006 | case SSL_eFZA: | ||
1007 | enc="Fortezza"; | ||
1008 | break; | ||
1009 | case SSL_eNULL: | ||
1010 | enc="None"; | ||
1011 | break; | ||
1012 | case SSL_AES: | ||
1013 | switch(cipher->strength_bits) | ||
1014 | { | ||
1015 | case 128: enc="AES(128)"; break; | ||
1016 | case 192: enc="AES(192)"; break; | ||
1017 | case 256: enc="AES(256)"; break; | ||
1018 | default: enc="AES(?""?""?)"; break; | ||
1019 | } | ||
1020 | break; | ||
1021 | default: | ||
1022 | enc="unknown"; | ||
1023 | break; | ||
1024 | } | ||
1025 | |||
1026 | switch (alg&SSL_MAC_MASK) | ||
1027 | { | ||
1028 | case SSL_MD5: | ||
1029 | mac="MD5"; | ||
1030 | break; | ||
1031 | case SSL_SHA1: | ||
1032 | mac="SHA1"; | ||
1033 | break; | ||
1034 | default: | ||
1035 | mac="unknown"; | ||
1036 | break; | ||
1037 | } | ||
1038 | |||
1039 | if (buf == NULL) | ||
1040 | { | ||
1041 | len=128; | ||
1042 | buf=OPENSSL_malloc(len); | ||
1043 | if (buf == NULL) return("OPENSSL_malloc Error"); | ||
1044 | } | ||
1045 | else if (len < 128) | ||
1046 | return("Buffer too small"); | ||
1047 | |||
1048 | #ifdef KSSL_DEBUG | ||
1049 | BIO_snprintf(buf,len,format,cipher->name,ver,kx,au,enc,mac,exp,alg); | ||
1050 | #else | ||
1051 | BIO_snprintf(buf,len,format,cipher->name,ver,kx,au,enc,mac,exp); | ||
1052 | #endif /* KSSL_DEBUG */ | ||
1053 | return(buf); | ||
1054 | } | ||
1055 | |||
1056 | char *SSL_CIPHER_get_version(SSL_CIPHER *c) | ||
1057 | { | ||
1058 | int i; | ||
1059 | |||
1060 | if (c == NULL) return("(NONE)"); | ||
1061 | i=(int)(c->id>>24L); | ||
1062 | if (i == 3) | ||
1063 | return("TLSv1/SSLv3"); | ||
1064 | else if (i == 2) | ||
1065 | return("SSLv2"); | ||
1066 | else | ||
1067 | return("unknown"); | ||
1068 | } | ||
1069 | |||
1070 | /* return the actual cipher being used */ | ||
1071 | const char *SSL_CIPHER_get_name(SSL_CIPHER *c) | ||
1072 | { | ||
1073 | if (c != NULL) | ||
1074 | return(c->name); | ||
1075 | return("(NONE)"); | ||
1076 | } | ||
1077 | |||
1078 | /* number of bits for symmetric cipher */ | ||
1079 | int SSL_CIPHER_get_bits(SSL_CIPHER *c, int *alg_bits) | ||
1080 | { | ||
1081 | int ret=0; | ||
1082 | |||
1083 | if (c != NULL) | ||
1084 | { | ||
1085 | if (alg_bits != NULL) *alg_bits = c->alg_bits; | ||
1086 | ret = c->strength_bits; | ||
1087 | } | ||
1088 | return(ret); | ||
1089 | } | ||
1090 | |||
1091 | SSL_COMP *ssl3_comp_find(STACK_OF(SSL_COMP) *sk, int n) | ||
1092 | { | ||
1093 | SSL_COMP *ctmp; | ||
1094 | int i,nn; | ||
1095 | |||
1096 | if ((n == 0) || (sk == NULL)) return(NULL); | ||
1097 | nn=sk_SSL_COMP_num(sk); | ||
1098 | for (i=0; i<nn; i++) | ||
1099 | { | ||
1100 | ctmp=sk_SSL_COMP_value(sk,i); | ||
1101 | if (ctmp->id == n) | ||
1102 | return(ctmp); | ||
1103 | } | ||
1104 | return(NULL); | ||
1105 | } | ||
1106 | |||
1107 | static int sk_comp_cmp(const SSL_COMP * const *a, | ||
1108 | const SSL_COMP * const *b) | ||
1109 | { | ||
1110 | return((*a)->id-(*b)->id); | ||
1111 | } | ||
1112 | |||
1113 | STACK_OF(SSL_COMP) *SSL_COMP_get_compression_methods(void) | ||
1114 | { | ||
1115 | return(ssl_comp_methods); | ||
1116 | } | ||
1117 | |||
1118 | int SSL_COMP_add_compression_method(int id, COMP_METHOD *cm) | ||
1119 | { | ||
1120 | SSL_COMP *comp; | ||
1121 | STACK_OF(SSL_COMP) *sk; | ||
1122 | |||
1123 | if (cm == NULL || cm->type == NID_undef) | ||
1124 | return 1; | ||
1125 | |||
1126 | MemCheck_off(); | ||
1127 | comp=(SSL_COMP *)OPENSSL_malloc(sizeof(SSL_COMP)); | ||
1128 | comp->id=id; | ||
1129 | comp->method=cm; | ||
1130 | if (ssl_comp_methods == NULL) | ||
1131 | sk=ssl_comp_methods=sk_SSL_COMP_new(sk_comp_cmp); | ||
1132 | else | ||
1133 | sk=ssl_comp_methods; | ||
1134 | if ((sk == NULL) || !sk_SSL_COMP_push(sk,comp)) | ||
1135 | { | ||
1136 | MemCheck_on(); | ||
1137 | SSLerr(SSL_F_SSL_COMP_ADD_COMPRESSION_METHOD,ERR_R_MALLOC_FAILURE); | ||
1138 | return(0); | ||
1139 | } | ||
1140 | else | ||
1141 | { | ||
1142 | MemCheck_on(); | ||
1143 | return(1); | ||
1144 | } | ||
1145 | } | ||
diff --git a/src/lib/libssl/ssl_err.c b/src/lib/libssl/ssl_err.c deleted file mode 100644 index d2cb181503..0000000000 --- a/src/lib/libssl/ssl_err.c +++ /dev/null | |||
@@ -1,461 +0,0 @@ | |||
1 | /* ssl/ssl_err.c */ | ||
2 | /* ==================================================================== | ||
3 | * Copyright (c) 1999-2002 The OpenSSL Project. All rights reserved. | ||
4 | * | ||
5 | * Redistribution and use in source and binary forms, with or without | ||
6 | * modification, are permitted provided that the following conditions | ||
7 | * are met: | ||
8 | * | ||
9 | * 1. Redistributions of source code must retain the above copyright | ||
10 | * notice, this list of conditions and the following disclaimer. | ||
11 | * | ||
12 | * 2. Redistributions in binary form must reproduce the above copyright | ||
13 | * notice, this list of conditions and the following disclaimer in | ||
14 | * the documentation and/or other materials provided with the | ||
15 | * distribution. | ||
16 | * | ||
17 | * 3. All advertising materials mentioning features or use of this | ||
18 | * software must display the following acknowledgment: | ||
19 | * "This product includes software developed by the OpenSSL Project | ||
20 | * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)" | ||
21 | * | ||
22 | * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to | ||
23 | * endorse or promote products derived from this software without | ||
24 | * prior written permission. For written permission, please contact | ||
25 | * openssl-core@OpenSSL.org. | ||
26 | * | ||
27 | * 5. Products derived from this software may not be called "OpenSSL" | ||
28 | * nor may "OpenSSL" appear in their names without prior written | ||
29 | * permission of the OpenSSL Project. | ||
30 | * | ||
31 | * 6. Redistributions of any form whatsoever must retain the following | ||
32 | * acknowledgment: | ||
33 | * "This product includes software developed by the OpenSSL Project | ||
34 | * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" | ||
35 | * | ||
36 | * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY | ||
37 | * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||
38 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR | ||
39 | * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR | ||
40 | * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, | ||
41 | * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | ||
42 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; | ||
43 | * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | ||
44 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, | ||
45 | * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | ||
46 | * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED | ||
47 | * OF THE POSSIBILITY OF SUCH DAMAGE. | ||
48 | * ==================================================================== | ||
49 | * | ||
50 | * This product includes cryptographic software written by Eric Young | ||
51 | * (eay@cryptsoft.com). This product includes software written by Tim | ||
52 | * Hudson (tjh@cryptsoft.com). | ||
53 | * | ||
54 | */ | ||
55 | |||
56 | /* NOTE: this file was auto generated by the mkerr.pl script: any changes | ||
57 | * made to it will be overwritten when the script next updates this file, | ||
58 | * only reason strings will be preserved. | ||
59 | */ | ||
60 | |||
61 | #include <stdio.h> | ||
62 | #include <openssl/err.h> | ||
63 | #include <openssl/ssl.h> | ||
64 | |||
65 | /* BEGIN ERROR CODES */ | ||
66 | #ifndef OPENSSL_NO_ERR | ||
67 | static ERR_STRING_DATA SSL_str_functs[]= | ||
68 | { | ||
69 | {ERR_PACK(0,SSL_F_CLIENT_CERTIFICATE,0), "CLIENT_CERTIFICATE"}, | ||
70 | {ERR_PACK(0,SSL_F_CLIENT_FINISHED,0), "CLIENT_FINISHED"}, | ||
71 | {ERR_PACK(0,SSL_F_CLIENT_HELLO,0), "CLIENT_HELLO"}, | ||
72 | {ERR_PACK(0,SSL_F_CLIENT_MASTER_KEY,0), "CLIENT_MASTER_KEY"}, | ||
73 | {ERR_PACK(0,SSL_F_D2I_SSL_SESSION,0), "d2i_SSL_SESSION"}, | ||
74 | {ERR_PACK(0,SSL_F_DO_SSL3_WRITE,0), "DO_SSL3_WRITE"}, | ||
75 | {ERR_PACK(0,SSL_F_GET_CLIENT_FINISHED,0), "GET_CLIENT_FINISHED"}, | ||
76 | {ERR_PACK(0,SSL_F_GET_CLIENT_HELLO,0), "GET_CLIENT_HELLO"}, | ||
77 | {ERR_PACK(0,SSL_F_GET_CLIENT_MASTER_KEY,0), "GET_CLIENT_MASTER_KEY"}, | ||
78 | {ERR_PACK(0,SSL_F_GET_SERVER_FINISHED,0), "GET_SERVER_FINISHED"}, | ||
79 | {ERR_PACK(0,SSL_F_GET_SERVER_HELLO,0), "GET_SERVER_HELLO"}, | ||
80 | {ERR_PACK(0,SSL_F_GET_SERVER_VERIFY,0), "GET_SERVER_VERIFY"}, | ||
81 | {ERR_PACK(0,SSL_F_I2D_SSL_SESSION,0), "i2d_SSL_SESSION"}, | ||
82 | {ERR_PACK(0,SSL_F_READ_N,0), "READ_N"}, | ||
83 | {ERR_PACK(0,SSL_F_REQUEST_CERTIFICATE,0), "REQUEST_CERTIFICATE"}, | ||
84 | {ERR_PACK(0,SSL_F_SERVER_FINISH,0), "SERVER_FINISH"}, | ||
85 | {ERR_PACK(0,SSL_F_SERVER_HELLO,0), "SERVER_HELLO"}, | ||
86 | {ERR_PACK(0,SSL_F_SERVER_VERIFY,0), "SERVER_VERIFY"}, | ||
87 | {ERR_PACK(0,SSL_F_SSL23_ACCEPT,0), "SSL23_ACCEPT"}, | ||
88 | {ERR_PACK(0,SSL_F_SSL23_CLIENT_HELLO,0), "SSL23_CLIENT_HELLO"}, | ||
89 | {ERR_PACK(0,SSL_F_SSL23_CONNECT,0), "SSL23_CONNECT"}, | ||
90 | {ERR_PACK(0,SSL_F_SSL23_GET_CLIENT_HELLO,0), "SSL23_GET_CLIENT_HELLO"}, | ||
91 | {ERR_PACK(0,SSL_F_SSL23_GET_SERVER_HELLO,0), "SSL23_GET_SERVER_HELLO"}, | ||
92 | {ERR_PACK(0,SSL_F_SSL23_PEEK,0), "SSL23_PEEK"}, | ||
93 | {ERR_PACK(0,SSL_F_SSL23_READ,0), "SSL23_READ"}, | ||
94 | {ERR_PACK(0,SSL_F_SSL23_WRITE,0), "SSL23_WRITE"}, | ||
95 | {ERR_PACK(0,SSL_F_SSL2_ACCEPT,0), "SSL2_ACCEPT"}, | ||
96 | {ERR_PACK(0,SSL_F_SSL2_CONNECT,0), "SSL2_CONNECT"}, | ||
97 | {ERR_PACK(0,SSL_F_SSL2_ENC_INIT,0), "SSL2_ENC_INIT"}, | ||
98 | {ERR_PACK(0,SSL_F_SSL2_GENERATE_KEY_MATERIAL,0), "SSL2_GENERATE_KEY_MATERIAL"}, | ||
99 | {ERR_PACK(0,SSL_F_SSL2_PEEK,0), "SSL2_PEEK"}, | ||
100 | {ERR_PACK(0,SSL_F_SSL2_READ,0), "SSL2_READ"}, | ||
101 | {ERR_PACK(0,SSL_F_SSL2_READ_INTERNAL,0), "SSL2_READ_INTERNAL"}, | ||
102 | {ERR_PACK(0,SSL_F_SSL2_SET_CERTIFICATE,0), "SSL2_SET_CERTIFICATE"}, | ||
103 | {ERR_PACK(0,SSL_F_SSL2_WRITE,0), "SSL2_WRITE"}, | ||
104 | {ERR_PACK(0,SSL_F_SSL3_ACCEPT,0), "SSL3_ACCEPT"}, | ||
105 | {ERR_PACK(0,SSL_F_SSL3_CALLBACK_CTRL,0), "SSL3_CALLBACK_CTRL"}, | ||
106 | {ERR_PACK(0,SSL_F_SSL3_CHANGE_CIPHER_STATE,0), "SSL3_CHANGE_CIPHER_STATE"}, | ||
107 | {ERR_PACK(0,SSL_F_SSL3_CHECK_CERT_AND_ALGORITHM,0), "SSL3_CHECK_CERT_AND_ALGORITHM"}, | ||
108 | {ERR_PACK(0,SSL_F_SSL3_CLIENT_HELLO,0), "SSL3_CLIENT_HELLO"}, | ||
109 | {ERR_PACK(0,SSL_F_SSL3_CONNECT,0), "SSL3_CONNECT"}, | ||
110 | {ERR_PACK(0,SSL_F_SSL3_CTRL,0), "SSL3_CTRL"}, | ||
111 | {ERR_PACK(0,SSL_F_SSL3_CTX_CTRL,0), "SSL3_CTX_CTRL"}, | ||
112 | {ERR_PACK(0,SSL_F_SSL3_ENC,0), "SSL3_ENC"}, | ||
113 | {ERR_PACK(0,SSL_F_SSL3_GENERATE_KEY_BLOCK,0), "SSL3_GENERATE_KEY_BLOCK"}, | ||
114 | {ERR_PACK(0,SSL_F_SSL3_GET_CERTIFICATE_REQUEST,0), "SSL3_GET_CERTIFICATE_REQUEST"}, | ||
115 | {ERR_PACK(0,SSL_F_SSL3_GET_CERT_VERIFY,0), "SSL3_GET_CERT_VERIFY"}, | ||
116 | {ERR_PACK(0,SSL_F_SSL3_GET_CLIENT_CERTIFICATE,0), "SSL3_GET_CLIENT_CERTIFICATE"}, | ||
117 | {ERR_PACK(0,SSL_F_SSL3_GET_CLIENT_HELLO,0), "SSL3_GET_CLIENT_HELLO"}, | ||
118 | {ERR_PACK(0,SSL_F_SSL3_GET_CLIENT_KEY_EXCHANGE,0), "SSL3_GET_CLIENT_KEY_EXCHANGE"}, | ||
119 | {ERR_PACK(0,SSL_F_SSL3_GET_FINISHED,0), "SSL3_GET_FINISHED"}, | ||
120 | {ERR_PACK(0,SSL_F_SSL3_GET_KEY_EXCHANGE,0), "SSL3_GET_KEY_EXCHANGE"}, | ||
121 | {ERR_PACK(0,SSL_F_SSL3_GET_MESSAGE,0), "SSL3_GET_MESSAGE"}, | ||
122 | {ERR_PACK(0,SSL_F_SSL3_GET_RECORD,0), "SSL3_GET_RECORD"}, | ||
123 | {ERR_PACK(0,SSL_F_SSL3_GET_SERVER_CERTIFICATE,0), "SSL3_GET_SERVER_CERTIFICATE"}, | ||
124 | {ERR_PACK(0,SSL_F_SSL3_GET_SERVER_DONE,0), "SSL3_GET_SERVER_DONE"}, | ||
125 | {ERR_PACK(0,SSL_F_SSL3_GET_SERVER_HELLO,0), "SSL3_GET_SERVER_HELLO"}, | ||
126 | {ERR_PACK(0,SSL_F_SSL3_OUTPUT_CERT_CHAIN,0), "SSL3_OUTPUT_CERT_CHAIN"}, | ||
127 | {ERR_PACK(0,SSL_F_SSL3_PEEK,0), "SSL3_PEEK"}, | ||
128 | {ERR_PACK(0,SSL_F_SSL3_READ_BYTES,0), "SSL3_READ_BYTES"}, | ||
129 | {ERR_PACK(0,SSL_F_SSL3_READ_N,0), "SSL3_READ_N"}, | ||
130 | {ERR_PACK(0,SSL_F_SSL3_SEND_CERTIFICATE_REQUEST,0), "SSL3_SEND_CERTIFICATE_REQUEST"}, | ||
131 | {ERR_PACK(0,SSL_F_SSL3_SEND_CLIENT_CERTIFICATE,0), "SSL3_SEND_CLIENT_CERTIFICATE"}, | ||
132 | {ERR_PACK(0,SSL_F_SSL3_SEND_CLIENT_KEY_EXCHANGE,0), "SSL3_SEND_CLIENT_KEY_EXCHANGE"}, | ||
133 | {ERR_PACK(0,SSL_F_SSL3_SEND_CLIENT_VERIFY,0), "SSL3_SEND_CLIENT_VERIFY"}, | ||
134 | {ERR_PACK(0,SSL_F_SSL3_SEND_SERVER_CERTIFICATE,0), "SSL3_SEND_SERVER_CERTIFICATE"}, | ||
135 | {ERR_PACK(0,SSL_F_SSL3_SEND_SERVER_HELLO,0), "SSL3_SEND_SERVER_HELLO"}, | ||
136 | {ERR_PACK(0,SSL_F_SSL3_SEND_SERVER_KEY_EXCHANGE,0), "SSL3_SEND_SERVER_KEY_EXCHANGE"}, | ||
137 | {ERR_PACK(0,SSL_F_SSL3_SETUP_BUFFERS,0), "SSL3_SETUP_BUFFERS"}, | ||
138 | {ERR_PACK(0,SSL_F_SSL3_SETUP_KEY_BLOCK,0), "SSL3_SETUP_KEY_BLOCK"}, | ||
139 | {ERR_PACK(0,SSL_F_SSL3_WRITE_BYTES,0), "SSL3_WRITE_BYTES"}, | ||
140 | {ERR_PACK(0,SSL_F_SSL3_WRITE_PENDING,0), "SSL3_WRITE_PENDING"}, | ||
141 | {ERR_PACK(0,SSL_F_SSL_ADD_DIR_CERT_SUBJECTS_TO_STACK,0), "SSL_add_dir_cert_subjects_to_stack"}, | ||
142 | {ERR_PACK(0,SSL_F_SSL_ADD_FILE_CERT_SUBJECTS_TO_STACK,0), "SSL_add_file_cert_subjects_to_stack"}, | ||
143 | {ERR_PACK(0,SSL_F_SSL_BAD_METHOD,0), "SSL_BAD_METHOD"}, | ||
144 | {ERR_PACK(0,SSL_F_SSL_BYTES_TO_CIPHER_LIST,0), "SSL_BYTES_TO_CIPHER_LIST"}, | ||
145 | {ERR_PACK(0,SSL_F_SSL_CERT_DUP,0), "SSL_CERT_DUP"}, | ||
146 | {ERR_PACK(0,SSL_F_SSL_CERT_INST,0), "SSL_CERT_INST"}, | ||
147 | {ERR_PACK(0,SSL_F_SSL_CERT_INSTANTIATE,0), "SSL_CERT_INSTANTIATE"}, | ||
148 | {ERR_PACK(0,SSL_F_SSL_CERT_NEW,0), "SSL_CERT_NEW"}, | ||
149 | {ERR_PACK(0,SSL_F_SSL_CHECK_PRIVATE_KEY,0), "SSL_check_private_key"}, | ||
150 | {ERR_PACK(0,SSL_F_SSL_CIPHER_PROCESS_RULESTR,0), "SSL_CIPHER_PROCESS_RULESTR"}, | ||
151 | {ERR_PACK(0,SSL_F_SSL_CIPHER_STRENGTH_SORT,0), "SSL_CIPHER_STRENGTH_SORT"}, | ||
152 | {ERR_PACK(0,SSL_F_SSL_CLEAR,0), "SSL_clear"}, | ||
153 | {ERR_PACK(0,SSL_F_SSL_COMP_ADD_COMPRESSION_METHOD,0), "SSL_COMP_add_compression_method"}, | ||
154 | {ERR_PACK(0,SSL_F_SSL_CREATE_CIPHER_LIST,0), "SSL_CREATE_CIPHER_LIST"}, | ||
155 | {ERR_PACK(0,SSL_F_SSL_CTRL,0), "SSL_ctrl"}, | ||
156 | {ERR_PACK(0,SSL_F_SSL_CTX_CHECK_PRIVATE_KEY,0), "SSL_CTX_check_private_key"}, | ||
157 | {ERR_PACK(0,SSL_F_SSL_CTX_NEW,0), "SSL_CTX_new"}, | ||
158 | {ERR_PACK(0,SSL_F_SSL_CTX_SET_PURPOSE,0), "SSL_CTX_set_purpose"}, | ||
159 | {ERR_PACK(0,SSL_F_SSL_CTX_SET_SESSION_ID_CONTEXT,0), "SSL_CTX_set_session_id_context"}, | ||
160 | {ERR_PACK(0,SSL_F_SSL_CTX_SET_SSL_VERSION,0), "SSL_CTX_set_ssl_version"}, | ||
161 | {ERR_PACK(0,SSL_F_SSL_CTX_SET_TRUST,0), "SSL_CTX_set_trust"}, | ||
162 | {ERR_PACK(0,SSL_F_SSL_CTX_USE_CERTIFICATE,0), "SSL_CTX_use_certificate"}, | ||
163 | {ERR_PACK(0,SSL_F_SSL_CTX_USE_CERTIFICATE_ASN1,0), "SSL_CTX_use_certificate_ASN1"}, | ||
164 | {ERR_PACK(0,SSL_F_SSL_CTX_USE_CERTIFICATE_CHAIN_FILE,0), "SSL_CTX_use_certificate_chain_file"}, | ||
165 | {ERR_PACK(0,SSL_F_SSL_CTX_USE_CERTIFICATE_FILE,0), "SSL_CTX_use_certificate_file"}, | ||
166 | {ERR_PACK(0,SSL_F_SSL_CTX_USE_PRIVATEKEY,0), "SSL_CTX_use_PrivateKey"}, | ||
167 | {ERR_PACK(0,SSL_F_SSL_CTX_USE_PRIVATEKEY_ASN1,0), "SSL_CTX_use_PrivateKey_ASN1"}, | ||
168 | {ERR_PACK(0,SSL_F_SSL_CTX_USE_PRIVATEKEY_FILE,0), "SSL_CTX_use_PrivateKey_file"}, | ||
169 | {ERR_PACK(0,SSL_F_SSL_CTX_USE_RSAPRIVATEKEY,0), "SSL_CTX_use_RSAPrivateKey"}, | ||
170 | {ERR_PACK(0,SSL_F_SSL_CTX_USE_RSAPRIVATEKEY_ASN1,0), "SSL_CTX_use_RSAPrivateKey_ASN1"}, | ||
171 | {ERR_PACK(0,SSL_F_SSL_CTX_USE_RSAPRIVATEKEY_FILE,0), "SSL_CTX_use_RSAPrivateKey_file"}, | ||
172 | {ERR_PACK(0,SSL_F_SSL_DO_HANDSHAKE,0), "SSL_do_handshake"}, | ||
173 | {ERR_PACK(0,SSL_F_SSL_GET_NEW_SESSION,0), "SSL_GET_NEW_SESSION"}, | ||
174 | {ERR_PACK(0,SSL_F_SSL_GET_PREV_SESSION,0), "SSL_GET_PREV_SESSION"}, | ||
175 | {ERR_PACK(0,SSL_F_SSL_GET_SERVER_SEND_CERT,0), "SSL_GET_SERVER_SEND_CERT"}, | ||
176 | {ERR_PACK(0,SSL_F_SSL_GET_SIGN_PKEY,0), "SSL_GET_SIGN_PKEY"}, | ||
177 | {ERR_PACK(0,SSL_F_SSL_INIT_WBIO_BUFFER,0), "SSL_INIT_WBIO_BUFFER"}, | ||
178 | {ERR_PACK(0,SSL_F_SSL_LOAD_CLIENT_CA_FILE,0), "SSL_load_client_CA_file"}, | ||
179 | {ERR_PACK(0,SSL_F_SSL_NEW,0), "SSL_new"}, | ||
180 | {ERR_PACK(0,SSL_F_SSL_READ,0), "SSL_read"}, | ||
181 | {ERR_PACK(0,SSL_F_SSL_RSA_PRIVATE_DECRYPT,0), "SSL_RSA_PRIVATE_DECRYPT"}, | ||
182 | {ERR_PACK(0,SSL_F_SSL_RSA_PUBLIC_ENCRYPT,0), "SSL_RSA_PUBLIC_ENCRYPT"}, | ||
183 | {ERR_PACK(0,SSL_F_SSL_SESSION_NEW,0), "SSL_SESSION_new"}, | ||
184 | {ERR_PACK(0,SSL_F_SSL_SESSION_PRINT_FP,0), "SSL_SESSION_print_fp"}, | ||
185 | {ERR_PACK(0,SSL_F_SSL_SESS_CERT_NEW,0), "SSL_SESS_CERT_NEW"}, | ||
186 | {ERR_PACK(0,SSL_F_SSL_SET_CERT,0), "SSL_SET_CERT"}, | ||
187 | {ERR_PACK(0,SSL_F_SSL_SET_FD,0), "SSL_set_fd"}, | ||
188 | {ERR_PACK(0,SSL_F_SSL_SET_PKEY,0), "SSL_SET_PKEY"}, | ||
189 | {ERR_PACK(0,SSL_F_SSL_SET_PURPOSE,0), "SSL_set_purpose"}, | ||
190 | {ERR_PACK(0,SSL_F_SSL_SET_RFD,0), "SSL_set_rfd"}, | ||
191 | {ERR_PACK(0,SSL_F_SSL_SET_SESSION,0), "SSL_set_session"}, | ||
192 | {ERR_PACK(0,SSL_F_SSL_SET_SESSION_ID_CONTEXT,0), "SSL_set_session_id_context"}, | ||
193 | {ERR_PACK(0,SSL_F_SSL_SET_TRUST,0), "SSL_set_trust"}, | ||
194 | {ERR_PACK(0,SSL_F_SSL_SET_WFD,0), "SSL_set_wfd"}, | ||
195 | {ERR_PACK(0,SSL_F_SSL_SHUTDOWN,0), "SSL_shutdown"}, | ||
196 | {ERR_PACK(0,SSL_F_SSL_UNDEFINED_FUNCTION,0), "SSL_UNDEFINED_FUNCTION"}, | ||
197 | {ERR_PACK(0,SSL_F_SSL_USE_CERTIFICATE,0), "SSL_use_certificate"}, | ||
198 | {ERR_PACK(0,SSL_F_SSL_USE_CERTIFICATE_ASN1,0), "SSL_use_certificate_ASN1"}, | ||
199 | {ERR_PACK(0,SSL_F_SSL_USE_CERTIFICATE_FILE,0), "SSL_use_certificate_file"}, | ||
200 | {ERR_PACK(0,SSL_F_SSL_USE_PRIVATEKEY,0), "SSL_use_PrivateKey"}, | ||
201 | {ERR_PACK(0,SSL_F_SSL_USE_PRIVATEKEY_ASN1,0), "SSL_use_PrivateKey_ASN1"}, | ||
202 | {ERR_PACK(0,SSL_F_SSL_USE_PRIVATEKEY_FILE,0), "SSL_use_PrivateKey_file"}, | ||
203 | {ERR_PACK(0,SSL_F_SSL_USE_RSAPRIVATEKEY,0), "SSL_use_RSAPrivateKey"}, | ||
204 | {ERR_PACK(0,SSL_F_SSL_USE_RSAPRIVATEKEY_ASN1,0), "SSL_use_RSAPrivateKey_ASN1"}, | ||
205 | {ERR_PACK(0,SSL_F_SSL_USE_RSAPRIVATEKEY_FILE,0), "SSL_use_RSAPrivateKey_file"}, | ||
206 | {ERR_PACK(0,SSL_F_SSL_VERIFY_CERT_CHAIN,0), "SSL_VERIFY_CERT_CHAIN"}, | ||
207 | {ERR_PACK(0,SSL_F_SSL_WRITE,0), "SSL_write"}, | ||
208 | {ERR_PACK(0,SSL_F_TLS1_CHANGE_CIPHER_STATE,0), "TLS1_CHANGE_CIPHER_STATE"}, | ||
209 | {ERR_PACK(0,SSL_F_TLS1_ENC,0), "TLS1_ENC"}, | ||
210 | {ERR_PACK(0,SSL_F_TLS1_SETUP_KEY_BLOCK,0), "TLS1_SETUP_KEY_BLOCK"}, | ||
211 | {ERR_PACK(0,SSL_F_WRITE_PENDING,0), "WRITE_PENDING"}, | ||
212 | {0,NULL} | ||
213 | }; | ||
214 | |||
215 | static ERR_STRING_DATA SSL_str_reasons[]= | ||
216 | { | ||
217 | {SSL_R_APP_DATA_IN_HANDSHAKE ,"app data in handshake"}, | ||
218 | {SSL_R_ATTEMPT_TO_REUSE_SESSION_IN_DIFFERENT_CONTEXT,"attempt to reuse session in different context"}, | ||
219 | {SSL_R_BAD_ALERT_RECORD ,"bad alert record"}, | ||
220 | {SSL_R_BAD_AUTHENTICATION_TYPE ,"bad authentication type"}, | ||
221 | {SSL_R_BAD_CHANGE_CIPHER_SPEC ,"bad change cipher spec"}, | ||
222 | {SSL_R_BAD_CHECKSUM ,"bad checksum"}, | ||
223 | {SSL_R_BAD_DATA_RETURNED_BY_CALLBACK ,"bad data returned by callback"}, | ||
224 | {SSL_R_BAD_DECOMPRESSION ,"bad decompression"}, | ||
225 | {SSL_R_BAD_DH_G_LENGTH ,"bad dh g length"}, | ||
226 | {SSL_R_BAD_DH_PUB_KEY_LENGTH ,"bad dh pub key length"}, | ||
227 | {SSL_R_BAD_DH_P_LENGTH ,"bad dh p length"}, | ||
228 | {SSL_R_BAD_DIGEST_LENGTH ,"bad digest length"}, | ||
229 | {SSL_R_BAD_DSA_SIGNATURE ,"bad dsa signature"}, | ||
230 | {SSL_R_BAD_HELLO_REQUEST ,"bad hello request"}, | ||
231 | {SSL_R_BAD_LENGTH ,"bad length"}, | ||
232 | {SSL_R_BAD_MAC_DECODE ,"bad mac decode"}, | ||
233 | {SSL_R_BAD_MESSAGE_TYPE ,"bad message type"}, | ||
234 | {SSL_R_BAD_PACKET_LENGTH ,"bad packet length"}, | ||
235 | {SSL_R_BAD_PROTOCOL_VERSION_NUMBER ,"bad protocol version number"}, | ||
236 | {SSL_R_BAD_RESPONSE_ARGUMENT ,"bad response argument"}, | ||
237 | {SSL_R_BAD_RSA_DECRYPT ,"bad rsa decrypt"}, | ||
238 | {SSL_R_BAD_RSA_ENCRYPT ,"bad rsa encrypt"}, | ||
239 | {SSL_R_BAD_RSA_E_LENGTH ,"bad rsa e length"}, | ||
240 | {SSL_R_BAD_RSA_MODULUS_LENGTH ,"bad rsa modulus length"}, | ||
241 | {SSL_R_BAD_RSA_SIGNATURE ,"bad rsa signature"}, | ||
242 | {SSL_R_BAD_SIGNATURE ,"bad signature"}, | ||
243 | {SSL_R_BAD_SSL_FILETYPE ,"bad ssl filetype"}, | ||
244 | {SSL_R_BAD_SSL_SESSION_ID_LENGTH ,"bad ssl session id length"}, | ||
245 | {SSL_R_BAD_STATE ,"bad state"}, | ||
246 | {SSL_R_BAD_WRITE_RETRY ,"bad write retry"}, | ||
247 | {SSL_R_BIO_NOT_SET ,"bio not set"}, | ||
248 | {SSL_R_BLOCK_CIPHER_PAD_IS_WRONG ,"block cipher pad is wrong"}, | ||
249 | {SSL_R_BN_LIB ,"bn lib"}, | ||
250 | {SSL_R_CA_DN_LENGTH_MISMATCH ,"ca dn length mismatch"}, | ||
251 | {SSL_R_CA_DN_TOO_LONG ,"ca dn too long"}, | ||
252 | {SSL_R_CCS_RECEIVED_EARLY ,"ccs received early"}, | ||
253 | {SSL_R_CERTIFICATE_VERIFY_FAILED ,"certificate verify failed"}, | ||
254 | {SSL_R_CERT_LENGTH_MISMATCH ,"cert length mismatch"}, | ||
255 | {SSL_R_CHALLENGE_IS_DIFFERENT ,"challenge is different"}, | ||
256 | {SSL_R_CIPHER_CODE_WRONG_LENGTH ,"cipher code wrong length"}, | ||
257 | {SSL_R_CIPHER_OR_HASH_UNAVAILABLE ,"cipher or hash unavailable"}, | ||
258 | {SSL_R_CIPHER_TABLE_SRC_ERROR ,"cipher table src error"}, | ||
259 | {SSL_R_COMPRESSED_LENGTH_TOO_LONG ,"compressed length too long"}, | ||
260 | {SSL_R_COMPRESSION_FAILURE ,"compression failure"}, | ||
261 | {SSL_R_COMPRESSION_LIBRARY_ERROR ,"compression library error"}, | ||
262 | {SSL_R_CONNECTION_ID_IS_DIFFERENT ,"connection id is different"}, | ||
263 | {SSL_R_CONNECTION_TYPE_NOT_SET ,"connection type not set"}, | ||
264 | {SSL_R_DATA_BETWEEN_CCS_AND_FINISHED ,"data between ccs and finished"}, | ||
265 | {SSL_R_DATA_LENGTH_TOO_LONG ,"data length too long"}, | ||
266 | {SSL_R_DECRYPTION_FAILED ,"decryption failed"}, | ||
267 | {SSL_R_DECRYPTION_FAILED_OR_BAD_RECORD_MAC,"decryption failed or bad record mac"}, | ||
268 | {SSL_R_DH_PUBLIC_VALUE_LENGTH_IS_WRONG ,"dh public value length is wrong"}, | ||
269 | {SSL_R_DIGEST_CHECK_FAILED ,"digest check failed"}, | ||
270 | {SSL_R_ENCRYPTED_LENGTH_TOO_LONG ,"encrypted length too long"}, | ||
271 | {SSL_R_ERROR_GENERATING_TMP_RSA_KEY ,"error generating tmp rsa key"}, | ||
272 | {SSL_R_ERROR_IN_RECEIVED_CIPHER_LIST ,"error in received cipher list"}, | ||
273 | {SSL_R_EXCESSIVE_MESSAGE_SIZE ,"excessive message size"}, | ||
274 | {SSL_R_EXTRA_DATA_IN_MESSAGE ,"extra data in message"}, | ||
275 | {SSL_R_GOT_A_FIN_BEFORE_A_CCS ,"got a fin before a ccs"}, | ||
276 | {SSL_R_HTTPS_PROXY_REQUEST ,"https proxy request"}, | ||
277 | {SSL_R_HTTP_REQUEST ,"http request"}, | ||
278 | {SSL_R_ILLEGAL_PADDING ,"illegal padding"}, | ||
279 | {SSL_R_INVALID_CHALLENGE_LENGTH ,"invalid challenge length"}, | ||
280 | {SSL_R_INVALID_COMMAND ,"invalid command"}, | ||
281 | {SSL_R_INVALID_PURPOSE ,"invalid purpose"}, | ||
282 | {SSL_R_INVALID_TRUST ,"invalid trust"}, | ||
283 | {SSL_R_KEY_ARG_TOO_LONG ,"key arg too long"}, | ||
284 | {SSL_R_KRB5 ,"krb5"}, | ||
285 | {SSL_R_KRB5_C_CC_PRINC ,"krb5 client cc principal (no tkt?)"}, | ||
286 | {SSL_R_KRB5_C_GET_CRED ,"krb5 client get cred"}, | ||
287 | {SSL_R_KRB5_C_INIT ,"krb5 client init"}, | ||
288 | {SSL_R_KRB5_C_MK_REQ ,"krb5 client mk_req (expired tkt?)"}, | ||
289 | {SSL_R_KRB5_S_BAD_TICKET ,"krb5 server bad ticket"}, | ||
290 | {SSL_R_KRB5_S_INIT ,"krb5 server init"}, | ||
291 | {SSL_R_KRB5_S_RD_REQ ,"krb5 server rd_req (keytab perms?)"}, | ||
292 | {SSL_R_KRB5_S_TKT_EXPIRED ,"krb5 server tkt expired"}, | ||
293 | {SSL_R_KRB5_S_TKT_NYV ,"krb5 server tkt not yet valid"}, | ||
294 | {SSL_R_KRB5_S_TKT_SKEW ,"krb5 server tkt skew"}, | ||
295 | {SSL_R_LENGTH_MISMATCH ,"length mismatch"}, | ||
296 | {SSL_R_LENGTH_TOO_SHORT ,"length too short"}, | ||
297 | {SSL_R_LIBRARY_BUG ,"library bug"}, | ||
298 | {SSL_R_LIBRARY_HAS_NO_CIPHERS ,"library has no ciphers"}, | ||
299 | {SSL_R_MASTER_KEY_TOO_LONG ,"master key too long"}, | ||
300 | {SSL_R_MESSAGE_TOO_LONG ,"message too long"}, | ||
301 | {SSL_R_MISSING_DH_DSA_CERT ,"missing dh dsa cert"}, | ||
302 | {SSL_R_MISSING_DH_KEY ,"missing dh key"}, | ||
303 | {SSL_R_MISSING_DH_RSA_CERT ,"missing dh rsa cert"}, | ||
304 | {SSL_R_MISSING_DSA_SIGNING_CERT ,"missing dsa signing cert"}, | ||
305 | {SSL_R_MISSING_EXPORT_TMP_DH_KEY ,"missing export tmp dh key"}, | ||
306 | {SSL_R_MISSING_EXPORT_TMP_RSA_KEY ,"missing export tmp rsa key"}, | ||
307 | {SSL_R_MISSING_RSA_CERTIFICATE ,"missing rsa certificate"}, | ||
308 | {SSL_R_MISSING_RSA_ENCRYPTING_CERT ,"missing rsa encrypting cert"}, | ||
309 | {SSL_R_MISSING_RSA_SIGNING_CERT ,"missing rsa signing cert"}, | ||
310 | {SSL_R_MISSING_TMP_DH_KEY ,"missing tmp dh key"}, | ||
311 | {SSL_R_MISSING_TMP_RSA_KEY ,"missing tmp rsa key"}, | ||
312 | {SSL_R_MISSING_TMP_RSA_PKEY ,"missing tmp rsa pkey"}, | ||
313 | {SSL_R_MISSING_VERIFY_MESSAGE ,"missing verify message"}, | ||
314 | {SSL_R_NON_SSLV2_INITIAL_PACKET ,"non sslv2 initial packet"}, | ||
315 | {SSL_R_NO_CERTIFICATES_RETURNED ,"no certificates returned"}, | ||
316 | {SSL_R_NO_CERTIFICATE_ASSIGNED ,"no certificate assigned"}, | ||
317 | {SSL_R_NO_CERTIFICATE_RETURNED ,"no certificate returned"}, | ||
318 | {SSL_R_NO_CERTIFICATE_SET ,"no certificate set"}, | ||
319 | {SSL_R_NO_CERTIFICATE_SPECIFIED ,"no certificate specified"}, | ||
320 | {SSL_R_NO_CIPHERS_AVAILABLE ,"no ciphers available"}, | ||
321 | {SSL_R_NO_CIPHERS_PASSED ,"no ciphers passed"}, | ||
322 | {SSL_R_NO_CIPHERS_SPECIFIED ,"no ciphers specified"}, | ||
323 | {SSL_R_NO_CIPHER_LIST ,"no cipher list"}, | ||
324 | {SSL_R_NO_CIPHER_MATCH ,"no cipher match"}, | ||
325 | {SSL_R_NO_CLIENT_CERT_RECEIVED ,"no client cert received"}, | ||
326 | {SSL_R_NO_COMPRESSION_SPECIFIED ,"no compression specified"}, | ||
327 | {SSL_R_NO_METHOD_SPECIFIED ,"no method specified"}, | ||
328 | {SSL_R_NO_PRIVATEKEY ,"no privatekey"}, | ||
329 | {SSL_R_NO_PRIVATE_KEY_ASSIGNED ,"no private key assigned"}, | ||
330 | {SSL_R_NO_PROTOCOLS_AVAILABLE ,"no protocols available"}, | ||
331 | {SSL_R_NO_PUBLICKEY ,"no publickey"}, | ||
332 | {SSL_R_NO_SHARED_CIPHER ,"no shared cipher"}, | ||
333 | {SSL_R_NO_VERIFY_CALLBACK ,"no verify callback"}, | ||
334 | {SSL_R_NULL_SSL_CTX ,"null ssl ctx"}, | ||
335 | {SSL_R_NULL_SSL_METHOD_PASSED ,"null ssl method passed"}, | ||
336 | {SSL_R_OLD_SESSION_CIPHER_NOT_RETURNED ,"old session cipher not returned"}, | ||
337 | {SSL_R_PACKET_LENGTH_TOO_LONG ,"packet length too long"}, | ||
338 | {SSL_R_PATH_TOO_LONG ,"path too long"}, | ||
339 | {SSL_R_PEER_DID_NOT_RETURN_A_CERTIFICATE ,"peer did not return a certificate"}, | ||
340 | {SSL_R_PEER_ERROR ,"peer error"}, | ||
341 | {SSL_R_PEER_ERROR_CERTIFICATE ,"peer error certificate"}, | ||
342 | {SSL_R_PEER_ERROR_NO_CERTIFICATE ,"peer error no certificate"}, | ||
343 | {SSL_R_PEER_ERROR_NO_CIPHER ,"peer error no cipher"}, | ||
344 | {SSL_R_PEER_ERROR_UNSUPPORTED_CERTIFICATE_TYPE,"peer error unsupported certificate type"}, | ||
345 | {SSL_R_PRE_MAC_LENGTH_TOO_LONG ,"pre mac length too long"}, | ||
346 | {SSL_R_PROBLEMS_MAPPING_CIPHER_FUNCTIONS ,"problems mapping cipher functions"}, | ||
347 | {SSL_R_PROTOCOL_IS_SHUTDOWN ,"protocol is shutdown"}, | ||
348 | {SSL_R_PUBLIC_KEY_ENCRYPT_ERROR ,"public key encrypt error"}, | ||
349 | {SSL_R_PUBLIC_KEY_IS_NOT_RSA ,"public key is not rsa"}, | ||
350 | {SSL_R_PUBLIC_KEY_NOT_RSA ,"public key not rsa"}, | ||
351 | {SSL_R_READ_BIO_NOT_SET ,"read bio not set"}, | ||
352 | {SSL_R_READ_WRONG_PACKET_TYPE ,"read wrong packet type"}, | ||
353 | {SSL_R_RECORD_LENGTH_MISMATCH ,"record length mismatch"}, | ||
354 | {SSL_R_RECORD_TOO_LARGE ,"record too large"}, | ||
355 | {SSL_R_RECORD_TOO_SMALL ,"record too small"}, | ||
356 | {SSL_R_REQUIRED_CIPHER_MISSING ,"required cipher missing"}, | ||
357 | {SSL_R_REUSE_CERT_LENGTH_NOT_ZERO ,"reuse cert length not zero"}, | ||
358 | {SSL_R_REUSE_CERT_TYPE_NOT_ZERO ,"reuse cert type not zero"}, | ||
359 | {SSL_R_REUSE_CIPHER_LIST_NOT_ZERO ,"reuse cipher list not zero"}, | ||
360 | {SSL_R_SESSION_ID_CONTEXT_UNINITIALIZED ,"session id context uninitialized"}, | ||
361 | {SSL_R_SHORT_READ ,"short read"}, | ||
362 | {SSL_R_SIGNATURE_FOR_NON_SIGNING_CERTIFICATE,"signature for non signing certificate"}, | ||
363 | {SSL_R_SSL23_DOING_SESSION_ID_REUSE ,"ssl23 doing session id reuse"}, | ||
364 | {SSL_R_SSL2_CONNECTION_ID_TOO_LONG ,"ssl2 connection id too long"}, | ||
365 | {SSL_R_SSL3_SESSION_ID_TOO_LONG ,"ssl3 session id too long"}, | ||
366 | {SSL_R_SSL3_SESSION_ID_TOO_SHORT ,"ssl3 session id too short"}, | ||
367 | {SSL_R_SSLV3_ALERT_BAD_CERTIFICATE ,"sslv3 alert bad certificate"}, | ||
368 | {SSL_R_SSLV3_ALERT_BAD_RECORD_MAC ,"sslv3 alert bad record mac"}, | ||
369 | {SSL_R_SSLV3_ALERT_CERTIFICATE_EXPIRED ,"sslv3 alert certificate expired"}, | ||
370 | {SSL_R_SSLV3_ALERT_CERTIFICATE_REVOKED ,"sslv3 alert certificate revoked"}, | ||
371 | {SSL_R_SSLV3_ALERT_CERTIFICATE_UNKNOWN ,"sslv3 alert certificate unknown"}, | ||
372 | {SSL_R_SSLV3_ALERT_DECOMPRESSION_FAILURE ,"sslv3 alert decompression failure"}, | ||
373 | {SSL_R_SSLV3_ALERT_HANDSHAKE_FAILURE ,"sslv3 alert handshake failure"}, | ||
374 | {SSL_R_SSLV3_ALERT_ILLEGAL_PARAMETER ,"sslv3 alert illegal parameter"}, | ||
375 | {SSL_R_SSLV3_ALERT_NO_CERTIFICATE ,"sslv3 alert no certificate"}, | ||
376 | {SSL_R_SSLV3_ALERT_PEER_ERROR_CERTIFICATE,"sslv3 alert peer error certificate"}, | ||
377 | {SSL_R_SSLV3_ALERT_PEER_ERROR_NO_CERTIFICATE,"sslv3 alert peer error no certificate"}, | ||
378 | {SSL_R_SSLV3_ALERT_PEER_ERROR_NO_CIPHER ,"sslv3 alert peer error no cipher"}, | ||
379 | {SSL_R_SSLV3_ALERT_PEER_ERROR_UNSUPPORTED_CERTIFICATE_TYPE,"sslv3 alert peer error unsupported certificate type"}, | ||
380 | {SSL_R_SSLV3_ALERT_UNEXPECTED_MESSAGE ,"sslv3 alert unexpected message"}, | ||
381 | {SSL_R_SSLV3_ALERT_UNKNOWN_REMOTE_ERROR_TYPE,"sslv3 alert unknown remote error type"}, | ||
382 | {SSL_R_SSLV3_ALERT_UNSUPPORTED_CERTIFICATE,"sslv3 alert unsupported certificate"}, | ||
383 | {SSL_R_SSL_CTX_HAS_NO_DEFAULT_SSL_VERSION,"ssl ctx has no default ssl version"}, | ||
384 | {SSL_R_SSL_HANDSHAKE_FAILURE ,"ssl handshake failure"}, | ||
385 | {SSL_R_SSL_LIBRARY_HAS_NO_CIPHERS ,"ssl library has no ciphers"}, | ||
386 | {SSL_R_SSL_SESSION_ID_CALLBACK_FAILED ,"ssl session id callback failed"}, | ||
387 | {SSL_R_SSL_SESSION_ID_CONFLICT ,"ssl session id conflict"}, | ||
388 | {SSL_R_SSL_SESSION_ID_CONTEXT_TOO_LONG ,"ssl session id context too long"}, | ||
389 | {SSL_R_SSL_SESSION_ID_HAS_BAD_LENGTH ,"ssl session id has bad length"}, | ||
390 | {SSL_R_SSL_SESSION_ID_IS_DIFFERENT ,"ssl session id is different"}, | ||
391 | {SSL_R_TLSV1_ALERT_ACCESS_DENIED ,"tlsv1 alert access denied"}, | ||
392 | {SSL_R_TLSV1_ALERT_DECODE_ERROR ,"tlsv1 alert decode error"}, | ||
393 | {SSL_R_TLSV1_ALERT_DECRYPTION_FAILED ,"tlsv1 alert decryption failed"}, | ||
394 | {SSL_R_TLSV1_ALERT_DECRYPT_ERROR ,"tlsv1 alert decrypt error"}, | ||
395 | {SSL_R_TLSV1_ALERT_EXPORT_RESTRICTION ,"tlsv1 alert export restriction"}, | ||
396 | {SSL_R_TLSV1_ALERT_INSUFFICIENT_SECURITY ,"tlsv1 alert insufficient security"}, | ||
397 | {SSL_R_TLSV1_ALERT_INTERNAL_ERROR ,"tlsv1 alert internal error"}, | ||
398 | {SSL_R_TLSV1_ALERT_NO_RENEGOTIATION ,"tlsv1 alert no renegotiation"}, | ||
399 | {SSL_R_TLSV1_ALERT_PROTOCOL_VERSION ,"tlsv1 alert protocol version"}, | ||
400 | {SSL_R_TLSV1_ALERT_RECORD_OVERFLOW ,"tlsv1 alert record overflow"}, | ||
401 | {SSL_R_TLSV1_ALERT_UNKNOWN_CA ,"tlsv1 alert unknown ca"}, | ||
402 | {SSL_R_TLSV1_ALERT_USER_CANCELLED ,"tlsv1 alert user cancelled"}, | ||
403 | {SSL_R_TLS_CLIENT_CERT_REQ_WITH_ANON_CIPHER,"tls client cert req with anon cipher"}, | ||
404 | {SSL_R_TLS_PEER_DID_NOT_RESPOND_WITH_CERTIFICATE_LIST,"tls peer did not respond with certificate list"}, | ||
405 | {SSL_R_TLS_RSA_ENCRYPTED_VALUE_LENGTH_IS_WRONG,"tls rsa encrypted value length is wrong"}, | ||
406 | {SSL_R_TRIED_TO_USE_UNSUPPORTED_CIPHER ,"tried to use unsupported cipher"}, | ||
407 | {SSL_R_UNABLE_TO_DECODE_DH_CERTS ,"unable to decode dh certs"}, | ||
408 | {SSL_R_UNABLE_TO_EXTRACT_PUBLIC_KEY ,"unable to extract public key"}, | ||
409 | {SSL_R_UNABLE_TO_FIND_DH_PARAMETERS ,"unable to find dh parameters"}, | ||
410 | {SSL_R_UNABLE_TO_FIND_PUBLIC_KEY_PARAMETERS,"unable to find public key parameters"}, | ||
411 | {SSL_R_UNABLE_TO_FIND_SSL_METHOD ,"unable to find ssl method"}, | ||
412 | {SSL_R_UNABLE_TO_LOAD_SSL2_MD5_ROUTINES ,"unable to load ssl2 md5 routines"}, | ||
413 | {SSL_R_UNABLE_TO_LOAD_SSL3_MD5_ROUTINES ,"unable to load ssl3 md5 routines"}, | ||
414 | {SSL_R_UNABLE_TO_LOAD_SSL3_SHA1_ROUTINES ,"unable to load ssl3 sha1 routines"}, | ||
415 | {SSL_R_UNEXPECTED_MESSAGE ,"unexpected message"}, | ||
416 | {SSL_R_UNEXPECTED_RECORD ,"unexpected record"}, | ||
417 | {SSL_R_UNINITIALIZED ,"uninitialized"}, | ||
418 | {SSL_R_UNKNOWN_ALERT_TYPE ,"unknown alert type"}, | ||
419 | {SSL_R_UNKNOWN_CERTIFICATE_TYPE ,"unknown certificate type"}, | ||
420 | {SSL_R_UNKNOWN_CIPHER_RETURNED ,"unknown cipher returned"}, | ||
421 | {SSL_R_UNKNOWN_CIPHER_TYPE ,"unknown cipher type"}, | ||
422 | {SSL_R_UNKNOWN_KEY_EXCHANGE_TYPE ,"unknown key exchange type"}, | ||
423 | {SSL_R_UNKNOWN_PKEY_TYPE ,"unknown pkey type"}, | ||
424 | {SSL_R_UNKNOWN_PROTOCOL ,"unknown protocol"}, | ||
425 | {SSL_R_UNKNOWN_REMOTE_ERROR_TYPE ,"unknown remote error type"}, | ||
426 | {SSL_R_UNKNOWN_SSL_VERSION ,"unknown ssl version"}, | ||
427 | {SSL_R_UNKNOWN_STATE ,"unknown state"}, | ||
428 | {SSL_R_UNSUPPORTED_CIPHER ,"unsupported cipher"}, | ||
429 | {SSL_R_UNSUPPORTED_COMPRESSION_ALGORITHM ,"unsupported compression algorithm"}, | ||
430 | {SSL_R_UNSUPPORTED_OPTION ,"unsupported option"}, | ||
431 | {SSL_R_UNSUPPORTED_PROTOCOL ,"unsupported protocol"}, | ||
432 | {SSL_R_UNSUPPORTED_SSL_VERSION ,"unsupported ssl version"}, | ||
433 | {SSL_R_WRITE_BIO_NOT_SET ,"write bio not set"}, | ||
434 | {SSL_R_WRONG_CIPHER_RETURNED ,"wrong cipher returned"}, | ||
435 | {SSL_R_WRONG_MESSAGE_TYPE ,"wrong message type"}, | ||
436 | {SSL_R_WRONG_NUMBER_OF_KEY_BITS ,"wrong number of key bits"}, | ||
437 | {SSL_R_WRONG_SIGNATURE_LENGTH ,"wrong signature length"}, | ||
438 | {SSL_R_WRONG_SIGNATURE_SIZE ,"wrong signature size"}, | ||
439 | {SSL_R_WRONG_SSL_VERSION ,"wrong ssl version"}, | ||
440 | {SSL_R_WRONG_VERSION_NUMBER ,"wrong version number"}, | ||
441 | {SSL_R_X509_LIB ,"x509 lib"}, | ||
442 | {SSL_R_X509_VERIFICATION_SETUP_PROBLEMS ,"x509 verification setup problems"}, | ||
443 | {0,NULL} | ||
444 | }; | ||
445 | |||
446 | #endif | ||
447 | |||
448 | void ERR_load_SSL_strings(void) | ||
449 | { | ||
450 | static int init=1; | ||
451 | |||
452 | if (init) | ||
453 | { | ||
454 | init=0; | ||
455 | #ifndef OPENSSL_NO_ERR | ||
456 | ERR_load_strings(ERR_LIB_SSL,SSL_str_functs); | ||
457 | ERR_load_strings(ERR_LIB_SSL,SSL_str_reasons); | ||
458 | #endif | ||
459 | |||
460 | } | ||
461 | } | ||
diff --git a/src/lib/libssl/ssl_err2.c b/src/lib/libssl/ssl_err2.c deleted file mode 100644 index ea95a5f983..0000000000 --- a/src/lib/libssl/ssl_err2.c +++ /dev/null | |||
@@ -1,70 +0,0 @@ | |||
1 | /* ssl/ssl_err2.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 <openssl/err.h> | ||
61 | #include <openssl/ssl.h> | ||
62 | |||
63 | void SSL_load_error_strings(void) | ||
64 | { | ||
65 | #ifndef OPENSSL_NO_ERR | ||
66 | ERR_load_crypto_strings(); | ||
67 | ERR_load_SSL_strings(); | ||
68 | #endif | ||
69 | } | ||
70 | |||
diff --git a/src/lib/libssl/ssl_lib.c b/src/lib/libssl/ssl_lib.c deleted file mode 100644 index ee9a82d586..0000000000 --- a/src/lib/libssl/ssl_lib.c +++ /dev/null | |||
@@ -1,2319 +0,0 @@ | |||
1 | /*! \file ssl/ssl_lib.c | ||
2 | * \brief Version independent SSL functions. | ||
3 | */ | ||
4 | /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) | ||
5 | * All rights reserved. | ||
6 | * | ||
7 | * This package is an SSL implementation written | ||
8 | * by Eric Young (eay@cryptsoft.com). | ||
9 | * The implementation was written so as to conform with Netscapes SSL. | ||
10 | * | ||
11 | * This library is free for commercial and non-commercial use as long as | ||
12 | * the following conditions are aheared to. The following conditions | ||
13 | * apply to all code found in this distribution, be it the RC4, RSA, | ||
14 | * lhash, DES, etc., code; not just the SSL code. The SSL documentation | ||
15 | * included with this distribution is covered by the same copyright terms | ||
16 | * except that the holder is Tim Hudson (tjh@cryptsoft.com). | ||
17 | * | ||
18 | * Copyright remains Eric Young's, and as such any Copyright notices in | ||
19 | * the code are not to be removed. | ||
20 | * If this package is used in a product, Eric Young should be given attribution | ||
21 | * as the author of the parts of the library used. | ||
22 | * This can be in the form of a textual message at program startup or | ||
23 | * in documentation (online or textual) provided with the package. | ||
24 | * | ||
25 | * Redistribution and use in source and binary forms, with or without | ||
26 | * modification, are permitted provided that the following conditions | ||
27 | * are met: | ||
28 | * 1. Redistributions of source code must retain the copyright | ||
29 | * notice, this list of conditions and the following disclaimer. | ||
30 | * 2. Redistributions in binary form must reproduce the above copyright | ||
31 | * notice, this list of conditions and the following disclaimer in the | ||
32 | * documentation and/or other materials provided with the distribution. | ||
33 | * 3. All advertising materials mentioning features or use of this software | ||
34 | * must display the following acknowledgement: | ||
35 | * "This product includes cryptographic software written by | ||
36 | * Eric Young (eay@cryptsoft.com)" | ||
37 | * The word 'cryptographic' can be left out if the rouines from the library | ||
38 | * being used are not cryptographic related :-). | ||
39 | * 4. If you include any Windows specific code (or a derivative thereof) from | ||
40 | * the apps directory (application code) you must include an acknowledgement: | ||
41 | * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)" | ||
42 | * | ||
43 | * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND | ||
44 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||
45 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||
46 | * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE | ||
47 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | ||
48 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | ||
49 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | ||
50 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | ||
51 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | ||
52 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | ||
53 | * SUCH DAMAGE. | ||
54 | * | ||
55 | * The licence and distribution terms for any publically available version or | ||
56 | * derivative of this code cannot be changed. i.e. this code cannot simply be | ||
57 | * copied and put under another distribution licence | ||
58 | * [including the GNU Public Licence.] | ||
59 | */ | ||
60 | /* ==================================================================== | ||
61 | * Copyright (c) 1998-2001 The OpenSSL Project. All rights reserved. | ||
62 | * | ||
63 | * Redistribution and use in source and binary forms, with or without | ||
64 | * modification, are permitted provided that the following conditions | ||
65 | * are met: | ||
66 | * | ||
67 | * 1. Redistributions of source code must retain the above copyright | ||
68 | * notice, this list of conditions and the following disclaimer. | ||
69 | * | ||
70 | * 2. Redistributions in binary form must reproduce the above copyright | ||
71 | * notice, this list of conditions and the following disclaimer in | ||
72 | * the documentation and/or other materials provided with the | ||
73 | * distribution. | ||
74 | * | ||
75 | * 3. All advertising materials mentioning features or use of this | ||
76 | * software must display the following acknowledgment: | ||
77 | * "This product includes software developed by the OpenSSL Project | ||
78 | * for use in the OpenSSL Toolkit. (http://www.openssl.org/)" | ||
79 | * | ||
80 | * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to | ||
81 | * endorse or promote products derived from this software without | ||
82 | * prior written permission. For written permission, please contact | ||
83 | * openssl-core@openssl.org. | ||
84 | * | ||
85 | * 5. Products derived from this software may not be called "OpenSSL" | ||
86 | * nor may "OpenSSL" appear in their names without prior written | ||
87 | * permission of the OpenSSL Project. | ||
88 | * | ||
89 | * 6. Redistributions of any form whatsoever must retain the following | ||
90 | * acknowledgment: | ||
91 | * "This product includes software developed by the OpenSSL Project | ||
92 | * for use in the OpenSSL Toolkit (http://www.openssl.org/)" | ||
93 | * | ||
94 | * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY | ||
95 | * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||
96 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR | ||
97 | * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR | ||
98 | * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, | ||
99 | * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | ||
100 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; | ||
101 | * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | ||
102 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, | ||
103 | * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | ||
104 | * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED | ||
105 | * OF THE POSSIBILITY OF SUCH DAMAGE. | ||
106 | * ==================================================================== | ||
107 | * | ||
108 | * This product includes cryptographic software written by Eric Young | ||
109 | * (eay@cryptsoft.com). This product includes software written by Tim | ||
110 | * Hudson (tjh@cryptsoft.com). | ||
111 | * | ||
112 | */ | ||
113 | |||
114 | |||
115 | #ifdef REF_CHECK | ||
116 | # include <assert.h> | ||
117 | #endif | ||
118 | #include <stdio.h> | ||
119 | #include "ssl_locl.h" | ||
120 | #include "kssl_lcl.h" | ||
121 | #include <openssl/objects.h> | ||
122 | #include <openssl/lhash.h> | ||
123 | #include <openssl/x509v3.h> | ||
124 | |||
125 | const char *SSL_version_str=OPENSSL_VERSION_TEXT; | ||
126 | |||
127 | OPENSSL_GLOBAL SSL3_ENC_METHOD ssl3_undef_enc_method={ | ||
128 | /* evil casts, but these functions are only called if there's a library bug */ | ||
129 | (int (*)(SSL *,int))ssl_undefined_function, | ||
130 | (int (*)(SSL *, unsigned char *, int))ssl_undefined_function, | ||
131 | ssl_undefined_function, | ||
132 | (int (*)(SSL *, unsigned char *, unsigned char *, int))ssl_undefined_function, | ||
133 | (int (*)(SSL*, int))ssl_undefined_function, | ||
134 | (int (*)(SSL *, EVP_MD_CTX *, EVP_MD_CTX *, const char*, int, unsigned char *))ssl_undefined_function | ||
135 | }; | ||
136 | |||
137 | int SSL_clear(SSL *s) | ||
138 | { | ||
139 | |||
140 | if (s->method == NULL) | ||
141 | { | ||
142 | SSLerr(SSL_F_SSL_CLEAR,SSL_R_NO_METHOD_SPECIFIED); | ||
143 | return(0); | ||
144 | } | ||
145 | |||
146 | if (ssl_clear_bad_session(s)) | ||
147 | { | ||
148 | SSL_SESSION_free(s->session); | ||
149 | s->session=NULL; | ||
150 | } | ||
151 | |||
152 | s->error=0; | ||
153 | s->hit=0; | ||
154 | s->shutdown=0; | ||
155 | |||
156 | #if 0 /* Disabled since version 1.10 of this file (early return not | ||
157 | * needed because SSL_clear is not called when doing renegotiation) */ | ||
158 | /* This is set if we are doing dynamic renegotiation so keep | ||
159 | * the old cipher. It is sort of a SSL_clear_lite :-) */ | ||
160 | if (s->new_session) return(1); | ||
161 | #else | ||
162 | if (s->new_session) | ||
163 | { | ||
164 | SSLerr(SSL_F_SSL_CLEAR,ERR_R_INTERNAL_ERROR); | ||
165 | return 0; | ||
166 | } | ||
167 | #endif | ||
168 | |||
169 | s->type=0; | ||
170 | |||
171 | s->state=SSL_ST_BEFORE|((s->server)?SSL_ST_ACCEPT:SSL_ST_CONNECT); | ||
172 | |||
173 | s->version=s->method->version; | ||
174 | s->client_version=s->version; | ||
175 | s->rwstate=SSL_NOTHING; | ||
176 | s->rstate=SSL_ST_READ_HEADER; | ||
177 | #if 0 | ||
178 | s->read_ahead=s->ctx->read_ahead; | ||
179 | #endif | ||
180 | |||
181 | if (s->init_buf != NULL) | ||
182 | { | ||
183 | BUF_MEM_free(s->init_buf); | ||
184 | s->init_buf=NULL; | ||
185 | } | ||
186 | |||
187 | ssl_clear_cipher_ctx(s); | ||
188 | |||
189 | s->first_packet=0; | ||
190 | |||
191 | #if 1 | ||
192 | /* Check to see if we were changed into a different method, if | ||
193 | * so, revert back if we are not doing session-id reuse. */ | ||
194 | if (!s->in_handshake && (s->session == NULL) && (s->method != s->ctx->method)) | ||
195 | { | ||
196 | s->method->ssl_free(s); | ||
197 | s->method=s->ctx->method; | ||
198 | if (!s->method->ssl_new(s)) | ||
199 | return(0); | ||
200 | } | ||
201 | else | ||
202 | #endif | ||
203 | s->method->ssl_clear(s); | ||
204 | return(1); | ||
205 | } | ||
206 | |||
207 | /** Used to change an SSL_CTXs default SSL method type */ | ||
208 | int SSL_CTX_set_ssl_version(SSL_CTX *ctx,SSL_METHOD *meth) | ||
209 | { | ||
210 | STACK_OF(SSL_CIPHER) *sk; | ||
211 | |||
212 | ctx->method=meth; | ||
213 | |||
214 | sk=ssl_create_cipher_list(ctx->method,&(ctx->cipher_list), | ||
215 | &(ctx->cipher_list_by_id),SSL_DEFAULT_CIPHER_LIST); | ||
216 | if ((sk == NULL) || (sk_SSL_CIPHER_num(sk) <= 0)) | ||
217 | { | ||
218 | SSLerr(SSL_F_SSL_CTX_SET_SSL_VERSION,SSL_R_SSL_LIBRARY_HAS_NO_CIPHERS); | ||
219 | return(0); | ||
220 | } | ||
221 | return(1); | ||
222 | } | ||
223 | |||
224 | SSL *SSL_new(SSL_CTX *ctx) | ||
225 | { | ||
226 | SSL *s; | ||
227 | |||
228 | if (ctx == NULL) | ||
229 | { | ||
230 | SSLerr(SSL_F_SSL_NEW,SSL_R_NULL_SSL_CTX); | ||
231 | return(NULL); | ||
232 | } | ||
233 | if (ctx->method == NULL) | ||
234 | { | ||
235 | SSLerr(SSL_F_SSL_NEW,SSL_R_SSL_CTX_HAS_NO_DEFAULT_SSL_VERSION); | ||
236 | return(NULL); | ||
237 | } | ||
238 | |||
239 | s=(SSL *)OPENSSL_malloc(sizeof(SSL)); | ||
240 | if (s == NULL) goto err; | ||
241 | memset(s,0,sizeof(SSL)); | ||
242 | |||
243 | #ifndef OPENSSL_NO_KRB5 | ||
244 | s->kssl_ctx = kssl_ctx_new(); | ||
245 | #endif /* OPENSSL_NO_KRB5 */ | ||
246 | |||
247 | s->options=ctx->options; | ||
248 | s->mode=ctx->mode; | ||
249 | s->max_cert_list=ctx->max_cert_list; | ||
250 | |||
251 | if (ctx->cert != NULL) | ||
252 | { | ||
253 | /* Earlier library versions used to copy the pointer to | ||
254 | * the CERT, not its contents; only when setting new | ||
255 | * parameters for the per-SSL copy, ssl_cert_new would be | ||
256 | * called (and the direct reference to the per-SSL_CTX | ||
257 | * settings would be lost, but those still were indirectly | ||
258 | * accessed for various purposes, and for that reason they | ||
259 | * used to be known as s->ctx->default_cert). | ||
260 | * Now we don't look at the SSL_CTX's CERT after having | ||
261 | * duplicated it once. */ | ||
262 | |||
263 | s->cert = ssl_cert_dup(ctx->cert); | ||
264 | if (s->cert == NULL) | ||
265 | goto err; | ||
266 | } | ||
267 | else | ||
268 | s->cert=NULL; /* Cannot really happen (see SSL_CTX_new) */ | ||
269 | |||
270 | s->read_ahead=ctx->read_ahead; | ||
271 | s->msg_callback=ctx->msg_callback; | ||
272 | s->msg_callback_arg=ctx->msg_callback_arg; | ||
273 | s->verify_mode=ctx->verify_mode; | ||
274 | s->verify_depth=ctx->verify_depth; | ||
275 | s->sid_ctx_length=ctx->sid_ctx_length; | ||
276 | OPENSSL_assert(s->sid_ctx_length <= sizeof s->sid_ctx); | ||
277 | memcpy(&s->sid_ctx,&ctx->sid_ctx,sizeof(s->sid_ctx)); | ||
278 | s->verify_callback=ctx->default_verify_callback; | ||
279 | s->generate_session_id=ctx->generate_session_id; | ||
280 | s->purpose = ctx->purpose; | ||
281 | s->trust = ctx->trust; | ||
282 | s->quiet_shutdown=ctx->quiet_shutdown; | ||
283 | |||
284 | CRYPTO_add(&ctx->references,1,CRYPTO_LOCK_SSL_CTX); | ||
285 | s->ctx=ctx; | ||
286 | |||
287 | s->verify_result=X509_V_OK; | ||
288 | |||
289 | s->method=ctx->method; | ||
290 | |||
291 | if (!s->method->ssl_new(s)) | ||
292 | goto err; | ||
293 | |||
294 | s->references=1; | ||
295 | s->server=(ctx->method->ssl_accept == ssl_undefined_function)?0:1; | ||
296 | |||
297 | SSL_clear(s); | ||
298 | |||
299 | CRYPTO_new_ex_data(CRYPTO_EX_INDEX_SSL, s, &s->ex_data); | ||
300 | |||
301 | return(s); | ||
302 | err: | ||
303 | if (s != NULL) | ||
304 | { | ||
305 | if (s->cert != NULL) | ||
306 | ssl_cert_free(s->cert); | ||
307 | if (s->ctx != NULL) | ||
308 | SSL_CTX_free(s->ctx); /* decrement reference count */ | ||
309 | OPENSSL_free(s); | ||
310 | } | ||
311 | SSLerr(SSL_F_SSL_NEW,ERR_R_MALLOC_FAILURE); | ||
312 | return(NULL); | ||
313 | } | ||
314 | |||
315 | int SSL_CTX_set_session_id_context(SSL_CTX *ctx,const unsigned char *sid_ctx, | ||
316 | unsigned int sid_ctx_len) | ||
317 | { | ||
318 | if(sid_ctx_len > sizeof ctx->sid_ctx) | ||
319 | { | ||
320 | SSLerr(SSL_F_SSL_CTX_SET_SESSION_ID_CONTEXT,SSL_R_SSL_SESSION_ID_CONTEXT_TOO_LONG); | ||
321 | return 0; | ||
322 | } | ||
323 | ctx->sid_ctx_length=sid_ctx_len; | ||
324 | memcpy(ctx->sid_ctx,sid_ctx,sid_ctx_len); | ||
325 | |||
326 | return 1; | ||
327 | } | ||
328 | |||
329 | int SSL_set_session_id_context(SSL *ssl,const unsigned char *sid_ctx, | ||
330 | unsigned int sid_ctx_len) | ||
331 | { | ||
332 | if(sid_ctx_len > SSL_MAX_SID_CTX_LENGTH) | ||
333 | { | ||
334 | SSLerr(SSL_F_SSL_SET_SESSION_ID_CONTEXT,SSL_R_SSL_SESSION_ID_CONTEXT_TOO_LONG); | ||
335 | return 0; | ||
336 | } | ||
337 | ssl->sid_ctx_length=sid_ctx_len; | ||
338 | memcpy(ssl->sid_ctx,sid_ctx,sid_ctx_len); | ||
339 | |||
340 | return 1; | ||
341 | } | ||
342 | |||
343 | int SSL_CTX_set_generate_session_id(SSL_CTX *ctx, GEN_SESSION_CB cb) | ||
344 | { | ||
345 | CRYPTO_w_lock(CRYPTO_LOCK_SSL_CTX); | ||
346 | ctx->generate_session_id = cb; | ||
347 | CRYPTO_w_unlock(CRYPTO_LOCK_SSL_CTX); | ||
348 | return 1; | ||
349 | } | ||
350 | |||
351 | int SSL_set_generate_session_id(SSL *ssl, GEN_SESSION_CB cb) | ||
352 | { | ||
353 | CRYPTO_w_lock(CRYPTO_LOCK_SSL); | ||
354 | ssl->generate_session_id = cb; | ||
355 | CRYPTO_w_unlock(CRYPTO_LOCK_SSL); | ||
356 | return 1; | ||
357 | } | ||
358 | |||
359 | int SSL_has_matching_session_id(const SSL *ssl, const unsigned char *id, | ||
360 | unsigned int id_len) | ||
361 | { | ||
362 | /* A quick examination of SSL_SESSION_hash and SSL_SESSION_cmp shows how | ||
363 | * we can "construct" a session to give us the desired check - ie. to | ||
364 | * find if there's a session in the hash table that would conflict with | ||
365 | * any new session built out of this id/id_len and the ssl_version in | ||
366 | * use by this SSL. */ | ||
367 | SSL_SESSION r, *p; | ||
368 | |||
369 | if(id_len > sizeof r.session_id) | ||
370 | return 0; | ||
371 | |||
372 | r.ssl_version = ssl->version; | ||
373 | r.session_id_length = id_len; | ||
374 | memcpy(r.session_id, id, id_len); | ||
375 | /* NB: SSLv2 always uses a fixed 16-byte session ID, so even if a | ||
376 | * callback is calling us to check the uniqueness of a shorter ID, it | ||
377 | * must be compared as a padded-out ID because that is what it will be | ||
378 | * converted to when the callback has finished choosing it. */ | ||
379 | if((r.ssl_version == SSL2_VERSION) && | ||
380 | (id_len < SSL2_SSL_SESSION_ID_LENGTH)) | ||
381 | { | ||
382 | memset(r.session_id + id_len, 0, | ||
383 | SSL2_SSL_SESSION_ID_LENGTH - id_len); | ||
384 | r.session_id_length = SSL2_SSL_SESSION_ID_LENGTH; | ||
385 | } | ||
386 | |||
387 | CRYPTO_r_lock(CRYPTO_LOCK_SSL_CTX); | ||
388 | p = (SSL_SESSION *)lh_retrieve(ssl->ctx->sessions, &r); | ||
389 | CRYPTO_r_unlock(CRYPTO_LOCK_SSL_CTX); | ||
390 | return (p != NULL); | ||
391 | } | ||
392 | |||
393 | int SSL_CTX_set_purpose(SSL_CTX *s, int purpose) | ||
394 | { | ||
395 | return X509_PURPOSE_set(&s->purpose, purpose); | ||
396 | } | ||
397 | |||
398 | int SSL_set_purpose(SSL *s, int purpose) | ||
399 | { | ||
400 | return X509_PURPOSE_set(&s->purpose, purpose); | ||
401 | } | ||
402 | |||
403 | int SSL_CTX_set_trust(SSL_CTX *s, int trust) | ||
404 | { | ||
405 | return X509_TRUST_set(&s->trust, trust); | ||
406 | } | ||
407 | |||
408 | int SSL_set_trust(SSL *s, int trust) | ||
409 | { | ||
410 | return X509_TRUST_set(&s->trust, trust); | ||
411 | } | ||
412 | |||
413 | void SSL_free(SSL *s) | ||
414 | { | ||
415 | int i; | ||
416 | |||
417 | if(s == NULL) | ||
418 | return; | ||
419 | |||
420 | i=CRYPTO_add(&s->references,-1,CRYPTO_LOCK_SSL); | ||
421 | #ifdef REF_PRINT | ||
422 | REF_PRINT("SSL",s); | ||
423 | #endif | ||
424 | if (i > 0) return; | ||
425 | #ifdef REF_CHECK | ||
426 | if (i < 0) | ||
427 | { | ||
428 | fprintf(stderr,"SSL_free, bad reference count\n"); | ||
429 | abort(); /* ok */ | ||
430 | } | ||
431 | #endif | ||
432 | |||
433 | CRYPTO_free_ex_data(CRYPTO_EX_INDEX_SSL, s, &s->ex_data); | ||
434 | |||
435 | if (s->bbio != NULL) | ||
436 | { | ||
437 | /* If the buffering BIO is in place, pop it off */ | ||
438 | if (s->bbio == s->wbio) | ||
439 | { | ||
440 | s->wbio=BIO_pop(s->wbio); | ||
441 | } | ||
442 | BIO_free(s->bbio); | ||
443 | s->bbio=NULL; | ||
444 | } | ||
445 | if (s->rbio != NULL) | ||
446 | BIO_free_all(s->rbio); | ||
447 | if ((s->wbio != NULL) && (s->wbio != s->rbio)) | ||
448 | BIO_free_all(s->wbio); | ||
449 | |||
450 | if (s->init_buf != NULL) BUF_MEM_free(s->init_buf); | ||
451 | |||
452 | /* add extra stuff */ | ||
453 | if (s->cipher_list != NULL) sk_SSL_CIPHER_free(s->cipher_list); | ||
454 | if (s->cipher_list_by_id != NULL) sk_SSL_CIPHER_free(s->cipher_list_by_id); | ||
455 | |||
456 | /* Make the next call work :-) */ | ||
457 | if (s->session != NULL) | ||
458 | { | ||
459 | ssl_clear_bad_session(s); | ||
460 | SSL_SESSION_free(s->session); | ||
461 | } | ||
462 | |||
463 | ssl_clear_cipher_ctx(s); | ||
464 | |||
465 | if (s->cert != NULL) ssl_cert_free(s->cert); | ||
466 | /* Free up if allocated */ | ||
467 | |||
468 | if (s->ctx) SSL_CTX_free(s->ctx); | ||
469 | |||
470 | if (s->client_CA != NULL) | ||
471 | sk_X509_NAME_pop_free(s->client_CA,X509_NAME_free); | ||
472 | |||
473 | if (s->method != NULL) s->method->ssl_free(s); | ||
474 | |||
475 | #ifndef OPENSSL_NO_KRB5 | ||
476 | if (s->kssl_ctx != NULL) | ||
477 | kssl_ctx_free(s->kssl_ctx); | ||
478 | #endif /* OPENSSL_NO_KRB5 */ | ||
479 | |||
480 | OPENSSL_free(s); | ||
481 | } | ||
482 | |||
483 | void SSL_set_bio(SSL *s,BIO *rbio,BIO *wbio) | ||
484 | { | ||
485 | /* If the output buffering BIO is still in place, remove it | ||
486 | */ | ||
487 | if (s->bbio != NULL) | ||
488 | { | ||
489 | if (s->wbio == s->bbio) | ||
490 | { | ||
491 | s->wbio=s->wbio->next_bio; | ||
492 | s->bbio->next_bio=NULL; | ||
493 | } | ||
494 | } | ||
495 | if ((s->rbio != NULL) && (s->rbio != rbio)) | ||
496 | BIO_free_all(s->rbio); | ||
497 | if ((s->wbio != NULL) && (s->wbio != wbio) && (s->rbio != s->wbio)) | ||
498 | BIO_free_all(s->wbio); | ||
499 | s->rbio=rbio; | ||
500 | s->wbio=wbio; | ||
501 | } | ||
502 | |||
503 | BIO *SSL_get_rbio(SSL *s) | ||
504 | { return(s->rbio); } | ||
505 | |||
506 | BIO *SSL_get_wbio(SSL *s) | ||
507 | { return(s->wbio); } | ||
508 | |||
509 | int SSL_get_fd(SSL *s) | ||
510 | { | ||
511 | return(SSL_get_rfd(s)); | ||
512 | } | ||
513 | |||
514 | int SSL_get_rfd(SSL *s) | ||
515 | { | ||
516 | int ret= -1; | ||
517 | BIO *b,*r; | ||
518 | |||
519 | b=SSL_get_rbio(s); | ||
520 | r=BIO_find_type(b,BIO_TYPE_DESCRIPTOR); | ||
521 | if (r != NULL) | ||
522 | BIO_get_fd(r,&ret); | ||
523 | return(ret); | ||
524 | } | ||
525 | |||
526 | int SSL_get_wfd(SSL *s) | ||
527 | { | ||
528 | int ret= -1; | ||
529 | BIO *b,*r; | ||
530 | |||
531 | b=SSL_get_wbio(s); | ||
532 | r=BIO_find_type(b,BIO_TYPE_DESCRIPTOR); | ||
533 | if (r != NULL) | ||
534 | BIO_get_fd(r,&ret); | ||
535 | return(ret); | ||
536 | } | ||
537 | |||
538 | #ifndef OPENSSL_NO_SOCK | ||
539 | int SSL_set_fd(SSL *s,int fd) | ||
540 | { | ||
541 | int ret=0; | ||
542 | BIO *bio=NULL; | ||
543 | |||
544 | bio=BIO_new(BIO_s_socket()); | ||
545 | |||
546 | if (bio == NULL) | ||
547 | { | ||
548 | SSLerr(SSL_F_SSL_SET_FD,ERR_R_BUF_LIB); | ||
549 | goto err; | ||
550 | } | ||
551 | BIO_set_fd(bio,fd,BIO_NOCLOSE); | ||
552 | SSL_set_bio(s,bio,bio); | ||
553 | ret=1; | ||
554 | err: | ||
555 | return(ret); | ||
556 | } | ||
557 | |||
558 | int SSL_set_wfd(SSL *s,int fd) | ||
559 | { | ||
560 | int ret=0; | ||
561 | BIO *bio=NULL; | ||
562 | |||
563 | if ((s->rbio == NULL) || (BIO_method_type(s->rbio) != BIO_TYPE_SOCKET) | ||
564 | || ((int)BIO_get_fd(s->rbio,NULL) != fd)) | ||
565 | { | ||
566 | bio=BIO_new(BIO_s_socket()); | ||
567 | |||
568 | if (bio == NULL) | ||
569 | { SSLerr(SSL_F_SSL_SET_WFD,ERR_R_BUF_LIB); goto err; } | ||
570 | BIO_set_fd(bio,fd,BIO_NOCLOSE); | ||
571 | SSL_set_bio(s,SSL_get_rbio(s),bio); | ||
572 | } | ||
573 | else | ||
574 | SSL_set_bio(s,SSL_get_rbio(s),SSL_get_rbio(s)); | ||
575 | ret=1; | ||
576 | err: | ||
577 | return(ret); | ||
578 | } | ||
579 | |||
580 | int SSL_set_rfd(SSL *s,int fd) | ||
581 | { | ||
582 | int ret=0; | ||
583 | BIO *bio=NULL; | ||
584 | |||
585 | if ((s->wbio == NULL) || (BIO_method_type(s->wbio) != BIO_TYPE_SOCKET) | ||
586 | || ((int)BIO_get_fd(s->wbio,NULL) != fd)) | ||
587 | { | ||
588 | bio=BIO_new(BIO_s_socket()); | ||
589 | |||
590 | if (bio == NULL) | ||
591 | { | ||
592 | SSLerr(SSL_F_SSL_SET_RFD,ERR_R_BUF_LIB); | ||
593 | goto err; | ||
594 | } | ||
595 | BIO_set_fd(bio,fd,BIO_NOCLOSE); | ||
596 | SSL_set_bio(s,bio,SSL_get_wbio(s)); | ||
597 | } | ||
598 | else | ||
599 | SSL_set_bio(s,SSL_get_wbio(s),SSL_get_wbio(s)); | ||
600 | ret=1; | ||
601 | err: | ||
602 | return(ret); | ||
603 | } | ||
604 | #endif | ||
605 | |||
606 | |||
607 | /* return length of latest Finished message we sent, copy to 'buf' */ | ||
608 | size_t SSL_get_finished(SSL *s, void *buf, size_t count) | ||
609 | { | ||
610 | size_t ret = 0; | ||
611 | |||
612 | if (s->s3 != NULL) | ||
613 | { | ||
614 | ret = s->s3->tmp.finish_md_len; | ||
615 | if (count > ret) | ||
616 | count = ret; | ||
617 | memcpy(buf, s->s3->tmp.finish_md, count); | ||
618 | } | ||
619 | return ret; | ||
620 | } | ||
621 | |||
622 | /* return length of latest Finished message we expected, copy to 'buf' */ | ||
623 | size_t SSL_get_peer_finished(SSL *s, void *buf, size_t count) | ||
624 | { | ||
625 | size_t ret = 0; | ||
626 | |||
627 | if (s->s3 != NULL) | ||
628 | { | ||
629 | ret = s->s3->tmp.peer_finish_md_len; | ||
630 | if (count > ret) | ||
631 | count = ret; | ||
632 | memcpy(buf, s->s3->tmp.peer_finish_md, count); | ||
633 | } | ||
634 | return ret; | ||
635 | } | ||
636 | |||
637 | |||
638 | int SSL_get_verify_mode(SSL *s) | ||
639 | { | ||
640 | return(s->verify_mode); | ||
641 | } | ||
642 | |||
643 | int SSL_get_verify_depth(SSL *s) | ||
644 | { | ||
645 | return(s->verify_depth); | ||
646 | } | ||
647 | |||
648 | int (*SSL_get_verify_callback(SSL *s))(int,X509_STORE_CTX *) | ||
649 | { | ||
650 | return(s->verify_callback); | ||
651 | } | ||
652 | |||
653 | int SSL_CTX_get_verify_mode(SSL_CTX *ctx) | ||
654 | { | ||
655 | return(ctx->verify_mode); | ||
656 | } | ||
657 | |||
658 | int SSL_CTX_get_verify_depth(SSL_CTX *ctx) | ||
659 | { | ||
660 | return(ctx->verify_depth); | ||
661 | } | ||
662 | |||
663 | int (*SSL_CTX_get_verify_callback(SSL_CTX *ctx))(int,X509_STORE_CTX *) | ||
664 | { | ||
665 | return(ctx->default_verify_callback); | ||
666 | } | ||
667 | |||
668 | void SSL_set_verify(SSL *s,int mode, | ||
669 | int (*callback)(int ok,X509_STORE_CTX *ctx)) | ||
670 | { | ||
671 | s->verify_mode=mode; | ||
672 | if (callback != NULL) | ||
673 | s->verify_callback=callback; | ||
674 | } | ||
675 | |||
676 | void SSL_set_verify_depth(SSL *s,int depth) | ||
677 | { | ||
678 | s->verify_depth=depth; | ||
679 | } | ||
680 | |||
681 | void SSL_set_read_ahead(SSL *s,int yes) | ||
682 | { | ||
683 | s->read_ahead=yes; | ||
684 | } | ||
685 | |||
686 | int SSL_get_read_ahead(SSL *s) | ||
687 | { | ||
688 | return(s->read_ahead); | ||
689 | } | ||
690 | |||
691 | int SSL_pending(SSL *s) | ||
692 | { | ||
693 | /* SSL_pending cannot work properly if read-ahead is enabled | ||
694 | * (SSL_[CTX_]ctrl(..., SSL_CTRL_SET_READ_AHEAD, 1, NULL)), | ||
695 | * and it is impossible to fix since SSL_pending cannot report | ||
696 | * errors that may be observed while scanning the new data. | ||
697 | * (Note that SSL_pending() is often used as a boolean value, | ||
698 | * so we'd better not return -1.) | ||
699 | */ | ||
700 | return(s->method->ssl_pending(s)); | ||
701 | } | ||
702 | |||
703 | X509 *SSL_get_peer_certificate(SSL *s) | ||
704 | { | ||
705 | X509 *r; | ||
706 | |||
707 | if ((s == NULL) || (s->session == NULL)) | ||
708 | r=NULL; | ||
709 | else | ||
710 | r=s->session->peer; | ||
711 | |||
712 | if (r == NULL) return(r); | ||
713 | |||
714 | CRYPTO_add(&r->references,1,CRYPTO_LOCK_X509); | ||
715 | |||
716 | return(r); | ||
717 | } | ||
718 | |||
719 | STACK_OF(X509) *SSL_get_peer_cert_chain(SSL *s) | ||
720 | { | ||
721 | STACK_OF(X509) *r; | ||
722 | |||
723 | if ((s == NULL) || (s->session == NULL) || (s->session->sess_cert == NULL)) | ||
724 | r=NULL; | ||
725 | else | ||
726 | r=s->session->sess_cert->cert_chain; | ||
727 | |||
728 | /* If we are a client, cert_chain includes the peer's own | ||
729 | * certificate; if we are a server, it does not. */ | ||
730 | |||
731 | return(r); | ||
732 | } | ||
733 | |||
734 | /* Now in theory, since the calling process own 't' it should be safe to | ||
735 | * modify. We need to be able to read f without being hassled */ | ||
736 | void SSL_copy_session_id(SSL *t,SSL *f) | ||
737 | { | ||
738 | CERT *tmp; | ||
739 | |||
740 | /* Do we need to to SSL locking? */ | ||
741 | SSL_set_session(t,SSL_get_session(f)); | ||
742 | |||
743 | /* what if we are setup as SSLv2 but want to talk SSLv3 or | ||
744 | * vice-versa */ | ||
745 | if (t->method != f->method) | ||
746 | { | ||
747 | t->method->ssl_free(t); /* cleanup current */ | ||
748 | t->method=f->method; /* change method */ | ||
749 | t->method->ssl_new(t); /* setup new */ | ||
750 | } | ||
751 | |||
752 | tmp=t->cert; | ||
753 | if (f->cert != NULL) | ||
754 | { | ||
755 | CRYPTO_add(&f->cert->references,1,CRYPTO_LOCK_SSL_CERT); | ||
756 | t->cert=f->cert; | ||
757 | } | ||
758 | else | ||
759 | t->cert=NULL; | ||
760 | if (tmp != NULL) ssl_cert_free(tmp); | ||
761 | SSL_set_session_id_context(t,f->sid_ctx,f->sid_ctx_length); | ||
762 | } | ||
763 | |||
764 | /* Fix this so it checks all the valid key/cert options */ | ||
765 | int SSL_CTX_check_private_key(SSL_CTX *ctx) | ||
766 | { | ||
767 | if ( (ctx == NULL) || | ||
768 | (ctx->cert == NULL) || | ||
769 | (ctx->cert->key->x509 == NULL)) | ||
770 | { | ||
771 | SSLerr(SSL_F_SSL_CTX_CHECK_PRIVATE_KEY,SSL_R_NO_CERTIFICATE_ASSIGNED); | ||
772 | return(0); | ||
773 | } | ||
774 | if (ctx->cert->key->privatekey == NULL) | ||
775 | { | ||
776 | SSLerr(SSL_F_SSL_CTX_CHECK_PRIVATE_KEY,SSL_R_NO_PRIVATE_KEY_ASSIGNED); | ||
777 | return(0); | ||
778 | } | ||
779 | return(X509_check_private_key(ctx->cert->key->x509, ctx->cert->key->privatekey)); | ||
780 | } | ||
781 | |||
782 | /* Fix this function so that it takes an optional type parameter */ | ||
783 | int SSL_check_private_key(SSL *ssl) | ||
784 | { | ||
785 | if (ssl == NULL) | ||
786 | { | ||
787 | SSLerr(SSL_F_SSL_CHECK_PRIVATE_KEY,ERR_R_PASSED_NULL_PARAMETER); | ||
788 | return(0); | ||
789 | } | ||
790 | if (ssl->cert == NULL) | ||
791 | { | ||
792 | SSLerr(SSL_F_SSL_CHECK_PRIVATE_KEY,SSL_R_NO_CERTIFICATE_ASSIGNED); | ||
793 | return 0; | ||
794 | } | ||
795 | if (ssl->cert->key->x509 == NULL) | ||
796 | { | ||
797 | SSLerr(SSL_F_SSL_CHECK_PRIVATE_KEY,SSL_R_NO_CERTIFICATE_ASSIGNED); | ||
798 | return(0); | ||
799 | } | ||
800 | if (ssl->cert->key->privatekey == NULL) | ||
801 | { | ||
802 | SSLerr(SSL_F_SSL_CHECK_PRIVATE_KEY,SSL_R_NO_PRIVATE_KEY_ASSIGNED); | ||
803 | return(0); | ||
804 | } | ||
805 | return(X509_check_private_key(ssl->cert->key->x509, | ||
806 | ssl->cert->key->privatekey)); | ||
807 | } | ||
808 | |||
809 | int SSL_accept(SSL *s) | ||
810 | { | ||
811 | if (s->handshake_func == 0) | ||
812 | /* Not properly initialized yet */ | ||
813 | SSL_set_accept_state(s); | ||
814 | |||
815 | return(s->method->ssl_accept(s)); | ||
816 | } | ||
817 | |||
818 | int SSL_connect(SSL *s) | ||
819 | { | ||
820 | if (s->handshake_func == 0) | ||
821 | /* Not properly initialized yet */ | ||
822 | SSL_set_connect_state(s); | ||
823 | |||
824 | return(s->method->ssl_connect(s)); | ||
825 | } | ||
826 | |||
827 | long SSL_get_default_timeout(SSL *s) | ||
828 | { | ||
829 | return(s->method->get_timeout()); | ||
830 | } | ||
831 | |||
832 | int SSL_read(SSL *s,void *buf,int num) | ||
833 | { | ||
834 | if (s->handshake_func == 0) | ||
835 | { | ||
836 | SSLerr(SSL_F_SSL_READ, SSL_R_UNINITIALIZED); | ||
837 | return -1; | ||
838 | } | ||
839 | |||
840 | if (s->shutdown & SSL_RECEIVED_SHUTDOWN) | ||
841 | { | ||
842 | s->rwstate=SSL_NOTHING; | ||
843 | return(0); | ||
844 | } | ||
845 | return(s->method->ssl_read(s,buf,num)); | ||
846 | } | ||
847 | |||
848 | int SSL_peek(SSL *s,void *buf,int num) | ||
849 | { | ||
850 | if (s->handshake_func == 0) | ||
851 | { | ||
852 | SSLerr(SSL_F_SSL_READ, SSL_R_UNINITIALIZED); | ||
853 | return -1; | ||
854 | } | ||
855 | |||
856 | if (s->shutdown & SSL_RECEIVED_SHUTDOWN) | ||
857 | { | ||
858 | return(0); | ||
859 | } | ||
860 | return(s->method->ssl_peek(s,buf,num)); | ||
861 | } | ||
862 | |||
863 | int SSL_write(SSL *s,const void *buf,int num) | ||
864 | { | ||
865 | if (s->handshake_func == 0) | ||
866 | { | ||
867 | SSLerr(SSL_F_SSL_WRITE, SSL_R_UNINITIALIZED); | ||
868 | return -1; | ||
869 | } | ||
870 | |||
871 | if (s->shutdown & SSL_SENT_SHUTDOWN) | ||
872 | { | ||
873 | s->rwstate=SSL_NOTHING; | ||
874 | SSLerr(SSL_F_SSL_WRITE,SSL_R_PROTOCOL_IS_SHUTDOWN); | ||
875 | return(-1); | ||
876 | } | ||
877 | return(s->method->ssl_write(s,buf,num)); | ||
878 | } | ||
879 | |||
880 | int SSL_shutdown(SSL *s) | ||
881 | { | ||
882 | /* Note that this function behaves differently from what one might | ||
883 | * expect. Return values are 0 for no success (yet), | ||
884 | * 1 for success; but calling it once is usually not enough, | ||
885 | * even if blocking I/O is used (see ssl3_shutdown). | ||
886 | */ | ||
887 | |||
888 | if (s->handshake_func == 0) | ||
889 | { | ||
890 | SSLerr(SSL_F_SSL_SHUTDOWN, SSL_R_UNINITIALIZED); | ||
891 | return -1; | ||
892 | } | ||
893 | |||
894 | if ((s != NULL) && !SSL_in_init(s)) | ||
895 | return(s->method->ssl_shutdown(s)); | ||
896 | else | ||
897 | return(1); | ||
898 | } | ||
899 | |||
900 | int SSL_renegotiate(SSL *s) | ||
901 | { | ||
902 | if (s->new_session == 0) | ||
903 | { | ||
904 | s->new_session=1; | ||
905 | } | ||
906 | return(s->method->ssl_renegotiate(s)); | ||
907 | } | ||
908 | |||
909 | int SSL_renegotiate_pending(SSL *s) | ||
910 | { | ||
911 | /* becomes true when negotiation is requested; | ||
912 | * false again once a handshake has finished */ | ||
913 | return (s->new_session != 0); | ||
914 | } | ||
915 | |||
916 | long SSL_ctrl(SSL *s,int cmd,long larg,void *parg) | ||
917 | { | ||
918 | long l; | ||
919 | |||
920 | switch (cmd) | ||
921 | { | ||
922 | case SSL_CTRL_GET_READ_AHEAD: | ||
923 | return(s->read_ahead); | ||
924 | case SSL_CTRL_SET_READ_AHEAD: | ||
925 | l=s->read_ahead; | ||
926 | s->read_ahead=larg; | ||
927 | return(l); | ||
928 | |||
929 | case SSL_CTRL_SET_MSG_CALLBACK_ARG: | ||
930 | s->msg_callback_arg = parg; | ||
931 | return 1; | ||
932 | |||
933 | case SSL_CTRL_OPTIONS: | ||
934 | return(s->options|=larg); | ||
935 | case SSL_CTRL_MODE: | ||
936 | return(s->mode|=larg); | ||
937 | case SSL_CTRL_GET_MAX_CERT_LIST: | ||
938 | return(s->max_cert_list); | ||
939 | case SSL_CTRL_SET_MAX_CERT_LIST: | ||
940 | l=s->max_cert_list; | ||
941 | s->max_cert_list=larg; | ||
942 | return(l); | ||
943 | default: | ||
944 | return(s->method->ssl_ctrl(s,cmd,larg,parg)); | ||
945 | } | ||
946 | } | ||
947 | |||
948 | long SSL_callback_ctrl(SSL *s, int cmd, void (*fp)()) | ||
949 | { | ||
950 | switch(cmd) | ||
951 | { | ||
952 | case SSL_CTRL_SET_MSG_CALLBACK: | ||
953 | s->msg_callback = (void (*)(int write_p, int version, int content_type, const void *buf, size_t len, SSL *ssl, void *arg))(fp); | ||
954 | return 1; | ||
955 | |||
956 | default: | ||
957 | return(s->method->ssl_callback_ctrl(s,cmd,fp)); | ||
958 | } | ||
959 | } | ||
960 | |||
961 | struct lhash_st *SSL_CTX_sessions(SSL_CTX *ctx) | ||
962 | { | ||
963 | return ctx->sessions; | ||
964 | } | ||
965 | |||
966 | long SSL_CTX_ctrl(SSL_CTX *ctx,int cmd,long larg,void *parg) | ||
967 | { | ||
968 | long l; | ||
969 | |||
970 | switch (cmd) | ||
971 | { | ||
972 | case SSL_CTRL_GET_READ_AHEAD: | ||
973 | return(ctx->read_ahead); | ||
974 | case SSL_CTRL_SET_READ_AHEAD: | ||
975 | l=ctx->read_ahead; | ||
976 | ctx->read_ahead=larg; | ||
977 | return(l); | ||
978 | |||
979 | case SSL_CTRL_SET_MSG_CALLBACK_ARG: | ||
980 | ctx->msg_callback_arg = parg; | ||
981 | return 1; | ||
982 | |||
983 | case SSL_CTRL_GET_MAX_CERT_LIST: | ||
984 | return(ctx->max_cert_list); | ||
985 | case SSL_CTRL_SET_MAX_CERT_LIST: | ||
986 | l=ctx->max_cert_list; | ||
987 | ctx->max_cert_list=larg; | ||
988 | return(l); | ||
989 | |||
990 | case SSL_CTRL_SET_SESS_CACHE_SIZE: | ||
991 | l=ctx->session_cache_size; | ||
992 | ctx->session_cache_size=larg; | ||
993 | return(l); | ||
994 | case SSL_CTRL_GET_SESS_CACHE_SIZE: | ||
995 | return(ctx->session_cache_size); | ||
996 | case SSL_CTRL_SET_SESS_CACHE_MODE: | ||
997 | l=ctx->session_cache_mode; | ||
998 | ctx->session_cache_mode=larg; | ||
999 | return(l); | ||
1000 | case SSL_CTRL_GET_SESS_CACHE_MODE: | ||
1001 | return(ctx->session_cache_mode); | ||
1002 | |||
1003 | case SSL_CTRL_SESS_NUMBER: | ||
1004 | return(ctx->sessions->num_items); | ||
1005 | case SSL_CTRL_SESS_CONNECT: | ||
1006 | return(ctx->stats.sess_connect); | ||
1007 | case SSL_CTRL_SESS_CONNECT_GOOD: | ||
1008 | return(ctx->stats.sess_connect_good); | ||
1009 | case SSL_CTRL_SESS_CONNECT_RENEGOTIATE: | ||
1010 | return(ctx->stats.sess_connect_renegotiate); | ||
1011 | case SSL_CTRL_SESS_ACCEPT: | ||
1012 | return(ctx->stats.sess_accept); | ||
1013 | case SSL_CTRL_SESS_ACCEPT_GOOD: | ||
1014 | return(ctx->stats.sess_accept_good); | ||
1015 | case SSL_CTRL_SESS_ACCEPT_RENEGOTIATE: | ||
1016 | return(ctx->stats.sess_accept_renegotiate); | ||
1017 | case SSL_CTRL_SESS_HIT: | ||
1018 | return(ctx->stats.sess_hit); | ||
1019 | case SSL_CTRL_SESS_CB_HIT: | ||
1020 | return(ctx->stats.sess_cb_hit); | ||
1021 | case SSL_CTRL_SESS_MISSES: | ||
1022 | return(ctx->stats.sess_miss); | ||
1023 | case SSL_CTRL_SESS_TIMEOUTS: | ||
1024 | return(ctx->stats.sess_timeout); | ||
1025 | case SSL_CTRL_SESS_CACHE_FULL: | ||
1026 | return(ctx->stats.sess_cache_full); | ||
1027 | case SSL_CTRL_OPTIONS: | ||
1028 | return(ctx->options|=larg); | ||
1029 | case SSL_CTRL_MODE: | ||
1030 | return(ctx->mode|=larg); | ||
1031 | default: | ||
1032 | return(ctx->method->ssl_ctx_ctrl(ctx,cmd,larg,parg)); | ||
1033 | } | ||
1034 | } | ||
1035 | |||
1036 | long SSL_CTX_callback_ctrl(SSL_CTX *ctx, int cmd, void (*fp)()) | ||
1037 | { | ||
1038 | switch(cmd) | ||
1039 | { | ||
1040 | case SSL_CTRL_SET_MSG_CALLBACK: | ||
1041 | ctx->msg_callback = (void (*)(int write_p, int version, int content_type, const void *buf, size_t len, SSL *ssl, void *arg))(fp); | ||
1042 | return 1; | ||
1043 | |||
1044 | default: | ||
1045 | return(ctx->method->ssl_ctx_callback_ctrl(ctx,cmd,fp)); | ||
1046 | } | ||
1047 | } | ||
1048 | |||
1049 | int ssl_cipher_id_cmp(const SSL_CIPHER *a, const SSL_CIPHER *b) | ||
1050 | { | ||
1051 | long l; | ||
1052 | |||
1053 | l=a->id-b->id; | ||
1054 | if (l == 0L) | ||
1055 | return(0); | ||
1056 | else | ||
1057 | return((l > 0)?1:-1); | ||
1058 | } | ||
1059 | |||
1060 | int ssl_cipher_ptr_id_cmp(const SSL_CIPHER * const *ap, | ||
1061 | const SSL_CIPHER * const *bp) | ||
1062 | { | ||
1063 | long l; | ||
1064 | |||
1065 | l=(*ap)->id-(*bp)->id; | ||
1066 | if (l == 0L) | ||
1067 | return(0); | ||
1068 | else | ||
1069 | return((l > 0)?1:-1); | ||
1070 | } | ||
1071 | |||
1072 | /** return a STACK of the ciphers available for the SSL and in order of | ||
1073 | * preference */ | ||
1074 | STACK_OF(SSL_CIPHER) *SSL_get_ciphers(SSL *s) | ||
1075 | { | ||
1076 | if (s != NULL) | ||
1077 | { | ||
1078 | if (s->cipher_list != NULL) | ||
1079 | { | ||
1080 | return(s->cipher_list); | ||
1081 | } | ||
1082 | else if ((s->ctx != NULL) && | ||
1083 | (s->ctx->cipher_list != NULL)) | ||
1084 | { | ||
1085 | return(s->ctx->cipher_list); | ||
1086 | } | ||
1087 | } | ||
1088 | return(NULL); | ||
1089 | } | ||
1090 | |||
1091 | /** return a STACK of the ciphers available for the SSL and in order of | ||
1092 | * algorithm id */ | ||
1093 | STACK_OF(SSL_CIPHER) *ssl_get_ciphers_by_id(SSL *s) | ||
1094 | { | ||
1095 | if (s != NULL) | ||
1096 | { | ||
1097 | if (s->cipher_list_by_id != NULL) | ||
1098 | { | ||
1099 | return(s->cipher_list_by_id); | ||
1100 | } | ||
1101 | else if ((s->ctx != NULL) && | ||
1102 | (s->ctx->cipher_list_by_id != NULL)) | ||
1103 | { | ||
1104 | return(s->ctx->cipher_list_by_id); | ||
1105 | } | ||
1106 | } | ||
1107 | return(NULL); | ||
1108 | } | ||
1109 | |||
1110 | /** The old interface to get the same thing as SSL_get_ciphers() */ | ||
1111 | const char *SSL_get_cipher_list(SSL *s,int n) | ||
1112 | { | ||
1113 | SSL_CIPHER *c; | ||
1114 | STACK_OF(SSL_CIPHER) *sk; | ||
1115 | |||
1116 | if (s == NULL) return(NULL); | ||
1117 | sk=SSL_get_ciphers(s); | ||
1118 | if ((sk == NULL) || (sk_SSL_CIPHER_num(sk) <= n)) | ||
1119 | return(NULL); | ||
1120 | c=sk_SSL_CIPHER_value(sk,n); | ||
1121 | if (c == NULL) return(NULL); | ||
1122 | return(c->name); | ||
1123 | } | ||
1124 | |||
1125 | /** specify the ciphers to be used by default by the SSL_CTX */ | ||
1126 | int SSL_CTX_set_cipher_list(SSL_CTX *ctx, const char *str) | ||
1127 | { | ||
1128 | STACK_OF(SSL_CIPHER) *sk; | ||
1129 | |||
1130 | sk=ssl_create_cipher_list(ctx->method,&ctx->cipher_list, | ||
1131 | &ctx->cipher_list_by_id,str); | ||
1132 | /* XXXX */ | ||
1133 | return((sk == NULL)?0:1); | ||
1134 | } | ||
1135 | |||
1136 | /** specify the ciphers to be used by the SSL */ | ||
1137 | int SSL_set_cipher_list(SSL *s,const char *str) | ||
1138 | { | ||
1139 | STACK_OF(SSL_CIPHER) *sk; | ||
1140 | |||
1141 | sk=ssl_create_cipher_list(s->ctx->method,&s->cipher_list, | ||
1142 | &s->cipher_list_by_id,str); | ||
1143 | /* XXXX */ | ||
1144 | return((sk == NULL)?0:1); | ||
1145 | } | ||
1146 | |||
1147 | /* works well for SSLv2, not so good for SSLv3 */ | ||
1148 | char *SSL_get_shared_ciphers(SSL *s,char *buf,int len) | ||
1149 | { | ||
1150 | char *p; | ||
1151 | const char *cp; | ||
1152 | STACK_OF(SSL_CIPHER) *sk; | ||
1153 | SSL_CIPHER *c; | ||
1154 | int i; | ||
1155 | |||
1156 | if ((s->session == NULL) || (s->session->ciphers == NULL) || | ||
1157 | (len < 2)) | ||
1158 | return(NULL); | ||
1159 | |||
1160 | p=buf; | ||
1161 | sk=s->session->ciphers; | ||
1162 | for (i=0; i<sk_SSL_CIPHER_num(sk); i++) | ||
1163 | { | ||
1164 | /* Decrement for either the ':' or a '\0' */ | ||
1165 | len--; | ||
1166 | c=sk_SSL_CIPHER_value(sk,i); | ||
1167 | for (cp=c->name; *cp; ) | ||
1168 | { | ||
1169 | if (len-- == 0) | ||
1170 | { | ||
1171 | *p='\0'; | ||
1172 | return(buf); | ||
1173 | } | ||
1174 | else | ||
1175 | *(p++)= *(cp++); | ||
1176 | } | ||
1177 | *(p++)=':'; | ||
1178 | } | ||
1179 | p[-1]='\0'; | ||
1180 | return(buf); | ||
1181 | } | ||
1182 | |||
1183 | int ssl_cipher_list_to_bytes(SSL *s,STACK_OF(SSL_CIPHER) *sk,unsigned char *p) | ||
1184 | { | ||
1185 | int i,j=0; | ||
1186 | SSL_CIPHER *c; | ||
1187 | unsigned char *q; | ||
1188 | #ifndef OPENSSL_NO_KRB5 | ||
1189 | int nokrb5 = !kssl_tgt_is_available(s->kssl_ctx); | ||
1190 | #endif /* OPENSSL_NO_KRB5 */ | ||
1191 | |||
1192 | if (sk == NULL) return(0); | ||
1193 | q=p; | ||
1194 | |||
1195 | for (i=0; i<sk_SSL_CIPHER_num(sk); i++) | ||
1196 | { | ||
1197 | c=sk_SSL_CIPHER_value(sk,i); | ||
1198 | #ifndef OPENSSL_NO_KRB5 | ||
1199 | if ((c->algorithms & SSL_KRB5) && nokrb5) | ||
1200 | continue; | ||
1201 | #endif /* OPENSSL_NO_KRB5 */ | ||
1202 | j=ssl_put_cipher_by_char(s,c,p); | ||
1203 | p+=j; | ||
1204 | } | ||
1205 | return(p-q); | ||
1206 | } | ||
1207 | |||
1208 | STACK_OF(SSL_CIPHER) *ssl_bytes_to_cipher_list(SSL *s,unsigned char *p,int num, | ||
1209 | STACK_OF(SSL_CIPHER) **skp) | ||
1210 | { | ||
1211 | SSL_CIPHER *c; | ||
1212 | STACK_OF(SSL_CIPHER) *sk; | ||
1213 | int i,n; | ||
1214 | |||
1215 | n=ssl_put_cipher_by_char(s,NULL,NULL); | ||
1216 | if ((num%n) != 0) | ||
1217 | { | ||
1218 | SSLerr(SSL_F_SSL_BYTES_TO_CIPHER_LIST,SSL_R_ERROR_IN_RECEIVED_CIPHER_LIST); | ||
1219 | return(NULL); | ||
1220 | } | ||
1221 | if ((skp == NULL) || (*skp == NULL)) | ||
1222 | sk=sk_SSL_CIPHER_new_null(); /* change perhaps later */ | ||
1223 | else | ||
1224 | { | ||
1225 | sk= *skp; | ||
1226 | sk_SSL_CIPHER_zero(sk); | ||
1227 | } | ||
1228 | |||
1229 | for (i=0; i<num; i+=n) | ||
1230 | { | ||
1231 | c=ssl_get_cipher_by_char(s,p); | ||
1232 | p+=n; | ||
1233 | if (c != NULL) | ||
1234 | { | ||
1235 | if (!sk_SSL_CIPHER_push(sk,c)) | ||
1236 | { | ||
1237 | SSLerr(SSL_F_SSL_BYTES_TO_CIPHER_LIST,ERR_R_MALLOC_FAILURE); | ||
1238 | goto err; | ||
1239 | } | ||
1240 | } | ||
1241 | } | ||
1242 | |||
1243 | if (skp != NULL) | ||
1244 | *skp=sk; | ||
1245 | return(sk); | ||
1246 | err: | ||
1247 | if ((skp == NULL) || (*skp == NULL)) | ||
1248 | sk_SSL_CIPHER_free(sk); | ||
1249 | return(NULL); | ||
1250 | } | ||
1251 | |||
1252 | unsigned long SSL_SESSION_hash(SSL_SESSION *a) | ||
1253 | { | ||
1254 | unsigned long l; | ||
1255 | |||
1256 | l=(unsigned long) | ||
1257 | ((unsigned int) a->session_id[0] )| | ||
1258 | ((unsigned int) a->session_id[1]<< 8L)| | ||
1259 | ((unsigned long)a->session_id[2]<<16L)| | ||
1260 | ((unsigned long)a->session_id[3]<<24L); | ||
1261 | return(l); | ||
1262 | } | ||
1263 | |||
1264 | /* NB: If this function (or indeed the hash function which uses a sort of | ||
1265 | * coarser function than this one) is changed, ensure | ||
1266 | * SSL_CTX_has_matching_session_id() is checked accordingly. It relies on being | ||
1267 | * able to construct an SSL_SESSION that will collide with any existing session | ||
1268 | * with a matching session ID. */ | ||
1269 | int SSL_SESSION_cmp(SSL_SESSION *a,SSL_SESSION *b) | ||
1270 | { | ||
1271 | if (a->ssl_version != b->ssl_version) | ||
1272 | return(1); | ||
1273 | if (a->session_id_length != b->session_id_length) | ||
1274 | return(1); | ||
1275 | return(memcmp(a->session_id,b->session_id,a->session_id_length)); | ||
1276 | } | ||
1277 | |||
1278 | /* These wrapper functions should remain rather than redeclaring | ||
1279 | * SSL_SESSION_hash and SSL_SESSION_cmp for void* types and casting each | ||
1280 | * variable. The reason is that the functions aren't static, they're exposed via | ||
1281 | * ssl.h. */ | ||
1282 | static IMPLEMENT_LHASH_HASH_FN(SSL_SESSION_hash, SSL_SESSION *) | ||
1283 | static IMPLEMENT_LHASH_COMP_FN(SSL_SESSION_cmp, SSL_SESSION *) | ||
1284 | |||
1285 | SSL_CTX *SSL_CTX_new(SSL_METHOD *meth) | ||
1286 | { | ||
1287 | SSL_CTX *ret=NULL; | ||
1288 | |||
1289 | if (meth == NULL) | ||
1290 | { | ||
1291 | SSLerr(SSL_F_SSL_CTX_NEW,SSL_R_NULL_SSL_METHOD_PASSED); | ||
1292 | return(NULL); | ||
1293 | } | ||
1294 | |||
1295 | if (SSL_get_ex_data_X509_STORE_CTX_idx() < 0) | ||
1296 | { | ||
1297 | SSLerr(SSL_F_SSL_CTX_NEW,SSL_R_X509_VERIFICATION_SETUP_PROBLEMS); | ||
1298 | goto err; | ||
1299 | } | ||
1300 | ret=(SSL_CTX *)OPENSSL_malloc(sizeof(SSL_CTX)); | ||
1301 | if (ret == NULL) | ||
1302 | goto err; | ||
1303 | |||
1304 | memset(ret,0,sizeof(SSL_CTX)); | ||
1305 | |||
1306 | ret->method=meth; | ||
1307 | |||
1308 | ret->cert_store=NULL; | ||
1309 | ret->session_cache_mode=SSL_SESS_CACHE_SERVER; | ||
1310 | ret->session_cache_size=SSL_SESSION_CACHE_MAX_SIZE_DEFAULT; | ||
1311 | ret->session_cache_head=NULL; | ||
1312 | ret->session_cache_tail=NULL; | ||
1313 | |||
1314 | /* We take the system default */ | ||
1315 | ret->session_timeout=meth->get_timeout(); | ||
1316 | |||
1317 | ret->new_session_cb=0; | ||
1318 | ret->remove_session_cb=0; | ||
1319 | ret->get_session_cb=0; | ||
1320 | ret->generate_session_id=0; | ||
1321 | |||
1322 | memset((char *)&ret->stats,0,sizeof(ret->stats)); | ||
1323 | |||
1324 | ret->references=1; | ||
1325 | ret->quiet_shutdown=0; | ||
1326 | |||
1327 | /* ret->cipher=NULL;*/ | ||
1328 | /* ret->s2->challenge=NULL; | ||
1329 | ret->master_key=NULL; | ||
1330 | ret->key_arg=NULL; | ||
1331 | ret->s2->conn_id=NULL; */ | ||
1332 | |||
1333 | ret->info_callback=NULL; | ||
1334 | |||
1335 | ret->app_verify_callback=0; | ||
1336 | ret->app_verify_arg=NULL; | ||
1337 | |||
1338 | ret->max_cert_list=SSL_MAX_CERT_LIST_DEFAULT; | ||
1339 | ret->read_ahead=0; | ||
1340 | ret->msg_callback=0; | ||
1341 | ret->msg_callback_arg=NULL; | ||
1342 | ret->verify_mode=SSL_VERIFY_NONE; | ||
1343 | ret->verify_depth=-1; /* Don't impose a limit (but x509_lu.c does) */ | ||
1344 | ret->sid_ctx_length=0; | ||
1345 | ret->default_verify_callback=NULL; | ||
1346 | if ((ret->cert=ssl_cert_new()) == NULL) | ||
1347 | goto err; | ||
1348 | |||
1349 | ret->default_passwd_callback=0; | ||
1350 | ret->default_passwd_callback_userdata=NULL; | ||
1351 | ret->client_cert_cb=0; | ||
1352 | |||
1353 | ret->sessions=lh_new(LHASH_HASH_FN(SSL_SESSION_hash), | ||
1354 | LHASH_COMP_FN(SSL_SESSION_cmp)); | ||
1355 | if (ret->sessions == NULL) goto err; | ||
1356 | ret->cert_store=X509_STORE_new(); | ||
1357 | if (ret->cert_store == NULL) goto err; | ||
1358 | |||
1359 | ssl_create_cipher_list(ret->method, | ||
1360 | &ret->cipher_list,&ret->cipher_list_by_id, | ||
1361 | SSL_DEFAULT_CIPHER_LIST); | ||
1362 | if (ret->cipher_list == NULL | ||
1363 | || sk_SSL_CIPHER_num(ret->cipher_list) <= 0) | ||
1364 | { | ||
1365 | SSLerr(SSL_F_SSL_CTX_NEW,SSL_R_LIBRARY_HAS_NO_CIPHERS); | ||
1366 | goto err2; | ||
1367 | } | ||
1368 | |||
1369 | if ((ret->rsa_md5=EVP_get_digestbyname("ssl2-md5")) == NULL) | ||
1370 | { | ||
1371 | SSLerr(SSL_F_SSL_CTX_NEW,SSL_R_UNABLE_TO_LOAD_SSL2_MD5_ROUTINES); | ||
1372 | goto err2; | ||
1373 | } | ||
1374 | if ((ret->md5=EVP_get_digestbyname("ssl3-md5")) == NULL) | ||
1375 | { | ||
1376 | SSLerr(SSL_F_SSL_CTX_NEW,SSL_R_UNABLE_TO_LOAD_SSL3_MD5_ROUTINES); | ||
1377 | goto err2; | ||
1378 | } | ||
1379 | if ((ret->sha1=EVP_get_digestbyname("ssl3-sha1")) == NULL) | ||
1380 | { | ||
1381 | SSLerr(SSL_F_SSL_CTX_NEW,SSL_R_UNABLE_TO_LOAD_SSL3_SHA1_ROUTINES); | ||
1382 | goto err2; | ||
1383 | } | ||
1384 | |||
1385 | if ((ret->client_CA=sk_X509_NAME_new_null()) == NULL) | ||
1386 | goto err; | ||
1387 | |||
1388 | CRYPTO_new_ex_data(CRYPTO_EX_INDEX_SSL_CTX, ret, &ret->ex_data); | ||
1389 | |||
1390 | ret->extra_certs=NULL; | ||
1391 | ret->comp_methods=SSL_COMP_get_compression_methods(); | ||
1392 | |||
1393 | return(ret); | ||
1394 | err: | ||
1395 | SSLerr(SSL_F_SSL_CTX_NEW,ERR_R_MALLOC_FAILURE); | ||
1396 | err2: | ||
1397 | if (ret != NULL) SSL_CTX_free(ret); | ||
1398 | return(NULL); | ||
1399 | } | ||
1400 | |||
1401 | #if 0 | ||
1402 | static void SSL_COMP_free(SSL_COMP *comp) | ||
1403 | { OPENSSL_free(comp); } | ||
1404 | #endif | ||
1405 | |||
1406 | void SSL_CTX_free(SSL_CTX *a) | ||
1407 | { | ||
1408 | int i; | ||
1409 | |||
1410 | if (a == NULL) return; | ||
1411 | |||
1412 | i=CRYPTO_add(&a->references,-1,CRYPTO_LOCK_SSL_CTX); | ||
1413 | #ifdef REF_PRINT | ||
1414 | REF_PRINT("SSL_CTX",a); | ||
1415 | #endif | ||
1416 | if (i > 0) return; | ||
1417 | #ifdef REF_CHECK | ||
1418 | if (i < 0) | ||
1419 | { | ||
1420 | fprintf(stderr,"SSL_CTX_free, bad reference count\n"); | ||
1421 | abort(); /* ok */ | ||
1422 | } | ||
1423 | #endif | ||
1424 | |||
1425 | /* | ||
1426 | * Free internal session cache. However: the remove_cb() may reference | ||
1427 | * the ex_data of SSL_CTX, thus the ex_data store can only be removed | ||
1428 | * after the sessions were flushed. | ||
1429 | * As the ex_data handling routines might also touch the session cache, | ||
1430 | * the most secure solution seems to be: empty (flush) the cache, then | ||
1431 | * free ex_data, then finally free the cache. | ||
1432 | * (See ticket [openssl.org #212].) | ||
1433 | */ | ||
1434 | if (a->sessions != NULL) | ||
1435 | SSL_CTX_flush_sessions(a,0); | ||
1436 | |||
1437 | CRYPTO_free_ex_data(CRYPTO_EX_INDEX_SSL_CTX, a, &a->ex_data); | ||
1438 | |||
1439 | if (a->sessions != NULL) | ||
1440 | lh_free(a->sessions); | ||
1441 | |||
1442 | if (a->cert_store != NULL) | ||
1443 | X509_STORE_free(a->cert_store); | ||
1444 | if (a->cipher_list != NULL) | ||
1445 | sk_SSL_CIPHER_free(a->cipher_list); | ||
1446 | if (a->cipher_list_by_id != NULL) | ||
1447 | sk_SSL_CIPHER_free(a->cipher_list_by_id); | ||
1448 | if (a->cert != NULL) | ||
1449 | ssl_cert_free(a->cert); | ||
1450 | if (a->client_CA != NULL) | ||
1451 | sk_X509_NAME_pop_free(a->client_CA,X509_NAME_free); | ||
1452 | if (a->extra_certs != NULL) | ||
1453 | sk_X509_pop_free(a->extra_certs,X509_free); | ||
1454 | #if 0 /* This should never be done, since it removes a global database */ | ||
1455 | if (a->comp_methods != NULL) | ||
1456 | sk_SSL_COMP_pop_free(a->comp_methods,SSL_COMP_free); | ||
1457 | #else | ||
1458 | a->comp_methods = NULL; | ||
1459 | #endif | ||
1460 | OPENSSL_free(a); | ||
1461 | } | ||
1462 | |||
1463 | void SSL_CTX_set_default_passwd_cb(SSL_CTX *ctx, pem_password_cb *cb) | ||
1464 | { | ||
1465 | ctx->default_passwd_callback=cb; | ||
1466 | } | ||
1467 | |||
1468 | void SSL_CTX_set_default_passwd_cb_userdata(SSL_CTX *ctx,void *u) | ||
1469 | { | ||
1470 | ctx->default_passwd_callback_userdata=u; | ||
1471 | } | ||
1472 | |||
1473 | void SSL_CTX_set_cert_verify_callback(SSL_CTX *ctx, int (*cb)(X509_STORE_CTX *,void *), void *arg) | ||
1474 | { | ||
1475 | ctx->app_verify_callback=cb; | ||
1476 | ctx->app_verify_arg=arg; | ||
1477 | } | ||
1478 | |||
1479 | void SSL_CTX_set_verify(SSL_CTX *ctx,int mode,int (*cb)(int, X509_STORE_CTX *)) | ||
1480 | { | ||
1481 | ctx->verify_mode=mode; | ||
1482 | ctx->default_verify_callback=cb; | ||
1483 | } | ||
1484 | |||
1485 | void SSL_CTX_set_verify_depth(SSL_CTX *ctx,int depth) | ||
1486 | { | ||
1487 | ctx->verify_depth=depth; | ||
1488 | } | ||
1489 | |||
1490 | void ssl_set_cert_masks(CERT *c, SSL_CIPHER *cipher) | ||
1491 | { | ||
1492 | CERT_PKEY *cpk; | ||
1493 | int rsa_enc,rsa_tmp,rsa_sign,dh_tmp,dh_rsa,dh_dsa,dsa_sign; | ||
1494 | int rsa_enc_export,dh_rsa_export,dh_dsa_export; | ||
1495 | int rsa_tmp_export,dh_tmp_export,kl; | ||
1496 | unsigned long mask,emask; | ||
1497 | |||
1498 | if (c == NULL) return; | ||
1499 | |||
1500 | kl=SSL_C_EXPORT_PKEYLENGTH(cipher); | ||
1501 | |||
1502 | #ifndef OPENSSL_NO_RSA | ||
1503 | rsa_tmp=(c->rsa_tmp != NULL || c->rsa_tmp_cb != NULL); | ||
1504 | rsa_tmp_export=(c->rsa_tmp_cb != NULL || | ||
1505 | (rsa_tmp && RSA_size(c->rsa_tmp)*8 <= kl)); | ||
1506 | #else | ||
1507 | rsa_tmp=rsa_tmp_export=0; | ||
1508 | #endif | ||
1509 | #ifndef OPENSSL_NO_DH | ||
1510 | dh_tmp=(c->dh_tmp != NULL || c->dh_tmp_cb != NULL); | ||
1511 | dh_tmp_export=(c->dh_tmp_cb != NULL || | ||
1512 | (dh_tmp && DH_size(c->dh_tmp)*8 <= kl)); | ||
1513 | #else | ||
1514 | dh_tmp=dh_tmp_export=0; | ||
1515 | #endif | ||
1516 | |||
1517 | cpk= &(c->pkeys[SSL_PKEY_RSA_ENC]); | ||
1518 | rsa_enc= (cpk->x509 != NULL && cpk->privatekey != NULL); | ||
1519 | rsa_enc_export=(rsa_enc && EVP_PKEY_size(cpk->privatekey)*8 <= kl); | ||
1520 | cpk= &(c->pkeys[SSL_PKEY_RSA_SIGN]); | ||
1521 | rsa_sign=(cpk->x509 != NULL && cpk->privatekey != NULL); | ||
1522 | cpk= &(c->pkeys[SSL_PKEY_DSA_SIGN]); | ||
1523 | dsa_sign=(cpk->x509 != NULL && cpk->privatekey != NULL); | ||
1524 | cpk= &(c->pkeys[SSL_PKEY_DH_RSA]); | ||
1525 | dh_rsa= (cpk->x509 != NULL && cpk->privatekey != NULL); | ||
1526 | dh_rsa_export=(dh_rsa && EVP_PKEY_size(cpk->privatekey)*8 <= kl); | ||
1527 | cpk= &(c->pkeys[SSL_PKEY_DH_DSA]); | ||
1528 | /* FIX THIS EAY EAY EAY */ | ||
1529 | dh_dsa= (cpk->x509 != NULL && cpk->privatekey != NULL); | ||
1530 | dh_dsa_export=(dh_dsa && EVP_PKEY_size(cpk->privatekey)*8 <= kl); | ||
1531 | |||
1532 | mask=0; | ||
1533 | emask=0; | ||
1534 | |||
1535 | #ifdef CIPHER_DEBUG | ||
1536 | printf("rt=%d rte=%d dht=%d re=%d ree=%d rs=%d ds=%d dhr=%d dhd=%d\n", | ||
1537 | rsa_tmp,rsa_tmp_export,dh_tmp, | ||
1538 | rsa_enc,rsa_enc_export,rsa_sign,dsa_sign,dh_rsa,dh_dsa); | ||
1539 | #endif | ||
1540 | |||
1541 | if (rsa_enc || (rsa_tmp && rsa_sign)) | ||
1542 | mask|=SSL_kRSA; | ||
1543 | if (rsa_enc_export || (rsa_tmp_export && (rsa_sign || rsa_enc))) | ||
1544 | emask|=SSL_kRSA; | ||
1545 | |||
1546 | #if 0 | ||
1547 | /* The match needs to be both kEDH and aRSA or aDSA, so don't worry */ | ||
1548 | if ( (dh_tmp || dh_rsa || dh_dsa) && | ||
1549 | (rsa_enc || rsa_sign || dsa_sign)) | ||
1550 | mask|=SSL_kEDH; | ||
1551 | if ((dh_tmp_export || dh_rsa_export || dh_dsa_export) && | ||
1552 | (rsa_enc || rsa_sign || dsa_sign)) | ||
1553 | emask|=SSL_kEDH; | ||
1554 | #endif | ||
1555 | |||
1556 | if (dh_tmp_export) | ||
1557 | emask|=SSL_kEDH; | ||
1558 | |||
1559 | if (dh_tmp) | ||
1560 | mask|=SSL_kEDH; | ||
1561 | |||
1562 | if (dh_rsa) mask|=SSL_kDHr; | ||
1563 | if (dh_rsa_export) emask|=SSL_kDHr; | ||
1564 | |||
1565 | if (dh_dsa) mask|=SSL_kDHd; | ||
1566 | if (dh_dsa_export) emask|=SSL_kDHd; | ||
1567 | |||
1568 | if (rsa_enc || rsa_sign) | ||
1569 | { | ||
1570 | mask|=SSL_aRSA; | ||
1571 | emask|=SSL_aRSA; | ||
1572 | } | ||
1573 | |||
1574 | if (dsa_sign) | ||
1575 | { | ||
1576 | mask|=SSL_aDSS; | ||
1577 | emask|=SSL_aDSS; | ||
1578 | } | ||
1579 | |||
1580 | mask|=SSL_aNULL; | ||
1581 | emask|=SSL_aNULL; | ||
1582 | |||
1583 | #ifndef OPENSSL_NO_KRB5 | ||
1584 | mask|=SSL_kKRB5|SSL_aKRB5; | ||
1585 | emask|=SSL_kKRB5|SSL_aKRB5; | ||
1586 | #endif | ||
1587 | |||
1588 | c->mask=mask; | ||
1589 | c->export_mask=emask; | ||
1590 | c->valid=1; | ||
1591 | } | ||
1592 | |||
1593 | /* THIS NEEDS CLEANING UP */ | ||
1594 | X509 *ssl_get_server_send_cert(SSL *s) | ||
1595 | { | ||
1596 | unsigned long alg,mask,kalg; | ||
1597 | CERT *c; | ||
1598 | int i,is_export; | ||
1599 | |||
1600 | c=s->cert; | ||
1601 | ssl_set_cert_masks(c, s->s3->tmp.new_cipher); | ||
1602 | alg=s->s3->tmp.new_cipher->algorithms; | ||
1603 | is_export=SSL_C_IS_EXPORT(s->s3->tmp.new_cipher); | ||
1604 | mask=is_export?c->export_mask:c->mask; | ||
1605 | kalg=alg&(SSL_MKEY_MASK|SSL_AUTH_MASK); | ||
1606 | |||
1607 | if (kalg & SSL_kDHr) | ||
1608 | i=SSL_PKEY_DH_RSA; | ||
1609 | else if (kalg & SSL_kDHd) | ||
1610 | i=SSL_PKEY_DH_DSA; | ||
1611 | else if (kalg & SSL_aDSS) | ||
1612 | i=SSL_PKEY_DSA_SIGN; | ||
1613 | else if (kalg & SSL_aRSA) | ||
1614 | { | ||
1615 | if (c->pkeys[SSL_PKEY_RSA_ENC].x509 == NULL) | ||
1616 | i=SSL_PKEY_RSA_SIGN; | ||
1617 | else | ||
1618 | i=SSL_PKEY_RSA_ENC; | ||
1619 | } | ||
1620 | else if (kalg & SSL_aKRB5) | ||
1621 | { | ||
1622 | /* VRS something else here? */ | ||
1623 | return(NULL); | ||
1624 | } | ||
1625 | else /* if (kalg & SSL_aNULL) */ | ||
1626 | { | ||
1627 | SSLerr(SSL_F_SSL_GET_SERVER_SEND_CERT,ERR_R_INTERNAL_ERROR); | ||
1628 | return(NULL); | ||
1629 | } | ||
1630 | if (c->pkeys[i].x509 == NULL) return(NULL); | ||
1631 | return(c->pkeys[i].x509); | ||
1632 | } | ||
1633 | |||
1634 | EVP_PKEY *ssl_get_sign_pkey(SSL *s,SSL_CIPHER *cipher) | ||
1635 | { | ||
1636 | unsigned long alg; | ||
1637 | CERT *c; | ||
1638 | |||
1639 | alg=cipher->algorithms; | ||
1640 | c=s->cert; | ||
1641 | |||
1642 | if ((alg & SSL_aDSS) && | ||
1643 | (c->pkeys[SSL_PKEY_DSA_SIGN].privatekey != NULL)) | ||
1644 | return(c->pkeys[SSL_PKEY_DSA_SIGN].privatekey); | ||
1645 | else if (alg & SSL_aRSA) | ||
1646 | { | ||
1647 | if (c->pkeys[SSL_PKEY_RSA_SIGN].privatekey != NULL) | ||
1648 | return(c->pkeys[SSL_PKEY_RSA_SIGN].privatekey); | ||
1649 | else if (c->pkeys[SSL_PKEY_RSA_ENC].privatekey != NULL) | ||
1650 | return(c->pkeys[SSL_PKEY_RSA_ENC].privatekey); | ||
1651 | else | ||
1652 | return(NULL); | ||
1653 | } | ||
1654 | else /* if (alg & SSL_aNULL) */ | ||
1655 | { | ||
1656 | SSLerr(SSL_F_SSL_GET_SIGN_PKEY,ERR_R_INTERNAL_ERROR); | ||
1657 | return(NULL); | ||
1658 | } | ||
1659 | } | ||
1660 | |||
1661 | void ssl_update_cache(SSL *s,int mode) | ||
1662 | { | ||
1663 | int i; | ||
1664 | |||
1665 | /* If the session_id_length is 0, we are not supposed to cache it, | ||
1666 | * and it would be rather hard to do anyway :-) */ | ||
1667 | if (s->session->session_id_length == 0) return; | ||
1668 | |||
1669 | i=s->ctx->session_cache_mode; | ||
1670 | if ((i & mode) && (!s->hit) | ||
1671 | && ((i & SSL_SESS_CACHE_NO_INTERNAL_STORE) | ||
1672 | || SSL_CTX_add_session(s->ctx,s->session)) | ||
1673 | && (s->ctx->new_session_cb != NULL)) | ||
1674 | { | ||
1675 | CRYPTO_add(&s->session->references,1,CRYPTO_LOCK_SSL_SESSION); | ||
1676 | if (!s->ctx->new_session_cb(s,s->session)) | ||
1677 | SSL_SESSION_free(s->session); | ||
1678 | } | ||
1679 | |||
1680 | /* auto flush every 255 connections */ | ||
1681 | if ((!(i & SSL_SESS_CACHE_NO_AUTO_CLEAR)) && | ||
1682 | ((i & mode) == mode)) | ||
1683 | { | ||
1684 | if ( (((mode & SSL_SESS_CACHE_CLIENT) | ||
1685 | ?s->ctx->stats.sess_connect_good | ||
1686 | :s->ctx->stats.sess_accept_good) & 0xff) == 0xff) | ||
1687 | { | ||
1688 | SSL_CTX_flush_sessions(s->ctx,time(NULL)); | ||
1689 | } | ||
1690 | } | ||
1691 | } | ||
1692 | |||
1693 | SSL_METHOD *SSL_get_ssl_method(SSL *s) | ||
1694 | { | ||
1695 | return(s->method); | ||
1696 | } | ||
1697 | |||
1698 | int SSL_set_ssl_method(SSL *s,SSL_METHOD *meth) | ||
1699 | { | ||
1700 | int conn= -1; | ||
1701 | int ret=1; | ||
1702 | |||
1703 | if (s->method != meth) | ||
1704 | { | ||
1705 | if (s->handshake_func != NULL) | ||
1706 | conn=(s->handshake_func == s->method->ssl_connect); | ||
1707 | |||
1708 | if (s->method->version == meth->version) | ||
1709 | s->method=meth; | ||
1710 | else | ||
1711 | { | ||
1712 | s->method->ssl_free(s); | ||
1713 | s->method=meth; | ||
1714 | ret=s->method->ssl_new(s); | ||
1715 | } | ||
1716 | |||
1717 | if (conn == 1) | ||
1718 | s->handshake_func=meth->ssl_connect; | ||
1719 | else if (conn == 0) | ||
1720 | s->handshake_func=meth->ssl_accept; | ||
1721 | } | ||
1722 | return(ret); | ||
1723 | } | ||
1724 | |||
1725 | int SSL_get_error(SSL *s,int i) | ||
1726 | { | ||
1727 | int reason; | ||
1728 | unsigned long l; | ||
1729 | BIO *bio; | ||
1730 | |||
1731 | if (i > 0) return(SSL_ERROR_NONE); | ||
1732 | |||
1733 | /* Make things return SSL_ERROR_SYSCALL when doing SSL_do_handshake | ||
1734 | * etc, where we do encode the error */ | ||
1735 | if ((l=ERR_peek_error()) != 0) | ||
1736 | { | ||
1737 | if (ERR_GET_LIB(l) == ERR_LIB_SYS) | ||
1738 | return(SSL_ERROR_SYSCALL); | ||
1739 | else | ||
1740 | return(SSL_ERROR_SSL); | ||
1741 | } | ||
1742 | |||
1743 | if ((i < 0) && SSL_want_read(s)) | ||
1744 | { | ||
1745 | bio=SSL_get_rbio(s); | ||
1746 | if (BIO_should_read(bio)) | ||
1747 | return(SSL_ERROR_WANT_READ); | ||
1748 | else if (BIO_should_write(bio)) | ||
1749 | /* This one doesn't make too much sense ... We never try | ||
1750 | * to write to the rbio, and an application program where | ||
1751 | * rbio and wbio are separate couldn't even know what it | ||
1752 | * should wait for. | ||
1753 | * However if we ever set s->rwstate incorrectly | ||
1754 | * (so that we have SSL_want_read(s) instead of | ||
1755 | * SSL_want_write(s)) and rbio and wbio *are* the same, | ||
1756 | * this test works around that bug; so it might be safer | ||
1757 | * to keep it. */ | ||
1758 | return(SSL_ERROR_WANT_WRITE); | ||
1759 | else if (BIO_should_io_special(bio)) | ||
1760 | { | ||
1761 | reason=BIO_get_retry_reason(bio); | ||
1762 | if (reason == BIO_RR_CONNECT) | ||
1763 | return(SSL_ERROR_WANT_CONNECT); | ||
1764 | else if (reason == BIO_RR_ACCEPT) | ||
1765 | return(SSL_ERROR_WANT_ACCEPT); | ||
1766 | else | ||
1767 | return(SSL_ERROR_SYSCALL); /* unknown */ | ||
1768 | } | ||
1769 | } | ||
1770 | |||
1771 | if ((i < 0) && SSL_want_write(s)) | ||
1772 | { | ||
1773 | bio=SSL_get_wbio(s); | ||
1774 | if (BIO_should_write(bio)) | ||
1775 | return(SSL_ERROR_WANT_WRITE); | ||
1776 | else if (BIO_should_read(bio)) | ||
1777 | /* See above (SSL_want_read(s) with BIO_should_write(bio)) */ | ||
1778 | return(SSL_ERROR_WANT_READ); | ||
1779 | else if (BIO_should_io_special(bio)) | ||
1780 | { | ||
1781 | reason=BIO_get_retry_reason(bio); | ||
1782 | if (reason == BIO_RR_CONNECT) | ||
1783 | return(SSL_ERROR_WANT_CONNECT); | ||
1784 | else if (reason == BIO_RR_ACCEPT) | ||
1785 | return(SSL_ERROR_WANT_ACCEPT); | ||
1786 | else | ||
1787 | return(SSL_ERROR_SYSCALL); | ||
1788 | } | ||
1789 | } | ||
1790 | if ((i < 0) && SSL_want_x509_lookup(s)) | ||
1791 | { | ||
1792 | return(SSL_ERROR_WANT_X509_LOOKUP); | ||
1793 | } | ||
1794 | |||
1795 | if (i == 0) | ||
1796 | { | ||
1797 | if (s->version == SSL2_VERSION) | ||
1798 | { | ||
1799 | /* assume it is the socket being closed */ | ||
1800 | return(SSL_ERROR_ZERO_RETURN); | ||
1801 | } | ||
1802 | else | ||
1803 | { | ||
1804 | if ((s->shutdown & SSL_RECEIVED_SHUTDOWN) && | ||
1805 | (s->s3->warn_alert == SSL_AD_CLOSE_NOTIFY)) | ||
1806 | return(SSL_ERROR_ZERO_RETURN); | ||
1807 | } | ||
1808 | } | ||
1809 | return(SSL_ERROR_SYSCALL); | ||
1810 | } | ||
1811 | |||
1812 | int SSL_do_handshake(SSL *s) | ||
1813 | { | ||
1814 | int ret=1; | ||
1815 | |||
1816 | if (s->handshake_func == NULL) | ||
1817 | { | ||
1818 | SSLerr(SSL_F_SSL_DO_HANDSHAKE,SSL_R_CONNECTION_TYPE_NOT_SET); | ||
1819 | return(-1); | ||
1820 | } | ||
1821 | |||
1822 | s->method->ssl_renegotiate_check(s); | ||
1823 | |||
1824 | if (SSL_in_init(s) || SSL_in_before(s)) | ||
1825 | { | ||
1826 | ret=s->handshake_func(s); | ||
1827 | } | ||
1828 | return(ret); | ||
1829 | } | ||
1830 | |||
1831 | /* For the next 2 functions, SSL_clear() sets shutdown and so | ||
1832 | * one of these calls will reset it */ | ||
1833 | void SSL_set_accept_state(SSL *s) | ||
1834 | { | ||
1835 | s->server=1; | ||
1836 | s->shutdown=0; | ||
1837 | s->state=SSL_ST_ACCEPT|SSL_ST_BEFORE; | ||
1838 | s->handshake_func=s->method->ssl_accept; | ||
1839 | /* clear the current cipher */ | ||
1840 | ssl_clear_cipher_ctx(s); | ||
1841 | } | ||
1842 | |||
1843 | void SSL_set_connect_state(SSL *s) | ||
1844 | { | ||
1845 | s->server=0; | ||
1846 | s->shutdown=0; | ||
1847 | s->state=SSL_ST_CONNECT|SSL_ST_BEFORE; | ||
1848 | s->handshake_func=s->method->ssl_connect; | ||
1849 | /* clear the current cipher */ | ||
1850 | ssl_clear_cipher_ctx(s); | ||
1851 | } | ||
1852 | |||
1853 | int ssl_undefined_function(SSL *s) | ||
1854 | { | ||
1855 | SSLerr(SSL_F_SSL_UNDEFINED_FUNCTION,ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED); | ||
1856 | return(0); | ||
1857 | } | ||
1858 | |||
1859 | SSL_METHOD *ssl_bad_method(int ver) | ||
1860 | { | ||
1861 | SSLerr(SSL_F_SSL_BAD_METHOD,ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED); | ||
1862 | return(NULL); | ||
1863 | } | ||
1864 | |||
1865 | const char *SSL_get_version(SSL *s) | ||
1866 | { | ||
1867 | if (s->version == TLS1_VERSION) | ||
1868 | return("TLSv1"); | ||
1869 | else if (s->version == SSL3_VERSION) | ||
1870 | return("SSLv3"); | ||
1871 | else if (s->version == SSL2_VERSION) | ||
1872 | return("SSLv2"); | ||
1873 | else | ||
1874 | return("unknown"); | ||
1875 | } | ||
1876 | |||
1877 | SSL *SSL_dup(SSL *s) | ||
1878 | { | ||
1879 | STACK_OF(X509_NAME) *sk; | ||
1880 | X509_NAME *xn; | ||
1881 | SSL *ret; | ||
1882 | int i; | ||
1883 | |||
1884 | if ((ret=SSL_new(SSL_get_SSL_CTX(s))) == NULL) | ||
1885 | return(NULL); | ||
1886 | |||
1887 | ret->version = s->version; | ||
1888 | ret->type = s->type; | ||
1889 | ret->method = s->method; | ||
1890 | |||
1891 | if (s->session != NULL) | ||
1892 | { | ||
1893 | /* This copies session-id, SSL_METHOD, sid_ctx, and 'cert' */ | ||
1894 | SSL_copy_session_id(ret,s); | ||
1895 | } | ||
1896 | else | ||
1897 | { | ||
1898 | /* No session has been established yet, so we have to expect | ||
1899 | * that s->cert or ret->cert will be changed later -- | ||
1900 | * they should not both point to the same object, | ||
1901 | * and thus we can't use SSL_copy_session_id. */ | ||
1902 | |||
1903 | ret->method->ssl_free(ret); | ||
1904 | ret->method = s->method; | ||
1905 | ret->method->ssl_new(ret); | ||
1906 | |||
1907 | if (s->cert != NULL) | ||
1908 | { | ||
1909 | if (ret->cert != NULL) | ||
1910 | { | ||
1911 | ssl_cert_free(ret->cert); | ||
1912 | } | ||
1913 | ret->cert = ssl_cert_dup(s->cert); | ||
1914 | if (ret->cert == NULL) | ||
1915 | goto err; | ||
1916 | } | ||
1917 | |||
1918 | SSL_set_session_id_context(ret, | ||
1919 | s->sid_ctx, s->sid_ctx_length); | ||
1920 | } | ||
1921 | |||
1922 | ret->options=s->options; | ||
1923 | ret->mode=s->mode; | ||
1924 | SSL_set_max_cert_list(ret,SSL_get_max_cert_list(s)); | ||
1925 | SSL_set_read_ahead(ret,SSL_get_read_ahead(s)); | ||
1926 | ret->msg_callback = s->msg_callback; | ||
1927 | ret->msg_callback_arg = s->msg_callback_arg; | ||
1928 | SSL_set_verify(ret,SSL_get_verify_mode(s), | ||
1929 | SSL_get_verify_callback(s)); | ||
1930 | SSL_set_verify_depth(ret,SSL_get_verify_depth(s)); | ||
1931 | ret->generate_session_id = s->generate_session_id; | ||
1932 | |||
1933 | SSL_set_info_callback(ret,SSL_get_info_callback(s)); | ||
1934 | |||
1935 | ret->debug=s->debug; | ||
1936 | |||
1937 | /* copy app data, a little dangerous perhaps */ | ||
1938 | if (!CRYPTO_dup_ex_data(CRYPTO_EX_INDEX_SSL, &ret->ex_data, &s->ex_data)) | ||
1939 | goto err; | ||
1940 | |||
1941 | /* setup rbio, and wbio */ | ||
1942 | if (s->rbio != NULL) | ||
1943 | { | ||
1944 | if (!BIO_dup_state(s->rbio,(char *)&ret->rbio)) | ||
1945 | goto err; | ||
1946 | } | ||
1947 | if (s->wbio != NULL) | ||
1948 | { | ||
1949 | if (s->wbio != s->rbio) | ||
1950 | { | ||
1951 | if (!BIO_dup_state(s->wbio,(char *)&ret->wbio)) | ||
1952 | goto err; | ||
1953 | } | ||
1954 | else | ||
1955 | ret->wbio=ret->rbio; | ||
1956 | } | ||
1957 | ret->rwstate = s->rwstate; | ||
1958 | ret->in_handshake = s->in_handshake; | ||
1959 | ret->handshake_func = s->handshake_func; | ||
1960 | ret->server = s->server; | ||
1961 | ret->new_session = s->new_session; | ||
1962 | ret->quiet_shutdown = s->quiet_shutdown; | ||
1963 | ret->shutdown=s->shutdown; | ||
1964 | ret->state=s->state; /* SSL_dup does not really work at any state, though */ | ||
1965 | ret->rstate=s->rstate; | ||
1966 | ret->init_num = 0; /* would have to copy ret->init_buf, ret->init_msg, ret->init_num, ret->init_off */ | ||
1967 | ret->hit=s->hit; | ||
1968 | ret->purpose=s->purpose; | ||
1969 | ret->trust=s->trust; | ||
1970 | |||
1971 | /* dup the cipher_list and cipher_list_by_id stacks */ | ||
1972 | if (s->cipher_list != NULL) | ||
1973 | { | ||
1974 | if ((ret->cipher_list=sk_SSL_CIPHER_dup(s->cipher_list)) == NULL) | ||
1975 | goto err; | ||
1976 | } | ||
1977 | if (s->cipher_list_by_id != NULL) | ||
1978 | if ((ret->cipher_list_by_id=sk_SSL_CIPHER_dup(s->cipher_list_by_id)) | ||
1979 | == NULL) | ||
1980 | goto err; | ||
1981 | |||
1982 | /* Dup the client_CA list */ | ||
1983 | if (s->client_CA != NULL) | ||
1984 | { | ||
1985 | if ((sk=sk_X509_NAME_dup(s->client_CA)) == NULL) goto err; | ||
1986 | ret->client_CA=sk; | ||
1987 | for (i=0; i<sk_X509_NAME_num(sk); i++) | ||
1988 | { | ||
1989 | xn=sk_X509_NAME_value(sk,i); | ||
1990 | if (sk_X509_NAME_set(sk,i,X509_NAME_dup(xn)) == NULL) | ||
1991 | { | ||
1992 | X509_NAME_free(xn); | ||
1993 | goto err; | ||
1994 | } | ||
1995 | } | ||
1996 | } | ||
1997 | |||
1998 | if (0) | ||
1999 | { | ||
2000 | err: | ||
2001 | if (ret != NULL) SSL_free(ret); | ||
2002 | ret=NULL; | ||
2003 | } | ||
2004 | return(ret); | ||
2005 | } | ||
2006 | |||
2007 | void ssl_clear_cipher_ctx(SSL *s) | ||
2008 | { | ||
2009 | if (s->enc_read_ctx != NULL) | ||
2010 | { | ||
2011 | EVP_CIPHER_CTX_cleanup(s->enc_read_ctx); | ||
2012 | OPENSSL_free(s->enc_read_ctx); | ||
2013 | s->enc_read_ctx=NULL; | ||
2014 | } | ||
2015 | if (s->enc_write_ctx != NULL) | ||
2016 | { | ||
2017 | EVP_CIPHER_CTX_cleanup(s->enc_write_ctx); | ||
2018 | OPENSSL_free(s->enc_write_ctx); | ||
2019 | s->enc_write_ctx=NULL; | ||
2020 | } | ||
2021 | if (s->expand != NULL) | ||
2022 | { | ||
2023 | COMP_CTX_free(s->expand); | ||
2024 | s->expand=NULL; | ||
2025 | } | ||
2026 | if (s->compress != NULL) | ||
2027 | { | ||
2028 | COMP_CTX_free(s->compress); | ||
2029 | s->compress=NULL; | ||
2030 | } | ||
2031 | } | ||
2032 | |||
2033 | /* Fix this function so that it takes an optional type parameter */ | ||
2034 | X509 *SSL_get_certificate(SSL *s) | ||
2035 | { | ||
2036 | if (s->cert != NULL) | ||
2037 | return(s->cert->key->x509); | ||
2038 | else | ||
2039 | return(NULL); | ||
2040 | } | ||
2041 | |||
2042 | /* Fix this function so that it takes an optional type parameter */ | ||
2043 | EVP_PKEY *SSL_get_privatekey(SSL *s) | ||
2044 | { | ||
2045 | if (s->cert != NULL) | ||
2046 | return(s->cert->key->privatekey); | ||
2047 | else | ||
2048 | return(NULL); | ||
2049 | } | ||
2050 | |||
2051 | SSL_CIPHER *SSL_get_current_cipher(SSL *s) | ||
2052 | { | ||
2053 | if ((s->session != NULL) && (s->session->cipher != NULL)) | ||
2054 | return(s->session->cipher); | ||
2055 | return(NULL); | ||
2056 | } | ||
2057 | |||
2058 | int ssl_init_wbio_buffer(SSL *s,int push) | ||
2059 | { | ||
2060 | BIO *bbio; | ||
2061 | |||
2062 | if (s->bbio == NULL) | ||
2063 | { | ||
2064 | bbio=BIO_new(BIO_f_buffer()); | ||
2065 | if (bbio == NULL) return(0); | ||
2066 | s->bbio=bbio; | ||
2067 | } | ||
2068 | else | ||
2069 | { | ||
2070 | bbio=s->bbio; | ||
2071 | if (s->bbio == s->wbio) | ||
2072 | s->wbio=BIO_pop(s->wbio); | ||
2073 | } | ||
2074 | (void)BIO_reset(bbio); | ||
2075 | /* if (!BIO_set_write_buffer_size(bbio,16*1024)) */ | ||
2076 | if (!BIO_set_read_buffer_size(bbio,1)) | ||
2077 | { | ||
2078 | SSLerr(SSL_F_SSL_INIT_WBIO_BUFFER,ERR_R_BUF_LIB); | ||
2079 | return(0); | ||
2080 | } | ||
2081 | if (push) | ||
2082 | { | ||
2083 | if (s->wbio != bbio) | ||
2084 | s->wbio=BIO_push(bbio,s->wbio); | ||
2085 | } | ||
2086 | else | ||
2087 | { | ||
2088 | if (s->wbio == bbio) | ||
2089 | s->wbio=BIO_pop(bbio); | ||
2090 | } | ||
2091 | return(1); | ||
2092 | } | ||
2093 | |||
2094 | void ssl_free_wbio_buffer(SSL *s) | ||
2095 | { | ||
2096 | if (s->bbio == NULL) return; | ||
2097 | |||
2098 | if (s->bbio == s->wbio) | ||
2099 | { | ||
2100 | /* remove buffering */ | ||
2101 | s->wbio=BIO_pop(s->wbio); | ||
2102 | #ifdef REF_CHECK /* not the usual REF_CHECK, but this avoids adding one more preprocessor symbol */ | ||
2103 | assert(s->wbio != NULL); | ||
2104 | #endif | ||
2105 | } | ||
2106 | BIO_free(s->bbio); | ||
2107 | s->bbio=NULL; | ||
2108 | } | ||
2109 | |||
2110 | void SSL_CTX_set_quiet_shutdown(SSL_CTX *ctx,int mode) | ||
2111 | { | ||
2112 | ctx->quiet_shutdown=mode; | ||
2113 | } | ||
2114 | |||
2115 | int SSL_CTX_get_quiet_shutdown(SSL_CTX *ctx) | ||
2116 | { | ||
2117 | return(ctx->quiet_shutdown); | ||
2118 | } | ||
2119 | |||
2120 | void SSL_set_quiet_shutdown(SSL *s,int mode) | ||
2121 | { | ||
2122 | s->quiet_shutdown=mode; | ||
2123 | } | ||
2124 | |||
2125 | int SSL_get_quiet_shutdown(SSL *s) | ||
2126 | { | ||
2127 | return(s->quiet_shutdown); | ||
2128 | } | ||
2129 | |||
2130 | void SSL_set_shutdown(SSL *s,int mode) | ||
2131 | { | ||
2132 | s->shutdown=mode; | ||
2133 | } | ||
2134 | |||
2135 | int SSL_get_shutdown(SSL *s) | ||
2136 | { | ||
2137 | return(s->shutdown); | ||
2138 | } | ||
2139 | |||
2140 | int SSL_version(SSL *s) | ||
2141 | { | ||
2142 | return(s->version); | ||
2143 | } | ||
2144 | |||
2145 | SSL_CTX *SSL_get_SSL_CTX(SSL *ssl) | ||
2146 | { | ||
2147 | return(ssl->ctx); | ||
2148 | } | ||
2149 | |||
2150 | #ifndef OPENSSL_NO_STDIO | ||
2151 | int SSL_CTX_set_default_verify_paths(SSL_CTX *ctx) | ||
2152 | { | ||
2153 | return(X509_STORE_set_default_paths(ctx->cert_store)); | ||
2154 | } | ||
2155 | |||
2156 | int SSL_CTX_load_verify_locations(SSL_CTX *ctx, const char *CAfile, | ||
2157 | const char *CApath) | ||
2158 | { | ||
2159 | return(X509_STORE_load_locations(ctx->cert_store,CAfile,CApath)); | ||
2160 | } | ||
2161 | #endif | ||
2162 | |||
2163 | void SSL_set_info_callback(SSL *ssl, | ||
2164 | void (*cb)(const SSL *ssl,int type,int val)) | ||
2165 | { | ||
2166 | ssl->info_callback=cb; | ||
2167 | } | ||
2168 | |||
2169 | void (*SSL_get_info_callback(SSL *ssl))(const SSL *ssl,int type,int val) | ||
2170 | { | ||
2171 | return ssl->info_callback; | ||
2172 | } | ||
2173 | |||
2174 | int SSL_state(SSL *ssl) | ||
2175 | { | ||
2176 | return(ssl->state); | ||
2177 | } | ||
2178 | |||
2179 | void SSL_set_verify_result(SSL *ssl,long arg) | ||
2180 | { | ||
2181 | ssl->verify_result=arg; | ||
2182 | } | ||
2183 | |||
2184 | long SSL_get_verify_result(SSL *ssl) | ||
2185 | { | ||
2186 | return(ssl->verify_result); | ||
2187 | } | ||
2188 | |||
2189 | int SSL_get_ex_new_index(long argl,void *argp,CRYPTO_EX_new *new_func, | ||
2190 | CRYPTO_EX_dup *dup_func,CRYPTO_EX_free *free_func) | ||
2191 | { | ||
2192 | return CRYPTO_get_ex_new_index(CRYPTO_EX_INDEX_SSL, argl, argp, | ||
2193 | new_func, dup_func, free_func); | ||
2194 | } | ||
2195 | |||
2196 | int SSL_set_ex_data(SSL *s,int idx,void *arg) | ||
2197 | { | ||
2198 | return(CRYPTO_set_ex_data(&s->ex_data,idx,arg)); | ||
2199 | } | ||
2200 | |||
2201 | void *SSL_get_ex_data(SSL *s,int idx) | ||
2202 | { | ||
2203 | return(CRYPTO_get_ex_data(&s->ex_data,idx)); | ||
2204 | } | ||
2205 | |||
2206 | int SSL_CTX_get_ex_new_index(long argl,void *argp,CRYPTO_EX_new *new_func, | ||
2207 | CRYPTO_EX_dup *dup_func,CRYPTO_EX_free *free_func) | ||
2208 | { | ||
2209 | return CRYPTO_get_ex_new_index(CRYPTO_EX_INDEX_SSL_CTX, argl, argp, | ||
2210 | new_func, dup_func, free_func); | ||
2211 | } | ||
2212 | |||
2213 | int SSL_CTX_set_ex_data(SSL_CTX *s,int idx,void *arg) | ||
2214 | { | ||
2215 | return(CRYPTO_set_ex_data(&s->ex_data,idx,arg)); | ||
2216 | } | ||
2217 | |||
2218 | void *SSL_CTX_get_ex_data(SSL_CTX *s,int idx) | ||
2219 | { | ||
2220 | return(CRYPTO_get_ex_data(&s->ex_data,idx)); | ||
2221 | } | ||
2222 | |||
2223 | int ssl_ok(SSL *s) | ||
2224 | { | ||
2225 | return(1); | ||
2226 | } | ||
2227 | |||
2228 | X509_STORE *SSL_CTX_get_cert_store(SSL_CTX *ctx) | ||
2229 | { | ||
2230 | return(ctx->cert_store); | ||
2231 | } | ||
2232 | |||
2233 | void SSL_CTX_set_cert_store(SSL_CTX *ctx,X509_STORE *store) | ||
2234 | { | ||
2235 | if (ctx->cert_store != NULL) | ||
2236 | X509_STORE_free(ctx->cert_store); | ||
2237 | ctx->cert_store=store; | ||
2238 | } | ||
2239 | |||
2240 | int SSL_want(SSL *s) | ||
2241 | { | ||
2242 | return(s->rwstate); | ||
2243 | } | ||
2244 | |||
2245 | /*! | ||
2246 | * \brief Set the callback for generating temporary RSA keys. | ||
2247 | * \param ctx the SSL context. | ||
2248 | * \param cb the callback | ||
2249 | */ | ||
2250 | |||
2251 | #ifndef OPENSSL_NO_RSA | ||
2252 | void SSL_CTX_set_tmp_rsa_callback(SSL_CTX *ctx,RSA *(*cb)(SSL *ssl, | ||
2253 | int is_export, | ||
2254 | int keylength)) | ||
2255 | { | ||
2256 | SSL_CTX_callback_ctrl(ctx,SSL_CTRL_SET_TMP_RSA_CB,(void (*)())cb); | ||
2257 | } | ||
2258 | |||
2259 | void SSL_set_tmp_rsa_callback(SSL *ssl,RSA *(*cb)(SSL *ssl, | ||
2260 | int is_export, | ||
2261 | int keylength)) | ||
2262 | { | ||
2263 | SSL_callback_ctrl(ssl,SSL_CTRL_SET_TMP_RSA_CB,(void (*)())cb); | ||
2264 | } | ||
2265 | #endif | ||
2266 | |||
2267 | #ifdef DOXYGEN | ||
2268 | /*! | ||
2269 | * \brief The RSA temporary key callback function. | ||
2270 | * \param ssl the SSL session. | ||
2271 | * \param is_export \c TRUE if the temp RSA key is for an export ciphersuite. | ||
2272 | * \param keylength if \c is_export is \c TRUE, then \c keylength is the size | ||
2273 | * of the required key in bits. | ||
2274 | * \return the temporary RSA key. | ||
2275 | * \sa SSL_CTX_set_tmp_rsa_callback, SSL_set_tmp_rsa_callback | ||
2276 | */ | ||
2277 | |||
2278 | RSA *cb(SSL *ssl,int is_export,int keylength) | ||
2279 | {} | ||
2280 | #endif | ||
2281 | |||
2282 | /*! | ||
2283 | * \brief Set the callback for generating temporary DH keys. | ||
2284 | * \param ctx the SSL context. | ||
2285 | * \param dh the callback | ||
2286 | */ | ||
2287 | |||
2288 | #ifndef OPENSSL_NO_DH | ||
2289 | void SSL_CTX_set_tmp_dh_callback(SSL_CTX *ctx,DH *(*dh)(SSL *ssl,int is_export, | ||
2290 | int keylength)) | ||
2291 | { | ||
2292 | SSL_CTX_callback_ctrl(ctx,SSL_CTRL_SET_TMP_DH_CB,(void (*)())dh); | ||
2293 | } | ||
2294 | |||
2295 | void SSL_set_tmp_dh_callback(SSL *ssl,DH *(*dh)(SSL *ssl,int is_export, | ||
2296 | int keylength)) | ||
2297 | { | ||
2298 | SSL_callback_ctrl(ssl,SSL_CTRL_SET_TMP_DH_CB,(void (*)())dh); | ||
2299 | } | ||
2300 | #endif | ||
2301 | |||
2302 | |||
2303 | void SSL_CTX_set_msg_callback(SSL_CTX *ctx, void (*cb)(int write_p, int version, int content_type, const void *buf, size_t len, SSL *ssl, void *arg)) | ||
2304 | { | ||
2305 | SSL_CTX_callback_ctrl(ctx, SSL_CTRL_SET_MSG_CALLBACK, (void (*)())cb); | ||
2306 | } | ||
2307 | void SSL_set_msg_callback(SSL *ssl, void (*cb)(int write_p, int version, int content_type, const void *buf, size_t len, SSL *ssl, void *arg)) | ||
2308 | { | ||
2309 | SSL_callback_ctrl(ssl, SSL_CTRL_SET_MSG_CALLBACK, (void (*)())cb); | ||
2310 | } | ||
2311 | |||
2312 | |||
2313 | |||
2314 | #if defined(_WINDLL) && defined(OPENSSL_SYS_WIN16) | ||
2315 | #include "../crypto/bio/bss_file.c" | ||
2316 | #endif | ||
2317 | |||
2318 | IMPLEMENT_STACK_OF(SSL_CIPHER) | ||
2319 | IMPLEMENT_STACK_OF(SSL_COMP) | ||
diff --git a/src/lib/libssl/ssl_locl.h b/src/lib/libssl/ssl_locl.h deleted file mode 100644 index dd6c7a7323..0000000000 --- a/src/lib/libssl/ssl_locl.h +++ /dev/null | |||
@@ -1,620 +0,0 @@ | |||
1 | /* ssl/ssl_locl.h */ | ||
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-2001 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 | #ifndef HEADER_SSL_LOCL_H | ||
113 | #define HEADER_SSL_LOCL_H | ||
114 | #include <stdlib.h> | ||
115 | #include <time.h> | ||
116 | #include <string.h> | ||
117 | #include <errno.h> | ||
118 | |||
119 | #include "e_os.h" | ||
120 | |||
121 | #include <openssl/buffer.h> | ||
122 | #include <openssl/comp.h> | ||
123 | #include <openssl/bio.h> | ||
124 | #include <openssl/crypto.h> | ||
125 | #include <openssl/evp.h> | ||
126 | #include <openssl/stack.h> | ||
127 | #include <openssl/x509.h> | ||
128 | #include <openssl/err.h> | ||
129 | #include <openssl/ssl.h> | ||
130 | #include <openssl/symhacks.h> | ||
131 | |||
132 | #ifdef OPENSSL_BUILD_SHLIBSSL | ||
133 | # undef OPENSSL_EXTERN | ||
134 | # define OPENSSL_EXTERN OPENSSL_EXPORT | ||
135 | #endif | ||
136 | |||
137 | #define PKCS1_CHECK | ||
138 | |||
139 | #define c2l(c,l) (l = ((unsigned long)(*((c)++))) , \ | ||
140 | l|=(((unsigned long)(*((c)++)))<< 8), \ | ||
141 | l|=(((unsigned long)(*((c)++)))<<16), \ | ||
142 | l|=(((unsigned long)(*((c)++)))<<24)) | ||
143 | |||
144 | /* NOTE - c is not incremented as per c2l */ | ||
145 | #define c2ln(c,l1,l2,n) { \ | ||
146 | c+=n; \ | ||
147 | l1=l2=0; \ | ||
148 | switch (n) { \ | ||
149 | case 8: l2 =((unsigned long)(*(--(c))))<<24; \ | ||
150 | case 7: l2|=((unsigned long)(*(--(c))))<<16; \ | ||
151 | case 6: l2|=((unsigned long)(*(--(c))))<< 8; \ | ||
152 | case 5: l2|=((unsigned long)(*(--(c)))); \ | ||
153 | case 4: l1 =((unsigned long)(*(--(c))))<<24; \ | ||
154 | case 3: l1|=((unsigned long)(*(--(c))))<<16; \ | ||
155 | case 2: l1|=((unsigned long)(*(--(c))))<< 8; \ | ||
156 | case 1: l1|=((unsigned long)(*(--(c)))); \ | ||
157 | } \ | ||
158 | } | ||
159 | |||
160 | #define l2c(l,c) (*((c)++)=(unsigned char)(((l) )&0xff), \ | ||
161 | *((c)++)=(unsigned char)(((l)>> 8)&0xff), \ | ||
162 | *((c)++)=(unsigned char)(((l)>>16)&0xff), \ | ||
163 | *((c)++)=(unsigned char)(((l)>>24)&0xff)) | ||
164 | |||
165 | #define n2l(c,l) (l =((unsigned long)(*((c)++)))<<24, \ | ||
166 | l|=((unsigned long)(*((c)++)))<<16, \ | ||
167 | l|=((unsigned long)(*((c)++)))<< 8, \ | ||
168 | l|=((unsigned long)(*((c)++)))) | ||
169 | |||
170 | #define l2n(l,c) (*((c)++)=(unsigned char)(((l)>>24)&0xff), \ | ||
171 | *((c)++)=(unsigned char)(((l)>>16)&0xff), \ | ||
172 | *((c)++)=(unsigned char)(((l)>> 8)&0xff), \ | ||
173 | *((c)++)=(unsigned char)(((l) )&0xff)) | ||
174 | |||
175 | /* NOTE - c is not incremented as per l2c */ | ||
176 | #define l2cn(l1,l2,c,n) { \ | ||
177 | c+=n; \ | ||
178 | switch (n) { \ | ||
179 | case 8: *(--(c))=(unsigned char)(((l2)>>24)&0xff); \ | ||
180 | case 7: *(--(c))=(unsigned char)(((l2)>>16)&0xff); \ | ||
181 | case 6: *(--(c))=(unsigned char)(((l2)>> 8)&0xff); \ | ||
182 | case 5: *(--(c))=(unsigned char)(((l2) )&0xff); \ | ||
183 | case 4: *(--(c))=(unsigned char)(((l1)>>24)&0xff); \ | ||
184 | case 3: *(--(c))=(unsigned char)(((l1)>>16)&0xff); \ | ||
185 | case 2: *(--(c))=(unsigned char)(((l1)>> 8)&0xff); \ | ||
186 | case 1: *(--(c))=(unsigned char)(((l1) )&0xff); \ | ||
187 | } \ | ||
188 | } | ||
189 | |||
190 | #define n2s(c,s) ((s=(((unsigned int)(c[0]))<< 8)| \ | ||
191 | (((unsigned int)(c[1])) )),c+=2) | ||
192 | #define s2n(s,c) ((c[0]=(unsigned char)(((s)>> 8)&0xff), \ | ||
193 | c[1]=(unsigned char)(((s) )&0xff)),c+=2) | ||
194 | |||
195 | #define n2l3(c,l) ((l =(((unsigned long)(c[0]))<<16)| \ | ||
196 | (((unsigned long)(c[1]))<< 8)| \ | ||
197 | (((unsigned long)(c[2])) )),c+=3) | ||
198 | |||
199 | #define l2n3(l,c) ((c[0]=(unsigned char)(((l)>>16)&0xff), \ | ||
200 | c[1]=(unsigned char)(((l)>> 8)&0xff), \ | ||
201 | c[2]=(unsigned char)(((l) )&0xff)),c+=3) | ||
202 | |||
203 | /* LOCAL STUFF */ | ||
204 | |||
205 | #define SSL_DECRYPT 0 | ||
206 | #define SSL_ENCRYPT 1 | ||
207 | |||
208 | #define TWO_BYTE_BIT 0x80 | ||
209 | #define SEC_ESC_BIT 0x40 | ||
210 | #define TWO_BYTE_MASK 0x7fff | ||
211 | #define THREE_BYTE_MASK 0x3fff | ||
212 | |||
213 | #define INC32(a) ((a)=((a)+1)&0xffffffffL) | ||
214 | #define DEC32(a) ((a)=((a)-1)&0xffffffffL) | ||
215 | #define MAX_MAC_SIZE 20 /* up from 16 for SSLv3 */ | ||
216 | |||
217 | /* | ||
218 | * Define the Bitmasks for SSL_CIPHER.algorithms. | ||
219 | * This bits are used packed as dense as possible. If new methods/ciphers | ||
220 | * etc will be added, the bits a likely to change, so this information | ||
221 | * is for internal library use only, even though SSL_CIPHER.algorithms | ||
222 | * can be publicly accessed. | ||
223 | * Use the according functions for cipher management instead. | ||
224 | * | ||
225 | * The bit mask handling in the selection and sorting scheme in | ||
226 | * ssl_create_cipher_list() has only limited capabilities, reflecting | ||
227 | * that the different entities within are mutually exclusive: | ||
228 | * ONLY ONE BIT PER MASK CAN BE SET AT A TIME. | ||
229 | */ | ||
230 | #define SSL_MKEY_MASK 0x0000003FL | ||
231 | #define SSL_kRSA 0x00000001L /* RSA key exchange */ | ||
232 | #define SSL_kDHr 0x00000002L /* DH cert RSA CA cert */ | ||
233 | #define SSL_kDHd 0x00000004L /* DH cert DSA CA cert */ | ||
234 | #define SSL_kFZA 0x00000008L | ||
235 | #define SSL_kEDH 0x00000010L /* tmp DH key no DH cert */ | ||
236 | #define SSL_kKRB5 0x00000020L /* Kerberos5 key exchange */ | ||
237 | #define SSL_EDH (SSL_kEDH|(SSL_AUTH_MASK^SSL_aNULL)) | ||
238 | |||
239 | #define SSL_AUTH_MASK 0x00000FC0L | ||
240 | #define SSL_aRSA 0x00000040L /* Authenticate with RSA */ | ||
241 | #define SSL_aDSS 0x00000080L /* Authenticate with DSS */ | ||
242 | #define SSL_DSS SSL_aDSS | ||
243 | #define SSL_aFZA 0x00000100L | ||
244 | #define SSL_aNULL 0x00000200L /* no Authenticate, ADH */ | ||
245 | #define SSL_aDH 0x00000400L /* no Authenticate, ADH */ | ||
246 | #define SSL_aKRB5 0x00000800L /* Authenticate with KRB5 */ | ||
247 | |||
248 | #define SSL_NULL (SSL_eNULL) | ||
249 | #define SSL_ADH (SSL_kEDH|SSL_aNULL) | ||
250 | #define SSL_RSA (SSL_kRSA|SSL_aRSA) | ||
251 | #define SSL_DH (SSL_kDHr|SSL_kDHd|SSL_kEDH) | ||
252 | #define SSL_FZA (SSL_aFZA|SSL_kFZA|SSL_eFZA) | ||
253 | #define SSL_KRB5 (SSL_kKRB5|SSL_aKRB5) | ||
254 | |||
255 | #define SSL_ENC_MASK 0x0087F000L | ||
256 | #define SSL_DES 0x00001000L | ||
257 | #define SSL_3DES 0x00002000L | ||
258 | #define SSL_RC4 0x00004000L | ||
259 | #define SSL_RC2 0x00008000L | ||
260 | #define SSL_IDEA 0x00010000L | ||
261 | #define SSL_eFZA 0x00020000L | ||
262 | #define SSL_eNULL 0x00040000L | ||
263 | #define SSL_AES 0x00800000L | ||
264 | |||
265 | #define SSL_MAC_MASK 0x00180000L | ||
266 | #define SSL_MD5 0x00080000L | ||
267 | #define SSL_SHA1 0x00100000L | ||
268 | #define SSL_SHA (SSL_SHA1) | ||
269 | |||
270 | #define SSL_SSL_MASK 0x00600000L | ||
271 | #define SSL_SSLV2 0x00200000L | ||
272 | #define SSL_SSLV3 0x00400000L | ||
273 | #define SSL_TLSV1 SSL_SSLV3 /* for now */ | ||
274 | |||
275 | /* we have used 007fffff - 9 bits left to go */ | ||
276 | |||
277 | /* | ||
278 | * Export and cipher strength information. For each cipher we have to decide | ||
279 | * whether it is exportable or not. This information is likely to change | ||
280 | * over time, since the export control rules are no static technical issue. | ||
281 | * | ||
282 | * Independent of the export flag the cipher strength is sorted into classes. | ||
283 | * SSL_EXP40 was denoting the 40bit US export limit of past times, which now | ||
284 | * is at 56bit (SSL_EXP56). If the exportable cipher class is going to change | ||
285 | * again (eg. to 64bit) the use of "SSL_EXP*" becomes blurred even more, | ||
286 | * since SSL_EXP64 could be similar to SSL_LOW. | ||
287 | * For this reason SSL_MICRO and SSL_MINI macros are included to widen the | ||
288 | * namespace of SSL_LOW-SSL_HIGH to lower values. As development of speed | ||
289 | * and ciphers goes, another extension to SSL_SUPER and/or SSL_ULTRA would | ||
290 | * be possible. | ||
291 | */ | ||
292 | #define SSL_EXP_MASK 0x00000003L | ||
293 | #define SSL_NOT_EXP 0x00000001L | ||
294 | #define SSL_EXPORT 0x00000002L | ||
295 | |||
296 | #define SSL_STRONG_MASK 0x000000fcL | ||
297 | #define SSL_STRONG_NONE 0x00000004L | ||
298 | #define SSL_EXP40 0x00000008L | ||
299 | #define SSL_MICRO (SSL_EXP40) | ||
300 | #define SSL_EXP56 0x00000010L | ||
301 | #define SSL_MINI (SSL_EXP56) | ||
302 | #define SSL_LOW 0x00000020L | ||
303 | #define SSL_MEDIUM 0x00000040L | ||
304 | #define SSL_HIGH 0x00000080L | ||
305 | |||
306 | /* we have used 000000ff - 24 bits left to go */ | ||
307 | |||
308 | /* | ||
309 | * Macros to check the export status and cipher strength for export ciphers. | ||
310 | * Even though the macros for EXPORT and EXPORT40/56 have similar names, | ||
311 | * their meaning is different: | ||
312 | * *_EXPORT macros check the 'exportable' status. | ||
313 | * *_EXPORT40/56 macros are used to check whether a certain cipher strength | ||
314 | * is given. | ||
315 | * Since the SSL_IS_EXPORT* and SSL_EXPORT* macros depend on the correct | ||
316 | * algorithm structure element to be passed (algorithms, algo_strength) and no | ||
317 | * typechecking can be done as they are all of type unsigned long, their | ||
318 | * direct usage is discouraged. | ||
319 | * Use the SSL_C_* macros instead. | ||
320 | */ | ||
321 | #define SSL_IS_EXPORT(a) ((a)&SSL_EXPORT) | ||
322 | #define SSL_IS_EXPORT56(a) ((a)&SSL_EXP56) | ||
323 | #define SSL_IS_EXPORT40(a) ((a)&SSL_EXP40) | ||
324 | #define SSL_C_IS_EXPORT(c) SSL_IS_EXPORT((c)->algo_strength) | ||
325 | #define SSL_C_IS_EXPORT56(c) SSL_IS_EXPORT56((c)->algo_strength) | ||
326 | #define SSL_C_IS_EXPORT40(c) SSL_IS_EXPORT40((c)->algo_strength) | ||
327 | |||
328 | #define SSL_EXPORT_KEYLENGTH(a,s) (SSL_IS_EXPORT40(s) ? 5 : \ | ||
329 | ((a)&SSL_ENC_MASK) == SSL_DES ? 8 : 7) | ||
330 | #define SSL_EXPORT_PKEYLENGTH(a) (SSL_IS_EXPORT40(a) ? 512 : 1024) | ||
331 | #define SSL_C_EXPORT_KEYLENGTH(c) SSL_EXPORT_KEYLENGTH((c)->algorithms, \ | ||
332 | (c)->algo_strength) | ||
333 | #define SSL_C_EXPORT_PKEYLENGTH(c) SSL_EXPORT_PKEYLENGTH((c)->algo_strength) | ||
334 | |||
335 | |||
336 | #define SSL_ALL 0xffffffffL | ||
337 | #define SSL_ALL_CIPHERS (SSL_MKEY_MASK|SSL_AUTH_MASK|SSL_ENC_MASK|\ | ||
338 | SSL_MAC_MASK) | ||
339 | #define SSL_ALL_STRENGTHS (SSL_EXP_MASK|SSL_STRONG_MASK) | ||
340 | |||
341 | /* Mostly for SSLv3 */ | ||
342 | #define SSL_PKEY_RSA_ENC 0 | ||
343 | #define SSL_PKEY_RSA_SIGN 1 | ||
344 | #define SSL_PKEY_DSA_SIGN 2 | ||
345 | #define SSL_PKEY_DH_RSA 3 | ||
346 | #define SSL_PKEY_DH_DSA 4 | ||
347 | #define SSL_PKEY_NUM 5 | ||
348 | |||
349 | /* SSL_kRSA <- RSA_ENC | (RSA_TMP & RSA_SIGN) | | ||
350 | * <- (EXPORT & (RSA_ENC | RSA_TMP) & RSA_SIGN) | ||
351 | * SSL_kDH <- DH_ENC & (RSA_ENC | RSA_SIGN | DSA_SIGN) | ||
352 | * SSL_kEDH <- RSA_ENC | RSA_SIGN | DSA_SIGN | ||
353 | * SSL_aRSA <- RSA_ENC | RSA_SIGN | ||
354 | * SSL_aDSS <- DSA_SIGN | ||
355 | */ | ||
356 | |||
357 | /* | ||
358 | #define CERT_INVALID 0 | ||
359 | #define CERT_PUBLIC_KEY 1 | ||
360 | #define CERT_PRIVATE_KEY 2 | ||
361 | */ | ||
362 | |||
363 | typedef struct cert_pkey_st | ||
364 | { | ||
365 | X509 *x509; | ||
366 | EVP_PKEY *privatekey; | ||
367 | } CERT_PKEY; | ||
368 | |||
369 | typedef struct cert_st | ||
370 | { | ||
371 | /* Current active set */ | ||
372 | CERT_PKEY *key; /* ALWAYS points to an element of the pkeys array | ||
373 | * Probably it would make more sense to store | ||
374 | * an index, not a pointer. */ | ||
375 | |||
376 | /* The following masks are for the key and auth | ||
377 | * algorithms that are supported by the certs below */ | ||
378 | int valid; | ||
379 | unsigned long mask; | ||
380 | unsigned long export_mask; | ||
381 | #ifndef OPENSSL_NO_RSA | ||
382 | RSA *rsa_tmp; | ||
383 | RSA *(*rsa_tmp_cb)(SSL *ssl,int is_export,int keysize); | ||
384 | #endif | ||
385 | #ifndef OPENSSL_NO_DH | ||
386 | DH *dh_tmp; | ||
387 | DH *(*dh_tmp_cb)(SSL *ssl,int is_export,int keysize); | ||
388 | #endif | ||
389 | |||
390 | CERT_PKEY pkeys[SSL_PKEY_NUM]; | ||
391 | |||
392 | int references; /* >1 only if SSL_copy_session_id is used */ | ||
393 | } CERT; | ||
394 | |||
395 | |||
396 | typedef struct sess_cert_st | ||
397 | { | ||
398 | STACK_OF(X509) *cert_chain; /* as received from peer (not for SSL2) */ | ||
399 | |||
400 | /* The 'peer_...' members are used only by clients. */ | ||
401 | int peer_cert_type; | ||
402 | |||
403 | CERT_PKEY *peer_key; /* points to an element of peer_pkeys (never NULL!) */ | ||
404 | CERT_PKEY peer_pkeys[SSL_PKEY_NUM]; | ||
405 | /* Obviously we don't have the private keys of these, | ||
406 | * so maybe we shouldn't even use the CERT_PKEY type here. */ | ||
407 | |||
408 | #ifndef OPENSSL_NO_RSA | ||
409 | RSA *peer_rsa_tmp; /* not used for SSL 2 */ | ||
410 | #endif | ||
411 | #ifndef OPENSSL_NO_DH | ||
412 | DH *peer_dh_tmp; /* not used for SSL 2 */ | ||
413 | #endif | ||
414 | |||
415 | int references; /* actually always 1 at the moment */ | ||
416 | } SESS_CERT; | ||
417 | |||
418 | |||
419 | /*#define MAC_DEBUG */ | ||
420 | |||
421 | /*#define ERR_DEBUG */ | ||
422 | /*#define ABORT_DEBUG */ | ||
423 | /*#define PKT_DEBUG 1 */ | ||
424 | /*#define DES_DEBUG */ | ||
425 | /*#define DES_OFB_DEBUG */ | ||
426 | /*#define SSL_DEBUG */ | ||
427 | /*#define RSA_DEBUG */ | ||
428 | /*#define IDEA_DEBUG */ | ||
429 | |||
430 | #define FP_ICC (int (*)(const void *,const void *)) | ||
431 | #define ssl_put_cipher_by_char(ssl,ciph,ptr) \ | ||
432 | ((ssl)->method->put_cipher_by_char((ciph),(ptr))) | ||
433 | #define ssl_get_cipher_by_char(ssl,ptr) \ | ||
434 | ((ssl)->method->get_cipher_by_char(ptr)) | ||
435 | |||
436 | /* This is for the SSLv3/TLSv1.0 differences in crypto/hash stuff | ||
437 | * It is a bit of a mess of functions, but hell, think of it as | ||
438 | * an opaque structure :-) */ | ||
439 | typedef struct ssl3_enc_method | ||
440 | { | ||
441 | int (*enc)(SSL *, int); | ||
442 | int (*mac)(SSL *, unsigned char *, int); | ||
443 | int (*setup_key_block)(SSL *); | ||
444 | int (*generate_master_secret)(SSL *, unsigned char *, unsigned char *, int); | ||
445 | int (*change_cipher_state)(SSL *, int); | ||
446 | int (*final_finish_mac)(SSL *, EVP_MD_CTX *, EVP_MD_CTX *, const char *, int, unsigned char *); | ||
447 | int finish_mac_length; | ||
448 | int (*cert_verify_mac)(SSL *, EVP_MD_CTX *, unsigned char *); | ||
449 | const char *client_finished_label; | ||
450 | int client_finished_label_len; | ||
451 | const char *server_finished_label; | ||
452 | int server_finished_label_len; | ||
453 | int (*alert_value)(int); | ||
454 | } SSL3_ENC_METHOD; | ||
455 | |||
456 | /* Used for holding the relevant compression methods loaded into SSL_CTX */ | ||
457 | typedef struct ssl3_comp_st | ||
458 | { | ||
459 | int comp_id; /* The identifier byte for this compression type */ | ||
460 | char *name; /* Text name used for the compression type */ | ||
461 | COMP_METHOD *method; /* The method :-) */ | ||
462 | } SSL3_COMP; | ||
463 | |||
464 | OPENSSL_EXTERN SSL3_ENC_METHOD ssl3_undef_enc_method; | ||
465 | OPENSSL_EXTERN SSL_CIPHER ssl2_ciphers[]; | ||
466 | OPENSSL_EXTERN SSL_CIPHER ssl3_ciphers[]; | ||
467 | |||
468 | #ifdef OPENSSL_SYS_VMS | ||
469 | #undef SSL_COMP_get_compression_methods | ||
470 | #define SSL_COMP_get_compression_methods SSL_COMP_get_compress_methods | ||
471 | #endif | ||
472 | |||
473 | |||
474 | SSL_METHOD *ssl_bad_method(int ver); | ||
475 | SSL_METHOD *sslv2_base_method(void); | ||
476 | SSL_METHOD *sslv23_base_method(void); | ||
477 | SSL_METHOD *sslv3_base_method(void); | ||
478 | |||
479 | void ssl_clear_cipher_ctx(SSL *s); | ||
480 | int ssl_clear_bad_session(SSL *s); | ||
481 | CERT *ssl_cert_new(void); | ||
482 | CERT *ssl_cert_dup(CERT *cert); | ||
483 | int ssl_cert_inst(CERT **o); | ||
484 | void ssl_cert_free(CERT *c); | ||
485 | SESS_CERT *ssl_sess_cert_new(void); | ||
486 | void ssl_sess_cert_free(SESS_CERT *sc); | ||
487 | int ssl_set_peer_cert_type(SESS_CERT *c, int type); | ||
488 | int ssl_get_new_session(SSL *s, int session); | ||
489 | int ssl_get_prev_session(SSL *s, unsigned char *session,int len); | ||
490 | int ssl_cipher_id_cmp(const SSL_CIPHER *a,const SSL_CIPHER *b); | ||
491 | int ssl_cipher_ptr_id_cmp(const SSL_CIPHER * const *ap, | ||
492 | const SSL_CIPHER * const *bp); | ||
493 | STACK_OF(SSL_CIPHER) *ssl_bytes_to_cipher_list(SSL *s,unsigned char *p,int num, | ||
494 | STACK_OF(SSL_CIPHER) **skp); | ||
495 | int ssl_cipher_list_to_bytes(SSL *s,STACK_OF(SSL_CIPHER) *sk,unsigned char *p); | ||
496 | STACK_OF(SSL_CIPHER) *ssl_create_cipher_list(const SSL_METHOD *meth, | ||
497 | STACK_OF(SSL_CIPHER) **pref, | ||
498 | STACK_OF(SSL_CIPHER) **sorted, | ||
499 | const char *rule_str); | ||
500 | void ssl_update_cache(SSL *s, int mode); | ||
501 | int ssl_cipher_get_evp(SSL_SESSION *s,const EVP_CIPHER **enc,const EVP_MD **md, | ||
502 | SSL_COMP **comp); | ||
503 | int ssl_verify_cert_chain(SSL *s,STACK_OF(X509) *sk); | ||
504 | int ssl_undefined_function(SSL *s); | ||
505 | X509 *ssl_get_server_send_cert(SSL *); | ||
506 | EVP_PKEY *ssl_get_sign_pkey(SSL *,SSL_CIPHER *); | ||
507 | int ssl_cert_type(X509 *x,EVP_PKEY *pkey); | ||
508 | void ssl_set_cert_masks(CERT *c, SSL_CIPHER *cipher); | ||
509 | STACK_OF(SSL_CIPHER) *ssl_get_ciphers_by_id(SSL *s); | ||
510 | int ssl_verify_alarm_type(long type); | ||
511 | |||
512 | int ssl2_enc_init(SSL *s, int client); | ||
513 | int ssl2_generate_key_material(SSL *s); | ||
514 | void ssl2_enc(SSL *s,int send_data); | ||
515 | void ssl2_mac(SSL *s,unsigned char *mac,int send_data); | ||
516 | SSL_CIPHER *ssl2_get_cipher_by_char(const unsigned char *p); | ||
517 | int ssl2_put_cipher_by_char(const SSL_CIPHER *c,unsigned char *p); | ||
518 | int ssl2_part_read(SSL *s, unsigned long f, int i); | ||
519 | int ssl2_do_write(SSL *s); | ||
520 | int ssl2_set_certificate(SSL *s, int type, int len, unsigned char *data); | ||
521 | void ssl2_return_error(SSL *s,int reason); | ||
522 | void ssl2_write_error(SSL *s); | ||
523 | int ssl2_num_ciphers(void); | ||
524 | SSL_CIPHER *ssl2_get_cipher(unsigned int u); | ||
525 | int ssl2_new(SSL *s); | ||
526 | void ssl2_free(SSL *s); | ||
527 | int ssl2_accept(SSL *s); | ||
528 | int ssl2_connect(SSL *s); | ||
529 | int ssl2_read(SSL *s, void *buf, int len); | ||
530 | int ssl2_peek(SSL *s, void *buf, int len); | ||
531 | int ssl2_write(SSL *s, const void *buf, int len); | ||
532 | int ssl2_shutdown(SSL *s); | ||
533 | void ssl2_clear(SSL *s); | ||
534 | long ssl2_ctrl(SSL *s,int cmd, long larg, void *parg); | ||
535 | long ssl2_ctx_ctrl(SSL_CTX *s,int cmd, long larg, void *parg); | ||
536 | long ssl2_callback_ctrl(SSL *s,int cmd, void (*fp)()); | ||
537 | long ssl2_ctx_callback_ctrl(SSL_CTX *s,int cmd, void (*fp)()); | ||
538 | int ssl2_pending(SSL *s); | ||
539 | |||
540 | SSL_CIPHER *ssl3_get_cipher_by_char(const unsigned char *p); | ||
541 | int ssl3_put_cipher_by_char(const SSL_CIPHER *c,unsigned char *p); | ||
542 | void ssl3_init_finished_mac(SSL *s); | ||
543 | int ssl3_send_server_certificate(SSL *s); | ||
544 | int ssl3_get_finished(SSL *s,int state_a,int state_b); | ||
545 | int ssl3_setup_key_block(SSL *s); | ||
546 | int ssl3_send_change_cipher_spec(SSL *s,int state_a,int state_b); | ||
547 | int ssl3_change_cipher_state(SSL *s,int which); | ||
548 | void ssl3_cleanup_key_block(SSL *s); | ||
549 | int ssl3_do_write(SSL *s,int type); | ||
550 | void ssl3_send_alert(SSL *s,int level, int desc); | ||
551 | int ssl3_generate_master_secret(SSL *s, unsigned char *out, | ||
552 | unsigned char *p, int len); | ||
553 | int ssl3_get_req_cert_type(SSL *s,unsigned char *p); | ||
554 | long ssl3_get_message(SSL *s, int st1, int stn, int mt, long max, int *ok); | ||
555 | int ssl3_send_finished(SSL *s, int a, int b, const char *sender,int slen); | ||
556 | int ssl3_num_ciphers(void); | ||
557 | SSL_CIPHER *ssl3_get_cipher(unsigned int u); | ||
558 | int ssl3_renegotiate(SSL *ssl); | ||
559 | int ssl3_renegotiate_check(SSL *ssl); | ||
560 | int ssl3_dispatch_alert(SSL *s); | ||
561 | int ssl3_read_bytes(SSL *s, int type, unsigned char *buf, int len, int peek); | ||
562 | int ssl3_write_bytes(SSL *s, int type, const void *buf, int len); | ||
563 | int ssl3_final_finish_mac(SSL *s, EVP_MD_CTX *ctx1, EVP_MD_CTX *ctx2, | ||
564 | const char *sender, int slen,unsigned char *p); | ||
565 | int ssl3_cert_verify_mac(SSL *s, EVP_MD_CTX *in, unsigned char *p); | ||
566 | void ssl3_finish_mac(SSL *s, const unsigned char *buf, int len); | ||
567 | int ssl3_enc(SSL *s, int send_data); | ||
568 | int ssl3_mac(SSL *ssl, unsigned char *md, int send_data); | ||
569 | unsigned long ssl3_output_cert_chain(SSL *s, X509 *x); | ||
570 | SSL_CIPHER *ssl3_choose_cipher(SSL *ssl,STACK_OF(SSL_CIPHER) *clnt, | ||
571 | STACK_OF(SSL_CIPHER) *srvr); | ||
572 | int ssl3_setup_buffers(SSL *s); | ||
573 | int ssl3_new(SSL *s); | ||
574 | void ssl3_free(SSL *s); | ||
575 | int ssl3_accept(SSL *s); | ||
576 | int ssl3_connect(SSL *s); | ||
577 | int ssl3_read(SSL *s, void *buf, int len); | ||
578 | int ssl3_peek(SSL *s, void *buf, int len); | ||
579 | int ssl3_write(SSL *s, const void *buf, int len); | ||
580 | int ssl3_shutdown(SSL *s); | ||
581 | void ssl3_clear(SSL *s); | ||
582 | long ssl3_ctrl(SSL *s,int cmd, long larg, void *parg); | ||
583 | long ssl3_ctx_ctrl(SSL_CTX *s,int cmd, long larg, void *parg); | ||
584 | long ssl3_callback_ctrl(SSL *s,int cmd, void (*fp)()); | ||
585 | long ssl3_ctx_callback_ctrl(SSL_CTX *s,int cmd, void (*fp)()); | ||
586 | int ssl3_pending(SSL *s); | ||
587 | |||
588 | int ssl23_accept(SSL *s); | ||
589 | int ssl23_connect(SSL *s); | ||
590 | int ssl23_read_bytes(SSL *s, int n); | ||
591 | int ssl23_write_bytes(SSL *s); | ||
592 | |||
593 | int tls1_new(SSL *s); | ||
594 | void tls1_free(SSL *s); | ||
595 | void tls1_clear(SSL *s); | ||
596 | long tls1_ctrl(SSL *s,int cmd, long larg, void *parg); | ||
597 | long tls1_callback_ctrl(SSL *s,int cmd, void (*fp)()); | ||
598 | SSL_METHOD *tlsv1_base_method(void ); | ||
599 | |||
600 | int ssl_init_wbio_buffer(SSL *s, int push); | ||
601 | void ssl_free_wbio_buffer(SSL *s); | ||
602 | |||
603 | int tls1_change_cipher_state(SSL *s, int which); | ||
604 | int tls1_setup_key_block(SSL *s); | ||
605 | int tls1_enc(SSL *s, int snd); | ||
606 | int tls1_final_finish_mac(SSL *s, EVP_MD_CTX *in1_ctx, EVP_MD_CTX *in2_ctx, | ||
607 | const char *str, int slen, unsigned char *p); | ||
608 | int tls1_cert_verify_mac(SSL *s, EVP_MD_CTX *in, unsigned char *p); | ||
609 | int tls1_mac(SSL *ssl, unsigned char *md, int snd); | ||
610 | int tls1_generate_master_secret(SSL *s, unsigned char *out, | ||
611 | unsigned char *p, int len); | ||
612 | int tls1_alert_code(int code); | ||
613 | int ssl3_alert_code(int code); | ||
614 | int ssl_ok(SSL *s); | ||
615 | |||
616 | SSL_COMP *ssl3_comp_find(STACK_OF(SSL_COMP) *sk, int n); | ||
617 | STACK_OF(SSL_COMP) *SSL_COMP_get_compression_methods(void); | ||
618 | |||
619 | |||
620 | #endif | ||
diff --git a/src/lib/libssl/ssl_rsa.c b/src/lib/libssl/ssl_rsa.c deleted file mode 100644 index 330390519b..0000000000 --- a/src/lib/libssl/ssl_rsa.c +++ /dev/null | |||
@@ -1,817 +0,0 @@ | |||
1 | /* ssl/ssl_rsa.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/bio.h> | ||
62 | #include <openssl/objects.h> | ||
63 | #include <openssl/evp.h> | ||
64 | #include <openssl/x509.h> | ||
65 | #include <openssl/pem.h> | ||
66 | |||
67 | static int ssl_set_cert(CERT *c, X509 *x509); | ||
68 | static int ssl_set_pkey(CERT *c, EVP_PKEY *pkey); | ||
69 | int SSL_use_certificate(SSL *ssl, X509 *x) | ||
70 | { | ||
71 | if (x == NULL) | ||
72 | { | ||
73 | SSLerr(SSL_F_SSL_USE_CERTIFICATE,ERR_R_PASSED_NULL_PARAMETER); | ||
74 | return(0); | ||
75 | } | ||
76 | if (!ssl_cert_inst(&ssl->cert)) | ||
77 | { | ||
78 | SSLerr(SSL_F_SSL_USE_CERTIFICATE,ERR_R_MALLOC_FAILURE); | ||
79 | return(0); | ||
80 | } | ||
81 | return(ssl_set_cert(ssl->cert,x)); | ||
82 | } | ||
83 | |||
84 | #ifndef OPENSSL_NO_STDIO | ||
85 | int SSL_use_certificate_file(SSL *ssl, const char *file, int type) | ||
86 | { | ||
87 | int j; | ||
88 | BIO *in; | ||
89 | int ret=0; | ||
90 | X509 *x=NULL; | ||
91 | |||
92 | in=BIO_new(BIO_s_file_internal()); | ||
93 | if (in == NULL) | ||
94 | { | ||
95 | SSLerr(SSL_F_SSL_USE_CERTIFICATE_FILE,ERR_R_BUF_LIB); | ||
96 | goto end; | ||
97 | } | ||
98 | |||
99 | if (BIO_read_filename(in,file) <= 0) | ||
100 | { | ||
101 | SSLerr(SSL_F_SSL_USE_CERTIFICATE_FILE,ERR_R_SYS_LIB); | ||
102 | goto end; | ||
103 | } | ||
104 | if (type == SSL_FILETYPE_ASN1) | ||
105 | { | ||
106 | j=ERR_R_ASN1_LIB; | ||
107 | x=d2i_X509_bio(in,NULL); | ||
108 | } | ||
109 | else if (type == SSL_FILETYPE_PEM) | ||
110 | { | ||
111 | j=ERR_R_PEM_LIB; | ||
112 | x=PEM_read_bio_X509(in,NULL,ssl->ctx->default_passwd_callback,ssl->ctx->default_passwd_callback_userdata); | ||
113 | } | ||
114 | else | ||
115 | { | ||
116 | SSLerr(SSL_F_SSL_USE_CERTIFICATE_FILE,SSL_R_BAD_SSL_FILETYPE); | ||
117 | goto end; | ||
118 | } | ||
119 | |||
120 | if (x == NULL) | ||
121 | { | ||
122 | SSLerr(SSL_F_SSL_USE_CERTIFICATE_FILE,j); | ||
123 | goto end; | ||
124 | } | ||
125 | |||
126 | ret=SSL_use_certificate(ssl,x); | ||
127 | end: | ||
128 | if (x != NULL) X509_free(x); | ||
129 | if (in != NULL) BIO_free(in); | ||
130 | return(ret); | ||
131 | } | ||
132 | #endif | ||
133 | |||
134 | int SSL_use_certificate_ASN1(SSL *ssl, unsigned char *d, int len) | ||
135 | { | ||
136 | X509 *x; | ||
137 | int ret; | ||
138 | |||
139 | x=d2i_X509(NULL,&d,(long)len); | ||
140 | if (x == NULL) | ||
141 | { | ||
142 | SSLerr(SSL_F_SSL_USE_CERTIFICATE_ASN1,ERR_R_ASN1_LIB); | ||
143 | return(0); | ||
144 | } | ||
145 | |||
146 | ret=SSL_use_certificate(ssl,x); | ||
147 | X509_free(x); | ||
148 | return(ret); | ||
149 | } | ||
150 | |||
151 | #ifndef OPENSSL_NO_RSA | ||
152 | int SSL_use_RSAPrivateKey(SSL *ssl, RSA *rsa) | ||
153 | { | ||
154 | EVP_PKEY *pkey; | ||
155 | int ret; | ||
156 | |||
157 | if (rsa == NULL) | ||
158 | { | ||
159 | SSLerr(SSL_F_SSL_USE_RSAPRIVATEKEY,ERR_R_PASSED_NULL_PARAMETER); | ||
160 | return(0); | ||
161 | } | ||
162 | if (!ssl_cert_inst(&ssl->cert)) | ||
163 | { | ||
164 | SSLerr(SSL_F_SSL_USE_RSAPRIVATEKEY,ERR_R_MALLOC_FAILURE); | ||
165 | return(0); | ||
166 | } | ||
167 | if ((pkey=EVP_PKEY_new()) == NULL) | ||
168 | { | ||
169 | SSLerr(SSL_F_SSL_USE_RSAPRIVATEKEY,ERR_R_EVP_LIB); | ||
170 | return(0); | ||
171 | } | ||
172 | |||
173 | RSA_up_ref(rsa); | ||
174 | EVP_PKEY_assign_RSA(pkey,rsa); | ||
175 | |||
176 | ret=ssl_set_pkey(ssl->cert,pkey); | ||
177 | EVP_PKEY_free(pkey); | ||
178 | return(ret); | ||
179 | } | ||
180 | #endif | ||
181 | |||
182 | static int ssl_set_pkey(CERT *c, EVP_PKEY *pkey) | ||
183 | { | ||
184 | int i,ok=0,bad=0; | ||
185 | |||
186 | i=ssl_cert_type(NULL,pkey); | ||
187 | if (i < 0) | ||
188 | { | ||
189 | SSLerr(SSL_F_SSL_SET_PKEY,SSL_R_UNKNOWN_CERTIFICATE_TYPE); | ||
190 | return(0); | ||
191 | } | ||
192 | |||
193 | if (c->pkeys[i].x509 != NULL) | ||
194 | { | ||
195 | EVP_PKEY *pktmp; | ||
196 | pktmp = X509_get_pubkey(c->pkeys[i].x509); | ||
197 | EVP_PKEY_copy_parameters(pktmp,pkey); | ||
198 | EVP_PKEY_free(pktmp); | ||
199 | ERR_clear_error(); | ||
200 | |||
201 | #ifndef OPENSSL_NO_RSA | ||
202 | /* Don't check the public/private key, this is mostly | ||
203 | * for smart cards. */ | ||
204 | if ((pkey->type == EVP_PKEY_RSA) && | ||
205 | (RSA_flags(pkey->pkey.rsa) & | ||
206 | RSA_METHOD_FLAG_NO_CHECK)) | ||
207 | ok=1; | ||
208 | else | ||
209 | #endif | ||
210 | if (!X509_check_private_key(c->pkeys[i].x509,pkey)) | ||
211 | { | ||
212 | if ((i == SSL_PKEY_DH_RSA) || (i == SSL_PKEY_DH_DSA)) | ||
213 | { | ||
214 | i=(i == SSL_PKEY_DH_RSA)? | ||
215 | SSL_PKEY_DH_DSA:SSL_PKEY_DH_RSA; | ||
216 | |||
217 | if (c->pkeys[i].x509 == NULL) | ||
218 | ok=1; | ||
219 | else | ||
220 | { | ||
221 | if (!X509_check_private_key( | ||
222 | c->pkeys[i].x509,pkey)) | ||
223 | bad=1; | ||
224 | else | ||
225 | ok=1; | ||
226 | } | ||
227 | } | ||
228 | else | ||
229 | bad=1; | ||
230 | } | ||
231 | else | ||
232 | ok=1; | ||
233 | } | ||
234 | else | ||
235 | ok=1; | ||
236 | |||
237 | if (bad) | ||
238 | { | ||
239 | X509_free(c->pkeys[i].x509); | ||
240 | c->pkeys[i].x509=NULL; | ||
241 | return(0); | ||
242 | } | ||
243 | |||
244 | ERR_clear_error(); /* make sure no error from X509_check_private_key() | ||
245 | * is left if we have chosen to ignore it */ | ||
246 | if (c->pkeys[i].privatekey != NULL) | ||
247 | EVP_PKEY_free(c->pkeys[i].privatekey); | ||
248 | CRYPTO_add(&pkey->references,1,CRYPTO_LOCK_EVP_PKEY); | ||
249 | c->pkeys[i].privatekey=pkey; | ||
250 | c->key= &(c->pkeys[i]); | ||
251 | |||
252 | c->valid=0; | ||
253 | return(1); | ||
254 | } | ||
255 | |||
256 | #ifndef OPENSSL_NO_RSA | ||
257 | #ifndef OPENSSL_NO_STDIO | ||
258 | int SSL_use_RSAPrivateKey_file(SSL *ssl, const char *file, int type) | ||
259 | { | ||
260 | int j,ret=0; | ||
261 | BIO *in; | ||
262 | RSA *rsa=NULL; | ||
263 | |||
264 | in=BIO_new(BIO_s_file_internal()); | ||
265 | if (in == NULL) | ||
266 | { | ||
267 | SSLerr(SSL_F_SSL_USE_RSAPRIVATEKEY_FILE,ERR_R_BUF_LIB); | ||
268 | goto end; | ||
269 | } | ||
270 | |||
271 | if (BIO_read_filename(in,file) <= 0) | ||
272 | { | ||
273 | SSLerr(SSL_F_SSL_USE_RSAPRIVATEKEY_FILE,ERR_R_SYS_LIB); | ||
274 | goto end; | ||
275 | } | ||
276 | if (type == SSL_FILETYPE_ASN1) | ||
277 | { | ||
278 | j=ERR_R_ASN1_LIB; | ||
279 | rsa=d2i_RSAPrivateKey_bio(in,NULL); | ||
280 | } | ||
281 | else if (type == SSL_FILETYPE_PEM) | ||
282 | { | ||
283 | j=ERR_R_PEM_LIB; | ||
284 | rsa=PEM_read_bio_RSAPrivateKey(in,NULL, | ||
285 | ssl->ctx->default_passwd_callback,ssl->ctx->default_passwd_callback_userdata); | ||
286 | } | ||
287 | else | ||
288 | { | ||
289 | SSLerr(SSL_F_SSL_USE_RSAPRIVATEKEY_FILE,SSL_R_BAD_SSL_FILETYPE); | ||
290 | goto end; | ||
291 | } | ||
292 | if (rsa == NULL) | ||
293 | { | ||
294 | SSLerr(SSL_F_SSL_USE_RSAPRIVATEKEY_FILE,j); | ||
295 | goto end; | ||
296 | } | ||
297 | ret=SSL_use_RSAPrivateKey(ssl,rsa); | ||
298 | RSA_free(rsa); | ||
299 | end: | ||
300 | if (in != NULL) BIO_free(in); | ||
301 | return(ret); | ||
302 | } | ||
303 | #endif | ||
304 | |||
305 | int SSL_use_RSAPrivateKey_ASN1(SSL *ssl, unsigned char *d, long len) | ||
306 | { | ||
307 | int ret; | ||
308 | const unsigned char *p; | ||
309 | RSA *rsa; | ||
310 | |||
311 | p=d; | ||
312 | if ((rsa=d2i_RSAPrivateKey(NULL,&p,(long)len)) == NULL) | ||
313 | { | ||
314 | SSLerr(SSL_F_SSL_USE_RSAPRIVATEKEY_ASN1,ERR_R_ASN1_LIB); | ||
315 | return(0); | ||
316 | } | ||
317 | |||
318 | ret=SSL_use_RSAPrivateKey(ssl,rsa); | ||
319 | RSA_free(rsa); | ||
320 | return(ret); | ||
321 | } | ||
322 | #endif /* !OPENSSL_NO_RSA */ | ||
323 | |||
324 | int SSL_use_PrivateKey(SSL *ssl, EVP_PKEY *pkey) | ||
325 | { | ||
326 | int ret; | ||
327 | |||
328 | if (pkey == NULL) | ||
329 | { | ||
330 | SSLerr(SSL_F_SSL_USE_PRIVATEKEY,ERR_R_PASSED_NULL_PARAMETER); | ||
331 | return(0); | ||
332 | } | ||
333 | if (!ssl_cert_inst(&ssl->cert)) | ||
334 | { | ||
335 | SSLerr(SSL_F_SSL_USE_PRIVATEKEY,ERR_R_MALLOC_FAILURE); | ||
336 | return(0); | ||
337 | } | ||
338 | ret=ssl_set_pkey(ssl->cert,pkey); | ||
339 | return(ret); | ||
340 | } | ||
341 | |||
342 | #ifndef OPENSSL_NO_STDIO | ||
343 | int SSL_use_PrivateKey_file(SSL *ssl, const char *file, int type) | ||
344 | { | ||
345 | int j,ret=0; | ||
346 | BIO *in; | ||
347 | EVP_PKEY *pkey=NULL; | ||
348 | |||
349 | in=BIO_new(BIO_s_file_internal()); | ||
350 | if (in == NULL) | ||
351 | { | ||
352 | SSLerr(SSL_F_SSL_USE_PRIVATEKEY_FILE,ERR_R_BUF_LIB); | ||
353 | goto end; | ||
354 | } | ||
355 | |||
356 | if (BIO_read_filename(in,file) <= 0) | ||
357 | { | ||
358 | SSLerr(SSL_F_SSL_USE_PRIVATEKEY_FILE,ERR_R_SYS_LIB); | ||
359 | goto end; | ||
360 | } | ||
361 | if (type == SSL_FILETYPE_PEM) | ||
362 | { | ||
363 | j=ERR_R_PEM_LIB; | ||
364 | pkey=PEM_read_bio_PrivateKey(in,NULL, | ||
365 | ssl->ctx->default_passwd_callback,ssl->ctx->default_passwd_callback_userdata); | ||
366 | } | ||
367 | else | ||
368 | { | ||
369 | SSLerr(SSL_F_SSL_USE_PRIVATEKEY_FILE,SSL_R_BAD_SSL_FILETYPE); | ||
370 | goto end; | ||
371 | } | ||
372 | if (pkey == NULL) | ||
373 | { | ||
374 | SSLerr(SSL_F_SSL_USE_PRIVATEKEY_FILE,j); | ||
375 | goto end; | ||
376 | } | ||
377 | ret=SSL_use_PrivateKey(ssl,pkey); | ||
378 | EVP_PKEY_free(pkey); | ||
379 | end: | ||
380 | if (in != NULL) BIO_free(in); | ||
381 | return(ret); | ||
382 | } | ||
383 | #endif | ||
384 | |||
385 | int SSL_use_PrivateKey_ASN1(int type, SSL *ssl, unsigned char *d, long len) | ||
386 | { | ||
387 | int ret; | ||
388 | unsigned char *p; | ||
389 | EVP_PKEY *pkey; | ||
390 | |||
391 | p=d; | ||
392 | if ((pkey=d2i_PrivateKey(type,NULL,&p,(long)len)) == NULL) | ||
393 | { | ||
394 | SSLerr(SSL_F_SSL_USE_PRIVATEKEY_ASN1,ERR_R_ASN1_LIB); | ||
395 | return(0); | ||
396 | } | ||
397 | |||
398 | ret=SSL_use_PrivateKey(ssl,pkey); | ||
399 | EVP_PKEY_free(pkey); | ||
400 | return(ret); | ||
401 | } | ||
402 | |||
403 | int SSL_CTX_use_certificate(SSL_CTX *ctx, X509 *x) | ||
404 | { | ||
405 | if (x == NULL) | ||
406 | { | ||
407 | SSLerr(SSL_F_SSL_CTX_USE_CERTIFICATE,ERR_R_PASSED_NULL_PARAMETER); | ||
408 | return(0); | ||
409 | } | ||
410 | if (!ssl_cert_inst(&ctx->cert)) | ||
411 | { | ||
412 | SSLerr(SSL_F_SSL_CTX_USE_CERTIFICATE,ERR_R_MALLOC_FAILURE); | ||
413 | return(0); | ||
414 | } | ||
415 | return(ssl_set_cert(ctx->cert, x)); | ||
416 | } | ||
417 | |||
418 | static int ssl_set_cert(CERT *c, X509 *x) | ||
419 | { | ||
420 | EVP_PKEY *pkey; | ||
421 | int i,ok=0,bad=0; | ||
422 | |||
423 | pkey=X509_get_pubkey(x); | ||
424 | if (pkey == NULL) | ||
425 | { | ||
426 | SSLerr(SSL_F_SSL_SET_CERT,SSL_R_X509_LIB); | ||
427 | return(0); | ||
428 | } | ||
429 | |||
430 | i=ssl_cert_type(x,pkey); | ||
431 | if (i < 0) | ||
432 | { | ||
433 | SSLerr(SSL_F_SSL_SET_CERT,SSL_R_UNKNOWN_CERTIFICATE_TYPE); | ||
434 | EVP_PKEY_free(pkey); | ||
435 | return(0); | ||
436 | } | ||
437 | |||
438 | if (c->pkeys[i].privatekey != NULL) | ||
439 | { | ||
440 | EVP_PKEY_copy_parameters(pkey,c->pkeys[i].privatekey); | ||
441 | ERR_clear_error(); | ||
442 | |||
443 | #ifndef OPENSSL_NO_RSA | ||
444 | /* Don't check the public/private key, this is mostly | ||
445 | * for smart cards. */ | ||
446 | if ((c->pkeys[i].privatekey->type == EVP_PKEY_RSA) && | ||
447 | (RSA_flags(c->pkeys[i].privatekey->pkey.rsa) & | ||
448 | RSA_METHOD_FLAG_NO_CHECK)) | ||
449 | ok=1; | ||
450 | else | ||
451 | #endif | ||
452 | { | ||
453 | if (!X509_check_private_key(x,c->pkeys[i].privatekey)) | ||
454 | { | ||
455 | if ((i == SSL_PKEY_DH_RSA) || (i == SSL_PKEY_DH_DSA)) | ||
456 | { | ||
457 | i=(i == SSL_PKEY_DH_RSA)? | ||
458 | SSL_PKEY_DH_DSA:SSL_PKEY_DH_RSA; | ||
459 | |||
460 | if (c->pkeys[i].privatekey == NULL) | ||
461 | ok=1; | ||
462 | else | ||
463 | { | ||
464 | if (!X509_check_private_key(x, | ||
465 | c->pkeys[i].privatekey)) | ||
466 | bad=1; | ||
467 | else | ||
468 | ok=1; | ||
469 | } | ||
470 | } | ||
471 | else | ||
472 | bad=1; | ||
473 | } | ||
474 | else | ||
475 | ok=1; | ||
476 | } /* OPENSSL_NO_RSA */ | ||
477 | } | ||
478 | else | ||
479 | ok=1; | ||
480 | |||
481 | EVP_PKEY_free(pkey); | ||
482 | if (bad) | ||
483 | { | ||
484 | EVP_PKEY_free(c->pkeys[i].privatekey); | ||
485 | c->pkeys[i].privatekey=NULL; | ||
486 | } | ||
487 | |||
488 | if (c->pkeys[i].x509 != NULL) | ||
489 | X509_free(c->pkeys[i].x509); | ||
490 | CRYPTO_add(&x->references,1,CRYPTO_LOCK_X509); | ||
491 | c->pkeys[i].x509=x; | ||
492 | c->key= &(c->pkeys[i]); | ||
493 | |||
494 | c->valid=0; | ||
495 | return(1); | ||
496 | } | ||
497 | |||
498 | #ifndef OPENSSL_NO_STDIO | ||
499 | int SSL_CTX_use_certificate_file(SSL_CTX *ctx, const char *file, int type) | ||
500 | { | ||
501 | int j; | ||
502 | BIO *in; | ||
503 | int ret=0; | ||
504 | X509 *x=NULL; | ||
505 | |||
506 | in=BIO_new(BIO_s_file_internal()); | ||
507 | if (in == NULL) | ||
508 | { | ||
509 | SSLerr(SSL_F_SSL_CTX_USE_CERTIFICATE_FILE,ERR_R_BUF_LIB); | ||
510 | goto end; | ||
511 | } | ||
512 | |||
513 | if (BIO_read_filename(in,file) <= 0) | ||
514 | { | ||
515 | SSLerr(SSL_F_SSL_CTX_USE_CERTIFICATE_FILE,ERR_R_SYS_LIB); | ||
516 | goto end; | ||
517 | } | ||
518 | if (type == SSL_FILETYPE_ASN1) | ||
519 | { | ||
520 | j=ERR_R_ASN1_LIB; | ||
521 | x=d2i_X509_bio(in,NULL); | ||
522 | } | ||
523 | else if (type == SSL_FILETYPE_PEM) | ||
524 | { | ||
525 | j=ERR_R_PEM_LIB; | ||
526 | x=PEM_read_bio_X509(in,NULL,ctx->default_passwd_callback,ctx->default_passwd_callback_userdata); | ||
527 | } | ||
528 | else | ||
529 | { | ||
530 | SSLerr(SSL_F_SSL_CTX_USE_CERTIFICATE_FILE,SSL_R_BAD_SSL_FILETYPE); | ||
531 | goto end; | ||
532 | } | ||
533 | |||
534 | if (x == NULL) | ||
535 | { | ||
536 | SSLerr(SSL_F_SSL_CTX_USE_CERTIFICATE_FILE,j); | ||
537 | goto end; | ||
538 | } | ||
539 | |||
540 | ret=SSL_CTX_use_certificate(ctx,x); | ||
541 | end: | ||
542 | if (x != NULL) X509_free(x); | ||
543 | if (in != NULL) BIO_free(in); | ||
544 | return(ret); | ||
545 | } | ||
546 | #endif | ||
547 | |||
548 | int SSL_CTX_use_certificate_ASN1(SSL_CTX *ctx, int len, unsigned char *d) | ||
549 | { | ||
550 | X509 *x; | ||
551 | int ret; | ||
552 | |||
553 | x=d2i_X509(NULL,&d,(long)len); | ||
554 | if (x == NULL) | ||
555 | { | ||
556 | SSLerr(SSL_F_SSL_CTX_USE_CERTIFICATE_ASN1,ERR_R_ASN1_LIB); | ||
557 | return(0); | ||
558 | } | ||
559 | |||
560 | ret=SSL_CTX_use_certificate(ctx,x); | ||
561 | X509_free(x); | ||
562 | return(ret); | ||
563 | } | ||
564 | |||
565 | #ifndef OPENSSL_NO_RSA | ||
566 | int SSL_CTX_use_RSAPrivateKey(SSL_CTX *ctx, RSA *rsa) | ||
567 | { | ||
568 | int ret; | ||
569 | EVP_PKEY *pkey; | ||
570 | |||
571 | if (rsa == NULL) | ||
572 | { | ||
573 | SSLerr(SSL_F_SSL_CTX_USE_RSAPRIVATEKEY,ERR_R_PASSED_NULL_PARAMETER); | ||
574 | return(0); | ||
575 | } | ||
576 | if (!ssl_cert_inst(&ctx->cert)) | ||
577 | { | ||
578 | SSLerr(SSL_F_SSL_CTX_USE_RSAPRIVATEKEY,ERR_R_MALLOC_FAILURE); | ||
579 | return(0); | ||
580 | } | ||
581 | if ((pkey=EVP_PKEY_new()) == NULL) | ||
582 | { | ||
583 | SSLerr(SSL_F_SSL_CTX_USE_RSAPRIVATEKEY,ERR_R_EVP_LIB); | ||
584 | return(0); | ||
585 | } | ||
586 | |||
587 | RSA_up_ref(rsa); | ||
588 | EVP_PKEY_assign_RSA(pkey,rsa); | ||
589 | |||
590 | ret=ssl_set_pkey(ctx->cert, pkey); | ||
591 | EVP_PKEY_free(pkey); | ||
592 | return(ret); | ||
593 | } | ||
594 | |||
595 | #ifndef OPENSSL_NO_STDIO | ||
596 | int SSL_CTX_use_RSAPrivateKey_file(SSL_CTX *ctx, const char *file, int type) | ||
597 | { | ||
598 | int j,ret=0; | ||
599 | BIO *in; | ||
600 | RSA *rsa=NULL; | ||
601 | |||
602 | in=BIO_new(BIO_s_file_internal()); | ||
603 | if (in == NULL) | ||
604 | { | ||
605 | SSLerr(SSL_F_SSL_CTX_USE_RSAPRIVATEKEY_FILE,ERR_R_BUF_LIB); | ||
606 | goto end; | ||
607 | } | ||
608 | |||
609 | if (BIO_read_filename(in,file) <= 0) | ||
610 | { | ||
611 | SSLerr(SSL_F_SSL_CTX_USE_RSAPRIVATEKEY_FILE,ERR_R_SYS_LIB); | ||
612 | goto end; | ||
613 | } | ||
614 | if (type == SSL_FILETYPE_ASN1) | ||
615 | { | ||
616 | j=ERR_R_ASN1_LIB; | ||
617 | rsa=d2i_RSAPrivateKey_bio(in,NULL); | ||
618 | } | ||
619 | else if (type == SSL_FILETYPE_PEM) | ||
620 | { | ||
621 | j=ERR_R_PEM_LIB; | ||
622 | rsa=PEM_read_bio_RSAPrivateKey(in,NULL, | ||
623 | ctx->default_passwd_callback,ctx->default_passwd_callback_userdata); | ||
624 | } | ||
625 | else | ||
626 | { | ||
627 | SSLerr(SSL_F_SSL_CTX_USE_RSAPRIVATEKEY_FILE,SSL_R_BAD_SSL_FILETYPE); | ||
628 | goto end; | ||
629 | } | ||
630 | if (rsa == NULL) | ||
631 | { | ||
632 | SSLerr(SSL_F_SSL_CTX_USE_RSAPRIVATEKEY_FILE,j); | ||
633 | goto end; | ||
634 | } | ||
635 | ret=SSL_CTX_use_RSAPrivateKey(ctx,rsa); | ||
636 | RSA_free(rsa); | ||
637 | end: | ||
638 | if (in != NULL) BIO_free(in); | ||
639 | return(ret); | ||
640 | } | ||
641 | #endif | ||
642 | |||
643 | int SSL_CTX_use_RSAPrivateKey_ASN1(SSL_CTX *ctx, unsigned char *d, long len) | ||
644 | { | ||
645 | int ret; | ||
646 | const unsigned char *p; | ||
647 | RSA *rsa; | ||
648 | |||
649 | p=d; | ||
650 | if ((rsa=d2i_RSAPrivateKey(NULL,&p,(long)len)) == NULL) | ||
651 | { | ||
652 | SSLerr(SSL_F_SSL_CTX_USE_RSAPRIVATEKEY_ASN1,ERR_R_ASN1_LIB); | ||
653 | return(0); | ||
654 | } | ||
655 | |||
656 | ret=SSL_CTX_use_RSAPrivateKey(ctx,rsa); | ||
657 | RSA_free(rsa); | ||
658 | return(ret); | ||
659 | } | ||
660 | #endif /* !OPENSSL_NO_RSA */ | ||
661 | |||
662 | int SSL_CTX_use_PrivateKey(SSL_CTX *ctx, EVP_PKEY *pkey) | ||
663 | { | ||
664 | if (pkey == NULL) | ||
665 | { | ||
666 | SSLerr(SSL_F_SSL_CTX_USE_PRIVATEKEY,ERR_R_PASSED_NULL_PARAMETER); | ||
667 | return(0); | ||
668 | } | ||
669 | if (!ssl_cert_inst(&ctx->cert)) | ||
670 | { | ||
671 | SSLerr(SSL_F_SSL_CTX_USE_PRIVATEKEY,ERR_R_MALLOC_FAILURE); | ||
672 | return(0); | ||
673 | } | ||
674 | return(ssl_set_pkey(ctx->cert,pkey)); | ||
675 | } | ||
676 | |||
677 | #ifndef OPENSSL_NO_STDIO | ||
678 | int SSL_CTX_use_PrivateKey_file(SSL_CTX *ctx, const char *file, int type) | ||
679 | { | ||
680 | int j,ret=0; | ||
681 | BIO *in; | ||
682 | EVP_PKEY *pkey=NULL; | ||
683 | |||
684 | in=BIO_new(BIO_s_file_internal()); | ||
685 | if (in == NULL) | ||
686 | { | ||
687 | SSLerr(SSL_F_SSL_CTX_USE_PRIVATEKEY_FILE,ERR_R_BUF_LIB); | ||
688 | goto end; | ||
689 | } | ||
690 | |||
691 | if (BIO_read_filename(in,file) <= 0) | ||
692 | { | ||
693 | SSLerr(SSL_F_SSL_CTX_USE_PRIVATEKEY_FILE,ERR_R_SYS_LIB); | ||
694 | goto end; | ||
695 | } | ||
696 | if (type == SSL_FILETYPE_PEM) | ||
697 | { | ||
698 | j=ERR_R_PEM_LIB; | ||
699 | pkey=PEM_read_bio_PrivateKey(in,NULL, | ||
700 | ctx->default_passwd_callback,ctx->default_passwd_callback_userdata); | ||
701 | } | ||
702 | else | ||
703 | { | ||
704 | SSLerr(SSL_F_SSL_CTX_USE_PRIVATEKEY_FILE,SSL_R_BAD_SSL_FILETYPE); | ||
705 | goto end; | ||
706 | } | ||
707 | if (pkey == NULL) | ||
708 | { | ||
709 | SSLerr(SSL_F_SSL_CTX_USE_PRIVATEKEY_FILE,j); | ||
710 | goto end; | ||
711 | } | ||
712 | ret=SSL_CTX_use_PrivateKey(ctx,pkey); | ||
713 | EVP_PKEY_free(pkey); | ||
714 | end: | ||
715 | if (in != NULL) BIO_free(in); | ||
716 | return(ret); | ||
717 | } | ||
718 | #endif | ||
719 | |||
720 | int SSL_CTX_use_PrivateKey_ASN1(int type, SSL_CTX *ctx, unsigned char *d, | ||
721 | long len) | ||
722 | { | ||
723 | int ret; | ||
724 | unsigned char *p; | ||
725 | EVP_PKEY *pkey; | ||
726 | |||
727 | p=d; | ||
728 | if ((pkey=d2i_PrivateKey(type,NULL,&p,(long)len)) == NULL) | ||
729 | { | ||
730 | SSLerr(SSL_F_SSL_CTX_USE_PRIVATEKEY_ASN1,ERR_R_ASN1_LIB); | ||
731 | return(0); | ||
732 | } | ||
733 | |||
734 | ret=SSL_CTX_use_PrivateKey(ctx,pkey); | ||
735 | EVP_PKEY_free(pkey); | ||
736 | return(ret); | ||
737 | } | ||
738 | |||
739 | |||
740 | #ifndef OPENSSL_NO_STDIO | ||
741 | /* Read a file that contains our certificate in "PEM" format, | ||
742 | * possibly followed by a sequence of CA certificates that should be | ||
743 | * sent to the peer in the Certificate message. | ||
744 | */ | ||
745 | int SSL_CTX_use_certificate_chain_file(SSL_CTX *ctx, const char *file) | ||
746 | { | ||
747 | BIO *in; | ||
748 | int ret=0; | ||
749 | X509 *x=NULL; | ||
750 | |||
751 | in=BIO_new(BIO_s_file_internal()); | ||
752 | if (in == NULL) | ||
753 | { | ||
754 | SSLerr(SSL_F_SSL_CTX_USE_CERTIFICATE_CHAIN_FILE,ERR_R_BUF_LIB); | ||
755 | goto end; | ||
756 | } | ||
757 | |||
758 | if (BIO_read_filename(in,file) <= 0) | ||
759 | { | ||
760 | SSLerr(SSL_F_SSL_CTX_USE_CERTIFICATE_CHAIN_FILE,ERR_R_SYS_LIB); | ||
761 | goto end; | ||
762 | } | ||
763 | |||
764 | x=PEM_read_bio_X509(in,NULL,ctx->default_passwd_callback,ctx->default_passwd_callback_userdata); | ||
765 | if (x == NULL) | ||
766 | { | ||
767 | SSLerr(SSL_F_SSL_CTX_USE_CERTIFICATE_CHAIN_FILE,ERR_R_PEM_LIB); | ||
768 | goto end; | ||
769 | } | ||
770 | |||
771 | ret=SSL_CTX_use_certificate(ctx,x); | ||
772 | if (ERR_peek_error() != 0) | ||
773 | ret = 0; /* Key/certificate mismatch doesn't imply ret==0 ... */ | ||
774 | if (ret) | ||
775 | { | ||
776 | /* If we could set up our certificate, now proceed to | ||
777 | * the CA certificates. | ||
778 | */ | ||
779 | X509 *ca; | ||
780 | int r; | ||
781 | unsigned long err; | ||
782 | |||
783 | if (ctx->extra_certs != NULL) | ||
784 | { | ||
785 | sk_X509_pop_free(ctx->extra_certs, X509_free); | ||
786 | ctx->extra_certs = NULL; | ||
787 | } | ||
788 | |||
789 | while ((ca = PEM_read_bio_X509(in,NULL,ctx->default_passwd_callback,ctx->default_passwd_callback_userdata)) | ||
790 | != NULL) | ||
791 | { | ||
792 | r = SSL_CTX_add_extra_chain_cert(ctx, ca); | ||
793 | if (!r) | ||
794 | { | ||
795 | X509_free(ca); | ||
796 | ret = 0; | ||
797 | goto end; | ||
798 | } | ||
799 | /* Note that we must not free r if it was successfully | ||
800 | * added to the chain (while we must free the main | ||
801 | * certificate, since its reference count is increased | ||
802 | * by SSL_CTX_use_certificate). */ | ||
803 | } | ||
804 | /* When the while loop ends, it's usually just EOF. */ | ||
805 | err = ERR_peek_last_error(); | ||
806 | if (ERR_GET_LIB(err) == ERR_LIB_PEM && ERR_GET_REASON(err) == PEM_R_NO_START_LINE) | ||
807 | (void)ERR_get_error(); | ||
808 | else | ||
809 | ret = 0; /* some real error */ | ||
810 | } | ||
811 | |||
812 | end: | ||
813 | if (x != NULL) X509_free(x); | ||
814 | if (in != NULL) BIO_free(in); | ||
815 | return(ret); | ||
816 | } | ||
817 | #endif | ||
diff --git a/src/lib/libssl/ssl_sess.c b/src/lib/libssl/ssl_sess.c deleted file mode 100644 index 7016c87d3b..0000000000 --- a/src/lib/libssl/ssl_sess.c +++ /dev/null | |||
@@ -1,754 +0,0 @@ | |||
1 | /* ssl/ssl_sess.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 <openssl/lhash.h> | ||
61 | #include <openssl/rand.h> | ||
62 | #include "ssl_locl.h" | ||
63 | |||
64 | static void SSL_SESSION_list_remove(SSL_CTX *ctx, SSL_SESSION *s); | ||
65 | static void SSL_SESSION_list_add(SSL_CTX *ctx,SSL_SESSION *s); | ||
66 | static int remove_session_lock(SSL_CTX *ctx, SSL_SESSION *c, int lck); | ||
67 | |||
68 | SSL_SESSION *SSL_get_session(SSL *ssl) | ||
69 | /* aka SSL_get0_session; gets 0 objects, just returns a copy of the pointer */ | ||
70 | { | ||
71 | return(ssl->session); | ||
72 | } | ||
73 | |||
74 | SSL_SESSION *SSL_get1_session(SSL *ssl) | ||
75 | /* variant of SSL_get_session: caller really gets something */ | ||
76 | { | ||
77 | SSL_SESSION *sess; | ||
78 | /* Need to lock this all up rather than just use CRYPTO_add so that | ||
79 | * somebody doesn't free ssl->session between when we check it's | ||
80 | * non-null and when we up the reference count. */ | ||
81 | CRYPTO_w_lock(CRYPTO_LOCK_SSL_SESSION); | ||
82 | sess = ssl->session; | ||
83 | if(sess) | ||
84 | sess->references++; | ||
85 | CRYPTO_w_unlock(CRYPTO_LOCK_SSL_SESSION); | ||
86 | return(sess); | ||
87 | } | ||
88 | |||
89 | int SSL_SESSION_get_ex_new_index(long argl, void *argp, CRYPTO_EX_new *new_func, | ||
90 | CRYPTO_EX_dup *dup_func, CRYPTO_EX_free *free_func) | ||
91 | { | ||
92 | return CRYPTO_get_ex_new_index(CRYPTO_EX_INDEX_SSL_SESSION, argl, argp, | ||
93 | new_func, dup_func, free_func); | ||
94 | } | ||
95 | |||
96 | int SSL_SESSION_set_ex_data(SSL_SESSION *s, int idx, void *arg) | ||
97 | { | ||
98 | return(CRYPTO_set_ex_data(&s->ex_data,idx,arg)); | ||
99 | } | ||
100 | |||
101 | void *SSL_SESSION_get_ex_data(SSL_SESSION *s, int idx) | ||
102 | { | ||
103 | return(CRYPTO_get_ex_data(&s->ex_data,idx)); | ||
104 | } | ||
105 | |||
106 | SSL_SESSION *SSL_SESSION_new(void) | ||
107 | { | ||
108 | SSL_SESSION *ss; | ||
109 | |||
110 | ss=(SSL_SESSION *)OPENSSL_malloc(sizeof(SSL_SESSION)); | ||
111 | if (ss == NULL) | ||
112 | { | ||
113 | SSLerr(SSL_F_SSL_SESSION_NEW,ERR_R_MALLOC_FAILURE); | ||
114 | return(0); | ||
115 | } | ||
116 | memset(ss,0,sizeof(SSL_SESSION)); | ||
117 | |||
118 | ss->verify_result = 1; /* avoid 0 (= X509_V_OK) just in case */ | ||
119 | ss->references=1; | ||
120 | ss->timeout=60*5+4; /* 5 minute timeout by default */ | ||
121 | ss->time=time(NULL); | ||
122 | ss->prev=NULL; | ||
123 | ss->next=NULL; | ||
124 | ss->compress_meth=0; | ||
125 | CRYPTO_new_ex_data(CRYPTO_EX_INDEX_SSL_SESSION, ss, &ss->ex_data); | ||
126 | return(ss); | ||
127 | } | ||
128 | |||
129 | /* Even with SSLv2, we have 16 bytes (128 bits) of session ID space. SSLv3/TLSv1 | ||
130 | * has 32 bytes (256 bits). As such, filling the ID with random gunk repeatedly | ||
131 | * until we have no conflict is going to complete in one iteration pretty much | ||
132 | * "most" of the time (btw: understatement). So, if it takes us 10 iterations | ||
133 | * and we still can't avoid a conflict - well that's a reasonable point to call | ||
134 | * it quits. Either the RAND code is broken or someone is trying to open roughly | ||
135 | * very close to 2^128 (or 2^256) SSL sessions to our server. How you might | ||
136 | * store that many sessions is perhaps a more interesting question ... */ | ||
137 | |||
138 | #define MAX_SESS_ID_ATTEMPTS 10 | ||
139 | static int def_generate_session_id(const SSL *ssl, unsigned char *id, | ||
140 | unsigned int *id_len) | ||
141 | { | ||
142 | unsigned int retry = 0; | ||
143 | do | ||
144 | RAND_pseudo_bytes(id, *id_len); | ||
145 | while(SSL_has_matching_session_id(ssl, id, *id_len) && | ||
146 | (++retry < MAX_SESS_ID_ATTEMPTS)); | ||
147 | if(retry < MAX_SESS_ID_ATTEMPTS) | ||
148 | return 1; | ||
149 | /* else - woops a session_id match */ | ||
150 | /* XXX We should also check the external cache -- | ||
151 | * but the probability of a collision is negligible, and | ||
152 | * we could not prevent the concurrent creation of sessions | ||
153 | * with identical IDs since we currently don't have means | ||
154 | * to atomically check whether a session ID already exists | ||
155 | * and make a reservation for it if it does not | ||
156 | * (this problem applies to the internal cache as well). | ||
157 | */ | ||
158 | return 0; | ||
159 | } | ||
160 | |||
161 | int ssl_get_new_session(SSL *s, int session) | ||
162 | { | ||
163 | /* This gets used by clients and servers. */ | ||
164 | |||
165 | unsigned int tmp; | ||
166 | SSL_SESSION *ss=NULL; | ||
167 | GEN_SESSION_CB cb = def_generate_session_id; | ||
168 | |||
169 | if ((ss=SSL_SESSION_new()) == NULL) return(0); | ||
170 | |||
171 | /* If the context has a default timeout, use it */ | ||
172 | if (s->ctx->session_timeout == 0) | ||
173 | ss->timeout=SSL_get_default_timeout(s); | ||
174 | else | ||
175 | ss->timeout=s->ctx->session_timeout; | ||
176 | |||
177 | if (s->session != NULL) | ||
178 | { | ||
179 | SSL_SESSION_free(s->session); | ||
180 | s->session=NULL; | ||
181 | } | ||
182 | |||
183 | if (session) | ||
184 | { | ||
185 | if (s->version == SSL2_VERSION) | ||
186 | { | ||
187 | ss->ssl_version=SSL2_VERSION; | ||
188 | ss->session_id_length=SSL2_SSL_SESSION_ID_LENGTH; | ||
189 | } | ||
190 | else if (s->version == SSL3_VERSION) | ||
191 | { | ||
192 | ss->ssl_version=SSL3_VERSION; | ||
193 | ss->session_id_length=SSL3_SSL_SESSION_ID_LENGTH; | ||
194 | } | ||
195 | else if (s->version == TLS1_VERSION) | ||
196 | { | ||
197 | ss->ssl_version=TLS1_VERSION; | ||
198 | ss->session_id_length=SSL3_SSL_SESSION_ID_LENGTH; | ||
199 | } | ||
200 | else | ||
201 | { | ||
202 | SSLerr(SSL_F_SSL_GET_NEW_SESSION,SSL_R_UNSUPPORTED_SSL_VERSION); | ||
203 | SSL_SESSION_free(ss); | ||
204 | return(0); | ||
205 | } | ||
206 | /* Choose which callback will set the session ID */ | ||
207 | CRYPTO_r_lock(CRYPTO_LOCK_SSL_CTX); | ||
208 | if(s->generate_session_id) | ||
209 | cb = s->generate_session_id; | ||
210 | else if(s->ctx->generate_session_id) | ||
211 | cb = s->ctx->generate_session_id; | ||
212 | CRYPTO_r_unlock(CRYPTO_LOCK_SSL_CTX); | ||
213 | /* Choose a session ID */ | ||
214 | tmp = ss->session_id_length; | ||
215 | if(!cb(s, ss->session_id, &tmp)) | ||
216 | { | ||
217 | /* The callback failed */ | ||
218 | SSLerr(SSL_F_SSL_GET_NEW_SESSION, | ||
219 | SSL_R_SSL_SESSION_ID_CALLBACK_FAILED); | ||
220 | SSL_SESSION_free(ss); | ||
221 | return(0); | ||
222 | } | ||
223 | /* Don't allow the callback to set the session length to zero. | ||
224 | * nor set it higher than it was. */ | ||
225 | if(!tmp || (tmp > ss->session_id_length)) | ||
226 | { | ||
227 | /* The callback set an illegal length */ | ||
228 | SSLerr(SSL_F_SSL_GET_NEW_SESSION, | ||
229 | SSL_R_SSL_SESSION_ID_HAS_BAD_LENGTH); | ||
230 | SSL_SESSION_free(ss); | ||
231 | return(0); | ||
232 | } | ||
233 | /* If the session length was shrunk and we're SSLv2, pad it */ | ||
234 | if((tmp < ss->session_id_length) && (s->version == SSL2_VERSION)) | ||
235 | memset(ss->session_id + tmp, 0, ss->session_id_length - tmp); | ||
236 | else | ||
237 | ss->session_id_length = tmp; | ||
238 | /* Finally, check for a conflict */ | ||
239 | if(SSL_has_matching_session_id(s, ss->session_id, | ||
240 | ss->session_id_length)) | ||
241 | { | ||
242 | SSLerr(SSL_F_SSL_GET_NEW_SESSION, | ||
243 | SSL_R_SSL_SESSION_ID_CONFLICT); | ||
244 | SSL_SESSION_free(ss); | ||
245 | return(0); | ||
246 | } | ||
247 | } | ||
248 | else | ||
249 | { | ||
250 | ss->session_id_length=0; | ||
251 | } | ||
252 | |||
253 | if (s->sid_ctx_length > sizeof ss->sid_ctx) | ||
254 | { | ||
255 | SSLerr(SSL_F_SSL_GET_NEW_SESSION, ERR_R_INTERNAL_ERROR); | ||
256 | SSL_SESSION_free(ss); | ||
257 | return 0; | ||
258 | } | ||
259 | memcpy(ss->sid_ctx,s->sid_ctx,s->sid_ctx_length); | ||
260 | ss->sid_ctx_length=s->sid_ctx_length; | ||
261 | s->session=ss; | ||
262 | ss->ssl_version=s->version; | ||
263 | ss->verify_result = X509_V_OK; | ||
264 | |||
265 | return(1); | ||
266 | } | ||
267 | |||
268 | int ssl_get_prev_session(SSL *s, unsigned char *session_id, int len) | ||
269 | { | ||
270 | /* This is used only by servers. */ | ||
271 | |||
272 | SSL_SESSION *ret=NULL,data; | ||
273 | int fatal = 0; | ||
274 | |||
275 | data.ssl_version=s->version; | ||
276 | data.session_id_length=len; | ||
277 | if (len > SSL_MAX_SSL_SESSION_ID_LENGTH) | ||
278 | goto err; | ||
279 | memcpy(data.session_id,session_id,len); | ||
280 | |||
281 | if (!(s->ctx->session_cache_mode & SSL_SESS_CACHE_NO_INTERNAL_LOOKUP)) | ||
282 | { | ||
283 | CRYPTO_r_lock(CRYPTO_LOCK_SSL_CTX); | ||
284 | ret=(SSL_SESSION *)lh_retrieve(s->ctx->sessions,&data); | ||
285 | if (ret != NULL) | ||
286 | /* don't allow other threads to steal it: */ | ||
287 | CRYPTO_add(&ret->references,1,CRYPTO_LOCK_SSL_SESSION); | ||
288 | CRYPTO_r_unlock(CRYPTO_LOCK_SSL_CTX); | ||
289 | } | ||
290 | |||
291 | if (ret == NULL) | ||
292 | { | ||
293 | int copy=1; | ||
294 | |||
295 | s->ctx->stats.sess_miss++; | ||
296 | ret=NULL; | ||
297 | if (s->ctx->get_session_cb != NULL | ||
298 | && (ret=s->ctx->get_session_cb(s,session_id,len,©)) | ||
299 | != NULL) | ||
300 | { | ||
301 | s->ctx->stats.sess_cb_hit++; | ||
302 | |||
303 | /* Increment reference count now if the session callback | ||
304 | * asks us to do so (note that if the session structures | ||
305 | * returned by the callback are shared between threads, | ||
306 | * it must handle the reference count itself [i.e. copy == 0], | ||
307 | * or things won't be thread-safe). */ | ||
308 | if (copy) | ||
309 | CRYPTO_add(&ret->references,1,CRYPTO_LOCK_SSL_SESSION); | ||
310 | |||
311 | /* Add the externally cached session to the internal | ||
312 | * cache as well if and only if we are supposed to. */ | ||
313 | if(!(s->ctx->session_cache_mode & SSL_SESS_CACHE_NO_INTERNAL_STORE)) | ||
314 | /* The following should not return 1, otherwise, | ||
315 | * things are very strange */ | ||
316 | SSL_CTX_add_session(s->ctx,ret); | ||
317 | } | ||
318 | if (ret == NULL) | ||
319 | goto err; | ||
320 | } | ||
321 | |||
322 | /* Now ret is non-NULL, and we own one of its reference counts. */ | ||
323 | |||
324 | if((s->verify_mode&SSL_VERIFY_PEER) | ||
325 | && (!s->sid_ctx_length || ret->sid_ctx_length != s->sid_ctx_length | ||
326 | || memcmp(ret->sid_ctx,s->sid_ctx,ret->sid_ctx_length))) | ||
327 | { | ||
328 | /* We've found the session named by the client, but we don't | ||
329 | * want to use it in this context. */ | ||
330 | |||
331 | if (s->sid_ctx_length == 0) | ||
332 | { | ||
333 | /* application should have used SSL[_CTX]_set_session_id_context | ||
334 | * -- we could tolerate this and just pretend we never heard | ||
335 | * of this session, but then applications could effectively | ||
336 | * disable the session cache by accident without anyone noticing */ | ||
337 | |||
338 | SSLerr(SSL_F_SSL_GET_PREV_SESSION,SSL_R_SESSION_ID_CONTEXT_UNINITIALIZED); | ||
339 | fatal = 1; | ||
340 | goto err; | ||
341 | } | ||
342 | else | ||
343 | { | ||
344 | #if 0 /* The client cannot always know when a session is not appropriate, | ||
345 | * so we shouldn't generate an error message. */ | ||
346 | |||
347 | SSLerr(SSL_F_SSL_GET_PREV_SESSION,SSL_R_ATTEMPT_TO_REUSE_SESSION_IN_DIFFERENT_CONTEXT); | ||
348 | #endif | ||
349 | goto err; /* treat like cache miss */ | ||
350 | } | ||
351 | } | ||
352 | |||
353 | if (ret->cipher == NULL) | ||
354 | { | ||
355 | unsigned char buf[5],*p; | ||
356 | unsigned long l; | ||
357 | |||
358 | p=buf; | ||
359 | l=ret->cipher_id; | ||
360 | l2n(l,p); | ||
361 | if ((ret->ssl_version>>8) == SSL3_VERSION_MAJOR) | ||
362 | ret->cipher=ssl_get_cipher_by_char(s,&(buf[2])); | ||
363 | else | ||
364 | ret->cipher=ssl_get_cipher_by_char(s,&(buf[1])); | ||
365 | if (ret->cipher == NULL) | ||
366 | goto err; | ||
367 | } | ||
368 | |||
369 | |||
370 | #if 0 /* This is way too late. */ | ||
371 | |||
372 | /* If a thread got the session, then 'swaped', and another got | ||
373 | * it and then due to a time-out decided to 'OPENSSL_free' it we could | ||
374 | * be in trouble. So I'll increment it now, then double decrement | ||
375 | * later - am I speaking rubbish?. */ | ||
376 | CRYPTO_add(&ret->references,1,CRYPTO_LOCK_SSL_SESSION); | ||
377 | #endif | ||
378 | |||
379 | if ((long)(ret->time+ret->timeout) < (long)time(NULL)) /* timeout */ | ||
380 | { | ||
381 | s->ctx->stats.sess_timeout++; | ||
382 | /* remove it from the cache */ | ||
383 | SSL_CTX_remove_session(s->ctx,ret); | ||
384 | goto err; | ||
385 | } | ||
386 | |||
387 | s->ctx->stats.sess_hit++; | ||
388 | |||
389 | /* ret->time=time(NULL); */ /* rezero timeout? */ | ||
390 | /* again, just leave the session | ||
391 | * if it is the same session, we have just incremented and | ||
392 | * then decremented the reference count :-) */ | ||
393 | if (s->session != NULL) | ||
394 | SSL_SESSION_free(s->session); | ||
395 | s->session=ret; | ||
396 | s->verify_result = s->session->verify_result; | ||
397 | return(1); | ||
398 | |||
399 | err: | ||
400 | if (ret != NULL) | ||
401 | SSL_SESSION_free(ret); | ||
402 | if (fatal) | ||
403 | return -1; | ||
404 | else | ||
405 | return 0; | ||
406 | } | ||
407 | |||
408 | int SSL_CTX_add_session(SSL_CTX *ctx, SSL_SESSION *c) | ||
409 | { | ||
410 | int ret=0; | ||
411 | SSL_SESSION *s; | ||
412 | |||
413 | /* add just 1 reference count for the SSL_CTX's session cache | ||
414 | * even though it has two ways of access: each session is in a | ||
415 | * doubly linked list and an lhash */ | ||
416 | CRYPTO_add(&c->references,1,CRYPTO_LOCK_SSL_SESSION); | ||
417 | /* if session c is in already in cache, we take back the increment later */ | ||
418 | |||
419 | CRYPTO_w_lock(CRYPTO_LOCK_SSL_CTX); | ||
420 | s=(SSL_SESSION *)lh_insert(ctx->sessions,c); | ||
421 | |||
422 | /* s != NULL iff we already had a session with the given PID. | ||
423 | * In this case, s == c should hold (then we did not really modify | ||
424 | * ctx->sessions), or we're in trouble. */ | ||
425 | if (s != NULL && s != c) | ||
426 | { | ||
427 | /* We *are* in trouble ... */ | ||
428 | SSL_SESSION_list_remove(ctx,s); | ||
429 | SSL_SESSION_free(s); | ||
430 | /* ... so pretend the other session did not exist in cache | ||
431 | * (we cannot handle two SSL_SESSION structures with identical | ||
432 | * session ID in the same cache, which could happen e.g. when | ||
433 | * two threads concurrently obtain the same session from an external | ||
434 | * cache) */ | ||
435 | s = NULL; | ||
436 | } | ||
437 | |||
438 | /* Put at the head of the queue unless it is already in the cache */ | ||
439 | if (s == NULL) | ||
440 | SSL_SESSION_list_add(ctx,c); | ||
441 | |||
442 | if (s != NULL) | ||
443 | { | ||
444 | /* existing cache entry -- decrement previously incremented reference | ||
445 | * count because it already takes into account the cache */ | ||
446 | |||
447 | SSL_SESSION_free(s); /* s == c */ | ||
448 | ret=0; | ||
449 | } | ||
450 | else | ||
451 | { | ||
452 | /* new cache entry -- remove old ones if cache has become too large */ | ||
453 | |||
454 | ret=1; | ||
455 | |||
456 | if (SSL_CTX_sess_get_cache_size(ctx) > 0) | ||
457 | { | ||
458 | while (SSL_CTX_sess_number(ctx) > | ||
459 | SSL_CTX_sess_get_cache_size(ctx)) | ||
460 | { | ||
461 | if (!remove_session_lock(ctx, | ||
462 | ctx->session_cache_tail, 0)) | ||
463 | break; | ||
464 | else | ||
465 | ctx->stats.sess_cache_full++; | ||
466 | } | ||
467 | } | ||
468 | } | ||
469 | CRYPTO_w_unlock(CRYPTO_LOCK_SSL_CTX); | ||
470 | return(ret); | ||
471 | } | ||
472 | |||
473 | int SSL_CTX_remove_session(SSL_CTX *ctx, SSL_SESSION *c) | ||
474 | { | ||
475 | return remove_session_lock(ctx, c, 1); | ||
476 | } | ||
477 | |||
478 | static int remove_session_lock(SSL_CTX *ctx, SSL_SESSION *c, int lck) | ||
479 | { | ||
480 | SSL_SESSION *r; | ||
481 | int ret=0; | ||
482 | |||
483 | if ((c != NULL) && (c->session_id_length != 0)) | ||
484 | { | ||
485 | if(lck) CRYPTO_w_lock(CRYPTO_LOCK_SSL_CTX); | ||
486 | if ((r = (SSL_SESSION *)lh_retrieve(ctx->sessions,c)) == c) | ||
487 | { | ||
488 | ret=1; | ||
489 | r=(SSL_SESSION *)lh_delete(ctx->sessions,c); | ||
490 | SSL_SESSION_list_remove(ctx,c); | ||
491 | } | ||
492 | |||
493 | if(lck) CRYPTO_w_unlock(CRYPTO_LOCK_SSL_CTX); | ||
494 | |||
495 | if (ret) | ||
496 | { | ||
497 | r->not_resumable=1; | ||
498 | if (ctx->remove_session_cb != NULL) | ||
499 | ctx->remove_session_cb(ctx,r); | ||
500 | SSL_SESSION_free(r); | ||
501 | } | ||
502 | } | ||
503 | else | ||
504 | ret=0; | ||
505 | return(ret); | ||
506 | } | ||
507 | |||
508 | void SSL_SESSION_free(SSL_SESSION *ss) | ||
509 | { | ||
510 | int i; | ||
511 | |||
512 | if(ss == NULL) | ||
513 | return; | ||
514 | |||
515 | i=CRYPTO_add(&ss->references,-1,CRYPTO_LOCK_SSL_SESSION); | ||
516 | #ifdef REF_PRINT | ||
517 | REF_PRINT("SSL_SESSION",ss); | ||
518 | #endif | ||
519 | if (i > 0) return; | ||
520 | #ifdef REF_CHECK | ||
521 | if (i < 0) | ||
522 | { | ||
523 | fprintf(stderr,"SSL_SESSION_free, bad reference count\n"); | ||
524 | abort(); /* ok */ | ||
525 | } | ||
526 | #endif | ||
527 | |||
528 | CRYPTO_free_ex_data(CRYPTO_EX_INDEX_SSL_SESSION, ss, &ss->ex_data); | ||
529 | |||
530 | OPENSSL_cleanse(ss->key_arg,sizeof ss->key_arg); | ||
531 | OPENSSL_cleanse(ss->master_key,sizeof ss->master_key); | ||
532 | OPENSSL_cleanse(ss->session_id,sizeof ss->session_id); | ||
533 | if (ss->sess_cert != NULL) ssl_sess_cert_free(ss->sess_cert); | ||
534 | if (ss->peer != NULL) X509_free(ss->peer); | ||
535 | if (ss->ciphers != NULL) sk_SSL_CIPHER_free(ss->ciphers); | ||
536 | OPENSSL_cleanse(ss,sizeof(*ss)); | ||
537 | OPENSSL_free(ss); | ||
538 | } | ||
539 | |||
540 | int SSL_set_session(SSL *s, SSL_SESSION *session) | ||
541 | { | ||
542 | int ret=0; | ||
543 | SSL_METHOD *meth; | ||
544 | |||
545 | if (session != NULL) | ||
546 | { | ||
547 | meth=s->ctx->method->get_ssl_method(session->ssl_version); | ||
548 | if (meth == NULL) | ||
549 | meth=s->method->get_ssl_method(session->ssl_version); | ||
550 | if (meth == NULL) | ||
551 | { | ||
552 | SSLerr(SSL_F_SSL_SET_SESSION,SSL_R_UNABLE_TO_FIND_SSL_METHOD); | ||
553 | return(0); | ||
554 | } | ||
555 | |||
556 | if (meth != s->method) | ||
557 | { | ||
558 | if (!SSL_set_ssl_method(s,meth)) | ||
559 | return(0); | ||
560 | if (s->ctx->session_timeout == 0) | ||
561 | session->timeout=SSL_get_default_timeout(s); | ||
562 | else | ||
563 | session->timeout=s->ctx->session_timeout; | ||
564 | } | ||
565 | |||
566 | #ifndef OPENSSL_NO_KRB5 | ||
567 | if (s->kssl_ctx && !s->kssl_ctx->client_princ && | ||
568 | session->krb5_client_princ_len > 0) | ||
569 | { | ||
570 | s->kssl_ctx->client_princ = (char *)malloc(session->krb5_client_princ_len + 1); | ||
571 | memcpy(s->kssl_ctx->client_princ,session->krb5_client_princ, | ||
572 | session->krb5_client_princ_len); | ||
573 | s->kssl_ctx->client_princ[session->krb5_client_princ_len] = '\0'; | ||
574 | } | ||
575 | #endif /* OPENSSL_NO_KRB5 */ | ||
576 | |||
577 | /* CRYPTO_w_lock(CRYPTO_LOCK_SSL);*/ | ||
578 | CRYPTO_add(&session->references,1,CRYPTO_LOCK_SSL_SESSION); | ||
579 | if (s->session != NULL) | ||
580 | SSL_SESSION_free(s->session); | ||
581 | s->session=session; | ||
582 | s->verify_result = s->session->verify_result; | ||
583 | /* CRYPTO_w_unlock(CRYPTO_LOCK_SSL);*/ | ||
584 | ret=1; | ||
585 | } | ||
586 | else | ||
587 | { | ||
588 | if (s->session != NULL) | ||
589 | { | ||
590 | SSL_SESSION_free(s->session); | ||
591 | s->session=NULL; | ||
592 | } | ||
593 | |||
594 | meth=s->ctx->method; | ||
595 | if (meth != s->method) | ||
596 | { | ||
597 | if (!SSL_set_ssl_method(s,meth)) | ||
598 | return(0); | ||
599 | } | ||
600 | ret=1; | ||
601 | } | ||
602 | return(ret); | ||
603 | } | ||
604 | |||
605 | long SSL_SESSION_set_timeout(SSL_SESSION *s, long t) | ||
606 | { | ||
607 | if (s == NULL) return(0); | ||
608 | s->timeout=t; | ||
609 | return(1); | ||
610 | } | ||
611 | |||
612 | long SSL_SESSION_get_timeout(SSL_SESSION *s) | ||
613 | { | ||
614 | if (s == NULL) return(0); | ||
615 | return(s->timeout); | ||
616 | } | ||
617 | |||
618 | long SSL_SESSION_get_time(SSL_SESSION *s) | ||
619 | { | ||
620 | if (s == NULL) return(0); | ||
621 | return(s->time); | ||
622 | } | ||
623 | |||
624 | long SSL_SESSION_set_time(SSL_SESSION *s, long t) | ||
625 | { | ||
626 | if (s == NULL) return(0); | ||
627 | s->time=t; | ||
628 | return(t); | ||
629 | } | ||
630 | |||
631 | long SSL_CTX_set_timeout(SSL_CTX *s, long t) | ||
632 | { | ||
633 | long l; | ||
634 | if (s == NULL) return(0); | ||
635 | l=s->session_timeout; | ||
636 | s->session_timeout=t; | ||
637 | return(l); | ||
638 | } | ||
639 | |||
640 | long SSL_CTX_get_timeout(SSL_CTX *s) | ||
641 | { | ||
642 | if (s == NULL) return(0); | ||
643 | return(s->session_timeout); | ||
644 | } | ||
645 | |||
646 | typedef struct timeout_param_st | ||
647 | { | ||
648 | SSL_CTX *ctx; | ||
649 | long time; | ||
650 | LHASH *cache; | ||
651 | } TIMEOUT_PARAM; | ||
652 | |||
653 | static void timeout(SSL_SESSION *s, TIMEOUT_PARAM *p) | ||
654 | { | ||
655 | if ((p->time == 0) || (p->time > (s->time+s->timeout))) /* timeout */ | ||
656 | { | ||
657 | /* The reason we don't call SSL_CTX_remove_session() is to | ||
658 | * save on locking overhead */ | ||
659 | lh_delete(p->cache,s); | ||
660 | SSL_SESSION_list_remove(p->ctx,s); | ||
661 | s->not_resumable=1; | ||
662 | if (p->ctx->remove_session_cb != NULL) | ||
663 | p->ctx->remove_session_cb(p->ctx,s); | ||
664 | SSL_SESSION_free(s); | ||
665 | } | ||
666 | } | ||
667 | |||
668 | static IMPLEMENT_LHASH_DOALL_ARG_FN(timeout, SSL_SESSION *, TIMEOUT_PARAM *) | ||
669 | |||
670 | void SSL_CTX_flush_sessions(SSL_CTX *s, long t) | ||
671 | { | ||
672 | unsigned long i; | ||
673 | TIMEOUT_PARAM tp; | ||
674 | |||
675 | tp.ctx=s; | ||
676 | tp.cache=s->sessions; | ||
677 | if (tp.cache == NULL) return; | ||
678 | tp.time=t; | ||
679 | CRYPTO_w_lock(CRYPTO_LOCK_SSL_CTX); | ||
680 | i=tp.cache->down_load; | ||
681 | tp.cache->down_load=0; | ||
682 | lh_doall_arg(tp.cache, LHASH_DOALL_ARG_FN(timeout), &tp); | ||
683 | tp.cache->down_load=i; | ||
684 | CRYPTO_w_unlock(CRYPTO_LOCK_SSL_CTX); | ||
685 | } | ||
686 | |||
687 | int ssl_clear_bad_session(SSL *s) | ||
688 | { | ||
689 | if ( (s->session != NULL) && | ||
690 | !(s->shutdown & SSL_SENT_SHUTDOWN) && | ||
691 | !(SSL_in_init(s) || SSL_in_before(s))) | ||
692 | { | ||
693 | SSL_CTX_remove_session(s->ctx,s->session); | ||
694 | return(1); | ||
695 | } | ||
696 | else | ||
697 | return(0); | ||
698 | } | ||
699 | |||
700 | /* locked by SSL_CTX in the calling function */ | ||
701 | static void SSL_SESSION_list_remove(SSL_CTX *ctx, SSL_SESSION *s) | ||
702 | { | ||
703 | if ((s->next == NULL) || (s->prev == NULL)) return; | ||
704 | |||
705 | if (s->next == (SSL_SESSION *)&(ctx->session_cache_tail)) | ||
706 | { /* last element in list */ | ||
707 | if (s->prev == (SSL_SESSION *)&(ctx->session_cache_head)) | ||
708 | { /* only one element in list */ | ||
709 | ctx->session_cache_head=NULL; | ||
710 | ctx->session_cache_tail=NULL; | ||
711 | } | ||
712 | else | ||
713 | { | ||
714 | ctx->session_cache_tail=s->prev; | ||
715 | s->prev->next=(SSL_SESSION *)&(ctx->session_cache_tail); | ||
716 | } | ||
717 | } | ||
718 | else | ||
719 | { | ||
720 | if (s->prev == (SSL_SESSION *)&(ctx->session_cache_head)) | ||
721 | { /* first element in list */ | ||
722 | ctx->session_cache_head=s->next; | ||
723 | s->next->prev=(SSL_SESSION *)&(ctx->session_cache_head); | ||
724 | } | ||
725 | else | ||
726 | { /* middle of list */ | ||
727 | s->next->prev=s->prev; | ||
728 | s->prev->next=s->next; | ||
729 | } | ||
730 | } | ||
731 | s->prev=s->next=NULL; | ||
732 | } | ||
733 | |||
734 | static void SSL_SESSION_list_add(SSL_CTX *ctx, SSL_SESSION *s) | ||
735 | { | ||
736 | if ((s->next != NULL) && (s->prev != NULL)) | ||
737 | SSL_SESSION_list_remove(ctx,s); | ||
738 | |||
739 | if (ctx->session_cache_head == NULL) | ||
740 | { | ||
741 | ctx->session_cache_head=s; | ||
742 | ctx->session_cache_tail=s; | ||
743 | s->prev=(SSL_SESSION *)&(ctx->session_cache_head); | ||
744 | s->next=(SSL_SESSION *)&(ctx->session_cache_tail); | ||
745 | } | ||
746 | else | ||
747 | { | ||
748 | s->next=ctx->session_cache_head; | ||
749 | s->next->prev=s; | ||
750 | s->prev=(SSL_SESSION *)&(ctx->session_cache_head); | ||
751 | ctx->session_cache_head=s; | ||
752 | } | ||
753 | } | ||
754 | |||
diff --git a/src/lib/libssl/ssl_stat.c b/src/lib/libssl/ssl_stat.c deleted file mode 100644 index b16d253081..0000000000 --- a/src/lib/libssl/ssl_stat.c +++ /dev/null | |||
@@ -1,502 +0,0 @@ | |||
1 | /* ssl/ssl_stat.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 | |||
62 | const char *SSL_state_string_long(const SSL *s) | ||
63 | { | ||
64 | const char *str; | ||
65 | |||
66 | switch (s->state) | ||
67 | { | ||
68 | case SSL_ST_BEFORE: str="before SSL initialization"; break; | ||
69 | case SSL_ST_ACCEPT: str="before accept initialization"; break; | ||
70 | case SSL_ST_CONNECT: str="before connect initialization"; break; | ||
71 | case SSL_ST_OK: str="SSL negotiation finished successfully"; break; | ||
72 | case SSL_ST_RENEGOTIATE: str="SSL renegotiate ciphers"; break; | ||
73 | case SSL_ST_BEFORE|SSL_ST_CONNECT: str="before/connect initialization"; break; | ||
74 | case SSL_ST_OK|SSL_ST_CONNECT: str="ok/connect SSL initialization"; break; | ||
75 | case SSL_ST_BEFORE|SSL_ST_ACCEPT: str="before/accept initialization"; break; | ||
76 | case SSL_ST_OK|SSL_ST_ACCEPT: str="ok/accept SSL initialization"; break; | ||
77 | #ifndef OPENSSL_NO_SSL2 | ||
78 | case SSL2_ST_CLIENT_START_ENCRYPTION: str="SSLv2 client start encryption"; break; | ||
79 | case SSL2_ST_SERVER_START_ENCRYPTION: str="SSLv2 server start encryption"; break; | ||
80 | case SSL2_ST_SEND_CLIENT_HELLO_A: str="SSLv2 write client hello A"; break; | ||
81 | case SSL2_ST_SEND_CLIENT_HELLO_B: str="SSLv2 write client hello B"; break; | ||
82 | case SSL2_ST_GET_SERVER_HELLO_A: str="SSLv2 read server hello A"; break; | ||
83 | case SSL2_ST_GET_SERVER_HELLO_B: str="SSLv2 read server hello B"; break; | ||
84 | case SSL2_ST_SEND_CLIENT_MASTER_KEY_A: str="SSLv2 write client master key A"; break; | ||
85 | case SSL2_ST_SEND_CLIENT_MASTER_KEY_B: str="SSLv2 write client master key B"; break; | ||
86 | case SSL2_ST_SEND_CLIENT_FINISHED_A: str="SSLv2 write client finished A"; break; | ||
87 | case SSL2_ST_SEND_CLIENT_FINISHED_B: str="SSLv2 write client finished B"; break; | ||
88 | case SSL2_ST_SEND_CLIENT_CERTIFICATE_A: str="SSLv2 write client certificate A"; break; | ||
89 | case SSL2_ST_SEND_CLIENT_CERTIFICATE_B: str="SSLv2 write client certificate B"; break; | ||
90 | case SSL2_ST_SEND_CLIENT_CERTIFICATE_C: str="SSLv2 write client certificate C"; break; | ||
91 | case SSL2_ST_SEND_CLIENT_CERTIFICATE_D: str="SSLv2 write client certificate D"; break; | ||
92 | case SSL2_ST_GET_SERVER_VERIFY_A: str="SSLv2 read server verify A"; break; | ||
93 | case SSL2_ST_GET_SERVER_VERIFY_B: str="SSLv2 read server verify B"; break; | ||
94 | case SSL2_ST_GET_SERVER_FINISHED_A: str="SSLv2 read server finished A"; break; | ||
95 | case SSL2_ST_GET_SERVER_FINISHED_B: str="SSLv2 read server finished B"; break; | ||
96 | case SSL2_ST_GET_CLIENT_HELLO_A: str="SSLv2 read client hello A"; break; | ||
97 | case SSL2_ST_GET_CLIENT_HELLO_B: str="SSLv2 read client hello B"; break; | ||
98 | case SSL2_ST_GET_CLIENT_HELLO_C: str="SSLv2 read client hello C"; break; | ||
99 | case SSL2_ST_SEND_SERVER_HELLO_A: str="SSLv2 write server hello A"; break; | ||
100 | case SSL2_ST_SEND_SERVER_HELLO_B: str="SSLv2 write server hello B"; break; | ||
101 | case SSL2_ST_GET_CLIENT_MASTER_KEY_A: str="SSLv2 read client master key A"; break; | ||
102 | case SSL2_ST_GET_CLIENT_MASTER_KEY_B: str="SSLv2 read client master key B"; break; | ||
103 | case SSL2_ST_SEND_SERVER_VERIFY_A: str="SSLv2 write server verify A"; break; | ||
104 | case SSL2_ST_SEND_SERVER_VERIFY_B: str="SSLv2 write server verify B"; break; | ||
105 | case SSL2_ST_SEND_SERVER_VERIFY_C: str="SSLv2 write server verify C"; break; | ||
106 | case SSL2_ST_GET_CLIENT_FINISHED_A: str="SSLv2 read client finished A"; break; | ||
107 | case SSL2_ST_GET_CLIENT_FINISHED_B: str="SSLv2 read client finished B"; break; | ||
108 | case SSL2_ST_SEND_SERVER_FINISHED_A: str="SSLv2 write server finished A"; break; | ||
109 | case SSL2_ST_SEND_SERVER_FINISHED_B: str="SSLv2 write server finished B"; break; | ||
110 | case SSL2_ST_SEND_REQUEST_CERTIFICATE_A: str="SSLv2 write request certificate A"; break; | ||
111 | case SSL2_ST_SEND_REQUEST_CERTIFICATE_B: str="SSLv2 write request certificate B"; break; | ||
112 | case SSL2_ST_SEND_REQUEST_CERTIFICATE_C: str="SSLv2 write request certificate C"; break; | ||
113 | case SSL2_ST_SEND_REQUEST_CERTIFICATE_D: str="SSLv2 write request certificate D"; break; | ||
114 | case SSL2_ST_X509_GET_SERVER_CERTIFICATE: str="SSLv2 X509 read server certificate"; break; | ||
115 | case SSL2_ST_X509_GET_CLIENT_CERTIFICATE: str="SSLv2 X509 read client certificate"; break; | ||
116 | #endif | ||
117 | |||
118 | #ifndef OPENSSL_NO_SSL3 | ||
119 | /* SSLv3 additions */ | ||
120 | case SSL3_ST_CW_CLNT_HELLO_A: str="SSLv3 write client hello A"; break; | ||
121 | case SSL3_ST_CW_CLNT_HELLO_B: str="SSLv3 write client hello B"; break; | ||
122 | case SSL3_ST_CR_SRVR_HELLO_A: str="SSLv3 read server hello A"; break; | ||
123 | case SSL3_ST_CR_SRVR_HELLO_B: str="SSLv3 read server hello B"; break; | ||
124 | case SSL3_ST_CR_CERT_A: str="SSLv3 read server certificate A"; break; | ||
125 | case SSL3_ST_CR_CERT_B: str="SSLv3 read server certificate B"; break; | ||
126 | case SSL3_ST_CR_KEY_EXCH_A: str="SSLv3 read server key exchange A"; break; | ||
127 | case SSL3_ST_CR_KEY_EXCH_B: str="SSLv3 read server key exchange B"; break; | ||
128 | case SSL3_ST_CR_CERT_REQ_A: str="SSLv3 read server certificate request A"; break; | ||
129 | case SSL3_ST_CR_CERT_REQ_B: str="SSLv3 read server certificate request B"; break; | ||
130 | case SSL3_ST_CR_SRVR_DONE_A: str="SSLv3 read server done A"; break; | ||
131 | case SSL3_ST_CR_SRVR_DONE_B: str="SSLv3 read server done B"; break; | ||
132 | case SSL3_ST_CW_CERT_A: str="SSLv3 write client certificate A"; break; | ||
133 | case SSL3_ST_CW_CERT_B: str="SSLv3 write client certificate B"; break; | ||
134 | case SSL3_ST_CW_CERT_C: str="SSLv3 write client certificate C"; break; | ||
135 | case SSL3_ST_CW_CERT_D: str="SSLv3 write client certificate D"; break; | ||
136 | case SSL3_ST_CW_KEY_EXCH_A: str="SSLv3 write client key exchange A"; break; | ||
137 | case SSL3_ST_CW_KEY_EXCH_B: str="SSLv3 write client key exchange B"; break; | ||
138 | case SSL3_ST_CW_CERT_VRFY_A: str="SSLv3 write certificate verify A"; break; | ||
139 | case SSL3_ST_CW_CERT_VRFY_B: str="SSLv3 write certificate verify B"; break; | ||
140 | |||
141 | case SSL3_ST_CW_CHANGE_A: | ||
142 | case SSL3_ST_SW_CHANGE_A: str="SSLv3 write change cipher spec A"; break; | ||
143 | case SSL3_ST_CW_CHANGE_B: | ||
144 | case SSL3_ST_SW_CHANGE_B: str="SSLv3 write change cipher spec B"; break; | ||
145 | case SSL3_ST_CW_FINISHED_A: | ||
146 | case SSL3_ST_SW_FINISHED_A: str="SSLv3 write finished A"; break; | ||
147 | case SSL3_ST_CW_FINISHED_B: | ||
148 | case SSL3_ST_SW_FINISHED_B: str="SSLv3 write finished B"; break; | ||
149 | case SSL3_ST_CR_CHANGE_A: | ||
150 | case SSL3_ST_SR_CHANGE_A: str="SSLv3 read change cipher spec A"; break; | ||
151 | case SSL3_ST_CR_CHANGE_B: | ||
152 | case SSL3_ST_SR_CHANGE_B: str="SSLv3 read change cipher spec B"; break; | ||
153 | case SSL3_ST_CR_FINISHED_A: | ||
154 | case SSL3_ST_SR_FINISHED_A: str="SSLv3 read finished A"; break; | ||
155 | case SSL3_ST_CR_FINISHED_B: | ||
156 | case SSL3_ST_SR_FINISHED_B: str="SSLv3 read finished B"; break; | ||
157 | |||
158 | case SSL3_ST_CW_FLUSH: | ||
159 | case SSL3_ST_SW_FLUSH: str="SSLv3 flush data"; break; | ||
160 | |||
161 | case SSL3_ST_SR_CLNT_HELLO_A: str="SSLv3 read client hello A"; break; | ||
162 | case SSL3_ST_SR_CLNT_HELLO_B: str="SSLv3 read client hello B"; break; | ||
163 | case SSL3_ST_SR_CLNT_HELLO_C: str="SSLv3 read client hello C"; break; | ||
164 | case SSL3_ST_SW_HELLO_REQ_A: str="SSLv3 write hello request A"; break; | ||
165 | case SSL3_ST_SW_HELLO_REQ_B: str="SSLv3 write hello request B"; break; | ||
166 | case SSL3_ST_SW_HELLO_REQ_C: str="SSLv3 write hello request C"; break; | ||
167 | case SSL3_ST_SW_SRVR_HELLO_A: str="SSLv3 write server hello A"; break; | ||
168 | case SSL3_ST_SW_SRVR_HELLO_B: str="SSLv3 write server hello B"; break; | ||
169 | case SSL3_ST_SW_CERT_A: str="SSLv3 write certificate A"; break; | ||
170 | case SSL3_ST_SW_CERT_B: str="SSLv3 write certificate B"; break; | ||
171 | case SSL3_ST_SW_KEY_EXCH_A: str="SSLv3 write key exchange A"; break; | ||
172 | case SSL3_ST_SW_KEY_EXCH_B: str="SSLv3 write key exchange B"; break; | ||
173 | case SSL3_ST_SW_CERT_REQ_A: str="SSLv3 write certificate request A"; break; | ||
174 | case SSL3_ST_SW_CERT_REQ_B: str="SSLv3 write certificate request B"; break; | ||
175 | case SSL3_ST_SW_SRVR_DONE_A: str="SSLv3 write server done A"; break; | ||
176 | case SSL3_ST_SW_SRVR_DONE_B: str="SSLv3 write server done B"; break; | ||
177 | case SSL3_ST_SR_CERT_A: str="SSLv3 read client certificate A"; break; | ||
178 | case SSL3_ST_SR_CERT_B: str="SSLv3 read client certificate B"; break; | ||
179 | case SSL3_ST_SR_KEY_EXCH_A: str="SSLv3 read client key exchange A"; break; | ||
180 | case SSL3_ST_SR_KEY_EXCH_B: str="SSLv3 read client key exchange B"; break; | ||
181 | case SSL3_ST_SR_CERT_VRFY_A: str="SSLv3 read certificate verify A"; break; | ||
182 | case SSL3_ST_SR_CERT_VRFY_B: str="SSLv3 read certificate verify B"; break; | ||
183 | #endif | ||
184 | |||
185 | #if !defined(OPENSSL_NO_SSL2) && !defined(OPENSSL_NO_SSL3) | ||
186 | /* SSLv2/v3 compatibility states */ | ||
187 | /* client */ | ||
188 | case SSL23_ST_CW_CLNT_HELLO_A: str="SSLv2/v3 write client hello A"; break; | ||
189 | case SSL23_ST_CW_CLNT_HELLO_B: str="SSLv2/v3 write client hello B"; break; | ||
190 | case SSL23_ST_CR_SRVR_HELLO_A: str="SSLv2/v3 read server hello A"; break; | ||
191 | case SSL23_ST_CR_SRVR_HELLO_B: str="SSLv2/v3 read server hello B"; break; | ||
192 | /* server */ | ||
193 | case SSL23_ST_SR_CLNT_HELLO_A: str="SSLv2/v3 read client hello A"; break; | ||
194 | case SSL23_ST_SR_CLNT_HELLO_B: str="SSLv2/v3 read client hello B"; break; | ||
195 | #endif | ||
196 | |||
197 | default: str="unknown state"; break; | ||
198 | } | ||
199 | return(str); | ||
200 | } | ||
201 | |||
202 | const char *SSL_rstate_string_long(const SSL *s) | ||
203 | { | ||
204 | const char *str; | ||
205 | |||
206 | switch (s->rstate) | ||
207 | { | ||
208 | case SSL_ST_READ_HEADER: str="read header"; break; | ||
209 | case SSL_ST_READ_BODY: str="read body"; break; | ||
210 | case SSL_ST_READ_DONE: str="read done"; break; | ||
211 | default: str="unknown"; break; | ||
212 | } | ||
213 | return(str); | ||
214 | } | ||
215 | |||
216 | const char *SSL_state_string(const SSL *s) | ||
217 | { | ||
218 | const char *str; | ||
219 | |||
220 | switch (s->state) | ||
221 | { | ||
222 | case SSL_ST_BEFORE: str="PINIT "; break; | ||
223 | case SSL_ST_ACCEPT: str="AINIT "; break; | ||
224 | case SSL_ST_CONNECT: str="CINIT "; break; | ||
225 | case SSL_ST_OK: str="SSLOK "; break; | ||
226 | #ifndef OPENSSL_NO_SSL2 | ||
227 | case SSL2_ST_CLIENT_START_ENCRYPTION: str="2CSENC"; break; | ||
228 | case SSL2_ST_SERVER_START_ENCRYPTION: str="2SSENC"; break; | ||
229 | case SSL2_ST_SEND_CLIENT_HELLO_A: str="2SCH_A"; break; | ||
230 | case SSL2_ST_SEND_CLIENT_HELLO_B: str="2SCH_B"; break; | ||
231 | case SSL2_ST_GET_SERVER_HELLO_A: str="2GSH_A"; break; | ||
232 | case SSL2_ST_GET_SERVER_HELLO_B: str="2GSH_B"; break; | ||
233 | case SSL2_ST_SEND_CLIENT_MASTER_KEY_A: str="2SCMKA"; break; | ||
234 | case SSL2_ST_SEND_CLIENT_MASTER_KEY_B: str="2SCMKB"; break; | ||
235 | case SSL2_ST_SEND_CLIENT_FINISHED_A: str="2SCF_A"; break; | ||
236 | case SSL2_ST_SEND_CLIENT_FINISHED_B: str="2SCF_B"; break; | ||
237 | case SSL2_ST_SEND_CLIENT_CERTIFICATE_A: str="2SCC_A"; break; | ||
238 | case SSL2_ST_SEND_CLIENT_CERTIFICATE_B: str="2SCC_B"; break; | ||
239 | case SSL2_ST_SEND_CLIENT_CERTIFICATE_C: str="2SCC_C"; break; | ||
240 | case SSL2_ST_SEND_CLIENT_CERTIFICATE_D: str="2SCC_D"; break; | ||
241 | case SSL2_ST_GET_SERVER_VERIFY_A: str="2GSV_A"; break; | ||
242 | case SSL2_ST_GET_SERVER_VERIFY_B: str="2GSV_B"; break; | ||
243 | case SSL2_ST_GET_SERVER_FINISHED_A: str="2GSF_A"; break; | ||
244 | case SSL2_ST_GET_SERVER_FINISHED_B: str="2GSF_B"; break; | ||
245 | case SSL2_ST_GET_CLIENT_HELLO_A: str="2GCH_A"; break; | ||
246 | case SSL2_ST_GET_CLIENT_HELLO_B: str="2GCH_B"; break; | ||
247 | case SSL2_ST_GET_CLIENT_HELLO_C: str="2GCH_C"; break; | ||
248 | case SSL2_ST_SEND_SERVER_HELLO_A: str="2SSH_A"; break; | ||
249 | case SSL2_ST_SEND_SERVER_HELLO_B: str="2SSH_B"; break; | ||
250 | case SSL2_ST_GET_CLIENT_MASTER_KEY_A: str="2GCMKA"; break; | ||
251 | case SSL2_ST_GET_CLIENT_MASTER_KEY_B: str="2GCMKA"; break; | ||
252 | case SSL2_ST_SEND_SERVER_VERIFY_A: str="2SSV_A"; break; | ||
253 | case SSL2_ST_SEND_SERVER_VERIFY_B: str="2SSV_B"; break; | ||
254 | case SSL2_ST_SEND_SERVER_VERIFY_C: str="2SSV_C"; break; | ||
255 | case SSL2_ST_GET_CLIENT_FINISHED_A: str="2GCF_A"; break; | ||
256 | case SSL2_ST_GET_CLIENT_FINISHED_B: str="2GCF_B"; break; | ||
257 | case SSL2_ST_SEND_SERVER_FINISHED_A: str="2SSF_A"; break; | ||
258 | case SSL2_ST_SEND_SERVER_FINISHED_B: str="2SSF_B"; break; | ||
259 | case SSL2_ST_SEND_REQUEST_CERTIFICATE_A: str="2SRC_A"; break; | ||
260 | case SSL2_ST_SEND_REQUEST_CERTIFICATE_B: str="2SRC_B"; break; | ||
261 | case SSL2_ST_SEND_REQUEST_CERTIFICATE_C: str="2SRC_C"; break; | ||
262 | case SSL2_ST_SEND_REQUEST_CERTIFICATE_D: str="2SRC_D"; break; | ||
263 | case SSL2_ST_X509_GET_SERVER_CERTIFICATE: str="2X9GSC"; break; | ||
264 | case SSL2_ST_X509_GET_CLIENT_CERTIFICATE: str="2X9GCC"; break; | ||
265 | #endif | ||
266 | |||
267 | #ifndef OPENSSL_NO_SSL3 | ||
268 | /* SSLv3 additions */ | ||
269 | case SSL3_ST_SW_FLUSH: | ||
270 | case SSL3_ST_CW_FLUSH: str="3FLUSH"; break; | ||
271 | case SSL3_ST_CW_CLNT_HELLO_A: str="3WCH_A"; break; | ||
272 | case SSL3_ST_CW_CLNT_HELLO_B: str="3WCH_B"; break; | ||
273 | case SSL3_ST_CR_SRVR_HELLO_A: str="3RSH_A"; break; | ||
274 | case SSL3_ST_CR_SRVR_HELLO_B: str="3RSH_B"; break; | ||
275 | case SSL3_ST_CR_CERT_A: str="3RSC_A"; break; | ||
276 | case SSL3_ST_CR_CERT_B: str="3RSC_B"; break; | ||
277 | case SSL3_ST_CR_KEY_EXCH_A: str="3RSKEA"; break; | ||
278 | case SSL3_ST_CR_KEY_EXCH_B: str="3RSKEB"; break; | ||
279 | case SSL3_ST_CR_CERT_REQ_A: str="3RCR_A"; break; | ||
280 | case SSL3_ST_CR_CERT_REQ_B: str="3RCR_B"; break; | ||
281 | case SSL3_ST_CR_SRVR_DONE_A: str="3RSD_A"; break; | ||
282 | case SSL3_ST_CR_SRVR_DONE_B: str="3RSD_B"; break; | ||
283 | case SSL3_ST_CW_CERT_A: str="3WCC_A"; break; | ||
284 | case SSL3_ST_CW_CERT_B: str="3WCC_B"; break; | ||
285 | case SSL3_ST_CW_CERT_C: str="3WCC_C"; break; | ||
286 | case SSL3_ST_CW_CERT_D: str="3WCC_D"; break; | ||
287 | case SSL3_ST_CW_KEY_EXCH_A: str="3WCKEA"; break; | ||
288 | case SSL3_ST_CW_KEY_EXCH_B: str="3WCKEB"; break; | ||
289 | case SSL3_ST_CW_CERT_VRFY_A: str="3WCV_A"; break; | ||
290 | case SSL3_ST_CW_CERT_VRFY_B: str="3WCV_B"; break; | ||
291 | |||
292 | case SSL3_ST_SW_CHANGE_A: | ||
293 | case SSL3_ST_CW_CHANGE_A: str="3WCCSA"; break; | ||
294 | case SSL3_ST_SW_CHANGE_B: | ||
295 | case SSL3_ST_CW_CHANGE_B: str="3WCCSB"; break; | ||
296 | case SSL3_ST_SW_FINISHED_A: | ||
297 | case SSL3_ST_CW_FINISHED_A: str="3WFINA"; break; | ||
298 | case SSL3_ST_SW_FINISHED_B: | ||
299 | case SSL3_ST_CW_FINISHED_B: str="3WFINB"; break; | ||
300 | case SSL3_ST_SR_CHANGE_A: | ||
301 | case SSL3_ST_CR_CHANGE_A: str="3RCCSA"; break; | ||
302 | case SSL3_ST_SR_CHANGE_B: | ||
303 | case SSL3_ST_CR_CHANGE_B: str="3RCCSB"; break; | ||
304 | case SSL3_ST_SR_FINISHED_A: | ||
305 | case SSL3_ST_CR_FINISHED_A: str="3RFINA"; break; | ||
306 | case SSL3_ST_SR_FINISHED_B: | ||
307 | case SSL3_ST_CR_FINISHED_B: str="3RFINB"; break; | ||
308 | |||
309 | case SSL3_ST_SW_HELLO_REQ_A: str="3WHR_A"; break; | ||
310 | case SSL3_ST_SW_HELLO_REQ_B: str="3WHR_B"; break; | ||
311 | case SSL3_ST_SW_HELLO_REQ_C: str="3WHR_C"; break; | ||
312 | case SSL3_ST_SR_CLNT_HELLO_A: str="3RCH_A"; break; | ||
313 | case SSL3_ST_SR_CLNT_HELLO_B: str="3RCH_B"; break; | ||
314 | case SSL3_ST_SR_CLNT_HELLO_C: str="3RCH_C"; break; | ||
315 | case SSL3_ST_SW_SRVR_HELLO_A: str="3WSH_A"; break; | ||
316 | case SSL3_ST_SW_SRVR_HELLO_B: str="3WSH_B"; break; | ||
317 | case SSL3_ST_SW_CERT_A: str="3WSC_A"; break; | ||
318 | case SSL3_ST_SW_CERT_B: str="3WSC_B"; break; | ||
319 | case SSL3_ST_SW_KEY_EXCH_A: str="3WSKEA"; break; | ||
320 | case SSL3_ST_SW_KEY_EXCH_B: str="3WSKEB"; break; | ||
321 | case SSL3_ST_SW_CERT_REQ_A: str="3WCR_A"; break; | ||
322 | case SSL3_ST_SW_CERT_REQ_B: str="3WCR_B"; break; | ||
323 | case SSL3_ST_SW_SRVR_DONE_A: str="3WSD_A"; break; | ||
324 | case SSL3_ST_SW_SRVR_DONE_B: str="3WSD_B"; break; | ||
325 | case SSL3_ST_SR_CERT_A: str="3RCC_A"; break; | ||
326 | case SSL3_ST_SR_CERT_B: str="3RCC_B"; break; | ||
327 | case SSL3_ST_SR_KEY_EXCH_A: str="3RCKEA"; break; | ||
328 | case SSL3_ST_SR_KEY_EXCH_B: str="3RCKEB"; break; | ||
329 | case SSL3_ST_SR_CERT_VRFY_A: str="3RCV_A"; break; | ||
330 | case SSL3_ST_SR_CERT_VRFY_B: str="3RCV_B"; break; | ||
331 | #endif | ||
332 | |||
333 | #if !defined(OPENSSL_NO_SSL2) && !defined(OPENSSL_NO_SSL3) | ||
334 | /* SSLv2/v3 compatibility states */ | ||
335 | /* client */ | ||
336 | case SSL23_ST_CW_CLNT_HELLO_A: str="23WCHA"; break; | ||
337 | case SSL23_ST_CW_CLNT_HELLO_B: str="23WCHB"; break; | ||
338 | case SSL23_ST_CR_SRVR_HELLO_A: str="23RSHA"; break; | ||
339 | case SSL23_ST_CR_SRVR_HELLO_B: str="23RSHA"; break; | ||
340 | /* server */ | ||
341 | case SSL23_ST_SR_CLNT_HELLO_A: str="23RCHA"; break; | ||
342 | case SSL23_ST_SR_CLNT_HELLO_B: str="23RCHB"; break; | ||
343 | #endif | ||
344 | |||
345 | default: str="UNKWN "; break; | ||
346 | } | ||
347 | return(str); | ||
348 | } | ||
349 | |||
350 | const char *SSL_alert_type_string_long(int value) | ||
351 | { | ||
352 | value>>=8; | ||
353 | if (value == SSL3_AL_WARNING) | ||
354 | return("warning"); | ||
355 | else if (value == SSL3_AL_FATAL) | ||
356 | return("fatal"); | ||
357 | else | ||
358 | return("unknown"); | ||
359 | } | ||
360 | |||
361 | const char *SSL_alert_type_string(int value) | ||
362 | { | ||
363 | value>>=8; | ||
364 | if (value == SSL3_AL_WARNING) | ||
365 | return("W"); | ||
366 | else if (value == SSL3_AL_FATAL) | ||
367 | return("F"); | ||
368 | else | ||
369 | return("U"); | ||
370 | } | ||
371 | |||
372 | const char *SSL_alert_desc_string(int value) | ||
373 | { | ||
374 | const char *str; | ||
375 | |||
376 | switch (value & 0xff) | ||
377 | { | ||
378 | case SSL3_AD_CLOSE_NOTIFY: str="CN"; break; | ||
379 | case SSL3_AD_UNEXPECTED_MESSAGE: str="UM"; break; | ||
380 | case SSL3_AD_BAD_RECORD_MAC: str="BM"; break; | ||
381 | case SSL3_AD_DECOMPRESSION_FAILURE: str="DF"; break; | ||
382 | case SSL3_AD_HANDSHAKE_FAILURE: str="HF"; break; | ||
383 | case SSL3_AD_NO_CERTIFICATE: str="NC"; break; | ||
384 | case SSL3_AD_BAD_CERTIFICATE: str="BC"; break; | ||
385 | case SSL3_AD_UNSUPPORTED_CERTIFICATE: str="UC"; break; | ||
386 | case SSL3_AD_CERTIFICATE_REVOKED: str="CR"; break; | ||
387 | case SSL3_AD_CERTIFICATE_EXPIRED: str="CE"; break; | ||
388 | case SSL3_AD_CERTIFICATE_UNKNOWN: str="CU"; break; | ||
389 | case SSL3_AD_ILLEGAL_PARAMETER: str="IP"; break; | ||
390 | case TLS1_AD_DECRYPTION_FAILED: str="DC"; break; | ||
391 | case TLS1_AD_RECORD_OVERFLOW: str="RO"; break; | ||
392 | case TLS1_AD_UNKNOWN_CA: str="CA"; break; | ||
393 | case TLS1_AD_ACCESS_DENIED: str="AD"; break; | ||
394 | case TLS1_AD_DECODE_ERROR: str="DE"; break; | ||
395 | case TLS1_AD_DECRYPT_ERROR: str="CY"; break; | ||
396 | case TLS1_AD_EXPORT_RESTRICTION: str="ER"; break; | ||
397 | case TLS1_AD_PROTOCOL_VERSION: str="PV"; break; | ||
398 | case TLS1_AD_INSUFFICIENT_SECURITY: str="IS"; break; | ||
399 | case TLS1_AD_INTERNAL_ERROR: str="IE"; break; | ||
400 | case TLS1_AD_USER_CANCELLED: str="US"; break; | ||
401 | case TLS1_AD_NO_RENEGOTIATION: str="NR"; break; | ||
402 | default: str="UK"; break; | ||
403 | } | ||
404 | return(str); | ||
405 | } | ||
406 | |||
407 | const char *SSL_alert_desc_string_long(int value) | ||
408 | { | ||
409 | const char *str; | ||
410 | |||
411 | switch (value & 0xff) | ||
412 | { | ||
413 | case SSL3_AD_CLOSE_NOTIFY: | ||
414 | str="close notify"; | ||
415 | break; | ||
416 | case SSL3_AD_UNEXPECTED_MESSAGE: | ||
417 | str="unexpected_message"; | ||
418 | break; | ||
419 | case SSL3_AD_BAD_RECORD_MAC: | ||
420 | str="bad record mac"; | ||
421 | break; | ||
422 | case SSL3_AD_DECOMPRESSION_FAILURE: | ||
423 | str="decompression failure"; | ||
424 | break; | ||
425 | case SSL3_AD_HANDSHAKE_FAILURE: | ||
426 | str="handshake failure"; | ||
427 | break; | ||
428 | case SSL3_AD_NO_CERTIFICATE: | ||
429 | str="no certificate"; | ||
430 | break; | ||
431 | case SSL3_AD_BAD_CERTIFICATE: | ||
432 | str="bad certificate"; | ||
433 | break; | ||
434 | case SSL3_AD_UNSUPPORTED_CERTIFICATE: | ||
435 | str="unsupported certificate"; | ||
436 | break; | ||
437 | case SSL3_AD_CERTIFICATE_REVOKED: | ||
438 | str="certificate revoked"; | ||
439 | break; | ||
440 | case SSL3_AD_CERTIFICATE_EXPIRED: | ||
441 | str="certificate expired"; | ||
442 | break; | ||
443 | case SSL3_AD_CERTIFICATE_UNKNOWN: | ||
444 | str="certificate unknown"; | ||
445 | break; | ||
446 | case SSL3_AD_ILLEGAL_PARAMETER: | ||
447 | str="illegal parameter"; | ||
448 | break; | ||
449 | case TLS1_AD_DECRYPTION_FAILED: | ||
450 | str="decryption failed"; | ||
451 | break; | ||
452 | case TLS1_AD_RECORD_OVERFLOW: | ||
453 | str="record overflow"; | ||
454 | break; | ||
455 | case TLS1_AD_UNKNOWN_CA: | ||
456 | str="unknown CA"; | ||
457 | break; | ||
458 | case TLS1_AD_ACCESS_DENIED: | ||
459 | str="access denied"; | ||
460 | break; | ||
461 | case TLS1_AD_DECODE_ERROR: | ||
462 | str="decode error"; | ||
463 | break; | ||
464 | case TLS1_AD_DECRYPT_ERROR: | ||
465 | str="decrypt error"; | ||
466 | break; | ||
467 | case TLS1_AD_EXPORT_RESTRICTION: | ||
468 | str="export restriction"; | ||
469 | break; | ||
470 | case TLS1_AD_PROTOCOL_VERSION: | ||
471 | str="protocol version"; | ||
472 | break; | ||
473 | case TLS1_AD_INSUFFICIENT_SECURITY: | ||
474 | str="insufficient security"; | ||
475 | break; | ||
476 | case TLS1_AD_INTERNAL_ERROR: | ||
477 | str="internal error"; | ||
478 | break; | ||
479 | case TLS1_AD_USER_CANCELLED: | ||
480 | str="user canceled"; | ||
481 | break; | ||
482 | case TLS1_AD_NO_RENEGOTIATION: | ||
483 | str="no renegotiation"; | ||
484 | break; | ||
485 | default: str="unknown"; break; | ||
486 | } | ||
487 | return(str); | ||
488 | } | ||
489 | |||
490 | const char *SSL_rstate_string(const SSL *s) | ||
491 | { | ||
492 | const char *str; | ||
493 | |||
494 | switch (s->rstate) | ||
495 | { | ||
496 | case SSL_ST_READ_HEADER:str="RH"; break; | ||
497 | case SSL_ST_READ_BODY: str="RB"; break; | ||
498 | case SSL_ST_READ_DONE: str="RD"; break; | ||
499 | default: str="unknown"; break; | ||
500 | } | ||
501 | return(str); | ||
502 | } | ||
diff --git a/src/lib/libssl/ssl_txt.c b/src/lib/libssl/ssl_txt.c deleted file mode 100644 index 40b76b1b26..0000000000 --- a/src/lib/libssl/ssl_txt.c +++ /dev/null | |||
@@ -1,186 +0,0 @@ | |||
1 | /* ssl/ssl_txt.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 <openssl/buffer.h> | ||
61 | #include "ssl_locl.h" | ||
62 | |||
63 | #ifndef OPENSSL_NO_FP_API | ||
64 | int SSL_SESSION_print_fp(FILE *fp, SSL_SESSION *x) | ||
65 | { | ||
66 | BIO *b; | ||
67 | int ret; | ||
68 | |||
69 | if ((b=BIO_new(BIO_s_file_internal())) == NULL) | ||
70 | { | ||
71 | SSLerr(SSL_F_SSL_SESSION_PRINT_FP,ERR_R_BUF_LIB); | ||
72 | return(0); | ||
73 | } | ||
74 | BIO_set_fp(b,fp,BIO_NOCLOSE); | ||
75 | ret=SSL_SESSION_print(b,x); | ||
76 | BIO_free(b); | ||
77 | return(ret); | ||
78 | } | ||
79 | #endif | ||
80 | |||
81 | int SSL_SESSION_print(BIO *bp, SSL_SESSION *x) | ||
82 | { | ||
83 | unsigned int i; | ||
84 | char *s; | ||
85 | |||
86 | if (x == NULL) goto err; | ||
87 | if (BIO_puts(bp,"SSL-Session:\n") <= 0) goto err; | ||
88 | if (x->ssl_version == SSL2_VERSION) | ||
89 | s="SSLv2"; | ||
90 | else if (x->ssl_version == SSL3_VERSION) | ||
91 | s="SSLv3"; | ||
92 | else if (x->ssl_version == TLS1_VERSION) | ||
93 | s="TLSv1"; | ||
94 | else | ||
95 | s="unknown"; | ||
96 | if (BIO_printf(bp," Protocol : %s\n",s) <= 0) goto err; | ||
97 | |||
98 | if (x->cipher == NULL) | ||
99 | { | ||
100 | if (((x->cipher_id) & 0xff000000) == 0x02000000) | ||
101 | { | ||
102 | if (BIO_printf(bp," Cipher : %06lX\n",x->cipher_id&0xffffff) <= 0) | ||
103 | goto err; | ||
104 | } | ||
105 | else | ||
106 | { | ||
107 | if (BIO_printf(bp," Cipher : %04lX\n",x->cipher_id&0xffff) <= 0) | ||
108 | goto err; | ||
109 | } | ||
110 | } | ||
111 | else | ||
112 | { | ||
113 | if (BIO_printf(bp," Cipher : %s\n",((x->cipher == NULL)?"unknown":x->cipher->name)) <= 0) | ||
114 | goto err; | ||
115 | } | ||
116 | if (BIO_puts(bp," Session-ID: ") <= 0) goto err; | ||
117 | for (i=0; i<x->session_id_length; i++) | ||
118 | { | ||
119 | if (BIO_printf(bp,"%02X",x->session_id[i]) <= 0) goto err; | ||
120 | } | ||
121 | if (BIO_puts(bp,"\n Session-ID-ctx: ") <= 0) goto err; | ||
122 | for (i=0; i<x->sid_ctx_length; i++) | ||
123 | { | ||
124 | if (BIO_printf(bp,"%02X",x->sid_ctx[i]) <= 0) | ||
125 | goto err; | ||
126 | } | ||
127 | if (BIO_puts(bp,"\n Master-Key: ") <= 0) goto err; | ||
128 | for (i=0; i<(unsigned int)x->master_key_length; i++) | ||
129 | { | ||
130 | if (BIO_printf(bp,"%02X",x->master_key[i]) <= 0) goto err; | ||
131 | } | ||
132 | if (BIO_puts(bp,"\n Key-Arg : ") <= 0) goto err; | ||
133 | if (x->key_arg_length == 0) | ||
134 | { | ||
135 | if (BIO_puts(bp,"None") <= 0) goto err; | ||
136 | } | ||
137 | else | ||
138 | for (i=0; i<x->key_arg_length; i++) | ||
139 | { | ||
140 | if (BIO_printf(bp,"%02X",x->key_arg[i]) <= 0) goto err; | ||
141 | } | ||
142 | #ifndef OPENSSL_NO_KRB5 | ||
143 | if (BIO_puts(bp,"\n Krb5 Principal: ") <= 0) goto err; | ||
144 | if (x->krb5_client_princ_len == 0) | ||
145 | { | ||
146 | if (BIO_puts(bp,"None") <= 0) goto err; | ||
147 | } | ||
148 | else | ||
149 | for (i=0; i<x->krb5_client_princ_len; i++) | ||
150 | { | ||
151 | if (BIO_printf(bp,"%02X",x->krb5_client_princ[i]) <= 0) goto err; | ||
152 | } | ||
153 | #endif /* OPENSSL_NO_KRB5 */ | ||
154 | if (x->compress_meth != 0) | ||
155 | { | ||
156 | SSL_COMP *comp; | ||
157 | |||
158 | ssl_cipher_get_evp(x,NULL,NULL,&comp); | ||
159 | if (comp == NULL) | ||
160 | { | ||
161 | if (BIO_printf(bp,"\n Compression: %d",x->compress_meth) <= 0) goto err; | ||
162 | } | ||
163 | else | ||
164 | { | ||
165 | if (BIO_printf(bp,"\n Compression: %d (%s)", comp->id,comp->method->name) <= 0) goto err; | ||
166 | } | ||
167 | } | ||
168 | if (x->time != 0L) | ||
169 | { | ||
170 | if (BIO_printf(bp, "\n Start Time: %ld",x->time) <= 0) goto err; | ||
171 | } | ||
172 | if (x->timeout != 0L) | ||
173 | { | ||
174 | if (BIO_printf(bp, "\n Timeout : %ld (sec)",x->timeout) <= 0) goto err; | ||
175 | } | ||
176 | if (BIO_puts(bp,"\n") <= 0) goto err; | ||
177 | |||
178 | if (BIO_puts(bp, " Verify return code: ") <= 0) goto err; | ||
179 | if (BIO_printf(bp, "%ld (%s)\n", x->verify_result, | ||
180 | X509_verify_cert_error_string(x->verify_result)) <= 0) goto err; | ||
181 | |||
182 | return(1); | ||
183 | err: | ||
184 | return(0); | ||
185 | } | ||
186 | |||