improve signal level/quality display
[openwrt.git] / target / linux / package / wlcompat / wlcompat.c
1 /*
2  * wlcompat.c
3  *
4  * Copyright (C) 2005 Mike Baker,
5  *                    Felix Fietkau <openwrt@nbd.name>
6  *
7  * This program is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU General Public License
9  * as published by the Free Software Foundation; either version 2
10  * of the License, or (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program; if not, write to the Free Software
19  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
20  *
21  * $Id$
22  */
23
24
25 #include <linux/config.h>
26 #include <linux/module.h>
27 #include <linux/init.h>
28 #include <linux/if_arp.h>
29 #include <asm/uaccess.h>
30 #include <linux/wireless.h>
31
32 #include <net/iw_handler.h>
33 #include <wlioctl.h>
34
35 static struct net_device *dev;
36 static unsigned short bss_force;
37 static struct iw_statistics wstats;
38 char buf[WLC_IOCTL_MAXLEN];
39
40 /* The frequency of each channel in MHz */
41 const long channel_frequency[] = {
42         2412, 2417, 2422, 2427, 2432, 2437, 2442,
43         2447, 2452, 2457, 2462, 2467, 2472, 2484
44 };
45 #define NUM_CHANNELS ( sizeof(channel_frequency) / sizeof(channel_frequency[0]) )
46
47 typedef struct internal_wsec_key {
48         uint8 index;            // 0x00
49         uint8 unknown_1;        // 0x01
50         uint8 type;             // 0x02
51         uint8 unknown_2[7];     // 0x03
52         uint8 len;              // 0x0a
53         uint8 pad[3];
54         char data[32];          // 0x0e
55 } wkey;
56
57
58 static int wlcompat_private_ioctl(struct net_device *dev,
59                          struct iw_request_info *info,
60                          union iwreq_data *wrqu,
61                          char *extra);
62 #ifdef DEBUG
63 void print_buffer(int len, unsigned char *buf);
64 #endif
65
66 static int wl_ioctl(struct net_device *dev, int cmd, void *buf, int len)
67 {
68         mm_segment_t old_fs = get_fs();
69         struct ifreq ifr;
70         int ret;
71         wl_ioctl_t ioc;
72         ioc.cmd = cmd;
73         ioc.buf = buf;
74         ioc.len = len;
75         strncpy(ifr.ifr_name, dev->name, IFNAMSIZ);
76         ifr.ifr_data = (caddr_t) &ioc;
77         set_fs(KERNEL_DS);
78         ret = dev->do_ioctl(dev,&ifr,SIOCDEVPRIVATE);
79         set_fs (old_fs);
80         return ret;
81 }
82
83 static int wl_set_val(struct net_device *dev, char *var, void *val, int len)
84 {
85         char buf[128];
86         int buf_len;
87         int ret;
88
89         /* check for overflow */
90         if ((buf_len = strlen(var)) + 1 + len > sizeof(buf))
91                 return -1;
92         
93         strcpy(buf, var);
94         buf_len += 1;
95
96         /* append int value onto the end of the name string */
97         memcpy(&(buf[buf_len]), val, len);
98         buf_len += len;
99
100         ret = wl_ioctl(dev, WLC_SET_VAR, buf, buf_len);
101         return ret;
102 }
103
104 static int wl_get_val(struct net_device *dev, char *var, void *val, int len)
105 {
106         char buf[128];
107         int buf_len;
108         int ret;
109
110         /* check for overflow */
111         if ((buf_len = strlen(var)) + 1 > sizeof(buf) || len > sizeof(buf))
112                 return -1;
113         
114         strcpy(buf, var);
115         if (ret = wl_ioctl(dev, WLC_GET_VAR, buf, buf_len + len))
116                 return ret;
117
118         memcpy(val, buf, len);
119         return 0;
120 }
121
122 int get_primary_key(struct net_device *dev)
123 {
124         int key, val;
125         
126         for (key = val = 0; (key < 4) && (val == 0); key++) {
127                 val = key;
128                 if (wl_ioctl(dev, WLC_GET_KEY_PRIMARY, &val, sizeof(val)) < 0)
129                         return -EINVAL;
130         }
131         return key;
132 }
133
134
135 static int wlcompat_ioctl_getiwrange(struct net_device *dev,
136                                     char *extra)
137 {
138         int i, k;
139         struct iw_range *range;
140
141         range = (struct iw_range *) extra;
142         bzero(extra, sizeof(struct iw_range));
143
144         range->we_version_compiled = WIRELESS_EXT;
145         range->we_version_source = WIRELESS_EXT;
146         
147         range->min_nwid = range->max_nwid = 0;
148         
149         range->num_channels = NUM_CHANNELS;
150         k = 0;
151         for (i = 0; i < NUM_CHANNELS; i++) {
152                 range->freq[k].i = i + 1;
153                 range->freq[k].m = channel_frequency[i] * 100000;
154                 range->freq[k].e = 1;
155                 k++;
156                 if (k >= IW_MAX_FREQUENCIES)
157                         break;
158         }
159         range->num_frequency = k;
160         range->sensitivity = 3;
161
162         /* nbd: don't know what this means, but other drivers set it this way */
163         range->pmp_flags = IW_POWER_PERIOD;
164         range->pmt_flags = IW_POWER_TIMEOUT;
165         range->pm_capa = IW_POWER_PERIOD | IW_POWER_TIMEOUT | IW_POWER_UNICAST_R;
166
167         range->min_pmp = 0;
168         range->max_pmp = 65535000;
169         range->min_pmt = 0;
170         range->max_pmt = 65535 * 1000;
171
172         range->max_qual.qual = 0;
173         range->max_qual.level = 0;
174         range->max_qual.noise = 0;
175         
176         range->min_rts = 0;
177         if (wl_ioctl(dev, WLC_GET_RTS, &range->max_rts, sizeof(int)) < 0)
178                 range->max_rts = 2347;
179
180         range->min_frag = 256;
181         
182         if (wl_ioctl(dev, WLC_GET_FRAG, &range->max_frag, sizeof(int)) < 0)
183                 range->max_frag = 2346;
184
185         range->txpower_capa = IW_TXPOW_DBM;
186
187         return 0;
188 }
189
190
191 static int wlcompat_set_scan(struct net_device *dev,
192                          struct iw_request_info *info,
193                          union iwreq_data *wrqu,
194                          char *extra)
195 {
196         int ap = 0, oldap = 0;
197         wl_scan_params_t params;
198
199         memset(&params, 0, sizeof(params));
200
201         /* use defaults (same parameters as wl scan) */
202         memset(&params.bssid, 0xff, sizeof(params.bssid));
203         params.bss_type = DOT11_BSSTYPE_ANY;
204         params.scan_type = -1;
205         params.nprobes = -1;
206         params.active_time = -1;
207         params.passive_time = -1;
208         params.home_time = -1;
209         
210         /* can only scan in STA mode */
211         wl_ioctl(dev, WLC_GET_AP, &oldap, sizeof(oldap));
212         if (oldap > 0)
213                 wl_ioctl(dev, WLC_SET_AP, &ap, sizeof(ap));
214         
215         if (wl_ioctl(dev, WLC_SCAN, &params, 64) < 0)
216                 return -EINVAL;
217         
218         if (oldap > 0)
219                 wl_ioctl(dev, WLC_SET_AP, &oldap, sizeof(oldap));
220
221         return 0;
222 }
223
224
225 struct iw_statistics *wlcompat_get_wireless_stats(struct net_device *dev)
226 {
227         wl_bss_info_t *bss_info = (wl_bss_info_t *) buf;
228         get_pktcnt_t pkt;
229         unsigned int rssi, noise, ap;
230         
231         memset(&wstats, 0, sizeof(wstats));
232         memset(&pkt, 0, sizeof(pkt));
233         memset(buf, 0, sizeof(buf));
234         bss_info->version = 0x2000;
235         wl_ioctl(dev, WLC_GET_BSS_INFO, bss_info, WLC_IOCTL_MAXLEN);
236         wl_ioctl(dev, WLC_GET_PKTCNTS, &pkt, sizeof(pkt));
237
238         rssi = 0;
239         if ((wl_ioctl(dev, WLC_GET_AP, &ap, sizeof(ap)) < 0) || ap) {
240                 if (wl_ioctl(dev, WLC_GET_PHY_NOISE, &noise, sizeof(noise)) < 0)
241                         noise = 0;
242         } else {
243                 // somehow the structure doesn't fit here
244                 rssi = buf[82];
245                 noise = buf[84];
246         }
247         rssi = (rssi == 0 ? 1 : rssi);
248         wstats.qual.updated = 0x10;
249         if (rssi <= 1) 
250                 wstats.qual.updated |= 0x20;
251         if (noise <= 1)
252                 wstats.qual.updated |= 0x40;
253
254         if ((wstats.qual.updated & 0x60) == 0x60)
255                 return NULL;
256
257         wstats.qual.level = rssi;
258         wstats.qual.noise = noise;
259         wstats.discard.misc = pkt.rx_bad_pkt;
260         wstats.discard.retries = pkt.tx_bad_pkt;
261
262         return &wstats;
263 }
264
265 static int wlcompat_get_scan(struct net_device *dev,
266                          struct iw_request_info *info,
267                          union iwreq_data *wrqu,
268                          char *extra)
269 {
270         wl_scan_results_t *results = (wl_scan_results_t *) buf;
271         wl_bss_info_t *bss_info;
272         char *info_ptr;
273         char *current_ev = extra;
274         char *current_val;
275         char *end_buf = extra + IW_SCAN_MAX_DATA;
276         struct iw_event iwe;
277         int i, j;
278         int rssi, noise;
279         
280         results->buflen = WLC_IOCTL_MAXLEN - sizeof(wl_scan_results_t);
281         
282         if (wl_ioctl(dev, WLC_SCAN_RESULTS, buf, WLC_IOCTL_MAXLEN) < 0)
283                 return -EAGAIN;
284         
285         bss_info = &(results->bss_info[0]);
286         info_ptr = (char *) bss_info;
287         for (i = 0; i < results->count; i++) {
288
289                 /* send the cell address (must be sent first) */
290                 iwe.cmd = SIOCGIWAP;
291                 iwe.u.ap_addr.sa_family = ARPHRD_ETHER;
292                 memcpy(&iwe.u.ap_addr.sa_data, &bss_info->BSSID, sizeof(bss_info->BSSID));
293                 current_ev = iwe_stream_add_event(current_ev, end_buf, &iwe, IW_EV_ADDR_LEN);
294                 
295                 /* send the ESSID */
296                 iwe.cmd = SIOCGIWESSID;
297                 iwe.u.data.length = bss_info->SSID_len;
298                 if (iwe.u.data.length > IW_ESSID_MAX_SIZE)
299                         iwe.u.data.length = IW_ESSID_MAX_SIZE;
300                 iwe.u.data.flags = 1;
301                 current_ev = iwe_stream_add_point(current_ev, end_buf, &iwe, bss_info->SSID);
302
303                 /* send frequency/channel info */
304                 iwe.cmd = SIOCGIWFREQ;
305                 iwe.u.freq.e = 0;
306                 iwe.u.freq.m = bss_info->channel;
307                 current_ev = iwe_stream_add_event(current_ev, end_buf, &iwe, IW_EV_FREQ_LEN);
308
309                 /* add quality statistics */
310                 iwe.cmd = IWEVQUAL;
311                 iwe.u.qual.qual = 0;
312                 iwe.u.qual.level = bss_info->RSSI;
313                 iwe.u.qual.noise = bss_info->phy_noise;
314                 current_ev = iwe_stream_add_event(current_ev, end_buf, &iwe, IW_EV_QUAL_LEN);
315         
316                 /* send rate information */
317                 iwe.cmd = SIOCGIWRATE;
318                 current_val = current_ev + IW_EV_LCP_LEN;
319                 iwe.u.bitrate.fixed = iwe.u.bitrate.disabled = 0;
320                 
321                 for(j = 0 ; j < bss_info->rateset.count ; j++) {
322                         iwe.u.bitrate.value = ((bss_info->rateset.rates[j] & 0x7f) * 500000);
323                         current_val = iwe_stream_add_value(current_ev, current_val, end_buf, &iwe, IW_EV_PARAM_LEN);
324                 }
325                 if((current_val - current_ev) > IW_EV_LCP_LEN)
326                         current_ev = current_val;
327
328                 info_ptr += sizeof(wl_bss_info_t);
329                 if (bss_info->ie_length % 4)
330                         info_ptr += bss_info->ie_length + 4 - (bss_info->ie_length % 4);
331                 else
332                         info_ptr += bss_info->ie_length;
333                 bss_info = (wl_bss_info_t *) info_ptr;
334         }
335         
336         wrqu->data.length = (current_ev - extra);
337         wrqu->data.flags = 0;
338
339         return 0;
340 }
341
342 static int wlcompat_ioctl(struct net_device *dev,
343                          struct iw_request_info *info,
344                          union iwreq_data *wrqu,
345                          char *extra)
346 {
347         switch (info->cmd) {
348                 case SIOCGIWNAME:
349                         strcpy(wrqu->name, "IEEE 802.11-DS");
350                         break;
351                 case SIOCGIWFREQ:
352                 {
353                         channel_info_t ci;
354
355                         if (wl_ioctl(dev,WLC_GET_CHANNEL, &ci, sizeof(ci)) < 0)
356                                 return -EINVAL;
357
358                         wrqu->freq.m = ci.target_channel;
359                         wrqu->freq.e = 0;
360                         break;
361                 }
362                 case SIOCSIWFREQ:
363                 {
364                         if (wrqu->freq.m == -1) {
365                                 wrqu->freq.m = 0;
366                                 if (wl_ioctl(dev, WLC_SET_CHANNEL, &wrqu->freq.m, sizeof(int)) < 0)
367                                         return -EINVAL;
368                         } else {
369                                 if (wrqu->freq.e == 1) {
370                                         int channel = 0;
371                                         int f = wrqu->freq.m / 100000;
372                                         while ((channel < NUM_CHANNELS + 1) && (f != channel_frequency[channel]))
373                                                 channel++;
374                                         
375                                         if (channel == NUM_CHANNELS) // channel not found
376                                                 return -EINVAL;
377
378                                         wrqu->freq.e = 0;
379                                         wrqu->freq.m = channel + 1;
380                                 }
381                                 if ((wrqu->freq.e == 0) && (wrqu->freq.m < 1000)) {
382                                         if (wl_ioctl(dev, WLC_SET_CHANNEL, &wrqu->freq.m, sizeof(int)) < 0)
383                                                 return -EINVAL;
384                                 } else {
385                                         return -EINVAL;
386                                 }
387                         }
388                         break;
389                 }
390                 case SIOCSIWAP:
391                 {
392                         int ap = 0;
393                         int infra = 0;
394                         rw_reg_t reg;
395
396                         memset(&reg, 0, sizeof(reg));
397
398                         if (wrqu->ap_addr.sa_family != ARPHRD_ETHER)
399                                 return -EINVAL;
400
401                         if (wl_ioctl(dev, WLC_GET_AP, &ap, sizeof(ap)) < 0)
402                                 return -EINVAL;
403
404                         if (wl_ioctl(dev, WLC_GET_INFRA, &infra, sizeof(infra)) < 0)
405                                 return -EINVAL;
406
407                         if (!infra) {
408                                 wl_ioctl(dev, WLC_SET_BSSID, wrqu->ap_addr.sa_data, 6);
409
410                                 reg.size = 4;
411                                 reg.byteoff = 0x184;
412                                 reg.val = bss_force << 16 | bss_force;
413                                 wl_ioctl(dev, WLC_W_REG, &reg, sizeof(reg));
414                                 
415                                 reg.byteoff = 0x180;
416                                 wl_ioctl(dev, WLC_R_REG, &reg, sizeof(reg));
417                                 reg.val = bss_force << 16;
418                                 wl_ioctl(dev, WLC_W_REG, &reg, sizeof(reg));
419                         }
420
421                         if (wl_ioctl(dev, ((ap || !infra) ? WLC_SET_BSSID : WLC_REASSOC), wrqu->ap_addr.sa_data, 6) < 0)
422                                 return -EINVAL;
423
424                         break;
425                 }
426                 case SIOCGIWAP:
427                 {
428 #ifdef DEBUG
429                         rw_reg_t reg;
430                         memset(&reg, 0, sizeof(reg));
431
432                         reg.size = 4;
433                         reg.byteoff = 0x184;
434                         wl_ioctl(dev, WLC_R_REG, &reg, sizeof(reg));
435                         printk("bss time = 0x%08x", reg.val);
436                         
437                         reg.byteoff = 0x180;
438                         wl_ioctl(dev, WLC_R_REG, &reg, sizeof(reg));
439                         printk("%08x\n", reg.val);
440 #endif
441                         
442                         wrqu->ap_addr.sa_family = ARPHRD_ETHER;
443                         if (wl_ioctl(dev,WLC_GET_BSSID,wrqu->ap_addr.sa_data,6) < 0)
444                                 return -EINVAL;
445                         break;
446                 }
447                 case SIOCGIWESSID:
448                 {
449                         wlc_ssid_t ssid;
450                         
451                         if (wl_ioctl(dev,WLC_GET_SSID, &ssid, sizeof(wlc_ssid_t)) < 0)
452                                 return -EINVAL;
453
454                         wrqu->essid.flags = wrqu->data.flags = 1;
455                         wrqu->essid.length = wrqu->data.length = ssid.SSID_len + 1;
456                         memcpy(extra,ssid.SSID,ssid.SSID_len + 1);
457                         break;
458                 }
459                 case SIOCSIWESSID:
460                 {
461                         wlc_ssid_t ssid;
462                         memset(&ssid, 0, sizeof(ssid));
463                         ssid.SSID_len = strlen(extra);
464                         if (ssid.SSID_len > WLC_ESSID_MAX_SIZE)
465                                 ssid.SSID_len = WLC_ESSID_MAX_SIZE;
466                         memcpy(ssid.SSID, extra, ssid.SSID_len);
467                         if (wl_ioctl(dev, WLC_SET_SSID, &ssid, sizeof(ssid)) < 0)
468                                 return -EINVAL;
469                         break;
470                 }
471                 case SIOCGIWRTS:
472                 {
473                         if (wl_ioctl(dev,WLC_GET_RTS,&(wrqu->rts.value),sizeof(int)) < 0) 
474                                 return -EINVAL;
475                         break;
476                 }
477                 case SIOCSIWRTS:
478                 {
479                         if (wl_ioctl(dev,WLC_SET_RTS,&(wrqu->rts.value),sizeof(int)) < 0) 
480                                 return -EINVAL;
481                         break;
482                 }
483                 case SIOCGIWFRAG:
484                 {
485                         if (wl_ioctl(dev,WLC_GET_FRAG,&(wrqu->frag.value),sizeof(int)) < 0)
486                                 return -EINVAL;
487                         break;
488                 }
489                 case SIOCSIWFRAG:
490                 {
491                         if (wl_ioctl(dev,WLC_SET_FRAG,&(wrqu->frag.value),sizeof(int)) < 0)
492                                 return -EINVAL;
493                         break;
494                 }
495                 case SIOCGIWTXPOW:
496                 {
497                         int radio;
498
499                         wl_ioctl(dev, WLC_GET_RADIO, &radio, sizeof(int));
500                         
501                         if (wl_get_val(dev, "qtxpower", &(wrqu->txpower.value), sizeof(int)) < 0)
502                                 return -EINVAL;
503                         
504                         wrqu->txpower.value &= ~WL_TXPWR_OVERRIDE;
505                         wrqu->txpower.value /= 4;
506                                 
507                         wrqu->txpower.fixed = 0;
508                         wrqu->txpower.disabled = radio;
509                         wrqu->txpower.flags = IW_TXPOW_DBM;
510                         break;
511                 }
512                 case SIOCSIWTXPOW:
513                 {
514                         /* This is weird: WLC_SET_RADIO with 1 as argument disables the radio */
515                         int radio = wrqu->txpower.disabled;
516
517                         wl_ioctl(dev, WLC_SET_RADIO, &radio, sizeof(int));
518                         
519                         if (!wrqu->txpower.disabled && (wrqu->txpower.value > 0)) {
520                                 int value;
521                                 
522                                 if (wl_get_val(dev, "qtxpower", &value, sizeof(int)) < 0)
523                                         return -EINVAL;
524                                 
525                                 value &= WL_TXPWR_OVERRIDE;
526                                 wrqu->txpower.value *= 4;
527                                 wrqu->txpower.value |= value;
528                                 
529                                 if (wrqu->txpower.flags != IW_TXPOW_DBM)
530                                         return -EINVAL;
531                                 
532                                 if (wrqu->txpower.value > 0)
533                                         if (wl_set_val(dev, "qtxpower", &(wrqu->txpower.value), sizeof(int)) < 0)
534                                                 return -EINVAL;
535                         }
536                         break;
537                 }
538                 case SIOCSIWENCODE:
539                 {
540                         int val = 0, wep = 1, wrestrict = 1;
541                         int index = (wrqu->data.flags & IW_ENCODE_INDEX) - 1;
542
543                         if (index < 0)
544                                 index = get_primary_key(dev);
545                         
546                         if (wrqu->data.flags & IW_ENCODE_DISABLED) {
547                                 wep = 0;
548                                 if (wl_ioctl(dev, WLC_SET_WSEC, &wep, sizeof(val)) < 0)
549                                         return -EINVAL;
550                                 return 0;
551                         }
552
553                         if (wl_ioctl(dev, WLC_SET_WSEC, &wep, sizeof(val)) < 0)
554                                 return -EINVAL;
555
556                         if (wrqu->data.flags & IW_ENCODE_OPEN)
557                                 wrestrict = 0;
558                         
559                         if (wrqu->data.pointer && (wrqu->data.length > 0) && (wrqu->data.length <= 16)) {
560                                 wl_wsec_key_t key;
561                                 memset(&key, 0, sizeof(key));
562
563                                 key.flags = WL_PRIMARY_KEY;
564                                 key.len = wrqu->data.length;
565                                 key.index = index;
566                                 memcpy(key.data, wrqu->data.pointer, wrqu->data.length);
567
568                                 if (wl_ioctl(dev, WLC_SET_KEY, &key, sizeof(key)) < 0)
569                                         return -EINVAL;
570                         }
571
572                         if (index >= 0)
573                                 wl_ioctl(dev, WLC_SET_KEY_PRIMARY, &index, sizeof(index));
574                         
575                         if (wrestrict >= 0)
576                                 wl_ioctl(dev, WLC_SET_WEP_RESTRICT, &wrestrict, sizeof(wrestrict));
577
578                         break;
579                 }
580                 case SIOCGIWENCODE:
581                 {
582                         int val;
583                         
584                         if (wl_ioctl(dev, WLC_GET_WEP, &val, sizeof(val)) < 0)
585                                 return -EINVAL;
586                         
587
588                         if (val > 0) {
589                                 int key = get_primary_key(dev);
590                                 
591                                 wrqu->data.flags = IW_ENCODE_ENABLED;
592                                 if (key-- > 0) {
593                                         int *info_addr; 
594                                         wkey *wep_key;
595                                         
596                                         info_addr = (int *) dev->priv;
597                                         wep_key = (wkey *) ((*info_addr) + 0x2752 + (key * 0x110));
598                                         
599                                         wrqu->data.flags |= key + 1;
600                                         wrqu->data.length = wep_key->len;
601
602                                         memset(extra, 0, 16);
603                                         memcpy(extra, wep_key->data, 16);
604                                 } else {
605                                         wrqu->data.flags |= IW_ENCODE_NOKEY;
606                                 }
607                         } else {
608                                 wrqu->data.flags = IW_ENCODE_DISABLED;
609                         }
610                         
611                         break;
612                 }
613                 case SIOCGIWRANGE:
614                 {
615                         return wlcompat_ioctl_getiwrange(dev, extra);
616                         break;
617                 }
618                 case SIOCSIWMODE:
619                 {
620                         int ap = -1, infra = -1, passive = 0, wet = 0;
621                         
622                         switch (wrqu->mode) {
623                                 case IW_MODE_MONITOR:
624                                         passive = 1;
625                                         break;
626                                 case IW_MODE_ADHOC:
627                                         infra = 0;
628                                         ap = 0;
629                                         break;
630                                 case IW_MODE_MASTER:
631                                         infra = 1;
632                                         ap = 1;
633                                         break;
634                                 case IW_MODE_INFRA:
635                                         infra = 1;
636                                         ap = 0;
637                                         break;
638                                 case IW_MODE_REPEAT:
639                                         infra = 1;
640                                         ap = 0;
641                                         wet = 1;
642                                         break;
643                                         
644                                 default:
645                                         return -EINVAL;
646                         }
647                         
648                         wl_ioctl(dev, WLC_SET_PASSIVE, &passive, sizeof(passive));
649                         wl_ioctl(dev, WLC_SET_MONITOR, &passive, sizeof(passive));
650                         wl_ioctl(dev, WLC_SET_WET, &wet, sizeof(wet));
651                         if (ap >= 0) 
652                                 wl_ioctl(dev, WLC_SET_AP, &ap, sizeof(ap));
653                         if (infra >= 0)
654                                 wl_ioctl(dev, WLC_SET_INFRA, &infra, sizeof(infra));
655
656                         break;
657                                                 
658                 }
659                 case SIOCGIWMODE:
660                 {
661                         int ap, infra, wet, passive;
662
663                         if (wl_ioctl(dev, WLC_GET_AP, &ap, sizeof(ap)) < 0)
664                                 return -EINVAL;
665                         if (wl_ioctl(dev, WLC_GET_INFRA, &infra, sizeof(infra)) < 0)
666                                 return -EINVAL;
667                         if (wl_ioctl(dev, WLC_GET_PASSIVE, &passive, sizeof(passive)) < 0)
668                                 return -EINVAL;
669                         if (wl_ioctl(dev, WLC_GET_WET, &wet, sizeof(wet)) < 0)
670                                 return -EINVAL;
671
672                         if (passive) {
673                                 wrqu->mode = IW_MODE_MONITOR;
674                         } else if (!infra) {
675                                 wrqu->mode = IW_MODE_ADHOC;
676                         } else {
677                                 if (ap) {
678                                         wrqu->mode = IW_MODE_MASTER;
679                                 } else {
680                                         if (wet) {
681                                                 wrqu->mode = IW_MODE_REPEAT;
682                                         } else {
683                                                 wrqu->mode = IW_MODE_INFRA;
684                                         }
685                                 }
686                         }
687                         break;
688                 }
689                 default:
690                 {
691                         if (info->cmd >= SIOCIWFIRSTPRIV)
692                                 return wlcompat_private_ioctl(dev, info, wrqu, extra);
693
694                         return -EINVAL;
695                 }
696         }
697         
698         return 0;
699 }
700
701 static const iw_handler  wlcompat_handler[] = {
702         NULL,                   /* SIOCSIWCOMMIT */
703         wlcompat_ioctl,         /* SIOCGIWNAME */
704         NULL,                   /* SIOCSIWNWID */
705         NULL,                   /* SIOCGIWNWID */
706         wlcompat_ioctl,         /* SIOCSIWFREQ */
707         wlcompat_ioctl,         /* SIOCGIWFREQ */
708         wlcompat_ioctl,         /* SIOCSIWMODE */
709         wlcompat_ioctl,         /* SIOCGIWMODE */
710         NULL,                   /* SIOCSIWSENS */
711         NULL,                   /* SIOCGIWSENS */
712         NULL,                   /* SIOCSIWRANGE, unused */
713         wlcompat_ioctl,         /* SIOCGIWRANGE */
714         NULL,                   /* SIOCSIWPRIV */
715         NULL,                   /* SIOCGIWPRIV */
716         NULL,                   /* SIOCSIWSTATS */
717         NULL,                   /* SIOCGIWSTATS */
718         iw_handler_set_spy,     /* SIOCSIWSPY */
719         iw_handler_get_spy,     /* SIOCGIWSPY */
720         iw_handler_set_thrspy,  /* SIOCSIWTHRSPY */
721         iw_handler_get_thrspy,  /* SIOCGIWTHRSPY */
722         wlcompat_ioctl,         /* SIOCSIWAP */
723         wlcompat_ioctl,         /* SIOCGIWAP */
724         NULL,                   /* -- hole -- */
725         NULL,                   /* SIOCGIWAPLIST */
726         wlcompat_set_scan,      /* SIOCSIWSCAN */
727         wlcompat_get_scan,      /* SIOCGIWSCAN */
728         wlcompat_ioctl,         /* SIOCSIWESSID */
729         wlcompat_ioctl,         /* SIOCGIWESSID */
730         NULL,                   /* SIOCSIWNICKN */
731         NULL,                   /* SIOCGIWNICKN */
732         NULL,                   /* -- hole -- */
733         NULL,                   /* -- hole -- */
734         NULL,                   /* SIOCSIWRATE */
735         NULL,                   /* SIOCGIWRATE */
736         wlcompat_ioctl,         /* SIOCSIWRTS */
737         wlcompat_ioctl,         /* SIOCGIWRTS */
738         wlcompat_ioctl,         /* SIOCSIWFRAG */
739         wlcompat_ioctl,         /* SIOCGIWFRAG */
740         wlcompat_ioctl,         /* SIOCSIWTXPOW */
741         wlcompat_ioctl,         /* SIOCGIWTXPOW */
742         NULL,                   /* SIOCSIWRETRY */
743         NULL,                   /* SIOCGIWRETRY */
744         wlcompat_ioctl,         /* SIOCSIWENCODE */
745         wlcompat_ioctl,         /* SIOCGIWENCODE */
746 };
747
748
749 #define WLCOMPAT_SET_MONITOR            SIOCIWFIRSTPRIV + 0
750 #define WLCOMPAT_GET_MONITOR            SIOCIWFIRSTPRIV + 1
751 #define WLCOMPAT_SET_TXPWR_LIMIT        SIOCIWFIRSTPRIV + 2
752 #define WLCOMPAT_GET_TXPWR_LIMIT        SIOCIWFIRSTPRIV + 3
753 #define WLCOMPAT_SET_ANTDIV                     SIOCIWFIRSTPRIV + 4
754 #define WLCOMPAT_GET_ANTDIV                     SIOCIWFIRSTPRIV + 5
755 #define WLCOMPAT_SET_TXANT                      SIOCIWFIRSTPRIV + 6
756 #define WLCOMPAT_GET_TXANT                      SIOCIWFIRSTPRIV + 7
757 #define WLCOMPAT_SET_BSS_FORCE          SIOCIWFIRSTPRIV + 8
758 #define WLCOMPAT_GET_BSS_FORCE          SIOCIWFIRSTPRIV + 9
759
760
761 static int wlcompat_private_ioctl(struct net_device *dev,
762                          struct iw_request_info *info,
763                          union iwreq_data *wrqu,
764                          char *extra)
765 {
766         int *value = (int *) wrqu->name;
767
768         switch (info->cmd) {
769                 case WLCOMPAT_SET_MONITOR:
770                 {
771                         if (wl_ioctl(dev, WLC_SET_MONITOR, value, sizeof(int)) < 0)
772                                 return -EINVAL;
773
774                         break;
775                 }
776                 case WLCOMPAT_GET_MONITOR:
777                 {
778                         if (wl_ioctl(dev, WLC_GET_MONITOR, extra, sizeof(int)) < 0)
779                                 return -EINVAL;
780
781                         break;
782                 }
783                 case WLCOMPAT_SET_TXPWR_LIMIT:
784                 {
785                         int val;
786                         
787
788                         if (wl_get_val(dev, "qtxpower", &val, sizeof(int)) < 0)
789                                 return -EINVAL;
790                         
791                         if (*extra > 0)
792                                 val |= WL_TXPWR_OVERRIDE;
793                         else
794                                 val &= ~WL_TXPWR_OVERRIDE;
795                         
796                         if (wl_set_val(dev, "qtxpower", &val, sizeof(int)) < 0)
797                                 return -EINVAL;
798                         
799                         break;
800                 }
801                 case WLCOMPAT_GET_TXPWR_LIMIT:
802                 {
803                         if (wl_get_val(dev, "qtxpower", value, sizeof(int)) < 0)
804                                 return -EINVAL;
805
806                         *value = ((*value & WL_TXPWR_OVERRIDE) == WL_TXPWR_OVERRIDE ? 1 : 0);
807
808                         break;
809                 }
810                 case WLCOMPAT_SET_ANTDIV:
811                 {
812                         if (wl_ioctl(dev, WLC_SET_ANTDIV, value, sizeof(int)) < 0)
813                                 return -EINVAL;
814
815                         break;
816                 }
817                 case WLCOMPAT_GET_ANTDIV:
818                 {
819                         if (wl_ioctl(dev, WLC_GET_ANTDIV, extra, sizeof(int)) < 0)
820                                 return -EINVAL;
821
822                         break;
823                 }
824                 case WLCOMPAT_SET_TXANT:
825                 {
826                         if (wl_ioctl(dev, WLC_SET_TXANT, value, sizeof(int)) < 0)
827                                 return -EINVAL;
828
829                         break;
830                 }
831                 case WLCOMPAT_GET_TXANT:
832                 {
833                         if (wl_ioctl(dev, WLC_GET_TXANT, extra, sizeof(int)) < 0)
834                                 return -EINVAL;
835
836                         break;
837                 }
838                 case WLCOMPAT_SET_BSS_FORCE:
839                 {
840                         bss_force = (unsigned short) *value;
841                         break;
842                 }
843                 case WLCOMPAT_GET_BSS_FORCE:
844                 {
845                         *extra = (int) bss_force;
846                         break;
847                 }
848                 default:
849                 {
850                         return -EINVAL;
851                 }
852                         
853         }
854         return 0;
855 }
856
857 static const struct iw_priv_args wlcompat_private_args[] = 
858 {
859         {       WLCOMPAT_SET_MONITOR, 
860                 IW_PRIV_TYPE_INT | IW_PRIV_SIZE_FIXED | 1,
861                 0,
862                 "set_monitor"
863         },
864         {       WLCOMPAT_GET_MONITOR, 
865                 0,
866                 IW_PRIV_TYPE_INT | IW_PRIV_SIZE_FIXED | 1,
867                 "get_monitor"
868         },
869         {       WLCOMPAT_SET_TXPWR_LIMIT, 
870                 IW_PRIV_TYPE_INT | IW_PRIV_SIZE_FIXED | 1,
871                 0,
872                 "set_txpwr_force"
873         },
874         {       WLCOMPAT_GET_TXPWR_LIMIT, 
875                 0,
876                 IW_PRIV_TYPE_INT | IW_PRIV_SIZE_FIXED | 1,
877                 "get_txpwr_force"
878         },
879         {       WLCOMPAT_SET_ANTDIV, 
880                 IW_PRIV_TYPE_INT | IW_PRIV_SIZE_FIXED | 1,
881                 0,
882                 "set_antdiv"
883         },
884         {       WLCOMPAT_GET_ANTDIV, 
885                 0,
886                 IW_PRIV_TYPE_INT | IW_PRIV_SIZE_FIXED | 1,
887                 "get_antdiv"
888         },
889         {       WLCOMPAT_SET_TXANT, 
890                 IW_PRIV_TYPE_INT | IW_PRIV_SIZE_FIXED | 1,
891                 0,
892                 "set_txant"
893         },
894         {       WLCOMPAT_GET_TXANT, 
895                 0,
896                 IW_PRIV_TYPE_INT | IW_PRIV_SIZE_FIXED | 1,
897                 "get_txant"
898         },
899         {       WLCOMPAT_SET_BSS_FORCE, 
900                 IW_PRIV_TYPE_INT | IW_PRIV_SIZE_FIXED | 1,
901                 0,
902                 "set_bss_force"
903         },
904         {       WLCOMPAT_GET_BSS_FORCE, 
905                 0,
906                 IW_PRIV_TYPE_INT | IW_PRIV_SIZE_FIXED | 1,
907                 "get_bss_force"
908         },
909 };
910
911 static const iw_handler wlcompat_private[] =
912 {
913         wlcompat_private_ioctl,
914         NULL
915 };
916
917
918 static const struct iw_handler_def wlcompat_handler_def =
919 {
920         .standard       = (iw_handler *) wlcompat_handler,
921         .num_standard   = sizeof(wlcompat_handler)/sizeof(iw_handler),
922         .private        = wlcompat_private,
923         .num_private    = 1,
924         .private_args   = wlcompat_private_args,
925         .num_private_args = sizeof(wlcompat_private_args) / sizeof(wlcompat_private_args[0])
926 };
927
928
929 #ifdef DEBUG
930 void print_buffer(int len, unsigned char *buf) {
931         int x;
932         if (buf != NULL) {
933                 for (x=0;x<len && x<180 ;x++) {
934                         if ((x % 4) == 0)
935                                 printk(" ");
936                         printk("%02X",buf[x]);
937                 }
938         } else {
939                 printk(" NULL");
940         }
941         printk("\n");
942
943 }
944 #endif
945 static int (*old_ioctl)(struct net_device *dev, struct ifreq *ifr, int cmd);
946 static int new_ioctl(struct net_device *dev, struct ifreq *ifr, int cmd) {
947         int ret = 0;
948         struct iwreq *iwr = (struct iwreq *) ifr;
949         struct iw_request_info info;
950         
951 #ifdef DEBUG
952         printk("dev: %s ioctl: 0x%04x\n",dev->name,cmd);
953 #endif
954
955         if (cmd >= SIOCIWFIRSTPRIV) {
956                 info.cmd = cmd;
957                 info.flags = 0;
958                 ret = wlcompat_private_ioctl(dev, &info, &(iwr->u), (char *) &(iwr->u));
959 #ifdef DEBUG
960         } else if (cmd==SIOCDEVPRIVATE) {
961                 wl_ioctl_t *ioc = (wl_ioctl_t *)ifr->ifr_data;
962                 unsigned char *buf = ioc->buf;
963                 printk("   cmd: %d buf: 0x%08x len: %d\n",ioc->cmd,&(ioc->buf),ioc->len);
964                 printk("   send: ->");
965                 print_buffer(ioc->len, buf);
966                 ret = old_ioctl(dev,ifr,cmd);
967                 printk("   recv: ->");
968                 print_buffer(ioc->len, buf);
969                 printk("   ret: %d\n", ret);
970 #endif
971         } else {
972                 ret = old_ioctl(dev,ifr,cmd);
973         }
974         return ret;
975 }
976
977 static int __init wlcompat_init()
978 {
979         int found = 0, i;
980         char *devname = "eth0";
981         bss_force = 0;
982         
983         while (!found && (dev = dev_get_by_name(devname))) {
984                 if ((dev->wireless_handlers == NULL) && ((wl_ioctl(dev, WLC_GET_MAGIC, &i, sizeof(i)) == 0) && i == WLC_IOCTL_MAGIC))
985                         found = 1;
986                 devname[3]++;
987         }
988         
989         if (!found) {
990                 printk("No Broadcom devices found.\n");
991                 return -ENODEV;
992         }
993                 
994
995         old_ioctl = dev->do_ioctl;
996         dev->do_ioctl = new_ioctl;
997         dev->wireless_handlers = (struct iw_handler_def *)&wlcompat_handler_def;
998         dev->get_wireless_stats = wlcompat_get_wireless_stats;
999 #ifdef DEBUG
1000         printk("broadcom driver private data: 0x%08x\n", dev->priv);
1001 #endif
1002         return 0;
1003 }
1004
1005 static void __exit wlcompat_exit()
1006 {
1007         dev->get_wireless_stats = NULL;
1008         dev->wireless_handlers = NULL;
1009         dev->do_ioctl = old_ioctl;
1010         return;
1011 }
1012
1013 EXPORT_NO_SYMBOLS;
1014 MODULE_AUTHOR("openwrt.org");
1015 MODULE_LICENSE("GPL");
1016
1017 module_init(wlcompat_init);
1018 module_exit(wlcompat_exit);