2 * iwinfo - Wireless Information Library - Lua Bindings
4 * Copyright (C) 2009 Jo-Philipp Wich <xm@subsignal.org>
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.
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.
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/.
19 #include "iwinfo_lualib.h"
22 int iwinfo_L_type(lua_State *L)
24 const char *ifname = luaL_checkstring(L, 1);
26 if( wl_probe(ifname) )
27 lua_pushstring(L, "wl");
29 else if( madwifi_probe(ifname) )
30 lua_pushstring(L, "madwifi");
32 else if( wext_probe(ifname) )
33 lua_pushstring(L, "wext");
41 /* Wrapper for assoclist */
42 int iwinfo_L_assoclist(lua_State *L, int (*func)(const char *, char *, int *))
45 char rv[IWINFO_BUFSIZE];
47 const char *ifname = luaL_checkstring(L, 1);
48 struct iwinfo_assoclist_entry *e;
51 memset(rv, 0, sizeof(rv));
53 if( !(*func)(ifname, rv, &len) )
55 for( i = 0; i < len; i += sizeof(struct iwinfo_assoclist_entry) )
57 e = (struct iwinfo_assoclist_entry *) &rv[i];
59 sprintf(macstr, "%02X:%02X:%02X:%02X:%02X:%02X",
60 e->mac[0], e->mac[1], e->mac[2],
61 e->mac[3], e->mac[4], e->mac[5]);
65 lua_pushnumber(L, e->signal);
66 lua_setfield(L, -2, "signal");
68 lua_pushnumber(L, e->noise);
69 lua_setfield(L, -2, "noise");
71 lua_setfield(L, -2, macstr);
79 LUA_WRAP_INT(wl,channel)
80 LUA_WRAP_INT(wl,bitrate)
81 LUA_WRAP_INT(wl,signal)
82 LUA_WRAP_INT(wl,noise)
83 LUA_WRAP_INT(wl,quality)
84 LUA_WRAP_INT(wl,quality_max)
85 LUA_WRAP_STRING(wl,mode)
86 LUA_WRAP_STRING(wl,ssid)
87 LUA_WRAP_STRING(wl,bssid)
88 LUA_WRAP_STRING(wl,enctype)
89 LUA_WRAP_ASSOCLIST(wl)
92 LUA_WRAP_INT(madwifi,channel)
93 LUA_WRAP_INT(madwifi,bitrate)
94 LUA_WRAP_INT(madwifi,signal)
95 LUA_WRAP_INT(madwifi,noise)
96 LUA_WRAP_INT(madwifi,quality)
97 LUA_WRAP_INT(madwifi,quality_max)
98 LUA_WRAP_STRING(madwifi,mode)
99 LUA_WRAP_STRING(madwifi,ssid)
100 LUA_WRAP_STRING(madwifi,bssid)
101 LUA_WRAP_STRING(madwifi,enctype)
102 LUA_WRAP_ASSOCLIST(madwifi)
105 LUA_WRAP_INT(wext,channel)
106 LUA_WRAP_INT(wext,bitrate)
107 LUA_WRAP_INT(wext,signal)
108 LUA_WRAP_INT(wext,noise)
109 LUA_WRAP_INT(wext,quality)
110 LUA_WRAP_INT(wext,quality_max)
111 LUA_WRAP_STRING(wext,mode)
112 LUA_WRAP_STRING(wext,ssid)
113 LUA_WRAP_STRING(wext,bssid)
114 LUA_WRAP_STRING(wext,enctype)
115 LUA_WRAP_ASSOCLIST(wext)
118 static const luaL_reg R_wl[] = {
124 LUA_REG(wl,quality_max),
129 LUA_REG(wl,assoclist),
134 static const luaL_reg R_madwifi[] = {
135 LUA_REG(madwifi,channel),
136 LUA_REG(madwifi,bitrate),
137 LUA_REG(madwifi,signal),
138 LUA_REG(madwifi,noise),
139 LUA_REG(madwifi,quality),
140 LUA_REG(madwifi,quality_max),
141 LUA_REG(madwifi,mode),
142 LUA_REG(madwifi,ssid),
143 LUA_REG(madwifi,bssid),
144 LUA_REG(madwifi,enctype),
145 LUA_REG(madwifi,assoclist),
150 static const luaL_reg R_wext[] = {
151 LUA_REG(wext,channel),
152 LUA_REG(wext,bitrate),
153 LUA_REG(wext,signal),
155 LUA_REG(wext,quality),
156 LUA_REG(wext,quality_max),
160 LUA_REG(wext,enctype),
161 LUA_REG(wext,assoclist),
166 static const luaL_reg R_common[] = {
167 { "type", iwinfo_L_type },
172 LUALIB_API int luaopen_iwinfo(lua_State *L) {
173 luaL_register(L, IWINFO_META, R_common);
175 luaL_newmetatable(L, IWINFO_WL_META);
176 luaL_register(L, NULL, R_wl);
177 lua_pushvalue(L, -1);
178 lua_setfield(L, -2, "__index");
179 lua_setfield(L, -2, "wl");
181 luaL_newmetatable(L, IWINFO_MADWIFI_META);
182 luaL_register(L, NULL, R_madwifi);
183 lua_pushvalue(L, -1);
184 lua_setfield(L, -2, "__index");
185 lua_setfield(L, -2, "madwifi");
187 luaL_newmetatable(L, IWINFO_WEXT_META);
188 luaL_register(L, NULL, R_wext);
189 lua_pushvalue(L, -1);
190 lua_setfield(L, -2, "__index");
191 lua_setfield(L, -2, "wext");