contrib/wpa/wpa_supplicant/preauth_test.c

   1 /*
   2  * WPA Supplicant - test code for pre-authentication
   3  * Copyright (c) 2003-2007, Jouni Malinen <j@w1.fi>
   4  *
   5  * This software may be distributed under the terms of the BSD license.
   6  * See README for more details.
   7  *
   8  * IEEE 802.1X Supplicant test code (to be used in place of wpa_supplicant.c.
   9  * Not used in production version.
  10  */
  11
  12 #include "includes.h"
  13 #include <assert.h>
  14
  15 #include "common.h"
  16 #include "config.h"
  17 #include "eapol_supp/eapol_supp_sm.h"
  18 #include "eloop.h"
  19 #include "rsn_supp/wpa.h"
  20 #include "eap_peer/eap.h"
  21 #include "wpa_supplicant_i.h"
  22 #include "l2_packet/l2_packet.h"
  23 #include "ctrl_iface.h"
  24 #include "pcsc_funcs.h"
  25 #include "rsn_supp/preauth.h"
  26 #include "rsn_supp/pmksa_cache.h"
  27 #include "drivers/driver.h"
  28
  29
  30 extern int wpa_debug_level;
  31 extern int wpa_debug_show_keys;
  32
  33 struct wpa_driver_ops *wpa_drivers[] = { NULL };
  34
  35
  36 struct preauth_test_data {
  37         int auth_timed_out;
  38 };
  39
  40
  41 static void _wpa_supplicant_deauthenticate(void *wpa_s, int reason_code)
  42 {
  43         wpa_supplicant_deauthenticate(wpa_s, reason_code);
  44 }
  45
  46
  47 static u8 * wpa_alloc_eapol(const struct wpa_supplicant *wpa_s, u8 type,
  48                             const void *data, u16 data_len,
  49                             size_t *msg_len, void **data_pos)
  50 {
  51         struct ieee802_1x_hdr *hdr;
  52
  53         *msg_len = sizeof(*hdr) + data_len;
  54         hdr = os_malloc(*msg_len);
  55         if (hdr == NULL)
  56                 return NULL;
  57
  58         hdr->version = wpa_s->conf->eapol_version;
  59         hdr->type = type;
  60         hdr->length = htons(data_len);
  61
  62         if (data)
  63                 os_memcpy(hdr + 1, data, data_len);
  64         else
  65                 os_memset(hdr + 1, 0, data_len);
  66
  67         if (data_pos)
  68                 *data_pos = hdr + 1;
  69
  70         return (u8 *) hdr;
  71 }
  72
  73
  74 static u8 * _wpa_alloc_eapol(void *wpa_s, u8 type,
  75                              const void *data, u16 data_len,
  76                              size_t *msg_len, void **data_pos)
  77 {
  78         return wpa_alloc_eapol(wpa_s, type, data, data_len, msg_len, data_pos);
  79 }
  80
  81
  82 static void _wpa_supplicant_set_state(void *ctx, enum wpa_states state)
  83 {
  84         struct wpa_supplicant *wpa_s = ctx;
  85         wpa_s->wpa_state = state;
  86 }
  87
  88
  89 static enum wpa_states _wpa_supplicant_get_state(void *ctx)
  90 {
  91         struct wpa_supplicant *wpa_s = ctx;
  92         return wpa_s->wpa_state;
  93 }
  94
  95
  96 static int wpa_ether_send(void *wpa_s, const u8 *dest, u16 proto,
  97                           const u8 *buf, size_t len)
  98 {
  99         printf("%s - not implemented\n", __func__);
 100         return -1;
 101 }
 102
 103
 104 static void * wpa_supplicant_get_network_ctx(void *wpa_s)
 105 {
 106         return wpa_supplicant_get_ssid(wpa_s);
 107 }
 108
 109
 110 static void _wpa_supplicant_cancel_auth_timeout(void *wpa_s)
 111 {
 112         wpa_supplicant_cancel_auth_timeout(wpa_s);
 113 }
 114
 115
 116 static int wpa_supplicant_get_beacon_ie(void *wpa_s)
 117 {
 118         printf("%s - not implemented\n", __func__);
 119         return -1;
 120 }
 121
 122
 123 static int wpa_supplicant_get_bssid(void *wpa_s, u8 *bssid)
 124 {
 125         printf("%s - not implemented\n", __func__);
 126         return -1;
 127 }
 128
 129
 130 static int wpa_supplicant_set_key(void *wpa_s, enum wpa_alg alg,
 131                                   const u8 *addr, int key_idx, int set_tx,
 132                                   const u8 *seq, size_t seq_len,
 133                                   const u8 *key, size_t key_len)
 134 {
 135         printf("%s - not implemented\n", __func__);
 136         return -1;
 137 }
 138
 139
 140 static int wpa_supplicant_mlme_setprotection(void *wpa_s, const u8 *addr,
 141                                              int protection_type,
 142                                              int key_type)
 143 {
 144         printf("%s - not implemented\n", __func__);
 145         return -1;
 146 }
 147
 148
 149 static int wpa_supplicant_add_pmkid(void *wpa_s,
 150                                     const u8 *bssid, const u8 *pmkid)
 151 {
 152         printf("%s - not implemented\n", __func__);
 153         return -1;
 154 }
 155
 156
 157 static int wpa_supplicant_remove_pmkid(void *wpa_s,
 158                                        const u8 *bssid, const u8 *pmkid)
 159 {
 160         printf("%s - not implemented\n", __func__);
 161         return -1;
 162 }
 163
 164
 165 static void wpa_supplicant_set_config_blob(void *ctx,
 166                                            struct wpa_config_blob *blob)
 167 {
 168         struct wpa_supplicant *wpa_s = ctx;
 169         wpa_config_set_blob(wpa_s->conf, blob);
 170 }
 171
 172
 173 static const struct wpa_config_blob *
 174 wpa_supplicant_get_config_blob(void *ctx, const char *name)
 175 {
 176         struct wpa_supplicant *wpa_s = ctx;
 177         return wpa_config_get_blob(wpa_s->conf, name);
 178 }
 179
 180
 181 static void test_eapol_clean(struct wpa_supplicant *wpa_s)
 182 {
 183         rsn_preauth_deinit(wpa_s->wpa);
 184         pmksa_candidate_free(wpa_s->wpa);
 185         wpa_sm_deinit(wpa_s->wpa);
 186         scard_deinit(wpa_s->scard);
 187         if (wpa_s->ctrl_iface) {
 188                 wpa_supplicant_ctrl_iface_deinit(wpa_s->ctrl_iface);
 189                 wpa_s->ctrl_iface = NULL;
 190         }
 191         wpa_config_free(wpa_s->conf);
 192 }
 193
 194
 195 static void eapol_test_timeout(void *eloop_ctx, void *timeout_ctx)
 196 {
 197         struct preauth_test_data *p = eloop_ctx;
 198         printf("EAPOL test timed out\n");
 199         p->auth_timed_out = 1;
 200         eloop_terminate();
 201 }
 202
 203
 204 static void eapol_test_poll(void *eloop_ctx, void *timeout_ctx)
 205 {
 206         struct wpa_supplicant *wpa_s = eloop_ctx;
 207         if (!rsn_preauth_in_progress(wpa_s->wpa))
 208                 eloop_terminate();
 209         else {
 210                 eloop_register_timeout(0, 100000, eapol_test_poll, eloop_ctx,
 211                                        timeout_ctx);
 212         }
 213 }
 214
 215
 216 static struct wpa_driver_ops dummy_driver;
 217
 218
 219 static void wpa_init_conf(struct wpa_supplicant *wpa_s, const char *ifname)
 220 {
 221         struct l2_packet_data *l2;
 222         struct wpa_sm_ctx *ctx;
 223
 224         os_memset(&dummy_driver, 0, sizeof(dummy_driver));
 225         wpa_s->driver = &dummy_driver;
 226
 227         ctx = os_zalloc(sizeof(*ctx));
 228         assert(ctx != NULL);
 229
 230         ctx->ctx = wpa_s;
 231         ctx->msg_ctx = wpa_s;
 232         ctx->set_state = _wpa_supplicant_set_state;
 233         ctx->get_state = _wpa_supplicant_get_state;
 234         ctx->deauthenticate = _wpa_supplicant_deauthenticate;
 235         ctx->set_key = wpa_supplicant_set_key;
 236         ctx->get_network_ctx = wpa_supplicant_get_network_ctx;
 237         ctx->get_bssid = wpa_supplicant_get_bssid;
 238         ctx->ether_send = wpa_ether_send;
 239         ctx->get_beacon_ie = wpa_supplicant_get_beacon_ie;
 240         ctx->alloc_eapol = _wpa_alloc_eapol;
 241         ctx->cancel_auth_timeout = _wpa_supplicant_cancel_auth_timeout;
 242         ctx->add_pmkid = wpa_supplicant_add_pmkid;
 243         ctx->remove_pmkid = wpa_supplicant_remove_pmkid;
 244         ctx->set_config_blob = wpa_supplicant_set_config_blob;
 245         ctx->get_config_blob = wpa_supplicant_get_config_blob;
 246         ctx->mlme_setprotection = wpa_supplicant_mlme_setprotection;
 247
 248         wpa_s->wpa = wpa_sm_init(ctx);
 249         assert(wpa_s->wpa != NULL);
 250         wpa_sm_set_param(wpa_s->wpa, WPA_PARAM_PROTO, WPA_PROTO_RSN);
 251
 252         os_strlcpy(wpa_s->ifname, ifname, sizeof(wpa_s->ifname));
 253         wpa_sm_set_ifname(wpa_s->wpa, wpa_s->ifname, NULL);
 254
 255         l2 = l2_packet_init(wpa_s->ifname, NULL, ETH_P_RSN_PREAUTH, NULL,
 256                             NULL, 0);
 257         assert(l2 != NULL);
 258         if (l2_packet_get_own_addr(l2, wpa_s->own_addr)) {
 259                 wpa_printf(MSG_WARNING, "Failed to get own L2 address\n");
 260                 exit(-1);
 261         }
 262         l2_packet_deinit(l2);
 263         wpa_sm_set_own_addr(wpa_s->wpa, wpa_s->own_addr);
 264 }
 265
 266
 267 static void eapol_test_terminate(int sig, void *signal_ctx)
 268 {
 269         struct wpa_supplicant *wpa_s = signal_ctx;
 270         wpa_msg(wpa_s, MSG_INFO, "Signal %d received - terminating", sig);
 271         eloop_terminate();
 272 }
 273
 274
 275 int main(int argc, char *argv[])
 276 {
 277         struct wpa_supplicant wpa_s;
 278         int ret = 1;
 279         u8 bssid[ETH_ALEN];
 280         struct preauth_test_data preauth_test;
 281
 282         if (os_program_init())
 283                 return -1;
 284
 285         os_memset(&preauth_test, 0, sizeof(preauth_test));
 286
 287         wpa_debug_level = 0;
 288         wpa_debug_show_keys = 1;
 289
 290         if (argc != 4) {
 291                 printf("usage: preauth_test <conf> <target MAC address> "
 292                        "<ifname>\n");
 293                 return -1;
 294         }
 295
 296         if (hwaddr_aton(argv[2], bssid)) {
 297                 printf("Failed to parse target address '%s'.\n", argv[2]);
 298                 return -1;
 299         }
 300
 301         if (eap_register_methods()) {
 302                 wpa_printf(MSG_ERROR, "Failed to register EAP methods");
 303                 return -1;
 304         }
 305
 306         if (eloop_init()) {
 307                 wpa_printf(MSG_ERROR, "Failed to initialize event loop");
 308                 return -1;
 309         }
 310
 311         os_memset(&wpa_s, 0, sizeof(wpa_s));
 312         wpa_s.conf = wpa_config_read(argv[1]);
 313         if (wpa_s.conf == NULL) {
 314                 printf("Failed to parse configuration file '%s'.\n", argv[1]);
 315                 return -1;
 316         }
 317         if (wpa_s.conf->ssid == NULL) {
 318                 printf("No networks defined.\n");
 319                 return -1;
 320         }
 321
 322         wpa_init_conf(&wpa_s, argv[3]);
 323         wpa_s.ctrl_iface = wpa_supplicant_ctrl_iface_init(&wpa_s);
 324         if (wpa_s.ctrl_iface == NULL) {
 325                 printf("Failed to initialize control interface '%s'.\n"
 326                        "You may have another preauth_test process already "
 327                        "running or the file was\n"
 328                        "left by an unclean termination of preauth_test in "
 329                        "which case you will need\n"
 330                        "to manually remove this file before starting "
 331                        "preauth_test again.\n",
 332                        wpa_s.conf->ctrl_interface);
 333                 return -1;
 334         }
 335         if (wpa_supplicant_scard_init(&wpa_s, wpa_s.conf->ssid))
 336                 return -1;
 337
 338         if (rsn_preauth_init(wpa_s.wpa, bssid, &wpa_s.conf->ssid->eap))
 339                 return -1;
 340
 341         eloop_register_timeout(30, 0, eapol_test_timeout, &preauth_test, NULL);
 342         eloop_register_timeout(0, 100000, eapol_test_poll, &wpa_s, NULL);
 343         eloop_register_signal_terminate(eapol_test_terminate, &wpa_s);
 344         eloop_register_signal_reconfig(eapol_test_terminate, &wpa_s);
 345         eloop_run();
 346
 347         if (preauth_test.auth_timed_out)
 348                 ret = -2;
 349         else {
 350                 ret = pmksa_cache_set_current(wpa_s.wpa, NULL, bssid, NULL, 0)
 351                         ? 0 : -3;
 352         }
 353
 354         test_eapol_clean(&wpa_s);
 355
 356         eap_peer_unregister_methods();
 357
 358         eloop_destroy();
 359
 360         os_program_deinit();
 361
 362         return ret;
 363 }