18d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt/* 28d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * EAP peer method: EAP-FAST (RFC 4851) 38d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * Copyright (c) 2004-2008, Jouni Malinen <j@w1.fi> 48d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * 5c5ec7f57ead87efa365800228aa0b09a12d9e6c4Dmitry Shmidt * This software may be distributed under the terms of the BSD license. 6c5ec7f57ead87efa365800228aa0b09a12d9e6c4Dmitry Shmidt * See README for more details. 78d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 88d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 98d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#include "includes.h" 108d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 118d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#include "common.h" 128d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#include "crypto/tls.h" 138d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#include "crypto/sha1.h" 148d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#include "eap_common/eap_tlv_common.h" 158d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#include "eap_i.h" 168d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#include "eap_tls_common.h" 178d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#include "eap_config.h" 188d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#include "eap_fast_pac.h" 198d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 208d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#ifdef EAP_FAST_DYNAMIC 218d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#include "eap_fast_pac.c" 228d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#endif /* EAP_FAST_DYNAMIC */ 238d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 248d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt/* TODO: 258d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * - test session resumption and enable it if it interoperates 268d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * - password change (pending mschapv2 packet; replay decrypted packet) 278d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 288d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 298d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 308d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic void eap_fast_deinit(struct eap_sm *sm, void *priv); 318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstruct eap_fast_data { 348d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_ssl_data ssl; 358d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 368d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int fast_version; 378d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt const struct eap_method *phase2_method; 398d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt void *phase2_priv; 408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int phase2_success; 418d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 428d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_method_type phase2_type; 438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_method_type *phase2_types; 448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt size_t num_phase2_types; 458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int resuming; /* starting a resumed session */ 468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_key_block_provisioning *key_block_p; 478d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#define EAP_FAST_PROV_UNAUTH 1 488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#define EAP_FAST_PROV_AUTH 2 498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int provisioning_allowed; /* Allowed PAC provisioning modes */ 508d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int provisioning; /* doing PAC provisioning (not the normal auth) */ 518d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int anon_provisioning; /* doing anonymous (unauthenticated) 528d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * provisioning */ 538d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int session_ticket_used; 548d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 558d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 key_data[EAP_FAST_KEY_LEN]; 56f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt u8 *session_id; 57f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt size_t id_len; 588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 emsk[EAP_EMSK_LEN]; 598d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int success; 608d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 618d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_pac *pac; 628d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_pac *current_pac; 638d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt size_t max_pac_list_len; 648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int use_pac_binary_format; 658d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 simck[EAP_FAST_SIMCK_LEN]; 678d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int simck_idx; 688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct wpabuf *pending_phase2_req; 708d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt}; 718d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 728d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 738d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_session_ticket_cb(void *ctx, const u8 *ticket, size_t len, 748d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt const u8 *client_random, 758d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt const u8 *server_random, 768d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *master_secret) 778d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 788d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data = ctx; 798d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 808d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: SessionTicket callback"); 818d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 828d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (client_random == NULL || server_random == NULL || 838d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt master_secret == NULL) { 848d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: SessionTicket failed - fall " 858d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "back to full TLS handshake"); 868d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->session_ticket_used = 0; 878d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->provisioning_allowed) { 888d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Try to provision a " 898d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "new PAC-Key"); 908d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->provisioning = 1; 918d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->current_pac = NULL; 928d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 938d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 948d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 958d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 968d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump(MSG_DEBUG, "EAP-FAST: SessionTicket", ticket, len); 978d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 988d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->current_pac == NULL) { 998d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: No PAC-Key available for " 1008d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "using SessionTicket"); 1018d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->session_ticket_used = 0; 1028d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 1038d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 1048d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1058d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_derive_master_secret(data->current_pac->pac_key, 1068d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt server_random, client_random, 1078d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt master_secret); 1088d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1098d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->session_ticket_used = 1; 1108d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1118d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 1; 1128d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 1138d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1148d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1158d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_parse_phase1(struct eap_fast_data *data, 1168d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt const char *phase1) 1178d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 1188d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt const char *pos; 1198d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1208d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos = os_strstr(phase1, "fast_provisioning="); 1218d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (pos) { 1228d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->provisioning_allowed = atoi(pos + 18); 1238d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Automatic PAC provisioning " 1248d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "mode: %d", data->provisioning_allowed); 1258d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 1268d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1278d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos = os_strstr(phase1, "fast_max_pac_list_len="); 1288d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (pos) { 1298d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->max_pac_list_len = atoi(pos + 22); 1308d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->max_pac_list_len == 0) 1318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->max_pac_list_len = 1; 1328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Maximum PAC list length: %lu", 1338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt (unsigned long) data->max_pac_list_len); 1348d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 1358d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1368d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos = os_strstr(phase1, "fast_pac_format=binary"); 1378d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (pos) { 1388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->use_pac_binary_format = 1; 1398d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Using binary format for PAC " 1408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "list"); 1418d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 1428d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 1448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 1458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1478d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic void * eap_fast_init(struct eap_sm *sm) 1488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 1498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data; 1508d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_peer_config *config = eap_get_config(sm); 1518d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1527d5c8f257a74ac0d12828962a492e8b84ef83923Dmitry Shmidt if (config == NULL) 1537d5c8f257a74ac0d12828962a492e8b84ef83923Dmitry Shmidt return NULL; 1547d5c8f257a74ac0d12828962a492e8b84ef83923Dmitry Shmidt 1558d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data = os_zalloc(sizeof(*data)); 1568d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data == NULL) 1578d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 1588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->fast_version = EAP_FAST_VERSION; 1598d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->max_pac_list_len = 10; 1608d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1617d5c8f257a74ac0d12828962a492e8b84ef83923Dmitry Shmidt if (config->phase1 && eap_fast_parse_phase1(data, config->phase1) < 0) { 1628d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_deinit(sm, data); 1638d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 1648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 1658d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (eap_peer_select_phase2_methods(config, "auth=", 1678d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt &data->phase2_types, 1688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt &data->num_phase2_types) < 0) { 1698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_deinit(sm, data); 1708d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 1718d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 1728d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1738d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_type.vendor = EAP_VENDOR_IETF; 1748d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_type.method = EAP_TYPE_NONE; 1758d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 17661d9df3e62aaa0e87ad05452fcb95142159a17b6Dmitry Shmidt if (eap_peer_tls_ssl_init(sm, &data->ssl, config, EAP_TYPE_FAST)) { 1778d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: Failed to initialize SSL."); 1788d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_deinit(sm, data); 1798d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 1808d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 1818d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1828d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (tls_connection_set_session_ticket_cb(sm->ssl_ctx, data->ssl.conn, 1838d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_session_ticket_cb, 1848d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data) < 0) { 1858d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: Failed to set SessionTicket " 1868d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "callback"); 1878d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_deinit(sm, data); 1888d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 1898d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 1908d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1918d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* 1928d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * The local RADIUS server in a Cisco AP does not seem to like empty 1938d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * fragments before data, so disable that workaround for CBC. 1948d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * TODO: consider making this configurable 1958d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 1968d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (tls_connection_enable_workaround(sm->ssl_ctx, data->ssl.conn)) { 1978d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Failed to enable TLS " 1988d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "workarounds"); 1998d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 2008d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 201344abd362cfe2d03ed956666527352826b67bde5Dmitry Shmidt if (!config->pac_file) { 202344abd362cfe2d03ed956666527352826b67bde5Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: No PAC file configured"); 203344abd362cfe2d03ed956666527352826b67bde5Dmitry Shmidt eap_fast_deinit(sm, data); 204344abd362cfe2d03ed956666527352826b67bde5Dmitry Shmidt return NULL; 205344abd362cfe2d03ed956666527352826b67bde5Dmitry Shmidt } 206344abd362cfe2d03ed956666527352826b67bde5Dmitry Shmidt 2078d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->use_pac_binary_format && 2088d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_load_pac_bin(sm, &data->pac, config->pac_file) < 0) { 209344abd362cfe2d03ed956666527352826b67bde5Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: Failed to load PAC file"); 2108d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_deinit(sm, data); 2118d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 2128d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 2138d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 2148d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (!data->use_pac_binary_format && 2158d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_load_pac(sm, &data->pac, config->pac_file) < 0) { 216344abd362cfe2d03ed956666527352826b67bde5Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: Failed to load PAC file"); 2178d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_deinit(sm, data); 2188d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 2198d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 2208d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_pac_list_truncate(data->pac, data->max_pac_list_len); 2218d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 2228d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->pac == NULL && !data->provisioning_allowed) { 2238d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: No PAC configured and " 2248d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "provisioning disabled"); 2258d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_deinit(sm, data); 2268d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 2278d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 2288d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 2298d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return data; 2308d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 2318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 2328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 2338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic void eap_fast_deinit(struct eap_sm *sm, void *priv) 2348d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 2358d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data = priv; 2368d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_pac *pac, *prev; 2378d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 2388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data == NULL) 2398d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return; 2408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->phase2_priv && data->phase2_method) 2418d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_method->deinit(sm, data->phase2_priv); 2428d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_free(data->phase2_types); 2438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_free(data->key_block_p); 2448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_peer_tls_ssl_deinit(sm, &data->ssl); 2458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 2468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pac = data->pac; 2478d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt prev = NULL; 2488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt while (pac) { 2498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt prev = pac; 2508d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pac = pac->next; 2518d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_free_pac(prev); 2528d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 253c28170251eb54dbf64a9074a07fee377587425b2Dmitry Shmidt os_memset(data->key_data, 0, EAP_FAST_KEY_LEN); 254c28170251eb54dbf64a9074a07fee377587425b2Dmitry Shmidt os_memset(data->emsk, 0, EAP_EMSK_LEN); 255f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt os_free(data->session_id); 2568d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpabuf_free(data->pending_phase2_req); 2578d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_free(data); 2588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 2598d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 2608d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 2618d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_derive_msk(struct eap_fast_data *data) 2628d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 2638d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_derive_eap_msk(data->simck, data->key_data); 2648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_derive_eap_emsk(data->simck, data->emsk); 2658d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->success = 1; 2668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 2678d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 2688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 2698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 270a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidtstatic int eap_fast_derive_key_auth(struct eap_sm *sm, 271a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt struct eap_fast_data *data) 2728d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 2738d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *sks; 2748d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 2758d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* RFC 4851, Section 5.1: 2768d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * Extra key material after TLS key_block: session_key_seed[40] 2778d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 2788d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 2798d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt sks = eap_fast_derive_key(sm->ssl_ctx, data->ssl.conn, "key expansion", 2808d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt EAP_FAST_SKS_LEN); 2818d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (sks == NULL) { 2828d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Failed to derive " 2838d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "session_key_seed"); 284a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt return -1; 2858d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 2868d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 2878d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* 2888d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * RFC 4851, Section 5.2: 2898d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * S-IMCK[0] = session_key_seed 2908d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 2918d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump_key(MSG_DEBUG, 2928d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "EAP-FAST: session_key_seed (SKS = S-IMCK[0])", 2938d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt sks, EAP_FAST_SKS_LEN); 2948d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->simck_idx = 0; 2958d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memcpy(data->simck, sks, EAP_FAST_SIMCK_LEN); 2968d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_free(sks); 297a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt return 0; 2988d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 2998d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 3008d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 301a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidtstatic int eap_fast_derive_key_provisioning(struct eap_sm *sm, 302a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt struct eap_fast_data *data) 3038d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 3048d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_free(data->key_block_p); 3058d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->key_block_p = (struct eap_fast_key_block_provisioning *) 3068d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_derive_key(sm->ssl_ctx, data->ssl.conn, 3078d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "key expansion", 3088d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt sizeof(*data->key_block_p)); 3098d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->key_block_p == NULL) { 3108d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Failed to derive key block"); 311a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt return -1; 3128d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 3138d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* 3148d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * RFC 4851, Section 5.2: 3158d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * S-IMCK[0] = session_key_seed 3168d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 3178d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump_key(MSG_DEBUG, 3188d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "EAP-FAST: session_key_seed (SKS = S-IMCK[0])", 3198d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->key_block_p->session_key_seed, 3208d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt sizeof(data->key_block_p->session_key_seed)); 3218d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->simck_idx = 0; 3228d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memcpy(data->simck, data->key_block_p->session_key_seed, 3238d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt EAP_FAST_SIMCK_LEN); 3248d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump_key(MSG_DEBUG, "EAP-FAST: server_challenge", 3258d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->key_block_p->server_challenge, 3268d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt sizeof(data->key_block_p->server_challenge)); 3278d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump_key(MSG_DEBUG, "EAP-FAST: client_challenge", 3288d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->key_block_p->client_challenge, 3298d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt sizeof(data->key_block_p->client_challenge)); 330a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt return 0; 3318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 3328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 3338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 334a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidtstatic int eap_fast_derive_keys(struct eap_sm *sm, struct eap_fast_data *data) 3358d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 336a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt int res; 337a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt 3388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->anon_provisioning) 339a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt res = eap_fast_derive_key_provisioning(sm, data); 3408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt else 341a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt res = eap_fast_derive_key_auth(sm, data); 342a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt return res; 3438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 3448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 3458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 3468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_init_phase2_method(struct eap_sm *sm, 3478d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data) 3488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 3498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_method = 3508d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_peer_get_eap_method(data->phase2_type.vendor, 3518d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_type.method); 3528d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->phase2_method == NULL) 3538d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 3548d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 3558d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->key_block_p) { 3568d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt sm->auth_challenge = data->key_block_p->server_challenge; 3578d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt sm->peer_challenge = data->key_block_p->client_challenge; 3588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 3598d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt sm->init_phase2 = 1; 3608d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_priv = data->phase2_method->init(sm); 3618d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt sm->init_phase2 = 0; 3628d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt sm->auth_challenge = NULL; 3638d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt sm->peer_challenge = NULL; 3648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 3658d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return data->phase2_priv == NULL ? -1 : 0; 3668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 3678d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 3688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 3698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_select_phase2_method(struct eap_fast_data *data, u8 type) 3708d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 3718d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt size_t i; 3728d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 3738d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* TODO: TNC with anonymous provisioning; need to require both 3748d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * completed MSCHAPv2 and TNC */ 3758d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 3768d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->anon_provisioning && type != EAP_TYPE_MSCHAPV2) { 3778d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: Only EAP-MSCHAPv2 is allowed " 3788d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "during unauthenticated provisioning; reject phase2" 3798d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt " type %d", type); 3808d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 3818d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 3828d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 3838d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#ifdef EAP_TNC 3848d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (type == EAP_TYPE_TNC) { 3858d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_type.vendor = EAP_VENDOR_IETF; 3868d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_type.method = EAP_TYPE_TNC; 3878d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Selected Phase 2 EAP " 3888d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "vendor %d method %d for TNC", 3898d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_type.vendor, 3908d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_type.method); 3918d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 3928d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 3938d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#endif /* EAP_TNC */ 3948d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 3958d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt for (i = 0; i < data->num_phase2_types; i++) { 3968d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->phase2_types[i].vendor != EAP_VENDOR_IETF || 3978d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_types[i].method != type) 3988d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt continue; 3998d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 4008d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_type.vendor = data->phase2_types[i].vendor; 4018d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_type.method = data->phase2_types[i].method; 4028d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Selected Phase 2 EAP " 4038d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "vendor %d method %d", 4048d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_type.vendor, 4058d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_type.method); 4068d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt break; 4078d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 4088d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 4098d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (type != data->phase2_type.method || type == EAP_TYPE_NONE) 4108d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 4118d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 4128d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 4138d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 4148d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 4158d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 4168d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_phase2_request(struct eap_sm *sm, 4178d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data, 4188d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_method_ret *ret, 4198d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_hdr *hdr, 4208d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct wpabuf **resp) 4218d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 4228d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt size_t len = be_to_host16(hdr->length); 4238d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *pos; 4248d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_method_ret iret; 4258d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_peer_config *config = eap_get_config(sm); 4268d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct wpabuf msg; 4278d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 4288d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (len <= sizeof(struct eap_hdr)) { 4298d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: too short " 4308d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "Phase 2 request (len=%lu)", (unsigned long) len); 4318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 4328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 4338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos = (u8 *) (hdr + 1); 4348d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Phase 2 Request: type=%d", *pos); 4358d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (*pos == EAP_TYPE_IDENTITY) { 4368d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt *resp = eap_sm_buildIdentity(sm, hdr->identifier, 1); 4378d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 4388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 4398d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 4408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->phase2_priv && data->phase2_method && 4418d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt *pos != data->phase2_type.method) { 4428d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Phase 2 EAP sequence - " 4438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "deinitialize previous method"); 4448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_method->deinit(sm, data->phase2_priv); 4458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_method = NULL; 4468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_priv = NULL; 4478d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_type.vendor = EAP_VENDOR_IETF; 4488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_type.method = EAP_TYPE_NONE; 4498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 4508d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 4518d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->phase2_type.vendor == EAP_VENDOR_IETF && 4528d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_type.method == EAP_TYPE_NONE && 4538d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_select_phase2_method(data, *pos) < 0) { 4548d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (eap_peer_tls_phase2_nak(data->phase2_types, 4558d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->num_phase2_types, 4568d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt hdr, resp)) 4578d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 4588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 4598d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 4608d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 4611f69aa52ea2e0a73ac502565df8c666ee49cab6aDmitry Shmidt if ((data->phase2_priv == NULL && 4621f69aa52ea2e0a73ac502565df8c666ee49cab6aDmitry Shmidt eap_fast_init_phase2_method(sm, data) < 0) || 4631f69aa52ea2e0a73ac502565df8c666ee49cab6aDmitry Shmidt data->phase2_method == NULL) { 4648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: Failed to initialize " 4658d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "Phase 2 EAP method %d", *pos); 4668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret->methodState = METHOD_DONE; 4678d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret->decision = DECISION_FAIL; 4688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 4698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 4708d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 4718d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memset(&iret, 0, sizeof(iret)); 4728d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpabuf_set(&msg, hdr, len); 4738d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt *resp = data->phase2_method->process(sm, data->phase2_priv, &iret, 4748d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt &msg); 4758d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (*resp == NULL || 4768d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt (iret.methodState == METHOD_DONE && 4778d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt iret.decision == DECISION_FAIL)) { 4788d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret->methodState = METHOD_DONE; 4798d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret->decision = DECISION_FAIL; 4808d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } else if ((iret.methodState == METHOD_DONE || 4818d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt iret.methodState == METHOD_MAY_CONT) && 4828d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt (iret.decision == DECISION_UNCOND_SUCC || 4838d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt iret.decision == DECISION_COND_SUCC)) { 4848d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_success = 1; 4858d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 4868d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 4878d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (*resp == NULL && config && 4888d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt (config->pending_req_identity || config->pending_req_password || 4898d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt config->pending_req_otp || config->pending_req_new_password)) { 4908d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpabuf_free(data->pending_phase2_req); 4918d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->pending_phase2_req = wpabuf_alloc_copy(hdr, len); 4928d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } else if (*resp == NULL) 4938d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 4948d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 4958d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 4968d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 4978d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 4988d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 4998d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic struct wpabuf * eap_fast_tlv_nak(int vendor_id, int tlv_type) 5008d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 5018d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct wpabuf *buf; 5028d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_tlv_nak_tlv *nak; 5038d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt buf = wpabuf_alloc(sizeof(*nak)); 5048d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (buf == NULL) 5058d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 5068d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt nak = wpabuf_put(buf, sizeof(*nak)); 5078d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt nak->tlv_type = host_to_be16(EAP_TLV_TYPE_MANDATORY | EAP_TLV_NAK_TLV); 5088d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt nak->length = host_to_be16(6); 5098d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt nak->vendor_id = host_to_be32(vendor_id); 5108d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt nak->nak_type = host_to_be16(tlv_type); 5118d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return buf; 5128d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 5138d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 5148d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 5158d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic struct wpabuf * eap_fast_tlv_result(int status, int intermediate) 5168d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 5178d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct wpabuf *buf; 5188d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_tlv_intermediate_result_tlv *result; 5198d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt buf = wpabuf_alloc(sizeof(*result)); 5208d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (buf == NULL) 5218d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 5228d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Add %sResult TLV(status=%d)", 5238d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt intermediate ? "Intermediate " : "", status); 5248d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt result = wpabuf_put(buf, sizeof(*result)); 5258d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt result->tlv_type = host_to_be16(EAP_TLV_TYPE_MANDATORY | 5268d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt (intermediate ? 5278d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt EAP_TLV_INTERMEDIATE_RESULT_TLV : 5288d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt EAP_TLV_RESULT_TLV)); 5298d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt result->length = host_to_be16(2); 5308d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt result->status = host_to_be16(status); 5318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return buf; 5328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 5338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 5348d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 5358d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic struct wpabuf * eap_fast_tlv_pac_ack(void) 5368d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 5378d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct wpabuf *buf; 5388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_tlv_result_tlv *res; 5398d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_tlv_pac_ack_tlv *ack; 5408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 5418d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt buf = wpabuf_alloc(sizeof(*res) + sizeof(*ack)); 5428d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (buf == NULL) 5438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 5448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 5458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Add PAC TLV (ack)"); 5468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ack = wpabuf_put(buf, sizeof(*ack)); 5478d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ack->tlv_type = host_to_be16(EAP_TLV_PAC_TLV | 5488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt EAP_TLV_TYPE_MANDATORY); 5498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ack->length = host_to_be16(sizeof(*ack) - sizeof(struct eap_tlv_hdr)); 5508d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ack->pac_type = host_to_be16(PAC_TYPE_PAC_ACKNOWLEDGEMENT); 5518d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ack->pac_len = host_to_be16(2); 5528d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ack->result = host_to_be16(EAP_TLV_RESULT_SUCCESS); 5538d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 5548d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return buf; 5558d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 5568d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 5578d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 5588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic struct wpabuf * eap_fast_process_eap_payload_tlv( 5598d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_sm *sm, struct eap_fast_data *data, 5601f69aa52ea2e0a73ac502565df8c666ee49cab6aDmitry Shmidt struct eap_method_ret *ret, 5618d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *eap_payload_tlv, size_t eap_payload_tlv_len) 5628d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 5638d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_hdr *hdr; 5648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct wpabuf *resp = NULL; 5658d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 5668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (eap_payload_tlv_len < sizeof(*hdr)) { 5678d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: too short EAP " 5688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "Payload TLV (len=%lu)", 5698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt (unsigned long) eap_payload_tlv_len); 5708d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 5718d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 5728d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 5738d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt hdr = (struct eap_hdr *) eap_payload_tlv; 5748d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (be_to_host16(hdr->length) > eap_payload_tlv_len) { 5758d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: EAP packet overflow in " 5768d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "EAP Payload TLV"); 5778d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 5788d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 5798d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 5808d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (hdr->code != EAP_CODE_REQUEST) { 5818d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: Unexpected code=%d in " 5828d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "Phase 2 EAP header", hdr->code); 5838d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 5848d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 5858d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 5868d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (eap_fast_phase2_request(sm, data, ret, hdr, &resp)) { 5878d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: Phase2 Request processing " 5888d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "failed"); 5898d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 5908d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 5918d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 5928d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return eap_fast_tlv_eap_payload(resp); 5938d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 5948d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 5958d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 5968d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_validate_crypto_binding( 5978d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_tlv_crypto_binding_tlv *_bind) 5988d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 5998d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Crypto-Binding TLV: Version %d " 6008d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "Received Version %d SubType %d", 6018d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt _bind->version, _bind->received_version, _bind->subtype); 6028d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump(MSG_MSGDUMP, "EAP-FAST: NONCE", 6038d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt _bind->nonce, sizeof(_bind->nonce)); 6048d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump(MSG_MSGDUMP, "EAP-FAST: Compound MAC", 6058d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt _bind->compound_mac, sizeof(_bind->compound_mac)); 6068d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 6078d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (_bind->version != EAP_FAST_VERSION || 6088d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt _bind->received_version != EAP_FAST_VERSION || 6098d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt _bind->subtype != EAP_TLV_CRYPTO_BINDING_SUBTYPE_REQUEST) { 6108d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: Invalid version/subtype in " 6118d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "Crypto-Binding TLV: Version %d " 6128d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "Received Version %d SubType %d", 6138d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt _bind->version, _bind->received_version, 6148d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt _bind->subtype); 6158d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 6168d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 6178d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 6188d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 6198d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 6208d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 6218d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 6228d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic void eap_fast_write_crypto_binding( 6238d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_tlv_crypto_binding_tlv *rbind, 6248d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_tlv_crypto_binding_tlv *_bind, const u8 *cmk) 6258d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 6268d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt rbind->tlv_type = host_to_be16(EAP_TLV_TYPE_MANDATORY | 6278d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt EAP_TLV_CRYPTO_BINDING_TLV); 6288d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt rbind->length = host_to_be16(sizeof(*rbind) - 6298d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt sizeof(struct eap_tlv_hdr)); 6308d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt rbind->version = EAP_FAST_VERSION; 6318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt rbind->received_version = _bind->version; 6328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt rbind->subtype = EAP_TLV_CRYPTO_BINDING_SUBTYPE_RESPONSE; 6338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memcpy(rbind->nonce, _bind->nonce, sizeof(_bind->nonce)); 6348d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt inc_byte_array(rbind->nonce, sizeof(rbind->nonce)); 6358d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt hmac_sha1(cmk, EAP_FAST_CMK_LEN, (u8 *) rbind, sizeof(*rbind), 6368d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt rbind->compound_mac); 6378d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 6388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Reply Crypto-Binding TLV: Version %d " 6398d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "Received Version %d SubType %d", 6408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt rbind->version, rbind->received_version, rbind->subtype); 6418d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump(MSG_MSGDUMP, "EAP-FAST: NONCE", 6428d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt rbind->nonce, sizeof(rbind->nonce)); 6438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump(MSG_MSGDUMP, "EAP-FAST: Compound MAC", 6448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt rbind->compound_mac, sizeof(rbind->compound_mac)); 6458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 6468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 6478d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 6488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_get_phase2_key(struct eap_sm *sm, 6498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data, 6508d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *isk, size_t isk_len) 6518d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 6528d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *key; 6538d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt size_t key_len; 6548d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 6558d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memset(isk, 0, isk_len); 6568d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 6578d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->phase2_method == NULL || data->phase2_priv == NULL) { 6588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Phase 2 method not " 6598d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "available"); 6608d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 6618d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 6628d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 6638d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->phase2_method->isKeyAvailable == NULL || 6648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_method->getKey == NULL) 6658d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 6668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 6678d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (!data->phase2_method->isKeyAvailable(sm, data->phase2_priv) || 6688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt (key = data->phase2_method->getKey(sm, data->phase2_priv, 6698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt &key_len)) == NULL) { 6708d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Could not get key material " 6718d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "from Phase 2"); 6728d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 6738d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 6748d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 6758d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (key_len > isk_len) 6768d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt key_len = isk_len; 6778d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (key_len == 32 && 6788d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_method->vendor == EAP_VENDOR_IETF && 6798d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_method->method == EAP_TYPE_MSCHAPV2) { 6808d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* 6818d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * EAP-FAST uses reverse order for MS-MPPE keys when deriving 6828d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * MSK from EAP-MSCHAPv2. Swap the keys here to get the correct 6838d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * ISK for EAP-FAST cryptobinding. 6848d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 6858d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memcpy(isk, key + 16, 16); 6868d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memcpy(isk + 16, key, 16); 6878d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } else 6888d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memcpy(isk, key, key_len); 6898d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_free(key); 6908d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 6918d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 6928d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 6938d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 6948d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 6958d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_get_cmk(struct eap_sm *sm, struct eap_fast_data *data, 6968d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *cmk) 6978d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 6988d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 isk[32], imck[60]; 6998d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7008d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Determining CMK[%d] for Compound MIC " 7018d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "calculation", data->simck_idx + 1); 7028d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7038d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* 7048d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * RFC 4851, Section 5.2: 7058d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * IMCK[j] = T-PRF(S-IMCK[j-1], "Inner Methods Compound Keys", 7068d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * MSK[j], 60) 7078d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * S-IMCK[j] = first 40 octets of IMCK[j] 7088d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * CMK[j] = last 20 octets of IMCK[j] 7098d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 7108d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7118d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (eap_fast_get_phase2_key(sm, data, isk, sizeof(isk)) < 0) 7128d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 7138d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump_key(MSG_MSGDUMP, "EAP-FAST: ISK[j]", isk, sizeof(isk)); 7148d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt sha1_t_prf(data->simck, EAP_FAST_SIMCK_LEN, 7158d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "Inner Methods Compound Keys", 7168d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt isk, sizeof(isk), imck, sizeof(imck)); 7178d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->simck_idx++; 7188d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memcpy(data->simck, imck, EAP_FAST_SIMCK_LEN); 7198d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump_key(MSG_MSGDUMP, "EAP-FAST: S-IMCK[j]", 7208d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->simck, EAP_FAST_SIMCK_LEN); 7218d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memcpy(cmk, imck + EAP_FAST_SIMCK_LEN, EAP_FAST_CMK_LEN); 7228d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump_key(MSG_MSGDUMP, "EAP-FAST: CMK[j]", 7238d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt cmk, EAP_FAST_CMK_LEN); 7248d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7258d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 7268d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 7278d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7288d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7298d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic u8 * eap_fast_write_pac_request(u8 *pos, u16 pac_type) 7308d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 7318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_tlv_hdr *pac; 7328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_tlv_request_action_tlv *act; 7338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_tlv_pac_type_tlv *type; 7348d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7358d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt act = (struct eap_tlv_request_action_tlv *) pos; 7368d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt act->tlv_type = host_to_be16(EAP_TLV_REQUEST_ACTION_TLV); 7378d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt act->length = host_to_be16(2); 7388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt act->action = host_to_be16(EAP_TLV_ACTION_PROCESS_TLV); 7398d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pac = (struct eap_tlv_hdr *) (act + 1); 7418d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pac->tlv_type = host_to_be16(EAP_TLV_PAC_TLV); 7428d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pac->length = host_to_be16(sizeof(*type)); 7438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt type = (struct eap_tlv_pac_type_tlv *) (pac + 1); 7458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt type->tlv_type = host_to_be16(PAC_TYPE_PAC_TYPE); 7468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt type->length = host_to_be16(2); 7478d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt type->pac_type = host_to_be16(pac_type); 7488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return (u8 *) (type + 1); 7508d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 7518d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7528d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7538d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic struct wpabuf * eap_fast_process_crypto_binding( 7548d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_sm *sm, struct eap_fast_data *data, 7558d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_method_ret *ret, 7568d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_tlv_crypto_binding_tlv *_bind, size_t bind_len) 7578d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 7588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct wpabuf *resp; 7598d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *pos; 7608d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 cmk[EAP_FAST_CMK_LEN], cmac[SHA1_MAC_LEN]; 7618d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int res; 7628d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt size_t len; 7638d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (eap_fast_validate_crypto_binding(_bind) < 0) 7658d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 7668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7678d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (eap_fast_get_cmk(sm, data, cmk) < 0) 7688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 7698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7708d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* Validate received Compound MAC */ 7718d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memcpy(cmac, _bind->compound_mac, sizeof(cmac)); 7728d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memset(_bind->compound_mac, 0, sizeof(cmac)); 7738d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump(MSG_MSGDUMP, "EAP-FAST: Crypto-Binding TLV for Compound " 7748d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "MAC calculation", (u8 *) _bind, bind_len); 7758d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt hmac_sha1(cmk, EAP_FAST_CMK_LEN, (u8 *) _bind, bind_len, 7768d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt _bind->compound_mac); 777c28170251eb54dbf64a9074a07fee377587425b2Dmitry Shmidt res = os_memcmp_const(cmac, _bind->compound_mac, sizeof(cmac)); 7788d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump(MSG_MSGDUMP, "EAP-FAST: Received Compound MAC", 7798d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt cmac, sizeof(cmac)); 7808d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump(MSG_MSGDUMP, "EAP-FAST: Calculated Compound MAC", 7818d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt _bind->compound_mac, sizeof(cmac)); 7828d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (res != 0) { 7838d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: Compound MAC did not match"); 7848d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memcpy(_bind->compound_mac, cmac, sizeof(cmac)); 7858d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 7868d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 7878d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7888d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* 7898d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * Compound MAC was valid, so authentication succeeded. Reply with 7908d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * crypto binding to allow server to complete authentication. 7918d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 7928d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7938d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt len = sizeof(struct eap_tlv_crypto_binding_tlv); 7948d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt resp = wpabuf_alloc(len); 7958d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (resp == NULL) 7968d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 7978d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 7988d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (!data->anon_provisioning && data->phase2_success && 7998d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_derive_msk(data) < 0) { 8008d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: Failed to generate MSK"); 8018d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret->methodState = METHOD_DONE; 8028d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret->decision = DECISION_FAIL; 8038d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_success = 0; 8048d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpabuf_free(resp); 8058d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 8068d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 8078d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 808f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt if (!data->anon_provisioning && data->phase2_success) { 809f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt os_free(data->session_id); 810f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt data->session_id = eap_peer_tls_derive_session_id( 811f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt sm, &data->ssl, EAP_TYPE_FAST, &data->id_len); 812f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt if (data->session_id) { 813f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt wpa_hexdump(MSG_DEBUG, "EAP-FAST: Derived Session-Id", 814f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt data->session_id, data->id_len); 815f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt } else { 816f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt wpa_printf(MSG_ERROR, "EAP-FAST: Failed to derive " 817f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt "Session-Id"); 818f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt wpabuf_free(resp); 819f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt return NULL; 820f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt } 821f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt } 822f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt 8238d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos = wpabuf_put(resp, sizeof(struct eap_tlv_crypto_binding_tlv)); 8248d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_write_crypto_binding((struct eap_tlv_crypto_binding_tlv *) 8258d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos, _bind, cmk); 8268d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 8278d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return resp; 8288d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 8298d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 8308d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 8318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic void eap_fast_parse_pac_tlv(struct eap_fast_pac *entry, int type, 8328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *pos, size_t len, int *pac_key_found) 8338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 8348d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt switch (type & 0x7fff) { 8358d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt case PAC_TYPE_PAC_KEY: 8368d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump_key(MSG_DEBUG, "EAP-FAST: PAC-Key", pos, len); 8378d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (len != EAP_FAST_PAC_KEY_LEN) { 8388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Invalid PAC-Key " 8398d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "length %lu", (unsigned long) len); 8408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt break; 8418d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 8428d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt *pac_key_found = 1; 8438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memcpy(entry->pac_key, pos, len); 8448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt break; 8458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt case PAC_TYPE_PAC_OPAQUE: 8468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump(MSG_DEBUG, "EAP-FAST: PAC-Opaque", pos, len); 8478d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt entry->pac_opaque = pos; 8488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt entry->pac_opaque_len = len; 8498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt break; 8508d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt case PAC_TYPE_PAC_INFO: 8518d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump(MSG_DEBUG, "EAP-FAST: PAC-Info", pos, len); 8528d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt entry->pac_info = pos; 8538d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt entry->pac_info_len = len; 8548d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt break; 8558d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt default: 8568d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Ignored unknown PAC type %d", 8578d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt type); 8588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt break; 8598d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 8608d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 8618d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 8628d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 8638d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_process_pac_tlv(struct eap_fast_pac *entry, 8648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *pac, size_t pac_len) 8658d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 8668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct pac_tlv_hdr *hdr; 8678d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *pos; 8688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt size_t left, len; 8698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int type, pac_key_found = 0; 8708d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 8718d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos = pac; 8728d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt left = pac_len; 8738d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 8748d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt while (left > sizeof(*hdr)) { 8758d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt hdr = (struct pac_tlv_hdr *) pos; 8768d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt type = be_to_host16(hdr->type); 8778d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt len = be_to_host16(hdr->len); 8788d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos += sizeof(*hdr); 8798d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt left -= sizeof(*hdr); 8808d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (len > left) { 8818d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: PAC TLV overrun " 8828d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "(type=%d len=%lu left=%lu)", 8838d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt type, (unsigned long) len, 8848d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt (unsigned long) left); 8858d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 8868d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 8878d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 8888d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_parse_pac_tlv(entry, type, pos, len, &pac_key_found); 8898d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 8908d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos += len; 8918d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt left -= len; 8928d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 8938d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 8948d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (!pac_key_found || !entry->pac_opaque || !entry->pac_info) { 8958d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: PAC TLV does not include " 8968d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "all the required fields"); 8978d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 8988d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 8998d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 9008d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 9018d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 9028d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 9038d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 9048d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_parse_pac_info(struct eap_fast_pac *entry, int type, 9058d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *pos, size_t len) 9068d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 9078d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u16 pac_type; 9088d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u32 lifetime; 9098d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct os_time now; 9108d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 9118d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt switch (type & 0x7fff) { 9128d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt case PAC_TYPE_CRED_LIFETIME: 9138d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (len != 4) { 9148d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump(MSG_DEBUG, "EAP-FAST: PAC-Info - " 9158d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "Invalid CRED_LIFETIME length - ignored", 9168d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos, len); 9178d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 9188d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 9198d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 9208d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* 9218d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * This is not currently saved separately in PAC files since 9228d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * the server can automatically initiate PAC update when 9238d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * needed. Anyway, the information is available from PAC-Info 9248d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * dump if it is needed for something in the future. 9258d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 9268d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt lifetime = WPA_GET_BE32(pos); 9278d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_get_time(&now); 9288d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: PAC-Info - CRED_LIFETIME %d " 9298d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "(%d days)", 9308d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt lifetime, (lifetime - (u32) now.sec) / 86400); 9318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt break; 9328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt case PAC_TYPE_A_ID: 9338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump_ascii(MSG_DEBUG, "EAP-FAST: PAC-Info - A-ID", 9348d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos, len); 9358d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt entry->a_id = pos; 9368d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt entry->a_id_len = len; 9378d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt break; 9388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt case PAC_TYPE_I_ID: 9398d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump_ascii(MSG_DEBUG, "EAP-FAST: PAC-Info - I-ID", 9408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos, len); 9418d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt entry->i_id = pos; 9428d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt entry->i_id_len = len; 9438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt break; 9448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt case PAC_TYPE_A_ID_INFO: 9458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump_ascii(MSG_DEBUG, "EAP-FAST: PAC-Info - A-ID-Info", 9468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos, len); 9478d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt entry->a_id_info = pos; 9488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt entry->a_id_info_len = len; 9498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt break; 9508d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt case PAC_TYPE_PAC_TYPE: 9518d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* RFC 5422, Section 4.2.6 - PAC-Type TLV */ 9528d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (len != 2) { 9538d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: Invalid PAC-Type " 9548d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "length %lu (expected 2)", 9558d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt (unsigned long) len); 9568d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump_ascii(MSG_DEBUG, 9578d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "EAP-FAST: PAC-Info - PAC-Type", 9588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos, len); 9598d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 9608d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 9618d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pac_type = WPA_GET_BE16(pos); 9628d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (pac_type != PAC_TYPE_TUNNEL_PAC && 9638d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pac_type != PAC_TYPE_USER_AUTHORIZATION && 9648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pac_type != PAC_TYPE_MACHINE_AUTHENTICATION) { 9658d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: Unsupported PAC Type " 9668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "%d", pac_type); 9678d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 9688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 9698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 9708d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: PAC-Info - PAC-Type %d", 9718d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pac_type); 9728d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt entry->pac_type = pac_type; 9738d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt break; 9748d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt default: 9758d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Ignored unknown PAC-Info " 9768d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "type %d", type); 9778d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt break; 9788d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 9798d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 9808d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 9818d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 9828d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 9838d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 9848d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_process_pac_info(struct eap_fast_pac *entry) 9858d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 9868d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct pac_tlv_hdr *hdr; 9878d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *pos; 9888d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt size_t left, len; 9898d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int type; 9908d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 9918d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* RFC 5422, Section 4.2.4 */ 9928d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 9938d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* PAC-Type defaults to Tunnel PAC (Type 1) */ 9948d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt entry->pac_type = PAC_TYPE_TUNNEL_PAC; 9958d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 9968d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos = entry->pac_info; 9978d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt left = entry->pac_info_len; 9988d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt while (left > sizeof(*hdr)) { 9998d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt hdr = (struct pac_tlv_hdr *) pos; 10008d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt type = be_to_host16(hdr->type); 10018d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt len = be_to_host16(hdr->len); 10028d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos += sizeof(*hdr); 10038d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt left -= sizeof(*hdr); 10048d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (len > left) { 10058d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: PAC-Info overrun " 10068d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "(type=%d len=%lu left=%lu)", 10078d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt type, (unsigned long) len, 10088d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt (unsigned long) left); 10098d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 10108d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 10118d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 10128d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (eap_fast_parse_pac_info(entry, type, pos, len) < 0) 10138d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 10148d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 10158d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos += len; 10168d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt left -= len; 10178d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 10188d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 10198d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (entry->a_id == NULL || entry->a_id_info == NULL) { 10208d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: PAC-Info does not include " 10218d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "all the required fields"); 10228d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 10238d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 10248d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 10258d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 10268d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 10278d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 10288d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 10298d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic struct wpabuf * eap_fast_process_pac(struct eap_sm *sm, 10308d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data, 10318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_method_ret *ret, 10328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *pac, size_t pac_len) 10338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 10348d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_peer_config *config = eap_get_config(sm); 10358d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_pac entry; 10368d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 10378d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memset(&entry, 0, sizeof(entry)); 10388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (eap_fast_process_pac_tlv(&entry, pac, pac_len) || 10398d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_process_pac_info(&entry)) 10408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 10418d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 10428d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_add_pac(&data->pac, &data->current_pac, &entry); 10438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_pac_list_truncate(data->pac, data->max_pac_list_len); 10448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->use_pac_binary_format) 10458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_save_pac_bin(sm, data->pac, config->pac_file); 10468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt else 10478d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_save_pac(sm, data->pac, config->pac_file); 10488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 10498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->provisioning) { 10508d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->anon_provisioning) { 10518d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* 10528d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * Unauthenticated provisioning does not provide keying 10538d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * material and must end with an EAP-Failure. 10548d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * Authentication will be done separately after this. 10558d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 10568d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->success = 0; 10578d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret->decision = DECISION_FAIL; 10588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } else { 10598d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* 10608d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * Server may or may not allow authenticated 10618d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * provisioning also for key generation. 10628d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 10638d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret->decision = DECISION_COND_SUCC; 10648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 10658d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Send PAC-Acknowledgement TLV " 10668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "- Provisioning completed successfully"); 1067344abd362cfe2d03ed956666527352826b67bde5Dmitry Shmidt sm->expected_failure = 1; 10688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } else { 10698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* 10708d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * This is PAC refreshing, i.e., normal authentication that is 10711f69aa52ea2e0a73ac502565df8c666ee49cab6aDmitry Shmidt * expected to be completed with an EAP-Success. However, 10721f69aa52ea2e0a73ac502565df8c666ee49cab6aDmitry Shmidt * RFC 5422, Section 3.5 allows EAP-Failure to be sent even 10731f69aa52ea2e0a73ac502565df8c666ee49cab6aDmitry Shmidt * after protected success exchange in case of EAP-Fast 10741f69aa52ea2e0a73ac502565df8c666ee49cab6aDmitry Shmidt * provisioning, so we better use DECISION_COND_SUCC here 10751f69aa52ea2e0a73ac502565df8c666ee49cab6aDmitry Shmidt * instead of DECISION_UNCOND_SUCC. 10768d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 10778d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Send PAC-Acknowledgement TLV " 10788d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "- PAC refreshing completed successfully"); 10791f69aa52ea2e0a73ac502565df8c666ee49cab6aDmitry Shmidt ret->decision = DECISION_COND_SUCC; 10808d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 10818d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret->methodState = METHOD_DONE; 10828d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return eap_fast_tlv_pac_ack(); 10838d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 10848d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 10858d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 10868d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_parse_decrypted(struct wpabuf *decrypted, 10878d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_tlv_parse *tlv, 10888d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct wpabuf **resp) 10898d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 10900c08fdcf5231617f2340cb18e45769a8ed3a1dc4Dmitry Shmidt int mandatory, tlv_type, res; 10910c08fdcf5231617f2340cb18e45769a8ed3a1dc4Dmitry Shmidt size_t len; 10928d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *pos, *end; 10938d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 10948d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memset(tlv, 0, sizeof(*tlv)); 10958d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 10968d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* Parse TLVs from the decrypted Phase 2 data */ 10978d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos = wpabuf_mhead(decrypted); 10988d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt end = pos + wpabuf_len(decrypted); 10998d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt while (pos + 4 < end) { 11008d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt mandatory = pos[0] & 0x80; 11018d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tlv_type = WPA_GET_BE16(pos) & 0x3fff; 11028d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos += 2; 11038d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt len = WPA_GET_BE16(pos); 11048d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos += 2; 11050c08fdcf5231617f2340cb18e45769a8ed3a1dc4Dmitry Shmidt if (len > (size_t) (end - pos)) { 11068d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: TLV overflow"); 11078d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 11088d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 11098d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Received Phase 2: " 11100c08fdcf5231617f2340cb18e45769a8ed3a1dc4Dmitry Shmidt "TLV type %d length %u%s", 11110c08fdcf5231617f2340cb18e45769a8ed3a1dc4Dmitry Shmidt tlv_type, (unsigned int) len, 11120c08fdcf5231617f2340cb18e45769a8ed3a1dc4Dmitry Shmidt mandatory ? " (mandatory)" : ""); 11138d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 11148d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt res = eap_fast_parse_tlv(tlv, tlv_type, pos, len); 11158d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (res == -2) 11168d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt break; 11178d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (res < 0) { 11188d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (mandatory) { 11198d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Nak unknown " 11208d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "mandatory TLV type %d", tlv_type); 11218d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt *resp = eap_fast_tlv_nak(0, tlv_type); 11228d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt break; 11238d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } else { 11248d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: ignored " 11258d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "unknown optional TLV type %d", 11268d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tlv_type); 11278d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 11288d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 11298d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 11308d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos += len; 11318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 11328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 11338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 11348d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 11358d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 11368d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 11378d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_encrypt_response(struct eap_sm *sm, 11388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data, 11398d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct wpabuf *resp, 11408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 identifier, struct wpabuf **out_data) 11418d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 11428d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (resp == NULL) 11438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 11448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 11458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump_buf(MSG_DEBUG, "EAP-FAST: Encrypting Phase 2 data", 11468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt resp); 11478d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (eap_peer_tls_encrypt(sm, &data->ssl, EAP_TYPE_FAST, 11488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->fast_version, identifier, 11498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt resp, out_data)) { 11508d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: Failed to encrypt a Phase 2 " 11518d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "frame"); 11528d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 11538d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpabuf_free(resp); 11548d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 11558d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 11568d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 11578d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 11588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 11598d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic struct wpabuf * eap_fast_pac_request(void) 11608d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 11618d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct wpabuf *tmp; 11628d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *pos, *pos2; 11638d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 11648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tmp = wpabuf_alloc(sizeof(struct eap_tlv_hdr) + 11658d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt sizeof(struct eap_tlv_request_action_tlv) + 11668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt sizeof(struct eap_tlv_pac_type_tlv)); 11678d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (tmp == NULL) 11688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 11698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 11708d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos = wpabuf_put(tmp, 0); 11718d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos2 = eap_fast_write_pac_request(pos, PAC_TYPE_TUNNEL_PAC); 11728d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpabuf_put(tmp, pos2 - pos); 11738d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return tmp; 11748d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 11758d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 11768d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 11778d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_process_decrypted(struct eap_sm *sm, 11788d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data, 11798d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_method_ret *ret, 1180cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt u8 identifier, 11818d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct wpabuf *decrypted, 11828d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct wpabuf **out_data) 11838d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 11848d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct wpabuf *resp = NULL, *tmp; 11858d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_tlv_parse tlv; 11868d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int failed = 0; 11878d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 11888d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (eap_fast_parse_decrypted(decrypted, &tlv, &resp) < 0) 11898d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 11908d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (resp) 11918d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return eap_fast_encrypt_response(sm, data, resp, 1192cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt identifier, out_data); 11938d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 11948d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (tlv.result == EAP_TLV_RESULT_FAILURE) { 11958d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt resp = eap_fast_tlv_result(EAP_TLV_RESULT_FAILURE, 0); 11968d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return eap_fast_encrypt_response(sm, data, resp, 1197cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt identifier, out_data); 11988d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 11998d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 12008d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (tlv.iresult == EAP_TLV_RESULT_FAILURE) { 12018d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt resp = eap_fast_tlv_result(EAP_TLV_RESULT_FAILURE, 1); 12028d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return eap_fast_encrypt_response(sm, data, resp, 1203cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt identifier, out_data); 12048d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 12058d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 12068d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (tlv.crypto_binding) { 12078d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tmp = eap_fast_process_crypto_binding(sm, data, ret, 12088d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tlv.crypto_binding, 12098d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tlv.crypto_binding_len); 12108d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (tmp == NULL) 12118d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt failed = 1; 12128d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt else 12138d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt resp = wpabuf_concat(resp, tmp); 12148d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 12158d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 12168d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (tlv.iresult == EAP_TLV_RESULT_SUCCESS) { 12178d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tmp = eap_fast_tlv_result(failed ? EAP_TLV_RESULT_FAILURE : 12188d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt EAP_TLV_RESULT_SUCCESS, 1); 12198d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt resp = wpabuf_concat(resp, tmp); 12208d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 12218d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 12228d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (tlv.eap_payload_tlv) { 12238d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tmp = eap_fast_process_eap_payload_tlv( 12241f69aa52ea2e0a73ac502565df8c666ee49cab6aDmitry Shmidt sm, data, ret, tlv.eap_payload_tlv, 12258d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tlv.eap_payload_tlv_len); 12268d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt resp = wpabuf_concat(resp, tmp); 12278d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 12288d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 12298d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (tlv.pac && tlv.result != EAP_TLV_RESULT_SUCCESS) { 12308d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: PAC TLV without Result TLV " 12318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "acknowledging success"); 12328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt failed = 1; 12338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } else if (tlv.pac && tlv.result == EAP_TLV_RESULT_SUCCESS) { 12348d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tmp = eap_fast_process_pac(sm, data, ret, tlv.pac, 12358d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tlv.pac_len); 12368d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt resp = wpabuf_concat(resp, tmp); 12378d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 12388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 12398d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->current_pac == NULL && data->provisioning && 12408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt !data->anon_provisioning && !tlv.pac && 12418d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt (tlv.iresult == EAP_TLV_RESULT_SUCCESS || 12428d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tlv.result == EAP_TLV_RESULT_SUCCESS)) { 12438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* 12448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * Need to request Tunnel PAC when using authenticated 12458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * provisioning. 12468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 12478d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Request Tunnel PAC"); 12488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tmp = eap_fast_pac_request(); 12498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt resp = wpabuf_concat(resp, tmp); 12508d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 12518d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 12528d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (tlv.result == EAP_TLV_RESULT_SUCCESS && !failed) { 12538d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tmp = eap_fast_tlv_result(EAP_TLV_RESULT_SUCCESS, 0); 12548d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt resp = wpabuf_concat(tmp, resp); 12558d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } else if (failed) { 12568d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tmp = eap_fast_tlv_result(EAP_TLV_RESULT_FAILURE, 0); 12578d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt resp = wpabuf_concat(tmp, resp); 12588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 12598d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 12608d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (resp && tlv.result == EAP_TLV_RESULT_SUCCESS && !failed && 12618d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tlv.crypto_binding && data->phase2_success) { 12628d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->anon_provisioning) { 12638d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Unauthenticated " 12648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "provisioning completed successfully."); 12658d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret->methodState = METHOD_DONE; 12668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret->decision = DECISION_FAIL; 1267344abd362cfe2d03ed956666527352826b67bde5Dmitry Shmidt sm->expected_failure = 1; 12688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } else { 12698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Authentication " 12708d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "completed successfully."); 12718d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->provisioning) 12728d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret->methodState = METHOD_MAY_CONT; 12738d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt else 12748d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret->methodState = METHOD_DONE; 12758d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret->decision = DECISION_UNCOND_SUCC; 12768d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 12778d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 12788d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 12798d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (resp == NULL) { 12808d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: No recognized TLVs - send " 12818d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "empty response packet"); 12828d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt resp = wpabuf_alloc(1); 12838d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 12848d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1285cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt return eap_fast_encrypt_response(sm, data, resp, identifier, 12868d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt out_data); 12878d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 12888d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 12898d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 12908d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_decrypt(struct eap_sm *sm, struct eap_fast_data *data, 1291cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt struct eap_method_ret *ret, u8 identifier, 12928d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt const struct wpabuf *in_data, 12938d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct wpabuf **out_data) 12948d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 12958d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct wpabuf *in_decrypted; 12968d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int res; 12978d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 12988d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Received %lu bytes encrypted data for" 12998d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt " Phase 2", (unsigned long) wpabuf_len(in_data)); 13008d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 13018d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->pending_phase2_req) { 13028d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Pending Phase 2 request - " 13038d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "skip decryption and use old data"); 13048d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* Clear TLS reassembly state. */ 13058d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_peer_tls_reset_input(&data->ssl); 13068d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 13078d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt in_decrypted = data->pending_phase2_req; 13088d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->pending_phase2_req = NULL; 13098d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt goto continue_req; 13108d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 13118d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 13128d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (wpabuf_len(in_data) == 0) { 13138d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* Received TLS ACK - requesting more fragments */ 13148d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return eap_peer_tls_encrypt(sm, &data->ssl, EAP_TYPE_FAST, 13158d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->fast_version, 1316cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt identifier, NULL, out_data); 13178d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 13188d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 13198d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt res = eap_peer_tls_decrypt(sm, &data->ssl, in_data, &in_decrypted); 13208d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (res) 13218d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return res; 13228d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 13238d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtcontinue_req: 13248d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump_buf(MSG_MSGDUMP, "EAP-FAST: Decrypted Phase 2 TLV(s)", 13258d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt in_decrypted); 13268d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 13278d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (wpabuf_len(in_decrypted) < 4) { 13288d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: Too short Phase 2 " 13298d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "TLV frame (len=%lu)", 13308d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt (unsigned long) wpabuf_len(in_decrypted)); 13318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpabuf_free(in_decrypted); 13328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 13338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 13348d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1335cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt res = eap_fast_process_decrypted(sm, data, ret, identifier, 13368d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt in_decrypted, out_data); 13378d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 13388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpabuf_free(in_decrypted); 13398d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 13408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return res; 13418d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 13428d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 13438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 13448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic const u8 * eap_fast_get_a_id(const u8 *buf, size_t len, size_t *id_len) 13458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 13468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt const u8 *a_id; 1347cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt const struct pac_tlv_hdr *hdr; 13488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 13498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* 13508d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * Parse authority identity (A-ID) from the EAP-FAST/Start. This 13518d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * supports both raw A-ID and one inside an A-ID TLV. 13528d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 13538d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt a_id = buf; 13548d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt *id_len = len; 13558d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (len > sizeof(*hdr)) { 13568d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int tlen; 1357cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt hdr = (const struct pac_tlv_hdr *) buf; 13588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tlen = be_to_host16(hdr->len); 13598d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (be_to_host16(hdr->type) == PAC_TYPE_A_ID && 13608d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt sizeof(*hdr) + tlen <= len) { 13618d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: A-ID was in TLV " 13628d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "(Start)"); 1363cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt a_id = (const u8 *) (hdr + 1); 13648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt *id_len = tlen; 13658d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 13668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 13678d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump_ascii(MSG_DEBUG, "EAP-FAST: A-ID", a_id, *id_len); 13688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 13698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return a_id; 13708d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 13718d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 13728d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 13738d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic void eap_fast_select_pac(struct eap_fast_data *data, 13748d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt const u8 *a_id, size_t a_id_len) 13758d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 13768d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->current_pac = eap_fast_get_pac(data->pac, a_id, a_id_len, 13778d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt PAC_TYPE_TUNNEL_PAC); 13788d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->current_pac == NULL) { 13798d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* 13808d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * Tunnel PAC was not available for this A-ID. Try to use 13818d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * Machine Authentication PAC, if one is available. 13828d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 13838d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->current_pac = eap_fast_get_pac( 13848d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->pac, a_id, a_id_len, 13858d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt PAC_TYPE_MACHINE_AUTHENTICATION); 13868d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 13878d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 13888d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->current_pac) { 13898d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: PAC found for this A-ID " 13908d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "(PAC-Type %d)", data->current_pac->pac_type); 13918d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_hexdump_ascii(MSG_MSGDUMP, "EAP-FAST: A-ID-Info", 13928d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->current_pac->a_id_info, 13938d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->current_pac->a_id_info_len); 13948d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 13958d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 13968d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 13978d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 13988d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_use_pac_opaque(struct eap_sm *sm, 13998d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data, 14008d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_pac *pac) 14018d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 14028d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *tlv; 14038d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt size_t tlv_len, olen; 14048d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_tlv_hdr *ehdr; 14058d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 14068d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt olen = pac->pac_opaque_len; 14078d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tlv_len = sizeof(*ehdr) + olen; 14088d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tlv = os_malloc(tlv_len); 14098d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (tlv) { 14108d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ehdr = (struct eap_tlv_hdr *) tlv; 14118d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ehdr->tlv_type = host_to_be16(PAC_TYPE_PAC_OPAQUE); 14128d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ehdr->length = host_to_be16(olen); 14138d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memcpy(ehdr + 1, pac->pac_opaque, olen); 14148d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 14158d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (tlv == NULL || 14168d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tls_connection_client_hello_ext(sm->ssl_ctx, data->ssl.conn, 14178d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt TLS_EXT_PAC_OPAQUE, 14188d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tlv, tlv_len) < 0) { 14198d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Failed to add PAC-Opaque TLS " 14208d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "extension"); 14218d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_free(tlv); 14228d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 14238d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 14248d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_free(tlv); 14258d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 14268d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 14278d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 14288d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 14298d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 14308d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_clear_pac_opaque_ext(struct eap_sm *sm, 14318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data) 14328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 14338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (tls_connection_client_hello_ext(sm->ssl_ctx, data->ssl.conn, 14348d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt TLS_EXT_PAC_OPAQUE, NULL, 0) < 0) { 14358d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Failed to remove PAC-Opaque " 14368d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "TLS extension"); 14378d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 14388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 14398d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 14408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 14418d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 14428d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 14438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_set_provisioning_ciphers(struct eap_sm *sm, 14448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data) 14458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 14468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 ciphers[5]; 14478d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int count = 0; 14488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 14498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->provisioning_allowed & EAP_FAST_PROV_UNAUTH) { 14508d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Enabling unauthenticated " 14518d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "provisioning TLS cipher suites"); 14528d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ciphers[count++] = TLS_CIPHER_ANON_DH_AES128_SHA; 14538d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 14548d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 14558d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->provisioning_allowed & EAP_FAST_PROV_AUTH) { 14568d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Enabling authenticated " 14578d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "provisioning TLS cipher suites"); 14588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ciphers[count++] = TLS_CIPHER_RSA_DHE_AES128_SHA; 14598d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ciphers[count++] = TLS_CIPHER_AES128_SHA; 14608d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ciphers[count++] = TLS_CIPHER_RC4_SHA; 14618d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 14628d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 14638d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ciphers[count++] = TLS_CIPHER_NONE; 14648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 14658d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (tls_connection_set_cipher_list(sm->ssl_ctx, data->ssl.conn, 14668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ciphers)) { 14678d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_INFO, "EAP-FAST: Could not configure TLS " 14688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "cipher suites for provisioning"); 14698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 14708d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 14718d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 14728d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 14738d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 14748d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 14758d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 14768d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_process_start(struct eap_sm *sm, 14778d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data, u8 flags, 14788d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt const u8 *pos, size_t left) 14798d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 14808d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt const u8 *a_id; 14818d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt size_t a_id_len; 14828d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 14838d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* EAP-FAST Version negotiation (section 3.1) */ 14848d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Start (server ver=%d, own ver=%d)", 14858d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt flags & EAP_TLS_VERSION_MASK, data->fast_version); 14868d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if ((flags & EAP_TLS_VERSION_MASK) < data->fast_version) 14878d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->fast_version = flags & EAP_TLS_VERSION_MASK; 14888d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Using FAST version %d", 14898d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->fast_version); 14908d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 14918d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt a_id = eap_fast_get_a_id(pos, left, &a_id_len); 14928d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_select_pac(data, a_id, a_id_len); 14938d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 14948d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->resuming && data->current_pac) { 14958d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Trying to resume session - " 14968d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "do not add PAC-Opaque to TLS ClientHello"); 14978d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (eap_fast_clear_pac_opaque_ext(sm, data) < 0) 14988d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 14998d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } else if (data->current_pac) { 15008d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* 15018d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * PAC found for the A-ID and we are not resuming an old 15028d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * session, so add PAC-Opaque extension to ClientHello. 15038d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 15048d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (eap_fast_use_pac_opaque(sm, data, data->current_pac) < 0) 15058d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 15068d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } else { 15078d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* No PAC found, so we must provision one. */ 15088d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (!data->provisioning_allowed) { 15098d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: No PAC found and " 15108d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "provisioning disabled"); 15118d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 15128d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 15138d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: No PAC found - " 15148d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "starting provisioning"); 15158d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (eap_fast_set_provisioning_ciphers(sm, data) < 0 || 15168d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_fast_clear_pac_opaque_ext(sm, data) < 0) 15178d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 15188d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->provisioning = 1; 15198d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 15208d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 15218d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return 0; 15228d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 15238d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 15248d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 15258d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic struct wpabuf * eap_fast_process(struct eap_sm *sm, void *priv, 15268d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_method_ret *ret, 15278d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt const struct wpabuf *reqData) 15288d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 15298d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt const struct eap_hdr *req; 15308d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt size_t left; 15318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int res; 15328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 flags, id; 15338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct wpabuf *resp; 15348d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt const u8 *pos; 15358d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data = priv; 1536cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt struct wpabuf msg; 15378d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 15388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt pos = eap_peer_tls_process_init(sm, &data->ssl, EAP_TYPE_FAST, ret, 15398d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt reqData, &left, &flags); 15408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (pos == NULL) 15418d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 15428d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 15438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt req = wpabuf_head(reqData); 15448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt id = req->identifier; 15458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 15468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (flags & EAP_TLS_FLAGS_START) { 15478d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (eap_fast_process_start(sm, data, flags, pos, left) < 0) 15488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 15498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 15508d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt left = 0; /* A-ID is not used in further packet processing */ 15518d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 15528d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1553cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt wpabuf_set(&msg, pos, left); 1554cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt 15558d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt resp = NULL; 15568d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (tls_connection_established(sm->ssl_ctx, data->ssl.conn) && 15578d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt !data->resuming) { 15588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* Process tunneled (encrypted) phase 2 data. */ 1559cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt res = eap_fast_decrypt(sm, data, ret, id, &msg, &resp); 15608d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (res < 0) { 15618d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret->methodState = METHOD_DONE; 15628d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret->decision = DECISION_FAIL; 15638d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* 15648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * Ack possible Alert that may have caused failure in 15658d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * decryption. 15668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 15678d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt res = 1; 15688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 15698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } else { 15708d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* Continue processing TLS handshake (phase 1). */ 15718d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt res = eap_peer_tls_process_helper(sm, &data->ssl, 15728d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt EAP_TYPE_FAST, 1573cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt data->fast_version, id, &msg, 1574cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt &resp); 15758d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 15768d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (tls_connection_established(sm->ssl_ctx, data->ssl.conn)) { 15778d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt char cipher[80]; 15788d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, 15798d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "EAP-FAST: TLS done, proceed to Phase 2"); 15808d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->provisioning && 15818d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt (!(data->provisioning_allowed & 15828d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt EAP_FAST_PROV_AUTH) || 15838d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt tls_get_cipher(sm->ssl_ctx, data->ssl.conn, 15848d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt cipher, sizeof(cipher)) < 0 || 15858d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_strstr(cipher, "ADH-") || 15868d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_strstr(cipher, "anon"))) { 15878d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpa_printf(MSG_DEBUG, "EAP-FAST: Using " 15888d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "anonymous (unauthenticated) " 15898d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "provisioning"); 15908d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->anon_provisioning = 1; 15918d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } else 15928d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->anon_provisioning = 0; 15938d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->resuming = 0; 1594a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt if (eap_fast_derive_keys(sm, data) < 0) { 1595a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt wpa_printf(MSG_DEBUG, 1596a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt "EAP-FAST: Could not derive keys"); 1597a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt ret->methodState = METHOD_DONE; 1598a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt ret->decision = DECISION_FAIL; 1599a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt wpabuf_free(resp); 1600a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt return NULL; 1601a3dc30964aa24aea2b518246f6812663a1103490Dmitry Shmidt } 16028d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 16038d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 16048d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (res == 2) { 16058d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt /* 16068d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt * Application data included in the handshake message. 16078d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt */ 16088d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpabuf_free(data->pending_phase2_req); 16098d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->pending_phase2_req = resp; 16108d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt resp = NULL; 1611cc00d5dc8483e32158b2ba61ea44b0c38d790ed7Dmitry Shmidt res = eap_fast_decrypt(sm, data, ret, id, &msg, &resp); 16128d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 16138d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 16148d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 16158d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (res == 1) { 16168d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpabuf_free(resp); 16178d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return eap_peer_tls_build_ack(id, EAP_TYPE_FAST, 16188d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->fast_version); 16198d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 16208d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 16218d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return resp; 16228d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 16238d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 16248d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 16258d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#if 0 /* FIX */ 16268d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic Boolean eap_fast_has_reauth_data(struct eap_sm *sm, void *priv) 16278d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 16288d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data = priv; 16298d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return tls_connection_established(sm->ssl_ctx, data->ssl.conn); 16308d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 16318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 16328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 16338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic void eap_fast_deinit_for_reauth(struct eap_sm *sm, void *priv) 16348d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 16358d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data = priv; 16368d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_free(data->key_block_p); 16378d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->key_block_p = NULL; 16388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt wpabuf_free(data->pending_phase2_req); 16398d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->pending_phase2_req = NULL; 16408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 16418d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 16428d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 16438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic void * eap_fast_init_for_reauth(struct eap_sm *sm, void *priv) 16448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 16458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data = priv; 16468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (eap_peer_tls_reauth_init(sm, &data->ssl)) { 16478d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_free(data); 16488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 16498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 1650c28170251eb54dbf64a9074a07fee377587425b2Dmitry Shmidt os_memset(data->key_data, 0, EAP_FAST_KEY_LEN); 1651c28170251eb54dbf64a9074a07fee377587425b2Dmitry Shmidt os_memset(data->emsk, 0, EAP_EMSK_LEN); 1652f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt os_free(data->session_id); 1653f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt data->session_id = NULL; 16548d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->phase2_priv && data->phase2_method && 16558d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_method->init_for_reauth) 16568d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_method->init_for_reauth(sm, data->phase2_priv); 16578d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_success = 0; 16588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->resuming = 1; 16598d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->provisioning = 0; 16608d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->anon_provisioning = 0; 16618d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->simck_idx = 0; 16628d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return priv; 16638d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 16648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#endif 16658d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 16668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 16678d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic int eap_fast_get_status(struct eap_sm *sm, void *priv, char *buf, 16688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt size_t buflen, int verbose) 16698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 16708d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data = priv; 16718d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int len, ret; 16728d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 16738d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt len = eap_peer_tls_status(sm, &data->ssl, buf, buflen, verbose); 16748d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (data->phase2_method) { 16758d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret = os_snprintf(buf + len, buflen - len, 16768d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt "EAP-FAST Phase2 method=%s\n", 16778d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt data->phase2_method->name); 1678fb45fd5cfed8bdccd0859c7fc05449fc187e2d06Dmitry Shmidt if (os_snprintf_error(buflen - len, ret)) 16798d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return len; 16808d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt len += ret; 16818d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt } 16828d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return len; 16838d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 16848d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 16858d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 16868d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic Boolean eap_fast_isKeyAvailable(struct eap_sm *sm, void *priv) 16878d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 16888d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data = priv; 16898d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return data->success; 16908d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 16918d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 16928d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 16938d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic u8 * eap_fast_getKey(struct eap_sm *sm, void *priv, size_t *len) 16948d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 16958d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data = priv; 16968d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *key; 16978d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 16988d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (!data->success) 16998d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 17008d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 17018d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt key = os_malloc(EAP_FAST_KEY_LEN); 17028d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (key == NULL) 17038d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 17048d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 17058d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt *len = EAP_FAST_KEY_LEN; 17068d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memcpy(key, data->key_data, EAP_FAST_KEY_LEN); 17078d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 17088d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return key; 17098d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 17108d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 17118d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 1712f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidtstatic u8 * eap_fast_get_session_id(struct eap_sm *sm, void *priv, size_t *len) 1713f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt{ 1714f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt struct eap_fast_data *data = priv; 1715f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt u8 *id; 1716f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt 1717f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt if (!data->success) 1718f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt return NULL; 1719f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt 1720f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt id = os_malloc(data->id_len); 1721f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt if (id == NULL) 1722f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt return NULL; 1723f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt 1724f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt *len = data->id_len; 1725f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt os_memcpy(id, data->session_id, data->id_len); 1726f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt 1727f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt return id; 1728f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt} 1729f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt 1730f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt 17318d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtstatic u8 * eap_fast_get_emsk(struct eap_sm *sm, void *priv, size_t *len) 17328d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 17338d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_fast_data *data = priv; 17348d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt u8 *key; 17358d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 17368d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (!data->success) 17378d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 17388d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 17398d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt key = os_malloc(EAP_EMSK_LEN); 17408d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (key == NULL) 17418d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return NULL; 17428d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 17438d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt *len = EAP_EMSK_LEN; 17448d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt os_memcpy(key, data->emsk, EAP_EMSK_LEN); 17458d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 17468d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return key; 17478d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 17488d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 17498d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 17508d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidtint eap_peer_fast_register(void) 17518d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt{ 17528d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt struct eap_method *eap; 17538d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt int ret; 17548d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 17558d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap = eap_peer_method_alloc(EAP_PEER_METHOD_INTERFACE_VERSION, 17568d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt EAP_VENDOR_IETF, EAP_TYPE_FAST, "FAST"); 17578d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (eap == NULL) 17588d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return -1; 17598d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 17608d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap->init = eap_fast_init; 17618d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap->deinit = eap_fast_deinit; 17628d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap->process = eap_fast_process; 17638d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap->isKeyAvailable = eap_fast_isKeyAvailable; 17648d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap->getKey = eap_fast_getKey; 1765f86232838cf712377867cb42417c1613ab5dc425Dmitry Shmidt eap->getSessionId = eap_fast_get_session_id; 17668d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap->get_status = eap_fast_get_status; 17678d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#if 0 17688d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap->has_reauth_data = eap_fast_has_reauth_data; 17698d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap->deinit_for_reauth = eap_fast_deinit_for_reauth; 17708d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap->init_for_reauth = eap_fast_init_for_reauth; 17718d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt#endif 17728d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap->get_emsk = eap_fast_get_emsk; 17738d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt 17748d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt ret = eap_peer_method_register(eap); 17758d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt if (ret) 17768d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt eap_peer_method_free(eap); 17778d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt return ret; 17788d520ff1dc2da35cdca849e982051b86468016d8Dmitry Shmidt} 1779