1ebfedea0SLionel Sambuc /* ssl/s23_lib.c */
2ebfedea0SLionel Sambuc /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
3ebfedea0SLionel Sambuc * All rights reserved.
4ebfedea0SLionel Sambuc *
5ebfedea0SLionel Sambuc * This package is an SSL implementation written
6ebfedea0SLionel Sambuc * by Eric Young (eay@cryptsoft.com).
7ebfedea0SLionel Sambuc * The implementation was written so as to conform with Netscapes SSL.
8ebfedea0SLionel Sambuc *
9ebfedea0SLionel Sambuc * This library is free for commercial and non-commercial use as long as
10ebfedea0SLionel Sambuc * the following conditions are aheared to. The following conditions
11ebfedea0SLionel Sambuc * apply to all code found in this distribution, be it the RC4, RSA,
12ebfedea0SLionel Sambuc * lhash, DES, etc., code; not just the SSL code. The SSL documentation
13ebfedea0SLionel Sambuc * included with this distribution is covered by the same copyright terms
14ebfedea0SLionel Sambuc * except that the holder is Tim Hudson (tjh@cryptsoft.com).
15ebfedea0SLionel Sambuc *
16ebfedea0SLionel Sambuc * Copyright remains Eric Young's, and as such any Copyright notices in
17ebfedea0SLionel Sambuc * the code are not to be removed.
18ebfedea0SLionel Sambuc * If this package is used in a product, Eric Young should be given attribution
19ebfedea0SLionel Sambuc * as the author of the parts of the library used.
20ebfedea0SLionel Sambuc * This can be in the form of a textual message at program startup or
21ebfedea0SLionel Sambuc * in documentation (online or textual) provided with the package.
22ebfedea0SLionel Sambuc *
23ebfedea0SLionel Sambuc * Redistribution and use in source and binary forms, with or without
24ebfedea0SLionel Sambuc * modification, are permitted provided that the following conditions
25ebfedea0SLionel Sambuc * are met:
26ebfedea0SLionel Sambuc * 1. Redistributions of source code must retain the copyright
27ebfedea0SLionel Sambuc * notice, this list of conditions and the following disclaimer.
28ebfedea0SLionel Sambuc * 2. Redistributions in binary form must reproduce the above copyright
29ebfedea0SLionel Sambuc * notice, this list of conditions and the following disclaimer in the
30ebfedea0SLionel Sambuc * documentation and/or other materials provided with the distribution.
31ebfedea0SLionel Sambuc * 3. All advertising materials mentioning features or use of this software
32ebfedea0SLionel Sambuc * must display the following acknowledgement:
33ebfedea0SLionel Sambuc * "This product includes cryptographic software written by
34ebfedea0SLionel Sambuc * Eric Young (eay@cryptsoft.com)"
35ebfedea0SLionel Sambuc * The word 'cryptographic' can be left out if the rouines from the library
36ebfedea0SLionel Sambuc * being used are not cryptographic related :-).
37ebfedea0SLionel Sambuc * 4. If you include any Windows specific code (or a derivative thereof) from
38ebfedea0SLionel Sambuc * the apps directory (application code) you must include an acknowledgement:
39ebfedea0SLionel Sambuc * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
40ebfedea0SLionel Sambuc *
41ebfedea0SLionel Sambuc * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
42ebfedea0SLionel Sambuc * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
43ebfedea0SLionel Sambuc * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
44ebfedea0SLionel Sambuc * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
45ebfedea0SLionel Sambuc * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
46ebfedea0SLionel Sambuc * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
47ebfedea0SLionel Sambuc * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48ebfedea0SLionel Sambuc * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
49ebfedea0SLionel Sambuc * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
50ebfedea0SLionel Sambuc * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
51ebfedea0SLionel Sambuc * SUCH DAMAGE.
52ebfedea0SLionel Sambuc *
53ebfedea0SLionel Sambuc * The licence and distribution terms for any publically available version or
54ebfedea0SLionel Sambuc * derivative of this code cannot be changed. i.e. this code cannot simply be
55ebfedea0SLionel Sambuc * copied and put under another distribution licence
56ebfedea0SLionel Sambuc * [including the GNU Public Licence.]
57ebfedea0SLionel Sambuc */
58ebfedea0SLionel Sambuc
59ebfedea0SLionel Sambuc #include <stdio.h>
60ebfedea0SLionel Sambuc #include <openssl/objects.h>
61ebfedea0SLionel Sambuc #include "ssl_locl.h"
62ebfedea0SLionel Sambuc
ssl23_default_timeout(void)63ebfedea0SLionel Sambuc long ssl23_default_timeout(void)
64ebfedea0SLionel Sambuc {
65ebfedea0SLionel Sambuc return (300);
66ebfedea0SLionel Sambuc }
67ebfedea0SLionel Sambuc
ssl23_num_ciphers(void)68ebfedea0SLionel Sambuc int ssl23_num_ciphers(void)
69ebfedea0SLionel Sambuc {
70ebfedea0SLionel Sambuc return (ssl3_num_ciphers()
71ebfedea0SLionel Sambuc #ifndef OPENSSL_NO_SSL2
72ebfedea0SLionel Sambuc + ssl2_num_ciphers()
73ebfedea0SLionel Sambuc #endif
74ebfedea0SLionel Sambuc );
75ebfedea0SLionel Sambuc }
76ebfedea0SLionel Sambuc
ssl23_get_cipher(unsigned int u)77ebfedea0SLionel Sambuc const SSL_CIPHER *ssl23_get_cipher(unsigned int u)
78ebfedea0SLionel Sambuc {
79ebfedea0SLionel Sambuc unsigned int uu = ssl3_num_ciphers();
80ebfedea0SLionel Sambuc
81ebfedea0SLionel Sambuc if (u < uu)
82ebfedea0SLionel Sambuc return (ssl3_get_cipher(u));
83ebfedea0SLionel Sambuc else
84ebfedea0SLionel Sambuc #ifndef OPENSSL_NO_SSL2
85ebfedea0SLionel Sambuc return (ssl2_get_cipher(u - uu));
86ebfedea0SLionel Sambuc #else
87ebfedea0SLionel Sambuc return (NULL);
88ebfedea0SLionel Sambuc #endif
89ebfedea0SLionel Sambuc }
90ebfedea0SLionel Sambuc
91*0a6a1f1dSLionel Sambuc /*
92*0a6a1f1dSLionel Sambuc * This function needs to check if the ciphers required are actually
93*0a6a1f1dSLionel Sambuc * available
94*0a6a1f1dSLionel Sambuc */
ssl23_get_cipher_by_char(const unsigned char * p)95ebfedea0SLionel Sambuc const SSL_CIPHER *ssl23_get_cipher_by_char(const unsigned char *p)
96ebfedea0SLionel Sambuc {
97ebfedea0SLionel Sambuc const SSL_CIPHER *cp;
98ebfedea0SLionel Sambuc
99ebfedea0SLionel Sambuc cp = ssl3_get_cipher_by_char(p);
100ebfedea0SLionel Sambuc #ifndef OPENSSL_NO_SSL2
101ebfedea0SLionel Sambuc if (cp == NULL)
102ebfedea0SLionel Sambuc cp = ssl2_get_cipher_by_char(p);
103ebfedea0SLionel Sambuc #endif
104ebfedea0SLionel Sambuc return (cp);
105ebfedea0SLionel Sambuc }
106ebfedea0SLionel Sambuc
ssl23_put_cipher_by_char(const SSL_CIPHER * c,unsigned char * p)107ebfedea0SLionel Sambuc int ssl23_put_cipher_by_char(const SSL_CIPHER *c, unsigned char *p)
108ebfedea0SLionel Sambuc {
109ebfedea0SLionel Sambuc long l;
110ebfedea0SLionel Sambuc
111ebfedea0SLionel Sambuc /* We can write SSLv2 and SSLv3 ciphers */
112*0a6a1f1dSLionel Sambuc /* but no ECC ciphers */
113*0a6a1f1dSLionel Sambuc if (c->algorithm_mkey == SSL_kECDHr ||
114*0a6a1f1dSLionel Sambuc c->algorithm_mkey == SSL_kECDHe ||
115*0a6a1f1dSLionel Sambuc c->algorithm_mkey == SSL_kEECDH ||
116*0a6a1f1dSLionel Sambuc c->algorithm_auth == SSL_aECDH || c->algorithm_auth == SSL_aECDSA)
117*0a6a1f1dSLionel Sambuc return 0;
118*0a6a1f1dSLionel Sambuc if (p != NULL) {
119ebfedea0SLionel Sambuc l = c->id;
120ebfedea0SLionel Sambuc p[0] = ((unsigned char)(l >> 16L)) & 0xFF;
121ebfedea0SLionel Sambuc p[1] = ((unsigned char)(l >> 8L)) & 0xFF;
122ebfedea0SLionel Sambuc p[2] = ((unsigned char)(l)) & 0xFF;
123ebfedea0SLionel Sambuc }
124ebfedea0SLionel Sambuc return (3);
125ebfedea0SLionel Sambuc }
126ebfedea0SLionel Sambuc
ssl23_read(SSL * s,void * buf,int len)127ebfedea0SLionel Sambuc int ssl23_read(SSL *s, void *buf, int len)
128ebfedea0SLionel Sambuc {
129ebfedea0SLionel Sambuc int n;
130ebfedea0SLionel Sambuc
131ebfedea0SLionel Sambuc clear_sys_error();
132*0a6a1f1dSLionel Sambuc if (SSL_in_init(s) && (!s->in_handshake)) {
133ebfedea0SLionel Sambuc n = s->handshake_func(s);
134*0a6a1f1dSLionel Sambuc if (n < 0)
135*0a6a1f1dSLionel Sambuc return (n);
136*0a6a1f1dSLionel Sambuc if (n == 0) {
137ebfedea0SLionel Sambuc SSLerr(SSL_F_SSL23_READ, SSL_R_SSL_HANDSHAKE_FAILURE);
138ebfedea0SLionel Sambuc return (-1);
139ebfedea0SLionel Sambuc }
140ebfedea0SLionel Sambuc return (SSL_read(s, buf, len));
141*0a6a1f1dSLionel Sambuc } else {
142ebfedea0SLionel Sambuc ssl_undefined_function(s);
143ebfedea0SLionel Sambuc return (-1);
144ebfedea0SLionel Sambuc }
145ebfedea0SLionel Sambuc }
146ebfedea0SLionel Sambuc
ssl23_peek(SSL * s,void * buf,int len)147ebfedea0SLionel Sambuc int ssl23_peek(SSL *s, void *buf, int len)
148ebfedea0SLionel Sambuc {
149ebfedea0SLionel Sambuc int n;
150ebfedea0SLionel Sambuc
151ebfedea0SLionel Sambuc clear_sys_error();
152*0a6a1f1dSLionel Sambuc if (SSL_in_init(s) && (!s->in_handshake)) {
153ebfedea0SLionel Sambuc n = s->handshake_func(s);
154*0a6a1f1dSLionel Sambuc if (n < 0)
155*0a6a1f1dSLionel Sambuc return (n);
156*0a6a1f1dSLionel Sambuc if (n == 0) {
157ebfedea0SLionel Sambuc SSLerr(SSL_F_SSL23_PEEK, SSL_R_SSL_HANDSHAKE_FAILURE);
158ebfedea0SLionel Sambuc return (-1);
159ebfedea0SLionel Sambuc }
160ebfedea0SLionel Sambuc return (SSL_peek(s, buf, len));
161*0a6a1f1dSLionel Sambuc } else {
162ebfedea0SLionel Sambuc ssl_undefined_function(s);
163ebfedea0SLionel Sambuc return (-1);
164ebfedea0SLionel Sambuc }
165ebfedea0SLionel Sambuc }
166ebfedea0SLionel Sambuc
ssl23_write(SSL * s,const void * buf,int len)167ebfedea0SLionel Sambuc int ssl23_write(SSL *s, const void *buf, int len)
168ebfedea0SLionel Sambuc {
169ebfedea0SLionel Sambuc int n;
170ebfedea0SLionel Sambuc
171ebfedea0SLionel Sambuc clear_sys_error();
172*0a6a1f1dSLionel Sambuc if (SSL_in_init(s) && (!s->in_handshake)) {
173ebfedea0SLionel Sambuc n = s->handshake_func(s);
174*0a6a1f1dSLionel Sambuc if (n < 0)
175*0a6a1f1dSLionel Sambuc return (n);
176*0a6a1f1dSLionel Sambuc if (n == 0) {
177ebfedea0SLionel Sambuc SSLerr(SSL_F_SSL23_WRITE, SSL_R_SSL_HANDSHAKE_FAILURE);
178ebfedea0SLionel Sambuc return (-1);
179ebfedea0SLionel Sambuc }
180ebfedea0SLionel Sambuc return (SSL_write(s, buf, len));
181*0a6a1f1dSLionel Sambuc } else {
182ebfedea0SLionel Sambuc ssl_undefined_function(s);
183ebfedea0SLionel Sambuc return (-1);
184ebfedea0SLionel Sambuc }
185ebfedea0SLionel Sambuc }
186