[package] add libiwinfo (moved from LuCI trunk)
[openwrt/svn-archive/archive.git] / package / iwinfo / src / iwinfo_lua.c
1 /*
2 * iwinfo - Wireless Information Library - Lua Bindings
3 *
4 * Copyright (C) 2009 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
19 #include "iwinfo/lua.h"
20
21
22 /* Determine type */
23 static int iwinfo_L_type(lua_State *L)
24 {
25 const char *ifname = luaL_checkstring(L, 1);
26 const char *type = iwinfo_type(ifname);
27
28 if (type)
29 lua_pushstring(L, type);
30 else
31 lua_pushnil(L);
32
33 return 1;
34 }
35
36 /* Shutdown backends */
37 static int iwinfo_L__gc(lua_State *L)
38 {
39 iwinfo_finish();
40 return 0;
41 }
42
43 /*
44 * Build a short textual description of the crypto info
45 */
46
47 static char * iwinfo_crypto_print_ciphers(int ciphers)
48 {
49 static char str[128] = { 0 };
50 char *pos = str;
51
52 if (ciphers & IWINFO_CIPHER_WEP40)
53 pos += sprintf(pos, "WEP-40, ");
54
55 if (ciphers & IWINFO_CIPHER_WEP104)
56 pos += sprintf(pos, "WEP-104, ");
57
58 if (ciphers & IWINFO_CIPHER_TKIP)
59 pos += sprintf(pos, "TKIP, ");
60
61 if (ciphers & IWINFO_CIPHER_CCMP)
62 pos += sprintf(pos, "CCMP, ");
63
64 if (ciphers & IWINFO_CIPHER_WRAP)
65 pos += sprintf(pos, "WRAP, ");
66
67 if (ciphers & IWINFO_CIPHER_AESOCB)
68 pos += sprintf(pos, "AES-OCB, ");
69
70 if (ciphers & IWINFO_CIPHER_CKIP)
71 pos += sprintf(pos, "CKIP, ");
72
73 if (!ciphers || (ciphers & IWINFO_CIPHER_NONE))
74 pos += sprintf(pos, "NONE, ");
75
76 *(pos - 2) = 0;
77
78 return str;
79 }
80
81 static char * iwinfo_crypto_print_suites(int suites)
82 {
83 static char str[64] = { 0 };
84 char *pos = str;
85
86 if (suites & IWINFO_KMGMT_PSK)
87 pos += sprintf(pos, "PSK/");
88
89 if (suites & IWINFO_KMGMT_8021x)
90 pos += sprintf(pos, "802.1X/");
91
92 if (!suites || (suites & IWINFO_KMGMT_NONE))
93 pos += sprintf(pos, "NONE/");
94
95 *(pos - 1) = 0;
96
97 return str;
98 }
99
100 static char * iwinfo_crypto_desc(struct iwinfo_crypto_entry *c)
101 {
102 static char desc[512] = { 0 };
103
104 if (c)
105 {
106 if (c->enabled)
107 {
108 /* WEP */
109 if (c->auth_algs && !c->wpa_version)
110 {
111 if ((c->auth_algs & IWINFO_AUTH_OPEN) &&
112 (c->auth_algs & IWINFO_AUTH_SHARED))
113 {
114 sprintf(desc, "WEP Open/Shared (%s)",
115 iwinfo_crypto_print_ciphers(c->pair_ciphers));
116 }
117 else if (c->auth_algs & IWINFO_AUTH_OPEN)
118 {
119 sprintf(desc, "WEP Open System (%s)",
120 iwinfo_crypto_print_ciphers(c->pair_ciphers));
121 }
122 else if (c->auth_algs & IWINFO_AUTH_SHARED)
123 {
124 sprintf(desc, "WEP Shared Auth (%s)",
125 iwinfo_crypto_print_ciphers(c->pair_ciphers));
126 }
127 }
128
129 /* WPA */
130 else if (c->wpa_version)
131 {
132 switch (c->wpa_version) {
133 case 3:
134 sprintf(desc, "mixed WPA/WPA2 %s (%s)",
135 iwinfo_crypto_print_suites(c->auth_suites),
136 iwinfo_crypto_print_ciphers(
137 c->pair_ciphers & c->group_ciphers));
138 break;
139
140 case 2:
141 sprintf(desc, "WPA2 %s (%s)",
142 iwinfo_crypto_print_suites(c->auth_suites),
143 iwinfo_crypto_print_ciphers(
144 c->pair_ciphers & c->group_ciphers));
145 break;
146
147 case 1:
148 sprintf(desc, "WPA %s (%s)",
149 iwinfo_crypto_print_suites(c->auth_suites),
150 iwinfo_crypto_print_ciphers(
151 c->pair_ciphers & c->group_ciphers));
152 break;
153 }
154 }
155 else
156 {
157 sprintf(desc, "None");
158 }
159 }
160 else
161 {
162 sprintf(desc, "None");
163 }
164 }
165 else
166 {
167 sprintf(desc, "Unknown");
168 }
169
170 return desc;
171 }
172
173 /* Build Lua table from crypto data */
174 static void iwinfo_L_cryptotable(lua_State *L, struct iwinfo_crypto_entry *c)
175 {
176 int i, j;
177
178 lua_newtable(L);
179
180 lua_pushboolean(L, c->enabled);
181 lua_setfield(L, -2, "enabled");
182
183 lua_pushstring(L, iwinfo_crypto_desc(c));
184 lua_setfield(L, -2, "description");
185
186 lua_pushboolean(L, (c->enabled && !c->wpa_version));
187 lua_setfield(L, -2, "wep");
188
189 lua_pushinteger(L, c->wpa_version);
190 lua_setfield(L, -2, "wpa");
191
192 lua_newtable(L);
193 for (i = 0, j = 1; i < 8; i++)
194 {
195 if (c->pair_ciphers & (1 << i))
196 {
197 lua_pushstring(L, IWINFO_CIPHER_NAMES[i]);
198 lua_rawseti(L, -2, j++);
199 }
200 }
201 lua_setfield(L, -2, "pair_ciphers");
202
203 lua_newtable(L);
204 for (i = 0, j = 1; i < 8; i++)
205 {
206 if (c->group_ciphers & (1 << i))
207 {
208 lua_pushstring(L, IWINFO_CIPHER_NAMES[i]);
209 lua_rawseti(L, -2, j++);
210 }
211 }
212 lua_setfield(L, -2, "group_ciphers");
213
214 lua_newtable(L);
215 for (i = 0, j = 1; i < 8; i++)
216 {
217 if (c->auth_suites & (1 << i))
218 {
219 lua_pushstring(L, IWINFO_KMGMT_NAMES[i]);
220 lua_rawseti(L, -2, j++);
221 }
222 }
223 lua_setfield(L, -2, "auth_suites");
224
225 lua_newtable(L);
226 for (i = 0, j = 1; i < 8; i++)
227 {
228 if (c->auth_algs & (1 << i))
229 {
230 lua_pushstring(L, IWINFO_AUTH_NAMES[i]);
231 lua_rawseti(L, -2, j++);
232 }
233 }
234 lua_setfield(L, -2, "auth_algs");
235 }
236
237
238 /* Wrapper for assoclist */
239 static int iwinfo_L_assoclist(lua_State *L, int (*func)(const char *, char *, int *))
240 {
241 int i, len;
242 char rv[IWINFO_BUFSIZE];
243 char macstr[18];
244 const char *ifname = luaL_checkstring(L, 1);
245 struct iwinfo_assoclist_entry *e;
246
247 lua_newtable(L);
248 memset(rv, 0, sizeof(rv));
249
250 if (!(*func)(ifname, rv, &len))
251 {
252 for (i = 0; i < len; i += sizeof(struct iwinfo_assoclist_entry))
253 {
254 e = (struct iwinfo_assoclist_entry *) &rv[i];
255
256 sprintf(macstr, "%02X:%02X:%02X:%02X:%02X:%02X",
257 e->mac[0], e->mac[1], e->mac[2],
258 e->mac[3], e->mac[4], e->mac[5]);
259
260 lua_newtable(L);
261
262 lua_pushnumber(L, e->signal);
263 lua_setfield(L, -2, "signal");
264
265 lua_pushnumber(L, e->noise);
266 lua_setfield(L, -2, "noise");
267
268 lua_setfield(L, -2, macstr);
269 }
270 }
271
272 return 1;
273 }
274
275 /* Wrapper for tx power list */
276 static int iwinfo_L_txpwrlist(lua_State *L, int (*func)(const char *, char *, int *))
277 {
278 int i, x, len;
279 char rv[IWINFO_BUFSIZE];
280 const char *ifname = luaL_checkstring(L, 1);
281 struct iwinfo_txpwrlist_entry *e;
282
283 lua_newtable(L);
284 memset(rv, 0, sizeof(rv));
285
286 if (!(*func)(ifname, rv, &len))
287 {
288 for (i = 0, x = 1; i < len; i += sizeof(struct iwinfo_txpwrlist_entry), x++)
289 {
290 e = (struct iwinfo_txpwrlist_entry *) &rv[i];
291
292 lua_newtable(L);
293
294 lua_pushnumber(L, e->mw);
295 lua_setfield(L, -2, "mw");
296
297 lua_pushnumber(L, e->dbm);
298 lua_setfield(L, -2, "dbm");
299
300 lua_rawseti(L, -2, x);
301 }
302 }
303
304 return 1;
305 }
306
307 /* Wrapper for scan list */
308 static int iwinfo_L_scanlist(lua_State *L, int (*func)(const char *, char *, int *))
309 {
310 int i, x, len;
311 char rv[IWINFO_BUFSIZE];
312 char macstr[18];
313 const char *ifname = luaL_checkstring(L, 1);
314 struct iwinfo_scanlist_entry *e;
315
316 lua_newtable(L);
317 memset(rv, 0, sizeof(rv));
318
319 if (!(*func)(ifname, rv, &len))
320 {
321 for (i = 0, x = 1; i < len; i += sizeof(struct iwinfo_scanlist_entry), x++)
322 {
323 e = (struct iwinfo_scanlist_entry *) &rv[i];
324
325 lua_newtable(L);
326
327 /* BSSID */
328 sprintf(macstr, "%02X:%02X:%02X:%02X:%02X:%02X",
329 e->mac[0], e->mac[1], e->mac[2],
330 e->mac[3], e->mac[4], e->mac[5]);
331
332 lua_pushstring(L, macstr);
333 lua_setfield(L, -2, "bssid");
334
335 /* ESSID */
336 if (e->ssid[0])
337 {
338 lua_pushstring(L, (char *) e->ssid);
339 lua_setfield(L, -2, "ssid");
340 }
341
342 /* Channel */
343 lua_pushinteger(L, e->channel);
344 lua_setfield(L, -2, "channel");
345
346 /* Mode */
347 lua_pushstring(L, (char *) e->mode);
348 lua_setfield(L, -2, "mode");
349
350 /* Quality, Signal */
351 lua_pushinteger(L, e->quality);
352 lua_setfield(L, -2, "quality");
353
354 lua_pushinteger(L, e->quality_max);
355 lua_setfield(L, -2, "quality_max");
356
357 lua_pushnumber(L, (e->signal - 0x100));
358 lua_setfield(L, -2, "signal");
359
360 /* Crypto */
361 iwinfo_L_cryptotable(L, &e->crypto);
362 lua_setfield(L, -2, "encryption");
363
364 lua_rawseti(L, -2, x);
365 }
366 }
367
368 return 1;
369 }
370
371 /* Wrapper for frequency list */
372 static int iwinfo_L_freqlist(lua_State *L, int (*func)(const char *, char *, int *))
373 {
374 int i, x, len;
375 char rv[IWINFO_BUFSIZE];
376 const char *ifname = luaL_checkstring(L, 1);
377 struct iwinfo_freqlist_entry *e;
378
379 lua_newtable(L);
380 memset(rv, 0, sizeof(rv));
381
382 if (!(*func)(ifname, rv, &len))
383 {
384 for (i = 0, x = 1; i < len; i += sizeof(struct iwinfo_freqlist_entry), x++)
385 {
386 e = (struct iwinfo_freqlist_entry *) &rv[i];
387
388 lua_newtable(L);
389
390 /* MHz */
391 lua_pushinteger(L, e->mhz);
392 lua_setfield(L, -2, "mhz");
393
394 /* Channel */
395 lua_pushinteger(L, e->channel);
396 lua_setfield(L, -2, "channel");
397
398 /* Restricted (DFS/TPC/Radar) */
399 lua_pushboolean(L, e->restricted);
400 lua_setfield(L, -2, "restricted");
401
402 lua_rawseti(L, -2, x);
403 }
404 }
405
406 return 1;
407 }
408
409 /* Wrapper for crypto settings */
410 static int iwinfo_L_encryption(lua_State *L, int (*func)(const char *, char *))
411 {
412 const char *ifname = luaL_checkstring(L, 1);
413 struct iwinfo_crypto_entry c = { 0 };
414
415 if (!(*func)(ifname, (char *)&c))
416 {
417 iwinfo_L_cryptotable(L, &c);
418 return 1;
419 }
420
421 lua_pushnil(L);
422 return 1;
423 }
424
425 /* Wrapper for hwmode list */
426 static int iwinfo_L_hwmodelist(lua_State *L, int (*func)(const char *, int *))
427 {
428 const char *ifname = luaL_checkstring(L, 1);
429 int hwmodes = 0;
430
431 if (!(*func)(ifname, &hwmodes))
432 {
433 lua_newtable(L);
434
435 lua_pushboolean(L, hwmodes & IWINFO_80211_A);
436 lua_setfield(L, -2, "a");
437
438 lua_pushboolean(L, hwmodes & IWINFO_80211_B);
439 lua_setfield(L, -2, "b");
440
441 lua_pushboolean(L, hwmodes & IWINFO_80211_G);
442 lua_setfield(L, -2, "g");
443
444 lua_pushboolean(L, hwmodes & IWINFO_80211_N);
445 lua_setfield(L, -2, "n");
446
447 return 1;
448 }
449
450 lua_pushnil(L);
451 return 1;
452 }
453
454 /* Wrapper for mbbsid_support */
455 static int iwinfo_L_mbssid_support(lua_State *L, int (*func)(const char *, int *))
456 {
457 const char *ifname = luaL_checkstring(L, 1);
458 int support = 0;
459
460 if (!(*func)(ifname, &support))
461 {
462 lua_pushboolean(L, support);
463 return 1;
464 }
465
466 lua_pushnil(L);
467 return 1;
468 }
469
470 /* Wrapper for country list */
471 static char * iwinfo_L_country_lookup(char *buf, int len, int iso3166)
472 {
473 int i;
474 struct iwinfo_country_entry *c;
475
476 for (i = 0; i < len; i += sizeof(struct iwinfo_country_entry))
477 {
478 c = (struct iwinfo_country_entry *) &buf[i];
479
480 if (c->iso3166 == iso3166)
481 return c->ccode;
482 }
483
484 return NULL;
485 }
486
487 static int iwinfo_L_countrylist(lua_State *L, int (*func)(const char *, char *, int *))
488 {
489 int len, i, j;
490 char rv[IWINFO_BUFSIZE], alpha2[3];
491 char *ccode;
492 const char *ifname = luaL_checkstring(L, 1);
493 const struct iwinfo_iso3166_label *l;
494
495 lua_newtable(L);
496 memset(rv, 0, sizeof(rv));
497
498 if (!(*func)(ifname, rv, &len))
499 {
500 for (l = IWINFO_ISO3166_NAMES, j = 1; l->iso3166; l++)
501 {
502 if ((ccode = iwinfo_L_country_lookup(rv, len, l->iso3166)) != NULL)
503 {
504 sprintf(alpha2, "%c%c",
505 (l->iso3166 / 256), (l->iso3166 % 256));
506
507 lua_newtable(L);
508
509 lua_pushstring(L, alpha2);
510 lua_setfield(L, -2, "alpha2");
511
512 lua_pushstring(L, ccode);
513 lua_setfield(L, -2, "ccode");
514
515 lua_pushstring(L, l->name);
516 lua_setfield(L, -2, "name");
517
518 lua_rawseti(L, -2, j++);
519 }
520 }
521 }
522
523 return 1;
524 }
525
526
527 #ifdef USE_WL
528 /* Broadcom */
529 LUA_WRAP_INT(wl,channel)
530 LUA_WRAP_INT(wl,frequency)
531 LUA_WRAP_INT(wl,txpower)
532 LUA_WRAP_INT(wl,bitrate)
533 LUA_WRAP_INT(wl,signal)
534 LUA_WRAP_INT(wl,noise)
535 LUA_WRAP_INT(wl,quality)
536 LUA_WRAP_INT(wl,quality_max)
537 LUA_WRAP_STRING(wl,mode)
538 LUA_WRAP_STRING(wl,ssid)
539 LUA_WRAP_STRING(wl,bssid)
540 LUA_WRAP_STRING(wl,country)
541 LUA_WRAP_LIST(wl,assoclist)
542 LUA_WRAP_LIST(wl,txpwrlist)
543 LUA_WRAP_LIST(wl,scanlist)
544 LUA_WRAP_LIST(wl,freqlist)
545 LUA_WRAP_LIST(wl,countrylist)
546 LUA_WRAP_LIST(wl,hwmodelist)
547 LUA_WRAP_LIST(wl,encryption)
548 LUA_WRAP_LIST(wl,mbssid_support)
549 #endif
550
551 #ifdef USE_MADWIFI
552 /* Madwifi */
553 LUA_WRAP_INT(madwifi,channel)
554 LUA_WRAP_INT(madwifi,frequency)
555 LUA_WRAP_INT(madwifi,txpower)
556 LUA_WRAP_INT(madwifi,bitrate)
557 LUA_WRAP_INT(madwifi,signal)
558 LUA_WRAP_INT(madwifi,noise)
559 LUA_WRAP_INT(madwifi,quality)
560 LUA_WRAP_INT(madwifi,quality_max)
561 LUA_WRAP_STRING(madwifi,mode)
562 LUA_WRAP_STRING(madwifi,ssid)
563 LUA_WRAP_STRING(madwifi,bssid)
564 LUA_WRAP_STRING(madwifi,country)
565 LUA_WRAP_LIST(madwifi,assoclist)
566 LUA_WRAP_LIST(madwifi,txpwrlist)
567 LUA_WRAP_LIST(madwifi,scanlist)
568 LUA_WRAP_LIST(madwifi,freqlist)
569 LUA_WRAP_LIST(madwifi,countrylist)
570 LUA_WRAP_LIST(madwifi,hwmodelist)
571 LUA_WRAP_LIST(madwifi,encryption)
572 LUA_WRAP_LIST(madwifi,mbssid_support)
573 #endif
574
575 #ifdef USE_NL80211
576 /* NL80211 */
577 LUA_WRAP_INT(nl80211,channel)
578 LUA_WRAP_INT(nl80211,frequency)
579 LUA_WRAP_INT(nl80211,txpower)
580 LUA_WRAP_INT(nl80211,bitrate)
581 LUA_WRAP_INT(nl80211,signal)
582 LUA_WRAP_INT(nl80211,noise)
583 LUA_WRAP_INT(nl80211,quality)
584 LUA_WRAP_INT(nl80211,quality_max)
585 LUA_WRAP_STRING(nl80211,mode)
586 LUA_WRAP_STRING(nl80211,ssid)
587 LUA_WRAP_STRING(nl80211,bssid)
588 LUA_WRAP_STRING(nl80211,country)
589 LUA_WRAP_LIST(nl80211,assoclist)
590 LUA_WRAP_LIST(nl80211,txpwrlist)
591 LUA_WRAP_LIST(nl80211,scanlist)
592 LUA_WRAP_LIST(nl80211,freqlist)
593 LUA_WRAP_LIST(nl80211,countrylist)
594 LUA_WRAP_LIST(nl80211,hwmodelist)
595 LUA_WRAP_LIST(nl80211,encryption)
596 LUA_WRAP_LIST(nl80211,mbssid_support)
597 #endif
598
599 /* Wext */
600 LUA_WRAP_INT(wext,channel)
601 LUA_WRAP_INT(wext,frequency)
602 LUA_WRAP_INT(wext,txpower)
603 LUA_WRAP_INT(wext,bitrate)
604 LUA_WRAP_INT(wext,signal)
605 LUA_WRAP_INT(wext,noise)
606 LUA_WRAP_INT(wext,quality)
607 LUA_WRAP_INT(wext,quality_max)
608 LUA_WRAP_STRING(wext,mode)
609 LUA_WRAP_STRING(wext,ssid)
610 LUA_WRAP_STRING(wext,bssid)
611 LUA_WRAP_STRING(wext,country)
612 LUA_WRAP_LIST(wext,assoclist)
613 LUA_WRAP_LIST(wext,txpwrlist)
614 LUA_WRAP_LIST(wext,scanlist)
615 LUA_WRAP_LIST(wext,freqlist)
616 LUA_WRAP_LIST(wext,countrylist)
617 LUA_WRAP_LIST(wext,hwmodelist)
618 LUA_WRAP_LIST(wext,encryption)
619 LUA_WRAP_LIST(wext,mbssid_support)
620
621 #ifdef USE_WL
622 /* Broadcom table */
623 static const luaL_reg R_wl[] = {
624 LUA_REG(wl,channel),
625 LUA_REG(wl,frequency),
626 LUA_REG(wl,txpower),
627 LUA_REG(wl,bitrate),
628 LUA_REG(wl,signal),
629 LUA_REG(wl,noise),
630 LUA_REG(wl,quality),
631 LUA_REG(wl,quality_max),
632 LUA_REG(wl,mode),
633 LUA_REG(wl,ssid),
634 LUA_REG(wl,bssid),
635 LUA_REG(wl,country),
636 LUA_REG(wl,assoclist),
637 LUA_REG(wl,txpwrlist),
638 LUA_REG(wl,scanlist),
639 LUA_REG(wl,freqlist),
640 LUA_REG(wl,countrylist),
641 LUA_REG(wl,hwmodelist),
642 LUA_REG(wl,encryption),
643 LUA_REG(wl,mbssid_support),
644 { NULL, NULL }
645 };
646 #endif
647
648 #ifdef USE_MADWIFI
649 /* Madwifi table */
650 static const luaL_reg R_madwifi[] = {
651 LUA_REG(madwifi,channel),
652 LUA_REG(madwifi,frequency),
653 LUA_REG(madwifi,txpower),
654 LUA_REG(madwifi,bitrate),
655 LUA_REG(madwifi,signal),
656 LUA_REG(madwifi,noise),
657 LUA_REG(madwifi,quality),
658 LUA_REG(madwifi,quality_max),
659 LUA_REG(madwifi,mode),
660 LUA_REG(madwifi,ssid),
661 LUA_REG(madwifi,bssid),
662 LUA_REG(madwifi,country),
663 LUA_REG(madwifi,assoclist),
664 LUA_REG(madwifi,txpwrlist),
665 LUA_REG(madwifi,scanlist),
666 LUA_REG(madwifi,freqlist),
667 LUA_REG(madwifi,countrylist),
668 LUA_REG(madwifi,hwmodelist),
669 LUA_REG(madwifi,encryption),
670 LUA_REG(madwifi,mbssid_support),
671 { NULL, NULL }
672 };
673 #endif
674
675 #ifdef USE_NL80211
676 /* NL80211 table */
677 static const luaL_reg R_nl80211[] = {
678 LUA_REG(nl80211,channel),
679 LUA_REG(nl80211,frequency),
680 LUA_REG(nl80211,txpower),
681 LUA_REG(nl80211,bitrate),
682 LUA_REG(nl80211,signal),
683 LUA_REG(nl80211,noise),
684 LUA_REG(nl80211,quality),
685 LUA_REG(nl80211,quality_max),
686 LUA_REG(nl80211,mode),
687 LUA_REG(nl80211,ssid),
688 LUA_REG(nl80211,bssid),
689 LUA_REG(nl80211,country),
690 LUA_REG(nl80211,assoclist),
691 LUA_REG(nl80211,txpwrlist),
692 LUA_REG(nl80211,scanlist),
693 LUA_REG(nl80211,freqlist),
694 LUA_REG(nl80211,countrylist),
695 LUA_REG(nl80211,hwmodelist),
696 LUA_REG(nl80211,encryption),
697 LUA_REG(nl80211,mbssid_support),
698 { NULL, NULL }
699 };
700 #endif
701
702 /* Wext table */
703 static const luaL_reg R_wext[] = {
704 LUA_REG(wext,channel),
705 LUA_REG(wext,frequency),
706 LUA_REG(wext,txpower),
707 LUA_REG(wext,bitrate),
708 LUA_REG(wext,signal),
709 LUA_REG(wext,noise),
710 LUA_REG(wext,quality),
711 LUA_REG(wext,quality_max),
712 LUA_REG(wext,mode),
713 LUA_REG(wext,ssid),
714 LUA_REG(wext,bssid),
715 LUA_REG(wext,country),
716 LUA_REG(wext,assoclist),
717 LUA_REG(wext,txpwrlist),
718 LUA_REG(wext,scanlist),
719 LUA_REG(wext,freqlist),
720 LUA_REG(wext,countrylist),
721 LUA_REG(wext,hwmodelist),
722 LUA_REG(wext,encryption),
723 LUA_REG(wext,mbssid_support),
724 { NULL, NULL }
725 };
726
727 /* Common */
728 static const luaL_reg R_common[] = {
729 { "type", iwinfo_L_type },
730 { "__gc", iwinfo_L__gc },
731 { NULL, NULL }
732 };
733
734
735 LUALIB_API int luaopen_iwinfo(lua_State *L) {
736 luaL_register(L, IWINFO_META, R_common);
737
738 #ifdef USE_WL
739 luaL_newmetatable(L, IWINFO_WL_META);
740 luaL_register(L, NULL, R_wl);
741 lua_pushvalue(L, -1);
742 lua_setfield(L, -2, "__index");
743 lua_setfield(L, -2, "wl");
744 #endif
745
746 #ifdef USE_MADWIFI
747 luaL_newmetatable(L, IWINFO_MADWIFI_META);
748 luaL_register(L, NULL, R_madwifi);
749 lua_pushvalue(L, -1);
750 lua_setfield(L, -2, "__index");
751 lua_setfield(L, -2, "madwifi");
752 #endif
753
754 #ifdef USE_NL80211
755 luaL_newmetatable(L, IWINFO_NL80211_META);
756 luaL_register(L, NULL, R_nl80211);
757 lua_pushvalue(L, -1);
758 lua_setfield(L, -2, "__index");
759 lua_setfield(L, -2, "nl80211");
760 #endif
761
762 luaL_newmetatable(L, IWINFO_WEXT_META);
763 luaL_register(L, NULL, R_wext);
764 lua_pushvalue(L, -1);
765 lua_setfield(L, -2, "__index");
766 lua_setfield(L, -2, "wext");
767
768 return 1;
769 }