[thirdparty/openssl.git] / ssl / s23_srvr.c

/* ssl/s23_srvr.c */
/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
 * All rights reserved.
 *
 * This package is an SSL implementation written
 * by Eric Young (eay@cryptsoft.com).
 * The implementation was written so as to conform with Netscapes SSL.
 * 
 * This library is free for commercial and non-commercial use as long as
 * the following conditions are aheared to.  The following conditions
 * apply to all code found in this distribution, be it the RC4, RSA,
 * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
 * included with this distribution is covered by the same copyright terms
 * except that the holder is Tim Hudson (tjh@cryptsoft.com).
 * 
 * Copyright remains Eric Young's, and as such any Copyright notices in
 * the code are not to be removed.
 * If this package is used in a product, Eric Young should be given attribution
 * as the author of the parts of the library used.
 * This can be in the form of a textual message at program startup or
 * in documentation (online or textual) provided with the package.
 * 
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *    "This product includes cryptographic software written by
 *     Eric Young (eay@cryptsoft.com)"
 *    The word 'cryptographic' can be left out if the rouines from the library
 *    being used are not cryptographic related :-).
 * 4. If you include any Windows specific code (or a derivative thereof) from 
 *    the apps directory (application code) you must include an acknowledgement:
 *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
 * 
 * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 * 
 * The licence and distribution terms for any publically available version or
 * derivative of this code cannot be changed.  i.e. this code cannot simply be
 * copied and put under another distribution licence
 * [including the GNU Public Licence.]
 */
/* ====================================================================
 * Copyright (c) 1998-2006 The OpenSSL Project.  All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer. 
 *
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in
 *    the documentation and/or other materials provided with the
 *    distribution.
 *
 * 3. All advertising materials mentioning features or use of this
 *    software must display the following acknowledgment:
 *    "This product includes software developed by the OpenSSL Project
 *    for use in the OpenSSL Toolkit. (http://www.openssl.org/)"
 *
 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
 *    endorse or promote products derived from this software without
 *    prior written permission. For written permission, please contact
 *    openssl-core@openssl.org.
 *
 * 5. Products derived from this software may not be called "OpenSSL"
 *    nor may "OpenSSL" appear in their names without prior written
 *    permission of the OpenSSL Project.
 *
 * 6. Redistributions of any form whatsoever must retain the following
 *    acknowledgment:
 *    "This product includes software developed by the OpenSSL Project
 *    for use in the OpenSSL Toolkit (http://www.openssl.org/)"
 *
 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
 * OF THE POSSIBILITY OF SUCH DAMAGE.
 * ====================================================================
 *
 * This product includes cryptographic software written by Eric Young
 * (eay@cryptsoft.com).  This product includes software written by Tim
 * Hudson (tjh@cryptsoft.com).
 *
 */

#include <stdio.h>
#include "ssl_locl.h"
#include <openssl/buffer.h>
#include <openssl/rand.h>
#include <openssl/objects.h>
#include <openssl/evp.h>

static const SSL_METHOD *ssl23_get_server_method(int ver);
int ssl23_get_client_hello(SSL *s);
static const SSL_METHOD *ssl23_get_server_method(int ver)
	{
#ifndef OPENSSL_NO_SSL2
	if (ver == SSL2_VERSION)
		return(SSLv2_server_method());
#endif
	if (ver == SSL3_VERSION)
		return(SSLv3_server_method());
	else if (ver == TLS1_VERSION)
		return(TLSv1_server_method());
	else
		return(NULL);
	}

IMPLEMENT_ssl23_meth_func(SSLv23_server_method,
			ssl23_accept,
			ssl_undefined_function,
			ssl23_get_server_method)

int ssl23_accept(SSL *s)
	{
	BUF_MEM *buf;
	unsigned long Time=(unsigned long)time(NULL);
	void (*cb)(const SSL *ssl,int type,int val)=NULL;
	int ret= -1;
	int new_state,state;

	RAND_add(&Time,sizeof(Time),0);
	ERR_clear_error();
	clear_sys_error();

	if (s->info_callback != NULL)
		cb=s->info_callback;
	else if (s->ctx->info_callback != NULL)
		cb=s->ctx->info_callback;
	
	s->in_handshake++;
	if (!SSL_in_init(s) || SSL_in_before(s)) SSL_clear(s); 

	for (;;)
		{
		state=s->state;

		switch(s->state)
			{
		case SSL_ST_BEFORE:
		case SSL_ST_ACCEPT:
		case SSL_ST_BEFORE|SSL_ST_ACCEPT:
		case SSL_ST_OK|SSL_ST_ACCEPT:

			s->server=1;
			if (cb != NULL) cb(s,SSL_CB_HANDSHAKE_START,1);

			/* s->version=SSL3_VERSION; */
			s->type=SSL_ST_ACCEPT;

			if (s->init_buf == NULL)
				{
				if ((buf=BUF_MEM_new()) == NULL)
					{
					ret= -1;
					goto end;
					}
				if (!BUF_MEM_grow(buf,SSL3_RT_MAX_PLAIN_LENGTH))
					{
					ret= -1;
					goto end;
					}
				s->init_buf=buf;
				}

			ssl3_init_finished_mac(s);

			s->state=SSL23_ST_SR_CLNT_HELLO_A;
			s->ctx->stats.sess_accept++;
			s->init_num=0;
			break;

		case SSL23_ST_SR_CLNT_HELLO_A:
		case SSL23_ST_SR_CLNT_HELLO_B:

			s->shutdown=0;
			ret=ssl23_get_client_hello(s);
			if (ret >= 0) cb=NULL;
			goto end;
			/* break; */

		default:
			SSLerr(SSL_F_SSL23_ACCEPT,SSL_R_UNKNOWN_STATE);
			ret= -1;
			goto end;
			/* break; */
			}

		if ((cb != NULL) && (s->state != state))
			{
			new_state=s->state;
			s->state=state;
			cb(s,SSL_CB_ACCEPT_LOOP,1);
			s->state=new_state;
			}
		}
end:
	s->in_handshake--;
	if (cb != NULL)
		cb(s,SSL_CB_ACCEPT_EXIT,ret);
	return(ret);
	}


int ssl23_get_client_hello(SSL *s)
	{
	char buf_space[11]; /* Request this many bytes in initial read.
	                     * We can detect SSL 3.0/TLS 1.0 Client Hellos
	                     * ('type == 3') correctly only when the following
	                     * is in a single record, which is not guaranteed by
	                     * the protocol specification:
	                     * Byte  Content
	                     *  0     type            \
	                     *  1/2   version          > record header
	                     *  3/4   length          /
	                     *  5     msg_type        \
	                     *  6-8   length           > Client Hello message
	                     *  9/10  client_version  /
	                     */
	char *buf= &(buf_space[0]);
	unsigned char *p,*d,*d_len,*dd;
	unsigned int i;
	unsigned int csl,sil,cl;
	int n=0,j;
	int type=0;
	int v[2];

	if (s->state ==	SSL23_ST_SR_CLNT_HELLO_A)
		{
		/* read the initial header */
		v[0]=v[1]=0;

		if (!ssl3_setup_buffers(s)) goto err;

		n=ssl23_read_bytes(s, sizeof buf_space);
		if (n != sizeof buf_space) return(n); /* n == -1 || n == 0 */

		p=s->packet;

		memcpy(buf,p,n);

		if ((p[0] & 0x80) && (p[2] == SSL2_MT_CLIENT_HELLO))
			{
			/*
			 * SSLv2 header
			 */
			if ((p[3] == 0x00) && (p[4] == 0x02))
				{
				v[0]=p[3]; v[1]=p[4];
				/* SSLv2 */
				if (!(s->options & SSL_OP_NO_SSLv2))
					type=1;
				}
			else if (p[3] == SSL3_VERSION_MAJOR)
				{
				v[0]=p[3]; v[1]=p[4];
				/* SSLv3/TLSv1 */
				if (p[4] >= TLS1_VERSION_MINOR)
					{
					if (!(s->options & SSL_OP_NO_TLSv1))
						{
						s->version=TLS1_VERSION;
						/* type=2; */ /* done later to survive restarts */
						s->state=SSL23_ST_SR_CLNT_HELLO_B;
						}
					else if (!(s->options & SSL_OP_NO_SSLv3))
						{
						s->version=SSL3_VERSION;
						/* type=2; */
						s->state=SSL23_ST_SR_CLNT_HELLO_B;
						}
					else if (!(s->options & SSL_OP_NO_SSLv2))
						{
						type=1;
						}
					}
				else if (!(s->options & SSL_OP_NO_SSLv3))
					{
					s->version=SSL3_VERSION;
					/* type=2; */
					s->state=SSL23_ST_SR_CLNT_HELLO_B;
					}
				else if (!(s->options & SSL_OP_NO_SSLv2))
					type=1;

				}
			}
		else if ((p[0] == SSL3_RT_HANDSHAKE) &&
			 (p[1] == SSL3_VERSION_MAJOR) &&
			 (p[5] == SSL3_MT_CLIENT_HELLO) &&
			 ((p[3] == 0 && p[4] < 5 /* silly record length? */)
				|| (p[9] == p[1])))
			{
			/*
			 * SSLv3 or tls1 header
			 */
			
			v[0]=p[1]; /* major version (= SSL3_VERSION_MAJOR) */
			/* We must look at client_version inside the Client Hello message
			 * to get the correct minor version.
			 * However if we have only a pathologically small fragment of the
			 * Client Hello message, this would be difficult, and we'd have
			 * to read more records to find out.
			 * No known SSL 3.0 client fragments ClientHello like this,
			 * so we simply assume TLS 1.0 to avoid protocol version downgrade
			 * attacks. */
			if (p[3] == 0 && p[4] < 6)
				{
#if 0
				SSLerr(SSL_F_SSL23_GET_CLIENT_HELLO,SSL_R_RECORD_TOO_SMALL);
				goto err;
#else
				v[1] = TLS1_VERSION_MINOR;
#endif
				}
			else
				v[1]=p[10]; /* minor version according to client_version */
			if (v[1] >= TLS1_VERSION_MINOR)
				{
				if (!(s->options & SSL_OP_NO_TLSv1))
					{
					s->version=TLS1_VERSION;
					type=3;
					}
				else if (!(s->options & SSL_OP_NO_SSLv3))
					{
					s->version=SSL3_VERSION;
					type=3;
					}
				}
			else
				{
				/* client requests SSL 3.0 */
				if (!(s->options & SSL_OP_NO_SSLv3))
					{
					s->version=SSL3_VERSION;
					type=3;
					}
				else if (!(s->options & SSL_OP_NO_TLSv1))
					{
					/* we won't be able to use TLS of course,
					 * but this will send an appropriate alert */
					s->version=TLS1_VERSION;
					type=3;
					}
				}
			}
		else if ((strncmp("GET ", (char *)p,4) == 0) ||
			 (strncmp("POST ",(char *)p,5) == 0) ||
			 (strncmp("HEAD ",(char *)p,5) == 0) ||
			 (strncmp("PUT ", (char *)p,4) == 0))
			{
			SSLerr(SSL_F_SSL23_GET_CLIENT_HELLO,SSL_R_HTTP_REQUEST);
			goto err;
			}
		else if (strncmp("CONNECT",(char *)p,7) == 0)
			{
			SSLerr(SSL_F_SSL23_GET_CLIENT_HELLO,SSL_R_HTTPS_PROXY_REQUEST);
			goto err;
			}
		}

	if (s->state == SSL23_ST_SR_CLNT_HELLO_B)
		{
		/* we have SSLv3/TLSv1 in an SSLv2 header
		 * (other cases skip this state) */

		type=2;
		p=s->packet;
		v[0] = p[3]; /* == SSL3_VERSION_MAJOR */
		v[1] = p[4];

		n=((p[0]&0x7f)<<8)|p[1];
		if (n > (1024*4))
			{
			SSLerr(SSL_F_SSL23_GET_CLIENT_HELLO,SSL_R_RECORD_TOO_LARGE);
			goto err;
			}

		j=ssl23_read_bytes(s,n+2);
		if (j <= 0) return(j);

		ssl3_finish_mac(s, s->packet+2, s->packet_length-2);
		if (s->msg_callback)
			s->msg_callback(0, SSL2_VERSION, 0, s->packet+2, s->packet_length-2, s, s->msg_callback_arg); /* CLIENT-HELLO */

		p=s->packet;
		p+=5;
		n2s(p,csl);
		n2s(p,sil);
		n2s(p,cl);
		d=(unsigned char *)s->init_buf->data;
		if ((csl+sil+cl+11) != s->packet_length) /* We can't have TLS extensions in SSL 2.0 format
		                                          * Client Hello, can we? Error condition should be
		                                          * '>' otherweise */
			{
			SSLerr(SSL_F_SSL23_GET_CLIENT_HELLO,SSL_R_RECORD_LENGTH_MISMATCH);
			goto err;
			}

		/* record header: msg_type ... */
		*(d++) = SSL3_MT_CLIENT_HELLO;
		/* ... and length (actual value will be written later) */
		d_len = d;
		d += 3;

		/* client_version */
		*(d++) = SSL3_VERSION_MAJOR; /* == v[0] */
		*(d++) = v[1];

		/* lets populate the random area */
		/* get the challenge_length */
		i=(cl > SSL3_RANDOM_SIZE)?SSL3_RANDOM_SIZE:cl;
		memset(d,0,SSL3_RANDOM_SIZE);
		memcpy(&(d[SSL3_RANDOM_SIZE-i]),&(p[csl+sil]),i);
		d+=SSL3_RANDOM_SIZE;

		/* no session-id reuse */
		*(d++)=0;

		/* ciphers */
		j=0;
		dd=d;
		d+=2;
		for (i=0; i<csl; i+=3)
			{
			if (p[i] != 0) continue;
			*(d++)=p[i+1];
			*(d++)=p[i+2];
			j+=2;
			}
		s2n(j,dd);

		/* COMPRESSION */
		*(d++)=1;
		*(d++)=0;
		
#if 0
                /* copy any remaining data with may be extensions */
	        p = p+csl+sil+cl;
		while (p <  s->packet+s->packet_length)
			{
			*(d++)=*(p++);
			}
#endif

		i = (d-(unsigned char *)s->init_buf->data) - 4;
		l2n3((long)i, d_len);

		/* get the data reused from the init_buf */
		s->s3->tmp.reuse_message=1;
		s->s3->tmp.message_type=SSL3_MT_CLIENT_HELLO;
		s->s3->tmp.message_size=i;
		}

	/* imaginary new state (for program structure): */
	/* s->state = SSL23_SR_CLNT_HELLO_C */

	if (type == 1)
		{
#ifdef OPENSSL_NO_SSL2
		SSLerr(SSL_F_SSL23_GET_CLIENT_HELLO,SSL_R_UNSUPPORTED_PROTOCOL);
		goto err;
#else
		/* we are talking sslv2 */
		/* we need to clean up the SSLv3/TLSv1 setup and put in the
		 * sslv2 stuff. */

		if (s->s2 == NULL)
			{
			if (!ssl2_new(s))
				goto err;
			}
		else
			ssl2_clear(s);

		if (s->s3 != NULL) ssl3_free(s);

		if (!BUF_MEM_grow_clean(s->init_buf,
			SSL2_MAX_RECORD_LENGTH_3_BYTE_HEADER))
			{
			goto err;
			}

		s->state=SSL2_ST_GET_CLIENT_HELLO_A;
		if (s->options & SSL_OP_NO_TLSv1 && s->options & SSL_OP_NO_SSLv3)
			s->s2->ssl2_rollback=0;
		else
			/* reject SSL 2.0 session if client supports SSL 3.0 or TLS 1.0
			 * (SSL 3.0 draft/RFC 2246, App. E.2) */
			s->s2->ssl2_rollback=1;

		/* setup the n bytes we have read so we get them from
		 * the sslv2 buffer */
		s->rstate=SSL_ST_READ_HEADER;
		s->packet_length=n;
		s->packet= &(s->s2->rbuf[0]);
		memcpy(s->packet,buf,n);
		s->s2->rbuf_left=n;
		s->s2->rbuf_offs=0;

		s->method=SSLv2_server_method();
		s->handshake_func=s->method->ssl_accept;
#endif
		}

	if ((type == 2) || (type == 3))
		{
		/* we have SSLv3/TLSv1 (type 2: SSL2 style, type 3: SSL3/TLS style) */

		if (!ssl_init_wbio_buffer(s,1)) goto err;

		/* we are in this state */
		s->state=SSL3_ST_SR_CLNT_HELLO_A;

		if (type == 3)
			{
			/* put the 'n' bytes we have read into the input buffer
			 * for SSLv3 */
			s->rstate=SSL_ST_READ_HEADER;
			s->packet_length=n;
			s->packet= &(s->s3->rbuf.buf[0]);
			memcpy(s->packet,buf,n);
			s->s3->rbuf.left=n;
			s->s3->rbuf.offset=0;
			}
		else
			{
			s->packet_length=0;
			s->s3->rbuf.left=0;
			s->s3->rbuf.offset=0;
			}

		if (s->version == TLS1_VERSION)
			s->method = TLSv1_server_method();
		else
			s->method = SSLv3_server_method();
#if 0 /* ssl3_get_client_hello does this */
		s->client_version=(v[0]<<8)|v[1];
#endif
		s->handshake_func=s->method->ssl_accept;
		}
	
	if ((type < 1) || (type > 3))
		{
		/* bad, very bad */
		SSLerr(SSL_F_SSL23_GET_CLIENT_HELLO,SSL_R_UNKNOWN_PROTOCOL);
		goto err;
		}
	s->init_num=0;

	if (buf != buf_space) OPENSSL_free(buf);
	return(SSL_accept(s));
err:
	if (buf != buf_space) OPENSSL_free(buf);
	return(-1);
	}
Commit	Line	Data
d02b48c6	1	/* ssl/s23_srvr.c */
58964a49	2	/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
d02b48c6 RE	3	* All rights reserved.
	4	*
	5	* This package is an SSL implementation written
	6	* by Eric Young (eay@cryptsoft.com).
	7	* The implementation was written so as to conform with Netscapes SSL.
	8	*
	9	* This library is free for commercial and non-commercial use as long as
	10	* the following conditions are aheared to. The following conditions
	11	* apply to all code found in this distribution, be it the RC4, RSA,
	12	* lhash, DES, etc., code; not just the SSL code. The SSL documentation
	13	* included with this distribution is covered by the same copyright terms
	14	* except that the holder is Tim Hudson (tjh@cryptsoft.com).
	15	*
	16	* Copyright remains Eric Young's, and as such any Copyright notices in
	17	* the code are not to be removed.
	18	* If this package is used in a product, Eric Young should be given attribution
	19	* as the author of the parts of the library used.
	20	* This can be in the form of a textual message at program startup or
	21	* in documentation (online or textual) provided with the package.
	22	*
	23	* Redistribution and use in source and binary forms, with or without
	24	* modification, are permitted provided that the following conditions
	25	* are met:
	26	* 1. Redistributions of source code must retain the copyright
	27	* notice, this list of conditions and the following disclaimer.
	28	* 2. Redistributions in binary form must reproduce the above copyright
	29	* notice, this list of conditions and the following disclaimer in the
	30	* documentation and/or other materials provided with the distribution.
	31	* 3. All advertising materials mentioning features or use of this software
	32	* must display the following acknowledgement:
	33	* "This product includes cryptographic software written by
	34	* Eric Young (eay@cryptsoft.com)"
	35	* The word 'cryptographic' can be left out if the rouines from the library
	36	* being used are not cryptographic related :-).
	37	* 4. If you include any Windows specific code (or a derivative thereof) from
	38	* the apps directory (application code) you must include an acknowledgement:
	39	* "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
	40	*
	41	* THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
	42	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
	43	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
	44	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
	45	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
	46	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
	47	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
	48	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
	49	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
	50	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
	51	* SUCH DAMAGE.
	52	*
	53	* The licence and distribution terms for any publically available version or
	54	* derivative of this code cannot be changed. i.e. this code cannot simply be
	55	* copied and put under another distribution licence
	56	* [including the GNU Public Licence.]
	57	*/
a661b653	58	/* ====================================================================
f1fd4544	59	* Copyright (c) 1998-2006 The OpenSSL Project. All rights reserved.
a661b653 BM	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	*/
d02b48c6 RE	111
d02b48c6 RE	112	#include <stdio.h>
7b63c0fa	113	#include "ssl_locl.h"
ec577822 BM	114	#include <openssl/buffer.h>
	115	#include <openssl/rand.h>
	116	#include <openssl/objects.h>
	117	#include <openssl/evp.h>
d02b48c6	118
4ebb342f	119	static const SSL_METHOD *ssl23_get_server_method(int ver);
d02b48c6	120	int ssl23_get_client_hello(SSL *s);
4ebb342f	121	static const SSL_METHOD *ssl23_get_server_method(int ver)
d02b48c6	122	{
bc36ee62	123	#ifndef OPENSSL_NO_SSL2
58964a49	124	if (ver == SSL2_VERSION)
d02b48c6	125	return(SSLv2_server_method());
aa82db4f	126	#endif
79df9d62	127	if (ver == SSL3_VERSION)
d02b48c6	128	return(SSLv3_server_method());
58964a49 RE	129	else if (ver == TLS1_VERSION)
58964a49 RE	130	return(TLSv1_server_method());
d02b48c6 RE	131	else
	132	return(NULL);
	133	}
	134
f3b656b2 DSH	135	IMPLEMENT_ssl23_meth_func(SSLv23_server_method,
	136	ssl23_accept,
	137	ssl_undefined_function,
	138	ssl23_get_server_method)
d02b48c6	139
6b691a5c	140	int ssl23_accept(SSL *s)
d02b48c6 RE	141	{
d02b48c6 RE	142	BUF_MEM *buf;
f1fd4544	143	unsigned long Time=(unsigned long)time(NULL);
45d87a1f	144	void (cb)(const SSL ssl,int type,int val)=NULL;
d02b48c6 RE	145	int ret= -1;
	146	int new_state,state;
	147
eb952088	148	RAND_add(&Time,sizeof(Time),0);
d02b48c6	149	ERR_clear_error();
58964a49	150	clear_sys_error();
d02b48c6 RE	151
	152	if (s->info_callback != NULL)
	153	cb=s->info_callback;
	154	else if (s->ctx->info_callback != NULL)
	155	cb=s->ctx->info_callback;
	156
d02b48c6	157	s->in_handshake++;
979689aa	158	if (!SSL_in_init(s) \|\| SSL_in_before(s)) SSL_clear(s);
d02b48c6 RE	159
	160	for (;;)
	161	{
	162	state=s->state;
	163
	164	switch(s->state)
	165	{
	166	case SSL_ST_BEFORE:
	167	case SSL_ST_ACCEPT:
	168	case SSL_ST_BEFORE\|SSL_ST_ACCEPT:
	169	case SSL_ST_OK\|SSL_ST_ACCEPT:
	170
413c4f45	171	s->server=1;
d02b48c6 RE	172	if (cb != NULL) cb(s,SSL_CB_HANDSHAKE_START,1);
d02b48c6 RE	173
58964a49	174	/* s->version=SSL3_VERSION; */
d02b48c6 RE	175	s->type=SSL_ST_ACCEPT;
	176
	177	if (s->init_buf == NULL)
	178	{
	179	if ((buf=BUF_MEM_new()) == NULL)
	180	{
	181	ret= -1;
	182	goto end;
	183	}
	184	if (!BUF_MEM_grow(buf,SSL3_RT_MAX_PLAIN_LENGTH))
	185	{
	186	ret= -1;
	187	goto end;
	188	}
	189	s->init_buf=buf;
	190	}
	191
	192	ssl3_init_finished_mac(s);
	193
	194	s->state=SSL23_ST_SR_CLNT_HELLO_A;
413c4f45	195	s->ctx->stats.sess_accept++;
d02b48c6 RE	196	s->init_num=0;
	197	break;
	198
	199	case SSL23_ST_SR_CLNT_HELLO_A:
	200	case SSL23_ST_SR_CLNT_HELLO_B:
	201
	202	s->shutdown=0;
	203	ret=ssl23_get_client_hello(s);
	204	if (ret >= 0) cb=NULL;
	205	goto end;
dfeab068	206	/* break; */
d02b48c6 RE	207
	208	default:
	209	SSLerr(SSL_F_SSL23_ACCEPT,SSL_R_UNKNOWN_STATE);
	210	ret= -1;
	211	goto end;
	212	/* break; */
	213	}
	214
	215	if ((cb != NULL) && (s->state != state))
	216	{
	217	new_state=s->state;
	218	s->state=state;
	219	cb(s,SSL_CB_ACCEPT_LOOP,1);
	220	s->state=new_state;
	221	}
	222	}
	223	end:
ba1c6022	224	s->in_handshake--;
d02b48c6 RE	225	if (cb != NULL)
d02b48c6 RE	226	cb(s,SSL_CB_ACCEPT_EXIT,ret);
d02b48c6 RE	227	return(ret);
	228	}
	229
	230
6b691a5c	231	int ssl23_get_client_hello(SSL *s)
d02b48c6	232	{
c51ae173	233	char buf_space[11]; /* Request this many bytes in initial read.
dab6f095 BM	234	* We can detect SSL 3.0/TLS 1.0 Client Hellos
	235	* ('type == 3') correctly only when the following
	236	* is in a single record, which is not guaranteed by
	237	* the protocol specification:
c51ae173 BM	238	* Byte Content
	239	* 0 type \
	240	* 1/2 version > record header
	241	* 3/4 length /
	242	* 5 msg_type \
	243	* 6-8 length > Client Hello message
	244	* 9/10 client_version /
	245	*/
d02b48c6	246	char *buf= &(buf_space[0]);
48948d53	247	unsigned char p,d,d_len,dd;
d02b48c6 RE	248	unsigned int i;
d02b48c6 RE	249	unsigned int csl,sil,cl;
cb0369d8	250	int n=0,j;
4c5fac4a	251	int type=0;
413c4f45	252	int v[2];
d02b48c6	253
d02b48c6 RE	254	if (s->state == SSL23_ST_SR_CLNT_HELLO_A)
d02b48c6 RE	255	{
de1915e4 BM	256	/* read the initial header */
	257	v[0]=v[1]=0;
	258
d02b48c6 RE	259	if (!ssl3_setup_buffers(s)) goto err;
d02b48c6 RE	260
ba3a6e72 BM	261	n=ssl23_read_bytes(s, sizeof buf_space);
ba3a6e72 BM	262	if (n != sizeof buf_space) return(n); /* n == -1 \|\| n == 0 */
d02b48c6 RE	263
	264	p=s->packet;
	265
	266	memcpy(buf,p,n);
	267
	268	if ((p[0] & 0x80) && (p[2] == SSL2_MT_CLIENT_HELLO))
	269	{
074309b7 BM	270	/*
	271	* SSLv2 header
	272	*/
d02b48c6 RE	273	if ((p[3] == 0x00) && (p[4] == 0x02))
d02b48c6 RE	274	{
413c4f45	275	v[0]=p[3]; v[1]=p[4];
d02b48c6	276	/* SSLv2 */
58964a49 RE	277	if (!(s->options & SSL_OP_NO_SSLv2))
58964a49 RE	278	type=1;
d02b48c6 RE	279	}
	280	else if (p[3] == SSL3_VERSION_MAJOR)
	281	{
413c4f45	282	v[0]=p[3]; v[1]=p[4];
58964a49 RE	283	/* SSLv3/TLSv1 */
	284	if (p[4] >= TLS1_VERSION_MINOR)
	285	{
	286	if (!(s->options & SSL_OP_NO_TLSv1))
	287	{
cb0369d8	288	s->version=TLS1_VERSION;
074309b7	289	/* type=2; / / done later to survive restarts */
58964a49 RE	290	s->state=SSL23_ST_SR_CLNT_HELLO_B;
	291	}
	292	else if (!(s->options & SSL_OP_NO_SSLv3))
	293	{
cb0369d8	294	s->version=SSL3_VERSION;
074309b7	295	/* type=2; */
58964a49 RE	296	s->state=SSL23_ST_SR_CLNT_HELLO_B;
58964a49 RE	297	}
dfeab068 RE	298	else if (!(s->options & SSL_OP_NO_SSLv2))
	299	{
	300	type=1;
	301	}
58964a49 RE	302	}
58964a49 RE	303	else if (!(s->options & SSL_OP_NO_SSLv3))
074309b7	304	{
cb0369d8	305	s->version=SSL3_VERSION;
074309b7	306	/* type=2; */
58964a49	307	s->state=SSL23_ST_SR_CLNT_HELLO_B;
074309b7	308	}
dfeab068 RE	309	else if (!(s->options & SSL_OP_NO_SSLv2))
dfeab068 RE	310	type=1;
58964a49	311
d02b48c6 RE	312	}
	313	}
	314	else if ((p[0] == SSL3_RT_HANDSHAKE) &&
	315	(p[1] == SSL3_VERSION_MAJOR) &&
074309b7	316	(p[5] == SSL3_MT_CLIENT_HELLO) &&
dab6f095 BM	317	((p[3] == 0 && p[4] < 5 /* silly record length? */)
dab6f095 BM	318	\|\| (p[9] == p[1])))
d02b48c6	319	{
074309b7 BM	320	/*
	321	* SSLv3 or tls1 header
	322	*/
	323
f1192b7f	324	v[0]=p[1]; /* major version (= SSL3_VERSION_MAJOR) */
dab6f095	325	/* We must look at client_version inside the Client Hello message
f1192b7f BM	326	* to get the correct minor version.
f1192b7f BM	327	* However if we have only a pathologically small fragment of the
ba1c6022 BM	328	* Client Hello message, this would be difficult, and we'd have
	329	* to read more records to find out.
	330	* No known SSL 3.0 client fragments ClientHello like this,
	331	* so we simply assume TLS 1.0 to avoid protocol version downgrade
	332	* attacks. */
dab6f095	333	if (p[3] == 0 && p[4] < 6)
f1192b7f	334	{
ba1c6022	335	#if 0
f1192b7f BM	336	SSLerr(SSL_F_SSL23_GET_CLIENT_HELLO,SSL_R_RECORD_TOO_SMALL);
f1192b7f BM	337	goto err;
ba1c6022 BM	338	#else
	339	v[1] = TLS1_VERSION_MINOR;
	340	#endif
f1192b7f	341	}
ba1c6022 BM	342	else
ba1c6022 BM	343	v[1]=p[10]; /* minor version according to client_version */
f70df1b8	344	if (v[1] >= TLS1_VERSION_MINOR)
58964a49 RE	345	{
	346	if (!(s->options & SSL_OP_NO_TLSv1))
	347	{
cb0369d8	348	s->version=TLS1_VERSION;
58964a49	349	type=3;
58964a49 RE	350	}
58964a49 RE	351	else if (!(s->options & SSL_OP_NO_SSLv3))
cb0369d8 BM	352	{
cb0369d8 BM	353	s->version=SSL3_VERSION;
58964a49	354	type=3;
cb0369d8	355	}
58964a49	356	}
a661b653	357	else
ac7da000	358	{
a661b653 BM	359	/* client requests SSL 3.0 */
	360	if (!(s->options & SSL_OP_NO_SSLv3))
	361	{
	362	s->version=SSL3_VERSION;
	363	type=3;
	364	}
	365	else if (!(s->options & SSL_OP_NO_TLSv1))
	366	{
	367	/* we won't be able to use TLS of course,
	368	* but this will send an appropriate alert */
	369	s->version=TLS1_VERSION;
	370	type=3;
	371	}
ac7da000	372	}
d02b48c6	373	}
dfeab068 RE	374	else if ((strncmp("GET ", (char *)p,4) == 0) \|\|
	375	(strncmp("POST ",(char *)p,5) == 0) \|\|
	376	(strncmp("HEAD ",(char *)p,5) == 0) \|\|
	377	(strncmp("PUT ", (char *)p,4) == 0))
d02b48c6	378	{
58964a49	379	SSLerr(SSL_F_SSL23_GET_CLIENT_HELLO,SSL_R_HTTP_REQUEST);
d02b48c6 RE	380	goto err;
d02b48c6 RE	381	}
dfeab068	382	else if (strncmp("CONNECT",(char *)p,7) == 0)
d02b48c6	383	{
58964a49	384	SSLerr(SSL_F_SSL23_GET_CLIENT_HELLO,SSL_R_HTTPS_PROXY_REQUEST);
d02b48c6 RE	385	goto err;
	386	}
	387	}
	388
d02b48c6 RE	389	if (s->state == SSL23_ST_SR_CLNT_HELLO_B)
d02b48c6 RE	390	{
cb0369d8 BM	391	/* we have SSLv3/TLSv1 in an SSLv2 header
	392	* (other cases skip this state) */
	393
d02b48c6 RE	394	type=2;
d02b48c6 RE	395	p=s->packet;
cb0369d8	396	v[0] = p[3]; /* == SSL3_VERSION_MAJOR */
de1915e4	397	v[1] = p[4];
cb0369d8	398
d02b48c6 RE	399	n=((p[0]&0x7f)<<8)\|p[1];
	400	if (n > (1024*4))
	401	{
	402	SSLerr(SSL_F_SSL23_GET_CLIENT_HELLO,SSL_R_RECORD_TOO_LARGE);
	403	goto err;
	404	}
	405
	406	j=ssl23_read_bytes(s,n+2);
	407	if (j <= 0) return(j);
	408
cf82191d BM	409	ssl3_finish_mac(s, s->packet+2, s->packet_length-2);
	410	if (s->msg_callback)
	411	s->msg_callback(0, SSL2_VERSION, 0, s->packet+2, s->packet_length-2, s, s->msg_callback_arg); /* CLIENT-HELLO */
d02b48c6 RE	412
	413	p=s->packet;
	414	p+=5;
	415	n2s(p,csl);
	416	n2s(p,sil);
	417	n2s(p,cl);
	418	d=(unsigned char *)s->init_buf->data;
f1fd4544 BM	419	if ((csl+sil+cl+11) != s->packet_length) /* We can't have TLS extensions in SSL 2.0 format
	420	* Client Hello, can we? Error condition should be
	421	* '>' otherweise */
d02b48c6 RE	422	{
	423	SSLerr(SSL_F_SSL23_GET_CLIENT_HELLO,SSL_R_RECORD_LENGTH_MISMATCH);
	424	goto err;
	425	}
	426
9ba3ec91 BM	427	/* record header: msg_type ... */
9ba3ec91 BM	428	*(d++) = SSL3_MT_CLIENT_HELLO;
48948d53	429	/* ... and length (actual value will be written later) */
9ba3ec91 BM	430	d_len = d;
9ba3ec91 BM	431	d += 3;
48948d53 BM	432
48948d53 BM	433	/* client_version */
cb0369d8 BM	434	(d++) = SSL3_VERSION_MAJOR; / == v[0] */
cb0369d8 BM	435	*(d++) = v[1];
d02b48c6 RE	436
d02b48c6 RE	437	/* lets populate the random area */
657e60fa	438	/* get the challenge_length */
d02b48c6 RE	439	i=(cl > SSL3_RANDOM_SIZE)?SSL3_RANDOM_SIZE:cl;
	440	memset(d,0,SSL3_RANDOM_SIZE);
	441	memcpy(&(d[SSL3_RANDOM_SIZE-i]),&(p[csl+sil]),i);
	442	d+=SSL3_RANDOM_SIZE;
	443
	444	/* no session-id reuse */
	445	*(d++)=0;
	446
	447	/* ciphers */
	448	j=0;
	449	dd=d;
	450	d+=2;
	451	for (i=0; i<csl; i+=3)
	452	{
	453	if (p[i] != 0) continue;
	454	*(d++)=p[i+1];
	455	*(d++)=p[i+2];
	456	j+=2;
	457	}
	458	s2n(j,dd);
	459
dfeab068	460	/* COMPRESSION */
d02b48c6 RE	461	*(d++)=1;
	462	*(d++)=0;
	463
f1fd4544	464	#if 0
ed3883d2	465	/* copy any remaining data with may be extensions */
f1fd4544 BM	466	p = p+csl+sil+cl;
	467	while (p < s->packet+s->packet_length)
	468	{
ed3883d2	469	(d++)=(p++);
f1fd4544 BM	470	}
f1fd4544 BM	471	#endif
ed3883d2	472
2fb3f002	473	i = (d-(unsigned char *)s->init_buf->data) - 4;
9ba3ec91	474	l2n3((long)i, d_len);
d02b48c6 RE	475
	476	/* get the data reused from the init_buf */
	477	s->s3->tmp.reuse_message=1;
	478	s->s3->tmp.message_type=SSL3_MT_CLIENT_HELLO;
	479	s->s3->tmp.message_size=i;
	480	}
	481
074309b7 BM	482	/* imaginary new state (for program structure): */
	483	/* s->state = SSL23_SR_CLNT_HELLO_C */
	484
d02b48c6 RE	485	if (type == 1)
d02b48c6 RE	486	{
bc36ee62	487	#ifdef OPENSSL_NO_SSL2
cef80e8c	488	SSLerr(SSL_F_SSL23_GET_CLIENT_HELLO,SSL_R_UNSUPPORTED_PROTOCOL);
aa82db4f UM	489	goto err;
aa82db4f UM	490	#else
d02b48c6	491	/* we are talking sslv2 */
58964a49	492	/* we need to clean up the SSLv3/TLSv1 setup and put in the
d02b48c6 RE	493	* sslv2 stuff. */
	494
	495	if (s->s2 == NULL)
	496	{
	497	if (!ssl2_new(s))
	498	goto err;
	499	}
	500	else
	501	ssl2_clear(s);
	502
	503	if (s->s3 != NULL) ssl3_free(s);
	504
54a656ef	505	if (!BUF_MEM_grow_clean(s->init_buf,
d02b48c6 RE	506	SSL2_MAX_RECORD_LENGTH_3_BYTE_HEADER))
	507	{
	508	goto err;
	509	}
	510
	511	s->state=SSL2_ST_GET_CLIENT_HELLO_A;
72dce768	512	if (s->options & SSL_OP_NO_TLSv1 && s->options & SSL_OP_NO_SSLv3)
d02b48c6 RE	513	s->s2->ssl2_rollback=0;
d02b48c6 RE	514	else
aa826d88 BM	515	/* reject SSL 2.0 session if client supports SSL 3.0 or TLS 1.0
aa826d88 BM	516	* (SSL 3.0 draft/RFC 2246, App. E.2) */
d02b48c6 RE	517	s->s2->ssl2_rollback=1;
d02b48c6 RE	518
074309b7	519	/* setup the n bytes we have read so we get them from
d02b48c6 RE	520	* the sslv2 buffer */
	521	s->rstate=SSL_ST_READ_HEADER;
	522	s->packet_length=n;
	523	s->packet= &(s->s2->rbuf[0]);
	524	memcpy(s->packet,buf,n);
	525	s->s2->rbuf_left=n;
	526	s->s2->rbuf_offs=0;
	527
	528	s->method=SSLv2_server_method();
	529	s->handshake_func=s->method->ssl_accept;
aa82db4f	530	#endif
d02b48c6 RE	531	}
	532
	533	if ((type == 2) \|\| (type == 3))
	534	{
074309b7	535	/* we have SSLv3/TLSv1 (type 2: SSL2 style, type 3: SSL3/TLS style) */
d02b48c6	536
58964a49	537	if (!ssl_init_wbio_buffer(s,1)) goto err;
d02b48c6 RE	538
	539	/* we are in this state */
	540	s->state=SSL3_ST_SR_CLNT_HELLO_A;
	541
	542	if (type == 3)
	543	{
	544	/* put the 'n' bytes we have read into the input buffer
	545	* for SSLv3 */
	546	s->rstate=SSL_ST_READ_HEADER;
	547	s->packet_length=n;
	548	s->packet= &(s->s3->rbuf.buf[0]);
	549	memcpy(s->packet,buf,n);
	550	s->s3->rbuf.left=n;
	551	s->s3->rbuf.offset=0;
	552	}
	553	else
	554	{
	555	s->packet_length=0;
	556	s->s3->rbuf.left=0;
	557	s->s3->rbuf.offset=0;
	558	}
	559
cb0369d8 BM	560	if (s->version == TLS1_VERSION)
cb0369d8 BM	561	s->method = TLSv1_server_method();
58964a49	562	else
cb0369d8	563	s->method = SSLv3_server_method();
074309b7	564	#if 0 /* ssl3_get_client_hello does this */
413c4f45	565	s->client_version=(v[0]<<8)\|v[1];
074309b7	566	#endif
d02b48c6 RE	567	s->handshake_func=s->method->ssl_accept;
	568	}
	569
	570	if ((type < 1) \|\| (type > 3))
	571	{
	572	/* bad, very bad */
	573	SSLerr(SSL_F_SSL23_GET_CLIENT_HELLO,SSL_R_UNKNOWN_PROTOCOL);
	574	goto err;
	575	}
	576	s->init_num=0;
	577
26a3a48d	578	if (buf != buf_space) OPENSSL_free(buf);
d02b48c6 RE	579	return(SSL_accept(s));
d02b48c6 RE	580	err:
26a3a48d	581	if (buf != buf_space) OPENSSL_free(buf);
d02b48c6 RE	582	return(-1);
d02b48c6 RE	583	}