libiwinfo: rename liblua files to lua
authorJo-Philipp Wich <jow@openwrt.org>
Fri, 2 Dec 2011 20:53:11 +0000 (20:53 +0000)
committerJo-Philipp Wich <jow@openwrt.org>
Fri, 2 Dec 2011 20:53:11 +0000 (20:53 +0000)
contrib/package/iwinfo/src/Makefile
contrib/package/iwinfo/src/include/iwinfo/lua.h [new file with mode: 0644]
contrib/package/iwinfo/src/include/iwinfo/lualib.h [deleted file]
contrib/package/iwinfo/src/iwinfo_lua.c [new file with mode: 0644]
contrib/package/iwinfo/src/iwinfo_lualib.c [deleted file]

index 07857ca3789db221c7f05eb0329e24d08ee320c5..f8e624412a5ae292e2f5c4520c9f8e1bc7f3b575 100644 (file)
@@ -7,7 +7,7 @@ IWINFO_OBJ         = iwinfo_utils.o iwinfo_wext.o iwinfo_wext_scan.o iwinfo_lib.
 
 IWINFO_LUA_LDFLAGS = $(LDFLAGS) -shared -L. -liwinfo -llua
 IWINFO_LUA_SO      = iwinfo.so
-IWINFO_LUA_OBJ     = iwinfo_lualib.o
+IWINFO_LUA_OBJ     = iwinfo_lua.o
 
 ifneq ($(filter wl,$(IWINFO_BACKENDS)),)
        IWINFO_CFLAGS  += -DUSE_WL
diff --git a/contrib/package/iwinfo/src/include/iwinfo/lua.h b/contrib/package/iwinfo/src/include/iwinfo/lua.h
new file mode 100644 (file)
index 0000000..65a3a5c
--- /dev/null
@@ -0,0 +1,81 @@
+/*
+ * iwinfo - Wireless Information Library - Lua Headers
+ *
+ *   Copyright (C) 2009 Jo-Philipp Wich <xm@subsignal.org>
+ *
+ * The iwinfo library is free software: you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License version 2
+ * as published by the Free Software Foundation.
+ *
+ * The iwinfo library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+ * See the GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with the iwinfo library. If not, see http://www.gnu.org/licenses/.
+ */
+
+#ifndef __IWINFO_LUALUB_H_
+#define __IWINFO_LUALIB_H_
+
+#include <lua.h>
+#include <lualib.h>
+#include <lauxlib.h>
+
+#include "iwinfo.h"
+#include "iwinfo/wext_scan.h"
+
+
+#define IWINFO_META                    "iwinfo"
+#define IWINFO_WEXT_META       "iwinfo.wext"
+
+#ifdef USE_WL
+#define IWINFO_WL_META         "iwinfo.wl"
+#endif
+
+#ifdef USE_MADWIFI
+#define IWINFO_MADWIFI_META    "iwinfo.madwifi"
+#endif
+
+#ifdef USE_NL80211
+#define IWINFO_NL80211_META    "iwinfo.nl80211"
+#endif
+
+
+#define LUA_REG(type,op) \
+       { #op, iwinfo_L_##type##_##op }
+
+#define LUA_WRAP_INT(type,op)                                                  \
+       static int iwinfo_L_##type##_##op(lua_State *L)         \
+       {                                                                                                       \
+               const char *ifname = luaL_checkstring(L, 1);    \
+               int rv;                                                                                 \
+               if( !type##_get_##op(ifname, &rv) )                             \
+                       lua_pushnumber(L, rv);                                          \
+               else                                                                                    \
+                       lua_pushnil(L);                                                         \
+               return 1;                                                                               \
+       }
+
+#define LUA_WRAP_STRING(type,op)                                               \
+       static int iwinfo_L_##type##_##op(lua_State *L)         \
+       {                                                                                                       \
+               const char *ifname = luaL_checkstring(L, 1);    \
+               char rv[IWINFO_BUFSIZE];                                                \
+               memset(rv, 0, IWINFO_BUFSIZE);                                  \
+               if( !type##_get_##op(ifname, rv) )                              \
+                       lua_pushstring(L, rv);                                          \
+               else                                                                                    \
+                       lua_pushnil(L);                                                         \
+               return 1;                                                                               \
+       }
+
+#define LUA_WRAP_LIST(type,op)                                                 \
+       static int iwinfo_L_##type##_##op(lua_State *L)         \
+       {                                                                                                       \
+               return iwinfo_L_##op(L, type##_get_##op);               \
+       }
+
+#endif
+
diff --git a/contrib/package/iwinfo/src/include/iwinfo/lualib.h b/contrib/package/iwinfo/src/include/iwinfo/lualib.h
deleted file mode 100644 (file)
index 65a3a5c..0000000
+++ /dev/null
@@ -1,81 +0,0 @@
-/*
- * iwinfo - Wireless Information Library - Lua Headers
- *
- *   Copyright (C) 2009 Jo-Philipp Wich <xm@subsignal.org>
- *
- * The iwinfo library is free software: you can redistribute it and/or
- * modify it under the terms of the GNU General Public License version 2
- * as published by the Free Software Foundation.
- *
- * The iwinfo library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
- * See the GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License along
- * with the iwinfo library. If not, see http://www.gnu.org/licenses/.
- */
-
-#ifndef __IWINFO_LUALUB_H_
-#define __IWINFO_LUALIB_H_
-
-#include <lua.h>
-#include <lualib.h>
-#include <lauxlib.h>
-
-#include "iwinfo.h"
-#include "iwinfo/wext_scan.h"
-
-
-#define IWINFO_META                    "iwinfo"
-#define IWINFO_WEXT_META       "iwinfo.wext"
-
-#ifdef USE_WL
-#define IWINFO_WL_META         "iwinfo.wl"
-#endif
-
-#ifdef USE_MADWIFI
-#define IWINFO_MADWIFI_META    "iwinfo.madwifi"
-#endif
-
-#ifdef USE_NL80211
-#define IWINFO_NL80211_META    "iwinfo.nl80211"
-#endif
-
-
-#define LUA_REG(type,op) \
-       { #op, iwinfo_L_##type##_##op }
-
-#define LUA_WRAP_INT(type,op)                                                  \
-       static int iwinfo_L_##type##_##op(lua_State *L)         \
-       {                                                                                                       \
-               const char *ifname = luaL_checkstring(L, 1);    \
-               int rv;                                                                                 \
-               if( !type##_get_##op(ifname, &rv) )                             \
-                       lua_pushnumber(L, rv);                                          \
-               else                                                                                    \
-                       lua_pushnil(L);                                                         \
-               return 1;                                                                               \
-       }
-
-#define LUA_WRAP_STRING(type,op)                                               \
-       static int iwinfo_L_##type##_##op(lua_State *L)         \
-       {                                                                                                       \
-               const char *ifname = luaL_checkstring(L, 1);    \
-               char rv[IWINFO_BUFSIZE];                                                \
-               memset(rv, 0, IWINFO_BUFSIZE);                                  \
-               if( !type##_get_##op(ifname, rv) )                              \
-                       lua_pushstring(L, rv);                                          \
-               else                                                                                    \
-                       lua_pushnil(L);                                                         \
-               return 1;                                                                               \
-       }
-
-#define LUA_WRAP_LIST(type,op)                                                 \
-       static int iwinfo_L_##type##_##op(lua_State *L)         \
-       {                                                                                                       \
-               return iwinfo_L_##op(L, type##_get_##op);               \
-       }
-
-#endif
-
diff --git a/contrib/package/iwinfo/src/iwinfo_lua.c b/contrib/package/iwinfo/src/iwinfo_lua.c
new file mode 100644 (file)
index 0000000..997cc8a
--- /dev/null
@@ -0,0 +1,769 @@
+/*
+ * iwinfo - Wireless Information Library - Lua Bindings
+ *
+ *   Copyright (C) 2009 Jo-Philipp Wich <xm@subsignal.org>
+ *
+ * The iwinfo library is free software: you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License version 2
+ * as published by the Free Software Foundation.
+ *
+ * The iwinfo library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+ * See the GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with the iwinfo library. If not, see http://www.gnu.org/licenses/.
+ */
+
+#include "iwinfo/lua.h"
+
+
+/* Determine type */
+static int iwinfo_L_type(lua_State *L)
+{
+       const char *ifname = luaL_checkstring(L, 1);
+       const char *type = iwinfo_type(ifname);
+
+       if (type)
+               lua_pushstring(L, type);
+       else
+               lua_pushnil(L);
+
+       return 1;
+}
+
+/* Shutdown backends */
+static int iwinfo_L__gc(lua_State *L)
+{
+       iwinfo_finish();
+       return 0;
+}
+
+/*
+ * Build a short textual description of the crypto info
+ */
+
+static char * iwinfo_crypto_print_ciphers(int ciphers)
+{
+       static char str[128] = { 0 };
+       char *pos = str;
+
+       if (ciphers & IWINFO_CIPHER_WEP40)
+               pos += sprintf(pos, "WEP-40, ");
+
+       if (ciphers & IWINFO_CIPHER_WEP104)
+               pos += sprintf(pos, "WEP-104, ");
+
+       if (ciphers & IWINFO_CIPHER_TKIP)
+               pos += sprintf(pos, "TKIP, ");
+
+       if (ciphers & IWINFO_CIPHER_CCMP)
+               pos += sprintf(pos, "CCMP, ");
+
+       if (ciphers & IWINFO_CIPHER_WRAP)
+               pos += sprintf(pos, "WRAP, ");
+
+       if (ciphers & IWINFO_CIPHER_AESOCB)
+               pos += sprintf(pos, "AES-OCB, ");
+
+       if (ciphers & IWINFO_CIPHER_CKIP)
+               pos += sprintf(pos, "CKIP, ");
+
+       if (!ciphers || (ciphers & IWINFO_CIPHER_NONE))
+               pos += sprintf(pos, "NONE, ");
+
+       *(pos - 2) = 0;
+
+       return str;
+}
+
+static char * iwinfo_crypto_print_suites(int suites)
+{
+       static char str[64] = { 0 };
+       char *pos = str;
+
+       if (suites & IWINFO_KMGMT_PSK)
+               pos += sprintf(pos, "PSK/");
+
+       if (suites & IWINFO_KMGMT_8021x)
+               pos += sprintf(pos, "802.1X/");
+
+       if (!suites || (suites & IWINFO_KMGMT_NONE))
+               pos += sprintf(pos, "NONE/");
+
+       *(pos - 1) = 0;
+
+       return str;
+}
+
+static char * iwinfo_crypto_desc(struct iwinfo_crypto_entry *c)
+{
+       static char desc[512] = { 0 };
+
+       if (c)
+       {
+               if (c->enabled)
+               {
+                       /* WEP */
+                       if (c->auth_algs && !c->wpa_version)
+                       {
+                               if ((c->auth_algs & IWINFO_AUTH_OPEN) &&
+                                   (c->auth_algs & IWINFO_AUTH_SHARED))
+                               {
+                                       sprintf(desc, "WEP Open/Shared (%s)",
+                                               iwinfo_crypto_print_ciphers(c->pair_ciphers));
+                               }
+                               else if (c->auth_algs & IWINFO_AUTH_OPEN)
+                               {
+                                       sprintf(desc, "WEP Open System (%s)",
+                                               iwinfo_crypto_print_ciphers(c->pair_ciphers));
+                               }
+                               else if (c->auth_algs & IWINFO_AUTH_SHARED)
+                               {
+                                       sprintf(desc, "WEP Shared Auth (%s)",
+                                               iwinfo_crypto_print_ciphers(c->pair_ciphers));
+                               }
+                       }
+
+                       /* WPA */
+                       else if (c->wpa_version)
+                       {
+                               switch (c->wpa_version) {
+                                       case 3:
+                                               sprintf(desc, "mixed WPA/WPA2 %s (%s)",
+                                                       iwinfo_crypto_print_suites(c->auth_suites),
+                                                       iwinfo_crypto_print_ciphers(
+                                                               c->pair_ciphers & c->group_ciphers));
+                                               break;
+
+                                       case 2:
+                                               sprintf(desc, "WPA2 %s (%s)",
+                                                       iwinfo_crypto_print_suites(c->auth_suites),
+                                                       iwinfo_crypto_print_ciphers(
+                                                               c->pair_ciphers & c->group_ciphers));
+                                               break;
+
+                                       case 1:
+                                               sprintf(desc, "WPA %s (%s)",
+                                                       iwinfo_crypto_print_suites(c->auth_suites),
+                                                       iwinfo_crypto_print_ciphers(
+                                                               c->pair_ciphers & c->group_ciphers));
+                                               break;
+                               }
+                       }
+                       else
+                       {
+                               sprintf(desc, "None");
+                       }
+               }
+               else
+               {
+                       sprintf(desc, "None");
+               }
+       }
+       else
+       {
+               sprintf(desc, "Unknown");
+       }
+
+       return desc;
+}
+
+/* Build Lua table from crypto data */
+static void iwinfo_L_cryptotable(lua_State *L, struct iwinfo_crypto_entry *c)
+{
+       int i, j;
+
+       lua_newtable(L);
+
+       lua_pushboolean(L, c->enabled);
+       lua_setfield(L, -2, "enabled");
+
+       lua_pushstring(L, iwinfo_crypto_desc(c));
+       lua_setfield(L, -2, "description");
+
+       lua_pushboolean(L, (c->enabled && !c->wpa_version));
+       lua_setfield(L, -2, "wep");
+
+       lua_pushinteger(L, c->wpa_version);
+       lua_setfield(L, -2, "wpa");
+
+       lua_newtable(L);
+       for (i = 0, j = 1; i < 8; i++)
+       {
+               if (c->pair_ciphers & (1 << i))
+               {
+                       lua_pushstring(L, IWINFO_CIPHER_NAMES[i]);
+                       lua_rawseti(L, -2, j++);
+               }
+       }
+       lua_setfield(L, -2, "pair_ciphers");
+
+       lua_newtable(L);
+       for (i = 0, j = 1; i < 8; i++)
+       {
+               if (c->group_ciphers & (1 << i))
+               {
+                       lua_pushstring(L, IWINFO_CIPHER_NAMES[i]);
+                       lua_rawseti(L, -2, j++);
+               }
+       }
+       lua_setfield(L, -2, "group_ciphers");
+
+       lua_newtable(L);
+       for (i = 0, j = 1; i < 8; i++)
+       {
+               if (c->auth_suites & (1 << i))
+               {
+                       lua_pushstring(L, IWINFO_KMGMT_NAMES[i]);
+                       lua_rawseti(L, -2, j++);
+               }
+       }
+       lua_setfield(L, -2, "auth_suites");
+
+       lua_newtable(L);
+       for (i = 0, j = 1; i < 8; i++)
+       {
+               if (c->auth_algs & (1 << i))
+               {
+                       lua_pushstring(L, IWINFO_AUTH_NAMES[i]);
+                       lua_rawseti(L, -2, j++);
+               }
+       }
+       lua_setfield(L, -2, "auth_algs");
+}
+
+
+/* Wrapper for assoclist */
+static int iwinfo_L_assoclist(lua_State *L, int (*func)(const char *, char *, int *))
+{
+       int i, len;
+       char rv[IWINFO_BUFSIZE];
+       char macstr[18];
+       const char *ifname = luaL_checkstring(L, 1);
+       struct iwinfo_assoclist_entry *e;
+
+       lua_newtable(L);
+       memset(rv, 0, sizeof(rv));
+
+       if (!(*func)(ifname, rv, &len))
+       {
+               for (i = 0; i < len; i += sizeof(struct iwinfo_assoclist_entry))
+               {
+                       e = (struct iwinfo_assoclist_entry *) &rv[i];
+
+                       sprintf(macstr, "%02X:%02X:%02X:%02X:%02X:%02X",
+                               e->mac[0], e->mac[1], e->mac[2],
+                               e->mac[3], e->mac[4], e->mac[5]);
+
+                       lua_newtable(L);
+
+                       lua_pushnumber(L, e->signal);
+                       lua_setfield(L, -2, "signal");
+
+                       lua_pushnumber(L, e->noise);
+                       lua_setfield(L, -2, "noise");
+
+                       lua_setfield(L, -2, macstr);
+               }
+       }
+
+       return 1;
+}
+
+/* Wrapper for tx power list */
+static int iwinfo_L_txpwrlist(lua_State *L, int (*func)(const char *, char *, int *))
+{
+       int i, x, len;
+       char rv[IWINFO_BUFSIZE];
+       const char *ifname = luaL_checkstring(L, 1);
+       struct iwinfo_txpwrlist_entry *e;
+
+       lua_newtable(L);
+       memset(rv, 0, sizeof(rv));
+
+       if (!(*func)(ifname, rv, &len))
+       {
+               for (i = 0, x = 1; i < len; i += sizeof(struct iwinfo_txpwrlist_entry), x++)
+               {
+                       e = (struct iwinfo_txpwrlist_entry *) &rv[i];
+
+                       lua_newtable(L);
+
+                       lua_pushnumber(L, e->mw);
+                       lua_setfield(L, -2, "mw");
+
+                       lua_pushnumber(L, e->dbm);
+                       lua_setfield(L, -2, "dbm");
+
+                       lua_rawseti(L, -2, x);
+               }
+       }
+
+       return 1;
+}
+
+/* Wrapper for scan list */
+static int iwinfo_L_scanlist(lua_State *L, int (*func)(const char *, char *, int *))
+{
+       int i, x, len;
+       char rv[IWINFO_BUFSIZE];
+       char macstr[18];
+       const char *ifname = luaL_checkstring(L, 1);
+       struct iwinfo_scanlist_entry *e;
+
+       lua_newtable(L);
+       memset(rv, 0, sizeof(rv));
+
+       if (!(*func)(ifname, rv, &len))
+       {
+               for (i = 0, x = 1; i < len; i += sizeof(struct iwinfo_scanlist_entry), x++)
+               {
+                       e = (struct iwinfo_scanlist_entry *) &rv[i];
+
+                       lua_newtable(L);
+
+                       /* BSSID */
+                       sprintf(macstr, "%02X:%02X:%02X:%02X:%02X:%02X",
+                               e->mac[0], e->mac[1], e->mac[2],
+                               e->mac[3], e->mac[4], e->mac[5]);
+
+                       lua_pushstring(L, macstr);
+                       lua_setfield(L, -2, "bssid");
+
+                       /* ESSID */
+                       if (e->ssid[0])
+                       {
+                               lua_pushstring(L, (char *) e->ssid);
+                               lua_setfield(L, -2, "ssid");
+                       }
+
+                       /* Channel */
+                       lua_pushinteger(L, e->channel);
+                       lua_setfield(L, -2, "channel");
+
+                       /* Mode */
+                       lua_pushstring(L, (char *) e->mode);
+                       lua_setfield(L, -2, "mode");
+
+                       /* Quality, Signal */
+                       lua_pushinteger(L, e->quality);
+                       lua_setfield(L, -2, "quality");
+
+                       lua_pushinteger(L, e->quality_max);
+                       lua_setfield(L, -2, "quality_max");
+
+                       lua_pushnumber(L, (e->signal - 0x100));
+                       lua_setfield(L, -2, "signal");
+
+                       /* Crypto */
+                       iwinfo_L_cryptotable(L, &e->crypto);
+                       lua_setfield(L, -2, "encryption");
+
+                       lua_rawseti(L, -2, x);
+               }
+       }
+
+       return 1;
+}
+
+/* Wrapper for frequency list */
+static int iwinfo_L_freqlist(lua_State *L, int (*func)(const char *, char *, int *))
+{
+       int i, x, len;
+       char rv[IWINFO_BUFSIZE];
+       const char *ifname = luaL_checkstring(L, 1);
+       struct iwinfo_freqlist_entry *e;
+
+       lua_newtable(L);
+       memset(rv, 0, sizeof(rv));
+
+       if (!(*func)(ifname, rv, &len))
+       {
+               for (i = 0, x = 1; i < len; i += sizeof(struct iwinfo_freqlist_entry), x++)
+               {
+                       e = (struct iwinfo_freqlist_entry *) &rv[i];
+
+                       lua_newtable(L);
+
+                       /* MHz */
+                       lua_pushinteger(L, e->mhz);
+                       lua_setfield(L, -2, "mhz");
+
+                       /* Channel */
+                       lua_pushinteger(L, e->channel);
+                       lua_setfield(L, -2, "channel");
+
+                       /* Restricted (DFS/TPC/Radar) */
+                       lua_pushboolean(L, e->restricted);
+                       lua_setfield(L, -2, "restricted");
+
+                       lua_rawseti(L, -2, x);
+               }
+       }
+
+       return 1;
+}
+
+/* Wrapper for crypto settings */
+static int iwinfo_L_encryption(lua_State *L, int (*func)(const char *, char *))
+{
+       const char *ifname = luaL_checkstring(L, 1);
+       struct iwinfo_crypto_entry c = { 0 };
+
+       if (!(*func)(ifname, (char *)&c))
+       {
+               iwinfo_L_cryptotable(L, &c);
+               return 1;
+       }
+
+       lua_pushnil(L);
+       return 1;
+}
+
+/* Wrapper for hwmode list */
+static int iwinfo_L_hwmodelist(lua_State *L, int (*func)(const char *, int *))
+{
+       const char *ifname = luaL_checkstring(L, 1);
+       int hwmodes = 0;
+
+       if (!(*func)(ifname, &hwmodes))
+       {
+               lua_newtable(L);
+
+               lua_pushboolean(L, hwmodes & IWINFO_80211_A);
+               lua_setfield(L, -2, "a");
+
+               lua_pushboolean(L, hwmodes & IWINFO_80211_B);
+               lua_setfield(L, -2, "b");
+
+               lua_pushboolean(L, hwmodes & IWINFO_80211_G);
+               lua_setfield(L, -2, "g");
+
+               lua_pushboolean(L, hwmodes & IWINFO_80211_N);
+               lua_setfield(L, -2, "n");
+
+               return 1;
+       }
+
+       lua_pushnil(L);
+       return 1;
+}
+
+/* Wrapper for mbbsid_support */
+static int iwinfo_L_mbssid_support(lua_State *L, int (*func)(const char *, int *))
+{
+       const char *ifname = luaL_checkstring(L, 1);
+       int support = 0;
+
+       if (!(*func)(ifname, &support))
+       {
+               lua_pushboolean(L, support);
+               return 1;
+       }
+
+       lua_pushnil(L);
+       return 1;
+}
+
+/* Wrapper for country list */
+static char * iwinfo_L_country_lookup(char *buf, int len, int iso3166)
+{
+       int i;
+       struct iwinfo_country_entry *c;
+
+       for (i = 0; i < len; i += sizeof(struct iwinfo_country_entry))
+       {
+               c = (struct iwinfo_country_entry *) &buf[i];
+
+               if (c->iso3166 == iso3166)
+                       return c->ccode;
+       }
+
+       return NULL;
+}
+
+static int iwinfo_L_countrylist(lua_State *L, int (*func)(const char *, char *, int *))
+{
+       int len, i, j;
+       char rv[IWINFO_BUFSIZE], alpha2[3];
+       char *ccode;
+       const char *ifname = luaL_checkstring(L, 1);
+       const struct iwinfo_iso3166_label *l;
+
+       lua_newtable(L);
+       memset(rv, 0, sizeof(rv));
+
+       if (!(*func)(ifname, rv, &len))
+       {
+               for (l = IWINFO_ISO3166_NAMES, j = 1; l->iso3166; l++)
+               {
+                       if ((ccode = iwinfo_L_country_lookup(rv, len, l->iso3166)) != NULL)
+                       {
+                               sprintf(alpha2, "%c%c",
+                                       (l->iso3166 / 256), (l->iso3166 % 256));
+
+                               lua_newtable(L);
+
+                               lua_pushstring(L, alpha2);
+                               lua_setfield(L, -2, "alpha2");
+
+                               lua_pushstring(L, ccode);
+                               lua_setfield(L, -2, "ccode");
+
+                               lua_pushstring(L, l->name);
+                               lua_setfield(L, -2, "name");
+
+                               lua_rawseti(L, -2, j++);
+                       }
+               }
+       }
+
+       return 1;
+}
+
+
+#ifdef USE_WL
+/* Broadcom */
+LUA_WRAP_INT(wl,channel)
+LUA_WRAP_INT(wl,frequency)
+LUA_WRAP_INT(wl,txpower)
+LUA_WRAP_INT(wl,bitrate)
+LUA_WRAP_INT(wl,signal)
+LUA_WRAP_INT(wl,noise)
+LUA_WRAP_INT(wl,quality)
+LUA_WRAP_INT(wl,quality_max)
+LUA_WRAP_STRING(wl,mode)
+LUA_WRAP_STRING(wl,ssid)
+LUA_WRAP_STRING(wl,bssid)
+LUA_WRAP_STRING(wl,country)
+LUA_WRAP_LIST(wl,assoclist)
+LUA_WRAP_LIST(wl,txpwrlist)
+LUA_WRAP_LIST(wl,scanlist)
+LUA_WRAP_LIST(wl,freqlist)
+LUA_WRAP_LIST(wl,countrylist)
+LUA_WRAP_LIST(wl,hwmodelist)
+LUA_WRAP_LIST(wl,encryption)
+LUA_WRAP_LIST(wl,mbssid_support)
+#endif
+
+#ifdef USE_MADWIFI
+/* Madwifi */
+LUA_WRAP_INT(madwifi,channel)
+LUA_WRAP_INT(madwifi,frequency)
+LUA_WRAP_INT(madwifi,txpower)
+LUA_WRAP_INT(madwifi,bitrate)
+LUA_WRAP_INT(madwifi,signal)
+LUA_WRAP_INT(madwifi,noise)
+LUA_WRAP_INT(madwifi,quality)
+LUA_WRAP_INT(madwifi,quality_max)
+LUA_WRAP_STRING(madwifi,mode)
+LUA_WRAP_STRING(madwifi,ssid)
+LUA_WRAP_STRING(madwifi,bssid)
+LUA_WRAP_STRING(madwifi,country)
+LUA_WRAP_LIST(madwifi,assoclist)
+LUA_WRAP_LIST(madwifi,txpwrlist)
+LUA_WRAP_LIST(madwifi,scanlist)
+LUA_WRAP_LIST(madwifi,freqlist)
+LUA_WRAP_LIST(madwifi,countrylist)
+LUA_WRAP_LIST(madwifi,hwmodelist)
+LUA_WRAP_LIST(madwifi,encryption)
+LUA_WRAP_LIST(madwifi,mbssid_support)
+#endif
+
+#ifdef USE_NL80211
+/* NL80211 */
+LUA_WRAP_INT(nl80211,channel)
+LUA_WRAP_INT(nl80211,frequency)
+LUA_WRAP_INT(nl80211,txpower)
+LUA_WRAP_INT(nl80211,bitrate)
+LUA_WRAP_INT(nl80211,signal)
+LUA_WRAP_INT(nl80211,noise)
+LUA_WRAP_INT(nl80211,quality)
+LUA_WRAP_INT(nl80211,quality_max)
+LUA_WRAP_STRING(nl80211,mode)
+LUA_WRAP_STRING(nl80211,ssid)
+LUA_WRAP_STRING(nl80211,bssid)
+LUA_WRAP_STRING(nl80211,country)
+LUA_WRAP_LIST(nl80211,assoclist)
+LUA_WRAP_LIST(nl80211,txpwrlist)
+LUA_WRAP_LIST(nl80211,scanlist)
+LUA_WRAP_LIST(nl80211,freqlist)
+LUA_WRAP_LIST(nl80211,countrylist)
+LUA_WRAP_LIST(nl80211,hwmodelist)
+LUA_WRAP_LIST(nl80211,encryption)
+LUA_WRAP_LIST(nl80211,mbssid_support)
+#endif
+
+/* Wext */
+LUA_WRAP_INT(wext,channel)
+LUA_WRAP_INT(wext,frequency)
+LUA_WRAP_INT(wext,txpower)
+LUA_WRAP_INT(wext,bitrate)
+LUA_WRAP_INT(wext,signal)
+LUA_WRAP_INT(wext,noise)
+LUA_WRAP_INT(wext,quality)
+LUA_WRAP_INT(wext,quality_max)
+LUA_WRAP_STRING(wext,mode)
+LUA_WRAP_STRING(wext,ssid)
+LUA_WRAP_STRING(wext,bssid)
+LUA_WRAP_STRING(wext,country)
+LUA_WRAP_LIST(wext,assoclist)
+LUA_WRAP_LIST(wext,txpwrlist)
+LUA_WRAP_LIST(wext,scanlist)
+LUA_WRAP_LIST(wext,freqlist)
+LUA_WRAP_LIST(wext,countrylist)
+LUA_WRAP_LIST(wext,hwmodelist)
+LUA_WRAP_LIST(wext,encryption)
+LUA_WRAP_LIST(wext,mbssid_support)
+
+#ifdef USE_WL
+/* Broadcom table */
+static const luaL_reg R_wl[] = {
+       LUA_REG(wl,channel),
+       LUA_REG(wl,frequency),
+       LUA_REG(wl,txpower),
+       LUA_REG(wl,bitrate),
+       LUA_REG(wl,signal),
+       LUA_REG(wl,noise),
+       LUA_REG(wl,quality),
+       LUA_REG(wl,quality_max),
+       LUA_REG(wl,mode),
+       LUA_REG(wl,ssid),
+       LUA_REG(wl,bssid),
+       LUA_REG(wl,country),
+       LUA_REG(wl,assoclist),
+       LUA_REG(wl,txpwrlist),
+       LUA_REG(wl,scanlist),
+       LUA_REG(wl,freqlist),
+       LUA_REG(wl,countrylist),
+       LUA_REG(wl,hwmodelist),
+       LUA_REG(wl,encryption),
+       LUA_REG(wl,mbssid_support),
+       { NULL, NULL }
+};
+#endif
+
+#ifdef USE_MADWIFI
+/* Madwifi table */
+static const luaL_reg R_madwifi[] = {
+       LUA_REG(madwifi,channel),
+       LUA_REG(madwifi,frequency),
+       LUA_REG(madwifi,txpower),
+       LUA_REG(madwifi,bitrate),
+       LUA_REG(madwifi,signal),
+       LUA_REG(madwifi,noise),
+       LUA_REG(madwifi,quality),
+       LUA_REG(madwifi,quality_max),
+       LUA_REG(madwifi,mode),
+       LUA_REG(madwifi,ssid),
+       LUA_REG(madwifi,bssid),
+       LUA_REG(madwifi,country),
+       LUA_REG(madwifi,assoclist),
+       LUA_REG(madwifi,txpwrlist),
+       LUA_REG(madwifi,scanlist),
+       LUA_REG(madwifi,freqlist),
+       LUA_REG(madwifi,countrylist),
+       LUA_REG(madwifi,hwmodelist),
+       LUA_REG(madwifi,encryption),
+       LUA_REG(madwifi,mbssid_support),
+       { NULL, NULL }
+};
+#endif
+
+#ifdef USE_NL80211
+/* NL80211 table */
+static const luaL_reg R_nl80211[] = {
+       LUA_REG(nl80211,channel),
+       LUA_REG(nl80211,frequency),
+       LUA_REG(nl80211,txpower),
+       LUA_REG(nl80211,bitrate),
+       LUA_REG(nl80211,signal),
+       LUA_REG(nl80211,noise),
+       LUA_REG(nl80211,quality),
+       LUA_REG(nl80211,quality_max),
+       LUA_REG(nl80211,mode),
+       LUA_REG(nl80211,ssid),
+       LUA_REG(nl80211,bssid),
+       LUA_REG(nl80211,country),
+       LUA_REG(nl80211,assoclist),
+       LUA_REG(nl80211,txpwrlist),
+       LUA_REG(nl80211,scanlist),
+       LUA_REG(nl80211,freqlist),
+       LUA_REG(nl80211,countrylist),
+       LUA_REG(nl80211,hwmodelist),
+       LUA_REG(nl80211,encryption),
+       LUA_REG(nl80211,mbssid_support),
+       { NULL, NULL }
+};
+#endif
+
+/* Wext table */
+static const luaL_reg R_wext[] = {
+       LUA_REG(wext,channel),
+       LUA_REG(wext,frequency),
+       LUA_REG(wext,txpower),
+       LUA_REG(wext,bitrate),
+       LUA_REG(wext,signal),
+       LUA_REG(wext,noise),
+       LUA_REG(wext,quality),
+       LUA_REG(wext,quality_max),
+       LUA_REG(wext,mode),
+       LUA_REG(wext,ssid),
+       LUA_REG(wext,bssid),
+       LUA_REG(wext,country),
+       LUA_REG(wext,assoclist),
+       LUA_REG(wext,txpwrlist),
+       LUA_REG(wext,scanlist),
+       LUA_REG(wext,freqlist),
+       LUA_REG(wext,countrylist),
+       LUA_REG(wext,hwmodelist),
+       LUA_REG(wext,encryption),
+       LUA_REG(wext,mbssid_support),
+       { NULL, NULL }
+};
+
+/* Common */
+static const luaL_reg R_common[] = {
+       { "type", iwinfo_L_type },
+       { "__gc", iwinfo_L__gc  },
+       { NULL, NULL }
+};
+
+
+LUALIB_API int luaopen_iwinfo(lua_State *L) {
+       luaL_register(L, IWINFO_META, R_common);
+
+#ifdef USE_WL
+       luaL_newmetatable(L, IWINFO_WL_META);
+       luaL_register(L, NULL, R_wl);
+       lua_pushvalue(L, -1);
+       lua_setfield(L, -2, "__index");
+       lua_setfield(L, -2, "wl");
+#endif
+
+#ifdef USE_MADWIFI
+       luaL_newmetatable(L, IWINFO_MADWIFI_META);
+       luaL_register(L, NULL, R_madwifi);
+       lua_pushvalue(L, -1);
+       lua_setfield(L, -2, "__index");
+       lua_setfield(L, -2, "madwifi");
+#endif
+
+#ifdef USE_NL80211
+       luaL_newmetatable(L, IWINFO_NL80211_META);
+       luaL_register(L, NULL, R_nl80211);
+       lua_pushvalue(L, -1);
+       lua_setfield(L, -2, "__index");
+       lua_setfield(L, -2, "nl80211");
+#endif
+
+       luaL_newmetatable(L, IWINFO_WEXT_META);
+       luaL_register(L, NULL, R_wext);
+       lua_pushvalue(L, -1);
+       lua_setfield(L, -2, "__index");
+       lua_setfield(L, -2, "wext");
+
+       return 1;
+}
diff --git a/contrib/package/iwinfo/src/iwinfo_lualib.c b/contrib/package/iwinfo/src/iwinfo_lualib.c
deleted file mode 100644 (file)
index dfc2d28..0000000
+++ /dev/null
@@ -1,769 +0,0 @@
-/*
- * iwinfo - Wireless Information Library - Lua Bindings
- *
- *   Copyright (C) 2009 Jo-Philipp Wich <xm@subsignal.org>
- *
- * The iwinfo library is free software: you can redistribute it and/or
- * modify it under the terms of the GNU General Public License version 2
- * as published by the Free Software Foundation.
- *
- * The iwinfo library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
- * See the GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License along
- * with the iwinfo library. If not, see http://www.gnu.org/licenses/.
- */
-
-#include "iwinfo/lualib.h"
-
-
-/* Determine type */
-static int iwinfo_L_type(lua_State *L)
-{
-       const char *ifname = luaL_checkstring(L, 1);
-       const char *type = iwinfo_type(ifname);
-
-       if (type)
-               lua_pushstring(L, type);
-       else
-               lua_pushnil(L);
-
-       return 1;
-}
-
-/* Shutdown backends */
-static int iwinfo_L__gc(lua_State *L)
-{
-       iwinfo_finish();
-       return 0;
-}
-
-/*
- * Build a short textual description of the crypto info
- */
-
-static char * iwinfo_crypto_print_ciphers(int ciphers)
-{
-       static char str[128] = { 0 };
-       char *pos = str;
-
-       if (ciphers & IWINFO_CIPHER_WEP40)
-               pos += sprintf(pos, "WEP-40, ");
-
-       if (ciphers & IWINFO_CIPHER_WEP104)
-               pos += sprintf(pos, "WEP-104, ");
-
-       if (ciphers & IWINFO_CIPHER_TKIP)
-               pos += sprintf(pos, "TKIP, ");
-
-       if (ciphers & IWINFO_CIPHER_CCMP)
-               pos += sprintf(pos, "CCMP, ");
-
-       if (ciphers & IWINFO_CIPHER_WRAP)
-               pos += sprintf(pos, "WRAP, ");
-
-       if (ciphers & IWINFO_CIPHER_AESOCB)
-               pos += sprintf(pos, "AES-OCB, ");
-
-       if (ciphers & IWINFO_CIPHER_CKIP)
-               pos += sprintf(pos, "CKIP, ");
-
-       if (!ciphers || (ciphers & IWINFO_CIPHER_NONE))
-               pos += sprintf(pos, "NONE, ");
-
-       *(pos - 2) = 0;
-
-       return str;
-}
-
-static char * iwinfo_crypto_print_suites(int suites)
-{
-       static char str[64] = { 0 };
-       char *pos = str;
-
-       if (suites & IWINFO_KMGMT_PSK)
-               pos += sprintf(pos, "PSK/");
-
-       if (suites & IWINFO_KMGMT_8021x)
-               pos += sprintf(pos, "802.1X/");
-
-       if (!suites || (suites & IWINFO_KMGMT_NONE))
-               pos += sprintf(pos, "NONE/");
-
-       *(pos - 1) = 0;
-
-       return str;
-}
-
-static char * iwinfo_crypto_desc(struct iwinfo_crypto_entry *c)
-{
-       static char desc[512] = { 0 };
-
-       if (c)
-       {
-               if (c->enabled)
-               {
-                       /* WEP */
-                       if (c->auth_algs && !c->wpa_version)
-                       {
-                               if ((c->auth_algs & IWINFO_AUTH_OPEN) &&
-                                   (c->auth_algs & IWINFO_AUTH_SHARED))
-                               {
-                                       sprintf(desc, "WEP Open/Shared (%s)",
-                                               iwinfo_crypto_print_ciphers(c->pair_ciphers));
-                               }
-                               else if (c->auth_algs & IWINFO_AUTH_OPEN)
-                               {
-                                       sprintf(desc, "WEP Open System (%s)",
-                                               iwinfo_crypto_print_ciphers(c->pair_ciphers));
-                               }
-                               else if (c->auth_algs & IWINFO_AUTH_SHARED)
-                               {
-                                       sprintf(desc, "WEP Shared Auth (%s)",
-                                               iwinfo_crypto_print_ciphers(c->pair_ciphers));
-                               }
-                       }
-
-                       /* WPA */
-                       else if (c->wpa_version)
-                       {
-                               switch (c->wpa_version) {
-                                       case 3:
-                                               sprintf(desc, "mixed WPA/WPA2 %s (%s)",
-                                                       iwinfo_crypto_print_suites(c->auth_suites),
-                                                       iwinfo_crypto_print_ciphers(
-                                                               c->pair_ciphers & c->group_ciphers));
-                                               break;
-
-                                       case 2:
-                                               sprintf(desc, "WPA2 %s (%s)",
-                                                       iwinfo_crypto_print_suites(c->auth_suites),
-                                                       iwinfo_crypto_print_ciphers(
-                                                               c->pair_ciphers & c->group_ciphers));
-                                               break;
-
-                                       case 1:
-                                               sprintf(desc, "WPA %s (%s)",
-                                                       iwinfo_crypto_print_suites(c->auth_suites),
-                                                       iwinfo_crypto_print_ciphers(
-                                                               c->pair_ciphers & c->group_ciphers));
-                                               break;
-                               }
-                       }
-                       else
-                       {
-                               sprintf(desc, "None");
-                       }
-               }
-               else
-               {
-                       sprintf(desc, "None");
-               }
-       }
-       else
-       {
-               sprintf(desc, "Unknown");
-       }
-
-       return desc;
-}
-
-/* Build Lua table from crypto data */
-static void iwinfo_L_cryptotable(lua_State *L, struct iwinfo_crypto_entry *c)
-{
-       int i, j;
-
-       lua_newtable(L);
-
-       lua_pushboolean(L, c->enabled);
-       lua_setfield(L, -2, "enabled");
-
-       lua_pushstring(L, iwinfo_crypto_desc(c));
-       lua_setfield(L, -2, "description");
-
-       lua_pushboolean(L, (c->enabled && !c->wpa_version));
-       lua_setfield(L, -2, "wep");
-
-       lua_pushinteger(L, c->wpa_version);
-       lua_setfield(L, -2, "wpa");
-
-       lua_newtable(L);
-       for (i = 0, j = 1; i < 8; i++)
-       {
-               if (c->pair_ciphers & (1 << i))
-               {
-                       lua_pushstring(L, IWINFO_CIPHER_NAMES[i]);
-                       lua_rawseti(L, -2, j++);
-               }
-       }
-       lua_setfield(L, -2, "pair_ciphers");
-
-       lua_newtable(L);
-       for (i = 0, j = 1; i < 8; i++)
-       {
-               if (c->group_ciphers & (1 << i))
-               {
-                       lua_pushstring(L, IWINFO_CIPHER_NAMES[i]);
-                       lua_rawseti(L, -2, j++);
-               }
-       }
-       lua_setfield(L, -2, "group_ciphers");
-
-       lua_newtable(L);
-       for (i = 0, j = 1; i < 8; i++)
-       {
-               if (c->auth_suites & (1 << i))
-               {
-                       lua_pushstring(L, IWINFO_KMGMT_NAMES[i]);
-                       lua_rawseti(L, -2, j++);
-               }
-       }
-       lua_setfield(L, -2, "auth_suites");
-
-       lua_newtable(L);
-       for (i = 0, j = 1; i < 8; i++)
-       {
-               if (c->auth_algs & (1 << i))
-               {
-                       lua_pushstring(L, IWINFO_AUTH_NAMES[i]);
-                       lua_rawseti(L, -2, j++);
-               }
-       }
-       lua_setfield(L, -2, "auth_algs");
-}
-
-
-/* Wrapper for assoclist */
-static int iwinfo_L_assoclist(lua_State *L, int (*func)(const char *, char *, int *))
-{
-       int i, len;
-       char rv[IWINFO_BUFSIZE];
-       char macstr[18];
-       const char *ifname = luaL_checkstring(L, 1);
-       struct iwinfo_assoclist_entry *e;
-
-       lua_newtable(L);
-       memset(rv, 0, sizeof(rv));
-
-       if (!(*func)(ifname, rv, &len))
-       {
-               for (i = 0; i < len; i += sizeof(struct iwinfo_assoclist_entry))
-               {
-                       e = (struct iwinfo_assoclist_entry *) &rv[i];
-
-                       sprintf(macstr, "%02X:%02X:%02X:%02X:%02X:%02X",
-                               e->mac[0], e->mac[1], e->mac[2],
-                               e->mac[3], e->mac[4], e->mac[5]);
-
-                       lua_newtable(L);
-
-                       lua_pushnumber(L, e->signal);
-                       lua_setfield(L, -2, "signal");
-
-                       lua_pushnumber(L, e->noise);
-                       lua_setfield(L, -2, "noise");
-
-                       lua_setfield(L, -2, macstr);
-               }
-       }
-
-       return 1;
-}
-
-/* Wrapper for tx power list */
-static int iwinfo_L_txpwrlist(lua_State *L, int (*func)(const char *, char *, int *))
-{
-       int i, x, len;
-       char rv[IWINFO_BUFSIZE];
-       const char *ifname = luaL_checkstring(L, 1);
-       struct iwinfo_txpwrlist_entry *e;
-
-       lua_newtable(L);
-       memset(rv, 0, sizeof(rv));
-
-       if (!(*func)(ifname, rv, &len))
-       {
-               for (i = 0, x = 1; i < len; i += sizeof(struct iwinfo_txpwrlist_entry), x++)
-               {
-                       e = (struct iwinfo_txpwrlist_entry *) &rv[i];
-
-                       lua_newtable(L);
-
-                       lua_pushnumber(L, e->mw);
-                       lua_setfield(L, -2, "mw");
-
-                       lua_pushnumber(L, e->dbm);
-                       lua_setfield(L, -2, "dbm");
-
-                       lua_rawseti(L, -2, x);
-               }
-       }
-
-       return 1;
-}
-
-/* Wrapper for scan list */
-static int iwinfo_L_scanlist(lua_State *L, int (*func)(const char *, char *, int *))
-{
-       int i, x, len;
-       char rv[IWINFO_BUFSIZE];
-       char macstr[18];
-       const char *ifname = luaL_checkstring(L, 1);
-       struct iwinfo_scanlist_entry *e;
-
-       lua_newtable(L);
-       memset(rv, 0, sizeof(rv));
-
-       if (!(*func)(ifname, rv, &len))
-       {
-               for (i = 0, x = 1; i < len; i += sizeof(struct iwinfo_scanlist_entry), x++)
-               {
-                       e = (struct iwinfo_scanlist_entry *) &rv[i];
-
-                       lua_newtable(L);
-
-                       /* BSSID */
-                       sprintf(macstr, "%02X:%02X:%02X:%02X:%02X:%02X",
-                               e->mac[0], e->mac[1], e->mac[2],
-                               e->mac[3], e->mac[4], e->mac[5]);
-
-                       lua_pushstring(L, macstr);
-                       lua_setfield(L, -2, "bssid");
-
-                       /* ESSID */
-                       if (e->ssid[0])
-                       {
-                               lua_pushstring(L, (char *) e->ssid);
-                               lua_setfield(L, -2, "ssid");
-                       }
-
-                       /* Channel */
-                       lua_pushinteger(L, e->channel);
-                       lua_setfield(L, -2, "channel");
-
-                       /* Mode */
-                       lua_pushstring(L, (char *) e->mode);
-                       lua_setfield(L, -2, "mode");
-
-                       /* Quality, Signal */
-                       lua_pushinteger(L, e->quality);
-                       lua_setfield(L, -2, "quality");
-
-                       lua_pushinteger(L, e->quality_max);
-                       lua_setfield(L, -2, "quality_max");
-
-                       lua_pushnumber(L, (e->signal - 0x100));
-                       lua_setfield(L, -2, "signal");
-
-                       /* Crypto */
-                       iwinfo_L_cryptotable(L, &e->crypto);
-                       lua_setfield(L, -2, "encryption");
-
-                       lua_rawseti(L, -2, x);
-               }
-       }
-
-       return 1;
-}
-
-/* Wrapper for frequency list */
-static int iwinfo_L_freqlist(lua_State *L, int (*func)(const char *, char *, int *))
-{
-       int i, x, len;
-       char rv[IWINFO_BUFSIZE];
-       const char *ifname = luaL_checkstring(L, 1);
-       struct iwinfo_freqlist_entry *e;
-
-       lua_newtable(L);
-       memset(rv, 0, sizeof(rv));
-
-       if (!(*func)(ifname, rv, &len))
-       {
-               for (i = 0, x = 1; i < len; i += sizeof(struct iwinfo_freqlist_entry), x++)
-               {
-                       e = (struct iwinfo_freqlist_entry *) &rv[i];
-
-                       lua_newtable(L);
-
-                       /* MHz */
-                       lua_pushinteger(L, e->mhz);
-                       lua_setfield(L, -2, "mhz");
-
-                       /* Channel */
-                       lua_pushinteger(L, e->channel);
-                       lua_setfield(L, -2, "channel");
-
-                       /* Restricted (DFS/TPC/Radar) */
-                       lua_pushboolean(L, e->restricted);
-                       lua_setfield(L, -2, "restricted");
-
-                       lua_rawseti(L, -2, x);
-               }
-       }
-
-       return 1;
-}
-
-/* Wrapper for crypto settings */
-static int iwinfo_L_encryption(lua_State *L, int (*func)(const char *, char *))
-{
-       const char *ifname = luaL_checkstring(L, 1);
-       struct iwinfo_crypto_entry c = { 0 };
-
-       if (!(*func)(ifname, (char *)&c))
-       {
-               iwinfo_L_cryptotable(L, &c);
-               return 1;
-       }
-
-       lua_pushnil(L);
-       return 1;
-}
-
-/* Wrapper for hwmode list */
-static int iwinfo_L_hwmodelist(lua_State *L, int (*func)(const char *, int *))
-{
-       const char *ifname = luaL_checkstring(L, 1);
-       int hwmodes = 0;
-
-       if (!(*func)(ifname, &hwmodes))
-       {
-               lua_newtable(L);
-
-               lua_pushboolean(L, hwmodes & IWINFO_80211_A);
-               lua_setfield(L, -2, "a");
-
-               lua_pushboolean(L, hwmodes & IWINFO_80211_B);
-               lua_setfield(L, -2, "b");
-
-               lua_pushboolean(L, hwmodes & IWINFO_80211_G);
-               lua_setfield(L, -2, "g");
-
-               lua_pushboolean(L, hwmodes & IWINFO_80211_N);
-               lua_setfield(L, -2, "n");
-
-               return 1;
-       }
-
-       lua_pushnil(L);
-       return 1;
-}
-
-/* Wrapper for mbbsid_support */
-static int iwinfo_L_mbssid_support(lua_State *L, int (*func)(const char *, int *))
-{
-       const char *ifname = luaL_checkstring(L, 1);
-       int support = 0;
-
-       if (!(*func)(ifname, &support))
-       {
-               lua_pushboolean(L, support);
-               return 1;
-       }
-
-       lua_pushnil(L);
-       return 1;
-}
-
-/* Wrapper for country list */
-static char * iwinfo_L_country_lookup(char *buf, int len, int iso3166)
-{
-       int i;
-       struct iwinfo_country_entry *c;
-
-       for (i = 0; i < len; i += sizeof(struct iwinfo_country_entry))
-       {
-               c = (struct iwinfo_country_entry *) &buf[i];
-
-               if (c->iso3166 == iso3166)
-                       return c->ccode;
-       }
-
-       return NULL;
-}
-
-static int iwinfo_L_countrylist(lua_State *L, int (*func)(const char *, char *, int *))
-{
-       int len, i, j;
-       char rv[IWINFO_BUFSIZE], alpha2[3];
-       char *ccode;
-       const char *ifname = luaL_checkstring(L, 1);
-       const struct iwinfo_iso3166_label *l;
-
-       lua_newtable(L);
-       memset(rv, 0, sizeof(rv));
-
-       if (!(*func)(ifname, rv, &len))
-       {
-               for (l = IWINFO_ISO3166_NAMES, j = 1; l->iso3166; l++)
-               {
-                       if ((ccode = iwinfo_L_country_lookup(rv, len, l->iso3166)) != NULL)
-                       {
-                               sprintf(alpha2, "%c%c",
-                                       (l->iso3166 / 256), (l->iso3166 % 256));
-
-                               lua_newtable(L);
-
-                               lua_pushstring(L, alpha2);
-                               lua_setfield(L, -2, "alpha2");
-
-                               lua_pushstring(L, ccode);
-                               lua_setfield(L, -2, "ccode");
-
-                               lua_pushstring(L, l->name);
-                               lua_setfield(L, -2, "name");
-
-                               lua_rawseti(L, -2, j++);
-                       }
-               }
-       }
-
-       return 1;
-}
-
-
-#ifdef USE_WL
-/* Broadcom */
-LUA_WRAP_INT(wl,channel)
-LUA_WRAP_INT(wl,frequency)
-LUA_WRAP_INT(wl,txpower)
-LUA_WRAP_INT(wl,bitrate)
-LUA_WRAP_INT(wl,signal)
-LUA_WRAP_INT(wl,noise)
-LUA_WRAP_INT(wl,quality)
-LUA_WRAP_INT(wl,quality_max)
-LUA_WRAP_STRING(wl,mode)
-LUA_WRAP_STRING(wl,ssid)
-LUA_WRAP_STRING(wl,bssid)
-LUA_WRAP_STRING(wl,country)
-LUA_WRAP_LIST(wl,assoclist)
-LUA_WRAP_LIST(wl,txpwrlist)
-LUA_WRAP_LIST(wl,scanlist)
-LUA_WRAP_LIST(wl,freqlist)
-LUA_WRAP_LIST(wl,countrylist)
-LUA_WRAP_LIST(wl,hwmodelist)
-LUA_WRAP_LIST(wl,encryption)
-LUA_WRAP_LIST(wl,mbssid_support)
-#endif
-
-#ifdef USE_MADWIFI
-/* Madwifi */
-LUA_WRAP_INT(madwifi,channel)
-LUA_WRAP_INT(madwifi,frequency)
-LUA_WRAP_INT(madwifi,txpower)
-LUA_WRAP_INT(madwifi,bitrate)
-LUA_WRAP_INT(madwifi,signal)
-LUA_WRAP_INT(madwifi,noise)
-LUA_WRAP_INT(madwifi,quality)
-LUA_WRAP_INT(madwifi,quality_max)
-LUA_WRAP_STRING(madwifi,mode)
-LUA_WRAP_STRING(madwifi,ssid)
-LUA_WRAP_STRING(madwifi,bssid)
-LUA_WRAP_STRING(madwifi,country)
-LUA_WRAP_LIST(madwifi,assoclist)
-LUA_WRAP_LIST(madwifi,txpwrlist)
-LUA_WRAP_LIST(madwifi,scanlist)
-LUA_WRAP_LIST(madwifi,freqlist)
-LUA_WRAP_LIST(madwifi,countrylist)
-LUA_WRAP_LIST(madwifi,hwmodelist)
-LUA_WRAP_LIST(madwifi,encryption)
-LUA_WRAP_LIST(madwifi,mbssid_support)
-#endif
-
-#ifdef USE_NL80211
-/* NL80211 */
-LUA_WRAP_INT(nl80211,channel)
-LUA_WRAP_INT(nl80211,frequency)
-LUA_WRAP_INT(nl80211,txpower)
-LUA_WRAP_INT(nl80211,bitrate)
-LUA_WRAP_INT(nl80211,signal)
-LUA_WRAP_INT(nl80211,noise)
-LUA_WRAP_INT(nl80211,quality)
-LUA_WRAP_INT(nl80211,quality_max)
-LUA_WRAP_STRING(nl80211,mode)
-LUA_WRAP_STRING(nl80211,ssid)
-LUA_WRAP_STRING(nl80211,bssid)
-LUA_WRAP_STRING(nl80211,country)
-LUA_WRAP_LIST(nl80211,assoclist)
-LUA_WRAP_LIST(nl80211,txpwrlist)
-LUA_WRAP_LIST(nl80211,scanlist)
-LUA_WRAP_LIST(nl80211,freqlist)
-LUA_WRAP_LIST(nl80211,countrylist)
-LUA_WRAP_LIST(nl80211,hwmodelist)
-LUA_WRAP_LIST(nl80211,encryption)
-LUA_WRAP_LIST(nl80211,mbssid_support)
-#endif
-
-/* Wext */
-LUA_WRAP_INT(wext,channel)
-LUA_WRAP_INT(wext,frequency)
-LUA_WRAP_INT(wext,txpower)
-LUA_WRAP_INT(wext,bitrate)
-LUA_WRAP_INT(wext,signal)
-LUA_WRAP_INT(wext,noise)
-LUA_WRAP_INT(wext,quality)
-LUA_WRAP_INT(wext,quality_max)
-LUA_WRAP_STRING(wext,mode)
-LUA_WRAP_STRING(wext,ssid)
-LUA_WRAP_STRING(wext,bssid)
-LUA_WRAP_STRING(wext,country)
-LUA_WRAP_LIST(wext,assoclist)
-LUA_WRAP_LIST(wext,txpwrlist)
-LUA_WRAP_LIST(wext,scanlist)
-LUA_WRAP_LIST(wext,freqlist)
-LUA_WRAP_LIST(wext,countrylist)
-LUA_WRAP_LIST(wext,hwmodelist)
-LUA_WRAP_LIST(wext,encryption)
-LUA_WRAP_LIST(wext,mbssid_support)
-
-#ifdef USE_WL
-/* Broadcom table */
-static const luaL_reg R_wl[] = {
-       LUA_REG(wl,channel),
-       LUA_REG(wl,frequency),
-       LUA_REG(wl,txpower),
-       LUA_REG(wl,bitrate),
-       LUA_REG(wl,signal),
-       LUA_REG(wl,noise),
-       LUA_REG(wl,quality),
-       LUA_REG(wl,quality_max),
-       LUA_REG(wl,mode),
-       LUA_REG(wl,ssid),
-       LUA_REG(wl,bssid),
-       LUA_REG(wl,country),
-       LUA_REG(wl,assoclist),
-       LUA_REG(wl,txpwrlist),
-       LUA_REG(wl,scanlist),
-       LUA_REG(wl,freqlist),
-       LUA_REG(wl,countrylist),
-       LUA_REG(wl,hwmodelist),
-       LUA_REG(wl,encryption),
-       LUA_REG(wl,mbssid_support),
-       { NULL, NULL }
-};
-#endif
-
-#ifdef USE_MADWIFI
-/* Madwifi table */
-static const luaL_reg R_madwifi[] = {
-       LUA_REG(madwifi,channel),
-       LUA_REG(madwifi,frequency),
-       LUA_REG(madwifi,txpower),
-       LUA_REG(madwifi,bitrate),
-       LUA_REG(madwifi,signal),
-       LUA_REG(madwifi,noise),
-       LUA_REG(madwifi,quality),
-       LUA_REG(madwifi,quality_max),
-       LUA_REG(madwifi,mode),
-       LUA_REG(madwifi,ssid),
-       LUA_REG(madwifi,bssid),
-       LUA_REG(madwifi,country),
-       LUA_REG(madwifi,assoclist),
-       LUA_REG(madwifi,txpwrlist),
-       LUA_REG(madwifi,scanlist),
-       LUA_REG(madwifi,freqlist),
-       LUA_REG(madwifi,countrylist),
-       LUA_REG(madwifi,hwmodelist),
-       LUA_REG(madwifi,encryption),
-       LUA_REG(madwifi,mbssid_support),
-       { NULL, NULL }
-};
-#endif
-
-#ifdef USE_NL80211
-/* NL80211 table */
-static const luaL_reg R_nl80211[] = {
-       LUA_REG(nl80211,channel),
-       LUA_REG(nl80211,frequency),
-       LUA_REG(nl80211,txpower),
-       LUA_REG(nl80211,bitrate),
-       LUA_REG(nl80211,signal),
-       LUA_REG(nl80211,noise),
-       LUA_REG(nl80211,quality),
-       LUA_REG(nl80211,quality_max),
-       LUA_REG(nl80211,mode),
-       LUA_REG(nl80211,ssid),
-       LUA_REG(nl80211,bssid),
-       LUA_REG(nl80211,country),
-       LUA_REG(nl80211,assoclist),
-       LUA_REG(nl80211,txpwrlist),
-       LUA_REG(nl80211,scanlist),
-       LUA_REG(nl80211,freqlist),
-       LUA_REG(nl80211,countrylist),
-       LUA_REG(nl80211,hwmodelist),
-       LUA_REG(nl80211,encryption),
-       LUA_REG(nl80211,mbssid_support),
-       { NULL, NULL }
-};
-#endif
-
-/* Wext table */
-static const luaL_reg R_wext[] = {
-       LUA_REG(wext,channel),
-       LUA_REG(wext,frequency),
-       LUA_REG(wext,txpower),
-       LUA_REG(wext,bitrate),
-       LUA_REG(wext,signal),
-       LUA_REG(wext,noise),
-       LUA_REG(wext,quality),
-       LUA_REG(wext,quality_max),
-       LUA_REG(wext,mode),
-       LUA_REG(wext,ssid),
-       LUA_REG(wext,bssid),
-       LUA_REG(wext,country),
-       LUA_REG(wext,assoclist),
-       LUA_REG(wext,txpwrlist),
-       LUA_REG(wext,scanlist),
-       LUA_REG(wext,freqlist),
-       LUA_REG(wext,countrylist),
-       LUA_REG(wext,hwmodelist),
-       LUA_REG(wext,encryption),
-       LUA_REG(wext,mbssid_support),
-       { NULL, NULL }
-};
-
-/* Common */
-static const luaL_reg R_common[] = {
-       { "type", iwinfo_L_type },
-       { "__gc", iwinfo_L__gc  },
-       { NULL, NULL }
-};
-
-
-LUALIB_API int luaopen_iwinfo(lua_State *L) {
-       luaL_register(L, IWINFO_META, R_common);
-
-#ifdef USE_WL
-       luaL_newmetatable(L, IWINFO_WL_META);
-       luaL_register(L, NULL, R_wl);
-       lua_pushvalue(L, -1);
-       lua_setfield(L, -2, "__index");
-       lua_setfield(L, -2, "wl");
-#endif
-
-#ifdef USE_MADWIFI
-       luaL_newmetatable(L, IWINFO_MADWIFI_META);
-       luaL_register(L, NULL, R_madwifi);
-       lua_pushvalue(L, -1);
-       lua_setfield(L, -2, "__index");
-       lua_setfield(L, -2, "madwifi");
-#endif
-
-#ifdef USE_NL80211
-       luaL_newmetatable(L, IWINFO_NL80211_META);
-       luaL_register(L, NULL, R_nl80211);
-       lua_pushvalue(L, -1);
-       lua_setfield(L, -2, "__index");
-       lua_setfield(L, -2, "nl80211");
-#endif
-
-       luaL_newmetatable(L, IWINFO_WEXT_META);
-       luaL_register(L, NULL, R_wext);
-       lua_pushvalue(L, -1);
-       lua_setfield(L, -2, "__index");
-       lua_setfield(L, -2, "wext");
-
-       return 1;
-}