git.sur5r.net Git - i3/i3status/blob - src/print_wireless_info.c

   1 // vim:ts=4:sw=4:expandtab
   2 #include <stdio.h>
   3 #include <string.h>
   4 #include <yajl/yajl_gen.h>
   5 #include <yajl/yajl_version.h>
   6
   7 #ifdef LINUX
   8 #include <errno.h>
   9 #include <net/if.h>
  10 #include <netlink/netlink.h>
  11 #include <netlink/genl/genl.h>
  12 #include <netlink/genl/ctrl.h>
  13 #include <linux/nl80211.h>
  14 #include <linux/if_ether.h>
  15 #define IW_ESSID_MAX_SIZE 32
  16 #endif
  17
  18 #ifdef __FreeBSD__
  19 #include <sys/param.h>
  20 #include <sys/ioctl.h>
  21 #include <sys/socket.h>
  22 #include <ifaddrs.h>
  23 #include <net/if.h>
  24 #include <net/if_media.h>
  25 #include <net80211/ieee80211.h>
  26 #include <net80211/ieee80211_ioctl.h>
  27 #include <unistd.h>
  28 #define IW_ESSID_MAX_SIZE IEEE80211_NWID_LEN
  29 #endif
  30
  31 #ifdef __DragonFly__
  32 #include <sys/param.h>
  33 #include <sys/ioctl.h>
  34 #include <sys/socket.h>
  35 #include <ifaddrs.h>
  36 #include <net/if.h>
  37 #include <net/if_media.h>
  38 #include <netproto/802_11/ieee80211.h>
  39 #include <netproto/802_11/ieee80211_ioctl.h>
  40 #include <unistd.h>
  41 #define IW_ESSID_MAX_SIZE IEEE80211_NWID_LEN
  42 #endif
  43
  44 #ifdef __OpenBSD__
  45 #include <sys/ioctl.h>
  46 #include <sys/socket.h>
  47 #include <net/if.h>
  48 #include <sys/types.h>
  49 #include <netinet/in.h>
  50 #include <netinet/if_ether.h>
  51 #include <net80211/ieee80211.h>
  52 #include <net80211/ieee80211_ioctl.h>
  53 #endif
  54
  55 #include "i3status.h"
  56
  57 #define WIRELESS_INFO_FLAG_HAS_ESSID (1 << 0)
  58 #define WIRELESS_INFO_FLAG_HAS_QUALITY (1 << 1)
  59 #define WIRELESS_INFO_FLAG_HAS_SIGNAL (1 << 2)
  60 #define WIRELESS_INFO_FLAG_HAS_NOISE (1 << 3)
  61 #define WIRELESS_INFO_FLAG_HAS_FREQUENCY (1 << 4)
  62
  63 #define PERCENT_VALUE(value, total) ((int)(value * 100 / (float)total + 0.5f))
  64
  65 typedef struct {
  66     int flags;
  67     char essid[IW_ESSID_MAX_SIZE + 1];
  68     uint8_t bssid[ETH_ALEN];
  69     int quality;
  70     int quality_max;
  71     int quality_average;
  72     int signal_level;
  73     int signal_level_max;
  74     int noise_level;
  75     int noise_level_max;
  76     int bitrate;
  77     double frequency;
  78 } wireless_info_t;
  79
  80 // Like iw_print_bitrate, but without the dependency on libiw.
  81 static void print_bitrate(char *buffer, int buflen, int bitrate) {
  82     const int kilo = 1e3;
  83     const int mega = 1e6;
  84     const int giga = 1e9;
  85
  86     const double rate = bitrate;
  87     char scale;
  88     int divisor;
  89
  90     if (rate >= giga) {
  91         scale = 'G';
  92         divisor = giga;
  93     } else if (rate >= mega) {
  94         scale = 'M';
  95         divisor = mega;
  96     } else {
  97         scale = 'k';
  98         divisor = kilo;
  99     }
 100     snprintf(buffer, buflen, "%g %cb/s", rate / divisor, scale);
 101 }
 102
 103 static uint32_t nl80211_xbm_to_percent(int32_t xbm, uint32_t divisor) {
 104 #define NOISE_FLOOR_DBM -90
 105 #define SIGNAL_MAX_DBM -20
 106
 107     xbm /= divisor;
 108     if (xbm < NOISE_FLOOR_DBM)
 109         xbm = NOISE_FLOOR_DBM;
 110     if (xbm > SIGNAL_MAX_DBM)
 111         xbm = SIGNAL_MAX_DBM;
 112
 113     return 100 - 70 * (((float)SIGNAL_MAX_DBM - (float)xbm) / ((float)SIGNAL_MAX_DBM - (float)NOISE_FLOOR_DBM));
 114 }
 115
 116 #define WLAN_EID_SSID 0
 117
 118 static void find_ssid(uint8_t *ies, uint32_t ies_len, uint8_t **ssid, uint32_t *ssid_len) {
 119     *ssid = NULL;
 120     *ssid_len = 0;
 121
 122     while (ies_len > 2 && ies[0] != WLAN_EID_SSID) {
 123         ies_len -= ies[1] + 2;
 124         ies += ies[1] + 2;
 125     }
 126     if (ies_len < 2)
 127         return;
 128     if (ies_len < 2 + ies[1])
 129         return;
 130
 131     *ssid_len = ies[1];
 132     *ssid = ies + 2;
 133 }
 134
 135 static int gwi_sta_cb(struct nl_msg *msg, void *data) {
 136     wireless_info_t *info = data;
 137
 138     struct nlattr *tb[NL80211_ATTR_MAX + 1];
 139     struct genlmsghdr *gnlh = nlmsg_data(nlmsg_hdr(msg));
 140     struct nlattr *sinfo[NL80211_STA_INFO_MAX + 1];
 141     struct nlattr *rinfo[NL80211_RATE_INFO_MAX + 1];
 142     static struct nla_policy stats_policy[NL80211_STA_INFO_MAX + 1] = {
 143             [NL80211_STA_INFO_RX_BITRATE] = {.type = NLA_NESTED},
 144     };
 145
 146     static struct nla_policy rate_policy[NL80211_RATE_INFO_MAX + 1] = {
 147             [NL80211_RATE_INFO_BITRATE] = {.type = NLA_U16},
 148     };
 149
 150     if (nla_parse(tb, NL80211_ATTR_MAX, genlmsg_attrdata(gnlh, 0), genlmsg_attrlen(gnlh, 0), NULL) < 0)
 151         return NL_SKIP;
 152
 153     if (tb[NL80211_ATTR_STA_INFO] == NULL)
 154         return NL_SKIP;
 155
 156     if (nla_parse_nested(sinfo, NL80211_STA_INFO_MAX, tb[NL80211_ATTR_STA_INFO], stats_policy))
 157         return NL_SKIP;
 158
 159     if (sinfo[NL80211_STA_INFO_RX_BITRATE] == NULL)
 160         return NL_SKIP;
 161
 162     if (nla_parse_nested(rinfo, NL80211_RATE_INFO_MAX, sinfo[NL80211_STA_INFO_RX_BITRATE], rate_policy))
 163         return NL_SKIP;
 164
 165     if (rinfo[NL80211_RATE_INFO_BITRATE] == NULL)
 166         return NL_SKIP;
 167
 168     // NL80211_RATE_INFO_BITRATE is specified in units of 100 kbit/s, but iw
 169     // used to specify bit/s, so we convert to use the same code path.
 170     info->bitrate = (int)nla_get_u16(rinfo[NL80211_RATE_INFO_BITRATE]) * 100 * 1000;
 171
 172     return NL_SKIP;
 173 }
 174
 175 static int gwi_scan_cb(struct nl_msg *msg, void *data) {
 176     wireless_info_t *info = data;
 177     struct genlmsghdr *gnlh = genlmsg_hdr(nlmsg_hdr(msg));
 178     struct nlattr *tb[NL80211_ATTR_MAX + 1];
 179     struct nlattr *bss[NL80211_BSS_MAX + 1];
 180     struct nla_policy bss_policy[NL80211_BSS_MAX + 1] = {
 181             [NL80211_BSS_FREQUENCY] = {.type = NLA_U32},
 182             [NL80211_BSS_BSSID] = {.type = NLA_UNSPEC},
 183             [NL80211_BSS_INFORMATION_ELEMENTS] = {.type = NLA_UNSPEC},
 184             [NL80211_BSS_SIGNAL_MBM] = {.type = NLA_U32},
 185             [NL80211_BSS_SIGNAL_UNSPEC] = {.type = NLA_U8},
 186             [NL80211_BSS_STATUS] = {.type = NLA_U32},
 187     };
 188
 189     if (nla_parse(tb, NL80211_ATTR_MAX, genlmsg_attrdata(gnlh, 0), genlmsg_attrlen(gnlh, 0), NULL) < 0)
 190         return NL_SKIP;
 191
 192     if (tb[NL80211_ATTR_BSS] == NULL)
 193         return NL_SKIP;
 194
 195     if (nla_parse_nested(bss, NL80211_BSS_MAX, tb[NL80211_ATTR_BSS], bss_policy))
 196         return NL_SKIP;
 197
 198     if (bss[NL80211_BSS_STATUS] == NULL)
 199         return NL_SKIP;
 200
 201     const uint32_t status = nla_get_u32(bss[NL80211_BSS_STATUS]);
 202
 203     if (status != NL80211_BSS_STATUS_ASSOCIATED &&
 204         status != NL80211_BSS_STATUS_IBSS_JOINED)
 205         return NL_SKIP;
 206
 207     if (bss[NL80211_BSS_BSSID] == NULL)
 208         return NL_SKIP;
 209
 210     memcpy(info->bssid, nla_data(bss[NL80211_BSS_BSSID]), ETH_ALEN);
 211
 212     if (bss[NL80211_BSS_FREQUENCY]) {
 213         info->flags |= WIRELESS_INFO_FLAG_HAS_FREQUENCY;
 214         info->frequency = (double)nla_get_u32(bss[NL80211_BSS_FREQUENCY]) * 1e6;
 215     }
 216
 217     if (bss[NL80211_BSS_SIGNAL_UNSPEC]) {
 218         info->flags |= WIRELESS_INFO_FLAG_HAS_SIGNAL;
 219         info->signal_level = nla_get_u8(bss[NL80211_BSS_SIGNAL_UNSPEC]);
 220         info->signal_level_max = 100;
 221
 222         info->flags |= WIRELESS_INFO_FLAG_HAS_QUALITY;
 223         info->quality = info->signal_level;
 224         info->quality_max = 100;
 225         info->quality_average = 50;
 226     }
 227
 228     if (bss[NL80211_BSS_SIGNAL_MBM]) {
 229         info->flags |= WIRELESS_INFO_FLAG_HAS_SIGNAL;
 230         info->signal_level = (int)nla_get_u32(bss[NL80211_BSS_SIGNAL_MBM]) / 100;
 231
 232         info->flags |= WIRELESS_INFO_FLAG_HAS_QUALITY;
 233         info->quality = nl80211_xbm_to_percent(nla_get_u32(bss[NL80211_BSS_SIGNAL_MBM]), 100);
 234         info->quality_max = 100;
 235         info->quality_average = 50;
 236     }
 237
 238     if (bss[NL80211_BSS_INFORMATION_ELEMENTS]) {
 239         uint8_t *ssid;
 240         uint32_t ssid_len;
 241
 242         find_ssid(nla_data(bss[NL80211_BSS_INFORMATION_ELEMENTS]),
 243                   nla_len(bss[NL80211_BSS_INFORMATION_ELEMENTS]),
 244                   &ssid, &ssid_len);
 245         if (ssid && ssid_len) {
 246             info->flags |= WIRELESS_INFO_FLAG_HAS_ESSID;
 247             snprintf(info->essid, sizeof(info->essid), "%.*s", ssid_len, ssid);
 248         }
 249     }
 250
 251     return NL_SKIP;
 252 }
 253
 254 static int get_wireless_info(const char *interface, wireless_info_t *info) {
 255     memset(info, 0, sizeof(wireless_info_t));
 256
 257 #ifdef LINUX
 258     struct nl_sock *sk = nl_socket_alloc();
 259     if (genl_connect(sk) != 0)
 260         goto error1;
 261
 262     if (nl_socket_modify_cb(sk, NL_CB_VALID, NL_CB_CUSTOM, gwi_scan_cb, info) < 0)
 263         goto error1;
 264
 265     const int nl80211_id = genl_ctrl_resolve(sk, "nl80211");
 266     if (nl80211_id < 0)
 267         goto error1;
 268
 269     const unsigned int ifidx = if_nametoindex(interface);
 270     if (ifidx == 0)
 271         goto error1;
 272
 273     struct nl_msg *msg = NULL;
 274     if ((msg = nlmsg_alloc()) == NULL)
 275         goto error1;
 276
 277     if (!genlmsg_put(msg, NL_AUTO_PORT, NL_AUTO_SEQ, nl80211_id, 0, NLM_F_DUMP, NL80211_CMD_GET_SCAN, 0) ||
 278         nla_put_u32(msg, NL80211_ATTR_IFINDEX, ifidx) < 0)
 279         goto error2;
 280
 281     if (nl_send_sync(sk, msg) < 0)
 282         // nl_send_sync calls nlmsg_free()
 283         goto error1;
 284     msg = NULL;
 285
 286     if (nl_socket_modify_cb(sk, NL_CB_VALID, NL_CB_CUSTOM, gwi_sta_cb, info) < 0)
 287         goto error1;
 288
 289     if ((msg = nlmsg_alloc()) == NULL)
 290         goto error1;
 291
 292     if (!genlmsg_put(msg, NL_AUTO_PORT, NL_AUTO_SEQ, nl80211_id, 0, NLM_F_DUMP, NL80211_CMD_GET_STATION, 0) || nla_put_u32(msg, NL80211_ATTR_IFINDEX, ifidx) < 0 || nla_put(msg, NL80211_ATTR_MAC, 6, info->bssid) < 0)
 293         goto error2;
 294
 295     if (nl_send_sync(sk, msg) < 0)
 296         // nl_send_sync calls nlmsg_free()
 297         goto error1;
 298     msg = NULL;
 299
 300     nl_socket_free(sk);
 301     return 1;
 302
 303 error2:
 304     nlmsg_free(msg);
 305 error1:
 306     nl_socket_free(sk);
 307     return 0;
 308
 309 #endif
 310 #if defined(__FreeBSD__) || defined(__DragonFly__)
 311     int s, inwid;
 312     union {
 313         struct ieee80211req_sta_req req;
 314         uint8_t buf[24 * 1024];
 315     } u;
 316     struct ieee80211req na;
 317     char bssid[IEEE80211_ADDR_LEN];
 318     size_t len;
 319
 320     if ((s = socket(AF_INET, SOCK_DGRAM, 0)) == -1)
 321         return (0);
 322
 323     memset(&na, 0, sizeof(na));
 324     strlcpy(na.i_name, interface, sizeof(na.i_name));
 325     na.i_type = IEEE80211_IOC_SSID;
 326     na.i_data = &info->essid[0];
 327     na.i_len = IEEE80211_NWID_LEN + 1;
 328     if ((inwid = ioctl(s, SIOCG80211, (caddr_t)&na)) == -1) {
 329         close(s);
 330         return (0);
 331     }
 332     if (inwid == 0) {
 333         if (na.i_len <= IEEE80211_NWID_LEN)
 334             len = na.i_len + 1;
 335         else
 336             len = IEEE80211_NWID_LEN + 1;
 337         info->essid[len - 1] = '\0';
 338     } else {
 339         close(s);
 340         return (0);
 341     }
 342     info->flags |= WIRELESS_INFO_FLAG_HAS_ESSID;
 343
 344     memset(&na, 0, sizeof(na));
 345     strlcpy(na.i_name, interface, sizeof(na.i_name));
 346     na.i_type = IEEE80211_IOC_BSSID;
 347     na.i_data = bssid;
 348     na.i_len = sizeof(bssid);
 349
 350     if (ioctl(s, SIOCG80211, (caddr_t)&na) == -1) {
 351         close(s);
 352         return (0);
 353     }
 354
 355     memcpy(u.req.is_u.macaddr, bssid, sizeof(bssid));
 356     memset(&na, 0, sizeof(na));
 357     strlcpy(na.i_name, interface, sizeof(na.i_name));
 358     na.i_type = IEEE80211_IOC_STA_INFO;
 359     na.i_data = &u;
 360     na.i_len = sizeof(u);
 361
 362     if (ioctl(s, SIOCG80211, (caddr_t)&na) == -1) {
 363         close(s);
 364         return (0);
 365     }
 366
 367     close(s);
 368     if (na.i_len >= sizeof(u.req)) {
 369         /*
 370          * Just use the first BSSID returned even if there are
 371          * multiple APs sharing the same BSSID.
 372          */
 373         info->signal_level = u.req.info[0].isi_rssi / 2 +
 374                              u.req.info[0].isi_noise;
 375         info->flags |= WIRELESS_INFO_FLAG_HAS_SIGNAL;
 376         info->noise_level = u.req.info[0].isi_noise;
 377         info->flags |= WIRELESS_INFO_FLAG_HAS_NOISE;
 378     }
 379
 380     return 1;
 381 #endif
 382 #ifdef __OpenBSD__
 383     struct ifreq ifr;
 384     struct ieee80211_bssid bssid;
 385     struct ieee80211_nwid nwid;
 386     struct ieee80211_nodereq nr;
 387
 388     struct ether_addr ea;
 389
 390     int s, len, ibssid, inwid;
 391     u_int8_t zero_bssid[IEEE80211_ADDR_LEN];
 392
 393     if ((s = socket(AF_INET, SOCK_DGRAM, 0)) == -1)
 394         return (0);
 395
 396     memset(&ifr, 0, sizeof(ifr));
 397     ifr.ifr_data = (caddr_t)&nwid;
 398     (void)strlcpy(ifr.ifr_name, interface, sizeof(ifr.ifr_name));
 399     inwid = ioctl(s, SIOCG80211NWID, (caddr_t)&ifr);
 400
 401     memset(&bssid, 0, sizeof(bssid));
 402     strlcpy(bssid.i_name, interface, sizeof(bssid.i_name));
 403     ibssid = ioctl(s, SIOCG80211BSSID, &bssid);
 404
 405     if (ibssid != 0 || inwid != 0) {
 406         close(s);
 407         return 0;
 408     }
 409
 410     /* NWID */
 411     {
 412         if (nwid.i_len <= IEEE80211_NWID_LEN)
 413             len = nwid.i_len + 1;
 414         else
 415             len = IEEE80211_NWID_LEN + 1;
 416
 417         strncpy(&info->essid[0], nwid.i_nwid, len);
 418         info->essid[IW_ESSID_MAX_SIZE] = '\0';
 419         info->flags |= WIRELESS_INFO_FLAG_HAS_ESSID;
 420     }
 421
 422     /* Signal strength */
 423     {
 424         memset(&zero_bssid, 0, sizeof(zero_bssid));
 425         if (ibssid == 0 && memcmp(bssid.i_bssid, zero_bssid, IEEE80211_ADDR_LEN) != 0) {
 426             memcpy(&ea.ether_addr_octet, bssid.i_bssid, sizeof(ea.ether_addr_octet));
 427
 428             bzero(&nr, sizeof(nr));
 429             bcopy(bssid.i_bssid, &nr.nr_macaddr, sizeof(nr.nr_macaddr));
 430             strlcpy(nr.nr_ifname, interface, sizeof(nr.nr_ifname));
 431
 432             if (ioctl(s, SIOCG80211NODE, &nr) == 0 && nr.nr_rssi) {
 433                 info->signal_level = nr.nr_rssi;
 434                 if (nr.nr_max_rssi)
 435                     info->signal_level_max = nr.nr_max_rssi;
 436
 437                 info->flags |= WIRELESS_INFO_FLAG_HAS_SIGNAL;
 438             }
 439         }
 440     }
 441
 442     close(s);
 443     return 1;
 444 #endif
 445     return 0;
 446 }
 447
 448 void print_wireless_info(yajl_gen json_gen, char *buffer, const char *interface, const char *format_up, const char *format_down) {
 449     const char *walk;
 450     char *outwalk = buffer;
 451     wireless_info_t info;
 452
 453     INSTANCE(interface);
 454
 455     const char *ip_address = get_ip_addr(interface);
 456     if (ip_address == NULL) {
 457         START_COLOR("color_bad");
 458         outwalk += sprintf(outwalk, "%s", format_down);
 459         goto out;
 460     }
 461
 462     if (get_wireless_info(interface, &info)) {
 463         walk = format_up;
 464         if (info.flags & WIRELESS_INFO_FLAG_HAS_QUALITY)
 465             START_COLOR((info.quality < info.quality_average ? "color_degraded" : "color_good"));
 466         else
 467             START_COLOR((BEGINS_WITH(ip_address, "no IP") ? "color_degraded" : "color_good"));
 468     } else {
 469         walk = format_down;
 470         START_COLOR("color_bad");
 471     }
 472
 473     for (; *walk != '\0'; walk++) {
 474         if (*walk != '%') {
 475             *(outwalk++) = *walk;
 476             continue;
 477         }
 478
 479         if (BEGINS_WITH(walk + 1, "quality")) {
 480             if (info.flags & WIRELESS_INFO_FLAG_HAS_QUALITY) {
 481                 if (info.quality_max)
 482                     outwalk += sprintf(outwalk, "%03d%%", PERCENT_VALUE(info.quality, info.quality_max));
 483                 else
 484                     outwalk += sprintf(outwalk, "%d", info.quality);
 485             } else {
 486                 *(outwalk++) = '?';
 487             }
 488             walk += strlen("quality");
 489         }
 490
 491         if (BEGINS_WITH(walk + 1, "signal")) {
 492             if (info.flags & WIRELESS_INFO_FLAG_HAS_SIGNAL) {
 493                 if (info.signal_level_max)
 494                     outwalk += sprintf(outwalk, "%03d%%", PERCENT_VALUE(info.signal_level, info.signal_level_max));
 495                 else
 496                     outwalk += sprintf(outwalk, "%d dBm", info.signal_level);
 497             } else {
 498                 *(outwalk++) = '?';
 499             }
 500             walk += strlen("signal");
 501         }
 502
 503         if (BEGINS_WITH(walk + 1, "noise")) {
 504             if (info.flags & WIRELESS_INFO_FLAG_HAS_NOISE) {
 505                 if (info.noise_level_max)
 506                     outwalk += sprintf(outwalk, "%03d%%", PERCENT_VALUE(info.noise_level, info.noise_level_max));
 507                 else
 508                     outwalk += sprintf(outwalk, "%d dBm", info.noise_level);
 509             } else {
 510                 *(outwalk++) = '?';
 511             }
 512             walk += strlen("noise");
 513         }
 514
 515         if (BEGINS_WITH(walk + 1, "essid")) {
 516             if (info.flags & WIRELESS_INFO_FLAG_HAS_ESSID)
 517                 outwalk += sprintf(outwalk, "%s", info.essid);
 518             else
 519                 *(outwalk++) = '?';
 520             walk += strlen("essid");
 521         }
 522
 523         if (BEGINS_WITH(walk + 1, "frequency")) {
 524             if (info.flags & WIRELESS_INFO_FLAG_HAS_FREQUENCY)
 525                 outwalk += sprintf(outwalk, "%1.1f GHz", info.frequency / 1e9);
 526             else
 527                 *(outwalk++) = '?';
 528             walk += strlen("frequency");
 529         }
 530
 531         if (BEGINS_WITH(walk + 1, "ip")) {
 532             outwalk += sprintf(outwalk, "%s", ip_address);
 533             walk += strlen("ip");
 534         }
 535
 536 #ifdef LINUX
 537         if (BEGINS_WITH(walk + 1, "bitrate")) {
 538             char br_buffer[128];
 539
 540             print_bitrate(br_buffer, sizeof(br_buffer), info.bitrate);
 541
 542             outwalk += sprintf(outwalk, "%s", br_buffer);
 543             walk += strlen("bitrate");
 544         }
 545 #endif
 546     }
 547
 548 out:
 549     END_COLOR;
 550     OUTPUT_FULL_TEXT(buffer);
 551 }