52b90122f6dd2bed7fef89517097f426e57c0dce
[project/luci.git] / contrib / package / iwinfo / src / iwinfo_nl80211.c
1 /*
2  * iwinfo - Wireless Information Library - NL80211 Backend
3  *
4  *   Copyright (C) 2010 Jo-Philipp Wich <xm@subsignal.org>
5  *
6  * The iwinfo library is free software: you can redistribute it and/or
7  * modify it under the terms of the GNU General Public License version 2
8  * as published by the Free Software Foundation.
9  *
10  * The iwinfo library is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
13  * See the GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License along
16  * with the iwinfo library. If not, see http://www.gnu.org/licenses/.
17  *
18  * The signal handling code is derived from the official madwifi tools,
19  * wlanconfig.c in particular. The encryption property handling was
20  * inspired by the hostapd madwifi driver.
21  *
22  * Parts of this code are derived from the Linux iw utility.
23  */
24
25 #include "iwinfo_nl80211.h"
26 #include "iwinfo_wext.h"
27
28 #define min(x, y) ((x) < (y)) ? (x) : (y)
29
30 extern struct iwinfo_iso3166_label ISO3166_Names[];
31 static struct nl80211_state *nls = NULL;
32
33 static int nl80211_init(void)
34 {
35         int err, fd;
36
37         if( !nls )
38         {
39                 nls = malloc(sizeof(struct nl80211_state));
40                 if( !nls ) {
41                         err = -ENOMEM;
42                         goto err;
43                 }
44
45                 nls->nl_sock = nl_socket_alloc();
46                 if( !nls->nl_sock ) {
47                         err = -ENOMEM;
48                         goto err;
49                 }
50
51                 if( genl_connect(nls->nl_sock)) {
52                         err = -ENOLINK;
53                         goto err;
54                 }
55
56                 fd = nl_socket_get_fd(nls->nl_sock);
57                 if( fcntl(fd, F_SETFD, fcntl(fd, F_GETFD) | FD_CLOEXEC) < 0 )
58                 {
59                         err = -EINVAL;
60                         goto err;
61                 }
62
63                 if( genl_ctrl_alloc_cache(nls->nl_sock, &nls->nl_cache)) {
64                         err = -ENOMEM;
65                         goto err;
66                 }
67
68                 nls->nl80211 = genl_ctrl_search_by_name(nls->nl_cache, "nl80211");
69                 if( !nls->nl80211 )
70                 {
71                         err = -ENOENT;
72                         goto err;
73                 }
74         }
75
76         return 0;
77
78
79 err:
80         nl80211_close();
81         return err;
82 }
83
84 static int nl80211_msg_error(struct sockaddr_nl *nla,
85         struct nlmsgerr *err, void *arg)
86 {
87         int *ret = arg;
88         *ret = err->error;
89         return NL_STOP;
90 }
91
92 static int nl80211_msg_finish(struct nl_msg *msg, void *arg)
93 {
94         int *ret = arg;
95         *ret = 0;
96         return NL_SKIP;
97 }
98
99 static int nl80211_msg_ack(struct nl_msg *msg, void *arg)
100 {
101         int *ret = arg;
102         *ret = 0;
103         return NL_STOP;
104 }
105
106 static int nl80211_msg_response(struct nl_msg *msg, void *arg)
107 {
108         struct nl80211_msg_conveyor *cv = arg;
109
110         nlmsg_get(msg);
111
112         cv->msg = msg;
113         cv->hdr = nlmsg_data(nlmsg_hdr(cv->msg));
114
115         nla_parse(cv->attr, NL80211_ATTR_MAX,
116                 genlmsg_attrdata(cv->hdr, 0),
117                 genlmsg_attrlen(cv->hdr, 0), NULL);
118
119         return NL_SKIP;
120 }
121
122 static void nl80211_free(struct nl80211_msg_conveyor *cv)
123 {
124         if( cv )
125         {
126                 if( cv->cb )
127                         nl_cb_put(cv->cb);
128
129                 if( cv->msg )
130                         nlmsg_free(cv->msg);
131
132                 cv->cb  = NULL;
133                 cv->msg = NULL;
134         }
135 }
136
137 static struct nl80211_msg_conveyor * nl80211_msg(const char *ifname, int cmd, int flags)
138 {
139         static struct nl80211_msg_conveyor cv;
140
141         int ifidx = -1, phyidx = -1;
142         struct nl_msg *req = NULL;
143         struct nl_cb *cb = NULL;
144
145         if( nl80211_init() < 0 )
146                 goto err;
147
148         if( !strncmp(ifname, "phy", 3) )
149                 phyidx = atoi(&ifname[3]);
150         else if( !strncmp(ifname, "radio", 5) )
151                 phyidx = atoi(&ifname[5]);
152         else if( !strncmp(ifname, "mon.", 4) )
153                 ifidx = if_nametoindex(&ifname[4]);
154         else
155                 ifidx = if_nametoindex(ifname);
156
157         if( (ifidx < 0) && (phyidx < 0) )
158                 return NULL;
159
160         req = nlmsg_alloc();
161         if( !req )
162                 goto err;
163
164         cb = nl_cb_alloc(NL_CB_DEFAULT);
165         if( !cb )
166                 goto err;
167
168         genlmsg_put(req, 0, 0, genl_family_get_id(nls->nl80211), 0,
169                 flags, cmd, 0);
170
171         if( ifidx > -1 )
172                 NLA_PUT_U32(req, NL80211_ATTR_IFINDEX, ifidx);
173
174         if( phyidx > -1 )
175                 NLA_PUT_U32(req, NL80211_ATTR_WIPHY, phyidx);
176
177         nlmsg_get(req);
178
179         cv.msg       = req;
180         cv.cb        = cb;
181         cv.custom_cb = 0;
182
183         return &cv;
184
185 err:
186 nla_put_failure:
187         if( cb )
188                 nl_cb_put(cb);
189
190         if( req )
191                 nlmsg_free(req);
192
193         return NULL;
194 }
195
196 static void nl80211_cb(struct nl80211_msg_conveyor *cv,
197         int (*cb)(struct nl_msg *, void *), void *arg)
198 {
199         cv->custom_cb = 1;
200         nl_cb_set(cv->cb, NL_CB_VALID, NL_CB_CUSTOM, cb, arg);
201 }
202
203 static struct nl80211_msg_conveyor * nl80211_send(struct nl80211_msg_conveyor *cv)
204 {
205         static struct nl80211_msg_conveyor rcv;
206         int err = 1;
207
208         if( !cv->custom_cb )
209                 nl_cb_set(cv->cb, NL_CB_VALID, NL_CB_CUSTOM, nl80211_msg_response, &rcv);
210
211         if( nl_send_auto_complete(nls->nl_sock, cv->msg) < 0 )
212                 goto err;
213
214         nl_cb_err(cv->cb,               NL_CB_CUSTOM, nl80211_msg_error,  &err);
215         nl_cb_set(cv->cb, NL_CB_FINISH, NL_CB_CUSTOM, nl80211_msg_finish, &err);
216         nl_cb_set(cv->cb, NL_CB_ACK,    NL_CB_CUSTOM, nl80211_msg_ack,    &err);
217
218         while (err > 0)
219                 nl_recvmsgs(nls->nl_sock, cv->cb);
220
221         return &rcv;
222
223 err:
224         nl_cb_put(cv->cb);
225         nlmsg_free(cv->msg);
226
227         return NULL;
228 }
229
230 static int nl80211_freq2channel(int freq)
231 {
232     if (freq == 2484)
233         return 14;
234
235     if (freq < 2484)
236         return (freq - 2407) / 5;
237
238     return (freq / 5) - 1000;
239 }
240
241 static char * nl80211_getval(const char *ifname, const char *buf, const char *key)
242 {
243         int i, len;
244         char lkey[64] = { 0 };
245         const char *ln = buf;
246         static char lval[256] = { 0 };
247
248         int matched_if = ifname ? 0 : 1;
249
250
251         for( i = 0, len = strlen(buf); i < len; i++ )
252         {
253                 if( !lkey[0] && (buf[i] == ' ' || buf[i] == '\t') )
254                 {
255                         ln++;
256                 }
257                 else if( !lkey[0] && (buf[i] == '=') )
258                 {
259                         if( (&buf[i] - ln) > 0 )
260                                 memcpy(lkey, ln, min(sizeof(lkey) - 1, &buf[i] - ln));
261                 }
262                 else if( buf[i] == '\n' )
263                 {
264                         if( lkey[0] )
265                         {
266                                 memcpy(lval, ln + strlen(lkey) + 1,
267                                         min(sizeof(lval) - 1, &buf[i] - ln - strlen(lkey) - 1));
268
269                                 if( (ifname != NULL ) &&
270                                     (!strcmp(lkey, "interface") || !strcmp(lkey, "bss")) )
271                                 {
272                                         matched_if = !strcmp(lval, ifname);
273                                 }
274                                 else if( matched_if && !strcmp(lkey, key) )
275                                 {
276                                         return lval;
277                                 }
278                         }
279
280                         ln = &buf[i+1];
281                         memset(lkey, 0, sizeof(lkey));
282                         memset(lval, 0, sizeof(lval));
283                 }
284         }
285
286         return NULL;
287 }
288
289 static char * nl80211_ifname2phy(const char *ifname)
290 {
291         static char phy[32] = { 0 };
292         struct nl80211_msg_conveyor *req, *res;
293
294         req = nl80211_msg(ifname, NL80211_CMD_GET_WIPHY, 0);
295         if( req )
296         {
297                 res = nl80211_send(req);
298                 if( res )
299                 {
300                         if( res->attr[NL80211_ATTR_WIPHY_NAME] )
301                         {
302                                 snprintf(phy, sizeof(phy), "%s",
303                                          nla_get_string(res->attr[NL80211_ATTR_WIPHY_NAME]));
304                         }
305                         nl80211_free(res);
306                 }
307                 nl80211_free(req);
308         }
309
310         return phy[0] ? phy : NULL;
311 }
312
313 static char * nl80211_hostapd_info(const char *ifname)
314 {
315         char *phy;
316         char path[32] = { 0 };
317         static char buf[4096] = { 0 };
318         FILE *conf;
319
320         if( (phy = nl80211_ifname2phy(ifname)) != NULL )
321         {
322                 snprintf(path, sizeof(path), "/var/run/hostapd-%s.conf", phy);
323
324                 if( (conf = fopen(path, "r")) != NULL )
325                 {
326                         fread(buf, sizeof(buf) - 1, 1, conf);
327                         fclose(conf);
328
329                         return buf;
330                 }
331         }
332
333         return NULL;
334 }
335
336 static char * nl80211_wpasupp_info(const char *ifname, const char *cmd)
337 {
338         int sock = -1, len;
339         char *rv = NULL;
340         size_t remote_length, local_length;
341         static char buffer[1024] = { 0 };
342
343         struct timeval tv = { 2, 0 };
344         struct sockaddr_un local = { 0 };
345         struct sockaddr_un remote = { 0 };
346
347         fd_set rfds;
348
349         sock = socket(PF_UNIX, SOCK_DGRAM, 0);
350         if( sock < 0 )
351                 return NULL;
352
353         remote.sun_family = AF_UNIX;
354         remote_length = sizeof(remote.sun_family) + sprintf(remote.sun_path,
355                 "/var/run/wpa_supplicant-%s/%s", ifname, ifname);
356
357         if( fcntl(sock, F_SETFD, fcntl(sock, F_GETFD) | FD_CLOEXEC) < 0 )
358                 goto out;
359
360         if( connect(sock, (struct sockaddr *) &remote, remote_length) )
361                 goto out;
362
363         local.sun_family = AF_UNIX;
364         local_length = sizeof(local.sun_family) + sprintf(local.sun_path,
365                 "/var/run/iwinfo-%s-%d", ifname, getpid());
366
367         if( bind(sock, (struct sockaddr *) &local, local_length) )
368                 goto out;
369
370         send(sock, cmd, strlen(cmd), 0);
371
372         while( 1 )
373         {
374                 FD_ZERO(&rfds);
375                 FD_SET(sock, &rfds);
376
377                 if( select(sock + 1, &rfds, NULL, NULL, &tv) < 0 )
378                         goto out;
379
380                 if( !FD_ISSET(sock, &rfds) )
381                         break;
382
383                 if( (len = recv(sock, buffer, sizeof(buffer), 0)) <= 0 )
384                         goto out;
385
386                 buffer[len] = 0;
387
388                 if( buffer[0] != '<' )
389                         break;
390         }
391
392         rv = buffer;
393
394 out:
395         close(sock);
396
397         if( local.sun_family )
398                 unlink(local.sun_path);
399
400         return rv;
401 }
402
403 static inline int nl80211_readint(const char *path)
404 {
405         int fd;
406         int rv = -1;
407         char buffer[16];
408
409         if( (fd = open(path, O_RDONLY)) > -1 )
410         {
411                 if( read(fd, buffer, sizeof(buffer)) > 0 )
412                         rv = atoi(buffer);
413
414                 close(fd);
415         }
416
417         return rv;
418 }
419
420 static char * nl80211_phy2ifname(const char *ifname)
421 {
422         int fd, ifidx = -1, cifidx = -1, phyidx = -1;
423         char buffer[64];
424         static char nif[IFNAMSIZ] = { 0 };
425
426         DIR *d;
427         struct dirent *e;
428
429         if( !ifname )
430                 return NULL;
431         else if( !strncmp(ifname, "phy", 3) )
432                 phyidx = atoi(&ifname[3]);
433         else if( !strncmp(ifname, "radio", 5) )
434                 phyidx = atoi(&ifname[5]);
435
436         if( phyidx > -1 )
437         {
438                 if( (d = opendir("/sys/class/net")) != NULL )
439                 {
440                         while( (e = readdir(d)) != NULL )
441                         {
442                                 snprintf(buffer, sizeof(buffer),
443                                         "/sys/class/net/%s/phy80211/index", e->d_name);
444
445                                 if( nl80211_readint(buffer) == phyidx )
446                                 {
447                                         snprintf(buffer, sizeof(buffer),
448                                                 "/sys/class/net/%s/ifindex", e->d_name);
449
450                                         if( (cifidx = nl80211_readint(buffer)) >= 0 &&
451                                             ((ifidx < 0) || (cifidx < ifidx)) )
452                                         {
453                                                 ifidx = cifidx;
454                                                 strncpy(nif, e->d_name, sizeof(nif));
455                                         }
456                                 }
457                         }
458
459                         closedir(d);
460                 }
461         }
462
463         return nif[0] ? nif : NULL;
464 }
465
466 static char * nl80211_ifadd(const char *ifname)
467 {
468         int phyidx;
469         char *rv = NULL;
470         static char nif[IFNAMSIZ] = { 0 };
471         struct nl80211_msg_conveyor *req, *res;
472
473         req = nl80211_msg(ifname, NL80211_CMD_NEW_INTERFACE, 0);
474         if( req )
475         {
476                 snprintf(nif, sizeof(nif), "tmp.%s", ifname);
477
478                 NLA_PUT_STRING(req->msg, NL80211_ATTR_IFNAME, nif);
479                 NLA_PUT_U32(req->msg, NL80211_ATTR_IFTYPE, NL80211_IFTYPE_STATION);
480
481                 res = nl80211_send(req);
482                 if( res )
483                 {
484                         rv = nif;
485                         nl80211_free(res);
486                 }
487
488         nla_put_failure:
489                 nl80211_free(req);
490         }
491
492         return rv;
493 }
494
495 static void nl80211_ifdel(const char *ifname)
496 {
497         struct nl80211_msg_conveyor *req;
498
499         req = nl80211_msg(ifname, NL80211_CMD_DEL_INTERFACE, 0);
500         if( req )
501         {
502                 NLA_PUT_STRING(req->msg, NL80211_ATTR_IFNAME, ifname);
503
504                 nl80211_free(nl80211_send(req));
505
506         nla_put_failure:
507                 nl80211_free(req);
508         }
509 }
510
511 static void nl80211_hostapd_hup(const char *ifname)
512 {
513         int fd, pid = 0;
514         char buf[32];
515         char *phy = nl80211_ifname2phy(ifname);
516
517         if( phy )
518         {
519                 snprintf(buf, sizeof(buf), "/var/run/wifi-%s.pid", phy);
520                 if( (fd = open(buf, O_RDONLY)) > 0 )
521                 {
522                         if( read(fd, buf, sizeof(buf)) > 0 )
523                                 pid = atoi(buf);
524
525                         close(fd);
526                 }
527
528                 if( pid > 0 )
529                         kill(pid, 1);
530         }
531 }
532
533
534 int nl80211_probe(const char *ifname)
535 {
536         return !!nl80211_ifname2phy(ifname);
537 }
538
539 void nl80211_close(void)
540 {
541         if( nls )
542         {
543                 if( nls->nl_sock )
544                         nl_socket_free(nls->nl_sock);
545
546                 if( nls->nl_cache )
547                         nl_cache_free(nls->nl_cache);
548
549                 free(nls);
550                 nls = NULL;
551         }
552 }
553
554 int nl80211_get_mode(const char *ifname, char *buf)
555 {
556         return wext_get_mode(ifname, buf);
557 }
558
559 int nl80211_get_ssid(const char *ifname, char *buf)
560 {
561         char *ssid;
562
563         if( !wext_get_ssid(ifname, buf) )
564         {
565                 return 0;
566         }
567         else if( (ssid = nl80211_hostapd_info(ifname)) &&
568                  (ssid = nl80211_getval(ifname, ssid, "ssid")) )
569         {
570                 memcpy(buf, ssid, strlen(ssid));
571                 return 0;
572         }
573
574         return -1;
575 }
576
577 int nl80211_get_bssid(const char *ifname, char *buf)
578 {
579         char *bssid;
580         unsigned char mac[6];
581
582         if( !wext_get_bssid(ifname, buf) )
583         {
584                 return 0;
585         }
586         else if( (bssid = nl80211_hostapd_info(ifname)) &&
587                  (bssid = nl80211_getval(ifname, bssid, "bssid")) )
588         {
589                 mac[0] = strtol(&bssid[0],  NULL, 16);
590                 mac[1] = strtol(&bssid[3],  NULL, 16);
591                 mac[2] = strtol(&bssid[6],  NULL, 16);
592                 mac[3] = strtol(&bssid[9],  NULL, 16);
593                 mac[4] = strtol(&bssid[12], NULL, 16);
594                 mac[5] = strtol(&bssid[15], NULL, 16);
595
596                 sprintf(buf, "%02X:%02X:%02X:%02X:%02X:%02X",
597                         mac[0], mac[1], mac[2], mac[3], mac[4], mac[5]);
598
599                 return 0;
600         }
601
602         return -1;
603 }
604
605 int nl80211_get_channel(const char *ifname, int *buf)
606 {
607         char *first;
608
609         if( !wext_get_channel(ifname, buf) )
610                 return 0;
611
612         else if( (first = nl80211_phy2ifname(nl80211_ifname2phy(ifname))) != NULL )
613                 return wext_get_channel(first, buf);
614
615         return -1;
616 }
617
618 int nl80211_get_frequency(const char *ifname, int *buf)
619 {
620         char *first;
621
622         if( !wext_get_frequency(ifname, buf) )
623                 return 0;
624
625         else if( (first = nl80211_phy2ifname(nl80211_ifname2phy(ifname))) != NULL )
626                 return wext_get_frequency(first, buf);
627
628         return -1;
629 }
630
631 int nl80211_get_txpower(const char *ifname, int *buf)
632 {
633         return wext_get_txpower(ifname, buf);
634 }
635
636
637 static int nl80211_get_signal_cb(struct nl_msg *msg, void *arg)
638 {
639         int8_t dbm;
640         int16_t mbit;
641         struct nl80211_rssi_rate *rr = arg;
642
643         struct genlmsghdr *gnlh = nlmsg_data(nlmsg_hdr(msg));
644         struct nlattr *attr[NL80211_ATTR_MAX + 1];
645         struct nlattr *sinfo[NL80211_STA_INFO_MAX + 1];
646         struct nlattr *rinfo[NL80211_RATE_INFO_MAX + 1];
647
648         static struct nla_policy stats_policy[NL80211_STA_INFO_MAX + 1] = {
649                 [NL80211_STA_INFO_INACTIVE_TIME] = { .type = NLA_U32    },
650                 [NL80211_STA_INFO_RX_BYTES]      = { .type = NLA_U32    },
651                 [NL80211_STA_INFO_TX_BYTES]      = { .type = NLA_U32    },
652                 [NL80211_STA_INFO_RX_PACKETS]    = { .type = NLA_U32    },
653                 [NL80211_STA_INFO_TX_PACKETS]    = { .type = NLA_U32    },
654                 [NL80211_STA_INFO_SIGNAL]        = { .type = NLA_U8     },
655                 [NL80211_STA_INFO_TX_BITRATE]    = { .type = NLA_NESTED },
656                 [NL80211_STA_INFO_LLID]          = { .type = NLA_U16    },
657                 [NL80211_STA_INFO_PLID]          = { .type = NLA_U16    },
658                 [NL80211_STA_INFO_PLINK_STATE]   = { .type = NLA_U8     },
659         };
660
661         static struct nla_policy rate_policy[NL80211_RATE_INFO_MAX + 1] = {
662                 [NL80211_RATE_INFO_BITRATE]      = { .type = NLA_U16  },
663                 [NL80211_RATE_INFO_MCS]          = { .type = NLA_U8   },
664                 [NL80211_RATE_INFO_40_MHZ_WIDTH] = { .type = NLA_FLAG },
665                 [NL80211_RATE_INFO_SHORT_GI]     = { .type = NLA_FLAG },
666         };
667
668         nla_parse(attr, NL80211_ATTR_MAX, genlmsg_attrdata(gnlh, 0),
669                   genlmsg_attrlen(gnlh, 0), NULL);
670
671         if( attr[NL80211_ATTR_STA_INFO] )
672         {
673                 if( !nla_parse_nested(sinfo, NL80211_STA_INFO_MAX,
674                                 attr[NL80211_ATTR_STA_INFO], stats_policy) )
675                 {
676                         if( sinfo[NL80211_STA_INFO_SIGNAL] )
677                         {
678                                 dbm = nla_get_u8(sinfo[NL80211_STA_INFO_SIGNAL]);
679                                 rr->rssi = rr->rssi ? (int8_t)((rr->rssi + dbm) / 2) : dbm;
680                         }
681
682                         if( sinfo[NL80211_STA_INFO_TX_BITRATE] )
683                         {
684                                 if( !nla_parse_nested(rinfo, NL80211_RATE_INFO_MAX,
685                                                 sinfo[NL80211_STA_INFO_TX_BITRATE], rate_policy) )
686                                 {
687                                         if( rinfo[NL80211_RATE_INFO_BITRATE] )
688                                         {
689                                                 mbit = nla_get_u16(rinfo[NL80211_RATE_INFO_BITRATE]);
690                                                 rr->rate = rr->rate
691                                                         ? (int16_t)((rr->rate + mbit) / 2) : mbit;
692                                         }
693                                 }
694                         }
695                 }
696         }
697
698         return NL_SKIP;
699 }
700
701 int nl80211_get_bitrate(const char *ifname, int *buf)
702 {
703         struct nl80211_rssi_rate rr;
704         struct nl80211_msg_conveyor *req;
705
706         if( !wext_get_bitrate(ifname, buf) )
707                 return 0;
708
709         req = nl80211_msg(ifname, NL80211_CMD_GET_STATION, NLM_F_DUMP);
710         if( req )
711         {
712                 rr.rssi = 0;
713                 rr.rate = 0;
714
715                 nl80211_cb(req, nl80211_get_signal_cb, &rr);
716                 nl80211_send(req);
717                 nl80211_free(req);
718
719                 if( rr.rate )
720                 {
721                         *buf = (rr.rate * 100);
722                         return 0;
723                 }
724         }
725
726         return -1;
727 }
728
729 int nl80211_get_signal(const char *ifname, int *buf)
730 {
731         struct nl80211_rssi_rate rr;
732         struct nl80211_msg_conveyor *req;
733
734         if( !wext_get_signal(ifname, buf) )
735                 return 0;
736
737         req = nl80211_msg(ifname, NL80211_CMD_GET_STATION, NLM_F_DUMP);
738         if( req )
739         {
740                 rr.rssi = 0;
741                 rr.rate = 0;
742
743                 nl80211_cb(req, nl80211_get_signal_cb, &rr);
744                 nl80211_send(req);
745                 nl80211_free(req);
746
747                 if( rr.rssi )
748                 {
749                         *buf = rr.rssi;
750                         return 0;
751                 }
752         }
753
754         return -1;
755 }
756
757 static int nl80211_get_noise_cb(struct nl_msg *msg, void *arg)
758 {
759         int8_t *noise = arg;
760         struct genlmsghdr *gnlh = nlmsg_data(nlmsg_hdr(msg));
761         struct nlattr *tb[NL80211_ATTR_MAX + 1];
762         struct nlattr *si[NL80211_SURVEY_INFO_MAX + 1];
763
764         static struct nla_policy sp[NL80211_SURVEY_INFO_MAX + 1] = {
765                 [NL80211_SURVEY_INFO_FREQUENCY] = { .type = NLA_U32 },
766                 [NL80211_SURVEY_INFO_NOISE]     = { .type = NLA_U8  },
767         };
768
769         nla_parse(tb, NL80211_ATTR_MAX, genlmsg_attrdata(gnlh, 0),
770                 genlmsg_attrlen(gnlh, 0), NULL);
771
772         if (!tb[NL80211_ATTR_SURVEY_INFO])
773                 return NL_SKIP;
774
775         if (nla_parse_nested(si, NL80211_SURVEY_INFO_MAX,
776                                                  tb[NL80211_ATTR_SURVEY_INFO], sp))
777                 return NL_SKIP;
778
779         if (!si[NL80211_SURVEY_INFO_NOISE])
780                 return NL_SKIP;
781
782         if (!*noise || si[NL80211_SURVEY_INFO_IN_USE])
783                 *noise = (int8_t)nla_get_u8(si[NL80211_SURVEY_INFO_NOISE]);
784
785         return NL_SKIP;
786 }
787
788
789 int nl80211_get_noise(const char *ifname, int *buf)
790 {
791         int8_t noise;
792         struct nl80211_msg_conveyor *req;
793
794         req = nl80211_msg(ifname, NL80211_CMD_GET_SURVEY, NLM_F_DUMP);
795         if (req)
796         {
797                 noise = 0;
798
799                 nl80211_cb(req, nl80211_get_noise_cb, &noise);
800                 nl80211_send(req);
801                 nl80211_free(req);
802
803                 if (noise)
804                 {
805                         *buf = noise;
806                         return 0;
807                 }
808         }
809
810         return -1;
811 }
812
813 int nl80211_get_quality(const char *ifname, int *buf)
814 {
815         int signal;
816
817         if( wext_get_quality(ifname, buf) )
818         {
819                 *buf = 0;
820
821                 if( !nl80211_get_signal(ifname, &signal) )
822                 {
823                         /* A positive signal level is usually just a quality
824                          * value, pass through as-is */
825                         if( signal >= 0 )
826                         {
827                                 *buf = signal;
828                         }
829
830                         /* The cfg80211 wext compat layer assumes a signal range
831                          * of -110 dBm to -40 dBm, the quality value is derived
832                          * by adding 110 to the signal level */
833                         else
834                         {
835                                 if( signal < -110 )
836                                         signal = -110;
837                                 else if( signal > -40 )
838                                         signal = -40;
839
840                                 *buf = (signal + 110);
841                         }
842                 }
843         }
844
845         return 0;
846 }
847
848 int nl80211_get_quality_max(const char *ifname, int *buf)
849 {
850         if( wext_get_quality_max(ifname, buf) )
851                 /* The cfg80211 wext compat layer assumes a maximum
852                  * quality of 70 */
853                 *buf = 70;
854
855         return 0;
856 }
857
858 int nl80211_get_encryption(const char *ifname, char *buf)
859 {
860         int i;
861         char k[9];
862         char *val, *res;
863         struct iwinfo_crypto_entry *c = (struct iwinfo_crypto_entry *)buf;
864
865         /* Hostapd */
866         if( (res = nl80211_hostapd_info(ifname)) )
867         {
868                 if( (val = nl80211_getval(ifname, res, "wpa")) != NULL )
869                         c->wpa_version = atoi(val);
870
871                 val = nl80211_getval(ifname, res, "wpa_key_mgmt");
872
873                 if( !val || strstr(val, "PSK") )
874                         c->auth_suites |= IWINFO_KMGMT_PSK;
875
876                 if( val && strstr(val, "EAP") )
877                         c->auth_suites |= IWINFO_KMGMT_8021x;
878
879                 if( val && strstr(val, "NONE") )
880                         c->auth_suites |= IWINFO_KMGMT_NONE;
881
882                 if( (val = nl80211_getval(ifname, res, "wpa_pairwise")) != NULL )
883                 {
884                         if( strstr(val, "TKIP") )
885                                 c->pair_ciphers |= IWINFO_CIPHER_TKIP;
886
887                         if( strstr(val, "CCMP") )
888                                 c->pair_ciphers |= IWINFO_CIPHER_CCMP;
889
890                         if( strstr(val, "NONE") )
891                                 c->pair_ciphers |= IWINFO_CIPHER_NONE;
892                 }
893
894                 if( (val = nl80211_getval(ifname, res, "auth_algs")) != NULL )
895                 {
896                         switch(atoi(val)) {
897                                 case 1:
898                                         c->auth_algs |= IWINFO_AUTH_OPEN;
899                                         break;
900
901                                 case 2:
902                                         c->auth_algs |= IWINFO_AUTH_SHARED;
903                                         break;
904
905                                 case 3:
906                                         c->auth_algs |= IWINFO_AUTH_OPEN;
907                                         c->auth_algs |= IWINFO_AUTH_SHARED;
908                                         break;
909
910                                 default:
911                                         break;
912                         }
913
914                         for( i = 0; i < 4; i++ )
915                         {
916                                 snprintf(k, sizeof(k), "wep_key%d", i);
917
918                                 if( (val = nl80211_getval(ifname, res, k)) )
919                                 {
920                                         if( (strlen(val) == 5) || (strlen(val) == 10) )
921                                                 c->pair_ciphers |= IWINFO_CIPHER_WEP40;
922
923                                         else if( (strlen(val) == 13) || (strlen(val) == 26) )
924                                                 c->pair_ciphers |= IWINFO_CIPHER_WEP104;
925                                 }
926                         }
927                 }
928
929                 c->group_ciphers = c->pair_ciphers;
930                 c->enabled = (c->auth_algs || c->auth_suites) ? 1 : 0;
931
932                 return 0;
933         }
934
935         /* WPA supplicant */
936         else if( (res = nl80211_wpasupp_info(ifname, "STATUS")) &&
937                  (val = nl80211_getval(NULL, res, "pairwise_cipher")) )
938         {
939                 /* WEP */
940                 if( strstr(val, "WEP") )
941                 {
942                         if( strstr(val, "WEP-40") )
943                                 c->pair_ciphers |= IWINFO_CIPHER_WEP40;
944
945                         else if( strstr(val, "WEP-104") )
946                                 c->pair_ciphers |= IWINFO_CIPHER_WEP104;
947
948                         c->enabled       = 1;
949                         c->group_ciphers = c->pair_ciphers;
950
951                         c->auth_suites |= IWINFO_KMGMT_NONE;
952                         c->auth_algs   |= IWINFO_AUTH_OPEN; /* XXX: assumption */
953                 }
954
955                 /* WPA */
956                 else
957                 {
958                         if( strstr(val, "TKIP") )
959                                 c->pair_ciphers |= IWINFO_CIPHER_TKIP;
960
961                         else if( strstr(val, "CCMP") )
962                                 c->pair_ciphers |= IWINFO_CIPHER_CCMP;
963
964                         else if( strstr(val, "NONE") )
965                                 c->pair_ciphers |= IWINFO_CIPHER_NONE;
966
967                         else if( strstr(val, "WEP-40") )
968                                 c->pair_ciphers |= IWINFO_CIPHER_WEP40;
969
970                         else if( strstr(val, "WEP-104") )
971                                 c->pair_ciphers |= IWINFO_CIPHER_WEP104;
972
973
974                         if( (val = nl80211_getval(NULL, res, "group_cipher")) )
975                         {
976                                 if( strstr(val, "TKIP") )
977                                         c->group_ciphers |= IWINFO_CIPHER_TKIP;
978
979                                 else if( strstr(val, "CCMP") )
980                                         c->group_ciphers |= IWINFO_CIPHER_CCMP;
981
982                                 else if( strstr(val, "NONE") )
983                                         c->group_ciphers |= IWINFO_CIPHER_NONE;
984
985                                 else if( strstr(val, "WEP-40") )
986                                         c->group_ciphers |= IWINFO_CIPHER_WEP40;
987
988                                 else if( strstr(val, "WEP-104") )
989                                         c->group_ciphers |= IWINFO_CIPHER_WEP104;
990                         }
991
992
993                         if( (val = nl80211_getval(NULL, res, "key_mgmt")) )
994                         {
995                                 if( strstr(val, "WPA2") )
996                                         c->wpa_version = 2;
997
998                                 else if( strstr(val, "WPA") )
999                                         c->wpa_version = 1;
1000
1001
1002                                 if( strstr(val, "PSK") )
1003                                         c->auth_suites |= IWINFO_KMGMT_PSK;
1004
1005                                 else if( strstr(val, "EAP") || strstr(val, "802.1X") )
1006                                         c->auth_suites |= IWINFO_KMGMT_8021x;
1007
1008                                 else if( strstr(val, "NONE") )
1009                                         c->auth_suites |= IWINFO_KMGMT_NONE;
1010                         }
1011
1012                         c->enabled = (c->wpa_version && c->auth_suites) ? 1 : 0;
1013                 }
1014
1015                 return 0;
1016         }
1017
1018         return -1;
1019 }
1020
1021
1022 static int nl80211_get_assoclist_cb(struct nl_msg *msg, void *arg)
1023 {
1024         struct nl80211_assoc_count *ac = arg;
1025         struct genlmsghdr *gnlh = nlmsg_data(nlmsg_hdr(msg));
1026         struct nlattr *attr[NL80211_ATTR_MAX + 1];
1027         struct nlattr *sinfo[NL80211_STA_INFO_MAX + 1];
1028
1029         static struct nla_policy stats_policy[NL80211_STA_INFO_MAX + 1] = {
1030                 [NL80211_STA_INFO_INACTIVE_TIME] = { .type = NLA_U32    },
1031                 [NL80211_STA_INFO_RX_BYTES]      = { .type = NLA_U32    },
1032                 [NL80211_STA_INFO_TX_BYTES]      = { .type = NLA_U32    },
1033                 [NL80211_STA_INFO_RX_PACKETS]    = { .type = NLA_U32    },
1034                 [NL80211_STA_INFO_TX_PACKETS]    = { .type = NLA_U32    },
1035                 [NL80211_STA_INFO_SIGNAL]        = { .type = NLA_U8     },
1036                 [NL80211_STA_INFO_TX_BITRATE]    = { .type = NLA_NESTED },
1037                 [NL80211_STA_INFO_LLID]          = { .type = NLA_U16    },
1038                 [NL80211_STA_INFO_PLID]          = { .type = NLA_U16    },
1039                 [NL80211_STA_INFO_PLINK_STATE]   = { .type = NLA_U8     },
1040         };
1041
1042         nla_parse(attr, NL80211_ATTR_MAX, genlmsg_attrdata(gnlh, 0),
1043                 genlmsg_attrlen(gnlh, 0), NULL);
1044
1045         if( attr[NL80211_ATTR_MAC] )
1046                 memcpy(ac->entry->mac, nla_data(attr[NL80211_ATTR_MAC]), 6);
1047
1048         if( attr[NL80211_ATTR_STA_INFO] )
1049         {
1050                 if( !nla_parse_nested(sinfo, NL80211_STA_INFO_MAX,
1051                                 attr[NL80211_ATTR_STA_INFO], stats_policy) )
1052                 {
1053                         if( sinfo[NL80211_STA_INFO_SIGNAL] )
1054                                 ac->entry->signal = nla_get_u8(sinfo[NL80211_STA_INFO_SIGNAL]);
1055                 }
1056         }
1057
1058         ac->entry->noise = ac->noise;
1059         ac->entry++;
1060         ac->count++;
1061
1062         return NL_SKIP;
1063 }
1064
1065 int nl80211_get_assoclist(const char *ifname, char *buf, int *len)
1066 {
1067         struct nl80211_assoc_count ac;
1068         struct nl80211_msg_conveyor *req;
1069
1070         nl80211_get_noise(ifname, &ac.noise);
1071
1072         req = nl80211_msg(ifname, NL80211_CMD_GET_STATION, NLM_F_DUMP);
1073         if( req )
1074         {
1075                 ac.count = 0;
1076                 ac.entry = (struct iwinfo_assoclist_entry *)buf;
1077
1078                 nl80211_cb(req, nl80211_get_assoclist_cb, &ac);
1079                 nl80211_send(req);
1080                 nl80211_free(req);
1081
1082                 *len = (ac.count * sizeof(struct iwinfo_assoclist_entry));
1083                 return 0;
1084         }
1085
1086         return -1;
1087 }
1088
1089 int nl80211_get_txpwrlist(const char *ifname, char *buf, int *len)
1090 {
1091         int ch_cur, ch_cmp, bands_remain, freqs_remain;
1092         int dbm_max = -1, dbm_cur, dbm_cnt;
1093         struct nl80211_msg_conveyor *req, *res;
1094         struct nlattr *bands[NL80211_BAND_ATTR_MAX + 1];
1095         struct nlattr *freqs[NL80211_FREQUENCY_ATTR_MAX + 1];
1096         struct nlattr *band, *freq;
1097         struct iwinfo_txpwrlist_entry entry;
1098
1099         static struct nla_policy freq_policy[NL80211_FREQUENCY_ATTR_MAX + 1] = {
1100                 [NL80211_FREQUENCY_ATTR_FREQ]         = { .type = NLA_U32  },
1101                 [NL80211_FREQUENCY_ATTR_DISABLED]     = { .type = NLA_FLAG },
1102                 [NL80211_FREQUENCY_ATTR_PASSIVE_SCAN] = { .type = NLA_FLAG },
1103                 [NL80211_FREQUENCY_ATTR_NO_IBSS]      = { .type = NLA_FLAG },
1104                 [NL80211_FREQUENCY_ATTR_RADAR]        = { .type = NLA_FLAG },
1105                 [NL80211_FREQUENCY_ATTR_MAX_TX_POWER] = { .type = NLA_U32  },
1106         };
1107
1108         if( nl80211_get_channel(ifname, &ch_cur) )
1109                 ch_cur = 0;
1110
1111         req = nl80211_msg(ifname, NL80211_CMD_GET_WIPHY, 0);
1112         if( req )
1113         {
1114                 res = nl80211_send(req);
1115                 if( res )
1116                 {
1117                         nla_for_each_nested(band,
1118                                 res->attr[NL80211_ATTR_WIPHY_BANDS], bands_remain)
1119                         {
1120                                 nla_parse(bands, NL80211_BAND_ATTR_MAX, nla_data(band),
1121                                           nla_len(band), NULL);
1122
1123                                 nla_for_each_nested(freq,
1124                                         bands[NL80211_BAND_ATTR_FREQS], freqs_remain)
1125                                 {
1126                                         nla_parse(freqs, NL80211_FREQUENCY_ATTR_MAX,
1127                                                 nla_data(freq), nla_len(freq), freq_policy);
1128
1129                                         ch_cmp = nl80211_freq2channel(
1130                                                 nla_get_u32(freqs[NL80211_FREQUENCY_ATTR_FREQ]));
1131
1132                                         if( (!ch_cur || (ch_cmp == ch_cur)) &&
1133                                             freqs[NL80211_FREQUENCY_ATTR_MAX_TX_POWER] )
1134                                         {
1135                                                 dbm_max = (int)(0.01 * nla_get_u32(
1136                                                         freqs[NL80211_FREQUENCY_ATTR_MAX_TX_POWER]));
1137
1138                                                 break;
1139                                         }
1140                                 }
1141                         }
1142
1143                         nl80211_free(res);
1144                 }
1145                 nl80211_free(req);
1146         }
1147
1148         if( dbm_max > -1 )
1149         {
1150                 for( dbm_cur = 0, dbm_cnt = 0;
1151                      dbm_cur < dbm_max;
1152                      dbm_cur += 2, dbm_cnt++ )
1153                 {
1154                         entry.dbm = dbm_cur;
1155                         entry.mw  = iwinfo_dbm2mw(dbm_cur);
1156
1157                         memcpy(&buf[dbm_cnt * sizeof(entry)], &entry, sizeof(entry));
1158                 }
1159
1160                 entry.dbm = dbm_max;
1161                 entry.mw  = iwinfo_dbm2mw(dbm_max);
1162
1163                 memcpy(&buf[dbm_cnt * sizeof(entry)], &entry, sizeof(entry));
1164                 dbm_cnt++;
1165
1166                 *len = dbm_cnt * sizeof(entry);
1167                 return 0;
1168         }
1169
1170         return -1;
1171 }
1172
1173 static void nl80211_get_scancrypto(const char *spec,
1174         struct iwinfo_crypto_entry *c)
1175 {
1176         if( strstr(spec, "OPEN") )
1177         {
1178                 c->enabled = 0;
1179         }
1180         else
1181         {
1182                 c->enabled = 1;
1183
1184                 if( strstr(spec, "WPA2-") && strstr(spec, "WPA-") )
1185                         c->wpa_version = 3;
1186
1187                 else if( strstr(spec, "WPA2") )
1188                         c->wpa_version = 2;
1189
1190                 else if( strstr(spec, "WPA") )
1191                         c->wpa_version = 1;
1192
1193                 else if( strstr(spec, "WEP") )
1194                         c->auth_algs = IWINFO_AUTH_OPEN | IWINFO_AUTH_SHARED;
1195
1196
1197                 if( strstr(spec, "PSK") )
1198                         c->auth_suites |= IWINFO_KMGMT_PSK;
1199
1200                 if( strstr(spec, "802.1X") || strstr(spec, "EAP") )
1201                         c->auth_suites |= IWINFO_KMGMT_8021x;
1202
1203                 if( strstr(spec, "WPA-NONE") )
1204                         c->auth_suites |= IWINFO_KMGMT_NONE;
1205
1206
1207                 if( strstr(spec, "TKIP") )
1208                         c->pair_ciphers |= IWINFO_CIPHER_TKIP;
1209
1210                 if( strstr(spec, "CCMP") )
1211                         c->pair_ciphers |= IWINFO_CIPHER_CCMP;
1212
1213                 if( strstr(spec, "WEP-40") )
1214                         c->pair_ciphers |= IWINFO_CIPHER_WEP40;
1215
1216                 if( strstr(spec, "WEP-104") )
1217                         c->pair_ciphers |= IWINFO_CIPHER_WEP104;
1218
1219                 c->group_ciphers = c->pair_ciphers;
1220         }
1221 }
1222
1223 int nl80211_get_scanlist(const char *ifname, char *buf, int *len)
1224 {
1225         int freq, rssi, qmax, count;
1226         char *res;
1227         char ssid[128] = { 0 };
1228         char bssid[18] = { 0 };
1229         char cipher[256] = { 0 };
1230
1231         /* Got a radioX pseudo interface, find some interface on it or create one */
1232         if( !strncmp(ifname, "radio", 5) )
1233         {
1234                 /* Reuse existing interface */
1235                 if( (res = nl80211_phy2ifname(ifname)) != NULL )
1236                 {
1237                         return nl80211_get_scanlist(res, buf, len);
1238                 }
1239
1240                 /* Need to spawn a temporary iface for scanning */
1241                 else if( (res = nl80211_ifadd(ifname)) != NULL )
1242                 {
1243                         count = nl80211_get_scanlist(res, buf, len);
1244                         nl80211_ifdel(res);
1245                         return count;
1246                 }
1247         }
1248
1249         struct iwinfo_scanlist_entry *e = (struct iwinfo_scanlist_entry *)buf;
1250
1251         /* WPA supplicant */
1252         if( (res = nl80211_wpasupp_info(ifname, "SCAN")) && !strcmp(res, "OK\n") )
1253         {
1254                 sleep(2);
1255
1256                 if( (res = nl80211_wpasupp_info(ifname, "SCAN_RESULTS")) )
1257                 {
1258                         nl80211_get_quality_max(ifname, &qmax);
1259
1260                         /* skip header line */
1261                         while( *res++ != '\n' );
1262
1263                         count = 0;
1264
1265                         while( sscanf(res, "%17s %d %d %255s %127[^\n]\n",
1266                                       bssid, &freq, &rssi, cipher, ssid) > 0 )
1267                         {
1268                                 /* BSSID */
1269                                 e->mac[0] = strtol(&bssid[0],  NULL, 16);
1270                                 e->mac[1] = strtol(&bssid[3],  NULL, 16);
1271                                 e->mac[2] = strtol(&bssid[6],  NULL, 16);
1272                                 e->mac[3] = strtol(&bssid[9],  NULL, 16);
1273                                 e->mac[4] = strtol(&bssid[12], NULL, 16);
1274                                 e->mac[5] = strtol(&bssid[15], NULL, 16);
1275
1276                                 /* SSID */
1277                                 memcpy(e->ssid, ssid,
1278                                         min(strlen(ssid), sizeof(e->ssid) - 1));
1279
1280                                 /* Mode (assume master) */
1281                                 sprintf((char *)e->mode, "Master");
1282
1283                                 /* Channel */
1284                                 e->channel = nl80211_freq2channel(freq);
1285
1286                                 /* Signal */
1287                                 e->signal = rssi;
1288
1289                                 /* Quality */
1290                                 if( rssi < 0 )
1291                                 {
1292                                         /* The cfg80211 wext compat layer assumes a signal range
1293                                          * of -110 dBm to -40 dBm, the quality value is derived
1294                                          * by adding 110 to the signal level */
1295                                         if( rssi < -110 )
1296                                                 rssi = -110;
1297                                         else if( rssi > -40 )
1298                                                 rssi = -40;
1299
1300                                         e->quality = (rssi + 110);
1301                                 }
1302                                 else
1303                                 {
1304                                         e->quality = rssi;
1305                                 }
1306
1307                                 /* Max. Quality */
1308                                 e->quality_max = qmax;
1309
1310                                 /* Crypto */
1311                                 nl80211_get_scancrypto(cipher, &e->crypto);
1312
1313                                 /* advance to next line */
1314                                 while( *res && *res++ != '\n' );
1315
1316                                 count++;
1317                                 e++;
1318                         }
1319
1320                         *len = count * sizeof(struct iwinfo_scanlist_entry);
1321                         return 0;
1322                 }
1323         }
1324
1325         /* AP scan */
1326         else
1327         {
1328                 /* Got a temp interface, don't create yet another one */
1329                 if( !strncmp(ifname, "tmp.", 4) )
1330                 {
1331                         if( !iwinfo_ifup(ifname) )
1332                                 return -1;
1333
1334                         wext_get_scanlist(ifname, buf, len);
1335                         iwinfo_ifdown(ifname);
1336                         return 0;
1337                 }
1338
1339                 /* Spawn a new scan interface */
1340                 else
1341                 {
1342                         if( !(res = nl80211_ifadd(ifname)) )
1343                                 goto out;
1344
1345                         if( !iwinfo_ifmac(res) )
1346                                 goto out;
1347
1348                         /* if we can take the new interface up, the driver supports an
1349                          * additional interface and there's no need to tear down the ap */
1350                         if( iwinfo_ifup(res) )
1351                         {
1352                                 wext_get_scanlist(res, buf, len);
1353                                 iwinfo_ifdown(res);
1354                         }
1355
1356                         /* driver cannot create secondary interface, take down ap
1357                          * during scan */
1358                         else if( iwinfo_ifdown(ifname) && iwinfo_ifup(res) )
1359                         {
1360                                 wext_get_scanlist(res, buf, len);
1361                                 iwinfo_ifdown(res);
1362                                 iwinfo_ifup(ifname);
1363                                 nl80211_hostapd_hup(ifname);
1364                         }
1365
1366                 out:
1367                         nl80211_ifdel(res);
1368                         return 0;
1369                 }
1370         }
1371
1372         return -1;
1373 }
1374
1375 int nl80211_get_freqlist(const char *ifname, char *buf, int *len)
1376 {
1377         int count = 0, bands_remain, freqs_remain;
1378         struct nl80211_msg_conveyor *req, *res;
1379         struct nlattr *bands[NL80211_BAND_ATTR_MAX + 1];
1380         struct nlattr *freqs[NL80211_FREQUENCY_ATTR_MAX + 1];
1381         struct nlattr *band, *freq;
1382         struct iwinfo_freqlist_entry *e = (struct iwinfo_freqlist_entry *)buf;
1383
1384         req = nl80211_msg(ifname, NL80211_CMD_GET_WIPHY, 0);
1385         if( req )
1386         {
1387                 res = nl80211_send(req);
1388                 if( res )
1389                 {
1390                         nla_for_each_nested(band,
1391                                 res->attr[NL80211_ATTR_WIPHY_BANDS], bands_remain)
1392                         {
1393                                 nla_parse(bands, NL80211_BAND_ATTR_MAX, nla_data(band),
1394                                           nla_len(band), NULL);
1395
1396                                 nla_for_each_nested(freq,
1397                                         bands[NL80211_BAND_ATTR_FREQS], freqs_remain)
1398                                 {
1399                                         nla_parse(freqs, NL80211_FREQUENCY_ATTR_MAX,
1400                                                 nla_data(freq), nla_len(freq), NULL);
1401
1402                                         if( !freqs[NL80211_FREQUENCY_ATTR_FREQ] ||
1403                                             freqs[NL80211_FREQUENCY_ATTR_DISABLED] )
1404                                                 continue;
1405
1406                                         e->mhz = nla_get_u32(freqs[NL80211_FREQUENCY_ATTR_FREQ]);
1407                                         e->channel = nl80211_freq2channel(e->mhz);
1408
1409                                         e->restricted = (
1410                                                 freqs[NL80211_FREQUENCY_ATTR_PASSIVE_SCAN] ||
1411                                                 freqs[NL80211_FREQUENCY_ATTR_NO_IBSS]      ||
1412                                                 freqs[NL80211_FREQUENCY_ATTR_RADAR]
1413                                         ) ? 1 : 0;
1414
1415                                         e++;
1416                                         count++;
1417                                 }
1418                         }
1419                         nl80211_free(res);
1420                 }
1421                 nl80211_free(req);
1422         }
1423
1424         if( count > 0 )
1425         {
1426                 *len = count * sizeof(struct iwinfo_freqlist_entry);
1427                 return 0;
1428         }
1429
1430         return -1;
1431 }
1432
1433 int nl80211_get_country(const char *ifname, char *buf)
1434 {
1435         int rv = -1;
1436         struct nl80211_msg_conveyor *req, *res;
1437
1438         req = nl80211_msg(ifname, NL80211_CMD_GET_REG, 0);
1439         if( req )
1440         {
1441                 res = nl80211_send(req);
1442                 if( res )
1443                 {
1444                         if( res->attr[NL80211_ATTR_REG_ALPHA2] )
1445                         {
1446                                 memcpy(buf, nla_data(res->attr[NL80211_ATTR_REG_ALPHA2]), 2);
1447                                 rv = 0;
1448                         }
1449                         nl80211_free(res);
1450                 }
1451                 nl80211_free(req);
1452         }
1453
1454         return rv;
1455 }
1456
1457 int nl80211_get_countrylist(const char *ifname, char *buf, int *len)
1458 {
1459         int i, count;
1460         struct iwinfo_iso3166_label *l;
1461         struct iwinfo_country_entry *e = (struct iwinfo_country_entry *)buf;
1462
1463         for( l = ISO3166_Names, count = 0; l->iso3166; l++, e++, count++ )
1464         {
1465                 e->iso3166 = l->iso3166;
1466                 e->ccode[0] = (l->iso3166 / 256);
1467                 e->ccode[1] = (l->iso3166 % 256);
1468         }
1469
1470         *len = (count * sizeof(struct iwinfo_country_entry));
1471         return 0;
1472 }
1473
1474 int nl80211_get_hwmodelist(const char *ifname, int *buf)
1475 {
1476         int bands_remain, freqs_remain;
1477         struct nl80211_msg_conveyor *req, *res;
1478         struct nlattr *bands[NL80211_BAND_ATTR_MAX + 1];
1479         struct nlattr *freqs[NL80211_FREQUENCY_ATTR_MAX + 1];
1480         struct nlattr *band, *freq;
1481         uint16_t caps = 0;
1482
1483         req = nl80211_msg(ifname, NL80211_CMD_GET_WIPHY, 0);
1484         if( req )
1485         {
1486                 res = nl80211_send(req);
1487                 if( res )
1488                 {
1489                         nla_for_each_nested(band,
1490                                 res->attr[NL80211_ATTR_WIPHY_BANDS], bands_remain)
1491                         {
1492                                 nla_parse(bands, NL80211_BAND_ATTR_MAX, nla_data(band),
1493                                           nla_len(band), NULL);
1494
1495                                 if( bands[NL80211_BAND_ATTR_HT_CAPA] )
1496                                         caps = nla_get_u16(bands[NL80211_BAND_ATTR_HT_CAPA]);
1497
1498                                 /* Treat any nonzero capability as 11n */
1499                                 if( caps > 0 )
1500                                         *buf |= IWINFO_80211_N;
1501
1502                                 nla_for_each_nested(freq,
1503                                         bands[NL80211_BAND_ATTR_FREQS], freqs_remain)
1504                                 {
1505                                         nla_parse(freqs, NL80211_FREQUENCY_ATTR_MAX,
1506                                                 nla_data(freq), nla_len(freq), NULL);
1507
1508                                         if( !freqs[NL80211_FREQUENCY_ATTR_FREQ] )
1509                                                 continue;
1510
1511                                         if( nla_get_u32(freqs[NL80211_FREQUENCY_ATTR_FREQ]) < 2485 )
1512                                         {
1513                                                 *buf |= IWINFO_80211_B;
1514                                                 *buf |= IWINFO_80211_G;
1515                                         }
1516                                         else
1517                                         {
1518                                                 *buf |= IWINFO_80211_A;
1519                                         }
1520                                 }
1521                         }
1522                         nl80211_free(res);
1523                 }
1524                 nl80211_free(req);
1525         }
1526
1527         return *buf ? 0 : -1;
1528 }
1529
1530 int nl80211_get_mbssid_support(const char *ifname, int *buf)
1531 {
1532         /* Test whether we can create another interface */
1533         char *nif = nl80211_ifadd(ifname);
1534
1535         if( nif )
1536         {
1537                 *buf = (iwinfo_ifmac(nif) && iwinfo_ifup(nif));
1538
1539                 iwinfo_ifdown(nif);
1540                 nl80211_ifdel(nif);
1541
1542                 return 0;
1543         }
1544
1545         return -1;
1546 }