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