git.maemo.org Git - wpasupplicant/blob - src/rsn_supp/preauth.c

   1 /*
   2  * WPA Supplicant - RSN pre-authentication
   3  * Copyright (c) 2003-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 "common.h"
  18 #include "wpa.h"
  19 #include "drivers/driver.h"
  20 #include "eloop.h"
  21 #include "l2_packet/l2_packet.h"
  22 #include "eapol_supp/eapol_supp_sm.h"
  23 #include "preauth.h"
  24 #include "pmksa_cache.h"
  25 #include "wpa_i.h"
  26 #include "ieee802_11_defs.h"
  27
  28
  29 #if defined(IEEE8021X_EAPOL) && !defined(CONFIG_NO_WPA2)
  30
  31 #define PMKID_CANDIDATE_PRIO_SCAN 1000
  32
  33
  34 struct rsn_pmksa_candidate {
  35         struct rsn_pmksa_candidate *next;
  36         u8 bssid[ETH_ALEN];
  37         int priority;
  38 };
  39
  40
  41 /**
  42  * pmksa_candidate_free - Free all entries in PMKSA candidate list
  43  * @sm: Pointer to WPA state machine data from wpa_sm_init()
  44  */
  45 void pmksa_candidate_free(struct wpa_sm *sm)
  46 {
  47         struct rsn_pmksa_candidate *entry, *prev;
  48
  49         if (sm == NULL)
  50                 return;
  51
  52         entry = sm->pmksa_candidates;
  53         sm->pmksa_candidates = NULL;
  54         while (entry) {
  55                 prev = entry;
  56                 entry = entry->next;
  57                 os_free(prev);
  58         }
  59 }
  60
  61
  62 static void rsn_preauth_receive(void *ctx, const u8 *src_addr,
  63                                 const u8 *buf, size_t len)
  64 {
  65         struct wpa_sm *sm = ctx;
  66
  67         wpa_printf(MSG_DEBUG, "RX pre-auth from " MACSTR, MAC2STR(src_addr));
  68         wpa_hexdump(MSG_MSGDUMP, "RX pre-auth", buf, len);
  69
  70         if (sm->preauth_eapol == NULL ||
  71             is_zero_ether_addr(sm->preauth_bssid) ||
  72             os_memcmp(sm->preauth_bssid, src_addr, ETH_ALEN) != 0) {
  73                 wpa_printf(MSG_WARNING, "RSN pre-auth frame received from "
  74                            "unexpected source " MACSTR " - dropped",
  75                            MAC2STR(src_addr));
  76                 return;
  77         }
  78
  79         eapol_sm_rx_eapol(sm->preauth_eapol, src_addr, buf, len);
  80 }
  81
  82
  83 static void rsn_preauth_eapol_cb(struct eapol_sm *eapol, int success,
  84                                  void *ctx)
  85 {
  86         struct wpa_sm *sm = ctx;
  87         u8 pmk[PMK_LEN];
  88
  89         if (success) {
  90                 int res, pmk_len;
  91                 pmk_len = PMK_LEN;
  92                 res = eapol_sm_get_key(eapol, pmk, PMK_LEN);
  93                 if (res) {
  94                         /*
  95                          * EAP-LEAP is an exception from other EAP methods: it
  96                          * uses only 16-byte PMK.
  97                          */
  98                         res = eapol_sm_get_key(eapol, pmk, 16);
  99                         pmk_len = 16;
 100                 }
 101                 if (res == 0) {
 102                         wpa_hexdump_key(MSG_DEBUG, "RSN: PMK from pre-auth",
 103                                         pmk, pmk_len);
 104                         sm->pmk_len = pmk_len;
 105                         pmksa_cache_add(sm->pmksa, pmk, pmk_len,
 106                                         sm->preauth_bssid, sm->own_addr,
 107                                         sm->network_ctx,
 108                                         WPA_KEY_MGMT_IEEE8021X);
 109                 } else {
 110                         wpa_msg(sm->ctx->ctx, MSG_INFO, "RSN: failed to get "
 111                                 "master session key from pre-auth EAPOL state "
 112                                 "machines");
 113                         success = 0;
 114                 }
 115         }
 116
 117         wpa_msg(sm->ctx->ctx, MSG_INFO, "RSN: pre-authentication with " MACSTR
 118                 " %s", MAC2STR(sm->preauth_bssid),
 119                 success ? "completed successfully" : "failed");
 120
 121         rsn_preauth_deinit(sm);
 122         rsn_preauth_candidate_process(sm);
 123 }
 124
 125
 126 static void rsn_preauth_timeout(void *eloop_ctx, void *timeout_ctx)
 127 {
 128         struct wpa_sm *sm = eloop_ctx;
 129
 130         wpa_msg(sm->ctx->ctx, MSG_INFO, "RSN: pre-authentication with " MACSTR
 131                 " timed out", MAC2STR(sm->preauth_bssid));
 132         rsn_preauth_deinit(sm);
 133         rsn_preauth_candidate_process(sm);
 134 }
 135
 136
 137 static int rsn_preauth_eapol_send(void *ctx, int type, const u8 *buf,
 138                                   size_t len)
 139 {
 140         struct wpa_sm *sm = ctx;
 141         u8 *msg;
 142         size_t msglen;
 143         int res;
 144
 145         /* TODO: could add l2_packet_sendmsg that allows fragments to avoid
 146          * extra copy here */
 147
 148         if (sm->l2_preauth == NULL)
 149                 return -1;
 150
 151         msg = wpa_sm_alloc_eapol(sm, type, buf, len, &msglen, NULL);
 152         if (msg == NULL)
 153                 return -1;
 154
 155         wpa_hexdump(MSG_MSGDUMP, "TX EAPOL (preauth)", msg, msglen);
 156         res = l2_packet_send(sm->l2_preauth, sm->preauth_bssid,
 157                              ETH_P_RSN_PREAUTH, msg, msglen);
 158         os_free(msg);
 159         return res;
 160 }
 161
 162
 163 /**
 164  * rsn_preauth_init - Start new RSN pre-authentication
 165  * @sm: Pointer to WPA state machine data from wpa_sm_init()
 166  * @dst: Authenticator address (BSSID) with which to preauthenticate
 167  * @eap_conf: Current EAP configuration
 168  * Returns: 0 on success, -1 on another pre-authentication is in progress,
 169  * -2 on layer 2 packet initialization failure, -3 on EAPOL state machine
 170  * initialization failure, -4 on memory allocation failure
 171  *
 172  * This function request an RSN pre-authentication with a given destination
 173  * address. This is usually called for PMKSA candidates found from scan results
 174  * or from driver reports. In addition, ctrl_iface PREAUTH command can trigger
 175  * pre-authentication.
 176  */
 177 int rsn_preauth_init(struct wpa_sm *sm, const u8 *dst,
 178                      struct eap_peer_config *eap_conf)
 179 {
 180         struct eapol_config eapol_conf;
 181         struct eapol_ctx *ctx;
 182
 183         if (sm->preauth_eapol)
 184                 return -1;
 185
 186         wpa_msg(sm->ctx->ctx, MSG_DEBUG, "RSN: starting pre-authentication "
 187                 "with " MACSTR, MAC2STR(dst));
 188
 189         sm->l2_preauth = l2_packet_init(sm->ifname, sm->own_addr,
 190                                         ETH_P_RSN_PREAUTH,
 191                                         rsn_preauth_receive, sm, 0);
 192         if (sm->l2_preauth == NULL) {
 193                 wpa_printf(MSG_WARNING, "RSN: Failed to initialize L2 packet "
 194                            "processing for pre-authentication");
 195                 return -2;
 196         }
 197
 198         if (sm->bridge_ifname) {
 199                 sm->l2_preauth_br = l2_packet_init(sm->bridge_ifname,
 200                                                    sm->own_addr,
 201                                                    ETH_P_RSN_PREAUTH,
 202                                                    rsn_preauth_receive, sm, 0);
 203                 if (sm->l2_preauth_br == NULL) {
 204                         wpa_printf(MSG_WARNING, "RSN: Failed to initialize L2 "
 205                                    "packet processing (bridge) for "
 206                                    "pre-authentication");
 207                         return -2;
 208                 }
 209         }
 210
 211         ctx = os_zalloc(sizeof(*ctx));
 212         if (ctx == NULL) {
 213                 wpa_printf(MSG_WARNING, "Failed to allocate EAPOL context.");
 214                 return -4;
 215         }
 216         ctx->ctx = sm->ctx->ctx;
 217         ctx->msg_ctx = sm->ctx->ctx;
 218         ctx->preauth = 1;
 219         ctx->cb = rsn_preauth_eapol_cb;
 220         ctx->cb_ctx = sm;
 221         ctx->scard_ctx = sm->scard_ctx;
 222         ctx->eapol_send = rsn_preauth_eapol_send;
 223         ctx->eapol_send_ctx = sm;
 224         ctx->set_config_blob = sm->ctx->set_config_blob;
 225         ctx->get_config_blob = sm->ctx->get_config_blob;
 226         ctx->mac_addr = sm->own_addr;
 227
 228         sm->preauth_eapol = eapol_sm_init(ctx);
 229         if (sm->preauth_eapol == NULL) {
 230                 os_free(ctx);
 231                 wpa_printf(MSG_WARNING, "RSN: Failed to initialize EAPOL "
 232                            "state machines for pre-authentication");
 233                 return -3;
 234         }
 235         os_memset(&eapol_conf, 0, sizeof(eapol_conf));
 236         eapol_conf.accept_802_1x_keys = 0;
 237         eapol_conf.required_keys = 0;
 238         eapol_conf.fast_reauth = sm->fast_reauth;
 239         eapol_conf.workaround = sm->eap_workaround;
 240         eapol_sm_notify_config(sm->preauth_eapol, eap_conf, &eapol_conf);
 241         /*
 242          * Use a shorter startPeriod with preauthentication since the first
 243          * preauth EAPOL-Start frame may end up being dropped due to race
 244          * condition in the AP between the data receive and key configuration
 245          * after the 4-Way Handshake.
 246          */
 247         eapol_sm_configure(sm->preauth_eapol, -1, -1, 5, 6);
 248         os_memcpy(sm->preauth_bssid, dst, ETH_ALEN);
 249
 250         eapol_sm_notify_portValid(sm->preauth_eapol, TRUE);
 251         /* 802.1X::portControl = Auto */
 252         eapol_sm_notify_portEnabled(sm->preauth_eapol, TRUE);
 253
 254         eloop_register_timeout(sm->dot11RSNAConfigSATimeout, 0,
 255                                rsn_preauth_timeout, sm, NULL);
 256
 257         return 0;
 258 }
 259
 260
 261 /**
 262  * rsn_preauth_deinit - Abort RSN pre-authentication
 263  * @sm: Pointer to WPA state machine data from wpa_sm_init()
 264  *
 265  * This function aborts the current RSN pre-authentication (if one is started)
 266  * and frees resources allocated for it.
 267  */
 268 void rsn_preauth_deinit(struct wpa_sm *sm)
 269 {
 270         if (sm == NULL || !sm->preauth_eapol)
 271                 return;
 272
 273         eloop_cancel_timeout(rsn_preauth_timeout, sm, NULL);
 274         eapol_sm_deinit(sm->preauth_eapol);
 275         sm->preauth_eapol = NULL;
 276         os_memset(sm->preauth_bssid, 0, ETH_ALEN);
 277
 278         l2_packet_deinit(sm->l2_preauth);
 279         sm->l2_preauth = NULL;
 280         if (sm->l2_preauth_br) {
 281                 l2_packet_deinit(sm->l2_preauth_br);
 282                 sm->l2_preauth_br = NULL;
 283         }
 284 }
 285
 286
 287 /**
 288  * rsn_preauth_candidate_process - Process PMKSA candidates
 289  * @sm: Pointer to WPA state machine data from wpa_sm_init()
 290  *
 291  * Go through the PMKSA candidates and start pre-authentication if a candidate
 292  * without an existing PMKSA cache entry is found. Processed candidates will be
 293  * removed from the list.
 294  */
 295 void rsn_preauth_candidate_process(struct wpa_sm *sm)
 296 {
 297         struct rsn_pmksa_candidate *candidate;
 298
 299         if (sm->pmksa_candidates == NULL)
 300                 return;
 301
 302         /* TODO: drop priority for old candidate entries */
 303
 304         wpa_msg(sm->ctx->ctx, MSG_DEBUG, "RSN: processing PMKSA candidate "
 305                 "list");
 306         if (sm->preauth_eapol ||
 307             sm->proto != WPA_PROTO_RSN ||
 308             wpa_sm_get_state(sm) != WPA_COMPLETED ||
 309             (sm->key_mgmt != WPA_KEY_MGMT_IEEE8021X &&
 310              sm->key_mgmt != WPA_KEY_MGMT_IEEE8021X_SHA256)) {
 311                 wpa_msg(sm->ctx->ctx, MSG_DEBUG, "RSN: not in suitable state "
 312                         "for new pre-authentication");
 313                 return; /* invalid state for new pre-auth */
 314         }
 315
 316         while (sm->pmksa_candidates) {
 317                 struct rsn_pmksa_cache_entry *p = NULL;
 318                 candidate = sm->pmksa_candidates;
 319                 p = pmksa_cache_get(sm->pmksa, candidate->bssid, NULL);
 320                 if (os_memcmp(sm->bssid, candidate->bssid, ETH_ALEN) != 0 &&
 321                     (p == NULL || p->opportunistic)) {
 322                         wpa_msg(sm->ctx->ctx, MSG_DEBUG, "RSN: PMKSA "
 323                                 "candidate " MACSTR
 324                                 " selected for pre-authentication",
 325                                 MAC2STR(candidate->bssid));
 326                         sm->pmksa_candidates = candidate->next;
 327                         rsn_preauth_init(sm, candidate->bssid,
 328                                          sm->eap_conf_ctx);
 329                         os_free(candidate);
 330                         return;
 331                 }
 332                 wpa_msg(sm->ctx->ctx, MSG_DEBUG, "RSN: PMKSA candidate "
 333                         MACSTR " does not need pre-authentication anymore",
 334                         MAC2STR(candidate->bssid));
 335                 /* Some drivers (e.g., NDIS) expect to get notified about the
 336                  * PMKIDs again, so report the existing data now. */
 337                 if (p) {
 338                         wpa_sm_add_pmkid(sm, candidate->bssid, p->pmkid);
 339                 }
 340
 341                 sm->pmksa_candidates = candidate->next;
 342                 os_free(candidate);
 343         }
 344         wpa_msg(sm->ctx->ctx, MSG_DEBUG, "RSN: no more pending PMKSA "
 345                 "candidates");
 346 }
 347
 348
 349 /**
 350  * pmksa_candidate_add - Add a new PMKSA candidate
 351  * @sm: Pointer to WPA state machine data from wpa_sm_init()
 352  * @bssid: BSSID (authenticator address) of the candidate
 353  * @prio: Priority (the smaller number, the higher priority)
 354  * @preauth: Whether the candidate AP advertises support for pre-authentication
 355  *
 356  * This function is used to add PMKSA candidates for RSN pre-authentication. It
 357  * is called from scan result processing and from driver events for PMKSA
 358  * candidates, i.e., EVENT_PMKID_CANDIDATE events to wpa_supplicant_event().
 359  */
 360 void pmksa_candidate_add(struct wpa_sm *sm, const u8 *bssid,
 361                          int prio, int preauth)
 362 {
 363         struct rsn_pmksa_candidate *cand, *prev, *pos;
 364
 365         if (sm->network_ctx && sm->proactive_key_caching)
 366                 pmksa_cache_get_opportunistic(sm->pmksa, sm->network_ctx,
 367                                               bssid);
 368
 369         if (!preauth) {
 370                 wpa_printf(MSG_DEBUG, "RSN: Ignored PMKID candidate without "
 371                            "preauth flag");
 372                 return;
 373         }
 374
 375         /* If BSSID already on candidate list, update the priority of the old
 376          * entry. Do not override priority based on normal scan results. */
 377         prev = NULL;
 378         cand = sm->pmksa_candidates;
 379         while (cand) {
 380                 if (os_memcmp(cand->bssid, bssid, ETH_ALEN) == 0) {
 381                         if (prev)
 382                                 prev->next = cand->next;
 383                         else
 384                                 sm->pmksa_candidates = cand->next;
 385                         break;
 386                 }
 387                 prev = cand;
 388                 cand = cand->next;
 389         }
 390
 391         if (cand) {
 392                 if (prio < PMKID_CANDIDATE_PRIO_SCAN)
 393                         cand->priority = prio;
 394         } else {
 395                 cand = os_zalloc(sizeof(*cand));
 396                 if (cand == NULL)
 397                         return;
 398                 os_memcpy(cand->bssid, bssid, ETH_ALEN);
 399                 cand->priority = prio;
 400         }
 401
 402         /* Add candidate to the list; order by increasing priority value. i.e.,
 403          * highest priority (smallest value) first. */
 404         prev = NULL;
 405         pos = sm->pmksa_candidates;
 406         while (pos) {
 407                 if (cand->priority <= pos->priority)
 408                         break;
 409                 prev = pos;
 410                 pos = pos->next;
 411         }
 412         cand->next = pos;
 413         if (prev)
 414                 prev->next = cand;
 415         else
 416                 sm->pmksa_candidates = cand;
 417
 418         wpa_msg(sm->ctx->ctx, MSG_DEBUG, "RSN: added PMKSA cache "
 419                 "candidate " MACSTR " prio %d", MAC2STR(bssid), prio);
 420         rsn_preauth_candidate_process(sm);
 421 }
 422
 423
 424 /* TODO: schedule periodic scans if current AP supports preauth */
 425
 426 /**
 427  * rsn_preauth_scan_results - Process scan results to find PMKSA candidates
 428  * @sm: Pointer to WPA state machine data from wpa_sm_init()
 429  * @results: Scan results
 430  *
 431  * This functions goes through the scan results and adds all suitable APs
 432  * (Authenticators) into PMKSA candidate list.
 433  */
 434 void rsn_preauth_scan_results(struct wpa_sm *sm,
 435                               struct wpa_scan_results *results)
 436 {
 437         struct wpa_scan_res *r;
 438         struct wpa_ie_data ie;
 439         int i;
 440         struct rsn_pmksa_cache_entry *pmksa;
 441
 442         if (sm->ssid_len == 0)
 443                 return;
 444
 445         /*
 446          * TODO: is it ok to free all candidates? What about the entries
 447          * received from EVENT_PMKID_CANDIDATE?
 448          */
 449         pmksa_candidate_free(sm);
 450
 451         for (i = results->num - 1; i >= 0; i--) {
 452                 const u8 *ssid, *rsn;
 453
 454                 r = results->res[i];
 455
 456                 ssid = wpa_scan_get_ie(r, WLAN_EID_SSID);
 457                 if (ssid == NULL || ssid[1] != sm->ssid_len ||
 458                     os_memcmp(ssid + 2, sm->ssid, ssid[1]) != 0)
 459                         continue;
 460
 461                 if (os_memcmp(r->bssid, sm->bssid, ETH_ALEN) == 0)
 462                         continue;
 463
 464                 rsn = wpa_scan_get_ie(r, WLAN_EID_RSN);
 465                 if (rsn == NULL || wpa_parse_wpa_ie(rsn, 2 + rsn[1], &ie))
 466                         continue;
 467
 468                 pmksa = pmksa_cache_get(sm->pmksa, r->bssid, NULL);
 469                 if (pmksa &&
 470                     (!pmksa->opportunistic ||
 471                      !(ie.capabilities & WPA_CAPABILITY_PREAUTH)))
 472                         continue;
 473
 474                 /*
 475                  * Give less priority to candidates found from normal
 476                  * scan results.
 477                  */
 478                 pmksa_candidate_add(sm, r->bssid,
 479                                     PMKID_CANDIDATE_PRIO_SCAN,
 480                                     ie.capabilities & WPA_CAPABILITY_PREAUTH);
 481         }
 482 }
 483
 484
 485 #ifdef CONFIG_CTRL_IFACE
 486 /**
 487  * rsn_preauth_get_status - Get pre-authentication status
 488  * @sm: Pointer to WPA state machine data from wpa_sm_init()
 489  * @buf: Buffer for status information
 490  * @buflen: Maximum buffer length
 491  * @verbose: Whether to include verbose status information
 492  * Returns: Number of bytes written to buf.
 493  *
 494  * Query WPA2 pre-authentication for status information. This function fills in
 495  * a text area with current status information. If the buffer (buf) is not
 496  * large enough, status information will be truncated to fit the buffer.
 497  */
 498 int rsn_preauth_get_status(struct wpa_sm *sm, char *buf, size_t buflen,
 499                            int verbose)
 500 {
 501         char *pos = buf, *end = buf + buflen;
 502         int res, ret;
 503
 504         if (sm->preauth_eapol) {
 505                 ret = os_snprintf(pos, end - pos, "Pre-authentication "
 506                                   "EAPOL state machines:\n");
 507                 if (ret < 0 || ret >= end - pos)
 508                         return pos - buf;
 509                 pos += ret;
 510                 res = eapol_sm_get_status(sm->preauth_eapol,
 511                                           pos, end - pos, verbose);
 512                 if (res >= 0)
 513                         pos += res;
 514         }
 515
 516         return pos - buf;
 517 }
 518 #endif /* CONFIG_CTRL_IFACE */
 519
 520
 521 /**
 522  * rsn_preauth_in_progress - Verify whether pre-authentication is in progress
 523  * @sm: Pointer to WPA state machine data from wpa_sm_init()
 524  */
 525 int rsn_preauth_in_progress(struct wpa_sm *sm)
 526 {
 527         return sm->preauth_eapol != NULL;
 528 }
 529
 530 #endif /* IEEE8021X_EAPOL and !CONFIG_NO_WPA2 */