Port fix for bug #419 from branch_1_1
[freeradius.git] / src / modules / rlm_eap / libeap / eap_tls.h
1 /*
2  * eap_tls.h
3  *
4  * Version:     $Id$
5  *
6  *   This program is free software; you can redistribute it and/or modify
7  *   it under the terms of the GNU General Public License as published by
8  *   the Free Software Foundation; either version 2 of the License, or
9  *   (at your option) any later version.
10  *
11  *   This program is distributed in the hope that it will be useful,
12  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
13  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  *   GNU General Public License for more details.
15  *
16  *   You should have received a copy of the GNU General Public License
17  *   along with this program; if not, write to the Free Software
18  *   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19  *
20  * Copyright 2001  hereUare Communications, Inc. <raghud@hereuare.com>
21  * Copyright 2003  Alan DeKok <aland@freeradius.org>
22  * Copyright 2006  The FreeRADIUS server project
23  */
24 #ifndef _EAP_TLS_H
25 #define _EAP_TLS_H
26
27 #include <freeradius-devel/ident.h>
28 RCSIDH(eap_tls_h, "$Id$")
29
30 #include <stdio.h>
31 #include <stdlib.h>
32 #include <string.h>
33 #include <errno.h>
34 #include <sys/types.h>
35 #include <sys/socket.h>
36 #include <netinet/in.h>
37 #include <netinet/tcp.h>
38 #include <netdb.h>
39 #include <fcntl.h>
40 #include <signal.h>
41
42 #include <ctype.h>
43 #include <sys/time.h>
44 #include <arpa/inet.h>
45
46 #ifdef HAVE_LIMITS_H
47 #include <limits.h>
48 #endif
49
50 #ifdef HAVE_UNISTD_H
51 #include <unistd.h>
52 #endif
53
54 #ifndef NO_OPENSSL
55 /*
56  *      For RH 9, which apparently needs this.
57  */
58 #ifndef OPENSSL_NO_KRB5
59 #define OPENSSL_NO_KRB5
60 #endif
61 #include <openssl/err.h>
62 #ifdef HAVE_OPENSSL_ENGINE_H
63 #include <openssl/engine.h>
64 #endif
65 #include <openssl/ssl.h>
66 #endif /* !defined(NO_OPENSSL) */
67
68 #include "eap.h"
69
70 typedef enum {
71         EAPTLS_INVALID = 0,             /* invalid, don't reply */
72         EAPTLS_REQUEST,                 /* request, ok to send, invalid to receive */
73         EAPTLS_RESPONSE,                /* response, ok to receive, invalid to send */
74         EAPTLS_SUCCESS,                 /* success, send success */
75         EAPTLS_FAIL,                    /* fail, send fail */
76         EAPTLS_NOOP,                    /* noop, continue */
77
78         EAPTLS_START,                   /* start, ok to send, invalid to receive */
79         EAPTLS_OK,                      /* ok, continue */
80         EAPTLS_ACK,                     /* acknowledge, continue */
81         EAPTLS_FIRST_FRAGMENT,          /* first fragment */
82         EAPTLS_MORE_FRAGMENTS,          /* more fragments, to send/receive */
83         EAPTLS_LENGTH_INCLUDED,                 /* length included */
84         EAPTLS_MORE_FRAGMENTS_WITH_LENGTH,   /* more fragments with length */
85         EAPTLS_HANDLED                  /* tls code has handled it */
86 } eaptls_status_t;
87
88 #define MAX_RECORD_SIZE 16384
89
90 /*
91  *      A single TLS record may be up to 16384 octets in length, but a
92  *      TLS message may span multiple TLS records, and a TLS
93  *      certificate message may in principle be as long as 16MB.
94  *
95  *      However, note that in order to protect against reassembly
96  *      lockup and denial of service attacks, it may be desirable for
97  *      an implementation to set a maximum size for one such group of
98  *      TLS messages.
99  *
100  *      The TLS Message Length field is four octets, and provides the
101  *      total length of the TLS message or set of messages that is
102  *      being fragmented; this simplifies buffer allocation.
103  */
104
105 /*
106  * FIXME: Dynamic allocation of buffer to overcome MAX_RECORD_SIZE overflows.
107  *      or configure TLS not to exceed MAX_RECORD_SIZE.
108  */
109 typedef struct _record_t {
110         unsigned char data[MAX_RECORD_SIZE];
111         unsigned int  used;
112 } record_t;
113
114 typedef struct _tls_info_t {
115         unsigned char   origin;
116         unsigned char   content_type;
117         unsigned char   handshake_type;
118         unsigned char   alert_level;
119         unsigned char   alert_description;
120         char            info_description[256];
121         size_t          record_len;
122         int             version;
123         char            initialized;
124 } tls_info_t;
125
126 /*
127  * tls_session_t Structure gets stored as opaque in EAP_HANDLER
128  * This contains EAP-REQUEST specific data
129  * (ie EAPTLS_DATA(fragment), EAPTLS-ALERT, EAPTLS-REQUEST ...)
130  *
131  * clean_in  - data that needs to be sent but only after it is soiled.
132  * dirty_in  - data EAP server receives.
133  * clean_out - data that is cleaned after receiving.
134  * dirty_out - data EAP server sends.
135  * offset    - current fragment size transmitted
136  * fragment  - Flag, In fragment mode or not.
137  * tls_msg_len - Actual/Total TLS message length.
138  * length_flag - A flag to include length in every TLS Data/Alert packet
139  *                                      if set to no then only the first fragment contains length
140  */
141 typedef struct _tls_session_t {
142         SSL             *ssl;
143         tls_info_t      info;
144
145         BIO             *into_ssl;
146         BIO             *from_ssl;
147         record_t        clean_in;
148         record_t        clean_out;
149         record_t        dirty_in;
150         record_t        dirty_out;
151
152         void            (*record_init)(record_t *buf);
153         void            (*record_close)(record_t *buf);
154         unsigned int    (*record_plus)(record_t *buf, const void *ptr,
155                                        unsigned int size);
156         unsigned int    (*record_minus)(record_t *buf, void *ptr,
157                                         unsigned int size);
158         
159
160         /*
161          * Framed-MTU attribute in RADIUS,
162          * if present, can also be used to set this
163          */
164         unsigned int    offset;
165         unsigned int    tls_msg_len;
166         int             fragment;
167         int             length_flag;
168         int             peap_flag;
169
170         /*
171          *      Used by TTLS & PEAP to keep track of other per-session
172          *      data.
173          */
174         void            *opaque;
175         void            (*free_opaque)(void *opaque);
176 } tls_session_t;
177
178
179 /*
180  *      Externally exported TLS functions.
181  */
182 eaptls_status_t eaptls_process(EAP_HANDLER *handler);
183
184 int             eaptls_success(EAP_DS *eap_ds, int peap_flag);
185 int             eaptls_fail(EAP_DS *eap_ds, int peap_flag);
186 int             eaptls_request(EAP_DS *eap_ds, tls_session_t *ssn);
187
188
189 /* MPPE key generation */
190 void            eaptls_gen_mppe_keys(VALUE_PAIR **reply_vps, SSL *s,
191                                      const char *prf_label);
192 void            eapttls_gen_challenge(SSL *s, char *buffer, int size);
193
194 #define BUFFER_SIZE 1024
195
196 #define EAP_TLS_START           1
197 #define EAP_TLS_ACK             2
198 #define EAP_TLS_SUCCESS         3
199 #define EAP_TLS_FAIL            4
200 #define EAP_TLS_ALERT           9
201
202 #define TLS_HEADER_LEN          4
203
204 /*
205  *      RFC 2716, Section 4.2:
206  *
207  *         Flags
208  *
209  *      0 1 2 3 4 5 6 7 8
210  *      +-+-+-+-+-+-+-+-+
211  *      |L M S R R R R R|
212  *      +-+-+-+-+-+-+-+-+
213  *
214  *      L = Length included
215  *      M = More fragments
216  *      S = EAP-TLS start
217  *      R = Reserved
218  */
219 #define TLS_START(x)            (((x) & 0x20) != 0)
220 #define TLS_MORE_FRAGMENTS(x)   (((x) & 0x40) != 0)
221 #define TLS_LENGTH_INCLUDED(x)  (((x) & 0x80) != 0)
222
223 #define TLS_CHANGE_CIPHER_SPEC(x)       (((x) & 0x0014) == 0x0014)
224 #define TLS_ALERT(x)                    (((x) & 0x0015) == 0x0015)
225 #define TLS_HANDSHAKE(x)                (((x) & 0x0016) == 0x0016)
226
227 #define SET_START(x)            ((x) | (0x20))
228 #define SET_MORE_FRAGMENTS(x)   ((x) | (0x40))
229 #define SET_LENGTH_INCLUDED(x)  ((x) | (0x80))
230
231
232 /*
233  *      Following enums from rfc2246
234  *
235  *      Hmm... since we dpeend on OpenSSL, it would be smarter to
236  *      use the OpenSSL names for these.
237  */
238 enum ContentType {
239         change_cipher_spec = 20,
240         alert = 21,
241         handshake = 22,
242         application_data = 23
243 };
244
245 enum AlertLevel {
246         warning = 1,
247         fatal = 2
248 };
249
250 enum AlertDescription {
251         close_notify = 0,
252         unexpected_message = 10,
253         bad_record_mac = 20,
254         decryption_failed = 21,
255         record_overflow = 22,
256         decompression_failure = 30,
257         handshake_failure = 40,
258         bad_certificate = 42,
259         unsupported_certificate = 43,
260         certificate_revoked = 44,
261         certificate_expired = 45,
262         certificate_unknown = 46,
263         illegal_parameter = 47,
264         unknown_ca = 48,
265         access_denied = 49,
266         decode_error = 50,
267         decrypt_error = 51,
268         export_restriction = 60,
269         protocol_version = 70,
270         insufficient_security = 71,
271         internal_error = 80,
272         user_canceled = 90,
273         no_renegotiation = 100
274 };
275
276 enum HandshakeType {
277         hello_request = 0,
278         client_hello = 1,
279         server_hello = 2,
280         certificate = 11,
281         server_key_exchange  = 12,
282         certificate_request = 13,
283         server_hello_done = 14,
284         certificate_verify = 15,
285         client_key_exchange = 16,
286         finished = 20
287 };
288
289
290 /*
291  * From rfc
292    Flags
293
294       0 1 2 3 4 5 6 7 8
295       +-+-+-+-+-+-+-+-+
296       |L M S R R R R R|
297       +-+-+-+-+-+-+-+-+
298
299       L = Length included
300       M = More fragments
301       S = EAP-TLS start
302       R = Reserved
303
304       The L bit (length included) is set to indicate the presence of the
305       four octet TLS Message Length field, and MUST be set for the first
306       fragment of a fragmented TLS message or set of messages. The M bit
307       (more fragments) is set on all but the last fragment. The S bit
308       (EAP-TLS start) is set in an EAP-TLS Start message.  This
309       differentiates the EAP-TLS Start message from a fragment
310       acknowledgement.
311
312    TLS Message Length
313
314       The TLS Message Length field is four octets, and is present only
315       if the L bit is set. This field provides the total length of the
316       TLS message or set of messages that is being fragmented.
317
318    TLS data
319
320       The TLS data consists of the encapsulated TLS packet in TLS record
321       format.
322  *
323  * The data structures present here
324  * maps only to the typedata in the EAP packet
325  *
326  * Based on the L bit flag, first 4 bytes of data indicate the length
327  */
328 typedef struct tls_packet_t {
329         uint8_t         flags;
330         uint8_t         data[1];
331 } eaptls_packet_t;
332
333 typedef struct tls_packet {
334         uint8_t         code;
335         uint8_t         id;
336         uint32_t        length;
337         uint8_t         flags;
338         uint8_t         *data;
339         uint32_t        dlen;
340
341         //uint8_t               *packet;  /* Wired EAP-TLS packet as found in typdedata of EAP_PACKET */
342 } EAPTLS_PACKET;
343
344
345 /* EAP-TLS framework */
346 EAPTLS_PACKET   *eaptls_alloc(void);
347 void            eaptls_free(EAPTLS_PACKET **eaptls_packet_ptr);
348 int             eaptls_start(EAP_DS *eap_ds, int peap);
349 int             eaptls_compose(EAP_DS *eap_ds, EAPTLS_PACKET *reply);
350
351 /* Callbacks */
352 int             cbtls_password(char *buf, int num, int rwflag, void *userdata);
353 void            cbtls_info(const SSL *s, int where, int ret);
354 void            cbtls_msg(int write_p, int msg_version, int content_type,
355                         const void *buf, size_t len, SSL *ssl, void *arg);
356 RSA             *cbtls_rsa(SSL *s, int is_export, int keylength);
357
358 /* TLS */
359 tls_session_t   *eaptls_new_session(SSL_CTX *ssl_ctx, int client_cert);
360 int             tls_handshake_recv(tls_session_t *ssn);
361 int             tls_handshake_send(tls_session_t *ssn);
362 void            tls_session_information(tls_session_t *tls_session);
363
364 /* Session */
365 void            session_free(void *ssn);
366 void            session_close(tls_session_t *ssn);
367 void            session_init(tls_session_t *ssn);
368
369 #endif /*_EAP_TLS_H*/