libs/iwinfo: add dummy.txpwrlist()
[project/luci.git] / libs / iwinfo / src / iwinfo_lualib.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_lualib.h"
20
21 /* Determine type */
22 static int iwinfo_L_type(lua_State *L)
23 {
24         const char *ifname = luaL_checkstring(L, 1);
25
26         if( wl_probe(ifname) )
27                 lua_pushstring(L, "wl");
28
29         else if( madwifi_probe(ifname) )
30                 lua_pushstring(L, "madwifi");
31
32         else if( wext_probe(ifname) )
33                 lua_pushstring(L, "wext");
34
35         else
36                 lua_pushnil(L);
37
38         return 1;
39 }
40
41 /* Wrapper for assoclist */
42 static int iwinfo_L_assoclist(lua_State *L, int (*func)(const char *, char *, int *))
43 {
44         int i, len;
45         char rv[IWINFO_BUFSIZE];
46         char macstr[18];
47         const char *ifname = luaL_checkstring(L, 1);
48         struct iwinfo_assoclist_entry *e;
49
50         lua_newtable(L);
51         memset(rv, 0, sizeof(rv));
52
53         if( !(*func)(ifname, rv, &len) )
54         {
55                 for( i = 0; i < len; i += sizeof(struct iwinfo_assoclist_entry) )
56                 {
57                         e = (struct iwinfo_assoclist_entry *) &rv[i];
58
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]);
62
63                         lua_newtable(L);
64
65                         lua_pushnumber(L, e->signal);
66                         lua_setfield(L, -2, "signal");
67                         
68                         lua_pushnumber(L, e->noise);
69                         lua_setfield(L, -2, "noise");
70
71                         lua_setfield(L, -2, macstr);
72                 }
73         }
74
75         return 1;
76 }
77
78 /* Wrapper for tx power list */
79 static int iwinfo_L_txpwrlist(lua_State *L, int (*func)(const char *, char *, int *))
80 {
81         int i, x, len;
82         char rv[IWINFO_BUFSIZE];
83         const char *ifname = luaL_checkstring(L, 1);
84         struct iwinfo_txpwrlist_entry *e;
85
86         lua_newtable(L);
87         memset(rv, 0, sizeof(rv));
88
89         if( !(*func)(ifname, rv, &len) )
90         {
91                 for( i = 0, x = 1; i < len; i += sizeof(struct iwinfo_txpwrlist_entry), x++ )
92                 {
93                         e = (struct iwinfo_txpwrlist_entry *) &rv[i];
94
95                         lua_pushinteger(L, x);
96                         lua_newtable(L);
97
98                         lua_pushnumber(L, e->mw);
99                         lua_setfield(L, -2, "mw");
100                         
101                         lua_pushnumber(L, e->dbm);
102                         lua_setfield(L, -2, "dbm");
103
104                         lua_settable(L, -3);
105                 }
106         }
107
108         return 1;
109 }
110
111 /* Broadcom */
112 LUA_WRAP_INT(wl,channel)
113 LUA_WRAP_INT(wl,frequency)
114 LUA_WRAP_INT(wl,bitrate)
115 LUA_WRAP_INT(wl,signal)
116 LUA_WRAP_INT(wl,noise)
117 LUA_WRAP_INT(wl,quality)
118 LUA_WRAP_INT(wl,quality_max)
119 LUA_WRAP_INT(wl,mbssid_support)
120 LUA_WRAP_STRING(wl,mode)
121 LUA_WRAP_STRING(wl,ssid)
122 LUA_WRAP_STRING(wl,bssid)
123 LUA_WRAP_STRING(wl,enctype)
124 LUA_WRAP_ASSOCLIST(wl)
125 LUA_WRAP_TXPWRLIST(wl)
126
127 /* Madwifi */
128 LUA_WRAP_INT(madwifi,channel)
129 LUA_WRAP_INT(madwifi,frequency)
130 LUA_WRAP_INT(madwifi,bitrate)
131 LUA_WRAP_INT(madwifi,signal)
132 LUA_WRAP_INT(madwifi,noise)
133 LUA_WRAP_INT(madwifi,quality)
134 LUA_WRAP_INT(madwifi,quality_max)
135 LUA_WRAP_INT(madwifi,mbssid_support)
136 LUA_WRAP_STRING(madwifi,mode)
137 LUA_WRAP_STRING(madwifi,ssid)
138 LUA_WRAP_STRING(madwifi,bssid)
139 LUA_WRAP_STRING(madwifi,enctype)
140 LUA_WRAP_ASSOCLIST(madwifi)
141 LUA_WRAP_TXPWRLIST(madwifi)
142
143 /* Wext */
144 LUA_WRAP_INT(wext,channel)
145 LUA_WRAP_INT(wext,frequency)
146 LUA_WRAP_INT(wext,bitrate)
147 LUA_WRAP_INT(wext,signal)
148 LUA_WRAP_INT(wext,noise)
149 LUA_WRAP_INT(wext,quality)
150 LUA_WRAP_INT(wext,quality_max)
151 LUA_WRAP_INT(wext,mbssid_support)
152 LUA_WRAP_STRING(wext,mode)
153 LUA_WRAP_STRING(wext,ssid)
154 LUA_WRAP_STRING(wext,bssid)
155 LUA_WRAP_STRING(wext,enctype)
156 LUA_WRAP_ASSOCLIST(wext)
157 LUA_WRAP_TXPWRLIST(wext)
158
159 /* Broadcom table */
160 static const luaL_reg R_wl[] = {
161         LUA_REG(wl,channel),
162         LUA_REG(wl,frequency),
163         LUA_REG(wl,bitrate),
164         LUA_REG(wl,signal),
165         LUA_REG(wl,noise),
166         LUA_REG(wl,quality),
167         LUA_REG(wl,quality_max),
168         LUA_REG(wl,mode),
169         LUA_REG(wl,ssid),
170         LUA_REG(wl,bssid),
171         LUA_REG(wl,enctype),
172         LUA_REG(wl,assoclist),
173         LUA_REG(wl,txpwrlist),
174         LUA_REG(wl,mbssid_support),
175         { NULL, NULL }
176 };
177
178 /* Madwifi table */
179 static const luaL_reg R_madwifi[] = {
180         LUA_REG(madwifi,channel),
181         LUA_REG(madwifi,frequency),
182         LUA_REG(madwifi,bitrate),
183         LUA_REG(madwifi,signal),
184         LUA_REG(madwifi,noise),
185         LUA_REG(madwifi,quality),
186         LUA_REG(madwifi,quality_max),
187         LUA_REG(madwifi,mode),
188         LUA_REG(madwifi,ssid),
189         LUA_REG(madwifi,bssid),
190         LUA_REG(madwifi,enctype),
191         LUA_REG(madwifi,assoclist),
192         LUA_REG(madwifi,txpwrlist),
193         LUA_REG(madwifi,mbssid_support),
194         { NULL, NULL }
195 };
196
197 /* Wext table */
198 static const luaL_reg R_wext[] = {
199         LUA_REG(wext,channel),
200         LUA_REG(wext,frequency),
201         LUA_REG(wext,bitrate),
202         LUA_REG(wext,signal),
203         LUA_REG(wext,noise),
204         LUA_REG(wext,quality),
205         LUA_REG(wext,quality_max),
206         LUA_REG(wext,mode),
207         LUA_REG(wext,ssid),
208         LUA_REG(wext,bssid),
209         LUA_REG(wext,enctype),
210         LUA_REG(wext,assoclist),
211         LUA_REG(wext,txpwrlist),
212         LUA_REG(wext,mbssid_support),
213         { NULL, NULL }
214 };
215
216 /* Common */
217 static const luaL_reg R_common[] = {
218         { "type", iwinfo_L_type },
219         { NULL, NULL }
220 };
221
222
223 LUALIB_API int luaopen_iwinfo(lua_State *L) {
224         luaL_register(L, IWINFO_META, R_common);
225
226         luaL_newmetatable(L, IWINFO_WL_META);
227         luaL_register(L, NULL, R_wl);
228         lua_pushvalue(L, -1);
229         lua_setfield(L, -2, "__index");
230         lua_setfield(L, -2, "wl");
231
232         luaL_newmetatable(L, IWINFO_MADWIFI_META);
233         luaL_register(L, NULL, R_madwifi);
234         lua_pushvalue(L, -1);
235         lua_setfield(L, -2, "__index");
236         lua_setfield(L, -2, "madwifi");
237
238         luaL_newmetatable(L, IWINFO_WEXT_META);
239         luaL_register(L, NULL, R_wext);
240         lua_pushvalue(L, -1);
241         lua_setfield(L, -2, "__index");
242         lua_setfield(L, -2, "wext");
243
244         return 1;
245 }
246