src/ap/ieee802_1x.c

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