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