wlantest/ctrl.c

   1 /*
   2  * wlantest control interface
   3  * Copyright (c) 2010-2013, 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
   9 #include "utils/includes.h"
  10 #include <sys/un.h>
  11
  12 #include "utils/common.h"
  13 #include "utils/eloop.h"
  14 #include "common/defs.h"
  15 #include "common/version.h"
  16 #include "common/ieee802_11_defs.h"
  17 #include "wlantest.h"
  18 #include "wlantest_ctrl.h"
  19
  20
  21 static u8 * attr_get(u8 *buf, size_t buflen, enum wlantest_ctrl_attr attr,
  22                      size_t *len)
  23 {
  24         u8 *pos = buf;
  25
  26         while (pos + 8 <= buf + buflen) {
  27                 enum wlantest_ctrl_attr a;
  28                 size_t alen;
  29                 a = WPA_GET_BE32(pos);
  30                 pos += 4;
  31                 alen = WPA_GET_BE32(pos);
  32                 pos += 4;
  33                 if (pos + alen > buf + buflen) {
  34                         wpa_printf(MSG_DEBUG, "Invalid control message "
  35                                    "attribute");
  36                         return NULL;
  37                 }
  38                 if (a == attr) {
  39                         *len = alen;
  40                         return pos;
  41                 }
  42                 pos += alen;
  43         }
  44
  45         return NULL;
  46 }
  47
  48
  49 static u8 * attr_get_macaddr(u8 *buf, size_t buflen,
  50                              enum wlantest_ctrl_attr attr)
  51 {
  52         u8 *addr;
  53         size_t addr_len;
  54         addr = attr_get(buf, buflen, attr, &addr_len);
  55         if (addr && addr_len != ETH_ALEN)
  56                 addr = NULL;
  57         return addr;
  58 }
  59
  60
  61 static int attr_get_int(u8 *buf, size_t buflen, enum wlantest_ctrl_attr attr)
  62 {
  63         u8 *pos;
  64         size_t len;
  65         pos = attr_get(buf, buflen, attr, &len);
  66         if (pos == NULL || len != 4)
  67                 return -1;
  68         return WPA_GET_BE32(pos);
  69 }
  70
  71
  72 static u8 * attr_add_str(u8 *pos, u8 *end, enum wlantest_ctrl_attr attr,
  73                          const char *str)
  74 {
  75         size_t len = os_strlen(str);
  76
  77         if (pos == NULL || end - pos < 8 + len)
  78                 return NULL;
  79         WPA_PUT_BE32(pos, attr);
  80         pos += 4;
  81         WPA_PUT_BE32(pos, len);
  82         pos += 4;
  83         os_memcpy(pos, str, len);
  84         pos += len;
  85         return pos;
  86 }
  87
  88
  89 static u8 * attr_add_be32(u8 *pos, u8 *end, enum wlantest_ctrl_attr attr,
  90                           u32 val)
  91 {
  92         if (pos == NULL || end - pos < 12)
  93                 return NULL;
  94         WPA_PUT_BE32(pos, attr);
  95         pos += 4;
  96         WPA_PUT_BE32(pos, 4);
  97         pos += 4;
  98         WPA_PUT_BE32(pos, val);
  99         pos += 4;
 100         return pos;
 101 }
 102
 103
 104 static void ctrl_disconnect(struct wlantest *wt, int sock)
 105 {
 106         int i;
 107         wpa_printf(MSG_DEBUG, "Disconnect control interface connection %d",
 108                    sock);
 109         for (i = 0; i < MAX_CTRL_CONNECTIONS; i++) {
 110                 if (wt->ctrl_socks[i] == sock) {
 111                         close(wt->ctrl_socks[i]);
 112                         eloop_unregister_read_sock(wt->ctrl_socks[i]);
 113                         wt->ctrl_socks[i] = -1;
 114                         break;
 115                 }
 116         }
 117 }
 118
 119
 120 static void ctrl_send(struct wlantest *wt, int sock, const u8 *buf,
 121                       size_t len)
 122 {
 123         if (send(sock, buf, len, 0) < 0) {
 124                 wpa_printf(MSG_INFO, "send(ctrl): %s", strerror(errno));
 125                 ctrl_disconnect(wt, sock);
 126         }
 127 }
 128
 129
 130 static void ctrl_send_simple(struct wlantest *wt, int sock,
 131                              enum wlantest_ctrl_cmd cmd)
 132 {
 133         u8 buf[4];
 134         WPA_PUT_BE32(buf, cmd);
 135         ctrl_send(wt, sock, buf, sizeof(buf));
 136 }
 137
 138
 139 static struct wlantest_bss * ctrl_get_bss(struct wlantest *wt, int sock,
 140                                           u8 *cmd, size_t clen)
 141 {
 142         struct wlantest_bss *bss;
 143         u8 *pos;
 144         size_t len;
 145
 146         pos = attr_get(cmd, clen, WLANTEST_ATTR_BSSID, &len);
 147         if (pos == NULL || len != ETH_ALEN) {
 148                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
 149                 return NULL;
 150         }
 151
 152         bss = bss_find(wt, pos);
 153         if (bss == NULL) {
 154                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_FAILURE);
 155                 return NULL;
 156         }
 157
 158         return bss;
 159 }
 160
 161
 162 static struct wlantest_sta * ctrl_get_sta(struct wlantest *wt, int sock,
 163                                           u8 *cmd, size_t clen,
 164                                           struct wlantest_bss *bss)
 165 {
 166         struct wlantest_sta *sta;
 167         u8 *pos;
 168         size_t len;
 169
 170         if (bss == NULL)
 171                 return NULL;
 172
 173         pos = attr_get(cmd, clen, WLANTEST_ATTR_STA_ADDR, &len);
 174         if (pos == NULL || len != ETH_ALEN) {
 175                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
 176                 return NULL;
 177         }
 178
 179         sta = sta_find(bss, pos);
 180         if (sta == NULL) {
 181                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_FAILURE);
 182                 return NULL;
 183         }
 184
 185         return sta;
 186 }
 187
 188
 189 static struct wlantest_sta * ctrl_get_sta2(struct wlantest *wt, int sock,
 190                                            u8 *cmd, size_t clen,
 191                                            struct wlantest_bss *bss)
 192 {
 193         struct wlantest_sta *sta;
 194         u8 *pos;
 195         size_t len;
 196
 197         if (bss == NULL)
 198                 return NULL;
 199
 200         pos = attr_get(cmd, clen, WLANTEST_ATTR_STA2_ADDR, &len);
 201         if (pos == NULL || len != ETH_ALEN) {
 202                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
 203                 return NULL;
 204         }
 205
 206         sta = sta_find(bss, pos);
 207         if (sta == NULL) {
 208                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_FAILURE);
 209                 return NULL;
 210         }
 211
 212         return sta;
 213 }
 214
 215
 216 static void ctrl_list_bss(struct wlantest *wt, int sock)
 217 {
 218         u8 buf[WLANTEST_CTRL_MAX_RESP_LEN], *pos, *len;
 219         struct wlantest_bss *bss;
 220
 221         pos = buf;
 222         WPA_PUT_BE32(pos, WLANTEST_CTRL_SUCCESS);
 223         pos += 4;
 224         WPA_PUT_BE32(pos, WLANTEST_ATTR_BSSID);
 225         pos += 4;
 226         len = pos; /* to be filled */
 227         pos += 4;
 228
 229         dl_list_for_each(bss, &wt->bss, struct wlantest_bss, list) {
 230                 if (pos + ETH_ALEN > buf + WLANTEST_CTRL_MAX_RESP_LEN)
 231                         break;
 232                 os_memcpy(pos, bss->bssid, ETH_ALEN);
 233                 pos += ETH_ALEN;
 234         }
 235
 236         WPA_PUT_BE32(len, pos - len - 4);
 237         ctrl_send(wt, sock, buf, pos - buf);
 238 }
 239
 240
 241 static void ctrl_list_sta(struct wlantest *wt, int sock, u8 *cmd, size_t clen)
 242 {
 243         u8 buf[WLANTEST_CTRL_MAX_RESP_LEN], *pos, *len;
 244         struct wlantest_bss *bss;
 245         struct wlantest_sta *sta;
 246
 247         bss = ctrl_get_bss(wt, sock, cmd, clen);
 248         if (bss == NULL)
 249                 return;
 250
 251         pos = buf;
 252         WPA_PUT_BE32(pos, WLANTEST_CTRL_SUCCESS);
 253         pos += 4;
 254         WPA_PUT_BE32(pos, WLANTEST_ATTR_STA_ADDR);
 255         pos += 4;
 256         len = pos; /* to be filled */
 257         pos += 4;
 258
 259         dl_list_for_each(sta, &bss->sta, struct wlantest_sta, list) {
 260                 if (pos + ETH_ALEN > buf + WLANTEST_CTRL_MAX_RESP_LEN)
 261                         break;
 262                 os_memcpy(pos, sta->addr, ETH_ALEN);
 263                 pos += ETH_ALEN;
 264         }
 265
 266         WPA_PUT_BE32(len, pos - len - 4);
 267         ctrl_send(wt, sock, buf, pos - buf);
 268 }
 269
 270
 271 static void ctrl_flush(struct wlantest *wt, int sock)
 272 {
 273         wpa_printf(MSG_DEBUG, "Drop all collected BSS data");
 274         bss_flush(wt);
 275         ctrl_send_simple(wt, sock, WLANTEST_CTRL_SUCCESS);
 276 }
 277
 278
 279 static void ctrl_clear_sta_counters(struct wlantest *wt, int sock, u8 *cmd,
 280                                     size_t clen)
 281 {
 282         struct wlantest_bss *bss;
 283         struct wlantest_sta *sta;
 284
 285         bss = ctrl_get_bss(wt, sock, cmd, clen);
 286         sta = ctrl_get_sta(wt, sock, cmd, clen, bss);
 287         if (sta == NULL) {
 288                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_FAILURE);
 289                 return;
 290         }
 291
 292         os_memset(sta->counters, 0, sizeof(sta->counters));
 293         os_memset(sta->tx_tid, 0, sizeof(sta->tx_tid));
 294         os_memset(sta->rx_tid, 0, sizeof(sta->rx_tid));
 295         ctrl_send_simple(wt, sock, WLANTEST_CTRL_SUCCESS);
 296 }
 297
 298
 299 static void ctrl_clear_bss_counters(struct wlantest *wt, int sock, u8 *cmd,
 300                                     size_t clen)
 301 {
 302         struct wlantest_bss *bss;
 303
 304         bss = ctrl_get_bss(wt, sock, cmd, clen);
 305         if (bss == NULL) {
 306                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_FAILURE);
 307                 return;
 308         }
 309
 310         os_memset(bss->counters, 0, sizeof(bss->counters));
 311         ctrl_send_simple(wt, sock, WLANTEST_CTRL_SUCCESS);
 312 }
 313
 314
 315 static void ctrl_clear_tdls_counters(struct wlantest *wt, int sock, u8 *cmd,
 316                                      size_t clen)
 317 {
 318         struct wlantest_bss *bss;
 319         struct wlantest_sta *sta;
 320         struct wlantest_sta *sta2;
 321         struct wlantest_tdls *tdls;
 322
 323         bss = ctrl_get_bss(wt, sock, cmd, clen);
 324         sta = ctrl_get_sta(wt, sock, cmd, clen, bss);
 325         sta2 = ctrl_get_sta2(wt, sock, cmd, clen, bss);
 326         if (sta == NULL || sta2 == NULL) {
 327                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_FAILURE);
 328                 return;
 329         }
 330
 331         dl_list_for_each(tdls, &bss->tdls, struct wlantest_tdls, list) {
 332                 if ((tdls->init == sta && tdls->resp == sta2) ||
 333                     (tdls->init == sta2 && tdls->resp == sta))
 334                         os_memset(tdls->counters, 0, sizeof(tdls->counters));
 335         }
 336         ctrl_send_simple(wt, sock, WLANTEST_CTRL_SUCCESS);
 337 }
 338
 339
 340 static void ctrl_get_sta_counter(struct wlantest *wt, int sock, u8 *cmd,
 341                                  size_t clen)
 342 {
 343         u8 *addr;
 344         size_t addr_len;
 345         struct wlantest_bss *bss;
 346         struct wlantest_sta *sta;
 347         u32 counter;
 348         u8 buf[4 + 12], *end, *pos;
 349
 350         bss = ctrl_get_bss(wt, sock, cmd, clen);
 351         sta = ctrl_get_sta(wt, sock, cmd, clen, bss);
 352         if (sta == NULL)
 353                 return;
 354
 355         addr = attr_get(cmd, clen, WLANTEST_ATTR_STA_COUNTER, &addr_len);
 356         if (addr == NULL || addr_len != 4) {
 357                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
 358                 return;
 359         }
 360         counter = WPA_GET_BE32(addr);
 361         if (counter >= NUM_WLANTEST_STA_COUNTER) {
 362                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
 363                 return;
 364         }
 365
 366         pos = buf;
 367         end = buf + sizeof(buf);
 368         WPA_PUT_BE32(pos, WLANTEST_CTRL_SUCCESS);
 369         pos += 4;
 370         pos = attr_add_be32(pos, end, WLANTEST_ATTR_COUNTER,
 371                             sta->counters[counter]);
 372         ctrl_send(wt, sock, buf, pos - buf);
 373 }
 374
 375
 376 static void ctrl_get_bss_counter(struct wlantest *wt, int sock, u8 *cmd,
 377                                  size_t clen)
 378 {
 379         u8 *addr;
 380         size_t addr_len;
 381         struct wlantest_bss *bss;
 382         u32 counter;
 383         u8 buf[4 + 12], *end, *pos;
 384
 385         bss = ctrl_get_bss(wt, sock, cmd, clen);
 386         if (bss == NULL)
 387                 return;
 388
 389         addr = attr_get(cmd, clen, WLANTEST_ATTR_BSS_COUNTER, &addr_len);
 390         if (addr == NULL || addr_len != 4) {
 391                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
 392                 return;
 393         }
 394         counter = WPA_GET_BE32(addr);
 395         if (counter >= NUM_WLANTEST_BSS_COUNTER) {
 396                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
 397                 return;
 398         }
 399
 400         pos = buf;
 401         end = buf + sizeof(buf);
 402         WPA_PUT_BE32(pos, WLANTEST_CTRL_SUCCESS);
 403         pos += 4;
 404         pos = attr_add_be32(pos, end, WLANTEST_ATTR_COUNTER,
 405                             bss->counters[counter]);
 406         ctrl_send(wt, sock, buf, pos - buf);
 407 }
 408
 409
 410 static void ctrl_get_tdls_counter(struct wlantest *wt, int sock, u8 *cmd,
 411                                   size_t clen)
 412 {
 413         u8 *addr;
 414         size_t addr_len;
 415         struct wlantest_bss *bss;
 416         struct wlantest_sta *sta;
 417         struct wlantest_sta *sta2;
 418         struct wlantest_tdls *tdls;
 419         u32 counter;
 420         u8 buf[4 + 12], *end, *pos;
 421         int found = 0;
 422
 423         bss = ctrl_get_bss(wt, sock, cmd, clen);
 424         sta = ctrl_get_sta(wt, sock, cmd, clen, bss);
 425         sta2 = ctrl_get_sta2(wt, sock, cmd, clen, bss);
 426         if (sta == NULL || sta2 == NULL) {
 427                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_FAILURE);
 428                 return;
 429         }
 430
 431         addr = attr_get(cmd, clen, WLANTEST_ATTR_TDLS_COUNTER, &addr_len);
 432         if (addr == NULL || addr_len != 4) {
 433                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
 434                 return;
 435         }
 436         counter = WPA_GET_BE32(addr);
 437         if (counter >= NUM_WLANTEST_TDLS_COUNTER) {
 438                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
 439                 return;
 440         }
 441
 442         dl_list_for_each(tdls, &bss->tdls, struct wlantest_tdls, list) {
 443                 if (tdls->init == sta && tdls->resp == sta2) {
 444                         found = 1;
 445                         break;
 446                 }
 447         }
 448
 449         if (!found) {
 450                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_FAILURE);
 451                 return;
 452         }
 453
 454         pos = buf;
 455         end = buf + sizeof(buf);
 456         WPA_PUT_BE32(pos, WLANTEST_CTRL_SUCCESS);
 457         pos += 4;
 458         pos = attr_add_be32(pos, end, WLANTEST_ATTR_COUNTER,
 459                             tdls->counters[counter]);
 460         ctrl_send(wt, sock, buf, pos - buf);
 461 }
 462
 463
 464 static void build_mgmt_hdr(struct ieee80211_mgmt *mgmt,
 465                            struct wlantest_bss *bss, struct wlantest_sta *sta,
 466                            int sender_ap, int stype)
 467 {
 468         os_memset(mgmt, 0, 24);
 469         mgmt->frame_control = IEEE80211_FC(WLAN_FC_TYPE_MGMT, stype);
 470         if (sender_ap) {
 471                 if (sta)
 472                         os_memcpy(mgmt->da, sta->addr, ETH_ALEN);
 473                 else
 474                         os_memset(mgmt->da, 0xff, ETH_ALEN);
 475                 os_memcpy(mgmt->sa, bss->bssid, ETH_ALEN);
 476         } else {
 477                 os_memcpy(mgmt->da, bss->bssid, ETH_ALEN);
 478                 os_memcpy(mgmt->sa, sta->addr, ETH_ALEN);
 479         }
 480         os_memcpy(mgmt->bssid, bss->bssid, ETH_ALEN);
 481 }
 482
 483
 484 static int ctrl_inject_auth(struct wlantest *wt, struct wlantest_bss *bss,
 485                             struct wlantest_sta *sta, int sender_ap,
 486                             enum wlantest_inject_protection prot)
 487 {
 488         struct ieee80211_mgmt mgmt;
 489
 490         if (prot != WLANTEST_INJECT_NORMAL &&
 491             prot != WLANTEST_INJECT_UNPROTECTED)
 492                 return -1; /* Authentication frame is never protected */
 493         if (sta == NULL)
 494                 return -1; /* No broadcast Authentication frames */
 495
 496         if (sender_ap)
 497                 wpa_printf(MSG_INFO, "INJECT: Auth " MACSTR " -> " MACSTR,
 498                            MAC2STR(bss->bssid), MAC2STR(sta->addr));
 499         else
 500                 wpa_printf(MSG_INFO, "INJECT: Auth " MACSTR " -> " MACSTR,
 501                            MAC2STR(sta->addr), MAC2STR(bss->bssid));
 502         build_mgmt_hdr(&mgmt, bss, sta, sender_ap, WLAN_FC_STYPE_AUTH);
 503
 504         mgmt.u.auth.auth_alg = host_to_le16(WLAN_AUTH_OPEN);
 505         mgmt.u.auth.auth_transaction = host_to_le16(1);
 506         mgmt.u.auth.status_code = host_to_le16(WLAN_STATUS_SUCCESS);
 507
 508         return wlantest_inject(wt, bss, sta, (u8 *) &mgmt, 24 + 6,
 509                                WLANTEST_INJECT_UNPROTECTED);
 510 }
 511
 512
 513 static int ctrl_inject_assocreq(struct wlantest *wt, struct wlantest_bss *bss,
 514                                 struct wlantest_sta *sta, int sender_ap,
 515                                 enum wlantest_inject_protection prot)
 516 {
 517         u8 *buf;
 518         struct ieee80211_mgmt *mgmt;
 519         int ret;
 520
 521         if (prot != WLANTEST_INJECT_NORMAL &&
 522             prot != WLANTEST_INJECT_UNPROTECTED)
 523                 return -1; /* Association Request frame is never protected */
 524         if (sta == NULL)
 525                 return -1; /* No broadcast Association Request frames */
 526         if (sender_ap)
 527                 return -1; /* No Association Request frame sent by AP */
 528         if (sta->assocreq_ies == NULL) {
 529                 wpa_printf(MSG_INFO, "INJECT: No previous (Re)Association "
 530                            "Request available for " MACSTR,
 531                            MAC2STR(sta->addr));
 532                 return -1;
 533         }
 534
 535         wpa_printf(MSG_INFO, "INJECT: AssocReq " MACSTR " -> " MACSTR,
 536                    MAC2STR(sta->addr), MAC2STR(bss->bssid));
 537         buf = os_malloc(sizeof(*mgmt) + sta->assocreq_ies_len);
 538         if (buf == NULL)
 539                 return -1;
 540         mgmt = (struct ieee80211_mgmt *) buf;
 541
 542         build_mgmt_hdr(mgmt, bss, sta, sender_ap, WLAN_FC_STYPE_ASSOC_REQ);
 543
 544         mgmt->u.assoc_req.capab_info = host_to_le16(sta->assocreq_capab_info);
 545         mgmt->u.assoc_req.listen_interval =
 546                 host_to_le16(sta->assocreq_listen_int);
 547         os_memcpy(mgmt->u.assoc_req.variable, sta->assocreq_ies,
 548                   sta->assocreq_ies_len);
 549
 550         ret = wlantest_inject(wt, bss, sta, buf,
 551                               24 + 4 + sta->assocreq_ies_len,
 552                               WLANTEST_INJECT_UNPROTECTED);
 553         os_free(buf);
 554         return ret;
 555 }
 556
 557
 558 static int ctrl_inject_reassocreq(struct wlantest *wt,
 559                                   struct wlantest_bss *bss,
 560                                   struct wlantest_sta *sta, int sender_ap,
 561                                   enum wlantest_inject_protection prot)
 562 {
 563         u8 *buf;
 564         struct ieee80211_mgmt *mgmt;
 565         int ret;
 566
 567         if (prot != WLANTEST_INJECT_NORMAL &&
 568             prot != WLANTEST_INJECT_UNPROTECTED)
 569                 return -1; /* Reassociation Request frame is never protected */
 570         if (sta == NULL)
 571                 return -1; /* No broadcast Reassociation Request frames */
 572         if (sender_ap)
 573                 return -1; /* No Reassociation Request frame sent by AP */
 574         if (sta->assocreq_ies == NULL) {
 575                 wpa_printf(MSG_INFO, "INJECT: No previous (Re)Association "
 576                            "Request available for " MACSTR,
 577                            MAC2STR(sta->addr));
 578                 return -1;
 579         }
 580
 581         wpa_printf(MSG_INFO, "INJECT: ReassocReq " MACSTR " -> " MACSTR,
 582                    MAC2STR(sta->addr), MAC2STR(bss->bssid));
 583         buf = os_malloc(sizeof(*mgmt) + sta->assocreq_ies_len);
 584         if (buf == NULL)
 585                 return -1;
 586         mgmt = (struct ieee80211_mgmt *) buf;
 587
 588         build_mgmt_hdr(mgmt, bss, sta, sender_ap, WLAN_FC_STYPE_REASSOC_REQ);
 589
 590         mgmt->u.reassoc_req.capab_info =
 591                 host_to_le16(sta->assocreq_capab_info);
 592         mgmt->u.reassoc_req.listen_interval =
 593                 host_to_le16(sta->assocreq_listen_int);
 594         os_memcpy(mgmt->u.reassoc_req.current_ap, bss->bssid, ETH_ALEN);
 595         os_memcpy(mgmt->u.reassoc_req.variable, sta->assocreq_ies,
 596                   sta->assocreq_ies_len);
 597
 598         ret = wlantest_inject(wt, bss, sta, buf,
 599                               24 + 10 + sta->assocreq_ies_len,
 600                               WLANTEST_INJECT_UNPROTECTED);
 601         os_free(buf);
 602         return ret;
 603 }
 604
 605
 606 static int ctrl_inject_deauth(struct wlantest *wt, struct wlantest_bss *bss,
 607                               struct wlantest_sta *sta, int sender_ap,
 608                               enum wlantest_inject_protection prot)
 609 {
 610         struct ieee80211_mgmt mgmt;
 611
 612         if (sender_ap) {
 613                 if (sta)
 614                         wpa_printf(MSG_INFO, "INJECT: Deauth " MACSTR " -> "
 615                                    MACSTR,
 616                                    MAC2STR(bss->bssid), MAC2STR(sta->addr));
 617                 else
 618                         wpa_printf(MSG_INFO, "INJECT: Deauth " MACSTR
 619                                    " -> broadcast", MAC2STR(bss->bssid));
 620         } else
 621                 wpa_printf(MSG_INFO, "INJECT: Deauth " MACSTR " -> " MACSTR,
 622                            MAC2STR(sta->addr), MAC2STR(bss->bssid));
 623         build_mgmt_hdr(&mgmt, bss, sta, sender_ap, WLAN_FC_STYPE_DEAUTH);
 624
 625         mgmt.u.deauth.reason_code = host_to_le16(WLAN_REASON_UNSPECIFIED);
 626
 627         return wlantest_inject(wt, bss, sta, (u8 *) &mgmt, 24 + 2, prot);
 628 }
 629
 630
 631 static int ctrl_inject_disassoc(struct wlantest *wt, struct wlantest_bss *bss,
 632                                 struct wlantest_sta *sta, int sender_ap,
 633                                 enum wlantest_inject_protection prot)
 634 {
 635         struct ieee80211_mgmt mgmt;
 636
 637         if (sender_ap) {
 638                 if (sta)
 639                         wpa_printf(MSG_INFO, "INJECT: Disassoc " MACSTR " -> "
 640                                    MACSTR,
 641                                    MAC2STR(bss->bssid), MAC2STR(sta->addr));
 642                 else
 643                         wpa_printf(MSG_INFO, "INJECT: Disassoc " MACSTR
 644                                    " -> broadcast", MAC2STR(bss->bssid));
 645         } else
 646                 wpa_printf(MSG_INFO, "INJECT: Disassoc " MACSTR " -> " MACSTR,
 647                            MAC2STR(sta->addr), MAC2STR(bss->bssid));
 648         build_mgmt_hdr(&mgmt, bss, sta, sender_ap, WLAN_FC_STYPE_DISASSOC);
 649
 650         mgmt.u.disassoc.reason_code = host_to_le16(WLAN_REASON_UNSPECIFIED);
 651
 652         return wlantest_inject(wt, bss, sta, (u8 *) &mgmt, 24 + 2, prot);
 653 }
 654
 655
 656 static int ctrl_inject_saqueryreq(struct wlantest *wt,
 657                                   struct wlantest_bss *bss,
 658                                   struct wlantest_sta *sta, int sender_ap,
 659                                   enum wlantest_inject_protection prot)
 660 {
 661         struct ieee80211_mgmt mgmt;
 662
 663         if (sta == NULL)
 664                 return -1; /* No broadcast SA Query frames */
 665
 666         if (sender_ap)
 667                 wpa_printf(MSG_INFO, "INJECT: SA Query Request " MACSTR " -> "
 668                            MACSTR, MAC2STR(bss->bssid), MAC2STR(sta->addr));
 669         else
 670                 wpa_printf(MSG_INFO, "INJECT: SA Query Request " MACSTR " -> "
 671                            MACSTR, MAC2STR(sta->addr), MAC2STR(bss->bssid));
 672         build_mgmt_hdr(&mgmt, bss, sta, sender_ap, WLAN_FC_STYPE_ACTION);
 673
 674         mgmt.u.action.category = WLAN_ACTION_SA_QUERY;
 675         mgmt.u.action.u.sa_query_req.action = WLAN_SA_QUERY_REQUEST;
 676         mgmt.u.action.u.sa_query_req.trans_id[0] = 0x12;
 677         mgmt.u.action.u.sa_query_req.trans_id[1] = 0x34;
 678         os_memcpy(sender_ap ? sta->ap_sa_query_tr : sta->sta_sa_query_tr,
 679                   mgmt.u.action.u.sa_query_req.trans_id,
 680                   WLAN_SA_QUERY_TR_ID_LEN);
 681         return wlantest_inject(wt, bss, sta, (u8 *) &mgmt, 24 + 4, prot);
 682 }
 683
 684
 685 static void ctrl_inject(struct wlantest *wt, int sock, u8 *cmd, size_t clen)
 686 {
 687         u8 *bssid, *sta_addr;
 688         struct wlantest_bss *bss;
 689         struct wlantest_sta *sta;
 690         int frame, sender_ap, prot;
 691         int ret = 0;
 692
 693         bssid = attr_get_macaddr(cmd, clen, WLANTEST_ATTR_BSSID);
 694         sta_addr = attr_get_macaddr(cmd, clen, WLANTEST_ATTR_STA_ADDR);
 695         frame = attr_get_int(cmd, clen, WLANTEST_ATTR_INJECT_FRAME);
 696         sender_ap = attr_get_int(cmd, clen, WLANTEST_ATTR_INJECT_SENDER_AP);
 697         if (sender_ap < 0)
 698                 sender_ap = 0;
 699         prot = attr_get_int(cmd, clen, WLANTEST_ATTR_INJECT_PROTECTION);
 700         if (bssid == NULL || sta_addr == NULL || frame < 0 || prot < 0) {
 701                 wpa_printf(MSG_INFO, "Invalid inject command parameters");
 702                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
 703                 return;
 704         }
 705
 706         bss = bss_find(wt, bssid);
 707         if (bss == NULL) {
 708                 wpa_printf(MSG_INFO, "BSS not found for inject command");
 709                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_FAILURE);
 710                 return;
 711         }
 712
 713         if (is_broadcast_ether_addr(sta_addr)) {
 714                 if (!sender_ap) {
 715                         wpa_printf(MSG_INFO, "Invalid broadcast inject "
 716                                    "command without sender_ap set");
 717                         ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
 718                         return;
 719                 } sta = NULL;
 720         } else {
 721                 sta = sta_find(bss, sta_addr);
 722                 if (sta == NULL) {
 723                         wpa_printf(MSG_INFO, "Station not found for inject "
 724                                    "command");
 725                         ctrl_send_simple(wt, sock, WLANTEST_CTRL_FAILURE);
 726                         return;
 727                 }
 728         }
 729
 730         switch (frame) {
 731         case WLANTEST_FRAME_AUTH:
 732                 ret = ctrl_inject_auth(wt, bss, sta, sender_ap, prot);
 733                 break;
 734         case WLANTEST_FRAME_ASSOCREQ:
 735                 ret = ctrl_inject_assocreq(wt, bss, sta, sender_ap, prot);
 736                 break;
 737         case WLANTEST_FRAME_REASSOCREQ:
 738                 ret = ctrl_inject_reassocreq(wt, bss, sta, sender_ap, prot);
 739                 break;
 740         case WLANTEST_FRAME_DEAUTH:
 741                 ret = ctrl_inject_deauth(wt, bss, sta, sender_ap, prot);
 742                 break;
 743         case WLANTEST_FRAME_DISASSOC:
 744                 ret = ctrl_inject_disassoc(wt, bss, sta, sender_ap, prot);
 745                 break;
 746         case WLANTEST_FRAME_SAQUERYREQ:
 747                 ret = ctrl_inject_saqueryreq(wt, bss, sta, sender_ap, prot);
 748                 break;
 749         default:
 750                 wpa_printf(MSG_INFO, "Unsupported inject command frame %d",
 751                            frame);
 752                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
 753                 return;
 754         }
 755
 756         if (ret)
 757                 wpa_printf(MSG_INFO, "Failed to inject frame");
 758         else
 759                 wpa_printf(MSG_INFO, "Frame injected successfully");
 760         ctrl_send_simple(wt, sock, ret == 0 ? WLANTEST_CTRL_SUCCESS :
 761                          WLANTEST_CTRL_FAILURE);
 762 }
 763
 764
 765 static void ctrl_version(struct wlantest *wt, int sock)
 766 {
 767         u8 buf[WLANTEST_CTRL_MAX_RESP_LEN], *pos;
 768
 769         pos = buf;
 770         WPA_PUT_BE32(pos, WLANTEST_CTRL_SUCCESS);
 771         pos += 4;
 772         pos = attr_add_str(pos, buf + sizeof(buf), WLANTEST_ATTR_VERSION,
 773                            VERSION_STR);
 774         ctrl_send(wt, sock, buf, pos - buf);
 775 }
 776
 777
 778 static void ctrl_add_passphrase(struct wlantest *wt, int sock, u8 *cmd,
 779                                 size_t clen)
 780 {
 781         u8 *passphrase;
 782         size_t len;
 783         struct wlantest_passphrase *p, *pa;
 784         u8 *bssid;
 785
 786         passphrase = attr_get(cmd, clen, WLANTEST_ATTR_PASSPHRASE, &len);
 787         if (passphrase == NULL) {
 788                 u8 *wepkey;
 789                 char *key;
 790                 enum wlantest_ctrl_cmd res;
 791
 792                 wepkey = attr_get(cmd, clen, WLANTEST_ATTR_WEPKEY, &len);
 793                 if (wepkey == NULL) {
 794                         ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
 795                         return;
 796                 }
 797                 key = os_zalloc(len + 1);
 798                 if (key == NULL) {
 799                         ctrl_send_simple(wt, sock, WLANTEST_CTRL_FAILURE);
 800                         return;
 801                 }
 802                 os_memcpy(key, wepkey, len);
 803                 if (add_wep(wt, key) < 0)
 804                         res = WLANTEST_CTRL_FAILURE;
 805                 else
 806                         res = WLANTEST_CTRL_SUCCESS;
 807                 os_free(key);
 808                 ctrl_send_simple(wt, sock, res);
 809                 return;
 810         }
 811
 812         if (len < 8 || len > 63) {
 813                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
 814                 return;
 815         }
 816
 817         p = os_zalloc(sizeof(*p));
 818         if (p == NULL) {
 819                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_FAILURE);
 820                 return;
 821         }
 822         os_memcpy(p->passphrase, passphrase, len);
 823         wpa_printf(MSG_INFO, "Add passphrase '%s'", p->passphrase);
 824
 825         bssid = attr_get_macaddr(cmd, clen, WLANTEST_ATTR_BSSID);
 826         if (bssid) {
 827                 os_memcpy(p->bssid, bssid, ETH_ALEN);
 828                 wpa_printf(MSG_INFO, "Limit passphrase for BSSID " MACSTR,
 829                            MAC2STR(p->bssid));
 830         }
 831
 832         dl_list_for_each(pa, &wt->passphrase, struct wlantest_passphrase, list)
 833         {
 834                 if (os_strcmp(p->passphrase, pa->passphrase) == 0 &&
 835                     os_memcmp(p->bssid, pa->bssid, ETH_ALEN) == 0) {
 836                         wpa_printf(MSG_INFO, "Passphrase was already known");
 837                         os_free(p);
 838                         p = NULL;
 839                         break;
 840                 }
 841         }
 842
 843         if (p) {
 844                 struct wlantest_bss *bss;
 845                 dl_list_add(&wt->passphrase, &p->list);
 846                 dl_list_for_each(bss, &wt->bss, struct wlantest_bss, list) {
 847                         if (bssid &&
 848                             os_memcmp(p->bssid, bss->bssid, ETH_ALEN) != 0)
 849                                 continue;
 850                         bss_add_pmk_from_passphrase(bss, p->passphrase);
 851                 }
 852         }
 853
 854         ctrl_send_simple(wt, sock, WLANTEST_CTRL_SUCCESS);
 855 }
 856
 857
 858 static void info_print_proto(char *buf, size_t len, int proto)
 859 {
 860         char *pos, *end;
 861
 862         if (proto == 0) {
 863                 os_snprintf(buf, len, "OPEN");
 864                 return;
 865         }
 866
 867         pos = buf;
 868         end = buf + len;
 869
 870         if (proto & WPA_PROTO_WPA)
 871                 pos += os_snprintf(pos, end - pos, "%sWPA",
 872                                    pos == buf ? "" : " ");
 873         if (proto & WPA_PROTO_RSN)
 874                 pos += os_snprintf(pos, end - pos, "%sWPA2",
 875                                    pos == buf ? "" : " ");
 876 }
 877
 878
 879 static void info_print_cipher(char *buf, size_t len, int cipher)
 880 {
 881         char *pos, *end;
 882
 883         if (cipher == 0) {
 884                 os_snprintf(buf, len, "N/A");
 885                 return;
 886         }
 887
 888         pos = buf;
 889         end = buf + len;
 890
 891         if (cipher & WPA_CIPHER_NONE)
 892                 pos += os_snprintf(pos, end - pos, "%sNONE",
 893                                    pos == buf ? "" : " ");
 894         if (cipher & WPA_CIPHER_WEP40)
 895                 pos += os_snprintf(pos, end - pos, "%sWEP40",
 896                                    pos == buf ? "" : " ");
 897         if (cipher & WPA_CIPHER_WEP104)
 898                 pos += os_snprintf(pos, end - pos, "%sWEP104",
 899                                    pos == buf ? "" : " ");
 900         if (cipher & WPA_CIPHER_TKIP)
 901                 pos += os_snprintf(pos, end - pos, "%sTKIP",
 902                                    pos == buf ? "" : " ");
 903         if (cipher & WPA_CIPHER_CCMP)
 904                 pos += os_snprintf(pos, end - pos, "%sCCMP",
 905                                    pos == buf ? "" : " ");
 906         if (cipher & WPA_CIPHER_AES_128_CMAC)
 907                 pos += os_snprintf(pos, end - pos, "%sBIP",
 908                                    pos == buf ? "" : " ");
 909 }
 910
 911
 912 static void info_print_key_mgmt(char *buf, size_t len, int key_mgmt)
 913 {
 914         char *pos, *end;
 915
 916         if (key_mgmt == 0) {
 917                 os_snprintf(buf, len, "N/A");
 918                 return;
 919         }
 920
 921         pos = buf;
 922         end = buf + len;
 923
 924         if (key_mgmt & WPA_KEY_MGMT_IEEE8021X)
 925                 pos += os_snprintf(pos, end - pos, "%sEAP",
 926                                    pos == buf ? "" : " ");
 927         if (key_mgmt & WPA_KEY_MGMT_PSK)
 928                 pos += os_snprintf(pos, end - pos, "%sPSK",
 929                                    pos == buf ? "" : " ");
 930         if (key_mgmt & WPA_KEY_MGMT_WPA_NONE)
 931                 pos += os_snprintf(pos, end - pos, "%sWPA-NONE",
 932                                    pos == buf ? "" : " ");
 933         if (key_mgmt & WPA_KEY_MGMT_FT_IEEE8021X)
 934                 pos += os_snprintf(pos, end - pos, "%sFT-EAP",
 935                                    pos == buf ? "" : " ");
 936         if (key_mgmt & WPA_KEY_MGMT_FT_PSK)
 937                 pos += os_snprintf(pos, end - pos, "%sFT-PSK",
 938                                    pos == buf ? "" : " ");
 939         if (key_mgmt & WPA_KEY_MGMT_IEEE8021X_SHA256)
 940                 pos += os_snprintf(pos, end - pos, "%sEAP-SHA256",
 941                                    pos == buf ? "" : " ");
 942         if (key_mgmt & WPA_KEY_MGMT_PSK_SHA256)
 943                 pos += os_snprintf(pos, end - pos, "%sPSK-SHA256",
 944                                    pos == buf ? "" : " ");
 945 }
 946
 947
 948 static void info_print_rsn_capab(char *buf, size_t len, int capab)
 949 {
 950         char *pos, *end;
 951
 952         pos = buf;
 953         end = buf + len;
 954
 955         if (capab & WPA_CAPABILITY_PREAUTH)
 956                 pos += os_snprintf(pos, end - pos, "%sPREAUTH",
 957                                    pos == buf ? "" : " ");
 958         if (capab & WPA_CAPABILITY_NO_PAIRWISE)
 959                 pos += os_snprintf(pos, end - pos, "%sNO_PAIRWISE",
 960                                    pos == buf ? "" : " ");
 961         if (capab & WPA_CAPABILITY_MFPR)
 962                 pos += os_snprintf(pos, end - pos, "%sMFPR",
 963                                    pos == buf ? "" : " ");
 964         if (capab & WPA_CAPABILITY_MFPC)
 965                 pos += os_snprintf(pos, end - pos, "%sMFPC",
 966                                    pos == buf ? "" : " ");
 967         if (capab & WPA_CAPABILITY_PEERKEY_ENABLED)
 968                 pos += os_snprintf(pos, end - pos, "%sPEERKEY",
 969                                    pos == buf ? "" : " ");
 970 }
 971
 972
 973 static void info_print_state(char *buf, size_t len, int state)
 974 {
 975         switch (state) {
 976         case STATE1:
 977                 os_strlcpy(buf, "NOT-AUTH", len);
 978                 break;
 979         case STATE2:
 980                 os_strlcpy(buf, "AUTH", len);
 981                 break;
 982         case STATE3:
 983                 os_strlcpy(buf, "AUTH+ASSOC", len);
 984                 break;
 985         }
 986 }
 987
 988
 989 static void info_print_gtk(char *buf, size_t len, struct wlantest_sta *sta)
 990 {
 991         size_t pos;
 992
 993         pos = os_snprintf(buf, len, "IDX=%d,GTK=", sta->gtk_idx);
 994         wpa_snprintf_hex(buf + pos, len - pos, sta->gtk, sta->gtk_len);
 995 }
 996
 997
 998 static void ctrl_info_sta(struct wlantest *wt, int sock, u8 *cmd, size_t clen)
 999 {
1000         u8 *addr;
1001         size_t addr_len;
1002         struct wlantest_bss *bss;
1003         struct wlantest_sta *sta;
1004         enum wlantest_sta_info info;
1005         u8 buf[4 + 108], *end, *pos;
1006         char resp[100];
1007
1008         bss = ctrl_get_bss(wt, sock, cmd, clen);
1009         sta = ctrl_get_sta(wt, sock, cmd, clen, bss);
1010         if (sta == NULL)
1011                 return;
1012
1013         addr = attr_get(cmd, clen, WLANTEST_ATTR_STA_INFO, &addr_len);
1014         if (addr == NULL || addr_len != 4) {
1015                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
1016                 return;
1017         }
1018         info = WPA_GET_BE32(addr);
1019
1020         resp[0] = '\0';
1021         switch (info) {
1022         case WLANTEST_STA_INFO_PROTO:
1023                 info_print_proto(resp, sizeof(resp), sta->proto);
1024                 break;
1025         case WLANTEST_STA_INFO_PAIRWISE:
1026                 info_print_cipher(resp, sizeof(resp), sta->pairwise_cipher);
1027                 break;
1028         case WLANTEST_STA_INFO_KEY_MGMT:
1029                 info_print_key_mgmt(resp, sizeof(resp), sta->key_mgmt);
1030                 break;
1031         case WLANTEST_STA_INFO_RSN_CAPAB:
1032                 info_print_rsn_capab(resp, sizeof(resp), sta->rsn_capab);
1033                 break;
1034         case WLANTEST_STA_INFO_STATE:
1035                 info_print_state(resp, sizeof(resp), sta->state);
1036                 break;
1037         case WLANTEST_STA_INFO_GTK:
1038                 info_print_gtk(resp, sizeof(resp), sta);
1039                 break;
1040         default:
1041                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
1042                 return;
1043         }
1044
1045         pos = buf;
1046         end = buf + sizeof(buf);
1047         WPA_PUT_BE32(pos, WLANTEST_CTRL_SUCCESS);
1048         pos += 4;
1049         pos = attr_add_str(pos, end, WLANTEST_ATTR_INFO, resp);
1050         ctrl_send(wt, sock, buf, pos - buf);
1051 }
1052
1053
1054 static void ctrl_info_bss(struct wlantest *wt, int sock, u8 *cmd, size_t clen)
1055 {
1056         u8 *addr;
1057         size_t addr_len;
1058         struct wlantest_bss *bss;
1059         enum wlantest_bss_info info;
1060         u8 buf[4 + 108], *end, *pos;
1061         char resp[100];
1062
1063         bss = ctrl_get_bss(wt, sock, cmd, clen);
1064         if (bss == NULL)
1065                 return;
1066
1067         addr = attr_get(cmd, clen, WLANTEST_ATTR_BSS_INFO, &addr_len);
1068         if (addr == NULL || addr_len != 4) {
1069                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
1070                 return;
1071         }
1072         info = WPA_GET_BE32(addr);
1073
1074         resp[0] = '\0';
1075         switch (info) {
1076         case WLANTEST_BSS_INFO_PROTO:
1077                 info_print_proto(resp, sizeof(resp), bss->proto);
1078                 break;
1079         case WLANTEST_BSS_INFO_PAIRWISE:
1080                 info_print_cipher(resp, sizeof(resp), bss->pairwise_cipher);
1081                 break;
1082         case WLANTEST_BSS_INFO_GROUP:
1083                 info_print_cipher(resp, sizeof(resp), bss->group_cipher);
1084                 break;
1085         case WLANTEST_BSS_INFO_GROUP_MGMT:
1086                 info_print_cipher(resp, sizeof(resp), bss->mgmt_group_cipher);
1087                 break;
1088         case WLANTEST_BSS_INFO_KEY_MGMT:
1089                 info_print_key_mgmt(resp, sizeof(resp), bss->key_mgmt);
1090                 break;
1091         case WLANTEST_BSS_INFO_RSN_CAPAB:
1092                 info_print_rsn_capab(resp, sizeof(resp), bss->rsn_capab);
1093                 break;
1094         default:
1095                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
1096                 return;
1097         }
1098
1099         pos = buf;
1100         end = buf + sizeof(buf);
1101         WPA_PUT_BE32(pos, WLANTEST_CTRL_SUCCESS);
1102         pos += 4;
1103         pos = attr_add_str(pos, end, WLANTEST_ATTR_INFO, resp);
1104         ctrl_send(wt, sock, buf, pos - buf);
1105 }
1106
1107
1108 static void ctrl_send_(struct wlantest *wt, int sock, u8 *cmd, size_t clen)
1109 {
1110         struct wlantest_bss *bss;
1111         struct wlantest_sta *sta;
1112         u8 *bssid, *sta_addr;
1113         int prot;
1114         u8 *frame;
1115         size_t frame_len;
1116         int ret = 0;
1117         struct ieee80211_hdr *hdr;
1118         u16 fc;
1119
1120         frame = attr_get(cmd, clen, WLANTEST_ATTR_FRAME, &frame_len);
1121         prot = attr_get_int(cmd, clen, WLANTEST_ATTR_INJECT_PROTECTION);
1122         if (frame == NULL || frame_len < 24 || prot < 0) {
1123                 wpa_printf(MSG_INFO, "Invalid send command parameters");
1124                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
1125                 return;
1126         }
1127
1128         hdr = (struct ieee80211_hdr *) frame;
1129         fc = le_to_host16(hdr->frame_control);
1130         switch (WLAN_FC_GET_TYPE(fc)) {
1131         case WLAN_FC_TYPE_MGMT:
1132                 bssid = hdr->addr3;
1133                 if (os_memcmp(hdr->addr2, hdr->addr3, ETH_ALEN) == 0)
1134                         sta_addr = hdr->addr1;
1135                 else
1136                         sta_addr = hdr->addr2;
1137                 break;
1138         case WLAN_FC_TYPE_DATA:
1139                 switch (fc & (WLAN_FC_TODS | WLAN_FC_FROMDS)) {
1140                 case 0:
1141                         bssid = hdr->addr3;
1142                         sta_addr = hdr->addr2;
1143                         break;
1144                 case WLAN_FC_TODS:
1145                         bssid = hdr->addr1;
1146                         sta_addr = hdr->addr2;
1147                         break;
1148                 case WLAN_FC_FROMDS:
1149                         bssid = hdr->addr2;
1150                         sta_addr = hdr->addr1;
1151                         break;
1152                 default:
1153                         wpa_printf(MSG_INFO, "Unsupported inject frame");
1154                         ctrl_send_simple(wt, sock, WLANTEST_CTRL_FAILURE);
1155                         return;
1156                 }
1157                 break;
1158         default:
1159                 wpa_printf(MSG_INFO, "Unsupported inject frame");
1160                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_FAILURE);
1161                 return;
1162         }
1163
1164         bss = bss_find(wt, bssid);
1165         if (bss == NULL && prot != WLANTEST_INJECT_UNPROTECTED) {
1166                 wpa_printf(MSG_INFO, "Unknown BSSID");
1167                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_FAILURE);
1168                 return;
1169         }
1170
1171         if (bss)
1172                 sta = sta_find(bss, sta_addr);
1173         else
1174                 sta = NULL;
1175         if (sta == NULL && prot != WLANTEST_INJECT_UNPROTECTED) {
1176                 wpa_printf(MSG_INFO, "Unknown STA address");
1177                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_FAILURE);
1178                 return;
1179         }
1180
1181         ret = wlantest_inject(wt, bss, sta, frame, frame_len, prot);
1182
1183         if (ret)
1184                 wpa_printf(MSG_INFO, "Failed to inject frame");
1185         else
1186                 wpa_printf(MSG_INFO, "Frame injected successfully");
1187         ctrl_send_simple(wt, sock, ret == 0 ? WLANTEST_CTRL_SUCCESS :
1188                          WLANTEST_CTRL_FAILURE);
1189 }
1190
1191
1192 static void ctrl_relog(struct wlantest *wt, int sock)
1193 {
1194         int res = wlantest_relog(wt);
1195         ctrl_send_simple(wt, sock, res ? WLANTEST_CTRL_FAILURE :
1196                          WLANTEST_CTRL_SUCCESS);
1197 }
1198
1199
1200 static void ctrl_get_tx_tid(struct wlantest *wt, int sock, u8 *cmd, size_t clen)
1201 {
1202         u8 *addr;
1203         size_t addr_len;
1204         struct wlantest_bss *bss;
1205         struct wlantest_sta *sta;
1206         u32 counter;
1207         u8 buf[4 + 12], *end, *pos;
1208
1209         bss = ctrl_get_bss(wt, sock, cmd, clen);
1210         sta = ctrl_get_sta(wt, sock, cmd, clen, bss);
1211         if (sta == NULL)
1212                 return;
1213
1214         addr = attr_get(cmd, clen, WLANTEST_ATTR_TID, &addr_len);
1215         if (addr == NULL || addr_len != 4) {
1216                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
1217                 return;
1218         }
1219         counter = WPA_GET_BE32(addr);
1220         if (counter >= 16 + 1) {
1221                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
1222                 return;
1223         }
1224
1225         pos = buf;
1226         end = buf + sizeof(buf);
1227         WPA_PUT_BE32(pos, WLANTEST_CTRL_SUCCESS);
1228         pos += 4;
1229         pos = attr_add_be32(pos, end, WLANTEST_ATTR_COUNTER,
1230                             sta->tx_tid[counter]);
1231         ctrl_send(wt, sock, buf, pos - buf);
1232 }
1233
1234
1235 static void ctrl_get_rx_tid(struct wlantest *wt, int sock, u8 *cmd, size_t clen)
1236 {
1237         u8 *addr;
1238         size_t addr_len;
1239         struct wlantest_bss *bss;
1240         struct wlantest_sta *sta;
1241         u32 counter;
1242         u8 buf[4 + 12], *end, *pos;
1243
1244         bss = ctrl_get_bss(wt, sock, cmd, clen);
1245         sta = ctrl_get_sta(wt, sock, cmd, clen, bss);
1246         if (sta == NULL)
1247                 return;
1248
1249         addr = attr_get(cmd, clen, WLANTEST_ATTR_TID, &addr_len);
1250         if (addr == NULL || addr_len != 4) {
1251                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
1252                 return;
1253         }
1254         counter = WPA_GET_BE32(addr);
1255         if (counter >= 16 + 1) {
1256                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_INVALID_CMD);
1257                 return;
1258         }
1259
1260         pos = buf;
1261         end = buf + sizeof(buf);
1262         WPA_PUT_BE32(pos, WLANTEST_CTRL_SUCCESS);
1263         pos += 4;
1264         pos = attr_add_be32(pos, end, WLANTEST_ATTR_COUNTER,
1265                             sta->rx_tid[counter]);
1266         ctrl_send(wt, sock, buf, pos - buf);
1267 }
1268
1269
1270 static void ctrl_read(int sock, void *eloop_ctx, void *sock_ctx)
1271 {
1272         struct wlantest *wt = eloop_ctx;
1273         u8 buf[WLANTEST_CTRL_MAX_CMD_LEN];
1274         int len;
1275         enum wlantest_ctrl_cmd cmd;
1276
1277         wpa_printf(MSG_EXCESSIVE, "New control interface message from %d",
1278                    sock);
1279         len = recv(sock, buf, sizeof(buf), 0);
1280         if (len < 0) {
1281                 wpa_printf(MSG_INFO, "recv(ctrl): %s", strerror(errno));
1282                 ctrl_disconnect(wt, sock);
1283                 return;
1284         }
1285         if (len == 0) {
1286                 ctrl_disconnect(wt, sock);
1287                 return;
1288         }
1289
1290         if (len < 4) {
1291                 wpa_printf(MSG_INFO, "Too short control interface command "
1292                            "from %d", sock);
1293                 ctrl_disconnect(wt, sock);
1294                 return;
1295         }
1296         cmd = WPA_GET_BE32(buf);
1297         wpa_printf(MSG_EXCESSIVE, "Control interface command %d from %d",
1298                    cmd, sock);
1299
1300         switch (cmd) {
1301         case WLANTEST_CTRL_PING:
1302                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_SUCCESS);
1303                 break;
1304         case WLANTEST_CTRL_TERMINATE:
1305                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_SUCCESS);
1306                 eloop_terminate();
1307                 break;
1308         case WLANTEST_CTRL_LIST_BSS:
1309                 ctrl_list_bss(wt, sock);
1310                 break;
1311         case WLANTEST_CTRL_LIST_STA:
1312                 ctrl_list_sta(wt, sock, buf + 4, len - 4);
1313                 break;
1314         case WLANTEST_CTRL_FLUSH:
1315                 ctrl_flush(wt, sock);
1316                 break;
1317         case WLANTEST_CTRL_CLEAR_STA_COUNTERS:
1318                 ctrl_clear_sta_counters(wt, sock, buf + 4, len - 4);
1319                 break;
1320         case WLANTEST_CTRL_CLEAR_BSS_COUNTERS:
1321                 ctrl_clear_bss_counters(wt, sock, buf + 4, len - 4);
1322                 break;
1323         case WLANTEST_CTRL_CLEAR_TDLS_COUNTERS:
1324                 ctrl_clear_tdls_counters(wt, sock, buf + 4, len - 4);
1325                 break;
1326         case WLANTEST_CTRL_GET_STA_COUNTER:
1327                 ctrl_get_sta_counter(wt, sock, buf + 4, len - 4);
1328                 break;
1329         case WLANTEST_CTRL_GET_BSS_COUNTER:
1330                 ctrl_get_bss_counter(wt, sock, buf + 4, len - 4);
1331                 break;
1332         case WLANTEST_CTRL_GET_TDLS_COUNTER:
1333                 ctrl_get_tdls_counter(wt, sock, buf + 4, len - 4);
1334                 break;
1335         case WLANTEST_CTRL_INJECT:
1336                 ctrl_inject(wt, sock, buf + 4, len - 4);
1337                 break;
1338         case WLANTEST_CTRL_VERSION:
1339                 ctrl_version(wt, sock);
1340                 break;
1341         case WLANTEST_CTRL_ADD_PASSPHRASE:
1342                 ctrl_add_passphrase(wt, sock, buf + 4, len - 4);
1343                 break;
1344         case WLANTEST_CTRL_INFO_STA:
1345                 ctrl_info_sta(wt, sock, buf + 4, len - 4);
1346                 break;
1347         case WLANTEST_CTRL_INFO_BSS:
1348                 ctrl_info_bss(wt, sock, buf + 4, len - 4);
1349                 break;
1350         case WLANTEST_CTRL_SEND:
1351                 ctrl_send_(wt, sock, buf + 4, len - 4);
1352                 break;
1353         case WLANTEST_CTRL_RELOG:
1354                 ctrl_relog(wt, sock);
1355                 break;
1356         case WLANTEST_CTRL_GET_TX_TID:
1357                 ctrl_get_tx_tid(wt, sock, buf + 4, len - 4);
1358                 break;
1359         case WLANTEST_CTRL_GET_RX_TID:
1360                 ctrl_get_rx_tid(wt, sock, buf + 4, len - 4);
1361                 break;
1362         default:
1363                 ctrl_send_simple(wt, sock, WLANTEST_CTRL_UNKNOWN_CMD);
1364                 break;
1365         }
1366 }
1367
1368
1369 static void ctrl_connect(int sock, void *eloop_ctx, void *sock_ctx)
1370 {
1371         struct wlantest *wt = eloop_ctx;
1372         int conn, i;
1373
1374         conn = accept(sock, NULL, NULL);
1375         if (conn < 0) {
1376                 wpa_printf(MSG_INFO, "accept(ctrl): %s", strerror(errno));
1377                 return;
1378         }
1379         wpa_printf(MSG_MSGDUMP, "New control interface connection %d", conn);
1380
1381         for (i = 0; i < MAX_CTRL_CONNECTIONS; i++) {
1382                 if (wt->ctrl_socks[i] < 0)
1383                         break;
1384         }
1385
1386         if (i == MAX_CTRL_CONNECTIONS) {
1387                 wpa_printf(MSG_INFO, "No room for new control connection");
1388                 close(conn);
1389                 return;
1390         }
1391
1392         wt->ctrl_socks[i] = conn;
1393         eloop_register_read_sock(conn, ctrl_read, wt, NULL);
1394 }
1395
1396
1397 int ctrl_init(struct wlantest *wt)
1398 {
1399         struct sockaddr_un addr;
1400
1401         wt->ctrl_sock = socket(AF_UNIX, SOCK_SEQPACKET, 0);
1402         if (wt->ctrl_sock < 0) {
1403                 wpa_printf(MSG_ERROR, "socket: %s", strerror(errno));
1404                 return -1;
1405         }
1406
1407         os_memset(&addr, 0, sizeof(addr));
1408         addr.sun_family = AF_UNIX;
1409         os_strlcpy(addr.sun_path + 1, WLANTEST_SOCK_NAME,
1410                    sizeof(addr.sun_path) - 1);
1411         if (bind(wt->ctrl_sock, (struct sockaddr *) &addr, sizeof(addr)) < 0) {
1412                 wpa_printf(MSG_ERROR, "bind: %s", strerror(errno));
1413                 close(wt->ctrl_sock);
1414                 wt->ctrl_sock = -1;
1415                 return -1;
1416         }
1417
1418         if (listen(wt->ctrl_sock, 5) < 0) {
1419                 wpa_printf(MSG_ERROR, "listen: %s", strerror(errno));
1420                 close(wt->ctrl_sock);
1421                 wt->ctrl_sock = -1;
1422                 return -1;
1423         }
1424
1425         if (eloop_register_read_sock(wt->ctrl_sock, ctrl_connect, wt, NULL)) {
1426                 close(wt->ctrl_sock);
1427                 wt->ctrl_sock = -1;
1428                 return -1;
1429         }
1430
1431         return 0;
1432 }
1433
1434
1435 void ctrl_deinit(struct wlantest *wt)
1436 {
1437         int i;
1438
1439         if (wt->ctrl_sock < 0)
1440                 return;
1441
1442         for (i = 0; i < MAX_CTRL_CONNECTIONS; i++) {
1443                 if (wt->ctrl_socks[i] >= 0) {
1444                         close(wt->ctrl_socks[i]);
1445                         eloop_unregister_read_sock(wt->ctrl_socks[i]);
1446                         wt->ctrl_socks[i] = -1;
1447                 }
1448         }
1449
1450         eloop_unregister_read_sock(wt->ctrl_sock);
1451         close(wt->ctrl_sock);
1452         wt->ctrl_sock = -1;
1453 }