2 * hostapd / EAP-TLS/PEAP/TTLS/FAST common functions
3 * Copyright (c) 2004-2007, Jouni Malinen <j@w1.fi>
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License version 2 as
7 * published by the Free Software Foundation.
9 * Alternatively, this software may be distributed under the terms of BSD
12 * See README and COPYING for more details.
19 #include "eap_tls_common.h"
24 int eap_server_tls_ssl_init(struct eap_sm *sm, struct eap_ssl_data *data,
28 data->phase2 = sm->init_phase2;
30 data->conn = tls_connection_init(sm->ssl_ctx);
31 if (data->conn == NULL) {
32 wpa_printf(MSG_INFO, "SSL: Failed to initialize new TLS "
37 if (tls_connection_set_verify(sm->ssl_ctx, data->conn, verify_peer)) {
38 wpa_printf(MSG_INFO, "SSL: Failed to configure verification "
39 "of TLS peer certificate");
40 tls_connection_deinit(sm->ssl_ctx, data->conn);
45 /* TODO: make this configurable */
46 data->tls_out_limit = 1398;
48 /* Limit the fragment size in the inner TLS authentication
49 * since the outer authentication with EAP-PEAP does not yet
50 * support fragmentation */
51 if (data->tls_out_limit > 100)
52 data->tls_out_limit -= 100;
58 void eap_server_tls_ssl_deinit(struct eap_sm *sm, struct eap_ssl_data *data)
60 tls_connection_deinit(sm->ssl_ctx, data->conn);
61 os_free(data->tls_in);
62 os_free(data->tls_out);
66 u8 * eap_server_tls_derive_key(struct eap_sm *sm, struct eap_ssl_data *data,
67 char *label, size_t len)
76 if (tls_connection_prf(sm->ssl_ctx, data->conn, label, 0, out, len) ==
80 if (tls_connection_get_keys(sm->ssl_ctx, data->conn, &keys))
83 if (keys.client_random == NULL || keys.server_random == NULL ||
84 keys.master_key == NULL)
87 rnd = os_malloc(keys.client_random_len + keys.server_random_len);
90 os_memcpy(rnd, keys.client_random, keys.client_random_len);
91 os_memcpy(rnd + keys.client_random_len, keys.server_random,
92 keys.server_random_len);
94 if (tls_prf(keys.master_key, keys.master_key_len,
95 label, rnd, keys.client_random_len +
96 keys.server_random_len, out, len))
109 int eap_server_tls_data_reassemble(struct eap_sm *sm,
110 struct eap_ssl_data *data,
111 u8 **in_data, size_t *in_len)
115 if (data->tls_in_left > *in_len || data->tls_in) {
117 wpa_printf(MSG_INFO, "SSL: Empty fragment when trying "
121 if (data->tls_in_len + *in_len > 65536) {
122 /* Limit length to avoid rogue peers from causing large
123 * memory allocations. */
124 os_free(data->tls_in);
126 data->tls_in_len = 0;
127 wpa_printf(MSG_INFO, "SSL: Too long TLS fragment (size"
131 buf = os_realloc(data->tls_in, data->tls_in_len + *in_len);
133 os_free(data->tls_in);
135 data->tls_in_len = 0;
136 wpa_printf(MSG_INFO, "SSL: Could not allocate memory "
140 os_memcpy(buf + data->tls_in_len, *in_data, *in_len);
142 data->tls_in_len += *in_len;
143 if (*in_len > data->tls_in_left) {
144 wpa_printf(MSG_INFO, "SSL: more data than TLS message "
146 data->tls_in_left = 0;
149 data->tls_in_left -= *in_len;
150 if (data->tls_in_left > 0) {
151 wpa_printf(MSG_DEBUG, "SSL: Need %lu bytes more input "
152 "data", (unsigned long) data->tls_in_left);
156 *in_data = data->tls_in;
157 *in_len = data->tls_in_len;
159 data->tls_in_left = 0;
165 int eap_server_tls_process_helper(struct eap_sm *sm, struct eap_ssl_data *data,
166 const u8 *in_data, size_t in_len)
168 WPA_ASSERT(data->tls_out_len == 0 || in_len == 0);
170 if (data->tls_out_len == 0) {
171 u8 *_in_data = (u8 *) in_data; /* FIX: get rid of the typecast
173 /* No more data to send out - expect to receive more data from
175 int res = eap_server_tls_data_reassemble(sm, data, &_in_data,
177 if (res < 0 || res == 1) {
178 wpa_printf(MSG_DEBUG, "SSL: data reassembly failed");
181 /* Full TLS message reassembled - continue handshake processing
184 /* This should not happen.. */
185 wpa_printf(MSG_INFO, "SSL: eap_tls_process_helper - "
186 "pending tls_out data even though "
188 os_free(data->tls_out);
189 WPA_ASSERT(data->tls_out == NULL);
191 data->tls_out = tls_connection_server_handshake(
192 sm->ssl_ctx, data->conn, _in_data, in_len,
195 /* Clear reassembled input data (if the buffer was needed). */
196 data->tls_in_left = data->tls_in_total = data->tls_in_len = 0;
197 os_free(data->tls_in);
201 if (data->tls_out == NULL) {
202 wpa_printf(MSG_DEBUG, "SSL: failed to generate output data");
203 data->tls_out_len = 0;
206 if (data->tls_out_len == 0) {
207 /* TLS negotiation should now be complete since all other cases
208 * needing more that should have been catched above based on
209 * the TLS Message Length field. */
210 wpa_printf(MSG_DEBUG, "SSL: No data to be sent out");
211 os_free(data->tls_out);
212 data->tls_out = NULL;
214 if (tls_connection_get_read_alerts(sm->ssl_ctx, data->conn)) {
215 wpa_printf(MSG_DEBUG, "SSL: Remote end sent a fatal "
216 "alert - abort handshake");
223 wpa_printf(MSG_DEBUG, "SSL: %lu bytes left to be sent out (of total "
225 (unsigned long) data->tls_out_len - data->tls_out_pos,
226 (unsigned long) data->tls_out_len);
232 int eap_server_tls_buildReq_helper(struct eap_sm *sm,
233 struct eap_ssl_data *data,
234 int eap_type, int peap_version, u8 id,
235 struct wpabuf **out_data)
242 incl_len = data->tls_out_pos == 0 &&
243 data->tls_out_len > data->tls_out_limit;
244 req = eap_msg_alloc(EAP_VENDOR_IETF, eap_type,
245 1 + (incl_len ? 4 : 0) + data->tls_out_limit,
246 EAP_CODE_REQUEST, id);
251 flags = wpabuf_put(req, 1);
252 *flags = peap_version;
254 *flags |= EAP_TLS_FLAGS_LENGTH_INCLUDED;
255 wpabuf_put_be32(req, data->tls_out_len);
258 len = data->tls_out_len - data->tls_out_pos;
259 if (len > data->tls_out_limit) {
260 *flags |= EAP_TLS_FLAGS_MORE_FRAGMENTS;
261 len = data->tls_out_limit;
262 wpa_printf(MSG_DEBUG, "SSL: sending %lu bytes, more fragments "
263 "will follow", (unsigned long) len);
265 wpabuf_put_data(req, &data->tls_out[data->tls_out_pos], len);
266 data->tls_out_pos += len;
271 if (!(*flags & EAP_TLS_FLAGS_MORE_FRAGMENTS)) {
272 data->tls_out_len = 0;
273 data->tls_out_pos = 0;
274 os_free(data->tls_out);
275 data->tls_out = NULL;
282 struct wpabuf * eap_server_tls_build_ack(u8 id, int eap_type, int peap_version)
286 req = eap_msg_alloc(EAP_VENDOR_IETF, eap_type, 1, EAP_CODE_REQUEST,
290 wpa_printf(MSG_DEBUG, "SSL: Building ACK");
291 wpabuf_put_u8(req, peap_version); /* Flags */