Home | History | Annotate | Download | only in eap_peer
      1 /*
      2  * EAP peer method: EAP-TLS (RFC 2716)
      3  * Copyright (c) 2004-2008, Jouni Malinen <j (at) w1.fi>
      4  *
      5  * This software may be distributed under the terms of the BSD license.
      6  * See README for more details.
      7  */
      8 
      9 #include "includes.h"
     10 
     11 #include "common.h"
     12 #include "crypto/tls.h"
     13 #include "eap_i.h"
     14 #include "eap_tls_common.h"
     15 #include "eap_config.h"
     16 
     17 
     18 static void eap_tls_deinit(struct eap_sm *sm, void *priv);
     19 
     20 
     21 struct eap_tls_data {
     22 	struct eap_ssl_data ssl;
     23 	u8 *key_data;
     24 };
     25 
     26 
     27 static void * eap_tls_init(struct eap_sm *sm)
     28 {
     29 	struct eap_tls_data *data;
     30 	struct eap_peer_config *config = eap_get_config(sm);
     31 	if (config == NULL ||
     32 	    ((sm->init_phase2 ? config->private_key2 : config->private_key)
     33 	     == NULL &&
     34 	     (sm->init_phase2 ? config->engine2 : config->engine) == 0)) {
     35 		wpa_printf(MSG_INFO, "EAP-TLS: Private key not configured");
     36 		return NULL;
     37 	}
     38 
     39 	data = os_zalloc(sizeof(*data));
     40 	if (data == NULL)
     41 		return NULL;
     42 
     43 	if (eap_peer_tls_ssl_init(sm, &data->ssl, config)) {
     44 		wpa_printf(MSG_INFO, "EAP-TLS: Failed to initialize SSL.");
     45 		eap_tls_deinit(sm, data);
     46 		if (config->engine) {
     47 			wpa_printf(MSG_DEBUG, "EAP-TLS: Requesting Smartcard "
     48 				   "PIN");
     49 			eap_sm_request_pin(sm);
     50 			sm->ignore = TRUE;
     51 		} else if (config->private_key && !config->private_key_passwd)
     52 		{
     53 			wpa_printf(MSG_DEBUG, "EAP-TLS: Requesting private "
     54 				   "key passphrase");
     55 			eap_sm_request_passphrase(sm);
     56 			sm->ignore = TRUE;
     57 		}
     58 		return NULL;
     59 	}
     60 
     61 	return data;
     62 }
     63 
     64 
     65 static void eap_tls_deinit(struct eap_sm *sm, void *priv)
     66 {
     67 	struct eap_tls_data *data = priv;
     68 	if (data == NULL)
     69 		return;
     70 	eap_peer_tls_ssl_deinit(sm, &data->ssl);
     71 	os_free(data->key_data);
     72 	os_free(data);
     73 }
     74 
     75 
     76 static struct wpabuf * eap_tls_failure(struct eap_sm *sm,
     77 				       struct eap_tls_data *data,
     78 				       struct eap_method_ret *ret, int res,
     79 				       struct wpabuf *resp, u8 id)
     80 {
     81 	wpa_printf(MSG_DEBUG, "EAP-TLS: TLS processing failed");
     82 
     83 	ret->methodState = METHOD_DONE;
     84 	ret->decision = DECISION_FAIL;
     85 
     86 	if (res == -1) {
     87 		struct eap_peer_config *config = eap_get_config(sm);
     88 		if (config) {
     89 			/*
     90 			 * The TLS handshake failed. So better forget the old
     91 			 * PIN. It may be wrong, we cannot be sure but trying
     92 			 * the wrong one again might block it on the card--so
     93 			 * better ask the user again.
     94 			 */
     95 			os_free(config->pin);
     96 			config->pin = NULL;
     97 		}
     98 	}
     99 
    100 	if (resp) {
    101 		/*
    102 		 * This is likely an alert message, so send it instead of just
    103 		 * ACKing the error.
    104 		 */
    105 		return resp;
    106 	}
    107 
    108 	return eap_peer_tls_build_ack(id, EAP_TYPE_TLS, 0);
    109 }
    110 
    111 
    112 static void eap_tls_success(struct eap_sm *sm, struct eap_tls_data *data,
    113 			    struct eap_method_ret *ret)
    114 {
    115 	wpa_printf(MSG_DEBUG, "EAP-TLS: Done");
    116 
    117 	ret->methodState = METHOD_DONE;
    118 	ret->decision = DECISION_UNCOND_SUCC;
    119 
    120 	os_free(data->key_data);
    121 	data->key_data = eap_peer_tls_derive_key(sm, &data->ssl,
    122 						 "client EAP encryption",
    123 						 EAP_TLS_KEY_LEN +
    124 						 EAP_EMSK_LEN);
    125 	if (data->key_data) {
    126 		wpa_hexdump_key(MSG_DEBUG, "EAP-TLS: Derived key",
    127 				data->key_data, EAP_TLS_KEY_LEN);
    128 		wpa_hexdump_key(MSG_DEBUG, "EAP-TLS: Derived EMSK",
    129 				data->key_data + EAP_TLS_KEY_LEN,
    130 				EAP_EMSK_LEN);
    131 	} else {
    132 		wpa_printf(MSG_INFO, "EAP-TLS: Failed to derive key");
    133 	}
    134 }
    135 
    136 
    137 static struct wpabuf * eap_tls_process(struct eap_sm *sm, void *priv,
    138 				       struct eap_method_ret *ret,
    139 				       const struct wpabuf *reqData)
    140 {
    141 	size_t left;
    142 	int res;
    143 	struct wpabuf *resp;
    144 	u8 flags, id;
    145 	const u8 *pos;
    146 	struct eap_tls_data *data = priv;
    147 
    148 	pos = eap_peer_tls_process_init(sm, &data->ssl, EAP_TYPE_TLS, ret,
    149 					reqData, &left, &flags);
    150 	if (pos == NULL)
    151 		return NULL;
    152 	id = eap_get_id(reqData);
    153 
    154 	if (flags & EAP_TLS_FLAGS_START) {
    155 		wpa_printf(MSG_DEBUG, "EAP-TLS: Start");
    156 		left = 0; /* make sure that this frame is empty, even though it
    157 			   * should always be, anyway */
    158 	}
    159 
    160 	resp = NULL;
    161 	res = eap_peer_tls_process_helper(sm, &data->ssl, EAP_TYPE_TLS, 0, id,
    162 					  pos, left, &resp);
    163 
    164 	if (res < 0) {
    165 		return eap_tls_failure(sm, data, ret, res, resp, id);
    166 	}
    167 
    168 	if (tls_connection_established(sm->ssl_ctx, data->ssl.conn))
    169 		eap_tls_success(sm, data, ret);
    170 
    171 	if (res == 1) {
    172 		wpabuf_free(resp);
    173 		return eap_peer_tls_build_ack(id, EAP_TYPE_TLS, 0);
    174 	}
    175 
    176 	return resp;
    177 }
    178 
    179 
    180 static Boolean eap_tls_has_reauth_data(struct eap_sm *sm, void *priv)
    181 {
    182 	struct eap_tls_data *data = priv;
    183 	return tls_connection_established(sm->ssl_ctx, data->ssl.conn);
    184 }
    185 
    186 
    187 static void eap_tls_deinit_for_reauth(struct eap_sm *sm, void *priv)
    188 {
    189 }
    190 
    191 
    192 static void * eap_tls_init_for_reauth(struct eap_sm *sm, void *priv)
    193 {
    194 	struct eap_tls_data *data = priv;
    195 	os_free(data->key_data);
    196 	data->key_data = NULL;
    197 	if (eap_peer_tls_reauth_init(sm, &data->ssl)) {
    198 		os_free(data);
    199 		return NULL;
    200 	}
    201 	return priv;
    202 }
    203 
    204 
    205 static int eap_tls_get_status(struct eap_sm *sm, void *priv, char *buf,
    206 			      size_t buflen, int verbose)
    207 {
    208 	struct eap_tls_data *data = priv;
    209 	return eap_peer_tls_status(sm, &data->ssl, buf, buflen, verbose);
    210 }
    211 
    212 
    213 static Boolean eap_tls_isKeyAvailable(struct eap_sm *sm, void *priv)
    214 {
    215 	struct eap_tls_data *data = priv;
    216 	return data->key_data != NULL;
    217 }
    218 
    219 
    220 static u8 * eap_tls_getKey(struct eap_sm *sm, void *priv, size_t *len)
    221 {
    222 	struct eap_tls_data *data = priv;
    223 	u8 *key;
    224 
    225 	if (data->key_data == NULL)
    226 		return NULL;
    227 
    228 	key = os_malloc(EAP_TLS_KEY_LEN);
    229 	if (key == NULL)
    230 		return NULL;
    231 
    232 	*len = EAP_TLS_KEY_LEN;
    233 	os_memcpy(key, data->key_data, EAP_TLS_KEY_LEN);
    234 
    235 	return key;
    236 }
    237 
    238 
    239 static u8 * eap_tls_get_emsk(struct eap_sm *sm, void *priv, size_t *len)
    240 {
    241 	struct eap_tls_data *data = priv;
    242 	u8 *key;
    243 
    244 	if (data->key_data == NULL)
    245 		return NULL;
    246 
    247 	key = os_malloc(EAP_EMSK_LEN);
    248 	if (key == NULL)
    249 		return NULL;
    250 
    251 	*len = EAP_EMSK_LEN;
    252 	os_memcpy(key, data->key_data + EAP_TLS_KEY_LEN, EAP_EMSK_LEN);
    253 
    254 	return key;
    255 }
    256 
    257 
    258 int eap_peer_tls_register(void)
    259 {
    260 	struct eap_method *eap;
    261 	int ret;
    262 
    263 	eap = eap_peer_method_alloc(EAP_PEER_METHOD_INTERFACE_VERSION,
    264 				    EAP_VENDOR_IETF, EAP_TYPE_TLS, "TLS");
    265 	if (eap == NULL)
    266 		return -1;
    267 
    268 	eap->init = eap_tls_init;
    269 	eap->deinit = eap_tls_deinit;
    270 	eap->process = eap_tls_process;
    271 	eap->isKeyAvailable = eap_tls_isKeyAvailable;
    272 	eap->getKey = eap_tls_getKey;
    273 	eap->get_status = eap_tls_get_status;
    274 	eap->has_reauth_data = eap_tls_has_reauth_data;
    275 	eap->deinit_for_reauth = eap_tls_deinit_for_reauth;
    276 	eap->init_for_reauth = eap_tls_init_for_reauth;
    277 	eap->get_emsk = eap_tls_get_emsk;
    278 
    279 	ret = eap_peer_method_register(eap);
    280 	if (ret)
    281 		eap_peer_method_free(eap);
    282 	return ret;
    283 }
    284