hostapd/ieee802_1x.c

   1 /*
   2  * hostapd / IEEE 802.1X-2004 Authenticator
   3  * Copyright (c) 2002-2008, Jouni Malinen <j@w1.fi>
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License version 2 as
   7  * published by the Free Software Foundation.
   8  *
   9  * Alternatively, this software may be distributed under the terms of BSD
  10  * license.
  11  *
  12  * See README and COPYING for more details.
  13  */
  14
  15 #include "includes.h"
  16
  17 #include "hostapd.h"
  18 #include "ieee802_1x.h"
  19 #include "accounting.h"
  20 #include "radius/radius.h"
  21 #include "radius/radius_client.h"
  22 #include "eapol_sm.h"
  23 #include "md5.h"
  24 #include "rc4.h"
  25 #include "eloop.h"
  26 #include "sta_info.h"
  27 #include "wpa.h"
  28 #include "preauth.h"
  29 #include "pmksa_cache.h"
  30 #include "driver.h"
  31 #include "hw_features.h"
  32 #include "eap_server/eap.h"
  33
  34
  35 static void ieee802_1x_finished(struct hostapd_data *hapd,
  36                                 struct sta_info *sta, int success);
  37
  38
  39 static void ieee802_1x_send(struct hostapd_data *hapd, struct sta_info *sta,
  40                             u8 type, const u8 *data, size_t datalen)
  41 {
  42         u8 *buf;
  43         struct ieee802_1x_hdr *xhdr;
  44         size_t len;
  45         int encrypt = 0;
  46
  47         len = sizeof(*xhdr) + datalen;
  48         buf = os_zalloc(len);
  49         if (buf == NULL) {
  50                 wpa_printf(MSG_ERROR, "malloc() failed for "
  51                            "ieee802_1x_send(len=%lu)",
  52                            (unsigned long) len);
  53                 return;
  54         }
  55
  56         xhdr = (struct ieee802_1x_hdr *) buf;
  57         xhdr->version = hapd->conf->eapol_version;
  58         xhdr->type = type;
  59         xhdr->length = host_to_be16(datalen);
  60
  61         if (datalen > 0 && data != NULL)
  62                 os_memcpy(xhdr + 1, data, datalen);
  63
  64         if (wpa_auth_pairwise_set(sta->wpa_sm))
  65                 encrypt = 1;
  66         if (sta->flags & WLAN_STA_PREAUTH) {
  67                 rsn_preauth_send(hapd, sta, buf, len);
  68         } else {
  69                 hostapd_send_eapol(hapd, sta->addr, buf, len, encrypt);
  70         }
  71
  72         os_free(buf);
  73 }
  74
  75
  76 void ieee802_1x_set_sta_authorized(struct hostapd_data *hapd,
  77                                    struct sta_info *sta, int authorized)
  78 {
  79         int res;
  80
  81         if (sta->flags & WLAN_STA_PREAUTH)
  82                 return;
  83
  84         if (authorized) {
  85                 sta->flags |= WLAN_STA_AUTHORIZED;
  86                 res = hostapd_sta_set_flags(hapd, sta->addr, sta->flags,
  87                                             WLAN_STA_AUTHORIZED, ~0);
  88                 hostapd_logger(hapd, sta->addr, HOSTAPD_MODULE_IEEE8021X,
  89                                HOSTAPD_LEVEL_DEBUG, "authorizing port");
  90         } else {
  91                 sta->flags &= ~WLAN_STA_AUTHORIZED;
  92                 res = hostapd_sta_set_flags(hapd, sta->addr, sta->flags,
  93                                             0, ~WLAN_STA_AUTHORIZED);
  94                 hostapd_logger(hapd, sta->addr, HOSTAPD_MODULE_IEEE8021X,
  95                                HOSTAPD_LEVEL_DEBUG, "unauthorizing port");
  96         }
  97
  98         if (res && errno != ENOENT) {
  99                 printf("Could not set station " MACSTR " flags for kernel "
 100                        "driver (errno=%d).\n", MAC2STR(sta->addr), errno);
 101         }
 102
 103         if (authorized)
 104                 accounting_sta_start(hapd, sta);
 105 }
 106
 107
 108 static void ieee802_1x_eap_timeout(void *eloop_ctx, void *timeout_ctx)
 109 {
 110         struct sta_info *sta = eloop_ctx;
 111         struct eapol_state_machine *sm = sta->eapol_sm;
 112         if (sm == NULL)
 113                 return;
 114         hostapd_logger(sm->hapd, sta->addr, HOSTAPD_MODULE_IEEE8021X,
 115                        HOSTAPD_LEVEL_DEBUG, "EAP timeout");
 116         sm->eap_if->eapTimeout = TRUE;
 117         eapol_auth_step(sm);
 118 }
 119
 120
 121 static void ieee802_1x_tx_key_one(struct hostapd_data *hapd,
 122                                   struct sta_info *sta,
 123                                   int idx, int broadcast,
 124                                   u8 *key_data, size_t key_len)
 125 {
 126         u8 *buf, *ekey;
 127         struct ieee802_1x_hdr *hdr;
 128         struct ieee802_1x_eapol_key *key;
 129         size_t len, ekey_len;
 130         struct eapol_state_machine *sm = sta->eapol_sm;
 131
 132         if (sm == NULL)
 133                 return;
 134
 135         len = sizeof(*key) + key_len;
 136         buf = os_zalloc(sizeof(*hdr) + len);
 137         if (buf == NULL)
 138                 return;
 139
 140         hdr = (struct ieee802_1x_hdr *) buf;
 141         key = (struct ieee802_1x_eapol_key *) (hdr + 1);
 142         key->type = EAPOL_KEY_TYPE_RC4;
 143         key->key_length = htons(key_len);
 144         wpa_get_ntp_timestamp(key->replay_counter);
 145
 146         if (os_get_random(key->key_iv, sizeof(key->key_iv))) {
 147                 wpa_printf(MSG_ERROR, "Could not get random numbers");
 148                 os_free(buf);
 149                 return;
 150         }
 151
 152         key->key_index = idx | (broadcast ? 0 : BIT(7));
 153         if (hapd->conf->eapol_key_index_workaround) {
 154                 /* According to some information, WinXP Supplicant seems to
 155                  * interpret bit7 as an indication whether the key is to be
 156                  * activated, so make it possible to enable workaround that
 157                  * sets this bit for all keys. */
 158                 key->key_index |= BIT(7);
 159         }
 160
 161         /* Key is encrypted using "Key-IV + MSK[0..31]" as the RC4-key and
 162          * MSK[32..63] is used to sign the message. */
 163         if (sm->eap_if->eapKeyData == NULL || sm->eap_if->eapKeyDataLen < 64) {
 164                 wpa_printf(MSG_ERROR, "No eapKeyData available for encrypting "
 165                            "and signing EAPOL-Key");
 166                 os_free(buf);
 167                 return;
 168         }
 169         os_memcpy((u8 *) (key + 1), key_data, key_len);
 170         ekey_len = sizeof(key->key_iv) + 32;
 171         ekey = os_malloc(ekey_len);
 172         if (ekey == NULL) {
 173                 wpa_printf(MSG_ERROR, "Could not encrypt key");
 174                 os_free(buf);
 175                 return;
 176         }
 177         os_memcpy(ekey, key->key_iv, sizeof(key->key_iv));
 178         os_memcpy(ekey + sizeof(key->key_iv), sm->eap_if->eapKeyData, 32);
 179         rc4((u8 *) (key + 1), key_len, ekey, ekey_len);
 180         os_free(ekey);
 181
 182         /* This header is needed here for HMAC-MD5, but it will be regenerated
 183          * in ieee802_1x_send() */
 184         hdr->version = hapd->conf->eapol_version;
 185         hdr->type = IEEE802_1X_TYPE_EAPOL_KEY;
 186         hdr->length = host_to_be16(len);
 187         hmac_md5(sm->eap_if->eapKeyData + 32, 32, buf, sizeof(*hdr) + len,
 188                  key->key_signature);
 189
 190         wpa_printf(MSG_DEBUG, "IEEE 802.1X: Sending EAPOL-Key to " MACSTR
 191                    " (%s index=%d)", MAC2STR(sm->addr),
 192                    broadcast ? "broadcast" : "unicast", idx);
 193         ieee802_1x_send(hapd, sta, IEEE802_1X_TYPE_EAPOL_KEY, (u8 *) key, len);
 194         if (sta->eapol_sm)
 195                 sta->eapol_sm->dot1xAuthEapolFramesTx++;
 196         os_free(buf);
 197 }
 198
 199
 200 static struct hostapd_wep_keys *
 201 ieee802_1x_group_alloc(struct hostapd_data *hapd, const char *ifname)
 202 {
 203         struct hostapd_wep_keys *key;
 204
 205         key = os_zalloc(sizeof(*key));
 206         if (key == NULL)
 207                 return NULL;
 208
 209         key->default_len = hapd->conf->default_wep_key_len;
 210
 211         if (key->idx >= hapd->conf->broadcast_key_idx_max ||
 212             key->idx < hapd->conf->broadcast_key_idx_min)
 213                 key->idx = hapd->conf->broadcast_key_idx_min;
 214         else
 215                 key->idx++;
 216
 217         if (!key->key[key->idx])
 218                 key->key[key->idx] = os_malloc(key->default_len);
 219         if (key->key[key->idx] == NULL ||
 220             os_get_random(key->key[key->idx], key->default_len)) {
 221                 printf("Could not generate random WEP key (dynamic VLAN).\n");
 222                 os_free(key->key[key->idx]);
 223                 key->key[key->idx] = NULL;
 224                 os_free(key);
 225                 return NULL;
 226         }
 227         key->len[key->idx] = key->default_len;
 228
 229         wpa_printf(MSG_DEBUG, "%s: Default WEP idx %d for dynamic VLAN\n",
 230                    ifname, key->idx);
 231         wpa_hexdump_key(MSG_DEBUG, "Default WEP key (dynamic VLAN)",
 232                         key->key[key->idx], key->len[key->idx]);
 233
 234         if (hostapd_set_encryption(ifname, hapd, "WEP", NULL, key->idx,
 235                                    key->key[key->idx], key->len[key->idx], 1))
 236                 printf("Could not set dynamic VLAN WEP encryption key.\n");
 237
 238         hostapd_set_ieee8021x(ifname, hapd, 1);
 239
 240         return key;
 241 }
 242
 243
 244 static struct hostapd_wep_keys *
 245 ieee802_1x_get_group(struct hostapd_data *hapd, struct hostapd_ssid *ssid,
 246                      size_t vlan_id)
 247 {
 248         const char *ifname;
 249
 250         if (vlan_id == 0)
 251                 return &ssid->wep;
 252
 253         if (vlan_id <= ssid->max_dyn_vlan_keys && ssid->dyn_vlan_keys &&
 254             ssid->dyn_vlan_keys[vlan_id])
 255                 return ssid->dyn_vlan_keys[vlan_id];
 256
 257         wpa_printf(MSG_DEBUG, "IEEE 802.1X: Creating new group "
 258                    "state machine for VLAN ID %lu",
 259                    (unsigned long) vlan_id);
 260
 261         ifname = hostapd_get_vlan_id_ifname(hapd->conf->vlan, vlan_id);
 262         if (ifname == NULL) {
 263                 wpa_printf(MSG_DEBUG, "IEEE 802.1X: Unknown VLAN ID %lu - "
 264                            "cannot create group key state machine",
 265                            (unsigned long) vlan_id);
 266                 return NULL;
 267         }
 268
 269         if (ssid->dyn_vlan_keys == NULL) {
 270                 int size = (vlan_id + 1) * sizeof(ssid->dyn_vlan_keys[0]);
 271                 ssid->dyn_vlan_keys = os_zalloc(size);
 272                 if (ssid->dyn_vlan_keys == NULL)
 273                         return NULL;
 274                 ssid->max_dyn_vlan_keys = vlan_id;
 275         }
 276
 277         if (ssid->max_dyn_vlan_keys < vlan_id) {
 278                 struct hostapd_wep_keys **na;
 279                 int size = (vlan_id + 1) * sizeof(ssid->dyn_vlan_keys[0]);
 280                 na = os_realloc(ssid->dyn_vlan_keys, size);
 281                 if (na == NULL)
 282                         return NULL;
 283                 ssid->dyn_vlan_keys = na;
 284                 os_memset(&ssid->dyn_vlan_keys[ssid->max_dyn_vlan_keys + 1], 0,
 285                           (vlan_id - ssid->max_dyn_vlan_keys) *
 286                           sizeof(ssid->dyn_vlan_keys[0]));
 287                 ssid->max_dyn_vlan_keys = vlan_id;
 288         }
 289
 290         ssid->dyn_vlan_keys[vlan_id] = ieee802_1x_group_alloc(hapd, ifname);
 291
 292         return ssid->dyn_vlan_keys[vlan_id];
 293 }
 294
 295
 296 void ieee802_1x_tx_key(struct hostapd_data *hapd, struct sta_info *sta)
 297 {
 298         struct hostapd_wep_keys *key = NULL;
 299         struct eapol_state_machine *sm = sta->eapol_sm;
 300         int vlan_id;
 301
 302         if (sm == NULL || !sm->eap_if->eapKeyData)
 303                 return;
 304
 305         wpa_printf(MSG_DEBUG, "IEEE 802.1X: Sending EAPOL-Key(s) to " MACSTR,
 306                    MAC2STR(sta->addr));
 307
 308         vlan_id = sta->vlan_id;
 309         if (vlan_id < 0 || vlan_id > MAX_VLAN_ID)
 310                 vlan_id = 0;
 311
 312         if (vlan_id) {
 313                 key = ieee802_1x_get_group(hapd, sta->ssid, vlan_id);
 314                 if (key && key->key[key->idx])
 315                         ieee802_1x_tx_key_one(hapd, sta, key->idx, 1,
 316                                               key->key[key->idx],
 317                                               key->len[key->idx]);
 318         } else if (hapd->default_wep_key) {
 319                 ieee802_1x_tx_key_one(hapd, sta, hapd->default_wep_key_idx, 1,
 320                                       hapd->default_wep_key,
 321                                       hapd->conf->default_wep_key_len);
 322         }
 323
 324         if (hapd->conf->individual_wep_key_len > 0) {
 325                 u8 *ikey;
 326                 ikey = os_malloc(hapd->conf->individual_wep_key_len);
 327                 if (ikey == NULL ||
 328                     os_get_random(ikey, hapd->conf->individual_wep_key_len)) {
 329                         wpa_printf(MSG_ERROR, "Could not generate random "
 330                                    "individual WEP key.");
 331                         os_free(ikey);
 332                         return;
 333                 }
 334
 335                 wpa_hexdump_key(MSG_DEBUG, "Individual WEP key",
 336                                 ikey, hapd->conf->individual_wep_key_len);
 337
 338                 ieee802_1x_tx_key_one(hapd, sta, 0, 0, ikey,
 339                                       hapd->conf->individual_wep_key_len);
 340
 341                 /* TODO: set encryption in TX callback, i.e., only after STA
 342                  * has ACKed EAPOL-Key frame */
 343                 if (hostapd_set_encryption(hapd->conf->iface, hapd, "WEP",
 344                                            sta->addr, 0, ikey,
 345                                            hapd->conf->individual_wep_key_len,
 346                                            1)) {
 347                         wpa_printf(MSG_ERROR, "Could not set individual WEP "
 348                                    "encryption.");
 349                 }
 350
 351                 os_free(ikey);
 352         }
 353 }
 354
 355
 356 const char *radius_mode_txt(struct hostapd_data *hapd)
 357 {
 358         if (hapd->iface->current_mode == NULL)
 359                 return "802.11";
 360
 361         switch (hapd->iface->current_mode->mode) {
 362         case HOSTAPD_MODE_IEEE80211A:
 363                 return "802.11a";
 364         case HOSTAPD_MODE_IEEE80211G:
 365                 return "802.11g";
 366         case HOSTAPD_MODE_IEEE80211B:
 367         default:
 368                 return "802.11b";
 369         }
 370 }
 371
 372
 373 int radius_sta_rate(struct hostapd_data *hapd, struct sta_info *sta)
 374 {
 375         int i;
 376         u8 rate = 0;
 377
 378         for (i = 0; i < sta->supported_rates_len; i++)
 379                 if ((sta->supported_rates[i] & 0x7f) > rate)
 380                         rate = sta->supported_rates[i] & 0x7f;
 381
 382         return rate;
 383 }
 384
 385
 386 static void ieee802_1x_learn_identity(struct hostapd_data *hapd,
 387                                       struct eapol_state_machine *sm,
 388                                       const u8 *eap, size_t len)
 389 {
 390         const u8 *identity;
 391         size_t identity_len;
 392
 393         if (len <= sizeof(struct eap_hdr) ||
 394             eap[sizeof(struct eap_hdr)] != EAP_TYPE_IDENTITY)
 395                 return;
 396
 397         identity = eap_get_identity(sm->eap, &identity_len);
 398         if (identity == NULL)
 399                 return;
 400
 401         /* Save station identity for future RADIUS packets */
 402         os_free(sm->identity);
 403         sm->identity = os_malloc(identity_len + 1);
 404         if (sm->identity == NULL) {
 405                 sm->identity_len = 0;
 406                 return;
 407         }
 408
 409         os_memcpy(sm->identity, identity, identity_len);
 410         sm->identity_len = identity_len;
 411         sm->identity[identity_len] = '\0';
 412         hostapd_logger(hapd, sm->addr, HOSTAPD_MODULE_IEEE8021X,
 413                        HOSTAPD_LEVEL_DEBUG, "STA identity '%s'", sm->identity);
 414         sm->dot1xAuthEapolRespIdFramesRx++;
 415 }
 416
 417
 418 static void ieee802_1x_encapsulate_radius(struct hostapd_data *hapd,
 419                                           struct sta_info *sta,
 420                                           const u8 *eap, size_t len)
 421 {
 422         struct radius_msg *msg;
 423         char buf[128];
 424         struct eapol_state_machine *sm = sta->eapol_sm;
 425
 426         if (sm == NULL)
 427                 return;
 428
 429         ieee802_1x_learn_identity(hapd, sm, eap, len);
 430
 431         wpa_printf(MSG_DEBUG, "Encapsulating EAP message into a RADIUS "
 432                    "packet");
 433
 434         sm->radius_identifier = radius_client_get_id(hapd->radius);
 435         msg = radius_msg_new(RADIUS_CODE_ACCESS_REQUEST,
 436                              sm->radius_identifier);
 437         if (msg == NULL) {
 438                 printf("Could not create net RADIUS packet\n");
 439                 return;
 440         }
 441
 442         radius_msg_make_authenticator(msg, (u8 *) sta, sizeof(*sta));
 443
 444         if (sm->identity &&
 445             !radius_msg_add_attr(msg, RADIUS_ATTR_USER_NAME,
 446                                  sm->identity, sm->identity_len)) {
 447                 printf("Could not add User-Name\n");
 448                 goto fail;
 449         }
 450
 451         if (hapd->conf->own_ip_addr.af == AF_INET &&
 452             !radius_msg_add_attr(msg, RADIUS_ATTR_NAS_IP_ADDRESS,
 453                                  (u8 *) &hapd->conf->own_ip_addr.u.v4, 4)) {
 454                 printf("Could not add NAS-IP-Address\n");
 455                 goto fail;
 456         }
 457
 458 #ifdef CONFIG_IPV6
 459         if (hapd->conf->own_ip_addr.af == AF_INET6 &&
 460             !radius_msg_add_attr(msg, RADIUS_ATTR_NAS_IPV6_ADDRESS,
 461                                  (u8 *) &hapd->conf->own_ip_addr.u.v6, 16)) {
 462                 printf("Could not add NAS-IPv6-Address\n");
 463                 goto fail;
 464         }
 465 #endif /* CONFIG_IPV6 */
 466
 467         if (hapd->conf->nas_identifier &&
 468             !radius_msg_add_attr(msg, RADIUS_ATTR_NAS_IDENTIFIER,
 469                                  (u8 *) hapd->conf->nas_identifier,
 470                                  os_strlen(hapd->conf->nas_identifier))) {
 471                 printf("Could not add NAS-Identifier\n");
 472                 goto fail;
 473         }
 474
 475         if (!radius_msg_add_attr_int32(msg, RADIUS_ATTR_NAS_PORT, sta->aid)) {
 476                 printf("Could not add NAS-Port\n");
 477                 goto fail;
 478         }
 479
 480         os_snprintf(buf, sizeof(buf), RADIUS_802_1X_ADDR_FORMAT ":%s",
 481                     MAC2STR(hapd->own_addr), hapd->conf->ssid.ssid);
 482         buf[sizeof(buf) - 1] = '\0';
 483         if (!radius_msg_add_attr(msg, RADIUS_ATTR_CALLED_STATION_ID,
 484                                  (u8 *) buf, os_strlen(buf))) {
 485                 printf("Could not add Called-Station-Id\n");
 486                 goto fail;
 487         }
 488
 489         os_snprintf(buf, sizeof(buf), RADIUS_802_1X_ADDR_FORMAT,
 490                     MAC2STR(sta->addr));
 491         buf[sizeof(buf) - 1] = '\0';
 492         if (!radius_msg_add_attr(msg, RADIUS_ATTR_CALLING_STATION_ID,
 493                                  (u8 *) buf, os_strlen(buf))) {
 494                 printf("Could not add Calling-Station-Id\n");
 495                 goto fail;
 496         }
 497
 498         /* TODO: should probably check MTU from driver config; 2304 is max for
 499          * IEEE 802.11, but use 1400 to avoid problems with too large packets
 500          */
 501         if (!radius_msg_add_attr_int32(msg, RADIUS_ATTR_FRAMED_MTU, 1400)) {
 502                 printf("Could not add Framed-MTU\n");
 503                 goto fail;
 504         }
 505
 506         if (!radius_msg_add_attr_int32(msg, RADIUS_ATTR_NAS_PORT_TYPE,
 507                                        RADIUS_NAS_PORT_TYPE_IEEE_802_11)) {
 508                 printf("Could not add NAS-Port-Type\n");
 509                 goto fail;
 510         }
 511
 512         if (sta->flags & WLAN_STA_PREAUTH) {
 513                 os_strlcpy(buf, "IEEE 802.11i Pre-Authentication",
 514                            sizeof(buf));
 515         } else {
 516                 os_snprintf(buf, sizeof(buf), "CONNECT %d%sMbps %s",
 517                             radius_sta_rate(hapd, sta) / 2,
 518                             (radius_sta_rate(hapd, sta) & 1) ? ".5" : "",
 519                             radius_mode_txt(hapd));
 520                 buf[sizeof(buf) - 1] = '\0';
 521         }
 522         if (!radius_msg_add_attr(msg, RADIUS_ATTR_CONNECT_INFO,
 523                                  (u8 *) buf, os_strlen(buf))) {
 524                 printf("Could not add Connect-Info\n");
 525                 goto fail;
 526         }
 527
 528         if (eap && !radius_msg_add_eap(msg, eap, len)) {
 529                 printf("Could not add EAP-Message\n");
 530                 goto fail;
 531         }
 532
 533         /* State attribute must be copied if and only if this packet is
 534          * Access-Request reply to the previous Access-Challenge */
 535         if (sm->last_recv_radius && sm->last_recv_radius->hdr->code ==
 536             RADIUS_CODE_ACCESS_CHALLENGE) {
 537                 int res = radius_msg_copy_attr(msg, sm->last_recv_radius,
 538                                                RADIUS_ATTR_STATE);
 539                 if (res < 0) {
 540                         printf("Could not copy State attribute from previous "
 541                                "Access-Challenge\n");
 542                         goto fail;
 543                 }
 544                 if (res > 0) {
 545                         wpa_printf(MSG_DEBUG, "Copied RADIUS State Attribute");
 546                 }
 547         }
 548
 549         radius_client_send(hapd->radius, msg, RADIUS_AUTH, sta->addr);
 550         return;
 551
 552  fail:
 553         radius_msg_free(msg);
 554         os_free(msg);
 555 }
 556
 557
 558 char *eap_type_text(u8 type)
 559 {
 560         switch (type) {
 561         case EAP_TYPE_IDENTITY: return "Identity";
 562         case EAP_TYPE_NOTIFICATION: return "Notification";
 563         case EAP_TYPE_NAK: return "Nak";
 564         case EAP_TYPE_MD5: return "MD5-Challenge";
 565         case EAP_TYPE_OTP: return "One-Time Password";
 566         case EAP_TYPE_GTC: return "Generic Token Card";
 567         case EAP_TYPE_TLS: return "TLS";
 568         case EAP_TYPE_TTLS: return "TTLS";
 569         case EAP_TYPE_PEAP: return "PEAP";
 570         case EAP_TYPE_SIM: return "SIM";
 571         case EAP_TYPE_FAST: return "FAST";
 572         case EAP_TYPE_SAKE: return "SAKE";
 573         case EAP_TYPE_PSK: return "PSK";
 574         case EAP_TYPE_PAX: return "PAX";
 575         default: return "Unknown";
 576         }
 577 }
 578
 579
 580 static void handle_eap_response(struct hostapd_data *hapd,
 581                                 struct sta_info *sta, struct eap_hdr *eap,
 582                                 size_t len)
 583 {
 584         u8 type, *data;
 585         struct eapol_state_machine *sm = sta->eapol_sm;
 586         if (sm == NULL)
 587                 return;
 588
 589         data = (u8 *) (eap + 1);
 590
 591         if (len < sizeof(*eap) + 1) {
 592                 printf("handle_eap_response: too short response data\n");
 593                 return;
 594         }
 595
 596         sm->eap_type_supp = type = data[0];
 597         eloop_cancel_timeout(ieee802_1x_eap_timeout, sta, NULL);
 598
 599         hostapd_logger(hapd, sm->addr, HOSTAPD_MODULE_IEEE8021X,
 600                        HOSTAPD_LEVEL_DEBUG, "received EAP packet (code=%d "
 601                        "id=%d len=%d) from STA: EAP Response-%s (%d)",
 602                        eap->code, eap->identifier, be_to_host16(eap->length),
 603                        eap_type_text(type), type);
 604
 605         sm->dot1xAuthEapolRespFramesRx++;
 606
 607         wpabuf_free(sm->eap_if->eapRespData);
 608         sm->eap_if->eapRespData = wpabuf_alloc_copy(eap, len);
 609         sm->eapolEap = TRUE;
 610 }
 611
 612
 613 /* Process incoming EAP packet from Supplicant */
 614 static void handle_eap(struct hostapd_data *hapd, struct sta_info *sta,
 615                        u8 *buf, size_t len)
 616 {
 617         struct eap_hdr *eap;
 618         u16 eap_len;
 619
 620         if (len < sizeof(*eap)) {
 621                 printf("   too short EAP packet\n");
 622                 return;
 623         }
 624
 625         eap = (struct eap_hdr *) buf;
 626
 627         eap_len = be_to_host16(eap->length);
 628         wpa_printf(MSG_DEBUG, "EAP: code=%d identifier=%d length=%d",
 629                    eap->code, eap->identifier, eap_len);
 630         if (eap_len < sizeof(*eap)) {
 631                 wpa_printf(MSG_DEBUG, "   Invalid EAP length");
 632                 return;
 633         } else if (eap_len > len) {
 634                 wpa_printf(MSG_DEBUG, "   Too short frame to contain this EAP "
 635                            "packet");
 636                 return;
 637         } else if (eap_len < len) {
 638                 wpa_printf(MSG_DEBUG, "   Ignoring %lu extra bytes after EAP "
 639                            "packet", (unsigned long) len - eap_len);
 640         }
 641
 642         switch (eap->code) {
 643         case EAP_CODE_REQUEST:
 644                 wpa_printf(MSG_DEBUG, " (request)");
 645                 return;
 646         case EAP_CODE_RESPONSE:
 647                 wpa_printf(MSG_DEBUG, " (response)");
 648                 handle_eap_response(hapd, sta, eap, eap_len);
 649                 break;
 650         case EAP_CODE_SUCCESS:
 651                 wpa_printf(MSG_DEBUG, " (success)");
 652                 return;
 653         case EAP_CODE_FAILURE:
 654                 wpa_printf(MSG_DEBUG, " (failure)");
 655                 return;
 656         default:
 657                 wpa_printf(MSG_DEBUG, " (unknown code)");
 658                 return;
 659         }
 660 }
 661
 662
 663 /* Process the EAPOL frames from the Supplicant */
 664 void ieee802_1x_receive(struct hostapd_data *hapd, const u8 *sa, const u8 *buf,
 665                         size_t len)
 666 {
 667         struct sta_info *sta;
 668         struct ieee802_1x_hdr *hdr;
 669         struct ieee802_1x_eapol_key *key;
 670         u16 datalen;
 671         struct rsn_pmksa_cache_entry *pmksa;
 672
 673         if (!hapd->conf->ieee802_1x && !hapd->conf->wpa &&
 674             !hapd->conf->wps_state)
 675                 return;
 676
 677         wpa_printf(MSG_DEBUG, "IEEE 802.1X: %lu bytes from " MACSTR,
 678                    (unsigned long) len, MAC2STR(sa));
 679         sta = ap_get_sta(hapd, sa);
 680         if (!sta) {
 681                 printf("   no station information available\n");
 682                 return;
 683         }
 684
 685         if (len < sizeof(*hdr)) {
 686                 printf("   too short IEEE 802.1X packet\n");
 687                 return;
 688         }
 689
 690         hdr = (struct ieee802_1x_hdr *) buf;
 691         datalen = be_to_host16(hdr->length);
 692         wpa_printf(MSG_DEBUG, "   IEEE 802.1X: version=%d type=%d length=%d",
 693                    hdr->version, hdr->type, datalen);
 694
 695         if (len - sizeof(*hdr) < datalen) {
 696                 printf("   frame too short for this IEEE 802.1X packet\n");
 697                 if (sta->eapol_sm)
 698                         sta->eapol_sm->dot1xAuthEapLengthErrorFramesRx++;
 699                 return;
 700         }
 701         if (len - sizeof(*hdr) > datalen) {
 702                 wpa_printf(MSG_DEBUG, "   ignoring %lu extra octets after "
 703                            "IEEE 802.1X packet",
 704                            (unsigned long) len - sizeof(*hdr) - datalen);
 705         }
 706
 707         if (sta->eapol_sm) {
 708                 sta->eapol_sm->dot1xAuthLastEapolFrameVersion = hdr->version;
 709                 sta->eapol_sm->dot1xAuthEapolFramesRx++;
 710         }
 711
 712         key = (struct ieee802_1x_eapol_key *) (hdr + 1);
 713         if (datalen >= sizeof(struct ieee802_1x_eapol_key) &&
 714             hdr->type == IEEE802_1X_TYPE_EAPOL_KEY &&
 715             (key->type == EAPOL_KEY_TYPE_WPA ||
 716              key->type == EAPOL_KEY_TYPE_RSN)) {
 717                 wpa_receive(hapd->wpa_auth, sta->wpa_sm, (u8 *) hdr,
 718                             sizeof(*hdr) + datalen);
 719                 return;
 720         }
 721
 722         if ((!hapd->conf->ieee802_1x &&
 723              !(sta->flags & (WLAN_STA_WPS | WLAN_STA_MAYBE_WPS))) ||
 724             wpa_key_mgmt_wpa_psk(wpa_auth_sta_key_mgmt(sta->wpa_sm)))
 725                 return;
 726
 727         if (!sta->eapol_sm) {
 728                 sta->eapol_sm = eapol_auth_alloc(hapd->eapol_auth, sta->addr,
 729                                                  sta->flags & WLAN_STA_PREAUTH,
 730                                                  sta);
 731                 if (!sta->eapol_sm)
 732                         return;
 733
 734 #ifdef CONFIG_WPS
 735                 if (!hapd->conf->ieee802_1x &&
 736                     ((sta->flags & (WLAN_STA_WPS | WLAN_STA_MAYBE_WPS)) ==
 737                      WLAN_STA_MAYBE_WPS)) {
 738                         /*
 739                          * Delay EAPOL frame transmission until a possible WPS
 740                          * STA initiates the handshake with EAPOL-Start.
 741                          */
 742                         sta->eapol_sm->flags |= EAPOL_SM_WAIT_START;
 743                 }
 744 #endif /* CONFIG_WPS */
 745         }
 746
 747         /* since we support version 1, we can ignore version field and proceed
 748          * as specified in version 1 standard [IEEE Std 802.1X-2001, 7.5.5] */
 749         /* TODO: actually, we are not version 1 anymore.. However, Version 2
 750          * does not change frame contents, so should be ok to process frames
 751          * more or less identically. Some changes might be needed for
 752          * verification of fields. */
 753
 754         switch (hdr->type) {
 755         case IEEE802_1X_TYPE_EAP_PACKET:
 756                 handle_eap(hapd, sta, (u8 *) (hdr + 1), datalen);
 757                 break;
 758
 759         case IEEE802_1X_TYPE_EAPOL_START:
 760                 hostapd_logger(hapd, sta->addr, HOSTAPD_MODULE_IEEE8021X,
 761                                HOSTAPD_LEVEL_DEBUG, "received EAPOL-Start "
 762                                "from STA");
 763                 sta->eapol_sm->flags &= ~EAPOL_SM_WAIT_START;
 764                 pmksa = wpa_auth_sta_get_pmksa(sta->wpa_sm);
 765                 if (pmksa) {
 766                         hostapd_logger(hapd, sta->addr, HOSTAPD_MODULE_WPA,
 767                                        HOSTAPD_LEVEL_DEBUG, "cached PMKSA "
 768                                        "available - ignore it since "
 769                                        "STA sent EAPOL-Start");
 770                         wpa_auth_sta_clear_pmksa(sta->wpa_sm, pmksa);
 771                 }
 772                 sta->eapol_sm->eapolStart = TRUE;
 773                 sta->eapol_sm->dot1xAuthEapolStartFramesRx++;
 774                 wpa_auth_sm_event(sta->wpa_sm, WPA_REAUTH_EAPOL);
 775                 break;
 776
 777         case IEEE802_1X_TYPE_EAPOL_LOGOFF:
 778                 hostapd_logger(hapd, sta->addr, HOSTAPD_MODULE_IEEE8021X,
 779                                HOSTAPD_LEVEL_DEBUG, "received EAPOL-Logoff "
 780                                "from STA");
 781                 sta->acct_terminate_cause =
 782                         RADIUS_ACCT_TERMINATE_CAUSE_USER_REQUEST;
 783                 accounting_sta_stop(hapd, sta);
 784                 sta->eapol_sm->eapolLogoff = TRUE;
 785                 sta->eapol_sm->dot1xAuthEapolLogoffFramesRx++;
 786                 break;
 787
 788         case IEEE802_1X_TYPE_EAPOL_KEY:
 789                 wpa_printf(MSG_DEBUG, "   EAPOL-Key");
 790                 if (!(sta->flags & WLAN_STA_AUTHORIZED)) {
 791                         wpa_printf(MSG_DEBUG, "   Dropped key data from "
 792                                    "unauthorized Supplicant");
 793                         break;
 794                 }
 795                 break;
 796
 797         case IEEE802_1X_TYPE_EAPOL_ENCAPSULATED_ASF_ALERT:
 798                 wpa_printf(MSG_DEBUG, "   EAPOL-Encapsulated-ASF-Alert");
 799                 /* TODO: implement support for this; show data */
 800                 break;
 801
 802         default:
 803                 wpa_printf(MSG_DEBUG, "   unknown IEEE 802.1X packet type");
 804                 sta->eapol_sm->dot1xAuthInvalidEapolFramesRx++;
 805                 break;
 806         }
 807
 808         eapol_auth_step(sta->eapol_sm);
 809 }
 810
 811
 812 void ieee802_1x_new_station(struct hostapd_data *hapd, struct sta_info *sta)
 813 {
 814         struct rsn_pmksa_cache_entry *pmksa;
 815         int reassoc = 1;
 816         int force_1x = 0;
 817
 818 #ifdef CONFIG_WPS
 819         if (hapd->conf->wps_state &&
 820             (sta->flags & (WLAN_STA_WPS | WLAN_STA_MAYBE_WPS))) {
 821                 /*
 822                  * Need to enable IEEE 802.1X/EAPOL state machines for possible
 823                  * WPS handshake even if IEEE 802.1X/EAPOL is not used for
 824                  * authentication in this BSS.
 825                  */
 826                 force_1x = 1;
 827         }
 828 #endif /* CONFIG_WPS */
 829
 830         if ((!force_1x && !hapd->conf->ieee802_1x) ||
 831             wpa_key_mgmt_wpa_psk(wpa_auth_sta_key_mgmt(sta->wpa_sm)))
 832                 return;
 833
 834         if (sta->eapol_sm == NULL) {
 835                 hostapd_logger(hapd, sta->addr, HOSTAPD_MODULE_IEEE8021X,
 836                                HOSTAPD_LEVEL_DEBUG, "start authentication");
 837                 sta->eapol_sm = eapol_auth_alloc(hapd->eapol_auth, sta->addr,
 838                                                  sta->flags & WLAN_STA_PREAUTH,
 839                                                  sta);
 840                 if (sta->eapol_sm == NULL) {
 841                         hostapd_logger(hapd, sta->addr,
 842                                        HOSTAPD_MODULE_IEEE8021X,
 843                                        HOSTAPD_LEVEL_INFO,
 844                                        "failed to allocate state machine");
 845                         return;
 846                 }
 847                 reassoc = 0;
 848         }
 849
 850 #ifdef CONFIG_WPS
 851         if (!hapd->conf->ieee802_1x && !(sta->flags & WLAN_STA_WPS)) {
 852                 /*
 853                  * Delay EAPOL frame transmission until a possible WPS
 854                  * initiates the handshake with EAPOL-Start.
 855                  */
 856                 sta->eapol_sm->flags |= EAPOL_SM_WAIT_START;
 857         }
 858 #endif /* CONFIG_WPS */
 859
 860         sta->eapol_sm->eap_if->portEnabled = TRUE;
 861
 862         pmksa = wpa_auth_sta_get_pmksa(sta->wpa_sm);
 863         if (pmksa) {
 864                 int old_vlanid;
 865
 866                 hostapd_logger(hapd, sta->addr, HOSTAPD_MODULE_IEEE8021X,
 867                                HOSTAPD_LEVEL_DEBUG,
 868                                "PMK from PMKSA cache - skip IEEE 802.1X/EAP");
 869                 /* Setup EAPOL state machines to already authenticated state
 870                  * because of existing PMKSA information in the cache. */
 871                 sta->eapol_sm->keyRun = TRUE;
 872                 sta->eapol_sm->eap_if->eapKeyAvailable = TRUE;
 873                 sta->eapol_sm->auth_pae_state = AUTH_PAE_AUTHENTICATING;
 874                 sta->eapol_sm->be_auth_state = BE_AUTH_SUCCESS;
 875                 sta->eapol_sm->authSuccess = TRUE;
 876                 if (sta->eapol_sm->eap)
 877                         eap_sm_notify_cached(sta->eapol_sm->eap);
 878                 old_vlanid = sta->vlan_id;
 879                 pmksa_cache_to_eapol_data(pmksa, sta->eapol_sm);
 880                 if (sta->ssid->dynamic_vlan == DYNAMIC_VLAN_DISABLED)
 881                         sta->vlan_id = 0;
 882                 ap_sta_bind_vlan(hapd, sta, old_vlanid);
 883         } else {
 884                 if (reassoc) {
 885                         /*
 886                          * Force EAPOL state machines to start
 887                          * re-authentication without having to wait for the
 888                          * Supplicant to send EAPOL-Start.
 889                          */
 890                         sta->eapol_sm->reAuthenticate = TRUE;
 891                 }
 892                 eapol_auth_step(sta->eapol_sm);
 893         }
 894 }
 895
 896
 897 void ieee802_1x_free_radius_class(struct radius_class_data *class)
 898 {
 899         size_t i;
 900         if (class == NULL)
 901                 return;
 902         for (i = 0; i < class->count; i++)
 903                 os_free(class->attr[i].data);
 904         os_free(class->attr);
 905         class->attr = NULL;
 906         class->count = 0;
 907 }
 908
 909
 910 int ieee802_1x_copy_radius_class(struct radius_class_data *dst,
 911                                  const struct radius_class_data *src)
 912 {
 913         size_t i;
 914
 915         if (src->attr == NULL)
 916                 return 0;
 917
 918         dst->attr = os_zalloc(src->count * sizeof(struct radius_attr_data));
 919         if (dst->attr == NULL)
 920                 return -1;
 921
 922         dst->count = 0;
 923
 924         for (i = 0; i < src->count; i++) {
 925                 dst->attr[i].data = os_malloc(src->attr[i].len);
 926                 if (dst->attr[i].data == NULL)
 927                         break;
 928                 dst->count++;
 929                 os_memcpy(dst->attr[i].data, src->attr[i].data,
 930                           src->attr[i].len);
 931                 dst->attr[i].len = src->attr[i].len;
 932         }
 933
 934         return 0;
 935 }
 936
 937
 938 void ieee802_1x_free_station(struct sta_info *sta)
 939 {
 940         struct eapol_state_machine *sm = sta->eapol_sm;
 941
 942         eloop_cancel_timeout(ieee802_1x_eap_timeout, sta, NULL);
 943
 944         if (sm == NULL)
 945                 return;
 946
 947         sta->eapol_sm = NULL;
 948
 949         if (sm->last_recv_radius) {
 950                 radius_msg_free(sm->last_recv_radius);
 951                 os_free(sm->last_recv_radius);
 952         }
 953
 954         os_free(sm->identity);
 955         ieee802_1x_free_radius_class(&sm->radius_class);
 956         eapol_auth_free(sm);
 957 }
 958
 959
 960 static void ieee802_1x_decapsulate_radius(struct hostapd_data *hapd,
 961                                           struct sta_info *sta)
 962 {
 963         u8 *eap;
 964         size_t len;
 965         struct eap_hdr *hdr;
 966         int eap_type = -1;
 967         char buf[64];
 968         struct radius_msg *msg;
 969         struct eapol_state_machine *sm = sta->eapol_sm;
 970
 971         if (sm == NULL || sm->last_recv_radius == NULL) {
 972                 if (sm)
 973                         sm->eap_if->aaaEapNoReq = TRUE;
 974                 return;
 975         }
 976
 977         msg = sm->last_recv_radius;
 978
 979         eap = radius_msg_get_eap(msg, &len);
 980         if (eap == NULL) {
 981                 /* RFC 3579, Chap. 2.6.3:
 982                  * RADIUS server SHOULD NOT send Access-Reject/no EAP-Message
 983                  * attribute */
 984                 hostapd_logger(hapd, sta->addr, HOSTAPD_MODULE_IEEE8021X,
 985                                HOSTAPD_LEVEL_WARNING, "could not extract "
 986                                "EAP-Message from RADIUS message");
 987                 sm->eap_if->aaaEapNoReq = TRUE;
 988                 return;
 989         }
 990
 991         if (len < sizeof(*hdr)) {
 992                 hostapd_logger(hapd, sta->addr, HOSTAPD_MODULE_IEEE8021X,
 993                                HOSTAPD_LEVEL_WARNING, "too short EAP packet "
 994                                "received from authentication server");
 995                 os_free(eap);
 996                 sm->eap_if->aaaEapNoReq = TRUE;
 997                 return;
 998         }
 999
1000         if (len > sizeof(*hdr))
1001                 eap_type = eap[sizeof(*hdr)];
1002
1003         hdr = (struct eap_hdr *) eap;
1004         switch (hdr->code) {
1005         case EAP_CODE_REQUEST:
1006                 if (eap_type >= 0)
1007                         sm->eap_type_authsrv = eap_type;
1008                 os_snprintf(buf, sizeof(buf), "EAP-Request-%s (%d)",
1009                             eap_type >= 0 ? eap_type_text(eap_type) : "??",
1010                             eap_type);
1011                 break;
1012         case EAP_CODE_RESPONSE:
1013                 os_snprintf(buf, sizeof(buf), "EAP Response-%s (%d)",
1014                             eap_type >= 0 ? eap_type_text(eap_type) : "??",
1015                             eap_type);
1016                 break;
1017         case EAP_CODE_SUCCESS:
1018                 os_strlcpy(buf, "EAP Success", sizeof(buf));
1019                 break;
1020         case EAP_CODE_FAILURE:
1021                 os_strlcpy(buf, "EAP Failure", sizeof(buf));
1022                 break;
1023         default:
1024                 os_strlcpy(buf, "unknown EAP code", sizeof(buf));
1025                 break;
1026         }
1027         buf[sizeof(buf) - 1] = '\0';
1028         hostapd_logger(hapd, sta->addr, HOSTAPD_MODULE_IEEE8021X,
1029                        HOSTAPD_LEVEL_DEBUG, "decapsulated EAP packet (code=%d "
1030                        "id=%d len=%d) from RADIUS server: %s",
1031                        hdr->code, hdr->identifier, be_to_host16(hdr->length),
1032                        buf);
1033         sm->eap_if->aaaEapReq = TRUE;
1034
1035         wpabuf_free(sm->eap_if->aaaEapReqData);
1036         sm->eap_if->aaaEapReqData = wpabuf_alloc_ext_data(eap, len);
1037 }
1038
1039
1040 static void ieee802_1x_get_keys(struct hostapd_data *hapd,
1041                                 struct sta_info *sta, struct radius_msg *msg,
1042                                 struct radius_msg *req,
1043                                 u8 *shared_secret, size_t shared_secret_len)
1044 {
1045         struct radius_ms_mppe_keys *keys;
1046         struct eapol_state_machine *sm = sta->eapol_sm;
1047         if (sm == NULL)
1048                 return;
1049
1050         keys = radius_msg_get_ms_keys(msg, req, shared_secret,
1051                                       shared_secret_len);
1052
1053         if (keys && keys->send && keys->recv) {
1054                 size_t len = keys->send_len + keys->recv_len;
1055                 wpa_hexdump_key(MSG_DEBUG, "MS-MPPE-Send-Key",
1056                                 keys->send, keys->send_len);
1057                 wpa_hexdump_key(MSG_DEBUG, "MS-MPPE-Recv-Key",
1058                                 keys->recv, keys->recv_len);
1059
1060                 os_free(sm->eap_if->aaaEapKeyData);
1061                 sm->eap_if->aaaEapKeyData = os_malloc(len);
1062                 if (sm->eap_if->aaaEapKeyData) {
1063                         os_memcpy(sm->eap_if->aaaEapKeyData, keys->recv,
1064                                   keys->recv_len);
1065                         os_memcpy(sm->eap_if->aaaEapKeyData + keys->recv_len,
1066                                   keys->send, keys->send_len);
1067                         sm->eap_if->aaaEapKeyDataLen = len;
1068                         sm->eap_if->aaaEapKeyAvailable = TRUE;
1069                 }
1070         }
1071
1072         if (keys) {
1073                 os_free(keys->send);
1074                 os_free(keys->recv);
1075                 os_free(keys);
1076         }
1077 }
1078
1079
1080 static void ieee802_1x_store_radius_class(struct hostapd_data *hapd,
1081                                           struct sta_info *sta,
1082                                           struct radius_msg *msg)
1083 {
1084         u8 *class;
1085         size_t class_len;
1086         struct eapol_state_machine *sm = sta->eapol_sm;
1087         int count, i;
1088         struct radius_attr_data *nclass;
1089         size_t nclass_count;
1090
1091         if (!hapd->conf->radius->acct_server || hapd->radius == NULL ||
1092             sm == NULL)
1093                 return;
1094
1095         ieee802_1x_free_radius_class(&sm->radius_class);
1096         count = radius_msg_count_attr(msg, RADIUS_ATTR_CLASS, 1);
1097         if (count <= 0)
1098                 return;
1099
1100         nclass = os_zalloc(count * sizeof(struct radius_attr_data));
1101         if (nclass == NULL)
1102                 return;
1103
1104         nclass_count = 0;
1105
1106         class = NULL;
1107         for (i = 0; i < count; i++) {
1108                 do {
1109                         if (radius_msg_get_attr_ptr(msg, RADIUS_ATTR_CLASS,
1110                                                     &class, &class_len,
1111                                                     class) < 0) {
1112                                 i = count;
1113                                 break;
1114                         }
1115                 } while (class_len < 1);
1116
1117                 nclass[nclass_count].data = os_malloc(class_len);
1118                 if (nclass[nclass_count].data == NULL)
1119                         break;
1120
1121                 os_memcpy(nclass[nclass_count].data, class, class_len);
1122                 nclass[nclass_count].len = class_len;
1123                 nclass_count++;
1124         }
1125
1126         sm->radius_class.attr = nclass;
1127         sm->radius_class.count = nclass_count;
1128         wpa_printf(MSG_DEBUG, "IEEE 802.1X: Stored %lu RADIUS Class "
1129                    "attributes for " MACSTR,
1130                    (unsigned long) sm->radius_class.count,
1131                    MAC2STR(sta->addr));
1132 }
1133
1134
1135 /* Update sta->identity based on User-Name attribute in Access-Accept */
1136 static void ieee802_1x_update_sta_identity(struct hostapd_data *hapd,
1137                                            struct sta_info *sta,
1138                                            struct radius_msg *msg)
1139 {
1140         u8 *buf, *identity;
1141         size_t len;
1142         struct eapol_state_machine *sm = sta->eapol_sm;
1143
1144         if (sm == NULL)
1145                 return;
1146
1147         if (radius_msg_get_attr_ptr(msg, RADIUS_ATTR_USER_NAME, &buf, &len,
1148                                     NULL) < 0)
1149                 return;
1150
1151         identity = os_malloc(len + 1);
1152         if (identity == NULL)
1153                 return;
1154
1155         os_memcpy(identity, buf, len);
1156         identity[len] = '\0';
1157
1158         hostapd_logger(hapd, sta->addr, HOSTAPD_MODULE_IEEE8021X,
1159                        HOSTAPD_LEVEL_DEBUG, "old identity '%s' updated with "
1160                        "User-Name from Access-Accept '%s'",
1161                        sm->identity ? (char *) sm->identity : "N/A",
1162                        (char *) identity);
1163
1164         os_free(sm->identity);
1165         sm->identity = identity;
1166         sm->identity_len = len;
1167 }
1168
1169
1170 struct sta_id_search {
1171         u8 identifier;
1172         struct eapol_state_machine *sm;
1173 };
1174
1175
1176 static int ieee802_1x_select_radius_identifier(struct hostapd_data *hapd,
1177                                                struct sta_info *sta,
1178                                                void *ctx)
1179 {
1180         struct sta_id_search *id_search = ctx;
1181         struct eapol_state_machine *sm = sta->eapol_sm;
1182
1183         if (sm && sm->radius_identifier >= 0 &&
1184             sm->radius_identifier == id_search->identifier) {
1185                 id_search->sm = sm;
1186                 return 1;
1187         }
1188         return 0;
1189 }
1190
1191
1192 static struct eapol_state_machine *
1193 ieee802_1x_search_radius_identifier(struct hostapd_data *hapd, u8 identifier)
1194 {
1195         struct sta_id_search id_search;
1196         id_search.identifier = identifier;
1197         id_search.sm = NULL;
1198         ap_for_each_sta(hapd, ieee802_1x_select_radius_identifier, &id_search);
1199         return id_search.sm;
1200 }
1201
1202
1203 /* Process the RADIUS frames from Authentication Server */
1204 static RadiusRxResult
1205 ieee802_1x_receive_auth(struct radius_msg *msg, struct radius_msg *req,
1206                         u8 *shared_secret, size_t shared_secret_len,
1207                         void *data)
1208 {
1209         struct hostapd_data *hapd = data;
1210         struct sta_info *sta;
1211         u32 session_timeout = 0, termination_action, acct_interim_interval;
1212         int session_timeout_set, old_vlanid = 0;
1213         int eap_timeout;
1214         struct eapol_state_machine *sm;
1215         int override_eapReq = 0;
1216
1217         sm = ieee802_1x_search_radius_identifier(hapd, msg->hdr->identifier);
1218         if (sm == NULL) {
1219                 wpa_printf(MSG_DEBUG, "IEEE 802.1X: Could not find matching "
1220                            "station for this RADIUS message");
1221                 return RADIUS_RX_UNKNOWN;
1222         }
1223         sta = sm->sta;
1224
1225         /* RFC 2869, Ch. 5.13: valid Message-Authenticator attribute MUST be
1226          * present when packet contains an EAP-Message attribute */
1227         if (msg->hdr->code == RADIUS_CODE_ACCESS_REJECT &&
1228             radius_msg_get_attr(msg, RADIUS_ATTR_MESSAGE_AUTHENTICATOR, NULL,
1229                                 0) < 0 &&
1230             radius_msg_get_attr(msg, RADIUS_ATTR_EAP_MESSAGE, NULL, 0) < 0) {
1231                 wpa_printf(MSG_DEBUG, "Allowing RADIUS Access-Reject without "
1232                            "Message-Authenticator since it does not include "
1233                            "EAP-Message");
1234         } else if (radius_msg_verify(msg, shared_secret, shared_secret_len,
1235                                      req, 1)) {
1236                 printf("Incoming RADIUS packet did not have correct "
1237                        "Message-Authenticator - dropped\n");
1238                 return RADIUS_RX_INVALID_AUTHENTICATOR;
1239         }
1240
1241         if (msg->hdr->code != RADIUS_CODE_ACCESS_ACCEPT &&
1242             msg->hdr->code != RADIUS_CODE_ACCESS_REJECT &&
1243             msg->hdr->code != RADIUS_CODE_ACCESS_CHALLENGE) {
1244                 printf("Unknown RADIUS message code\n");
1245                 return RADIUS_RX_UNKNOWN;
1246         }
1247
1248         sm->radius_identifier = -1;
1249         wpa_printf(MSG_DEBUG, "RADIUS packet matching with station " MACSTR,
1250                    MAC2STR(sta->addr));
1251
1252         if (sm->last_recv_radius) {
1253                 radius_msg_free(sm->last_recv_radius);
1254                 os_free(sm->last_recv_radius);
1255         }
1256
1257         sm->last_recv_radius = msg;
1258
1259         session_timeout_set =
1260                 !radius_msg_get_attr_int32(msg, RADIUS_ATTR_SESSION_TIMEOUT,
1261                                            &session_timeout);
1262         if (radius_msg_get_attr_int32(msg, RADIUS_ATTR_TERMINATION_ACTION,
1263                                       &termination_action))
1264                 termination_action = RADIUS_TERMINATION_ACTION_DEFAULT;
1265
1266         if (hapd->conf->radius->acct_interim_interval == 0 &&
1267             msg->hdr->code == RADIUS_CODE_ACCESS_ACCEPT &&
1268             radius_msg_get_attr_int32(msg, RADIUS_ATTR_ACCT_INTERIM_INTERVAL,
1269                                       &acct_interim_interval) == 0) {
1270                 if (acct_interim_interval < 60) {
1271                         hostapd_logger(hapd, sta->addr,
1272                                        HOSTAPD_MODULE_IEEE8021X,
1273                                        HOSTAPD_LEVEL_INFO,
1274                                        "ignored too small "
1275                                        "Acct-Interim-Interval %d",
1276                                        acct_interim_interval);
1277                 } else
1278                         sta->acct_interim_interval = acct_interim_interval;
1279         }
1280
1281
1282         switch (msg->hdr->code) {
1283         case RADIUS_CODE_ACCESS_ACCEPT:
1284                 if (sta->ssid->dynamic_vlan == DYNAMIC_VLAN_DISABLED)
1285                         sta->vlan_id = 0;
1286                 else {
1287                         old_vlanid = sta->vlan_id;
1288                         sta->vlan_id = radius_msg_get_vlanid(msg);
1289                 }
1290                 if (sta->vlan_id > 0 &&
1291                     hostapd_get_vlan_id_ifname(hapd->conf->vlan,
1292                                                sta->vlan_id)) {
1293                         hostapd_logger(hapd, sta->addr,
1294                                        HOSTAPD_MODULE_RADIUS,
1295                                        HOSTAPD_LEVEL_INFO,
1296                                        "VLAN ID %d", sta->vlan_id);
1297                 } else if (sta->ssid->dynamic_vlan == DYNAMIC_VLAN_REQUIRED) {
1298                         sta->eapol_sm->authFail = TRUE;
1299                         hostapd_logger(hapd, sta->addr,
1300                                        HOSTAPD_MODULE_IEEE8021X,
1301                                        HOSTAPD_LEVEL_INFO, "authentication "
1302                                        "server did not include required VLAN "
1303                                        "ID in Access-Accept");
1304                         break;
1305                 }
1306
1307                 ap_sta_bind_vlan(hapd, sta, old_vlanid);
1308
1309                 /* RFC 3580, Ch. 3.17 */
1310                 if (session_timeout_set && termination_action ==
1311                     RADIUS_TERMINATION_ACTION_RADIUS_REQUEST) {
1312                         sm->reAuthPeriod = session_timeout;
1313                 } else if (session_timeout_set)
1314                         ap_sta_session_timeout(hapd, sta, session_timeout);
1315
1316                 sm->eap_if->aaaSuccess = TRUE;
1317                 override_eapReq = 1;
1318                 ieee802_1x_get_keys(hapd, sta, msg, req, shared_secret,
1319                                     shared_secret_len);
1320                 ieee802_1x_store_radius_class(hapd, sta, msg);
1321                 ieee802_1x_update_sta_identity(hapd, sta, msg);
1322                 if (sm->eap_if->eapKeyAvailable &&
1323                     wpa_auth_pmksa_add(sta->wpa_sm, sm->eapol_key_crypt,
1324                                        session_timeout_set ?
1325                                        (int) session_timeout : -1, sm) == 0) {
1326                         hostapd_logger(hapd, sta->addr, HOSTAPD_MODULE_WPA,
1327                                        HOSTAPD_LEVEL_DEBUG,
1328                                        "Added PMKSA cache entry");
1329                 }
1330                 break;
1331         case RADIUS_CODE_ACCESS_REJECT:
1332                 sm->eap_if->aaaFail = TRUE;
1333                 override_eapReq = 1;
1334                 break;
1335         case RADIUS_CODE_ACCESS_CHALLENGE:
1336                 sm->eap_if->aaaEapReq = TRUE;
1337                 if (session_timeout_set) {
1338                         /* RFC 2869, Ch. 2.3.2; RFC 3580, Ch. 3.17 */
1339                         eap_timeout = session_timeout;
1340                 } else
1341                         eap_timeout = 30;
1342                 hostapd_logger(hapd, sm->addr, HOSTAPD_MODULE_IEEE8021X,
1343                                HOSTAPD_LEVEL_DEBUG,
1344                                "using EAP timeout of %d seconds%s",
1345                                eap_timeout,
1346                                session_timeout_set ? " (from RADIUS)" : "");
1347                 eloop_cancel_timeout(ieee802_1x_eap_timeout, sta, NULL);
1348                 eloop_register_timeout(eap_timeout, 0, ieee802_1x_eap_timeout,
1349                                        sta, NULL);
1350                 sm->eap_if->eapTimeout = FALSE;
1351                 break;
1352         }
1353
1354         ieee802_1x_decapsulate_radius(hapd, sta);
1355         if (override_eapReq)
1356                 sm->eap_if->aaaEapReq = FALSE;
1357
1358         eapol_auth_step(sm);
1359
1360         return RADIUS_RX_QUEUED;
1361 }
1362
1363
1364 void ieee802_1x_abort_auth(struct hostapd_data *hapd, struct sta_info *sta)
1365 {
1366         struct eapol_state_machine *sm = sta->eapol_sm;
1367         if (sm == NULL)
1368                 return;
1369
1370         hostapd_logger(hapd, sta->addr, HOSTAPD_MODULE_IEEE8021X,
1371                        HOSTAPD_LEVEL_DEBUG, "aborting authentication");
1372
1373         if (sm->last_recv_radius) {
1374                 radius_msg_free(sm->last_recv_radius);
1375                 os_free(sm->last_recv_radius);
1376                 sm->last_recv_radius = NULL;
1377         }
1378 }
1379
1380
1381 #ifdef HOSTAPD_DUMP_STATE
1382 static void fprint_char(FILE *f, char c)
1383 {
1384         if (c >= 32 && c < 127)
1385                 fprintf(f, "%c", c);
1386         else
1387                 fprintf(f, "<%02x>", c);
1388 }
1389
1390
1391 void ieee802_1x_dump_state(FILE *f, const char *prefix, struct sta_info *sta)
1392 {
1393         struct eapol_state_machine *sm = sta->eapol_sm;
1394         if (sm == NULL)
1395                 return;
1396
1397         fprintf(f, "%sIEEE 802.1X:\n", prefix);
1398
1399         if (sm->identity) {
1400                 size_t i;
1401                 fprintf(f, "%sidentity=", prefix);
1402                 for (i = 0; i < sm->identity_len; i++)
1403                         fprint_char(f, sm->identity[i]);
1404                 fprintf(f, "\n");
1405         }
1406
1407         fprintf(f, "%slast EAP type: Authentication Server: %d (%s) "
1408                 "Supplicant: %d (%s)\n", prefix,
1409                 sm->eap_type_authsrv, eap_type_text(sm->eap_type_authsrv),
1410                 sm->eap_type_supp, eap_type_text(sm->eap_type_supp));
1411
1412         fprintf(f, "%scached_packets=%s\n", prefix,
1413                 sm->last_recv_radius ? "[RX RADIUS]" : "");
1414
1415         eapol_auth_dump_state(f, prefix, sm);
1416 }
1417 #endif /* HOSTAPD_DUMP_STATE */
1418
1419
1420 static int ieee802_1x_rekey_broadcast(struct hostapd_data *hapd)
1421 {
1422         if (hapd->conf->default_wep_key_len < 1)
1423                 return 0;
1424
1425         os_free(hapd->default_wep_key);
1426         hapd->default_wep_key = os_malloc(hapd->conf->default_wep_key_len);
1427         if (hapd->default_wep_key == NULL ||
1428             os_get_random(hapd->default_wep_key,
1429                           hapd->conf->default_wep_key_len)) {
1430                 printf("Could not generate random WEP key.\n");
1431                 os_free(hapd->default_wep_key);
1432                 hapd->default_wep_key = NULL;
1433                 return -1;
1434         }
1435
1436         wpa_hexdump_key(MSG_DEBUG, "IEEE 802.1X: New default WEP key",
1437                         hapd->default_wep_key,
1438                         hapd->conf->default_wep_key_len);
1439
1440         return 0;
1441 }
1442
1443
1444 static int ieee802_1x_sta_key_available(struct hostapd_data *hapd,
1445                                         struct sta_info *sta, void *ctx)
1446 {
1447         if (sta->eapol_sm) {
1448                 sta->eapol_sm->eap_if->eapKeyAvailable = TRUE;
1449                 eapol_auth_step(sta->eapol_sm);
1450         }
1451         return 0;
1452 }
1453
1454
1455 static void ieee802_1x_rekey(void *eloop_ctx, void *timeout_ctx)
1456 {
1457         struct hostapd_data *hapd = eloop_ctx;
1458
1459         if (hapd->default_wep_key_idx >= 3)
1460                 hapd->default_wep_key_idx =
1461                         hapd->conf->individual_wep_key_len > 0 ? 1 : 0;
1462         else
1463                 hapd->default_wep_key_idx++;
1464
1465         wpa_printf(MSG_DEBUG, "IEEE 802.1X: New default WEP key index %d",
1466                    hapd->default_wep_key_idx);
1467
1468         if (ieee802_1x_rekey_broadcast(hapd)) {
1469                 hostapd_logger(hapd, NULL, HOSTAPD_MODULE_IEEE8021X,
1470                                HOSTAPD_LEVEL_WARNING, "failed to generate a "
1471                                "new broadcast key");
1472                 os_free(hapd->default_wep_key);
1473                 hapd->default_wep_key = NULL;
1474                 return;
1475         }
1476
1477         /* TODO: Could setup key for RX here, but change default TX keyid only
1478          * after new broadcast key has been sent to all stations. */
1479         if (hostapd_set_encryption(hapd->conf->iface, hapd, "WEP", NULL,
1480                                    hapd->default_wep_key_idx,
1481                                    hapd->default_wep_key,
1482                                    hapd->conf->default_wep_key_len, 1)) {
1483                 hostapd_logger(hapd, NULL, HOSTAPD_MODULE_IEEE8021X,
1484                                HOSTAPD_LEVEL_WARNING, "failed to configure a "
1485                                "new broadcast key");
1486                 os_free(hapd->default_wep_key);
1487                 hapd->default_wep_key = NULL;
1488                 return;
1489         }
1490
1491         ap_for_each_sta(hapd, ieee802_1x_sta_key_available, NULL);
1492
1493         if (hapd->conf->wep_rekeying_period > 0) {
1494                 eloop_register_timeout(hapd->conf->wep_rekeying_period, 0,
1495                                        ieee802_1x_rekey, hapd, NULL);
1496         }
1497 }
1498
1499
1500 static void ieee802_1x_eapol_send(void *ctx, void *sta_ctx, u8 type,
1501                                   const u8 *data, size_t datalen)
1502 {
1503         ieee802_1x_send(ctx, sta_ctx, type, data, datalen);
1504 }
1505
1506
1507 static void ieee802_1x_aaa_send(void *ctx, void *sta_ctx,
1508                                 const u8 *data, size_t datalen)
1509 {
1510         struct hostapd_data *hapd = ctx;
1511         struct sta_info *sta = sta_ctx;
1512
1513         ieee802_1x_encapsulate_radius(hapd, sta, data, datalen);
1514 }
1515
1516
1517 static void _ieee802_1x_finished(void *ctx, void *sta_ctx, int success,
1518                                  int preauth)
1519 {
1520         struct hostapd_data *hapd = ctx;
1521         struct sta_info *sta = sta_ctx;
1522         if (preauth)
1523                 rsn_preauth_finished(hapd, sta, success);
1524         else
1525                 ieee802_1x_finished(hapd, sta, success);
1526 }
1527
1528
1529 static int ieee802_1x_get_eap_user(void *ctx, const u8 *identity,
1530                                    size_t identity_len, int phase2,
1531                                    struct eap_user *user)
1532 {
1533         struct hostapd_data *hapd = ctx;
1534         const struct hostapd_eap_user *eap_user;
1535         int i, count;
1536
1537         eap_user = hostapd_get_eap_user(hapd->conf, identity,
1538                                         identity_len, phase2);
1539         if (eap_user == NULL)
1540                 return -1;
1541
1542         os_memset(user, 0, sizeof(*user));
1543         user->phase2 = phase2;
1544         count = EAP_USER_MAX_METHODS;
1545         if (count > EAP_MAX_METHODS)
1546                 count = EAP_MAX_METHODS;
1547         for (i = 0; i < count; i++) {
1548                 user->methods[i].vendor = eap_user->methods[i].vendor;
1549                 user->methods[i].method = eap_user->methods[i].method;
1550         }
1551
1552         if (eap_user->password) {
1553                 user->password = os_malloc(eap_user->password_len);
1554                 if (user->password == NULL)
1555                         return -1;
1556                 os_memcpy(user->password, eap_user->password,
1557                           eap_user->password_len);
1558                 user->password_len = eap_user->password_len;
1559         }
1560         user->force_version = eap_user->force_version;
1561         user->ttls_auth = eap_user->ttls_auth;
1562
1563         return 0;
1564 }
1565
1566
1567 static int ieee802_1x_sta_entry_alive(void *ctx, const u8 *addr)
1568 {
1569         struct hostapd_data *hapd = ctx;
1570         struct sta_info *sta;
1571         sta = ap_get_sta(hapd, addr);
1572         if (sta == NULL || sta->eapol_sm == NULL)
1573                 return 0;
1574         return 1;
1575 }
1576
1577
1578 static void ieee802_1x_logger(void *ctx, const u8 *addr,
1579                               eapol_logger_level level, const char *txt)
1580 {
1581         struct hostapd_data *hapd = ctx;
1582         int hlevel;
1583
1584         switch (level) {
1585         case EAPOL_LOGGER_WARNING:
1586                 hlevel = HOSTAPD_LEVEL_WARNING;
1587                 break;
1588         case EAPOL_LOGGER_INFO:
1589                 hlevel = HOSTAPD_LEVEL_INFO;
1590                 break;
1591         case EAPOL_LOGGER_DEBUG:
1592         default:
1593                 hlevel = HOSTAPD_LEVEL_DEBUG;
1594                 break;
1595         }
1596
1597         hostapd_logger(hapd, addr, HOSTAPD_MODULE_IEEE8021X, hlevel, "%s",
1598                        txt);
1599 }
1600
1601
1602 static void ieee802_1x_set_port_authorized(void *ctx, void *sta_ctx,
1603                                            int authorized)
1604 {
1605         struct hostapd_data *hapd = ctx;
1606         struct sta_info *sta = sta_ctx;
1607         ieee802_1x_set_sta_authorized(hapd, sta, authorized);
1608 }
1609
1610
1611 static void _ieee802_1x_abort_auth(void *ctx, void *sta_ctx)
1612 {
1613         struct hostapd_data *hapd = ctx;
1614         struct sta_info *sta = sta_ctx;
1615         ieee802_1x_abort_auth(hapd, sta);
1616 }
1617
1618
1619 static void _ieee802_1x_tx_key(void *ctx, void *sta_ctx)
1620 {
1621         struct hostapd_data *hapd = ctx;
1622         struct sta_info *sta = sta_ctx;
1623         ieee802_1x_tx_key(hapd, sta);
1624 }
1625
1626
1627 int ieee802_1x_init(struct hostapd_data *hapd)
1628 {
1629         int i;
1630         struct eapol_auth_config conf;
1631         struct eapol_auth_cb cb;
1632
1633         os_memset(&conf, 0, sizeof(conf));
1634         conf.hapd = hapd;
1635         conf.eap_reauth_period = hapd->conf->eap_reauth_period;
1636         conf.wpa = hapd->conf->wpa;
1637         conf.individual_wep_key_len = hapd->conf->individual_wep_key_len;
1638         conf.eap_server = hapd->conf->eap_server;
1639         conf.ssl_ctx = hapd->ssl_ctx;
1640         conf.eap_sim_db_priv = hapd->eap_sim_db_priv;
1641         conf.eap_req_id_text = hapd->conf->eap_req_id_text;
1642         conf.eap_req_id_text_len = hapd->conf->eap_req_id_text_len;
1643         conf.pac_opaque_encr_key = hapd->conf->pac_opaque_encr_key;
1644         conf.eap_fast_a_id = hapd->conf->eap_fast_a_id;
1645         conf.eap_fast_a_id_len = hapd->conf->eap_fast_a_id_len;
1646         conf.eap_fast_a_id_info = hapd->conf->eap_fast_a_id_info;
1647         conf.eap_fast_prov = hapd->conf->eap_fast_prov;
1648         conf.pac_key_lifetime = hapd->conf->pac_key_lifetime;
1649         conf.pac_key_refresh_time = hapd->conf->pac_key_refresh_time;
1650         conf.eap_sim_aka_result_ind = hapd->conf->eap_sim_aka_result_ind;
1651         conf.tnc = hapd->conf->tnc;
1652         conf.wps = hapd->wps;
1653
1654         os_memset(&cb, 0, sizeof(cb));
1655         cb.eapol_send = ieee802_1x_eapol_send;
1656         cb.aaa_send = ieee802_1x_aaa_send;
1657         cb.finished = _ieee802_1x_finished;
1658         cb.get_eap_user = ieee802_1x_get_eap_user;
1659         cb.sta_entry_alive = ieee802_1x_sta_entry_alive;
1660         cb.logger = ieee802_1x_logger;
1661         cb.set_port_authorized = ieee802_1x_set_port_authorized;
1662         cb.abort_auth = _ieee802_1x_abort_auth;
1663         cb.tx_key = _ieee802_1x_tx_key;
1664
1665         hapd->eapol_auth = eapol_auth_init(&conf, &cb);
1666         if (hapd->eapol_auth == NULL)
1667                 return -1;
1668
1669         if ((hapd->conf->ieee802_1x || hapd->conf->wpa) &&
1670             hostapd_set_ieee8021x(hapd->conf->iface, hapd, 1))
1671                 return -1;
1672
1673         if (radius_client_register(hapd->radius, RADIUS_AUTH,
1674                                    ieee802_1x_receive_auth, hapd))
1675                 return -1;
1676
1677         if (hapd->conf->default_wep_key_len) {
1678                 hostapd_set_privacy(hapd, 1);
1679
1680                 for (i = 0; i < 4; i++)
1681                         hostapd_set_encryption(hapd->conf->iface, hapd,
1682                                                "none", NULL, i, NULL, 0, 0);
1683
1684                 ieee802_1x_rekey(hapd, NULL);
1685
1686                 if (hapd->default_wep_key == NULL)
1687                         return -1;
1688         }
1689
1690         return 0;
1691 }
1692
1693
1694 void ieee802_1x_deinit(struct hostapd_data *hapd)
1695 {
1696         eloop_cancel_timeout(ieee802_1x_rekey, hapd, NULL);
1697
1698         if (hapd->driver != NULL &&
1699             (hapd->conf->ieee802_1x || hapd->conf->wpa))
1700                 hostapd_set_ieee8021x(hapd->conf->iface, hapd, 0);
1701
1702         eapol_auth_deinit(hapd->eapol_auth);
1703         hapd->eapol_auth = NULL;
1704 }
1705
1706
1707 int ieee802_1x_reconfig(struct hostapd_data *hapd,
1708                         struct hostapd_config *oldconf,
1709                         struct hostapd_bss_config *oldbss)
1710 {
1711         ieee802_1x_deinit(hapd);
1712         return ieee802_1x_init(hapd);
1713 }
1714
1715
1716 int ieee802_1x_tx_status(struct hostapd_data *hapd, struct sta_info *sta,
1717                          u8 *buf, size_t len, int ack)
1718 {
1719         struct ieee80211_hdr *hdr;
1720         struct ieee802_1x_hdr *xhdr;
1721         struct ieee802_1x_eapol_key *key;
1722         u8 *pos;
1723         const unsigned char rfc1042_hdr[ETH_ALEN] =
1724                 { 0xaa, 0xaa, 0x03, 0x00, 0x00, 0x00 };
1725
1726         if (sta == NULL)
1727                 return -1;
1728         if (len < sizeof(*hdr) + sizeof(rfc1042_hdr) + 2 + sizeof(*xhdr))
1729                 return 0;
1730
1731         hdr = (struct ieee80211_hdr *) buf;
1732         pos = (u8 *) (hdr + 1);
1733         if (os_memcmp(pos, rfc1042_hdr, sizeof(rfc1042_hdr)) != 0)
1734                 return 0;
1735         pos += sizeof(rfc1042_hdr);
1736         if (WPA_GET_BE16(pos) != ETH_P_PAE)
1737                 return 0;
1738         pos += 2;
1739
1740         xhdr = (struct ieee802_1x_hdr *) pos;
1741         pos += sizeof(*xhdr);
1742
1743         wpa_printf(MSG_DEBUG, "IEEE 802.1X: " MACSTR " TX status - version=%d "
1744                    "type=%d length=%d - ack=%d",
1745                    MAC2STR(sta->addr), xhdr->version, xhdr->type,
1746                    be_to_host16(xhdr->length), ack);
1747
1748         /* EAPOL EAP-Packet packets are eventually re-sent by either Supplicant
1749          * or Authenticator state machines, but EAPOL-Key packets are not
1750          * retransmitted in case of failure. Try to re-sent failed EAPOL-Key
1751          * packets couple of times because otherwise STA keys become
1752          * unsynchronized with AP. */
1753         if (xhdr->type == IEEE802_1X_TYPE_EAPOL_KEY && !ack &&
1754             pos + sizeof(*key) <= buf + len) {
1755                 key = (struct ieee802_1x_eapol_key *) pos;
1756                 hostapd_logger(hapd, sta->addr, HOSTAPD_MODULE_IEEE8021X,
1757                                HOSTAPD_LEVEL_DEBUG, "did not Ack EAPOL-Key "
1758                                "frame (%scast index=%d)",
1759                                key->key_index & BIT(7) ? "uni" : "broad",
1760                                key->key_index & ~BIT(7));
1761                 /* TODO: re-send EAPOL-Key couple of times (with short delay
1762                  * between them?). If all attempt fail, report error and
1763                  * deauthenticate STA so that it will get new keys when
1764                  * authenticating again (e.g., after returning in range).
1765                  * Separate limit/transmit state needed both for unicast and
1766                  * broadcast keys(?) */
1767         }
1768         /* TODO: could move unicast key configuration from ieee802_1x_tx_key()
1769          * to here and change the key only if the EAPOL-Key packet was Acked.
1770          */
1771
1772         return 1;
1773 }
1774
1775
1776 u8 * ieee802_1x_get_identity(struct eapol_state_machine *sm, size_t *len)
1777 {
1778         if (sm == NULL || sm->identity == NULL)
1779                 return NULL;
1780
1781         *len = sm->identity_len;
1782         return sm->identity;
1783 }
1784
1785
1786 u8 * ieee802_1x_get_radius_class(struct eapol_state_machine *sm, size_t *len,
1787                                  int idx)
1788 {
1789         if (sm == NULL || sm->radius_class.attr == NULL ||
1790             idx >= (int) sm->radius_class.count)
1791                 return NULL;
1792
1793         *len = sm->radius_class.attr[idx].len;
1794         return sm->radius_class.attr[idx].data;
1795 }
1796
1797
1798 const u8 * ieee802_1x_get_key(struct eapol_state_machine *sm, size_t *len)
1799 {
1800         if (sm == NULL)
1801                 return NULL;
1802
1803         *len = sm->eap_if->eapKeyDataLen;
1804         return sm->eap_if->eapKeyData;
1805 }
1806
1807
1808 void ieee802_1x_notify_port_enabled(struct eapol_state_machine *sm,
1809                                     int enabled)
1810 {
1811         if (sm == NULL)
1812                 return;
1813         sm->eap_if->portEnabled = enabled ? TRUE : FALSE;
1814         eapol_auth_step(sm);
1815 }
1816
1817
1818 void ieee802_1x_notify_port_valid(struct eapol_state_machine *sm,
1819                                   int valid)
1820 {
1821         if (sm == NULL)
1822                 return;
1823         sm->portValid = valid ? TRUE : FALSE;
1824         eapol_auth_step(sm);
1825 }
1826
1827
1828 void ieee802_1x_notify_pre_auth(struct eapol_state_machine *sm, int pre_auth)
1829 {
1830         if (sm == NULL)
1831                 return;
1832         if (pre_auth)
1833                 sm->flags |= EAPOL_SM_PREAUTH;
1834         else
1835                 sm->flags &= ~EAPOL_SM_PREAUTH;
1836 }
1837
1838
1839 static const char * bool_txt(Boolean bool)
1840 {
1841         return bool ? "TRUE" : "FALSE";
1842 }
1843
1844
1845 int ieee802_1x_get_mib(struct hostapd_data *hapd, char *buf, size_t buflen)
1846 {
1847         /* TODO */
1848         return 0;
1849 }
1850
1851
1852 int ieee802_1x_get_mib_sta(struct hostapd_data *hapd, struct sta_info *sta,
1853                            char *buf, size_t buflen)
1854 {
1855         int len = 0, ret;
1856         struct eapol_state_machine *sm = sta->eapol_sm;
1857
1858         if (sm == NULL)
1859                 return 0;
1860
1861         ret = os_snprintf(buf + len, buflen - len,
1862                           "dot1xPaePortNumber=%d\n"
1863                           "dot1xPaePortProtocolVersion=%d\n"
1864                           "dot1xPaePortCapabilities=1\n"
1865                           "dot1xPaePortInitialize=%d\n"
1866                           "dot1xPaePortReauthenticate=FALSE\n",
1867                           sta->aid,
1868                           EAPOL_VERSION,
1869                           sm->initialize);
1870         if (ret < 0 || (size_t) ret >= buflen - len)
1871                 return len;
1872         len += ret;
1873
1874         /* dot1xAuthConfigTable */
1875         ret = os_snprintf(buf + len, buflen - len,
1876                           "dot1xAuthPaeState=%d\n"
1877                           "dot1xAuthBackendAuthState=%d\n"
1878                           "dot1xAuthAdminControlledDirections=%d\n"
1879                           "dot1xAuthOperControlledDirections=%d\n"
1880                           "dot1xAuthAuthControlledPortStatus=%d\n"
1881                           "dot1xAuthAuthControlledPortControl=%d\n"
1882                           "dot1xAuthQuietPeriod=%u\n"
1883                           "dot1xAuthServerTimeout=%u\n"
1884                           "dot1xAuthReAuthPeriod=%u\n"
1885                           "dot1xAuthReAuthEnabled=%s\n"
1886                           "dot1xAuthKeyTxEnabled=%s\n",
1887                           sm->auth_pae_state + 1,
1888                           sm->be_auth_state + 1,
1889                           sm->adminControlledDirections,
1890                           sm->operControlledDirections,
1891                           sm->authPortStatus,
1892                           sm->portControl,
1893                           sm->quietPeriod,
1894                           sm->serverTimeout,
1895                           sm->reAuthPeriod,
1896                           bool_txt(sm->reAuthEnabled),
1897                           bool_txt(sm->keyTxEnabled));
1898         if (ret < 0 || (size_t) ret >= buflen - len)
1899                 return len;
1900         len += ret;
1901
1902         /* dot1xAuthStatsTable */
1903         ret = os_snprintf(buf + len, buflen - len,
1904                           "dot1xAuthEapolFramesRx=%u\n"
1905                           "dot1xAuthEapolFramesTx=%u\n"
1906                           "dot1xAuthEapolStartFramesRx=%u\n"
1907                           "dot1xAuthEapolLogoffFramesRx=%u\n"
1908                           "dot1xAuthEapolRespIdFramesRx=%u\n"
1909                           "dot1xAuthEapolRespFramesRx=%u\n"
1910                           "dot1xAuthEapolReqIdFramesTx=%u\n"
1911                           "dot1xAuthEapolReqFramesTx=%u\n"
1912                           "dot1xAuthInvalidEapolFramesRx=%u\n"
1913                           "dot1xAuthEapLengthErrorFramesRx=%u\n"
1914                           "dot1xAuthLastEapolFrameVersion=%u\n"
1915                           "dot1xAuthLastEapolFrameSource=" MACSTR "\n",
1916                           sm->dot1xAuthEapolFramesRx,
1917                           sm->dot1xAuthEapolFramesTx,
1918                           sm->dot1xAuthEapolStartFramesRx,
1919                           sm->dot1xAuthEapolLogoffFramesRx,
1920                           sm->dot1xAuthEapolRespIdFramesRx,
1921                           sm->dot1xAuthEapolRespFramesRx,
1922                           sm->dot1xAuthEapolReqIdFramesTx,
1923                           sm->dot1xAuthEapolReqFramesTx,
1924                           sm->dot1xAuthInvalidEapolFramesRx,
1925                           sm->dot1xAuthEapLengthErrorFramesRx,
1926                           sm->dot1xAuthLastEapolFrameVersion,
1927                           MAC2STR(sm->addr));
1928         if (ret < 0 || (size_t) ret >= buflen - len)
1929                 return len;
1930         len += ret;
1931
1932         /* dot1xAuthDiagTable */
1933         ret = os_snprintf(buf + len, buflen - len,
1934                           "dot1xAuthEntersConnecting=%u\n"
1935                           "dot1xAuthEapLogoffsWhileConnecting=%u\n"
1936                           "dot1xAuthEntersAuthenticating=%u\n"
1937                           "dot1xAuthAuthSuccessesWhileAuthenticating=%u\n"
1938                           "dot1xAuthAuthTimeoutsWhileAuthenticating=%u\n"
1939                           "dot1xAuthAuthFailWhileAuthenticating=%u\n"
1940                           "dot1xAuthAuthEapStartsWhileAuthenticating=%u\n"
1941                           "dot1xAuthAuthEapLogoffWhileAuthenticating=%u\n"
1942                           "dot1xAuthAuthReauthsWhileAuthenticated=%u\n"
1943                           "dot1xAuthAuthEapStartsWhileAuthenticated=%u\n"
1944                           "dot1xAuthAuthEapLogoffWhileAuthenticated=%u\n"
1945                           "dot1xAuthBackendResponses=%u\n"
1946                           "dot1xAuthBackendAccessChallenges=%u\n"
1947                           "dot1xAuthBackendOtherRequestsToSupplicant=%u\n"
1948                           "dot1xAuthBackendAuthSuccesses=%u\n"
1949                           "dot1xAuthBackendAuthFails=%u\n",
1950                           sm->authEntersConnecting,
1951                           sm->authEapLogoffsWhileConnecting,
1952                           sm->authEntersAuthenticating,
1953                           sm->authAuthSuccessesWhileAuthenticating,
1954                           sm->authAuthTimeoutsWhileAuthenticating,
1955                           sm->authAuthFailWhileAuthenticating,
1956                           sm->authAuthEapStartsWhileAuthenticating,
1957                           sm->authAuthEapLogoffWhileAuthenticating,
1958                           sm->authAuthReauthsWhileAuthenticated,
1959                           sm->authAuthEapStartsWhileAuthenticated,
1960                           sm->authAuthEapLogoffWhileAuthenticated,
1961                           sm->backendResponses,
1962                           sm->backendAccessChallenges,
1963                           sm->backendOtherRequestsToSupplicant,
1964                           sm->backendAuthSuccesses,
1965                           sm->backendAuthFails);
1966         if (ret < 0 || (size_t) ret >= buflen - len)
1967                 return len;
1968         len += ret;
1969
1970         /* dot1xAuthSessionStatsTable */
1971         ret = os_snprintf(buf + len, buflen - len,
1972                           /* TODO: dot1xAuthSessionOctetsRx */
1973                           /* TODO: dot1xAuthSessionOctetsTx */
1974                           /* TODO: dot1xAuthSessionFramesRx */
1975                           /* TODO: dot1xAuthSessionFramesTx */
1976                           "dot1xAuthSessionId=%08X-%08X\n"
1977                           "dot1xAuthSessionAuthenticMethod=%d\n"
1978                           "dot1xAuthSessionTime=%u\n"
1979                           "dot1xAuthSessionTerminateCause=999\n"
1980                           "dot1xAuthSessionUserName=%s\n",
1981                           sta->acct_session_id_hi, sta->acct_session_id_lo,
1982                           (wpa_key_mgmt_wpa_ieee8021x(
1983                                    wpa_auth_sta_key_mgmt(sta->wpa_sm))) ?
1984                           1 : 2,
1985                           (unsigned int) (time(NULL) -
1986                                           sta->acct_session_start),
1987                           sm->identity);
1988         if (ret < 0 || (size_t) ret >= buflen - len)
1989                 return len;
1990         len += ret;
1991
1992         return len;
1993 }
1994
1995
1996 static void ieee802_1x_finished(struct hostapd_data *hapd,
1997                                 struct sta_info *sta, int success)
1998 {
1999         const u8 *key;
2000         size_t len;
2001         /* TODO: get PMKLifetime from WPA parameters */
2002         static const int dot11RSNAConfigPMKLifetime = 43200;
2003
2004         key = ieee802_1x_get_key(sta->eapol_sm, &len);
2005         if (success && key && len >= PMK_LEN &&
2006             wpa_auth_pmksa_add(sta->wpa_sm, key, dot11RSNAConfigPMKLifetime,
2007                                sta->eapol_sm) == 0) {
2008                 hostapd_logger(hapd, sta->addr, HOSTAPD_MODULE_WPA,
2009                                HOSTAPD_LEVEL_DEBUG,
2010                                "Added PMKSA cache entry (IEEE 802.1X)");
2011         }
2012 }