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, 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 static const char *ifmodes[NL80211_IFTYPE_MAX + 1] = {
  52         "unspecified",
  53         "IBSS",
  54         "managed",
  55         "AP",
  56         "AP/VLAN",
  57         "WDS",
  58         "monitor",
  59         "mesh point"
  60 };
  61
  62 static char modebuf[100];
  63
  64 const char *iftype_name(enum nl80211_iftype iftype)
  65 {
  66         if (iftype <= NL80211_IFTYPE_MAX)
  67                 return ifmodes[iftype];
  68         sprintf(modebuf, "Unknown mode (%d)", iftype);
  69         return modebuf;
  70 }
  71
  72 static const char *commands[NL80211_CMD_MAX + 1] = {
  73         "unspecified",
  74         "get_wiphy",
  75         "set_wiphy",
  76         "new_wiphy",
  77         "del_wiphy",
  78         "get_interface",
  79         "set_interface",
  80         "new_interface",
  81         "del_interface",
  82         "get_key",
  83         "set_key",
  84         "new_key",
  85         "del_key",
  86         "get_beacon",
  87         "set_beacon",
  88         "new_beacon",
  89         "del_beacon",
  90         "get_station",
  91         "set_station",
  92         "new_station",
  93         "del_station",
  94         "get_mpath",
  95         "set_mpath",
  96         "new_mpath",
  97         "del_mpath",
  98         "set_bss",
  99         "set_reg",
 100         "reg_set_reg",
 101         "get_mesh_params",
 102         "set_mesh_params",
 103         "set_mgmt_extra_ie",
 104         "get_reg",
 105         "get_scan",
 106         "trigger_scan",
 107         "new_scan_results",
 108         "scan_aborted",
 109         "reg_change",
 110         "authenticate",
 111         "associate",
 112         "deauthenticate",
 113         "disassociate",
 114         "michael_mic_failure",
 115         "reg_beacon_hint",
 116         "join_ibss",
 117         "leave_ibss",
 118         "testmode",
 119         "connect",
 120         "roam",
 121         "disconnect",
 122         "set_wiphy_netns"
 123 };
 124
 125 static char cmdbuf[100];
 126
 127 const char *command_name(enum nl80211_commands cmd)
 128 {
 129         if (cmd <= NL80211_CMD_MAX)
 130                 return commands[cmd];
 131         sprintf(cmdbuf, "Unknown command (%d)", cmd);
 132         return cmdbuf;
 133 }
 134
 135 int ieee80211_channel_to_frequency(int chan)
 136 {
 137         if (chan < 14)
 138                 return 2407 + chan * 5;
 139
 140         if (chan == 14)
 141                 return 2484;
 142
 143         /* FIXME: dot11ChannelStartingFactor (802.11-2007 17.3.8.3.2) */
 144         return (chan + 1000) * 5;
 145 }
 146
 147 int ieee80211_frequency_to_channel(int freq)
 148 {
 149         if (freq == 2484)
 150                 return 14;
 151
 152         if (freq < 2484)
 153                 return (freq - 2407) / 5;
 154
 155         /* FIXME: dot11ChannelStartingFactor (802.11-2007 17.3.8.3.2) */
 156         return freq/5 - 1000;
 157 }
 158
 159 void print_ssid_escaped(const uint8_t len, const uint8_t *data)
 160 {
 161         int i;
 162
 163         for (i = 0; i < len; i++) {
 164                 if (isprint(data[i]))
 165                         printf("%c", data[i]);
 166                 else
 167                         printf("\\x%.2x", data[i]);
 168         }
 169 }
 170
 171 static int hex2num(char digit)
 172 {
 173         if (!isxdigit(digit))
 174                 return -1;
 175         if (isdigit(digit))
 176                 return digit - '0';
 177         return tolower(digit) - 'a' + 10;
 178 }
 179
 180 static int hex2byte(char *hex)
 181 {
 182         int d1, d2;
 183
 184         d1 = hex2num(hex[0]);
 185         if (d1 < 0)
 186                 return -1;
 187         d2 = hex2num(hex[1]);
 188         if (d2 < 0)
 189                 return -1;
 190         return (d1 << 4) | d2;
 191 }
 192
 193 static char *hex2bin(char *hex, char *buf)
 194 {
 195         char *result = buf;
 196         int d;
 197
 198         while (hex[0]) {
 199                 d = hex2byte(hex);
 200                 if (d < 0)
 201                         return NULL;
 202                 buf[0] = d;
 203                 buf++;
 204                 hex += 2;
 205         }
 206
 207         return result;
 208 }
 209
 210 int parse_keys(struct nl_msg *msg, char **argv, int argc)
 211 {
 212         struct nlattr *keys;
 213         int i = 0;
 214         bool have_default = false;
 215         char keybuf[13];
 216
 217         if (!argc)
 218                 return 1;
 219
 220         NLA_PUT_FLAG(msg, NL80211_ATTR_PRIVACY);
 221
 222         keys = nla_nest_start(msg, NL80211_ATTR_KEYS);
 223         if (!keys)
 224                 return -ENOBUFS;
 225
 226         do {
 227                 char *arg = *argv;
 228                 int pos = 0, keylen;
 229                 struct nlattr *key = nla_nest_start(msg, ++i);
 230                 char *keydata;
 231
 232                 if (!key)
 233                         return -ENOBUFS;
 234
 235                 if (arg[pos] == 'd') {
 236                         NLA_PUT_FLAG(msg, NL80211_KEY_DEFAULT);
 237                         pos++;
 238                         if (arg[pos] == ':')
 239                                 pos++;
 240                         have_default = true;
 241                 }
 242
 243                 if (!isdigit(arg[pos]))
 244                         goto explain;
 245                 NLA_PUT_U8(msg, NL80211_KEY_IDX, arg[pos++] - '0');
 246                 if (arg[pos++] != ':')
 247                         goto explain;
 248                 keydata = arg + pos;
 249                 switch (strlen(keydata)) {
 250                 case 10:
 251                         keydata = hex2bin(keydata, keybuf);
 252                 case 5:
 253                         NLA_PUT_U32(msg, NL80211_KEY_CIPHER, 0x000FAC01);
 254                         keylen = 5;
 255                         break;
 256                 case 26:
 257                         keydata = hex2bin(keydata, keybuf);
 258                 case 13:
 259                         NLA_PUT_U32(msg, NL80211_KEY_CIPHER, 0x000FAC05);
 260                         keylen = 13;
 261                         break;
 262                 default:
 263                         goto explain;
 264                 }
 265
 266                 if (!keydata)
 267                         goto explain;
 268
 269                 NLA_PUT(msg, NL80211_KEY_DATA, keylen, keydata);
 270
 271                 argv++;
 272                 argc--;
 273
 274                 /* one key should be TX key */
 275                 if (!have_default && !argc)
 276                         NLA_PUT_FLAG(msg, NL80211_KEY_DEFAULT);
 277
 278                 nla_nest_end(msg, key);
 279         } while (argc);
 280
 281         nla_nest_end(msg, keys);
 282
 283         return 0;
 284  nla_put_failure:
 285         return -ENOBUFS;
 286  explain:
 287         fprintf(stderr, "key must be [d:]index:data where\n"
 288                         "  'd:'     means default (transmit) key\n"
 289                         "  'index:' is a single digit (0-3)\n"
 290                         "  'data'   must be 5 or 13 ascii chars\n"
 291                         "           or 10 or 26 hex digits\n"
 292                         "for example: d:2:6162636465 is the same as d:2:abcde\n");
 293         return 2;
 294 }
 295
 296 static void print_mcs_index(const __u8 *mcs)
 297 {
 298         unsigned int mcs_bit, prev_bit = -2, prev_cont = 0;
 299
 300         for (mcs_bit = 0; mcs_bit <= 76; mcs_bit++) {
 301                 unsigned int mcs_octet = mcs_bit/8;
 302                 unsigned int MCS_RATE_BIT = 1 << mcs_bit % 8;
 303                 bool mcs_rate_idx_set;
 304
 305                 mcs_rate_idx_set = !!(mcs[mcs_octet] & MCS_RATE_BIT);
 306
 307                 if (!mcs_rate_idx_set)
 308                         continue;
 309
 310                 if (prev_bit != mcs_bit - 1) {
 311                         if (prev_bit != -2)
 312                                 printf("%d, ", prev_bit);
 313                         else
 314                                 printf(" ");
 315                         printf("%d", mcs_bit);
 316                         prev_cont = 0;
 317                 } else if (!prev_cont) {
 318                         printf("-");
 319                         prev_cont = 1;
 320                 }
 321
 322                 prev_bit = mcs_bit;
 323         }
 324
 325         if (prev_cont)
 326                 printf("%d", prev_bit);
 327         printf("\n");
 328 }
 329
 330 /*
 331  * There are only 4 possible values, we just use a case instead of computing it,
 332  * but technically this can also be computed through the formula:
 333  *
 334  * Max AMPDU length = (2 ^ (13 + exponent)) - 1 bytes
 335  */
 336 static __u32 compute_ampdu_length(__u8 exponent)
 337 {
 338         switch (exponent) {
 339         case 0: return 8191;  /* (2 ^(13 + 0)) -1 */
 340         case 1: return 16383; /* (2 ^(13 + 1)) -1 */
 341         case 2: return 32767; /* (2 ^(13 + 2)) -1 */
 342         case 3: return 65535; /* (2 ^(13 + 3)) -1 */
 343         default: return 0;
 344         }
 345 }
 346
 347 static const char *print_ampdu_space(__u8 space)
 348 {
 349         switch (space) {
 350         case 0: return "No restriction";
 351         case 1: return "1/4 usec";
 352         case 2: return "1/2 usec";
 353         case 3: return "1 usec";
 354         case 4: return "2 usec";
 355         case 5: return "4 usec";
 356         case 6: return "8 usec";
 357         case 7: return "16 usec";
 358         default:
 359                 return "BUG (spacing more than 3 bits!)";
 360         }
 361 }
 362
 363 void print_ampdu_length(__u8 exponent)
 364 {
 365         __u32 max_ampdu_length;
 366
 367         max_ampdu_length = compute_ampdu_length(exponent);
 368
 369         if (max_ampdu_length) {
 370                 printf("\t\tMaximum RX AMPDU length %d bytes (exponent: 0x0%02x)\n",
 371                        max_ampdu_length, exponent);
 372         } else {
 373                 printf("\t\tMaximum RX AMPDU length: unrecognized bytes "
 374                        "(exponent: %d)\n", exponent);
 375         }
 376 }
 377
 378 void print_ampdu_spacing(__u8 spacing)
 379 {
 380         printf("\t\tMinimum RX AMPDU time spacing: %s (0x%02x)\n",
 381                print_ampdu_space(spacing), spacing);
 382 }
 383
 384 void print_ht_capability(__u16 cap)
 385 {
 386 #define PRINT_HT_CAP(_cond, _str) \
 387         do { \
 388                 if (_cond) \
 389                         printf("\t\t\t" _str "\n"); \
 390         } while (0)
 391
 392         printf("\t\tCapabilities: 0x%02x\n", cap);
 393
 394         PRINT_HT_CAP((cap & BIT(0)), "RX LDCP");
 395         PRINT_HT_CAP((cap & BIT(1)), "HT20/HT40");
 396         PRINT_HT_CAP(!(cap & BIT(1)), "HT20");
 397
 398         PRINT_HT_CAP(((cap >> 2) & 0x3) == 0, "Static SM Power Save");
 399         PRINT_HT_CAP(((cap >> 2) & 0x3) == 1, "Dynamic SM Power Save");
 400         PRINT_HT_CAP(((cap >> 2) & 0x3) == 3, "SM Power Save disabled");
 401
 402         PRINT_HT_CAP((cap & BIT(4)), "RX Greenfield");
 403         PRINT_HT_CAP((cap & BIT(5)), "RX HT20 SGI");
 404         PRINT_HT_CAP((cap & BIT(6)), "RX HT40 SGI");
 405         PRINT_HT_CAP((cap & BIT(7)), "TX STBC");
 406
 407         PRINT_HT_CAP(((cap >> 8) & 0x3) == 0, "No RX STBC");
 408         PRINT_HT_CAP(((cap >> 8) & 0x3) == 1, "RX STBC 1-stream");
 409         PRINT_HT_CAP(((cap >> 8) & 0x3) == 2, "RX STBC 2-streams");
 410         PRINT_HT_CAP(((cap >> 8) & 0x3) == 3, "RX STBC 3-streams");
 411
 412         PRINT_HT_CAP((cap & BIT(10)), "HT Delayed Block Ack");
 413
 414         PRINT_HT_CAP((cap & BIT(11)), "Max AMSDU length: 3839 bytes");
 415         PRINT_HT_CAP(!(cap & BIT(11)), "Max AMSDU length: 7935 bytes");
 416
 417         /*
 418          * For beacons and probe response this would mean the BSS
 419          * does or does not allow the usage of DSSS/CCK HT40.
 420          * Otherwise it means the STA does or does not use
 421          * DSSS/CCK HT40.
 422          */
 423         PRINT_HT_CAP((cap & BIT(12)), "DSSS/CCK HT40");
 424         PRINT_HT_CAP(!(cap & BIT(12)), "No DSSS/CCK HT40");
 425
 426         /* BIT(13) is reserved */
 427
 428         PRINT_HT_CAP((cap & BIT(14)), "40 MHz Intolerant");
 429
 430         PRINT_HT_CAP((cap & BIT(15)), "L-SIG TXOP protection");
 431 #undef PRINT_HT_CAP
 432 }
 433
 434 void print_ht_mcs(const __u8 *mcs)
 435 {
 436         /* As defined in 7.3.2.57.4 Supported MCS Set field */
 437         unsigned int tx_max_num_spatial_streams, max_rx_supp_data_rate;
 438         bool tx_mcs_set_defined, tx_mcs_set_equal, tx_unequal_modulation;
 439
 440         max_rx_supp_data_rate = ((mcs[10] >> 8) & ((mcs[11] & 0x3) << 8));
 441         tx_mcs_set_defined = !!(mcs[12] & (1 << 0));
 442         tx_mcs_set_equal = !(mcs[12] & (1 << 1));
 443         tx_max_num_spatial_streams = ((mcs[12] >> 2) & 3) + 1;
 444         tx_unequal_modulation = !!(mcs[12] & (1 << 4));
 445
 446         if (max_rx_supp_data_rate)
 447                 printf("\t\tHT Max RX data rate: %d Mbps\n", max_rx_supp_data_rate);
 448         /* XXX: else see 9.6.0e.5.3 how to get this I think */
 449
 450         if (tx_mcs_set_defined) {
 451                 if (tx_mcs_set_equal) {
 452                         printf("\t\tHT TX/RX MCS rate indexes supported:");
 453                         print_mcs_index(mcs);
 454                 } else {
 455                         printf("\t\tHT RX MCS rate indexes supported:");
 456                         print_mcs_index(mcs);
 457
 458                         if (tx_unequal_modulation)
 459                                 printf("\t\tTX unequal modulation supported\n");
 460                         else
 461                                 printf("\t\tTX unequal modulation not supported\n");
 462
 463                         printf("\t\tHT TX Max spatial streams: %d\n",
 464                                 tx_max_num_spatial_streams);
 465
 466                         printf("\t\tHT TX MCS rate indexes supported may differ\n");
 467                 }
 468         } else {
 469                 printf("\t\tHT RX MCS rate indexes supported:");
 470                 print_mcs_index(mcs);
 471                 printf("\t\tHT TX MCS rates indexes are undefined\n");
 472         }
 473 }