f96ef1524bf002e2257c1ba12c9adcd99abdc716
[openwrt.git] / package / wificonf / wificonf.c
1 /*
2  * Wireless Network Adapter configuration utility
3  *
4  * Copyright (C) 2005 Felix Fietkau <nbd@vd-s.ath.cx>
5  *
6  * This program is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU General Public License
8  * as published by the Free Software Foundation; either version 2
9  * of the License, or (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  */
16
17 #include <stdio.h>
18 #include <unistd.h>
19 #include <iwlib.h>
20 #include <bcmnvram.h>
21 #include <shutils.h>
22 #include <wlioctl.h>
23
24 /*------------------------------------------------------------------*/
25 /*
26  * Macro to handle errors when setting WE
27  * Print a nice error message and exit...
28  * We define them as macro so that "return" do the right thing.
29  * The "do {...} while(0)" is a standard trick
30  */
31 #define ERR_SET_EXT(rname, request) \
32         fprintf(stderr, "Error for wireless request \"%s\" (%X) :\n", \
33                 rname, request)
34
35 #define ABORT_ARG_NUM(rname, request) \
36         do { \
37                 ERR_SET_EXT(rname, request); \
38                 fprintf(stderr, "    too few arguments.\n"); \
39                 return; \
40         } while(0)
41
42 #define ABORT_ARG_TYPE(rname, request, arg) \
43         do { \
44                 ERR_SET_EXT(rname, request); \
45                 fprintf(stderr, "    invalid argument \"%s\".\n", arg); \
46                 return; \
47         } while(0)
48
49 #define ABORT_ARG_SIZE(rname, request, max) \
50         do { \
51                 ERR_SET_EXT(rname, request); \
52                 fprintf(stderr, "    argument too big (max %d)\n", max); \
53                 return; \
54         } while(0)
55
56 /*------------------------------------------------------------------*/
57 /*
58  * Wrapper to push some Wireless Parameter in the driver
59  * Use standard wrapper and add pretty error message if fail...
60  */
61 #define IW_SET_EXT_ERR(skfd, ifname, request, wrq, rname) \
62         do { \
63         if(iw_set_ext(skfd, ifname, request, wrq) < 0) { \
64                 ERR_SET_EXT(rname, request); \
65                 fprintf(stderr, "    SET failed on device %-1.16s ; %s.\n", \
66                         ifname, strerror(errno)); \
67                 return; \
68         } } while(0)
69
70 /*------------------------------------------------------------------*/
71 /*
72  * Wrapper to extract some Wireless Parameter out of the driver
73  * Use standard wrapper and add pretty error message if fail...
74  */
75 #define IW_GET_EXT_ERR(skfd, ifname, request, wrq, rname) \
76         do { \
77         if(iw_get_ext(skfd, ifname, request, wrq) < 0) { \
78                 ERR_SET_EXT(rname, request); \
79                 fprintf(stderr, "    GET failed on device %-1.16s ; %s.\n", \
80                         ifname, strerror(errno)); \
81                 return; \
82         } } while(0)
83
84 char *prefix;
85 char buffer[128];
86
87 char *wl_var(char *name)
88 {
89         strcpy(buffer, prefix);
90         strcat(buffer, name);
91 }
92
93 int nvram_enabled(char *name)
94 {
95         return (nvram_match(name, "1") || nvram_match(name, "on") || nvram_match(name, "enabled") ? 1 : 0);
96 }
97
98 int nvram_disabled(char *name)
99 {
100         return (nvram_match(name, "0") || nvram_match(name, "off") || nvram_match(name, "disabled") ? 1 : 0);
101 }
102
103
104 int bcom_ioctl(int skfd, char *ifname, int cmd, void *buf, int len)
105 {
106         struct ifreq ifr;
107         wl_ioctl_t ioc;
108         int ret;
109         
110         ioc.cmd = cmd;
111         ioc.buf = buf;
112         ioc.len = len;
113         
114         ifr.ifr_data = (caddr_t) &ioc;
115         strncpy(ifr.ifr_name, ifname, IFNAMSIZ);
116
117         ret = ioctl(skfd, SIOCDEVPRIVATE, &ifr);
118         if (ret < 0)
119                 fprintf(stderr, "bcom_ioctl [cmd=%d, buf=%08x, len=%d] failed: %d\n", cmd, buf, len, ret);
120
121         return ret;
122 }
123
124 int bcom_set_val(int skfd, char *ifname, char *var, void *val, int len)
125 {
126         char buf[8192];
127         int ret;
128         
129         if (strlen(var) + 1 > sizeof(buf) || len > sizeof(buf))
130                 return -1;
131
132         strcpy(buf, var);
133         
134         if ((ret = bcom_ioctl(skfd, ifname, WLC_GET_VAR, buf, sizeof(buf))))
135                 return ret;
136
137         memcpy(val, buf, len);
138         return 0;       
139 }
140
141 int bcom_set_int(int skfd, char *ifname, char *var, int val)
142 {
143         return bcom_set_val(skfd, ifname, var, &val, sizeof(val));
144 }
145
146 void setup_bcom(int skfd, char *ifname)
147 {
148         int val = 0;
149         char *v;
150         
151         if (bcom_ioctl(skfd, ifname, WLC_GET_MAGIC, &val, sizeof(val)) < 0)
152                 return;
153
154         bcom_ioctl(skfd, ifname, WLC_DOWN, NULL, 0);
155         
156         /* Set up WPA */
157         if (nvram_match(wl_var("crypto"), "tkip"))
158                 val = TKIP_ENABLED;
159         else if (nvram_match(wl_var("crypto"), "aes"))
160                 val = AES_ENABLED;
161         else if (nvram_match(wl_var("crypto"), "tkip+aes"))
162                 val = TKIP_ENABLED | AES_ENABLED;
163         else
164                 val = 0;
165         bcom_ioctl(skfd, ifname, WLC_SET_WSEC, &val, sizeof(val));
166
167         if (val && nvram_get(wl_var("wpa_psk"))) {
168                 val = 1;
169                 bcom_ioctl(skfd, ifname, WLC_SET_EAP_RESTRICT, &val, sizeof(val));
170         }
171
172         /* Set up afterburner */
173         val = ABO_AUTO;
174         if (nvram_enabled(wl_var("afterburner")))
175                 val = ABO_ON;
176         if (nvram_disabled(wl_var("afterburner")))
177                 val = ABO_OFF;
178         bcom_set_val(skfd, ifname, "afterburner_override", &val, sizeof(val));
179         
180         /* Set other options */
181         val = atoi(nvram_safe_get(wl_var("lazywds")));
182         bcom_ioctl(skfd, ifname, WLC_SET_LAZYWDS, &val, sizeof(val));
183         val = atoi(nvram_safe_get(wl_var("frag")));
184         bcom_ioctl(skfd, ifname, WLC_SET_FRAG, &val, sizeof(val));
185         val = atoi(nvram_safe_get(wl_var("dtim")));
186         bcom_ioctl(skfd, ifname, WLC_SET_DTIMPRD, &val, sizeof(val));
187         val = atoi(nvram_safe_get(wl_var("bcn")));
188         bcom_ioctl(skfd, ifname, WLC_SET_BCNPRD, &val, sizeof(val));
189         val = atoi(nvram_safe_get(wl_var("rts")));
190         bcom_ioctl(skfd, ifname, WLC_SET_RTS, &val, sizeof(val));
191         val = atoi(nvram_safe_get(wl_var("antdiv")));
192         bcom_ioctl(skfd, ifname, WLC_SET_ANTDIV, &val, sizeof(val));
193         val = atoi(nvram_safe_get(wl_var("txant")));
194         bcom_ioctl(skfd, ifname, WLC_SET_TXANT, &val, sizeof(val));
195
196         val = nvram_enabled(wl_var("ap_isolate"));
197         bcom_set_int(skfd, ifname, "ap_isolate", val);
198         val = nvram_enabled(wl_var("frameburst"));
199         bcom_ioctl(skfd, ifname, WLC_SET_FAKEFRAG, &val, sizeof(val));
200
201         /* Set up MAC list */
202         if (nvram_match(wl_var("macmode"), "allow"))
203                 val = WLC_MACMODE_ALLOW;
204         else if (nvram_match(wl_var("macmode"), "deny"))
205                 val = WLC_MACMODE_DENY;
206         else
207                 val = WLC_MACMODE_DISABLED;
208
209         if ((val != WLC_MACMODE_DISABLED) && (v = nvram_get(wl_var("maclist")))) {
210                 char buf[8192];
211                 struct maclist *mac_list;
212                 struct ether_addr *addr;
213                 char *next;
214                 
215                 memset(buf, 0, 8192);
216                 mac_list = (struct maclist *) buf;
217                 addr = mac_list->ea;
218
219                 foreach(v, nvram_safe_get(wl_var("maclist")), next) {
220                         if (ether_atoe(v, addr->ether_addr_octet)) {
221                                 mac_list->count++;
222                                 addr++;
223                         }
224                 }
225                 bcom_ioctl(skfd, ifname, WLC_SET_MACLIST, buf, sizeof(buf));
226         } else {
227                 val = WLC_MACMODE_DISABLED;
228         }
229         bcom_ioctl(skfd, ifname, WLC_SET_MACMODE, &val, sizeof(val));
230         
231         /* Set up G mode */
232         bcom_ioctl(skfd, ifname, WLC_GET_PHYTYPE, &val, sizeof(val));
233         if (val == 2) {
234                 int override = WLC_G_PROTECTION_OFF;
235                 int control = WLC_G_PROTECTION_CTL_OFF;
236                 
237                 val = atoi(nvram_safe_get(wl_var("gmode")));
238                 if (val > 5)
239                         val = 1;
240                 bcom_ioctl(skfd, ifname, WLC_SET_GMODE, &val, sizeof(val));
241                 
242                 if (nvram_match(wl_var("gmode_protection"), "auto")) {
243                         override = WLC_G_PROTECTION_AUTO;
244                         control = WLC_G_PROTECTION_CTL_OVERLAP;
245                 }
246                 if (nvram_enabled(wl_var("gmode_protection"))) {
247                         override = WLC_G_PROTECTION_ON;
248                         control = WLC_G_PROTECTION_CTL_OVERLAP;
249                 }
250                 bcom_ioctl(skfd, ifname, WLC_SET_GMODE_PROTECTION_CONTROL, &override, sizeof(control));
251                 bcom_ioctl(skfd, ifname, WLC_SET_GMODE_PROTECTION_OVERRIDE, &override, sizeof(override));
252         }
253 }
254
255 void set_wext_ssid(int skfd, char *ifname)
256 {
257         char *buffer;
258         struct iwreq wrq;
259
260         if (buffer = nvram_get(wl_var("ssid"))) {
261                 if (strlen(buffer) > IW_ESSID_MAX_SIZE) {
262                         ABORT_ARG_SIZE("Set ESSID", SIOCSIWESSID, IW_ESSID_MAX_SIZE);
263                 } else {
264                         char essid[IW_ESSID_MAX_SIZE + 1];
265
266                         wrq.u.essid.flags = 1;
267                         strcpy(essid, buffer);
268                         wrq.u.essid.pointer = (caddr_t) essid;
269                         wrq.u.essid.length = strlen(essid) + 1;
270                         IW_SET_EXT_ERR(skfd, ifname, SIOCSIWESSID, &wrq, "Set ESSID");
271                 }
272         }
273 }
274
275 void start_bcom(int skfd, char *ifname)
276 {
277         int val = 0;
278         
279         if (bcom_ioctl(skfd, ifname, WLC_GET_MAGIC, &val, sizeof(val)) < 0)
280                 return;
281
282         bcom_ioctl(skfd, ifname, WLC_UP, &val, sizeof(val));
283         
284         /* Need to re-set SSID after WLC_UP */
285         set_wext_ssid(skfd, ifname);
286 }
287
288 void setup_wext_wep(int skfd, char *ifname)
289 {
290         int i, keylen;
291         struct iwreq wrq;
292         char keystr[5];
293         char *keyval;
294         unsigned char key[IW_ENCODING_TOKEN_MAX];
295
296         strcpy(keystr, "key1");
297         for (i = 1; i <= 4; i++) {
298                 if (keyval = nvram_get(wl_var(keystr))) {
299                         keylen = iw_in_key(keyval, key);
300                         
301                         if (keylen > 0) {
302                                 wrq.u.data.length = keylen;
303                                 wrq.u.data.pointer = (caddr_t) key;
304                                 wrq.u.data.flags = i;
305                                 IW_SET_EXT_ERR(skfd, ifname, SIOCSIWENCODE, &wrq, "Set Encode");
306                         }
307                 }
308                 keystr[3]++;
309         }
310         
311         
312         i = atoi(nvram_safe_get(wl_var("key")));
313         if (i > 0 && i < 4) {
314                 wrq.u.data.flags = i | IW_ENCODE_RESTRICTED;
315                 IW_SET_EXT_ERR(skfd, ifname, SIOCSIWENCODE, &wrq, "Set Encode");
316         }
317 }
318
319 void setup_wext(int skfd, char *ifname)
320 {
321         char *buffer;
322         struct iwreq wrq;
323
324         /* Set ESSID */
325         set_wext_ssid(skfd, ifname);
326         
327         /* Set channel */
328         int channel = atoi(nvram_safe_get(wl_var("channel")));
329         
330         wrq.u.freq.m = -1;
331         wrq.u.freq.e = 0;
332         wrq.u.freq.flags = 0;
333
334         if (channel > 0) {
335                 wrq.u.freq.flags = IW_FREQ_FIXED;
336                 wrq.u.freq.m = channel;
337         }
338         IW_SET_EXT_ERR(skfd, ifname, SIOCSIWFREQ, &wrq, "Set Frequency");
339         
340         /* Set operation mode */
341         int ap = 0, infra = 0, wet = 0;
342         
343         ap = (nvram_match(wl_var("mode"), "ap") || nvram_match(wl_var("mode"), "wds"));
344         infra = nvram_enabled(wl_var("infra"));
345         wet = nvram_enabled(wl_var("wet"));
346
347         wrq.u.mode = (!infra ? IW_MODE_ADHOC : (ap ? IW_MODE_MASTER : (wet ? IW_MODE_REPEAT : IW_MODE_INFRA)));
348         IW_SET_EXT_ERR(skfd, ifname, SIOCSIWMODE, &wrq, "Set Mode");
349
350         /* Disable radio if wlX_radio is set and not enabled */
351         if (nvram_disabled(wl_var("radio")))
352                 wrq.u.txpower.disabled = 1;
353         else 
354                 wrq.u.txpower.disabled = 0;
355
356         wrq.u.txpower.value = -1;
357         wrq.u.txpower.fixed = 1;
358         wrq.u.txpower.flags = IW_TXPOW_MWATT;
359         IW_SET_EXT_ERR(skfd, ifname, SIOCSIWTXPOW, &wrq, "Set Tx Power");
360
361         /* Set up WEP */
362         if (nvram_enabled(wl_var("wep")))
363                 setup_wext_wep(skfd, ifname);
364
365 }
366
367
368 static int setup_interfaces(int skfd, char *ifname, char *args[], int count)
369 {
370         struct iwreq wrq;
371         int rc;
372         
373         /* Avoid "Unused parameter" warning */
374         args = args; count = count;
375         
376         if(iw_get_ext(skfd, ifname, SIOCGIWNAME, &wrq) < 0)
377                 return 0;
378
379         setup_bcom(skfd, ifname);
380         setup_wext(skfd, ifname);
381         start_bcom(skfd, ifname);
382         prefix[2]++;
383 }
384
385 int main(int argc, char **argv)
386 {
387         int skfd;
388
389         if((skfd = iw_sockets_open()) < 0) {
390                 perror("socket");
391                 exit(-1);
392         }
393
394         prefix = strdup("wl0_");
395         iw_enum_devices(skfd, &setup_interfaces, NULL, 0);
396         
397         return 0;
398 }