util.c

   1 #include <ctype.h>
   2 #include <netlink/attr.h>
   3 #include <errno.h>
   4 #include <stdbool.h>
   5 #include "iw.h"
   6 #include "nl80211.h"
   7
   8 void mac_addr_n2a(char *mac_addr, const unsigned char *arg)
   9 {
  10         int i, l;
  11
  12         l = 0;
  13         for (i = 0; i < ETH_ALEN ; i++) {
  14                 if (i == 0) {
  15                         sprintf(mac_addr+l, "%02x", arg[i]);
  16                         l += 2;
  17                 } else {
  18                         sprintf(mac_addr+l, ":%02x", arg[i]);
  19                         l += 3;
  20                 }
  21         }
  22 }
  23
  24 int mac_addr_a2n(unsigned char *mac_addr, char *arg)
  25 {
  26         int i;
  27
  28         for (i = 0; i < ETH_ALEN ; i++) {
  29                 int temp;
  30                 char *cp = strchr(arg, ':');
  31                 if (cp) {
  32                         *cp = 0;
  33                         cp++;
  34                 }
  35                 if (sscanf(arg, "%x", &temp) != 1)
  36                         return -1;
  37                 if (temp < 0 || temp > 255)
  38                         return -1;
  39
  40                 mac_addr[i] = temp;
  41                 if (!cp)
  42                         break;
  43                 arg = cp;
  44         }
  45         if (i < ETH_ALEN - 1)
  46                 return -1;
  47
  48         return 0;
  49 }
  50
  51 int parse_hex_mask(char *hexmask, unsigned char **result, size_t *result_len,
  52                    unsigned char **mask)
  53 {
  54         size_t len = strlen(hexmask) / 2;
  55         unsigned char *result_val;
  56         unsigned char *result_mask = NULL;
  57
  58         int pos = 0;
  59
  60         *result_len = 0;
  61
  62         result_val = calloc(len + 2, 1);
  63         if (!result_val)
  64                 goto error;
  65         *result = result_val;
  66         if (mask) {
  67                 result_mask = calloc(DIV_ROUND_UP(len, 8) + 2, 1);
  68                 if (!result_mask)
  69                         goto error;
  70                 *mask = result_mask;
  71         }
  72
  73         while (1) {
  74                 char *cp = strchr(hexmask, ':');
  75                 if (cp) {
  76                         *cp = 0;
  77                         cp++;
  78                 }
  79
  80                 if (result_mask && (strcmp(hexmask, "-") == 0 ||
  81                                     strcmp(hexmask, "xx") == 0 ||
  82                                     strcmp(hexmask, "--") == 0)) {
  83                         /* skip this byte and leave mask bit unset */
  84                 } else {
  85                         int temp, mask_pos;
  86                         char *end;
  87
  88                         temp = strtoul(hexmask, &end, 16);
  89                         if (*end)
  90                                 goto error;
  91                         if (temp < 0 || temp > 255)
  92                                 goto error;
  93                         result_val[pos] = temp;
  94
  95                         mask_pos = pos / 8;
  96                         if (result_mask)
  97                                 result_mask[mask_pos] |= 1 << (pos % 8);
  98                 }
  99
 100                 (*result_len)++;
 101                 pos++;
 102
 103                 if (!cp)
 104                         break;
 105                 hexmask = cp;
 106         }
 107
 108         return 0;
 109  error:
 110         free(result_val);
 111         free(result_mask);
 112         return -1;
 113 }
 114
 115 unsigned char *parse_hex(char *hex, size_t *outlen)
 116 {
 117         unsigned char *result;
 118
 119         if (parse_hex_mask(hex, &result, outlen, NULL))
 120                 return NULL;
 121         return result;
 122 }
 123
 124 static const char *ifmodes[NL80211_IFTYPE_MAX + 1] = {
 125         "unspecified",
 126         "IBSS",
 127         "managed",
 128         "AP",
 129         "AP/VLAN",
 130         "WDS",
 131         "monitor",
 132         "mesh point",
 133         "P2P-client",
 134         "P2P-GO",
 135         "P2P-device",
 136         "outside context of a BSS",
 137         "NAN",
 138 };
 139
 140 static char modebuf[100];
 141
 142 const char *iftype_name(enum nl80211_iftype iftype)
 143 {
 144         if (iftype <= NL80211_IFTYPE_MAX && ifmodes[iftype])
 145                 return ifmodes[iftype];
 146         sprintf(modebuf, "Unknown mode (%d)", iftype);
 147         return modebuf;
 148 }
 149
 150 static const char *commands[NL80211_CMD_MAX + 1] = {
 151 /*
 152  * sed 's%^\tNL80211_CMD_%%;t n;d;:n s%^\([^=]*\),.*%\t[NL80211_CMD_\1] = \"\L\1\",%;t;d' nl80211.h | grep -v "reserved"
 153  */
 154         [NL80211_CMD_UNSPEC] = "unspec",
 155         [NL80211_CMD_GET_WIPHY] = "get_wiphy",
 156         [NL80211_CMD_SET_WIPHY] = "set_wiphy",
 157         [NL80211_CMD_NEW_WIPHY] = "new_wiphy",
 158         [NL80211_CMD_DEL_WIPHY] = "del_wiphy",
 159         [NL80211_CMD_GET_INTERFACE] = "get_interface",
 160         [NL80211_CMD_SET_INTERFACE] = "set_interface",
 161         [NL80211_CMD_NEW_INTERFACE] = "new_interface",
 162         [NL80211_CMD_DEL_INTERFACE] = "del_interface",
 163         [NL80211_CMD_GET_KEY] = "get_key",
 164         [NL80211_CMD_SET_KEY] = "set_key",
 165         [NL80211_CMD_NEW_KEY] = "new_key",
 166         [NL80211_CMD_DEL_KEY] = "del_key",
 167         [NL80211_CMD_GET_BEACON] = "get_beacon",
 168         [NL80211_CMD_SET_BEACON] = "set_beacon",
 169         [NL80211_CMD_START_AP] = "start_ap",
 170         [NL80211_CMD_STOP_AP] = "stop_ap",
 171         [NL80211_CMD_GET_STATION] = "get_station",
 172         [NL80211_CMD_SET_STATION] = "set_station",
 173         [NL80211_CMD_NEW_STATION] = "new_station",
 174         [NL80211_CMD_DEL_STATION] = "del_station",
 175         [NL80211_CMD_GET_MPATH] = "get_mpath",
 176         [NL80211_CMD_SET_MPATH] = "set_mpath",
 177         [NL80211_CMD_NEW_MPATH] = "new_mpath",
 178         [NL80211_CMD_DEL_MPATH] = "del_mpath",
 179         [NL80211_CMD_SET_BSS] = "set_bss",
 180         [NL80211_CMD_SET_REG] = "set_reg",
 181         [NL80211_CMD_REQ_SET_REG] = "req_set_reg",
 182         [NL80211_CMD_GET_MESH_CONFIG] = "get_mesh_config",
 183         [NL80211_CMD_SET_MESH_CONFIG] = "set_mesh_config",
 184         [NL80211_CMD_GET_REG] = "get_reg",
 185         [NL80211_CMD_GET_SCAN] = "get_scan",
 186         [NL80211_CMD_TRIGGER_SCAN] = "trigger_scan",
 187         [NL80211_CMD_NEW_SCAN_RESULTS] = "new_scan_results",
 188         [NL80211_CMD_SCAN_ABORTED] = "scan_aborted",
 189         [NL80211_CMD_REG_CHANGE] = "reg_change",
 190         [NL80211_CMD_AUTHENTICATE] = "authenticate",
 191         [NL80211_CMD_ASSOCIATE] = "associate",
 192         [NL80211_CMD_DEAUTHENTICATE] = "deauthenticate",
 193         [NL80211_CMD_DISASSOCIATE] = "disassociate",
 194         [NL80211_CMD_MICHAEL_MIC_FAILURE] = "michael_mic_failure",
 195         [NL80211_CMD_REG_BEACON_HINT] = "reg_beacon_hint",
 196         [NL80211_CMD_JOIN_IBSS] = "join_ibss",
 197         [NL80211_CMD_LEAVE_IBSS] = "leave_ibss",
 198         [NL80211_CMD_TESTMODE] = "testmode",
 199         [NL80211_CMD_CONNECT] = "connect",
 200         [NL80211_CMD_ROAM] = "roam",
 201         [NL80211_CMD_DISCONNECT] = "disconnect",
 202         [NL80211_CMD_SET_WIPHY_NETNS] = "set_wiphy_netns",
 203         [NL80211_CMD_GET_SURVEY] = "get_survey",
 204         [NL80211_CMD_NEW_SURVEY_RESULTS] = "new_survey_results",
 205         [NL80211_CMD_SET_PMKSA] = "set_pmksa",
 206         [NL80211_CMD_DEL_PMKSA] = "del_pmksa",
 207         [NL80211_CMD_FLUSH_PMKSA] = "flush_pmksa",
 208         [NL80211_CMD_REMAIN_ON_CHANNEL] = "remain_on_channel",
 209         [NL80211_CMD_CANCEL_REMAIN_ON_CHANNEL] = "cancel_remain_on_channel",
 210         [NL80211_CMD_SET_TX_BITRATE_MASK] = "set_tx_bitrate_mask",
 211         [NL80211_CMD_REGISTER_FRAME] = "register_frame",
 212         [NL80211_CMD_FRAME] = "frame",
 213         [NL80211_CMD_FRAME_TX_STATUS] = "frame_tx_status",
 214         [NL80211_CMD_SET_POWER_SAVE] = "set_power_save",
 215         [NL80211_CMD_GET_POWER_SAVE] = "get_power_save",
 216         [NL80211_CMD_SET_CQM] = "set_cqm",
 217         [NL80211_CMD_NOTIFY_CQM] = "notify_cqm",
 218         [NL80211_CMD_SET_CHANNEL] = "set_channel",
 219         [NL80211_CMD_SET_WDS_PEER] = "set_wds_peer",
 220         [NL80211_CMD_FRAME_WAIT_CANCEL] = "frame_wait_cancel",
 221         [NL80211_CMD_JOIN_MESH] = "join_mesh",
 222         [NL80211_CMD_LEAVE_MESH] = "leave_mesh",
 223         [NL80211_CMD_UNPROT_DEAUTHENTICATE] = "unprot_deauthenticate",
 224         [NL80211_CMD_UNPROT_DISASSOCIATE] = "unprot_disassociate",
 225         [NL80211_CMD_NEW_PEER_CANDIDATE] = "new_peer_candidate",
 226         [NL80211_CMD_GET_WOWLAN] = "get_wowlan",
 227         [NL80211_CMD_SET_WOWLAN] = "set_wowlan",
 228         [NL80211_CMD_START_SCHED_SCAN] = "start_sched_scan",
 229         [NL80211_CMD_STOP_SCHED_SCAN] = "stop_sched_scan",
 230         [NL80211_CMD_SCHED_SCAN_RESULTS] = "sched_scan_results",
 231         [NL80211_CMD_SCHED_SCAN_STOPPED] = "sched_scan_stopped",
 232         [NL80211_CMD_SET_REKEY_OFFLOAD] = "set_rekey_offload",
 233         [NL80211_CMD_PMKSA_CANDIDATE] = "pmksa_candidate",
 234         [NL80211_CMD_TDLS_OPER] = "tdls_oper",
 235         [NL80211_CMD_TDLS_MGMT] = "tdls_mgmt",
 236         [NL80211_CMD_UNEXPECTED_FRAME] = "unexpected_frame",
 237         [NL80211_CMD_PROBE_CLIENT] = "probe_client",
 238         [NL80211_CMD_REGISTER_BEACONS] = "register_beacons",
 239         [NL80211_CMD_UNEXPECTED_4ADDR_FRAME] = "unexpected_4addr_frame",
 240         [NL80211_CMD_SET_NOACK_MAP] = "set_noack_map",
 241         [NL80211_CMD_CH_SWITCH_NOTIFY] = "ch_switch_notify",
 242         [NL80211_CMD_START_P2P_DEVICE] = "start_p2p_device",
 243         [NL80211_CMD_STOP_P2P_DEVICE] = "stop_p2p_device",
 244         [NL80211_CMD_CONN_FAILED] = "conn_failed",
 245         [NL80211_CMD_SET_MCAST_RATE] = "set_mcast_rate",
 246         [NL80211_CMD_SET_MAC_ACL] = "set_mac_acl",
 247         [NL80211_CMD_RADAR_DETECT] = "radar_detect",
 248         [NL80211_CMD_GET_PROTOCOL_FEATURES] = "get_protocol_features",
 249         [NL80211_CMD_UPDATE_FT_IES] = "update_ft_ies",
 250         [NL80211_CMD_FT_EVENT] = "ft_event",
 251         [NL80211_CMD_CRIT_PROTOCOL_START] = "crit_protocol_start",
 252         [NL80211_CMD_CRIT_PROTOCOL_STOP] = "crit_protocol_stop",
 253         [NL80211_CMD_GET_COALESCE] = "get_coalesce",
 254         [NL80211_CMD_SET_COALESCE] = "set_coalesce",
 255         [NL80211_CMD_CHANNEL_SWITCH] = "channel_switch",
 256         [NL80211_CMD_VENDOR] = "vendor",
 257         [NL80211_CMD_SET_QOS_MAP] = "set_qos_map",
 258         [NL80211_CMD_ADD_TX_TS] = "add_tx_ts",
 259         [NL80211_CMD_DEL_TX_TS] = "del_tx_ts",
 260         [NL80211_CMD_GET_MPP] = "get_mpp",
 261         [NL80211_CMD_JOIN_OCB] = "join_ocb",
 262         [NL80211_CMD_LEAVE_OCB] = "leave_ocb",
 263         [NL80211_CMD_CH_SWITCH_STARTED_NOTIFY] = "ch_switch_started_notify",
 264         [NL80211_CMD_TDLS_CHANNEL_SWITCH] = "tdls_channel_switch",
 265         [NL80211_CMD_TDLS_CANCEL_CHANNEL_SWITCH] = "tdls_cancel_channel_switch",
 266         [NL80211_CMD_WIPHY_REG_CHANGE] = "wiphy_reg_change",
 267         [NL80211_CMD_ABORT_SCAN] = "abort_scan",
 268         [NL80211_CMD_START_NAN] = "start_nan",
 269         [NL80211_CMD_STOP_NAN] = "stop_nan",
 270         [NL80211_CMD_ADD_NAN_FUNCTION] = "add_nan_function",
 271         [NL80211_CMD_DEL_NAN_FUNCTION] = "del_nan_function",
 272         [NL80211_CMD_CHANGE_NAN_CONFIG] = "change_nan_config",
 273         [NL80211_CMD_NAN_MATCH] = "nan_match",
 274         [NL80211_CMD_SET_MULTICAST_TO_UNICAST] = "set_multicast_to_unicast",
 275         [NL80211_CMD_UPDATE_CONNECT_PARAMS] = "update_connect_params",
 276         [NL80211_CMD_SET_PMK] = "set_pmk",
 277         [NL80211_CMD_DEL_PMK] = "del_pmk",
 278         [NL80211_CMD_PORT_AUTHORIZED] = "port_authorized",
 279         [NL80211_CMD_RELOAD_REGDB] = "reload_regdb",
 280 };
 281
 282 static char cmdbuf[100];
 283
 284 const char *command_name(enum nl80211_commands cmd)
 285 {
 286         if (cmd <= NL80211_CMD_MAX && commands[cmd])
 287                 return commands[cmd];
 288         sprintf(cmdbuf, "Unknown command (%d)", cmd);
 289         return cmdbuf;
 290 }
 291
 292 int ieee80211_channel_to_frequency(int chan, enum nl80211_band band)
 293 {
 294         /* see 802.11 17.3.8.3.2 and Annex J
 295          * there are overlapping channel numbers in 5GHz and 2GHz bands */
 296         if (chan <= 0)
 297                 return 0; /* not supported */
 298         switch (band) {
 299         case NL80211_BAND_2GHZ:
 300                 if (chan == 14)
 301                         return 2484;
 302                 else if (chan < 14)
 303                         return 2407 + chan * 5;
 304                 break;
 305         case NL80211_BAND_5GHZ:
 306                 if (chan >= 182 && chan <= 196)
 307                         return 4000 + chan * 5;
 308                 else
 309                         return 5000 + chan * 5;
 310                 break;
 311         case NL80211_BAND_60GHZ:
 312                 if (chan < 5)
 313                         return 56160 + chan * 2160;
 314                 break;
 315         default:
 316                 ;
 317         }
 318         return 0; /* not supported */
 319 }
 320
 321 int ieee80211_frequency_to_channel(int freq)
 322 {
 323         /* see 802.11-2007 17.3.8.3.2 and Annex J */
 324         if (freq == 2484)
 325                 return 14;
 326         else if (freq < 2484)
 327                 return (freq - 2407) / 5;
 328         else if (freq >= 4910 && freq <= 4980)
 329                 return (freq - 4000) / 5;
 330         else if (freq <= 45000) /* DMG band lower limit */
 331                 return (freq - 5000) / 5;
 332         else if (freq >= 58320 && freq <= 64800)
 333                 return (freq - 56160) / 2160;
 334         else
 335                 return 0;
 336 }
 337
 338 void print_ssid_escaped(const uint8_t len, const uint8_t *data)
 339 {
 340         int i;
 341
 342         for (i = 0; i < len; i++) {
 343                 if (isprint(data[i]) && data[i] != ' ' && data[i] != '\\')
 344                         printf("%c", data[i]);
 345                 else if (data[i] == ' ' &&
 346                          (i != 0 && i != len -1))
 347                         printf(" ");
 348                 else
 349                         printf("\\x%.2x", data[i]);
 350         }
 351 }
 352
 353 static int hex2num(char digit)
 354 {
 355         if (!isxdigit(digit))
 356                 return -1;
 357         if (isdigit(digit))
 358                 return digit - '0';
 359         return tolower(digit) - 'a' + 10;
 360 }
 361
 362 static int hex2byte(const char *hex)
 363 {
 364         int d1, d2;
 365
 366         d1 = hex2num(hex[0]);
 367         if (d1 < 0)
 368                 return -1;
 369         d2 = hex2num(hex[1]);
 370         if (d2 < 0)
 371                 return -1;
 372         return (d1 << 4) | d2;
 373 }
 374
 375 char *hex2bin(const char *hex, char *buf)
 376 {
 377         char *result = buf;
 378         int d;
 379
 380         while (hex[0]) {
 381                 d = hex2byte(hex);
 382                 if (d < 0)
 383                         return NULL;
 384                 buf[0] = d;
 385                 buf++;
 386                 hex += 2;
 387         }
 388
 389         return result;
 390 }
 391
 392 static int parse_akm_suite(const char *cipher_str)
 393 {
 394
 395         if (!strcmp(cipher_str, "PSK"))
 396                 return 0x000FAC02;
 397         if (!strcmp(cipher_str, "FT/PSK"))
 398                 return 0x000FAC03;
 399         if (!strcmp(cipher_str, "PSK/SHA-256"))
 400                 return 0x000FAC06;
 401         return -EINVAL;
 402 }
 403
 404 static int parse_cipher_suite(const char *cipher_str)
 405 {
 406
 407         if (!strcmp(cipher_str, "TKIP"))
 408                 return 0x000FAC02;
 409         if (!strcmp(cipher_str, "CCMP") || !strcmp(cipher_str, "CCMP-128"))
 410                 return 0x000FAC04;
 411         if (!strcmp(cipher_str, "GCMP") || !strcmp(cipher_str, "GCMP-128"))
 412                 return 0x000FAC08;
 413         if (!strcmp(cipher_str, "GCMP-256"))
 414                 return 0x000FAC09;
 415         if (!strcmp(cipher_str, "CCMP-256"))
 416                 return 0x000FAC0A;
 417         return -EINVAL;
 418 }
 419
 420 int parse_keys(struct nl_msg *msg, char **argv[], int *argc)
 421 {
 422         struct nlattr *keys;
 423         int i = 0;
 424         bool have_default = false;
 425         char *arg = **argv;
 426         char keybuf[13];
 427         int pos = 0;
 428
 429         if (!*argc)
 430                 return 1;
 431
 432         if (!memcmp(&arg[pos], "psk", 3)) {
 433                 char psk_keybuf[32];
 434                 int cipher_suite, akm_suite;
 435
 436                 if (*argc < 4)
 437                         goto explain;
 438
 439                 pos+=3;
 440                 if (arg[pos] != ':')
 441                         goto explain;
 442                 pos++;
 443
 444                 NLA_PUT_U32(msg, NL80211_ATTR_WPA_VERSIONS, NL80211_WPA_VERSION_2);
 445
 446                 if (strlen(&arg[pos]) != (sizeof(psk_keybuf) * 2) || !hex2bin(&arg[pos], psk_keybuf)) {
 447                         printf("Bad PSK\n");
 448                         return -EINVAL;
 449                 }
 450
 451                 NLA_PUT(msg, NL80211_ATTR_PMK, 32, psk_keybuf);
 452                 NLA_PUT_U32(msg, NL80211_ATTR_AUTH_TYPE, NL80211_AUTHTYPE_OPEN_SYSTEM);
 453
 454                 *argv += 1;
 455                 *argc -= 1;
 456                 arg = **argv;
 457
 458                 akm_suite = parse_akm_suite(arg);
 459                 if (akm_suite < 0)
 460                         goto explain;
 461
 462                 NLA_PUT_U32(msg, NL80211_ATTR_AKM_SUITES, akm_suite);
 463
 464                 *argv += 1;
 465                 *argc -= 1;
 466                 arg = **argv;
 467
 468                 cipher_suite = parse_cipher_suite(arg);
 469                 if (cipher_suite < 0)
 470                         goto explain;
 471
 472                 NLA_PUT_U32(msg, NL80211_ATTR_CIPHER_SUITES_PAIRWISE, cipher_suite);
 473
 474                 *argv += 1;
 475                 *argc -= 1;
 476                 arg = **argv;
 477
 478                 cipher_suite = parse_cipher_suite(arg);
 479                 if (cipher_suite < 0)
 480                         goto explain;
 481
 482                 NLA_PUT_U32(msg, NL80211_ATTR_CIPHER_SUITE_GROUP, cipher_suite);
 483
 484                 *argv += 1;
 485                 *argc -= 1;
 486                 return 0;
 487         }
 488
 489         NLA_PUT_FLAG(msg, NL80211_ATTR_PRIVACY);
 490
 491         keys = nla_nest_start(msg, NL80211_ATTR_KEYS);
 492         if (!keys)
 493                 return -ENOBUFS;
 494
 495         do {
 496                 int keylen;
 497                 struct nlattr *key = nla_nest_start(msg, ++i);
 498                 char *keydata;
 499
 500                 arg = **argv;
 501                 pos = 0;
 502
 503                 if (!key)
 504                         return -ENOBUFS;
 505
 506                 if (arg[pos] == 'd') {
 507                         NLA_PUT_FLAG(msg, NL80211_KEY_DEFAULT);
 508                         pos++;
 509                         if (arg[pos] == ':')
 510                                 pos++;
 511                         have_default = true;
 512                 }
 513
 514                 if (!isdigit(arg[pos]))
 515                         goto explain;
 516                 NLA_PUT_U8(msg, NL80211_KEY_IDX, arg[pos++] - '0');
 517                 if (arg[pos++] != ':')
 518                         goto explain;
 519                 keydata = arg + pos;
 520                 switch (strlen(keydata)) {
 521                 case 10:
 522                         keydata = hex2bin(keydata, keybuf);
 523                         /* fall through */
 524                 case 5:
 525                         NLA_PUT_U32(msg, NL80211_KEY_CIPHER, 0x000FAC01);
 526                         keylen = 5;
 527                         break;
 528                 case 26:
 529                         keydata = hex2bin(keydata, keybuf);
 530                         /* fall through */
 531                 case 13:
 532                         NLA_PUT_U32(msg, NL80211_KEY_CIPHER, 0x000FAC05);
 533                         keylen = 13;
 534                         break;
 535                 default:
 536                         goto explain;
 537                 }
 538
 539                 if (!keydata)
 540                         goto explain;
 541
 542                 NLA_PUT(msg, NL80211_KEY_DATA, keylen, keydata);
 543
 544                 *argv += 1;
 545                 *argc -= 1;
 546
 547                 /* one key should be TX key */
 548                 if (!have_default && !*argc)
 549                         NLA_PUT_FLAG(msg, NL80211_KEY_DEFAULT);
 550
 551                 nla_nest_end(msg, key);
 552         } while (*argc);
 553
 554         nla_nest_end(msg, keys);
 555
 556         return 0;
 557  nla_put_failure:
 558         return -ENOBUFS;
 559  explain:
 560         fprintf(stderr, "key must be [d:]index:data where\n"
 561                         "  'd:'     means default (transmit) key\n"
 562                         "  'index:' is a single digit (0-3)\n"
 563                         "  'data'   must be 5 or 13 ascii chars\n"
 564                         "           or 10 or 26 hex digits\n"
 565                         "for example: d:2:6162636465 is the same as d:2:abcde\n"
 566                         "or psk:data <AKM Suite> <pairwise CIPHER> <groupwise CIPHER> where\n"
 567                         "  'data' is the PSK (output of wpa_passphrase and the CIPHER can be CCMP or GCMP\n"
 568                         "for example: psk:0123456789abcdef PSK CCMP CCMP\n"
 569                         "The allowed AKM suites are PSK, FT/PSK, PSK/SHA-256\n"
 570                         "The allowed Cipher suites are TKIP, CCMP, GCMP, GCMP-256, CCMP-256\n");
 571         return 2;
 572 }
 573
 574 enum nl80211_chan_width str_to_bw(const char *str)
 575 {
 576         static const struct {
 577                 const char *name;
 578                 unsigned int val;
 579         } bwmap[] = {
 580                 { .name = "5", .val = NL80211_CHAN_WIDTH_5, },
 581                 { .name = "10", .val = NL80211_CHAN_WIDTH_10, },
 582                 { .name = "20", .val = NL80211_CHAN_WIDTH_20, },
 583                 { .name = "40", .val = NL80211_CHAN_WIDTH_40, },
 584                 { .name = "80", .val = NL80211_CHAN_WIDTH_80, },
 585                 { .name = "80+80", .val = NL80211_CHAN_WIDTH_80P80, },
 586                 { .name = "160", .val = NL80211_CHAN_WIDTH_160, },
 587         };
 588         unsigned int i;
 589
 590         for (i = 0; i < ARRAY_SIZE(bwmap); i++) {
 591                 if (strcasecmp(bwmap[i].name, str) == 0)
 592                         return bwmap[i].val;
 593         }
 594
 595         return NL80211_CHAN_WIDTH_20_NOHT;
 596 }
 597
 598 static int parse_freqs(struct chandef *chandef, int argc, char **argv,
 599                        int *parsed)
 600 {
 601         uint32_t freq;
 602         char *end;
 603         bool need_cf1 = false, need_cf2 = false;
 604
 605         if (argc < 1)
 606                 return 0;
 607
 608         chandef->width = str_to_bw(argv[0]);
 609
 610         switch (chandef->width) {
 611         case NL80211_CHAN_WIDTH_20_NOHT:
 612                 /* First argument was not understood, give up gracefully. */
 613                 return 0;
 614         case NL80211_CHAN_WIDTH_20:
 615         case NL80211_CHAN_WIDTH_5:
 616         case NL80211_CHAN_WIDTH_10:
 617                 break;
 618         case NL80211_CHAN_WIDTH_80P80:
 619                 need_cf2 = true;
 620                 /* fall through */
 621         case NL80211_CHAN_WIDTH_40:
 622         case NL80211_CHAN_WIDTH_80:
 623         case NL80211_CHAN_WIDTH_160:
 624                 need_cf1 = true;
 625                 break;
 626         }
 627
 628         *parsed += 1;
 629
 630         if (!need_cf1)
 631                 return 0;
 632
 633         if (argc < 2)
 634                 return 1;
 635
 636         /* center freq 1 */
 637         if (!*argv[1])
 638                 return 1;
 639         freq = strtoul(argv[1], &end, 10);
 640         if (*end)
 641                 return 1;
 642         *parsed += 1;
 643
 644         chandef->center_freq1 = freq;
 645
 646         if (!need_cf2)
 647                 return 0;
 648
 649         if (argc < 3)
 650                 return 1;
 651
 652         /* center freq 2 */
 653         if (!*argv[2])
 654                 return 1;
 655         freq = strtoul(argv[2], &end, 10);
 656         if (*end)
 657                 return 1;
 658         chandef->center_freq2 = freq;
 659
 660         *parsed += 1;
 661
 662         return 0;
 663 }
 664
 665
 666 /**
 667  * parse_freqchan - Parse frequency or channel definition
 668  *
 669  * @chandef: chandef structure to be filled in
 670  * @chan: Boolean whether to parse a channel or frequency based specifier
 671  * @argc: Number of arguments
 672  * @argv: Array of string arguments
 673  * @parsed: Pointer to return the number of used arguments, or NULL to error
 674  *          out if any argument is left unused.
 675  *
 676  * The given chandef structure will be filled in from the command line
 677  * arguments. argc/argv will be updated so that further arguments from the
 678  * command line can be parsed.
 679  *
 680  * Note that despite the fact that the function knows how many center freqs
 681  * are needed, there's an ambiguity if the next argument after this is an
 682  * integer argument, since the valid channel width values are interpreted
 683  * as such, rather than a following argument. This can be avoided by the
 684  * user by giving "NOHT" instead.
 685  *
 686  * The working specifier if chan is set are:
 687  *   <channel> [NOHT|HT20|HT40+|HT40-|5MHz|10MHz|80MHz]
 688  *
 689  * And if frequency is set:
 690  *   <freq> [NOHT|HT20|HT40+|HT40-|5MHz|10MHz|80MHz]
 691  *   <control freq> [5|10|20|40|80|80+80|160] [<center1_freq> [<center2_freq>]]
 692  *
 693  * If the mode/channel width is not given the NOHT is assumed.
 694  *
 695  * Return: Number of used arguments, zero or negative error number otherwise
 696  */
 697 int parse_freqchan(struct chandef *chandef, bool chan, int argc, char **argv,
 698                    int *parsed)
 699 {
 700         char *end;
 701         static const struct chanmode chanmode[] = {
 702                 { .name = "HT20",
 703                   .width = NL80211_CHAN_WIDTH_20,
 704                   .freq1_diff = 0,
 705                   .chantype = NL80211_CHAN_HT20 },
 706                 { .name = "HT40+",
 707                   .width = NL80211_CHAN_WIDTH_40,
 708                   .freq1_diff = 10,
 709                   .chantype = NL80211_CHAN_HT40PLUS },
 710                 { .name = "HT40-",
 711                   .width = NL80211_CHAN_WIDTH_40,
 712                   .freq1_diff = -10,
 713                   .chantype = NL80211_CHAN_HT40MINUS },
 714                 { .name = "NOHT",
 715                   .width = NL80211_CHAN_WIDTH_20_NOHT,
 716                   .freq1_diff = 0,
 717                   .chantype = NL80211_CHAN_NO_HT },
 718                 { .name = "5MHz",
 719                   .width = NL80211_CHAN_WIDTH_5,
 720                   .freq1_diff = 0,
 721                   .chantype = -1 },
 722                 { .name = "10MHz",
 723                   .width = NL80211_CHAN_WIDTH_10,
 724                   .freq1_diff = 0,
 725                   .chantype = -1 },
 726                 { .name = "80MHz",
 727                   .width = NL80211_CHAN_WIDTH_80,
 728                   .freq1_diff = 0,
 729                   .chantype = -1 },
 730         };
 731         const struct chanmode *chanmode_selected = NULL;
 732         unsigned int freq;
 733         unsigned int i;
 734         int _parsed = 0;
 735         int res = 0;
 736
 737         if (argc < 1)
 738                 return 1;
 739
 740         if (!argv[0])
 741                 goto out;
 742         freq = strtoul(argv[0], &end, 10);
 743         if (*end) {
 744                 res = 1;
 745                 goto out;
 746         }
 747
 748         _parsed += 1;
 749
 750         memset(chandef, 0, sizeof(struct chandef));
 751
 752         if (chan) {
 753                 enum nl80211_band band;
 754
 755                 band = freq <= 14 ? NL80211_BAND_2GHZ : NL80211_BAND_5GHZ;
 756                 freq = ieee80211_channel_to_frequency(freq, band);
 757         }
 758         chandef->control_freq = freq;
 759         /* Assume 20MHz NOHT channel for now. */
 760         chandef->center_freq1 = freq;
 761
 762         /* Try to parse HT mode definitions */
 763         if (argc > 1) {
 764                 for (i = 0; i < ARRAY_SIZE(chanmode); i++) {
 765                         if (strcasecmp(chanmode[i].name, argv[1]) == 0) {
 766                                 chanmode_selected = &chanmode[i];
 767                                 _parsed += 1;
 768                                 break;
 769                         }
 770                 }
 771         }
 772
 773         /* channel mode given, use it and return. */
 774         if (chanmode_selected) {
 775                 chandef->center_freq1 = get_cf1(chanmode_selected, freq);
 776                 chandef->width = chanmode_selected->width;
 777                 goto out;
 778         }
 779
 780         /* This was a only a channel definition, nothing further may follow. */
 781         if (chan)
 782                 goto out;
 783
 784         res = parse_freqs(chandef, argc - 1, argv + 1, &_parsed);
 785
 786  out:
 787         /* Error out if parsed is NULL. */
 788         if (!parsed && _parsed != argc)
 789                 return 1;
 790
 791         if (parsed)
 792                 *parsed = _parsed;
 793
 794         return res;
 795 }
 796
 797 int put_chandef(struct nl_msg *msg, struct chandef *chandef)
 798 {
 799         NLA_PUT_U32(msg, NL80211_ATTR_WIPHY_FREQ, chandef->control_freq);
 800         NLA_PUT_U32(msg, NL80211_ATTR_CHANNEL_WIDTH, chandef->width);
 801
 802         switch (chandef->width) {
 803         case NL80211_CHAN_WIDTH_20_NOHT:
 804                 NLA_PUT_U32(msg,
 805                             NL80211_ATTR_WIPHY_CHANNEL_TYPE,
 806                             NL80211_CHAN_NO_HT);
 807                 break;
 808         case NL80211_CHAN_WIDTH_20:
 809                 NLA_PUT_U32(msg,
 810                             NL80211_ATTR_WIPHY_CHANNEL_TYPE,
 811                             NL80211_CHAN_HT20);
 812                 break;
 813         case NL80211_CHAN_WIDTH_40:
 814                 if (chandef->control_freq > chandef->center_freq1)
 815                         NLA_PUT_U32(msg,
 816                                     NL80211_ATTR_WIPHY_CHANNEL_TYPE,
 817                                     NL80211_CHAN_HT40MINUS);
 818                 else
 819                         NLA_PUT_U32(msg,
 820                                     NL80211_ATTR_WIPHY_CHANNEL_TYPE,
 821                                     NL80211_CHAN_HT40PLUS);
 822                 break;
 823         default:
 824                 break;
 825         }
 826
 827         if (chandef->center_freq1)
 828                 NLA_PUT_U32(msg,
 829                             NL80211_ATTR_CENTER_FREQ1,
 830                             chandef->center_freq1);
 831
 832         if (chandef->center_freq2)
 833                 NLA_PUT_U32(msg,
 834                             NL80211_ATTR_CENTER_FREQ2,
 835                             chandef->center_freq2);
 836
 837         return 0;
 838
 839  nla_put_failure:
 840         return -ENOBUFS;
 841 }
 842
 843 static void print_mcs_index(const __u8 *mcs)
 844 {
 845         int mcs_bit, prev_bit = -2, prev_cont = 0;
 846
 847         for (mcs_bit = 0; mcs_bit <= 76; mcs_bit++) {
 848                 unsigned int mcs_octet = mcs_bit/8;
 849                 unsigned int MCS_RATE_BIT = 1 << mcs_bit % 8;
 850                 bool mcs_rate_idx_set;
 851
 852                 mcs_rate_idx_set = !!(mcs[mcs_octet] & MCS_RATE_BIT);
 853
 854                 if (!mcs_rate_idx_set)
 855                         continue;
 856
 857                 if (prev_bit != mcs_bit - 1) {
 858                         if (prev_bit != -2)
 859                                 printf("%d, ", prev_bit);
 860                         else
 861                                 printf(" ");
 862                         printf("%d", mcs_bit);
 863                         prev_cont = 0;
 864                 } else if (!prev_cont) {
 865                         printf("-");
 866                         prev_cont = 1;
 867                 }
 868
 869                 prev_bit = mcs_bit;
 870         }
 871
 872         if (prev_cont)
 873                 printf("%d", prev_bit);
 874         printf("\n");
 875 }
 876
 877 /*
 878  * There are only 4 possible values, we just use a case instead of computing it,
 879  * but technically this can also be computed through the formula:
 880  *
 881  * Max AMPDU length = (2 ^ (13 + exponent)) - 1 bytes
 882  */
 883 static __u32 compute_ampdu_length(__u8 exponent)
 884 {
 885         switch (exponent) {
 886         case 0: return 8191;  /* (2 ^(13 + 0)) -1 */
 887         case 1: return 16383; /* (2 ^(13 + 1)) -1 */
 888         case 2: return 32767; /* (2 ^(13 + 2)) -1 */
 889         case 3: return 65535; /* (2 ^(13 + 3)) -1 */
 890         default: return 0;
 891         }
 892 }
 893
 894 static const char *print_ampdu_space(__u8 space)
 895 {
 896         switch (space) {
 897         case 0: return "No restriction";
 898         case 1: return "1/4 usec";
 899         case 2: return "1/2 usec";
 900         case 3: return "1 usec";
 901         case 4: return "2 usec";
 902         case 5: return "4 usec";
 903         case 6: return "8 usec";
 904         case 7: return "16 usec";
 905         default:
 906                 return "BUG (spacing more than 3 bits!)";
 907         }
 908 }
 909
 910 void print_ampdu_length(__u8 exponent)
 911 {
 912         __u32 max_ampdu_length;
 913
 914         max_ampdu_length = compute_ampdu_length(exponent);
 915
 916         if (max_ampdu_length) {
 917                 printf("\t\tMaximum RX AMPDU length %d bytes (exponent: 0x0%02x)\n",
 918                        max_ampdu_length, exponent);
 919         } else {
 920                 printf("\t\tMaximum RX AMPDU length: unrecognized bytes "
 921                        "(exponent: %d)\n", exponent);
 922         }
 923 }
 924
 925 void print_ampdu_spacing(__u8 spacing)
 926 {
 927         printf("\t\tMinimum RX AMPDU time spacing: %s (0x%02x)\n",
 928                print_ampdu_space(spacing), spacing);
 929 }
 930
 931 void print_ht_capability(__u16 cap)
 932 {
 933 #define PRINT_HT_CAP(_cond, _str) \
 934         do { \
 935                 if (_cond) \
 936                         printf("\t\t\t" _str "\n"); \
 937         } while (0)
 938
 939         printf("\t\tCapabilities: 0x%02x\n", cap);
 940
 941         PRINT_HT_CAP((cap & BIT(0)), "RX LDPC");
 942         PRINT_HT_CAP((cap & BIT(1)), "HT20/HT40");
 943         PRINT_HT_CAP(!(cap & BIT(1)), "HT20");
 944
 945         PRINT_HT_CAP(((cap >> 2) & 0x3) == 0, "Static SM Power Save");
 946         PRINT_HT_CAP(((cap >> 2) & 0x3) == 1, "Dynamic SM Power Save");
 947         PRINT_HT_CAP(((cap >> 2) & 0x3) == 3, "SM Power Save disabled");
 948
 949         PRINT_HT_CAP((cap & BIT(4)), "RX Greenfield");
 950         PRINT_HT_CAP((cap & BIT(5)), "RX HT20 SGI");
 951         PRINT_HT_CAP((cap & BIT(6)), "RX HT40 SGI");
 952         PRINT_HT_CAP((cap & BIT(7)), "TX STBC");
 953
 954         PRINT_HT_CAP(((cap >> 8) & 0x3) == 0, "No RX STBC");
 955         PRINT_HT_CAP(((cap >> 8) & 0x3) == 1, "RX STBC 1-stream");
 956         PRINT_HT_CAP(((cap >> 8) & 0x3) == 2, "RX STBC 2-streams");
 957         PRINT_HT_CAP(((cap >> 8) & 0x3) == 3, "RX STBC 3-streams");
 958
 959         PRINT_HT_CAP((cap & BIT(10)), "HT Delayed Block Ack");
 960
 961         PRINT_HT_CAP(!(cap & BIT(11)), "Max AMSDU length: 3839 bytes");
 962         PRINT_HT_CAP((cap & BIT(11)), "Max AMSDU length: 7935 bytes");
 963
 964         /*
 965          * For beacons and probe response this would mean the BSS
 966          * does or does not allow the usage of DSSS/CCK HT40.
 967          * Otherwise it means the STA does or does not use
 968          * DSSS/CCK HT40.
 969          */
 970         PRINT_HT_CAP((cap & BIT(12)), "DSSS/CCK HT40");
 971         PRINT_HT_CAP(!(cap & BIT(12)), "No DSSS/CCK HT40");
 972
 973         /* BIT(13) is reserved */
 974
 975         PRINT_HT_CAP((cap & BIT(14)), "40 MHz Intolerant");
 976
 977         PRINT_HT_CAP((cap & BIT(15)), "L-SIG TXOP protection");
 978 #undef PRINT_HT_CAP
 979 }
 980
 981 void print_ht_mcs(const __u8 *mcs)
 982 {
 983         /* As defined in 7.3.2.57.4 Supported MCS Set field */
 984         unsigned int tx_max_num_spatial_streams, max_rx_supp_data_rate;
 985         bool tx_mcs_set_defined, tx_mcs_set_equal, tx_unequal_modulation;
 986
 987         max_rx_supp_data_rate = (mcs[10] | ((mcs[11] & 0x3) << 8));
 988         tx_mcs_set_defined = !!(mcs[12] & (1 << 0));
 989         tx_mcs_set_equal = !(mcs[12] & (1 << 1));
 990         tx_max_num_spatial_streams = ((mcs[12] >> 2) & 3) + 1;
 991         tx_unequal_modulation = !!(mcs[12] & (1 << 4));
 992
 993         if (max_rx_supp_data_rate)
 994                 printf("\t\tHT Max RX data rate: %d Mbps\n", max_rx_supp_data_rate);
 995         /* XXX: else see 9.6.0e.5.3 how to get this I think */
 996
 997         if (tx_mcs_set_defined) {
 998                 if (tx_mcs_set_equal) {
 999                         printf("\t\tHT TX/RX MCS rate indexes supported:");
1000                         print_mcs_index(mcs);
1001                 } else {
1002                         printf("\t\tHT RX MCS rate indexes supported:");
1003                         print_mcs_index(mcs);
1004
1005                         if (tx_unequal_modulation)
1006                                 printf("\t\tTX unequal modulation supported\n");
1007                         else
1008                                 printf("\t\tTX unequal modulation not supported\n");
1009
1010                         printf("\t\tHT TX Max spatial streams: %d\n",
1011                                 tx_max_num_spatial_streams);
1012
1013                         printf("\t\tHT TX MCS rate indexes supported may differ\n");
1014                 }
1015         } else {
1016                 printf("\t\tHT RX MCS rate indexes supported:");
1017                 print_mcs_index(mcs);
1018                 printf("\t\tHT TX MCS rate indexes are undefined\n");
1019         }
1020 }
1021
1022 void print_vht_info(__u32 capa, const __u8 *mcs)
1023 {
1024         __u16 tmp;
1025         int i;
1026
1027         printf("\t\tVHT Capabilities (0x%.8x):\n", capa);
1028
1029 #define PRINT_VHT_CAPA(_bit, _str) \
1030         do { \
1031                 if (capa & BIT(_bit)) \
1032                         printf("\t\t\t" _str "\n"); \
1033         } while (0)
1034
1035         printf("\t\t\tMax MPDU length: ");
1036         switch (capa & 3) {
1037         case 0: printf("3895\n"); break;
1038         case 1: printf("7991\n"); break;
1039         case 2: printf("11454\n"); break;
1040         case 3: printf("(reserved)\n");
1041         }
1042         printf("\t\t\tSupported Channel Width: ");
1043         switch ((capa >> 2) & 3) {
1044         case 0: printf("neither 160 nor 80+80\n"); break;
1045         case 1: printf("160 MHz\n"); break;
1046         case 2: printf("160 MHz, 80+80 MHz\n"); break;
1047         case 3: printf("(reserved)\n");
1048         }
1049         PRINT_VHT_CAPA(4, "RX LDPC");
1050         PRINT_VHT_CAPA(5, "short GI (80 MHz)");
1051         PRINT_VHT_CAPA(6, "short GI (160/80+80 MHz)");
1052         PRINT_VHT_CAPA(7, "TX STBC");
1053         /* RX STBC */
1054         PRINT_VHT_CAPA(11, "SU Beamformer");
1055         PRINT_VHT_CAPA(12, "SU Beamformee");
1056         /* compressed steering */
1057         /* # of sounding dimensions */
1058         PRINT_VHT_CAPA(19, "MU Beamformer");
1059         PRINT_VHT_CAPA(20, "MU Beamformee");
1060         PRINT_VHT_CAPA(21, "VHT TXOP PS");
1061         PRINT_VHT_CAPA(22, "+HTC-VHT");
1062         /* max A-MPDU */
1063         /* VHT link adaptation */
1064         PRINT_VHT_CAPA(28, "RX antenna pattern consistency");
1065         PRINT_VHT_CAPA(29, "TX antenna pattern consistency");
1066
1067         printf("\t\tVHT RX MCS set:\n");
1068         tmp = mcs[0] | (mcs[1] << 8);
1069         for (i = 1; i <= 8; i++) {
1070                 printf("\t\t\t%d streams: ", i);
1071                 switch ((tmp >> ((i-1)*2) ) & 3) {
1072                 case 0: printf("MCS 0-7\n"); break;
1073                 case 1: printf("MCS 0-8\n"); break;
1074                 case 2: printf("MCS 0-9\n"); break;
1075                 case 3: printf("not supported\n"); break;
1076                 }
1077         }
1078         tmp = mcs[2] | (mcs[3] << 8);
1079         printf("\t\tVHT RX highest supported: %d Mbps\n", tmp & 0x1fff);
1080
1081         printf("\t\tVHT TX MCS set:\n");
1082         tmp = mcs[4] | (mcs[5] << 8);
1083         for (i = 1; i <= 8; i++) {
1084                 printf("\t\t\t%d streams: ", i);
1085                 switch ((tmp >> ((i-1)*2) ) & 3) {
1086                 case 0: printf("MCS 0-7\n"); break;
1087                 case 1: printf("MCS 0-8\n"); break;
1088                 case 2: printf("MCS 0-9\n"); break;
1089                 case 3: printf("not supported\n"); break;
1090                 }
1091         }
1092         tmp = mcs[6] | (mcs[7] << 8);
1093         printf("\t\tVHT TX highest supported: %d Mbps\n", tmp & 0x1fff);
1094 }
1095
1096 void iw_hexdump(const char *prefix, const __u8 *buf, size_t size)
1097 {
1098         size_t i;
1099
1100         printf("%s: ", prefix);
1101         for (i = 0; i < size; i++) {
1102                 if (i && i % 16 == 0)
1103                         printf("\n%s: ", prefix);
1104                 printf("%02x ", buf[i]);
1105         }
1106         printf("\n\n");
1107 }
1108
1109 int get_cf1(const struct chanmode *chanmode, unsigned long freq)
1110 {
1111         unsigned int cf1 = freq, j;
1112         unsigned int vht80[] = { 5180, 5260, 5500, 5580, 5660, 5745 };
1113
1114         switch (chanmode->width) {
1115         case NL80211_CHAN_WIDTH_80:
1116                 /* setup center_freq1 */
1117                 for (j = 0; j < ARRAY_SIZE(vht80); j++) {
1118                         if (freq >= vht80[j] && freq < vht80[j] + 80)
1119                                 break;
1120                 }
1121
1122                 if (j == ARRAY_SIZE(vht80))
1123                         break;
1124
1125                 cf1 = vht80[j] + 30;
1126                 break;
1127         default:
1128                 cf1 = freq + chanmode->freq1_diff;
1129                 break;
1130         }
1131
1132         return cf1;
1133 }