GNU Linux-libre 4.9.337-gnu1
[releases.git] / drivers / net / wireless / ray_cs.c
1 /*=============================================================================
2  *
3  * A  PCMCIA client driver for the Raylink wireless LAN card.
4  * The starting point for this module was the skeleton.c in the
5  * PCMCIA 2.9.12 package written by David Hinds, dahinds@users.sourceforge.net
6  *
7  *
8  * Copyright (c) 1998  Corey Thomas (corey@world.std.com)
9  *
10  * This driver is free software; you can redistribute it and/or modify
11  * it under the terms of version 2 only of the GNU General Public License as
12  * published by the Free Software Foundation.
13  *
14  * It is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, see <http://www.gnu.org/licenses/>.
21  *
22  * Changes:
23  * Arnaldo Carvalho de Melo <acme@conectiva.com.br> - 08/08/2000
24  * - reorganize kmallocs in ray_attach, checking all for failure
25  *   and releasing the previous allocations if one fails
26  *
27  * Daniele Bellucci <bellucda@tiscali.it> - 07/10/2003
28  * - Audit copy_to_user in ioctl(SIOCGIWESSID)
29  *
30 =============================================================================*/
31
32 #include <linux/module.h>
33 #include <linux/kernel.h>
34 #include <linux/proc_fs.h>
35 #include <linux/ptrace.h>
36 #include <linux/seq_file.h>
37 #include <linux/string.h>
38 #include <linux/timer.h>
39 #include <linux/init.h>
40 #include <linux/netdevice.h>
41 #include <linux/etherdevice.h>
42 #include <linux/if_arp.h>
43 #include <linux/ioport.h>
44 #include <linux/skbuff.h>
45 #include <linux/ieee80211.h>
46
47 #include <pcmcia/cistpl.h>
48 #include <pcmcia/cisreg.h>
49 #include <pcmcia/ds.h>
50
51 #include <linux/wireless.h>
52 #include <net/iw_handler.h>
53
54 #include <asm/io.h>
55 #include <asm/byteorder.h>
56 #include <asm/uaccess.h>
57
58 /* Warning : these stuff will slow down the driver... */
59 #define WIRELESS_SPY            /* Enable spying addresses */
60 /* Definitions we need for spy */
61 typedef struct iw_statistics iw_stats;
62 typedef u_char mac_addr[ETH_ALEN];      /* Hardware address */
63
64 #include "rayctl.h"
65 #include "ray_cs.h"
66
67
68 /** Prototypes based on PCMCIA skeleton driver *******************************/
69 static int ray_config(struct pcmcia_device *link);
70 static void ray_release(struct pcmcia_device *link);
71 static void ray_detach(struct pcmcia_device *p_dev);
72
73 /***** Prototypes indicated by device structure ******************************/
74 static int ray_dev_close(struct net_device *dev);
75 static int ray_dev_config(struct net_device *dev, struct ifmap *map);
76 static struct net_device_stats *ray_get_stats(struct net_device *dev);
77 static int ray_dev_init(struct net_device *dev);
78
79 static int ray_open(struct net_device *dev);
80 static netdev_tx_t ray_dev_start_xmit(struct sk_buff *skb,
81                                             struct net_device *dev);
82 static void set_multicast_list(struct net_device *dev);
83 static void ray_update_multi_list(struct net_device *dev, int all);
84 static int translate_frame(ray_dev_t *local, struct tx_msg __iomem *ptx,
85                            unsigned char *data, int len);
86 static void ray_build_header(ray_dev_t *local, struct tx_msg __iomem *ptx,
87                              UCHAR msg_type, unsigned char *data);
88 static void untranslate(ray_dev_t *local, struct sk_buff *skb, int len);
89 static iw_stats *ray_get_wireless_stats(struct net_device *dev);
90 static const struct iw_handler_def ray_handler_def;
91
92 /***** Prototypes for raylink functions **************************************/
93 static void authenticate(ray_dev_t *local);
94 static int build_auth_frame(ray_dev_t *local, UCHAR *dest, int auth_type);
95 static void authenticate_timeout(u_long);
96 static int get_free_ccs(ray_dev_t *local);
97 static int get_free_tx_ccs(ray_dev_t *local);
98 static void init_startup_params(ray_dev_t *local);
99 static int parse_addr(char *in_str, UCHAR *out);
100 static int ray_hw_xmit(unsigned char *data, int len, struct net_device *dev, UCHAR type);
101 static int ray_init(struct net_device *dev);
102 static int interrupt_ecf(ray_dev_t *local, int ccs);
103 static void ray_reset(struct net_device *dev);
104 static void ray_update_parm(struct net_device *dev, UCHAR objid, UCHAR *value, int len);
105 static void verify_dl_startup(u_long);
106
107 /* Prototypes for interrpt time functions **********************************/
108 static irqreturn_t ray_interrupt(int reg, void *dev_id);
109 static void clear_interrupt(ray_dev_t *local);
110 static void rx_deauthenticate(ray_dev_t *local, struct rcs __iomem *prcs,
111                               unsigned int pkt_addr, int rx_len);
112 static int copy_from_rx_buff(ray_dev_t *local, UCHAR *dest, int pkt_addr, int len);
113 static void ray_rx(struct net_device *dev, ray_dev_t *local, struct rcs __iomem *prcs);
114 static void release_frag_chain(ray_dev_t *local, struct rcs __iomem *prcs);
115 static void rx_authenticate(ray_dev_t *local, struct rcs __iomem *prcs,
116                             unsigned int pkt_addr, int rx_len);
117 static void rx_data(struct net_device *dev, struct rcs __iomem *prcs,
118                     unsigned int pkt_addr, int rx_len);
119 static void associate(ray_dev_t *local);
120
121 /* Card command functions */
122 static int dl_startup_params(struct net_device *dev);
123 static void join_net(u_long local);
124 static void start_net(u_long local);
125 /* void start_net(ray_dev_t *local); */
126
127 /*===========================================================================*/
128 /* Parameters that can be set with 'insmod' */
129
130 /* ADHOC=0, Infrastructure=1 */
131 static int net_type = ADHOC;
132
133 /* Hop dwell time in Kus (1024 us units defined by 802.11) */
134 static int hop_dwell = 128;
135
136 /* Beacon period in Kus */
137 static int beacon_period = 256;
138
139 /* power save mode (0 = off, 1 = save power) */
140 static int psm;
141
142 /* String for network's Extended Service Set ID. 32 Characters max */
143 static char *essid;
144
145 /* Default to encapsulation unless translation requested */
146 static bool translate = true;
147
148 static int country = USA;
149
150 static int sniffer;
151
152 static int bc;
153
154 /* 48 bit physical card address if overriding card's real physical
155  * address is required.  Since IEEE 802.11 addresses are 48 bits
156  * like ethernet, an int can't be used, so a string is used. To
157  * allow use of addresses starting with a decimal digit, the first
158  * character must be a letter and will be ignored. This letter is
159  * followed by up to 12 hex digits which are the address.  If less
160  * than 12 digits are used, the address will be left filled with 0's.
161  * Note that bit 0 of the first byte is the broadcast bit, and evil
162  * things will happen if it is not 0 in a card address.
163  */
164 static char *phy_addr = NULL;
165
166 static unsigned int ray_mem_speed = 500;
167
168 /* WARNING: THIS DRIVER IS NOT CAPABLE OF HANDLING MULTIPLE DEVICES! */
169 static struct pcmcia_device *this_device = NULL;
170
171 MODULE_AUTHOR("Corey Thomas <corey@world.std.com>");
172 MODULE_DESCRIPTION("Raylink/WebGear wireless LAN driver");
173 MODULE_LICENSE("GPL");
174
175 module_param(net_type, int, 0);
176 module_param(hop_dwell, int, 0);
177 module_param(beacon_period, int, 0);
178 module_param(psm, int, 0);
179 module_param(essid, charp, 0);
180 module_param(translate, bool, 0);
181 module_param(country, int, 0);
182 module_param(sniffer, int, 0);
183 module_param(bc, int, 0);
184 module_param(phy_addr, charp, 0);
185 module_param(ray_mem_speed, int, 0);
186
187 static const UCHAR b5_default_startup_parms[] = {
188         0, 0,                   /* Adhoc station */
189         'L', 'I', 'N', 'U', 'X', 0, 0, 0,       /* 32 char ESSID */
190         0, 0, 0, 0, 0, 0, 0, 0,
191         0, 0, 0, 0, 0, 0, 0, 0,
192         0, 0, 0, 0, 0, 0, 0, 0,
193         1, 0,                   /* Active scan, CA Mode */
194         0, 0, 0, 0, 0, 0,       /* No default MAC addr  */
195         0x7f, 0xff,             /* Frag threshold */
196         0x00, 0x80,             /* Hop time 128 Kus */
197         0x01, 0x00,             /* Beacon period 256 Kus */
198         0x01, 0x07, 0xa3,       /* DTIM, retries, ack timeout */
199         0x1d, 0x82, 0x4e,       /* SIFS, DIFS, PIFS */
200         0x7f, 0xff,             /* RTS threshold */
201         0x04, 0xe2, 0x38, 0xA4, /* scan_dwell, max_scan_dwell */
202         0x05,                   /* assoc resp timeout thresh */
203         0x08, 0x02, 0x08,       /* adhoc, infra, super cycle max */
204         0,                      /* Promiscuous mode */
205         0x0c, 0x0bd,            /* Unique word */
206         0x32,                   /* Slot time */
207         0xff, 0xff,             /* roam-low snr, low snr count */
208         0x05, 0xff,             /* Infra, adhoc missed bcn thresh */
209         0x01, 0x0b, 0x4f,       /* USA, hop pattern, hop pat length */
210 /* b4 - b5 differences start here */
211         0x00, 0x3f,             /* CW max */
212         0x00, 0x0f,             /* CW min */
213         0x04, 0x08,             /* Noise gain, limit offset */
214         0x28, 0x28,             /* det rssi, med busy offsets */
215         7,                      /* det sync thresh */
216         0, 2, 2,                /* test mode, min, max */
217         0,                      /* allow broadcast SSID probe resp */
218         0, 0,                   /* privacy must start, can join */
219         2, 0, 0, 0, 0, 0, 0, 0  /* basic rate set */
220 };
221
222 static const UCHAR b4_default_startup_parms[] = {
223         0, 0,                   /* Adhoc station */
224         'L', 'I', 'N', 'U', 'X', 0, 0, 0,       /* 32 char ESSID */
225         0, 0, 0, 0, 0, 0, 0, 0,
226         0, 0, 0, 0, 0, 0, 0, 0,
227         0, 0, 0, 0, 0, 0, 0, 0,
228         1, 0,                   /* Active scan, CA Mode */
229         0, 0, 0, 0, 0, 0,       /* No default MAC addr  */
230         0x7f, 0xff,             /* Frag threshold */
231         0x02, 0x00,             /* Hop time */
232         0x00, 0x01,             /* Beacon period */
233         0x01, 0x07, 0xa3,       /* DTIM, retries, ack timeout */
234         0x1d, 0x82, 0xce,       /* SIFS, DIFS, PIFS */
235         0x7f, 0xff,             /* RTS threshold */
236         0xfb, 0x1e, 0xc7, 0x5c, /* scan_dwell, max_scan_dwell */
237         0x05,                   /* assoc resp timeout thresh */
238         0x04, 0x02, 0x4,        /* adhoc, infra, super cycle max */
239         0,                      /* Promiscuous mode */
240         0x0c, 0x0bd,            /* Unique word */
241         0x4e,                   /* Slot time (TBD seems wrong) */
242         0xff, 0xff,             /* roam-low snr, low snr count */
243         0x05, 0xff,             /* Infra, adhoc missed bcn thresh */
244         0x01, 0x0b, 0x4e,       /* USA, hop pattern, hop pat length */
245 /* b4 - b5 differences start here */
246         0x3f, 0x0f,             /* CW max, min */
247         0x04, 0x08,             /* Noise gain, limit offset */
248         0x28, 0x28,             /* det rssi, med busy offsets */
249         7,                      /* det sync thresh */
250         0, 2, 2,                /* test mode, min, max */
251         0,                      /* rx/tx delay */
252         0, 0, 0, 0, 0, 0,       /* current BSS id */
253         0                       /* hop set */
254 };
255
256 /*===========================================================================*/
257 static const u8 eth2_llc[] = { 0xaa, 0xaa, 3, 0, 0, 0 };
258
259 static const char hop_pattern_length[] = { 1,
260         USA_HOP_MOD, EUROPE_HOP_MOD,
261         JAPAN_HOP_MOD, KOREA_HOP_MOD,
262         SPAIN_HOP_MOD, FRANCE_HOP_MOD,
263         ISRAEL_HOP_MOD, AUSTRALIA_HOP_MOD,
264         JAPAN_TEST_HOP_MOD
265 };
266
267 static const char rcsid[] =
268     "Raylink/WebGear wireless LAN - Corey <Thomas corey@world.std.com>";
269
270 static const struct net_device_ops ray_netdev_ops = {
271         .ndo_init               = ray_dev_init,
272         .ndo_open               = ray_open,
273         .ndo_stop               = ray_dev_close,
274         .ndo_start_xmit         = ray_dev_start_xmit,
275         .ndo_set_config         = ray_dev_config,
276         .ndo_get_stats          = ray_get_stats,
277         .ndo_set_rx_mode        = set_multicast_list,
278         .ndo_change_mtu         = eth_change_mtu,
279         .ndo_set_mac_address    = eth_mac_addr,
280         .ndo_validate_addr      = eth_validate_addr,
281 };
282
283 static int ray_probe(struct pcmcia_device *p_dev)
284 {
285         ray_dev_t *local;
286         struct net_device *dev;
287
288         dev_dbg(&p_dev->dev, "ray_attach()\n");
289
290         /* Allocate space for private device-specific data */
291         dev = alloc_etherdev(sizeof(ray_dev_t));
292         if (!dev)
293                 goto fail_alloc_dev;
294
295         local = netdev_priv(dev);
296         local->finder = p_dev;
297
298         /* The io structure describes IO port mapping. None used here */
299         p_dev->resource[0]->end = 0;
300         p_dev->resource[0]->flags |= IO_DATA_PATH_WIDTH_8;
301
302         /* General socket configuration */
303         p_dev->config_flags |= CONF_ENABLE_IRQ;
304         p_dev->config_index = 1;
305
306         p_dev->priv = dev;
307
308         local->finder = p_dev;
309         local->card_status = CARD_INSERTED;
310         local->authentication_state = UNAUTHENTICATED;
311         local->num_multi = 0;
312         dev_dbg(&p_dev->dev, "ray_attach p_dev = %p,  dev = %p,  local = %p, intr = %p\n",
313               p_dev, dev, local, &ray_interrupt);
314
315         /* Raylink entries in the device structure */
316         dev->netdev_ops = &ray_netdev_ops;
317         dev->wireless_handlers = &ray_handler_def;
318 #ifdef WIRELESS_SPY
319         local->wireless_data.spy_data = &local->spy_data;
320         dev->wireless_data = &local->wireless_data;
321 #endif /* WIRELESS_SPY */
322
323
324         dev_dbg(&p_dev->dev, "ray_cs ray_attach calling ether_setup.)\n");
325         netif_stop_queue(dev);
326
327         init_timer(&local->timer);
328
329         this_device = p_dev;
330         return ray_config(p_dev);
331
332 fail_alloc_dev:
333         return -ENOMEM;
334 } /* ray_attach */
335
336 static void ray_detach(struct pcmcia_device *link)
337 {
338         struct net_device *dev;
339         ray_dev_t *local;
340
341         dev_dbg(&link->dev, "ray_detach\n");
342
343         this_device = NULL;
344         dev = link->priv;
345
346         ray_release(link);
347
348         local = netdev_priv(dev);
349         del_timer_sync(&local->timer);
350
351         if (link->priv) {
352                 unregister_netdev(dev);
353                 free_netdev(dev);
354         }
355         dev_dbg(&link->dev, "ray_cs ray_detach ending\n");
356 } /* ray_detach */
357
358 #define MAX_TUPLE_SIZE 128
359 static int ray_config(struct pcmcia_device *link)
360 {
361         int ret = 0;
362         int i;
363         struct net_device *dev = (struct net_device *)link->priv;
364         ray_dev_t *local = netdev_priv(dev);
365
366         dev_dbg(&link->dev, "ray_config\n");
367
368         /* Determine card type and firmware version */
369         printk(KERN_INFO "ray_cs Detected: %s%s%s%s\n",
370                link->prod_id[0] ? link->prod_id[0] : " ",
371                link->prod_id[1] ? link->prod_id[1] : " ",
372                link->prod_id[2] ? link->prod_id[2] : " ",
373                link->prod_id[3] ? link->prod_id[3] : " ");
374
375         /* Now allocate an interrupt line.  Note that this does not
376            actually assign a handler to the interrupt.
377          */
378         ret = pcmcia_request_irq(link, ray_interrupt);
379         if (ret)
380                 goto failed;
381         dev->irq = link->irq;
382
383         ret = pcmcia_enable_device(link);
384         if (ret)
385                 goto failed;
386
387 /*** Set up 32k window for shared memory (transmit and control) ************/
388         link->resource[2]->flags |= WIN_DATA_WIDTH_8 | WIN_MEMORY_TYPE_CM | WIN_ENABLE | WIN_USE_WAIT;
389         link->resource[2]->start = 0;
390         link->resource[2]->end = 0x8000;
391         ret = pcmcia_request_window(link, link->resource[2], ray_mem_speed);
392         if (ret)
393                 goto failed;
394         ret = pcmcia_map_mem_page(link, link->resource[2], 0);
395         if (ret)
396                 goto failed;
397         local->sram = ioremap(link->resource[2]->start,
398                         resource_size(link->resource[2]));
399         if (!local->sram)
400                 goto failed;
401
402 /*** Set up 16k window for shared memory (receive buffer) ***************/
403         link->resource[3]->flags |=
404             WIN_DATA_WIDTH_8 | WIN_MEMORY_TYPE_CM | WIN_ENABLE | WIN_USE_WAIT;
405         link->resource[3]->start = 0;
406         link->resource[3]->end = 0x4000;
407         ret = pcmcia_request_window(link, link->resource[3], ray_mem_speed);
408         if (ret)
409                 goto failed;
410         ret = pcmcia_map_mem_page(link, link->resource[3], 0x8000);
411         if (ret)
412                 goto failed;
413         local->rmem = ioremap(link->resource[3]->start,
414                         resource_size(link->resource[3]));
415         if (!local->rmem)
416                 goto failed;
417
418 /*** Set up window for attribute memory ***********************************/
419         link->resource[4]->flags |=
420             WIN_DATA_WIDTH_8 | WIN_MEMORY_TYPE_AM | WIN_ENABLE | WIN_USE_WAIT;
421         link->resource[4]->start = 0;
422         link->resource[4]->end = 0x1000;
423         ret = pcmcia_request_window(link, link->resource[4], ray_mem_speed);
424         if (ret)
425                 goto failed;
426         ret = pcmcia_map_mem_page(link, link->resource[4], 0);
427         if (ret)
428                 goto failed;
429         local->amem = ioremap(link->resource[4]->start,
430                         resource_size(link->resource[4]));
431         if (!local->amem)
432                 goto failed;
433
434         dev_dbg(&link->dev, "ray_config sram=%p\n", local->sram);
435         dev_dbg(&link->dev, "ray_config rmem=%p\n", local->rmem);
436         dev_dbg(&link->dev, "ray_config amem=%p\n", local->amem);
437         if (ray_init(dev) < 0) {
438                 ray_release(link);
439                 return -ENODEV;
440         }
441
442         SET_NETDEV_DEV(dev, &link->dev);
443         i = register_netdev(dev);
444         if (i != 0) {
445                 printk("ray_config register_netdev() failed\n");
446                 ray_release(link);
447                 return i;
448         }
449
450         printk(KERN_INFO "%s: RayLink, irq %d, hw_addr %pM\n",
451                dev->name, dev->irq, dev->dev_addr);
452
453         return 0;
454
455 failed:
456         ray_release(link);
457         return -ENODEV;
458 } /* ray_config */
459
460 static inline struct ccs __iomem *ccs_base(ray_dev_t *dev)
461 {
462         return dev->sram + CCS_BASE;
463 }
464
465 static inline struct rcs __iomem *rcs_base(ray_dev_t *dev)
466 {
467         /*
468          * This looks nonsensical, since there is a separate
469          * RCS_BASE. But the difference between a "struct rcs"
470          * and a "struct ccs" ends up being in the _index_ off
471          * the base, so the base pointer is the same for both
472          * ccs/rcs.
473          */
474         return dev->sram + CCS_BASE;
475 }
476
477 /*===========================================================================*/
478 static int ray_init(struct net_device *dev)
479 {
480         int i;
481         UCHAR *p;
482         struct ccs __iomem *pccs;
483         ray_dev_t *local = netdev_priv(dev);
484         struct pcmcia_device *link = local->finder;
485         dev_dbg(&link->dev, "ray_init(0x%p)\n", dev);
486         if (!(pcmcia_dev_present(link))) {
487                 dev_dbg(&link->dev, "ray_init - device not present\n");
488                 return -1;
489         }
490
491         local->net_type = net_type;
492         local->sta_type = TYPE_STA;
493
494         /* Copy the startup results to local memory */
495         memcpy_fromio(&local->startup_res, local->sram + ECF_TO_HOST_BASE,
496                       sizeof(struct startup_res_6));
497
498         /* Check Power up test status and get mac address from card */
499         if (local->startup_res.startup_word != 0x80) {
500                 printk(KERN_INFO "ray_init ERROR card status = %2x\n",
501                        local->startup_res.startup_word);
502                 local->card_status = CARD_INIT_ERROR;
503                 return -1;
504         }
505
506         local->fw_ver = local->startup_res.firmware_version[0];
507         local->fw_bld = local->startup_res.firmware_version[1];
508         local->fw_var = local->startup_res.firmware_version[2];
509         dev_dbg(&link->dev, "ray_init firmware version %d.%d\n", local->fw_ver,
510               local->fw_bld);
511
512         local->tib_length = 0x20;
513         if ((local->fw_ver == 5) && (local->fw_bld >= 30))
514                 local->tib_length = local->startup_res.tib_length;
515         dev_dbg(&link->dev, "ray_init tib_length = 0x%02x\n", local->tib_length);
516         /* Initialize CCS's to buffer free state */
517         pccs = ccs_base(local);
518         for (i = 0; i < NUMBER_OF_CCS; i++) {
519                 writeb(CCS_BUFFER_FREE, &(pccs++)->buffer_status);
520         }
521         init_startup_params(local);
522
523         /* copy mac address to startup parameters */
524         if (parse_addr(phy_addr, local->sparm.b4.a_mac_addr)) {
525                 p = local->sparm.b4.a_mac_addr;
526         } else {
527                 memcpy(&local->sparm.b4.a_mac_addr,
528                        &local->startup_res.station_addr, ADDRLEN);
529                 p = local->sparm.b4.a_mac_addr;
530         }
531
532         clear_interrupt(local); /* Clear any interrupt from the card */
533         local->card_status = CARD_AWAITING_PARAM;
534         dev_dbg(&link->dev, "ray_init ending\n");
535         return 0;
536 } /* ray_init */
537
538 /*===========================================================================*/
539 /* Download startup parameters to the card and command it to read them       */
540 static int dl_startup_params(struct net_device *dev)
541 {
542         int ccsindex;
543         ray_dev_t *local = netdev_priv(dev);
544         struct ccs __iomem *pccs;
545         struct pcmcia_device *link = local->finder;
546
547         dev_dbg(&link->dev, "dl_startup_params entered\n");
548         if (!(pcmcia_dev_present(link))) {
549                 dev_dbg(&link->dev, "ray_cs dl_startup_params - device not present\n");
550                 return -1;
551         }
552
553         /* Copy parameters to host to ECF area */
554         if (local->fw_ver == 0x55)
555                 memcpy_toio(local->sram + HOST_TO_ECF_BASE, &local->sparm.b4,
556                             sizeof(struct b4_startup_params));
557         else
558                 memcpy_toio(local->sram + HOST_TO_ECF_BASE, &local->sparm.b5,
559                             sizeof(struct b5_startup_params));
560
561         /* Fill in the CCS fields for the ECF */
562         if ((ccsindex = get_free_ccs(local)) < 0)
563                 return -1;
564         local->dl_param_ccs = ccsindex;
565         pccs = ccs_base(local) + ccsindex;
566         writeb(CCS_DOWNLOAD_STARTUP_PARAMS, &pccs->cmd);
567         dev_dbg(&link->dev, "dl_startup_params start ccsindex = %d\n",
568               local->dl_param_ccs);
569         /* Interrupt the firmware to process the command */
570         if (interrupt_ecf(local, ccsindex)) {
571                 printk(KERN_INFO "ray dl_startup_params failed - "
572                        "ECF not ready for intr\n");
573                 local->card_status = CARD_DL_PARAM_ERROR;
574                 writeb(CCS_BUFFER_FREE, &(pccs++)->buffer_status);
575                 return -2;
576         }
577         local->card_status = CARD_DL_PARAM;
578         /* Start kernel timer to wait for dl startup to complete. */
579         local->timer.expires = jiffies + HZ / 2;
580         local->timer.data = (long)local;
581         local->timer.function = verify_dl_startup;
582         add_timer(&local->timer);
583         dev_dbg(&link->dev,
584               "ray_cs dl_startup_params started timer for verify_dl_startup\n");
585         return 0;
586 } /* dl_startup_params */
587
588 /*===========================================================================*/
589 static void init_startup_params(ray_dev_t *local)
590 {
591         int i;
592
593         if (country > JAPAN_TEST)
594                 country = USA;
595         else if (country < USA)
596                 country = USA;
597         /* structure for hop time and beacon period is defined here using
598          * New 802.11D6.1 format.  Card firmware is still using old format
599          * until version 6.
600          *    Before                    After
601          *    a_hop_time ms byte        a_hop_time ms byte
602          *    a_hop_time 2s byte        a_hop_time ls byte
603          *    a_hop_time ls byte        a_beacon_period ms byte
604          *    a_beacon_period           a_beacon_period ls byte
605          *
606          *    a_hop_time = uS           a_hop_time = KuS
607          *    a_beacon_period = hops    a_beacon_period = KuS
608          *//* 64ms = 010000 */
609         if (local->fw_ver == 0x55) {
610                 memcpy(&local->sparm.b4, b4_default_startup_parms,
611                        sizeof(struct b4_startup_params));
612                 /* Translate sane kus input values to old build 4/5 format */
613                 /* i = hop time in uS truncated to 3 bytes */
614                 i = (hop_dwell * 1024) & 0xffffff;
615                 local->sparm.b4.a_hop_time[0] = (i >> 16) & 0xff;
616                 local->sparm.b4.a_hop_time[1] = (i >> 8) & 0xff;
617                 local->sparm.b4.a_beacon_period[0] = 0;
618                 local->sparm.b4.a_beacon_period[1] =
619                     ((beacon_period / hop_dwell) - 1) & 0xff;
620                 local->sparm.b4.a_curr_country_code = country;
621                 local->sparm.b4.a_hop_pattern_length =
622                     hop_pattern_length[(int)country] - 1;
623                 if (bc) {
624                         local->sparm.b4.a_ack_timeout = 0x50;
625                         local->sparm.b4.a_sifs = 0x3f;
626                 }
627         } else { /* Version 5 uses real kus values */
628                 memcpy((UCHAR *) &local->sparm.b5, b5_default_startup_parms,
629                        sizeof(struct b5_startup_params));
630
631                 local->sparm.b5.a_hop_time[0] = (hop_dwell >> 8) & 0xff;
632                 local->sparm.b5.a_hop_time[1] = hop_dwell & 0xff;
633                 local->sparm.b5.a_beacon_period[0] =
634                     (beacon_period >> 8) & 0xff;
635                 local->sparm.b5.a_beacon_period[1] = beacon_period & 0xff;
636                 if (psm)
637                         local->sparm.b5.a_power_mgt_state = 1;
638                 local->sparm.b5.a_curr_country_code = country;
639                 local->sparm.b5.a_hop_pattern_length =
640                     hop_pattern_length[(int)country];
641         }
642
643         local->sparm.b4.a_network_type = net_type & 0x01;
644         local->sparm.b4.a_acting_as_ap_status = TYPE_STA;
645
646         if (essid != NULL)
647                 strncpy(local->sparm.b4.a_current_ess_id, essid, ESSID_SIZE);
648 } /* init_startup_params */
649
650 /*===========================================================================*/
651 static void verify_dl_startup(u_long data)
652 {
653         ray_dev_t *local = (ray_dev_t *) data;
654         struct ccs __iomem *pccs = ccs_base(local) + local->dl_param_ccs;
655         UCHAR status;
656         struct pcmcia_device *link = local->finder;
657
658         if (!(pcmcia_dev_present(link))) {
659                 dev_dbg(&link->dev, "ray_cs verify_dl_startup - device not present\n");
660                 return;
661         }
662 #if 0
663         {
664                 int i;
665                 printk(KERN_DEBUG
666                        "verify_dl_startup parameters sent via ccs %d:\n",
667                        local->dl_param_ccs);
668                 for (i = 0; i < sizeof(struct b5_startup_params); i++) {
669                         printk(" %2x",
670                                (unsigned int)readb(local->sram +
671                                                    HOST_TO_ECF_BASE + i));
672                 }
673                 printk("\n");
674         }
675 #endif
676
677         status = readb(&pccs->buffer_status);
678         if (status != CCS_BUFFER_FREE) {
679                 printk(KERN_INFO
680                        "Download startup params failed.  Status = %d\n",
681                        status);
682                 local->card_status = CARD_DL_PARAM_ERROR;
683                 return;
684         }
685         if (local->sparm.b4.a_network_type == ADHOC)
686                 start_net((u_long) local);
687         else
688                 join_net((u_long) local);
689 } /* end verify_dl_startup */
690
691 /*===========================================================================*/
692 /* Command card to start a network */
693 static void start_net(u_long data)
694 {
695         ray_dev_t *local = (ray_dev_t *) data;
696         struct ccs __iomem *pccs;
697         int ccsindex;
698         struct pcmcia_device *link = local->finder;
699         if (!(pcmcia_dev_present(link))) {
700                 dev_dbg(&link->dev, "ray_cs start_net - device not present\n");
701                 return;
702         }
703         /* Fill in the CCS fields for the ECF */
704         if ((ccsindex = get_free_ccs(local)) < 0)
705                 return;
706         pccs = ccs_base(local) + ccsindex;
707         writeb(CCS_START_NETWORK, &pccs->cmd);
708         writeb(0, &pccs->var.start_network.update_param);
709         /* Interrupt the firmware to process the command */
710         if (interrupt_ecf(local, ccsindex)) {
711                 dev_dbg(&link->dev, "ray start net failed - card not ready for intr\n");
712                 writeb(CCS_BUFFER_FREE, &(pccs++)->buffer_status);
713                 return;
714         }
715         local->card_status = CARD_DOING_ACQ;
716 } /* end start_net */
717
718 /*===========================================================================*/
719 /* Command card to join a network */
720 static void join_net(u_long data)
721 {
722         ray_dev_t *local = (ray_dev_t *) data;
723
724         struct ccs __iomem *pccs;
725         int ccsindex;
726         struct pcmcia_device *link = local->finder;
727
728         if (!(pcmcia_dev_present(link))) {
729                 dev_dbg(&link->dev, "ray_cs join_net - device not present\n");
730                 return;
731         }
732         /* Fill in the CCS fields for the ECF */
733         if ((ccsindex = get_free_ccs(local)) < 0)
734                 return;
735         pccs = ccs_base(local) + ccsindex;
736         writeb(CCS_JOIN_NETWORK, &pccs->cmd);
737         writeb(0, &pccs->var.join_network.update_param);
738         writeb(0, &pccs->var.join_network.net_initiated);
739         /* Interrupt the firmware to process the command */
740         if (interrupt_ecf(local, ccsindex)) {
741                 dev_dbg(&link->dev, "ray join net failed - card not ready for intr\n");
742                 writeb(CCS_BUFFER_FREE, &(pccs++)->buffer_status);
743                 return;
744         }
745         local->card_status = CARD_DOING_ACQ;
746 }
747
748
749 static void ray_release(struct pcmcia_device *link)
750 {
751         struct net_device *dev = link->priv;
752         ray_dev_t *local = netdev_priv(dev);
753
754         dev_dbg(&link->dev, "ray_release\n");
755
756         del_timer(&local->timer);
757
758         iounmap(local->sram);
759         iounmap(local->rmem);
760         iounmap(local->amem);
761         pcmcia_disable_device(link);
762
763         dev_dbg(&link->dev, "ray_release ending\n");
764 }
765
766 static int ray_suspend(struct pcmcia_device *link)
767 {
768         struct net_device *dev = link->priv;
769
770         if (link->open)
771                 netif_device_detach(dev);
772
773         return 0;
774 }
775
776 static int ray_resume(struct pcmcia_device *link)
777 {
778         struct net_device *dev = link->priv;
779
780         if (link->open) {
781                 ray_reset(dev);
782                 netif_device_attach(dev);
783         }
784
785         return 0;
786 }
787
788 /*===========================================================================*/
789 static int ray_dev_init(struct net_device *dev)
790 {
791 #ifdef RAY_IMMEDIATE_INIT
792         int i;
793 #endif /* RAY_IMMEDIATE_INIT */
794         ray_dev_t *local = netdev_priv(dev);
795         struct pcmcia_device *link = local->finder;
796
797         dev_dbg(&link->dev, "ray_dev_init(dev=%p)\n", dev);
798         if (!(pcmcia_dev_present(link))) {
799                 dev_dbg(&link->dev, "ray_dev_init - device not present\n");
800                 return -1;
801         }
802 #ifdef RAY_IMMEDIATE_INIT
803         /* Download startup parameters */
804         if ((i = dl_startup_params(dev)) < 0) {
805                 printk(KERN_INFO "ray_dev_init dl_startup_params failed - "
806                        "returns 0x%x\n", i);
807                 return -1;
808         }
809 #else /* RAY_IMMEDIATE_INIT */
810         /* Postpone the card init so that we can still configure the card,
811          * for example using the Wireless Extensions. The init will happen
812          * in ray_open() - Jean II */
813         dev_dbg(&link->dev,
814               "ray_dev_init: postponing card init to ray_open() ; Status = %d\n",
815               local->card_status);
816 #endif /* RAY_IMMEDIATE_INIT */
817
818         /* copy mac and broadcast addresses to linux device */
819         memcpy(dev->dev_addr, &local->sparm.b4.a_mac_addr, ADDRLEN);
820         eth_broadcast_addr(dev->broadcast);
821
822         dev_dbg(&link->dev, "ray_dev_init ending\n");
823         return 0;
824 }
825
826 /*===========================================================================*/
827 static int ray_dev_config(struct net_device *dev, struct ifmap *map)
828 {
829         ray_dev_t *local = netdev_priv(dev);
830         struct pcmcia_device *link = local->finder;
831         /* Dummy routine to satisfy device structure */
832         dev_dbg(&link->dev, "ray_dev_config(dev=%p,ifmap=%p)\n", dev, map);
833         if (!(pcmcia_dev_present(link))) {
834                 dev_dbg(&link->dev, "ray_dev_config - device not present\n");
835                 return -1;
836         }
837
838         return 0;
839 }
840
841 /*===========================================================================*/
842 static netdev_tx_t ray_dev_start_xmit(struct sk_buff *skb,
843                                             struct net_device *dev)
844 {
845         ray_dev_t *local = netdev_priv(dev);
846         struct pcmcia_device *link = local->finder;
847         short length = skb->len;
848
849         if (!pcmcia_dev_present(link)) {
850                 dev_dbg(&link->dev, "ray_dev_start_xmit - device not present\n");
851                 dev_kfree_skb(skb);
852                 return NETDEV_TX_OK;
853         }
854
855         dev_dbg(&link->dev, "ray_dev_start_xmit(skb=%p, dev=%p)\n", skb, dev);
856         if (local->authentication_state == NEED_TO_AUTH) {
857                 dev_dbg(&link->dev, "ray_cs Sending authentication request.\n");
858                 if (!build_auth_frame(local, local->auth_id, OPEN_AUTH_REQUEST)) {
859                         local->authentication_state = AUTHENTICATED;
860                         netif_stop_queue(dev);
861                         return NETDEV_TX_BUSY;
862                 }
863         }
864
865         if (length < ETH_ZLEN) {
866                 if (skb_padto(skb, ETH_ZLEN))
867                         return NETDEV_TX_OK;
868                 length = ETH_ZLEN;
869         }
870         switch (ray_hw_xmit(skb->data, length, dev, DATA_TYPE)) {
871         case XMIT_NO_CCS:
872         case XMIT_NEED_AUTH:
873                 netif_stop_queue(dev);
874                 return NETDEV_TX_BUSY;
875         case XMIT_NO_INTR:
876         case XMIT_MSG_BAD:
877         case XMIT_OK:
878         default:
879                 dev_kfree_skb(skb);
880         }
881
882         return NETDEV_TX_OK;
883 } /* ray_dev_start_xmit */
884
885 /*===========================================================================*/
886 static int ray_hw_xmit(unsigned char *data, int len, struct net_device *dev,
887                        UCHAR msg_type)
888 {
889         ray_dev_t *local = netdev_priv(dev);
890         struct ccs __iomem *pccs;
891         int ccsindex;
892         int offset;
893         struct tx_msg __iomem *ptx;     /* Address of xmit buffer in PC space */
894         short int addr;         /* Address of xmit buffer in card space */
895
896         pr_debug("ray_hw_xmit(data=%p, len=%d, dev=%p)\n", data, len, dev);
897         if (len + TX_HEADER_LENGTH > TX_BUF_SIZE) {
898                 printk(KERN_INFO "ray_hw_xmit packet too large: %d bytes\n",
899                        len);
900                 return XMIT_MSG_BAD;
901         }
902         switch (ccsindex = get_free_tx_ccs(local)) {
903         case ECCSBUSY:
904                 pr_debug("ray_hw_xmit tx_ccs table busy\n");
905         case ECCSFULL:
906                 pr_debug("ray_hw_xmit No free tx ccs\n");
907         case ECARDGONE:
908                 netif_stop_queue(dev);
909                 return XMIT_NO_CCS;
910         default:
911                 break;
912         }
913         addr = TX_BUF_BASE + (ccsindex << 11);
914
915         if (msg_type == DATA_TYPE) {
916                 local->stats.tx_bytes += len;
917                 local->stats.tx_packets++;
918         }
919
920         ptx = local->sram + addr;
921
922         ray_build_header(local, ptx, msg_type, data);
923         if (translate) {
924                 offset = translate_frame(local, ptx, data, len);
925         } else { /* Encapsulate frame */
926                 /* TBD TIB length will move address of ptx->var */
927                 memcpy_toio(&ptx->var, data, len);
928                 offset = 0;
929         }
930
931         /* fill in the CCS */
932         pccs = ccs_base(local) + ccsindex;
933         len += TX_HEADER_LENGTH + offset;
934         writeb(CCS_TX_REQUEST, &pccs->cmd);
935         writeb(addr >> 8, &pccs->var.tx_request.tx_data_ptr[0]);
936         writeb(local->tib_length, &pccs->var.tx_request.tx_data_ptr[1]);
937         writeb(len >> 8, &pccs->var.tx_request.tx_data_length[0]);
938         writeb(len & 0xff, &pccs->var.tx_request.tx_data_length[1]);
939 /* TBD still need psm_cam? */
940         writeb(PSM_CAM, &pccs->var.tx_request.pow_sav_mode);
941         writeb(local->net_default_tx_rate, &pccs->var.tx_request.tx_rate);
942         writeb(0, &pccs->var.tx_request.antenna);
943         pr_debug("ray_hw_xmit default_tx_rate = 0x%x\n",
944               local->net_default_tx_rate);
945
946         /* Interrupt the firmware to process the command */
947         if (interrupt_ecf(local, ccsindex)) {
948                 pr_debug("ray_hw_xmit failed - ECF not ready for intr\n");
949 /* TBD very inefficient to copy packet to buffer, and then not
950    send it, but the alternative is to queue the messages and that
951    won't be done for a while.  Maybe set tbusy until a CCS is free?
952 */
953                 writeb(CCS_BUFFER_FREE, &pccs->buffer_status);
954                 return XMIT_NO_INTR;
955         }
956         return XMIT_OK;
957 } /* end ray_hw_xmit */
958
959 /*===========================================================================*/
960 static int translate_frame(ray_dev_t *local, struct tx_msg __iomem *ptx,
961                            unsigned char *data, int len)
962 {
963         __be16 proto = ((struct ethhdr *)data)->h_proto;
964         if (ntohs(proto) >= ETH_P_802_3_MIN) { /* DIX II ethernet frame */
965                 pr_debug("ray_cs translate_frame DIX II\n");
966                 /* Copy LLC header to card buffer */
967                 memcpy_toio(&ptx->var, eth2_llc, sizeof(eth2_llc));
968                 memcpy_toio(((void __iomem *)&ptx->var) + sizeof(eth2_llc),
969                             (UCHAR *) &proto, 2);
970                 if (proto == htons(ETH_P_AARP) || proto == htons(ETH_P_IPX)) {
971                         /* This is the selective translation table, only 2 entries */
972                         writeb(0xf8,
973                                &((struct snaphdr_t __iomem *)ptx->var)->org[3]);
974                 }
975                 /* Copy body of ethernet packet without ethernet header */
976                 memcpy_toio((void __iomem *)&ptx->var +
977                             sizeof(struct snaphdr_t), data + ETH_HLEN,
978                             len - ETH_HLEN);
979                 return (int)sizeof(struct snaphdr_t) - ETH_HLEN;
980         } else { /* already  802 type, and proto is length */
981                 pr_debug("ray_cs translate_frame 802\n");
982                 if (proto == htons(0xffff)) { /* evil netware IPX 802.3 without LLC */
983                         pr_debug("ray_cs translate_frame evil IPX\n");
984                         memcpy_toio(&ptx->var, data + ETH_HLEN, len - ETH_HLEN);
985                         return 0 - ETH_HLEN;
986                 }
987                 memcpy_toio(&ptx->var, data + ETH_HLEN, len - ETH_HLEN);
988                 return 0 - ETH_HLEN;
989         }
990         /* TBD do other frame types */
991 } /* end translate_frame */
992
993 /*===========================================================================*/
994 static void ray_build_header(ray_dev_t *local, struct tx_msg __iomem *ptx,
995                              UCHAR msg_type, unsigned char *data)
996 {
997         writeb(PROTOCOL_VER | msg_type, &ptx->mac.frame_ctl_1);
998 /*** IEEE 802.11 Address field assignments *************
999                 TODS    FROMDS  addr_1          addr_2          addr_3  addr_4
1000 Adhoc           0       0       dest            src (terminal)  BSSID   N/A
1001 AP to Terminal  0       1       dest            AP(BSSID)       source  N/A
1002 Terminal to AP  1       0       AP(BSSID)       src (terminal)  dest    N/A
1003 AP to AP        1       1       dest AP         src AP          dest    source
1004 *******************************************************/
1005         if (local->net_type == ADHOC) {
1006                 writeb(0, &ptx->mac.frame_ctl_2);
1007                 memcpy_toio(ptx->mac.addr_1, ((struct ethhdr *)data)->h_dest,
1008                             2 * ADDRLEN);
1009                 memcpy_toio(ptx->mac.addr_3, local->bss_id, ADDRLEN);
1010         } else { /* infrastructure */
1011
1012                 if (local->sparm.b4.a_acting_as_ap_status) {
1013                         writeb(FC2_FROM_DS, &ptx->mac.frame_ctl_2);
1014                         memcpy_toio(ptx->mac.addr_1,
1015                                     ((struct ethhdr *)data)->h_dest, ADDRLEN);
1016                         memcpy_toio(ptx->mac.addr_2, local->bss_id, 6);
1017                         memcpy_toio(ptx->mac.addr_3,
1018                                     ((struct ethhdr *)data)->h_source, ADDRLEN);
1019                 } else { /* Terminal */
1020
1021                         writeb(FC2_TO_DS, &ptx->mac.frame_ctl_2);
1022                         memcpy_toio(ptx->mac.addr_1, local->bss_id, ADDRLEN);
1023                         memcpy_toio(ptx->mac.addr_2,
1024                                     ((struct ethhdr *)data)->h_source, ADDRLEN);
1025                         memcpy_toio(ptx->mac.addr_3,
1026                                     ((struct ethhdr *)data)->h_dest, ADDRLEN);
1027                 }
1028         }
1029 } /* end encapsulate_frame */
1030
1031 /*====================================================================*/
1032
1033 /*------------------------------------------------------------------*/
1034 /*
1035  * Wireless Handler : get protocol name
1036  */
1037 static int ray_get_name(struct net_device *dev, struct iw_request_info *info,
1038                         union iwreq_data *wrqu, char *extra)
1039 {
1040         strcpy(wrqu->name, "IEEE 802.11-FH");
1041         return 0;
1042 }
1043
1044 /*------------------------------------------------------------------*/
1045 /*
1046  * Wireless Handler : set frequency
1047  */
1048 static int ray_set_freq(struct net_device *dev, struct iw_request_info *info,
1049                         union iwreq_data *wrqu, char *extra)
1050 {
1051         ray_dev_t *local = netdev_priv(dev);
1052         int err = -EINPROGRESS; /* Call commit handler */
1053
1054         /* Reject if card is already initialised */
1055         if (local->card_status != CARD_AWAITING_PARAM)
1056                 return -EBUSY;
1057
1058         /* Setting by channel number */
1059         if ((wrqu->freq.m > USA_HOP_MOD) || (wrqu->freq.e > 0))
1060                 err = -EOPNOTSUPP;
1061         else
1062                 local->sparm.b5.a_hop_pattern = wrqu->freq.m;
1063
1064         return err;
1065 }
1066
1067 /*------------------------------------------------------------------*/
1068 /*
1069  * Wireless Handler : get frequency
1070  */
1071 static int ray_get_freq(struct net_device *dev, struct iw_request_info *info,
1072                         union iwreq_data *wrqu, char *extra)
1073 {
1074         ray_dev_t *local = netdev_priv(dev);
1075
1076         wrqu->freq.m = local->sparm.b5.a_hop_pattern;
1077         wrqu->freq.e = 0;
1078         return 0;
1079 }
1080
1081 /*------------------------------------------------------------------*/
1082 /*
1083  * Wireless Handler : set ESSID
1084  */
1085 static int ray_set_essid(struct net_device *dev, struct iw_request_info *info,
1086                          union iwreq_data *wrqu, char *extra)
1087 {
1088         ray_dev_t *local = netdev_priv(dev);
1089
1090         /* Reject if card is already initialised */
1091         if (local->card_status != CARD_AWAITING_PARAM)
1092                 return -EBUSY;
1093
1094         /* Check if we asked for `any' */
1095         if (wrqu->essid.flags == 0)
1096                 /* Corey : can you do that ? */
1097                 return -EOPNOTSUPP;
1098
1099         /* Check the size of the string */
1100         if (wrqu->essid.length > IW_ESSID_MAX_SIZE)
1101                 return -E2BIG;
1102
1103         /* Set the ESSID in the card */
1104         memset(local->sparm.b5.a_current_ess_id, 0, IW_ESSID_MAX_SIZE);
1105         memcpy(local->sparm.b5.a_current_ess_id, extra, wrqu->essid.length);
1106
1107         return -EINPROGRESS;    /* Call commit handler */
1108 }
1109
1110 /*------------------------------------------------------------------*/
1111 /*
1112  * Wireless Handler : get ESSID
1113  */
1114 static int ray_get_essid(struct net_device *dev, struct iw_request_info *info,
1115                          union iwreq_data *wrqu, char *extra)
1116 {
1117         ray_dev_t *local = netdev_priv(dev);
1118         UCHAR tmp[IW_ESSID_MAX_SIZE + 1];
1119
1120         /* Get the essid that was set */
1121         memcpy(extra, local->sparm.b5.a_current_ess_id, IW_ESSID_MAX_SIZE);
1122         memcpy(tmp, local->sparm.b5.a_current_ess_id, IW_ESSID_MAX_SIZE);
1123         tmp[IW_ESSID_MAX_SIZE] = '\0';
1124
1125         /* Push it out ! */
1126         wrqu->essid.length = strlen(tmp);
1127         wrqu->essid.flags = 1;  /* active */
1128
1129         return 0;
1130 }
1131
1132 /*------------------------------------------------------------------*/
1133 /*
1134  * Wireless Handler : get AP address
1135  */
1136 static int ray_get_wap(struct net_device *dev, struct iw_request_info *info,
1137                        union iwreq_data *wrqu, char *extra)
1138 {
1139         ray_dev_t *local = netdev_priv(dev);
1140
1141         memcpy(wrqu->ap_addr.sa_data, local->bss_id, ETH_ALEN);
1142         wrqu->ap_addr.sa_family = ARPHRD_ETHER;
1143
1144         return 0;
1145 }
1146
1147 /*------------------------------------------------------------------*/
1148 /*
1149  * Wireless Handler : set Bit-Rate
1150  */
1151 static int ray_set_rate(struct net_device *dev, struct iw_request_info *info,
1152                         union iwreq_data *wrqu, char *extra)
1153 {
1154         ray_dev_t *local = netdev_priv(dev);
1155
1156         /* Reject if card is already initialised */
1157         if (local->card_status != CARD_AWAITING_PARAM)
1158                 return -EBUSY;
1159
1160         /* Check if rate is in range */
1161         if ((wrqu->bitrate.value != 1000000) && (wrqu->bitrate.value != 2000000))
1162                 return -EINVAL;
1163
1164         /* Hack for 1.5 Mb/s instead of 2 Mb/s */
1165         if ((local->fw_ver == 0x55) &&  /* Please check */
1166             (wrqu->bitrate.value == 2000000))
1167                 local->net_default_tx_rate = 3;
1168         else
1169                 local->net_default_tx_rate = wrqu->bitrate.value / 500000;
1170
1171         return 0;
1172 }
1173
1174 /*------------------------------------------------------------------*/
1175 /*
1176  * Wireless Handler : get Bit-Rate
1177  */
1178 static int ray_get_rate(struct net_device *dev, struct iw_request_info *info,
1179                         union iwreq_data *wrqu, char *extra)
1180 {
1181         ray_dev_t *local = netdev_priv(dev);
1182
1183         if (local->net_default_tx_rate == 3)
1184                 wrqu->bitrate.value = 2000000;  /* Hum... */
1185         else
1186                 wrqu->bitrate.value = local->net_default_tx_rate * 500000;
1187         wrqu->bitrate.fixed = 0;        /* We are in auto mode */
1188
1189         return 0;
1190 }
1191
1192 /*------------------------------------------------------------------*/
1193 /*
1194  * Wireless Handler : set RTS threshold
1195  */
1196 static int ray_set_rts(struct net_device *dev, struct iw_request_info *info,
1197                        union iwreq_data *wrqu, char *extra)
1198 {
1199         ray_dev_t *local = netdev_priv(dev);
1200         int rthr = wrqu->rts.value;
1201
1202         /* Reject if card is already initialised */
1203         if (local->card_status != CARD_AWAITING_PARAM)
1204                 return -EBUSY;
1205
1206         /* if(wrq->u.rts.fixed == 0) we should complain */
1207         if (wrqu->rts.disabled)
1208                 rthr = 32767;
1209         else {
1210                 if ((rthr < 0) || (rthr > 2347))   /* What's the max packet size ??? */
1211                         return -EINVAL;
1212         }
1213         local->sparm.b5.a_rts_threshold[0] = (rthr >> 8) & 0xFF;
1214         local->sparm.b5.a_rts_threshold[1] = rthr & 0xFF;
1215
1216         return -EINPROGRESS;    /* Call commit handler */
1217 }
1218
1219 /*------------------------------------------------------------------*/
1220 /*
1221  * Wireless Handler : get RTS threshold
1222  */
1223 static int ray_get_rts(struct net_device *dev, struct iw_request_info *info,
1224                        union iwreq_data *wrqu, char *extra)
1225 {
1226         ray_dev_t *local = netdev_priv(dev);
1227
1228         wrqu->rts.value = (local->sparm.b5.a_rts_threshold[0] << 8)
1229             + local->sparm.b5.a_rts_threshold[1];
1230         wrqu->rts.disabled = (wrqu->rts.value == 32767);
1231         wrqu->rts.fixed = 1;
1232
1233         return 0;
1234 }
1235
1236 /*------------------------------------------------------------------*/
1237 /*
1238  * Wireless Handler : set Fragmentation threshold
1239  */
1240 static int ray_set_frag(struct net_device *dev, struct iw_request_info *info,
1241                         union iwreq_data *wrqu, char *extra)
1242 {
1243         ray_dev_t *local = netdev_priv(dev);
1244         int fthr = wrqu->frag.value;
1245
1246         /* Reject if card is already initialised */
1247         if (local->card_status != CARD_AWAITING_PARAM)
1248                 return -EBUSY;
1249
1250         /* if(wrq->u.frag.fixed == 0) should complain */
1251         if (wrqu->frag.disabled)
1252                 fthr = 32767;
1253         else {
1254                 if ((fthr < 256) || (fthr > 2347))      /* To check out ! */
1255                         return -EINVAL;
1256         }
1257         local->sparm.b5.a_frag_threshold[0] = (fthr >> 8) & 0xFF;
1258         local->sparm.b5.a_frag_threshold[1] = fthr & 0xFF;
1259
1260         return -EINPROGRESS;    /* Call commit handler */
1261 }
1262
1263 /*------------------------------------------------------------------*/
1264 /*
1265  * Wireless Handler : get Fragmentation threshold
1266  */
1267 static int ray_get_frag(struct net_device *dev, struct iw_request_info *info,
1268                         union iwreq_data *wrqu, char *extra)
1269 {
1270         ray_dev_t *local = netdev_priv(dev);
1271
1272         wrqu->frag.value = (local->sparm.b5.a_frag_threshold[0] << 8)
1273             + local->sparm.b5.a_frag_threshold[1];
1274         wrqu->frag.disabled = (wrqu->frag.value == 32767);
1275         wrqu->frag.fixed = 1;
1276
1277         return 0;
1278 }
1279
1280 /*------------------------------------------------------------------*/
1281 /*
1282  * Wireless Handler : set Mode of Operation
1283  */
1284 static int ray_set_mode(struct net_device *dev, struct iw_request_info *info,
1285                         union iwreq_data *wrqu, char *extra)
1286 {
1287         ray_dev_t *local = netdev_priv(dev);
1288         int err = -EINPROGRESS; /* Call commit handler */
1289         char card_mode = 1;
1290
1291         /* Reject if card is already initialised */
1292         if (local->card_status != CARD_AWAITING_PARAM)
1293                 return -EBUSY;
1294
1295         switch (wrqu->mode) {
1296         case IW_MODE_ADHOC:
1297                 card_mode = 0;
1298                 /* Fall through */
1299         case IW_MODE_INFRA:
1300                 local->sparm.b5.a_network_type = card_mode;
1301                 break;
1302         default:
1303                 err = -EINVAL;
1304         }
1305
1306         return err;
1307 }
1308
1309 /*------------------------------------------------------------------*/
1310 /*
1311  * Wireless Handler : get Mode of Operation
1312  */
1313 static int ray_get_mode(struct net_device *dev, struct iw_request_info *info,
1314                         union iwreq_data *wrqu, char *extra)
1315 {
1316         ray_dev_t *local = netdev_priv(dev);
1317
1318         if (local->sparm.b5.a_network_type)
1319                 wrqu->mode = IW_MODE_INFRA;
1320         else
1321                 wrqu->mode = IW_MODE_ADHOC;
1322
1323         return 0;
1324 }
1325
1326 /*------------------------------------------------------------------*/
1327 /*
1328  * Wireless Handler : get range info
1329  */
1330 static int ray_get_range(struct net_device *dev, struct iw_request_info *info,
1331                          union iwreq_data *wrqu, char *extra)
1332 {
1333         struct iw_range *range = (struct iw_range *)extra;
1334
1335         memset(range, 0, sizeof(struct iw_range));
1336
1337         /* Set the length (very important for backward compatibility) */
1338         wrqu->data.length = sizeof(struct iw_range);
1339
1340         /* Set the Wireless Extension versions */
1341         range->we_version_compiled = WIRELESS_EXT;
1342         range->we_version_source = 9;
1343
1344         /* Set information in the range struct */
1345         range->throughput = 1.1 * 1000 * 1000;  /* Put the right number here */
1346         range->num_channels = hop_pattern_length[(int)country];
1347         range->num_frequency = 0;
1348         range->max_qual.qual = 0;
1349         range->max_qual.level = 255;    /* What's the correct value ? */
1350         range->max_qual.noise = 255;    /* Idem */
1351         range->num_bitrates = 2;
1352         range->bitrate[0] = 1000000;    /* 1 Mb/s */
1353         range->bitrate[1] = 2000000;    /* 2 Mb/s */
1354         return 0;
1355 }
1356
1357 /*------------------------------------------------------------------*/
1358 /*
1359  * Wireless Private Handler : set framing mode
1360  */
1361 static int ray_set_framing(struct net_device *dev, struct iw_request_info *info,
1362                            union iwreq_data *wrqu, char *extra)
1363 {
1364         translate = !!*(extra); /* Set framing mode */
1365
1366         return 0;
1367 }
1368
1369 /*------------------------------------------------------------------*/
1370 /*
1371  * Wireless Private Handler : get framing mode
1372  */
1373 static int ray_get_framing(struct net_device *dev, struct iw_request_info *info,
1374                            union iwreq_data *wrqu, char *extra)
1375 {
1376         *(extra) = translate;
1377
1378         return 0;
1379 }
1380
1381 /*------------------------------------------------------------------*/
1382 /*
1383  * Wireless Private Handler : get country
1384  */
1385 static int ray_get_country(struct net_device *dev, struct iw_request_info *info,
1386                            union iwreq_data *wrqu, char *extra)
1387 {
1388         *(extra) = country;
1389
1390         return 0;
1391 }
1392
1393 /*------------------------------------------------------------------*/
1394 /*
1395  * Commit handler : called after a bunch of SET operations
1396  */
1397 static int ray_commit(struct net_device *dev, struct iw_request_info *info,
1398                       union iwreq_data *wrqu, char *extra)
1399 {
1400         return 0;
1401 }
1402
1403 /*------------------------------------------------------------------*/
1404 /*
1405  * Stats handler : return Wireless Stats
1406  */
1407 static iw_stats *ray_get_wireless_stats(struct net_device *dev)
1408 {
1409         ray_dev_t *local = netdev_priv(dev);
1410         struct pcmcia_device *link = local->finder;
1411         struct status __iomem *p = local->sram + STATUS_BASE;
1412
1413         local->wstats.status = local->card_status;
1414 #ifdef WIRELESS_SPY
1415         if ((local->spy_data.spy_number > 0)
1416             && (local->sparm.b5.a_network_type == 0)) {
1417                 /* Get it from the first node in spy list */
1418                 local->wstats.qual.qual = local->spy_data.spy_stat[0].qual;
1419                 local->wstats.qual.level = local->spy_data.spy_stat[0].level;
1420                 local->wstats.qual.noise = local->spy_data.spy_stat[0].noise;
1421                 local->wstats.qual.updated =
1422                     local->spy_data.spy_stat[0].updated;
1423         }
1424 #endif /* WIRELESS_SPY */
1425
1426         if (pcmcia_dev_present(link)) {
1427                 local->wstats.qual.noise = readb(&p->rxnoise);
1428                 local->wstats.qual.updated |= 4;
1429         }
1430
1431         return &local->wstats;
1432 } /* end ray_get_wireless_stats */
1433
1434 /*------------------------------------------------------------------*/
1435 /*
1436  * Structures to export the Wireless Handlers
1437  */
1438
1439 static const iw_handler ray_handler[] = {
1440         IW_HANDLER(SIOCSIWCOMMIT, ray_commit),
1441         IW_HANDLER(SIOCGIWNAME, ray_get_name),
1442         IW_HANDLER(SIOCSIWFREQ, ray_set_freq),
1443         IW_HANDLER(SIOCGIWFREQ, ray_get_freq),
1444         IW_HANDLER(SIOCSIWMODE, ray_set_mode),
1445         IW_HANDLER(SIOCGIWMODE, ray_get_mode),
1446         IW_HANDLER(SIOCGIWRANGE, ray_get_range),
1447 #ifdef WIRELESS_SPY
1448         IW_HANDLER(SIOCSIWSPY, iw_handler_set_spy),
1449         IW_HANDLER(SIOCGIWSPY, iw_handler_get_spy),
1450         IW_HANDLER(SIOCSIWTHRSPY, iw_handler_set_thrspy),
1451         IW_HANDLER(SIOCGIWTHRSPY, iw_handler_get_thrspy),
1452 #endif /* WIRELESS_SPY */
1453         IW_HANDLER(SIOCGIWAP, ray_get_wap),
1454         IW_HANDLER(SIOCSIWESSID, ray_set_essid),
1455         IW_HANDLER(SIOCGIWESSID, ray_get_essid),
1456         IW_HANDLER(SIOCSIWRATE, ray_set_rate),
1457         IW_HANDLER(SIOCGIWRATE, ray_get_rate),
1458         IW_HANDLER(SIOCSIWRTS, ray_set_rts),
1459         IW_HANDLER(SIOCGIWRTS, ray_get_rts),
1460         IW_HANDLER(SIOCSIWFRAG, ray_set_frag),
1461         IW_HANDLER(SIOCGIWFRAG, ray_get_frag),
1462 };
1463
1464 #define SIOCSIPFRAMING  SIOCIWFIRSTPRIV /* Set framing mode */
1465 #define SIOCGIPFRAMING  SIOCIWFIRSTPRIV + 1     /* Get framing mode */
1466 #define SIOCGIPCOUNTRY  SIOCIWFIRSTPRIV + 3     /* Get country code */
1467
1468 static const iw_handler ray_private_handler[] = {
1469         [0] = ray_set_framing,
1470         [1] = ray_get_framing,
1471         [3] = ray_get_country,
1472 };
1473
1474 static const struct iw_priv_args ray_private_args[] = {
1475 /* cmd,         set_args,       get_args,       name */
1476         {SIOCSIPFRAMING, IW_PRIV_TYPE_BYTE | IW_PRIV_SIZE_FIXED | 1, 0,
1477          "set_framing"},
1478         {SIOCGIPFRAMING, 0, IW_PRIV_TYPE_BYTE | IW_PRIV_SIZE_FIXED | 1,
1479          "get_framing"},
1480         {SIOCGIPCOUNTRY, 0, IW_PRIV_TYPE_BYTE | IW_PRIV_SIZE_FIXED | 1,
1481          "get_country"},
1482 };
1483
1484 static const struct iw_handler_def ray_handler_def = {
1485         .num_standard = ARRAY_SIZE(ray_handler),
1486         .num_private = ARRAY_SIZE(ray_private_handler),
1487         .num_private_args = ARRAY_SIZE(ray_private_args),
1488         .standard = ray_handler,
1489         .private = ray_private_handler,
1490         .private_args = ray_private_args,
1491         .get_wireless_stats = ray_get_wireless_stats,
1492 };
1493
1494 /*===========================================================================*/
1495 static int ray_open(struct net_device *dev)
1496 {
1497         ray_dev_t *local = netdev_priv(dev);
1498         struct pcmcia_device *link;
1499         link = local->finder;
1500
1501         dev_dbg(&link->dev, "ray_open('%s')\n", dev->name);
1502
1503         if (link->open == 0)
1504                 local->num_multi = 0;
1505         link->open++;
1506
1507         /* If the card is not started, time to start it ! - Jean II */
1508         if (local->card_status == CARD_AWAITING_PARAM) {
1509                 int i;
1510
1511                 dev_dbg(&link->dev, "ray_open: doing init now !\n");
1512
1513                 /* Download startup parameters */
1514                 if ((i = dl_startup_params(dev)) < 0) {
1515                         printk(KERN_INFO
1516                                "ray_dev_init dl_startup_params failed - "
1517                                "returns 0x%x\n", i);
1518                         return -1;
1519                 }
1520         }
1521
1522         if (sniffer)
1523                 netif_stop_queue(dev);
1524         else
1525                 netif_start_queue(dev);
1526
1527         dev_dbg(&link->dev, "ray_open ending\n");
1528         return 0;
1529 } /* end ray_open */
1530
1531 /*===========================================================================*/
1532 static int ray_dev_close(struct net_device *dev)
1533 {
1534         ray_dev_t *local = netdev_priv(dev);
1535         struct pcmcia_device *link;
1536         link = local->finder;
1537
1538         dev_dbg(&link->dev, "ray_dev_close('%s')\n", dev->name);
1539
1540         link->open--;
1541         netif_stop_queue(dev);
1542
1543         /* In here, we should stop the hardware (stop card from beeing active)
1544          * and set local->card_status to CARD_AWAITING_PARAM, so that while the
1545          * card is closed we can chage its configuration.
1546          * Probably also need a COR reset to get sane state - Jean II */
1547
1548         return 0;
1549 } /* end ray_dev_close */
1550
1551 /*===========================================================================*/
1552 static void ray_reset(struct net_device *dev)
1553 {
1554         pr_debug("ray_reset entered\n");
1555 }
1556
1557 /*===========================================================================*/
1558 /* Cause a firmware interrupt if it is ready for one                         */
1559 /* Return nonzero if not ready                                               */
1560 static int interrupt_ecf(ray_dev_t *local, int ccs)
1561 {
1562         int i = 50;
1563         struct pcmcia_device *link = local->finder;
1564
1565         if (!(pcmcia_dev_present(link))) {
1566                 dev_dbg(&link->dev, "ray_cs interrupt_ecf - device not present\n");
1567                 return -1;
1568         }
1569         dev_dbg(&link->dev, "interrupt_ecf(local=%p, ccs = 0x%x\n", local, ccs);
1570
1571         while (i &&
1572                (readb(local->amem + CIS_OFFSET + ECF_INTR_OFFSET) &
1573                 ECF_INTR_SET))
1574                 i--;
1575         if (i == 0) {
1576                 dev_dbg(&link->dev, "ray_cs interrupt_ecf card not ready for interrupt\n");
1577                 return -1;
1578         }
1579         /* Fill the mailbox, then kick the card */
1580         writeb(ccs, local->sram + SCB_BASE);
1581         writeb(ECF_INTR_SET, local->amem + CIS_OFFSET + ECF_INTR_OFFSET);
1582         return 0;
1583 } /* interrupt_ecf */
1584
1585 /*===========================================================================*/
1586 /* Get next free transmit CCS                                                */
1587 /* Return - index of current tx ccs                                          */
1588 static int get_free_tx_ccs(ray_dev_t *local)
1589 {
1590         int i;
1591         struct ccs __iomem *pccs = ccs_base(local);
1592         struct pcmcia_device *link = local->finder;
1593
1594         if (!(pcmcia_dev_present(link))) {
1595                 dev_dbg(&link->dev, "ray_cs get_free_tx_ccs - device not present\n");
1596                 return ECARDGONE;
1597         }
1598
1599         if (test_and_set_bit(0, &local->tx_ccs_lock)) {
1600                 dev_dbg(&link->dev, "ray_cs tx_ccs_lock busy\n");
1601                 return ECCSBUSY;
1602         }
1603
1604         for (i = 0; i < NUMBER_OF_TX_CCS; i++) {
1605                 if (readb(&(pccs + i)->buffer_status) == CCS_BUFFER_FREE) {
1606                         writeb(CCS_BUFFER_BUSY, &(pccs + i)->buffer_status);
1607                         writeb(CCS_END_LIST, &(pccs + i)->link);
1608                         local->tx_ccs_lock = 0;
1609                         return i;
1610                 }
1611         }
1612         local->tx_ccs_lock = 0;
1613         dev_dbg(&link->dev, "ray_cs ERROR no free tx CCS for raylink card\n");
1614         return ECCSFULL;
1615 } /* get_free_tx_ccs */
1616
1617 /*===========================================================================*/
1618 /* Get next free CCS                                                         */
1619 /* Return - index of current ccs                                             */
1620 static int get_free_ccs(ray_dev_t *local)
1621 {
1622         int i;
1623         struct ccs __iomem *pccs = ccs_base(local);
1624         struct pcmcia_device *link = local->finder;
1625
1626         if (!(pcmcia_dev_present(link))) {
1627                 dev_dbg(&link->dev, "ray_cs get_free_ccs - device not present\n");
1628                 return ECARDGONE;
1629         }
1630         if (test_and_set_bit(0, &local->ccs_lock)) {
1631                 dev_dbg(&link->dev, "ray_cs ccs_lock busy\n");
1632                 return ECCSBUSY;
1633         }
1634
1635         for (i = NUMBER_OF_TX_CCS; i < NUMBER_OF_CCS; i++) {
1636                 if (readb(&(pccs + i)->buffer_status) == CCS_BUFFER_FREE) {
1637                         writeb(CCS_BUFFER_BUSY, &(pccs + i)->buffer_status);
1638                         writeb(CCS_END_LIST, &(pccs + i)->link);
1639                         local->ccs_lock = 0;
1640                         return i;
1641                 }
1642         }
1643         local->ccs_lock = 0;
1644         dev_dbg(&link->dev, "ray_cs ERROR no free CCS for raylink card\n");
1645         return ECCSFULL;
1646 } /* get_free_ccs */
1647
1648 /*===========================================================================*/
1649 static void authenticate_timeout(u_long data)
1650 {
1651         ray_dev_t *local = (ray_dev_t *) data;
1652         del_timer(&local->timer);
1653         printk(KERN_INFO "ray_cs Authentication with access point failed"
1654                " - timeout\n");
1655         join_net((u_long) local);
1656 }
1657
1658 /*===========================================================================*/
1659 static int parse_addr(char *in_str, UCHAR *out)
1660 {
1661         int len;
1662         int i, j, k;
1663         int status;
1664
1665         if (in_str == NULL)
1666                 return 0;
1667         if ((len = strlen(in_str)) < 2)
1668                 return 0;
1669         memset(out, 0, ADDRLEN);
1670
1671         status = 1;
1672         j = len - 1;
1673         if (j > 12)
1674                 j = 12;
1675         i = 5;
1676
1677         while (j > 0) {
1678                 if ((k = hex_to_bin(in_str[j--])) != -1)
1679                         out[i] = k;
1680                 else
1681                         return 0;
1682
1683                 if (j == 0)
1684                         break;
1685                 if ((k = hex_to_bin(in_str[j--])) != -1)
1686                         out[i] += k << 4;
1687                 else
1688                         return 0;
1689                 if (!i--)
1690                         break;
1691         }
1692         return status;
1693 }
1694
1695 /*===========================================================================*/
1696 static struct net_device_stats *ray_get_stats(struct net_device *dev)
1697 {
1698         ray_dev_t *local = netdev_priv(dev);
1699         struct pcmcia_device *link = local->finder;
1700         struct status __iomem *p = local->sram + STATUS_BASE;
1701         if (!(pcmcia_dev_present(link))) {
1702                 dev_dbg(&link->dev, "ray_cs net_device_stats - device not present\n");
1703                 return &local->stats;
1704         }
1705         if (readb(&p->mrx_overflow_for_host)) {
1706                 local->stats.rx_over_errors += swab16(readw(&p->mrx_overflow));
1707                 writeb(0, &p->mrx_overflow);
1708                 writeb(0, &p->mrx_overflow_for_host);
1709         }
1710         if (readb(&p->mrx_checksum_error_for_host)) {
1711                 local->stats.rx_crc_errors +=
1712                     swab16(readw(&p->mrx_checksum_error));
1713                 writeb(0, &p->mrx_checksum_error);
1714                 writeb(0, &p->mrx_checksum_error_for_host);
1715         }
1716         if (readb(&p->rx_hec_error_for_host)) {
1717                 local->stats.rx_frame_errors += swab16(readw(&p->rx_hec_error));
1718                 writeb(0, &p->rx_hec_error);
1719                 writeb(0, &p->rx_hec_error_for_host);
1720         }
1721         return &local->stats;
1722 }
1723
1724 /*===========================================================================*/
1725 static void ray_update_parm(struct net_device *dev, UCHAR objid, UCHAR *value,
1726                             int len)
1727 {
1728         ray_dev_t *local = netdev_priv(dev);
1729         struct pcmcia_device *link = local->finder;
1730         int ccsindex;
1731         int i;
1732         struct ccs __iomem *pccs;
1733
1734         if (!(pcmcia_dev_present(link))) {
1735                 dev_dbg(&link->dev, "ray_update_parm - device not present\n");
1736                 return;
1737         }
1738
1739         if ((ccsindex = get_free_ccs(local)) < 0) {
1740                 dev_dbg(&link->dev, "ray_update_parm - No free ccs\n");
1741                 return;
1742         }
1743         pccs = ccs_base(local) + ccsindex;
1744         writeb(CCS_UPDATE_PARAMS, &pccs->cmd);
1745         writeb(objid, &pccs->var.update_param.object_id);
1746         writeb(1, &pccs->var.update_param.number_objects);
1747         writeb(0, &pccs->var.update_param.failure_cause);
1748         for (i = 0; i < len; i++) {
1749                 writeb(value[i], local->sram + HOST_TO_ECF_BASE);
1750         }
1751         /* Interrupt the firmware to process the command */
1752         if (interrupt_ecf(local, ccsindex)) {
1753                 dev_dbg(&link->dev, "ray_cs associate failed - ECF not ready for intr\n");
1754                 writeb(CCS_BUFFER_FREE, &(pccs++)->buffer_status);
1755         }
1756 }
1757
1758 /*===========================================================================*/
1759 static void ray_update_multi_list(struct net_device *dev, int all)
1760 {
1761         int ccsindex;
1762         struct ccs __iomem *pccs;
1763         ray_dev_t *local = netdev_priv(dev);
1764         struct pcmcia_device *link = local->finder;
1765         void __iomem *p = local->sram + HOST_TO_ECF_BASE;
1766
1767         if (!(pcmcia_dev_present(link))) {
1768                 dev_dbg(&link->dev, "ray_update_multi_list - device not present\n");
1769                 return;
1770         } else
1771                 dev_dbg(&link->dev, "ray_update_multi_list(%p)\n", dev);
1772         if ((ccsindex = get_free_ccs(local)) < 0) {
1773                 dev_dbg(&link->dev, "ray_update_multi - No free ccs\n");
1774                 return;
1775         }
1776         pccs = ccs_base(local) + ccsindex;
1777         writeb(CCS_UPDATE_MULTICAST_LIST, &pccs->cmd);
1778
1779         if (all) {
1780                 writeb(0xff, &pccs->var);
1781                 local->num_multi = 0xff;
1782         } else {
1783                 struct netdev_hw_addr *ha;
1784                 int i = 0;
1785
1786                 /* Copy the kernel's list of MC addresses to card */
1787                 netdev_for_each_mc_addr(ha, dev) {
1788                         memcpy_toio(p, ha->addr, ETH_ALEN);
1789                         dev_dbg(&link->dev, "ray_update_multi add addr %pm\n",
1790                                 ha->addr);
1791                         p += ETH_ALEN;
1792                         i++;
1793                 }
1794                 if (i > 256 / ADDRLEN)
1795                         i = 256 / ADDRLEN;
1796                 writeb((UCHAR) i, &pccs->var);
1797                 dev_dbg(&link->dev, "ray_cs update_multi %d addresses in list\n", i);
1798                 /* Interrupt the firmware to process the command */
1799                 local->num_multi = i;
1800         }
1801         if (interrupt_ecf(local, ccsindex)) {
1802                 dev_dbg(&link->dev,
1803                       "ray_cs update_multi failed - ECF not ready for intr\n");
1804                 writeb(CCS_BUFFER_FREE, &(pccs++)->buffer_status);
1805         }
1806 } /* end ray_update_multi_list */
1807
1808 /*===========================================================================*/
1809 static void set_multicast_list(struct net_device *dev)
1810 {
1811         ray_dev_t *local = netdev_priv(dev);
1812         UCHAR promisc;
1813
1814         pr_debug("ray_cs set_multicast_list(%p)\n", dev);
1815
1816         if (dev->flags & IFF_PROMISC) {
1817                 if (local->sparm.b5.a_promiscuous_mode == 0) {
1818                         pr_debug("ray_cs set_multicast_list promisc on\n");
1819                         local->sparm.b5.a_promiscuous_mode = 1;
1820                         promisc = 1;
1821                         ray_update_parm(dev, OBJID_promiscuous_mode,
1822                                         &promisc, sizeof(promisc));
1823                 }
1824         } else {
1825                 if (local->sparm.b5.a_promiscuous_mode == 1) {
1826                         pr_debug("ray_cs set_multicast_list promisc off\n");
1827                         local->sparm.b5.a_promiscuous_mode = 0;
1828                         promisc = 0;
1829                         ray_update_parm(dev, OBJID_promiscuous_mode,
1830                                         &promisc, sizeof(promisc));
1831                 }
1832         }
1833
1834         if (dev->flags & IFF_ALLMULTI)
1835                 ray_update_multi_list(dev, 1);
1836         else {
1837                 if (local->num_multi != netdev_mc_count(dev))
1838                         ray_update_multi_list(dev, 0);
1839         }
1840 } /* end set_multicast_list */
1841
1842 /*=============================================================================
1843  * All routines below here are run at interrupt time.
1844 =============================================================================*/
1845 static irqreturn_t ray_interrupt(int irq, void *dev_id)
1846 {
1847         struct net_device *dev = (struct net_device *)dev_id;
1848         struct pcmcia_device *link;
1849         ray_dev_t *local;
1850         struct ccs __iomem *pccs;
1851         struct rcs __iomem *prcs;
1852         UCHAR rcsindex;
1853         UCHAR tmp;
1854         UCHAR cmd;
1855         UCHAR status;
1856         UCHAR memtmp[ESSID_SIZE + 1];
1857
1858
1859         if (dev == NULL)        /* Note that we want interrupts with dev->start == 0 */
1860                 return IRQ_NONE;
1861
1862         pr_debug("ray_cs: interrupt for *dev=%p\n", dev);
1863
1864         local = netdev_priv(dev);
1865         link = local->finder;
1866         if (!pcmcia_dev_present(link)) {
1867                 pr_debug(
1868                         "ray_cs interrupt from device not present or suspended.\n");
1869                 return IRQ_NONE;
1870         }
1871         rcsindex = readb(&((struct scb __iomem *)(local->sram))->rcs_index);
1872
1873         if (rcsindex >= (NUMBER_OF_CCS + NUMBER_OF_RCS)) {
1874                 dev_dbg(&link->dev, "ray_cs interrupt bad rcsindex = 0x%x\n", rcsindex);
1875                 clear_interrupt(local);
1876                 return IRQ_HANDLED;
1877         }
1878         if (rcsindex < NUMBER_OF_CCS) { /* If it's a returned CCS */
1879                 pccs = ccs_base(local) + rcsindex;
1880                 cmd = readb(&pccs->cmd);
1881                 status = readb(&pccs->buffer_status);
1882                 switch (cmd) {
1883                 case CCS_DOWNLOAD_STARTUP_PARAMS:       /* Happens in firmware someday */
1884                         del_timer(&local->timer);
1885                         if (status == CCS_COMMAND_COMPLETE) {
1886                                 dev_dbg(&link->dev,
1887                                       "ray_cs interrupt download_startup_parameters OK\n");
1888                         } else {
1889                                 dev_dbg(&link->dev,
1890                                       "ray_cs interrupt download_startup_parameters fail\n");
1891                         }
1892                         break;
1893                 case CCS_UPDATE_PARAMS:
1894                         dev_dbg(&link->dev, "ray_cs interrupt update params done\n");
1895                         if (status != CCS_COMMAND_COMPLETE) {
1896                                 tmp =
1897                                     readb(&pccs->var.update_param.
1898                                           failure_cause);
1899                                 dev_dbg(&link->dev,
1900                                       "ray_cs interrupt update params failed - reason %d\n",
1901                                       tmp);
1902                         }
1903                         break;
1904                 case CCS_REPORT_PARAMS:
1905                         dev_dbg(&link->dev, "ray_cs interrupt report params done\n");
1906                         break;
1907                 case CCS_UPDATE_MULTICAST_LIST: /* Note that this CCS isn't returned */
1908                         dev_dbg(&link->dev,
1909                               "ray_cs interrupt CCS Update Multicast List done\n");
1910                         break;
1911                 case CCS_UPDATE_POWER_SAVINGS_MODE:
1912                         dev_dbg(&link->dev,
1913                               "ray_cs interrupt update power save mode done\n");
1914                         break;
1915                 case CCS_START_NETWORK:
1916                 case CCS_JOIN_NETWORK:
1917                         memcpy(memtmp, local->sparm.b4.a_current_ess_id,
1918                                                                 ESSID_SIZE);
1919                         memtmp[ESSID_SIZE] = '\0';
1920
1921                         if (status == CCS_COMMAND_COMPLETE) {
1922                                 if (readb
1923                                     (&pccs->var.start_network.net_initiated) ==
1924                                     1) {
1925                                         dev_dbg(&link->dev,
1926                                               "ray_cs interrupt network \"%s\" started\n",
1927                                               memtmp);
1928                                 } else {
1929                                         dev_dbg(&link->dev,
1930                                               "ray_cs interrupt network \"%s\" joined\n",
1931                                               memtmp);
1932                                 }
1933                                 memcpy_fromio(&local->bss_id,
1934                                               pccs->var.start_network.bssid,
1935                                               ADDRLEN);
1936
1937                                 if (local->fw_ver == 0x55)
1938                                         local->net_default_tx_rate = 3;
1939                                 else
1940                                         local->net_default_tx_rate =
1941                                             readb(&pccs->var.start_network.
1942                                                   net_default_tx_rate);
1943                                 local->encryption =
1944                                     readb(&pccs->var.start_network.encryption);
1945                                 if (!sniffer && (local->net_type == INFRA)
1946                                     && !(local->sparm.b4.a_acting_as_ap_status)) {
1947                                         authenticate(local);
1948                                 }
1949                                 local->card_status = CARD_ACQ_COMPLETE;
1950                         } else {
1951                                 local->card_status = CARD_ACQ_FAILED;
1952
1953                                 del_timer(&local->timer);
1954                                 local->timer.expires = jiffies + HZ * 5;
1955                                 local->timer.data = (long)local;
1956                                 if (status == CCS_START_NETWORK) {
1957                                         dev_dbg(&link->dev,
1958                                               "ray_cs interrupt network \"%s\" start failed\n",
1959                                               memtmp);
1960                                         local->timer.function = start_net;
1961                                 } else {
1962                                         dev_dbg(&link->dev,
1963                                               "ray_cs interrupt network \"%s\" join failed\n",
1964                                               memtmp);
1965                                         local->timer.function = join_net;
1966                                 }
1967                                 add_timer(&local->timer);
1968                         }
1969                         break;
1970                 case CCS_START_ASSOCIATION:
1971                         if (status == CCS_COMMAND_COMPLETE) {
1972                                 local->card_status = CARD_ASSOC_COMPLETE;
1973                                 dev_dbg(&link->dev, "ray_cs association successful\n");
1974                         } else {
1975                                 dev_dbg(&link->dev, "ray_cs association failed,\n");
1976                                 local->card_status = CARD_ASSOC_FAILED;
1977                                 join_net((u_long) local);
1978                         }
1979                         break;
1980                 case CCS_TX_REQUEST:
1981                         if (status == CCS_COMMAND_COMPLETE) {
1982                                 dev_dbg(&link->dev,
1983                                       "ray_cs interrupt tx request complete\n");
1984                         } else {
1985                                 dev_dbg(&link->dev,
1986                                       "ray_cs interrupt tx request failed\n");
1987                         }
1988                         if (!sniffer)
1989                                 netif_start_queue(dev);
1990                         netif_wake_queue(dev);
1991                         break;
1992                 case CCS_TEST_MEMORY:
1993                         dev_dbg(&link->dev, "ray_cs interrupt mem test done\n");
1994                         break;
1995                 case CCS_SHUTDOWN:
1996                         dev_dbg(&link->dev,
1997                               "ray_cs interrupt Unexpected CCS returned - Shutdown\n");
1998                         break;
1999                 case CCS_DUMP_MEMORY:
2000                         dev_dbg(&link->dev, "ray_cs interrupt dump memory done\n");
2001                         break;
2002                 case CCS_START_TIMER:
2003                         dev_dbg(&link->dev,
2004                               "ray_cs interrupt DING - raylink timer expired\n");
2005                         break;
2006                 default:
2007                         dev_dbg(&link->dev,
2008                               "ray_cs interrupt Unexpected CCS 0x%x returned 0x%x\n",
2009                               rcsindex, cmd);
2010                 }
2011                 writeb(CCS_BUFFER_FREE, &pccs->buffer_status);
2012         } else { /* It's an RCS */
2013
2014                 prcs = rcs_base(local) + rcsindex;
2015
2016                 switch (readb(&prcs->interrupt_id)) {
2017                 case PROCESS_RX_PACKET:
2018                         ray_rx(dev, local, prcs);
2019                         break;
2020                 case REJOIN_NET_COMPLETE:
2021                         dev_dbg(&link->dev, "ray_cs interrupt rejoin net complete\n");
2022                         local->card_status = CARD_ACQ_COMPLETE;
2023                         /* do we need to clear tx buffers CCS's? */
2024                         if (local->sparm.b4.a_network_type == ADHOC) {
2025                                 if (!sniffer)
2026                                         netif_start_queue(dev);
2027                         } else {
2028                                 memcpy_fromio(&local->bss_id,
2029                                               prcs->var.rejoin_net_complete.
2030                                               bssid, ADDRLEN);
2031                                 dev_dbg(&link->dev, "ray_cs new BSSID = %pm\n",
2032                                         local->bss_id);
2033                                 if (!sniffer)
2034                                         authenticate(local);
2035                         }
2036                         break;
2037                 case ROAMING_INITIATED:
2038                         dev_dbg(&link->dev, "ray_cs interrupt roaming initiated\n");
2039                         netif_stop_queue(dev);
2040                         local->card_status = CARD_DOING_ACQ;
2041                         break;
2042                 case JAPAN_CALL_SIGN_RXD:
2043                         dev_dbg(&link->dev, "ray_cs interrupt japan call sign rx\n");
2044                         break;
2045                 default:
2046                         dev_dbg(&link->dev,
2047                               "ray_cs Unexpected interrupt for RCS 0x%x cmd = 0x%x\n",
2048                               rcsindex,
2049                               (unsigned int)readb(&prcs->interrupt_id));
2050                         break;
2051                 }
2052                 writeb(CCS_BUFFER_FREE, &prcs->buffer_status);
2053         }
2054         clear_interrupt(local);
2055         return IRQ_HANDLED;
2056 } /* ray_interrupt */
2057
2058 /*===========================================================================*/
2059 static void ray_rx(struct net_device *dev, ray_dev_t *local,
2060                    struct rcs __iomem *prcs)
2061 {
2062         int rx_len;
2063         unsigned int pkt_addr;
2064         void __iomem *pmsg;
2065         pr_debug("ray_rx process rx packet\n");
2066
2067         /* Calculate address of packet within Rx buffer */
2068         pkt_addr = ((readb(&prcs->var.rx_packet.rx_data_ptr[0]) << 8)
2069                     + readb(&prcs->var.rx_packet.rx_data_ptr[1])) & RX_BUFF_END;
2070         /* Length of first packet fragment */
2071         rx_len = (readb(&prcs->var.rx_packet.rx_data_length[0]) << 8)
2072             + readb(&prcs->var.rx_packet.rx_data_length[1]);
2073
2074         local->last_rsl = readb(&prcs->var.rx_packet.rx_sig_lev);
2075         pmsg = local->rmem + pkt_addr;
2076         switch (readb(pmsg)) {
2077         case DATA_TYPE:
2078                 pr_debug("ray_rx data type\n");
2079                 rx_data(dev, prcs, pkt_addr, rx_len);
2080                 break;
2081         case AUTHENTIC_TYPE:
2082                 pr_debug("ray_rx authentic type\n");
2083                 if (sniffer)
2084                         rx_data(dev, prcs, pkt_addr, rx_len);
2085                 else
2086                         rx_authenticate(local, prcs, pkt_addr, rx_len);
2087                 break;
2088         case DEAUTHENTIC_TYPE:
2089                 pr_debug("ray_rx deauth type\n");
2090                 if (sniffer)
2091                         rx_data(dev, prcs, pkt_addr, rx_len);
2092                 else
2093                         rx_deauthenticate(local, prcs, pkt_addr, rx_len);
2094                 break;
2095         case NULL_MSG_TYPE:
2096                 pr_debug("ray_cs rx NULL msg\n");
2097                 break;
2098         case BEACON_TYPE:
2099                 pr_debug("ray_rx beacon type\n");
2100                 if (sniffer)
2101                         rx_data(dev, prcs, pkt_addr, rx_len);
2102
2103                 copy_from_rx_buff(local, (UCHAR *) &local->last_bcn, pkt_addr,
2104                                   rx_len < sizeof(struct beacon_rx) ?
2105                                   rx_len : sizeof(struct beacon_rx));
2106
2107                 local->beacon_rxed = 1;
2108                 /* Get the statistics so the card counters never overflow */
2109                 ray_get_stats(dev);
2110                 break;
2111         default:
2112                 pr_debug("ray_cs unknown pkt type %2x\n",
2113                       (unsigned int)readb(pmsg));
2114                 break;
2115         }
2116
2117 } /* end ray_rx */
2118
2119 /*===========================================================================*/
2120 static void rx_data(struct net_device *dev, struct rcs __iomem *prcs,
2121                     unsigned int pkt_addr, int rx_len)
2122 {
2123         struct sk_buff *skb = NULL;
2124         struct rcs __iomem *prcslink = prcs;
2125         ray_dev_t *local = netdev_priv(dev);
2126         UCHAR *rx_ptr;
2127         int total_len;
2128         int tmp;
2129 #ifdef WIRELESS_SPY
2130         int siglev = local->last_rsl;
2131         u_char linksrcaddr[ETH_ALEN];   /* Other end of the wireless link */
2132 #endif
2133
2134         if (!sniffer) {
2135                 if (translate) {
2136 /* TBD length needs fixing for translated header */
2137                         if (rx_len < (ETH_HLEN + RX_MAC_HEADER_LENGTH) ||
2138                             rx_len >
2139                             (dev->mtu + RX_MAC_HEADER_LENGTH + ETH_HLEN +
2140                              FCS_LEN)) {
2141                                 pr_debug(
2142                                       "ray_cs invalid packet length %d received\n",
2143                                       rx_len);
2144                                 return;
2145                         }
2146                 } else { /* encapsulated ethernet */
2147
2148                         if (rx_len < (ETH_HLEN + RX_MAC_HEADER_LENGTH) ||
2149                             rx_len >
2150                             (dev->mtu + RX_MAC_HEADER_LENGTH + ETH_HLEN +
2151                              FCS_LEN)) {
2152                                 pr_debug(
2153                                       "ray_cs invalid packet length %d received\n",
2154                                       rx_len);
2155                                 return;
2156                         }
2157                 }
2158         }
2159         pr_debug("ray_cs rx_data packet\n");
2160         /* If fragmented packet, verify sizes of fragments add up */
2161         if (readb(&prcs->var.rx_packet.next_frag_rcs_index) != 0xFF) {
2162                 pr_debug("ray_cs rx'ed fragment\n");
2163                 tmp = (readb(&prcs->var.rx_packet.totalpacketlength[0]) << 8)
2164                     + readb(&prcs->var.rx_packet.totalpacketlength[1]);
2165                 total_len = tmp;
2166                 prcslink = prcs;
2167                 do {
2168                         tmp -=
2169                             (readb(&prcslink->var.rx_packet.rx_data_length[0])
2170                              << 8)
2171                             + readb(&prcslink->var.rx_packet.rx_data_length[1]);
2172                         if (readb(&prcslink->var.rx_packet.next_frag_rcs_index)
2173                             == 0xFF || tmp < 0)
2174                                 break;
2175                         prcslink = rcs_base(local)
2176                             + readb(&prcslink->link_field);
2177                 } while (1);
2178
2179                 if (tmp < 0) {
2180                         pr_debug(
2181                               "ray_cs rx_data fragment lengths don't add up\n");
2182                         local->stats.rx_dropped++;
2183                         release_frag_chain(local, prcs);
2184                         return;
2185                 }
2186         } else { /* Single unfragmented packet */
2187                 total_len = rx_len;
2188         }
2189
2190         skb = dev_alloc_skb(total_len + 5);
2191         if (skb == NULL) {
2192                 pr_debug("ray_cs rx_data could not allocate skb\n");
2193                 local->stats.rx_dropped++;
2194                 if (readb(&prcs->var.rx_packet.next_frag_rcs_index) != 0xFF)
2195                         release_frag_chain(local, prcs);
2196                 return;
2197         }
2198         skb_reserve(skb, 2);    /* Align IP on 16 byte (TBD check this) */
2199
2200         pr_debug("ray_cs rx_data total_len = %x, rx_len = %x\n", total_len,
2201               rx_len);
2202
2203 /************************/
2204         /* Reserve enough room for the whole damn packet. */
2205         rx_ptr = skb_put(skb, total_len);
2206         /* Copy the whole packet to sk_buff */
2207         rx_ptr +=
2208             copy_from_rx_buff(local, rx_ptr, pkt_addr & RX_BUFF_END, rx_len);
2209         /* Get source address */
2210 #ifdef WIRELESS_SPY
2211         skb_copy_from_linear_data_offset(skb,
2212                                          offsetof(struct mac_header, addr_2),
2213                                          linksrcaddr, ETH_ALEN);
2214 #endif
2215         /* Now, deal with encapsulation/translation/sniffer */
2216         if (!sniffer) {
2217                 if (!translate) {
2218                         /* Encapsulated ethernet, so just lop off 802.11 MAC header */
2219 /* TBD reserve            skb_reserve( skb, RX_MAC_HEADER_LENGTH); */
2220                         skb_pull(skb, RX_MAC_HEADER_LENGTH);
2221                 } else {
2222                         /* Do translation */
2223                         untranslate(local, skb, total_len);
2224                 }
2225         } else { /* sniffer mode, so just pass whole packet */
2226         };
2227
2228 /************************/
2229         /* Now pick up the rest of the fragments if any */
2230         tmp = 17;
2231         if (readb(&prcs->var.rx_packet.next_frag_rcs_index) != 0xFF) {
2232                 prcslink = prcs;
2233                 pr_debug("ray_cs rx_data in fragment loop\n");
2234                 do {
2235                         prcslink = rcs_base(local)
2236                             +
2237                             readb(&prcslink->var.rx_packet.next_frag_rcs_index);
2238                         rx_len =
2239                             ((readb(&prcslink->var.rx_packet.rx_data_length[0])
2240                               << 8)
2241                              +
2242                              readb(&prcslink->var.rx_packet.rx_data_length[1]))
2243                             & RX_BUFF_END;
2244                         pkt_addr =
2245                             ((readb(&prcslink->var.rx_packet.rx_data_ptr[0]) <<
2246                               8)
2247                              + readb(&prcslink->var.rx_packet.rx_data_ptr[1]))
2248                             & RX_BUFF_END;
2249
2250                         rx_ptr +=
2251                             copy_from_rx_buff(local, rx_ptr, pkt_addr, rx_len);
2252
2253                 } while (tmp-- &&
2254                          readb(&prcslink->var.rx_packet.next_frag_rcs_index) !=
2255                          0xFF);
2256                 release_frag_chain(local, prcs);
2257         }
2258
2259         skb->protocol = eth_type_trans(skb, dev);
2260         netif_rx(skb);
2261         local->stats.rx_packets++;
2262         local->stats.rx_bytes += total_len;
2263
2264         /* Gather signal strength per address */
2265 #ifdef WIRELESS_SPY
2266         /* For the Access Point or the node having started the ad-hoc net
2267          * note : ad-hoc work only in some specific configurations, but we
2268          * kludge in ray_get_wireless_stats... */
2269         if (!memcmp(linksrcaddr, local->bss_id, ETH_ALEN)) {
2270                 /* Update statistics */
2271                 /*local->wstats.qual.qual = none ? */
2272                 local->wstats.qual.level = siglev;
2273                 /*local->wstats.qual.noise = none ? */
2274                 local->wstats.qual.updated = 0x2;
2275         }
2276         /* Now, update the spy stuff */
2277         {
2278                 struct iw_quality wstats;
2279                 wstats.level = siglev;
2280                 /* wstats.noise = none ? */
2281                 /* wstats.qual = none ? */
2282                 wstats.updated = 0x2;
2283                 /* Update spy records */
2284                 wireless_spy_update(dev, linksrcaddr, &wstats);
2285         }
2286 #endif /* WIRELESS_SPY */
2287 } /* end rx_data */
2288
2289 /*===========================================================================*/
2290 static void untranslate(ray_dev_t *local, struct sk_buff *skb, int len)
2291 {
2292         snaphdr_t *psnap = (snaphdr_t *) (skb->data + RX_MAC_HEADER_LENGTH);
2293         struct ieee80211_hdr *pmac = (struct ieee80211_hdr *)skb->data;
2294         __be16 type = *(__be16 *) psnap->ethertype;
2295         int delta;
2296         struct ethhdr *peth;
2297         UCHAR srcaddr[ADDRLEN];
2298         UCHAR destaddr[ADDRLEN];
2299         static const UCHAR org_bridge[3] = { 0, 0, 0xf8 };
2300         static const UCHAR org_1042[3] = { 0, 0, 0 };
2301
2302         memcpy(destaddr, ieee80211_get_DA(pmac), ADDRLEN);
2303         memcpy(srcaddr, ieee80211_get_SA(pmac), ADDRLEN);
2304
2305 #if 0
2306         if {
2307                 print_hex_dump(KERN_DEBUG, "skb->data before untranslate: ",
2308                                DUMP_PREFIX_NONE, 16, 1,
2309                                skb->data, 64, true);
2310                 printk(KERN_DEBUG
2311                        "type = %08x, xsap = %02x%02x%02x, org = %02x02x02x\n",
2312                        ntohs(type), psnap->dsap, psnap->ssap, psnap->ctrl,
2313                        psnap->org[0], psnap->org[1], psnap->org[2]);
2314                 printk(KERN_DEBUG "untranslate skb->data = %p\n", skb->data);
2315         }
2316 #endif
2317
2318         if (psnap->dsap != 0xaa || psnap->ssap != 0xaa || psnap->ctrl != 3) {
2319                 /* not a snap type so leave it alone */
2320                 pr_debug("ray_cs untranslate NOT SNAP %02x %02x %02x\n",
2321                       psnap->dsap, psnap->ssap, psnap->ctrl);
2322
2323                 delta = RX_MAC_HEADER_LENGTH - ETH_HLEN;
2324                 peth = (struct ethhdr *)(skb->data + delta);
2325                 peth->h_proto = htons(len - RX_MAC_HEADER_LENGTH);
2326         } else { /* Its a SNAP */
2327                 if (memcmp(psnap->org, org_bridge, 3) == 0) {
2328                 /* EtherII and nuke the LLC */
2329                         pr_debug("ray_cs untranslate Bridge encap\n");
2330                         delta = RX_MAC_HEADER_LENGTH
2331                             + sizeof(struct snaphdr_t) - ETH_HLEN;
2332                         peth = (struct ethhdr *)(skb->data + delta);
2333                         peth->h_proto = type;
2334                 } else if (memcmp(psnap->org, org_1042, 3) == 0) {
2335                         switch (ntohs(type)) {
2336                         case ETH_P_IPX:
2337                         case ETH_P_AARP:
2338                                 pr_debug("ray_cs untranslate RFC IPX/AARP\n");
2339                                 delta = RX_MAC_HEADER_LENGTH - ETH_HLEN;
2340                                 peth = (struct ethhdr *)(skb->data + delta);
2341                                 peth->h_proto =
2342                                     htons(len - RX_MAC_HEADER_LENGTH);
2343                                 break;
2344                         default:
2345                                 pr_debug("ray_cs untranslate RFC default\n");
2346                                 delta = RX_MAC_HEADER_LENGTH +
2347                                     sizeof(struct snaphdr_t) - ETH_HLEN;
2348                                 peth = (struct ethhdr *)(skb->data + delta);
2349                                 peth->h_proto = type;
2350                                 break;
2351                         }
2352                 } else {
2353                         printk("ray_cs untranslate very confused by packet\n");
2354                         delta = RX_MAC_HEADER_LENGTH - ETH_HLEN;
2355                         peth = (struct ethhdr *)(skb->data + delta);
2356                         peth->h_proto = type;
2357                 }
2358         }
2359 /* TBD reserve  skb_reserve(skb, delta); */
2360         skb_pull(skb, delta);
2361         pr_debug("untranslate after skb_pull(%d), skb->data = %p\n", delta,
2362               skb->data);
2363         memcpy(peth->h_dest, destaddr, ADDRLEN);
2364         memcpy(peth->h_source, srcaddr, ADDRLEN);
2365 #if 0
2366         {
2367                 int i;
2368                 printk(KERN_DEBUG "skb->data after untranslate:");
2369                 for (i = 0; i < 64; i++)
2370                         printk("%02x ", skb->data[i]);
2371                 printk("\n");
2372         }
2373 #endif
2374 } /* end untranslate */
2375
2376 /*===========================================================================*/
2377 /* Copy data from circular receive buffer to PC memory.
2378  * dest     = destination address in PC memory
2379  * pkt_addr = source address in receive buffer
2380  * len      = length of packet to copy
2381  */
2382 static int copy_from_rx_buff(ray_dev_t *local, UCHAR *dest, int pkt_addr,
2383                              int length)
2384 {
2385         int wrap_bytes = (pkt_addr + length) - (RX_BUFF_END + 1);
2386         if (wrap_bytes <= 0) {
2387                 memcpy_fromio(dest, local->rmem + pkt_addr, length);
2388         } else { /* Packet wrapped in circular buffer */
2389
2390                 memcpy_fromio(dest, local->rmem + pkt_addr,
2391                               length - wrap_bytes);
2392                 memcpy_fromio(dest + length - wrap_bytes, local->rmem,
2393                               wrap_bytes);
2394         }
2395         return length;
2396 }
2397
2398 /*===========================================================================*/
2399 static void release_frag_chain(ray_dev_t *local, struct rcs __iomem *prcs)
2400 {
2401         struct rcs __iomem *prcslink = prcs;
2402         int tmp = 17;
2403         unsigned rcsindex = readb(&prcs->var.rx_packet.next_frag_rcs_index);
2404
2405         while (tmp--) {
2406                 writeb(CCS_BUFFER_FREE, &prcslink->buffer_status);
2407                 if (rcsindex >= (NUMBER_OF_CCS + NUMBER_OF_RCS)) {
2408                         pr_debug("ray_cs interrupt bad rcsindex = 0x%x\n",
2409                               rcsindex);
2410                         break;
2411                 }
2412                 prcslink = rcs_base(local) + rcsindex;
2413                 rcsindex = readb(&prcslink->var.rx_packet.next_frag_rcs_index);
2414         }
2415         writeb(CCS_BUFFER_FREE, &prcslink->buffer_status);
2416 }
2417
2418 /*===========================================================================*/
2419 static void authenticate(ray_dev_t *local)
2420 {
2421         struct pcmcia_device *link = local->finder;
2422         dev_dbg(&link->dev, "ray_cs Starting authentication.\n");
2423         if (!(pcmcia_dev_present(link))) {
2424                 dev_dbg(&link->dev, "ray_cs authenticate - device not present\n");
2425                 return;
2426         }
2427
2428         del_timer(&local->timer);
2429         if (build_auth_frame(local, local->bss_id, OPEN_AUTH_REQUEST)) {
2430                 local->timer.function = join_net;
2431         } else {
2432                 local->timer.function = authenticate_timeout;
2433         }
2434         local->timer.expires = jiffies + HZ * 2;
2435         local->timer.data = (long)local;
2436         add_timer(&local->timer);
2437         local->authentication_state = AWAITING_RESPONSE;
2438 } /* end authenticate */
2439
2440 /*===========================================================================*/
2441 static void rx_authenticate(ray_dev_t *local, struct rcs __iomem *prcs,
2442                             unsigned int pkt_addr, int rx_len)
2443 {
2444         UCHAR buff[256];
2445         struct ray_rx_msg *msg = (struct ray_rx_msg *) buff;
2446
2447         del_timer(&local->timer);
2448
2449         copy_from_rx_buff(local, buff, pkt_addr, rx_len & 0xff);
2450         /* if we are trying to get authenticated */
2451         if (local->sparm.b4.a_network_type == ADHOC) {
2452                 pr_debug("ray_cs rx_auth var= %02x %02x %02x %02x %02x %02x\n",
2453                       msg->var[0], msg->var[1], msg->var[2], msg->var[3],
2454                       msg->var[4], msg->var[5]);
2455                 if (msg->var[2] == 1) {
2456                         pr_debug("ray_cs Sending authentication response.\n");
2457                         if (!build_auth_frame
2458                             (local, msg->mac.addr_2, OPEN_AUTH_RESPONSE)) {
2459                                 local->authentication_state = NEED_TO_AUTH;
2460                                 memcpy(local->auth_id, msg->mac.addr_2,
2461                                        ADDRLEN);
2462                         }
2463                 }
2464         } else { /* Infrastructure network */
2465
2466                 if (local->authentication_state == AWAITING_RESPONSE) {
2467                         /* Verify authentication sequence #2 and success */
2468                         if (msg->var[2] == 2) {
2469                                 if ((msg->var[3] | msg->var[4]) == 0) {
2470                                         pr_debug("Authentication successful\n");
2471                                         local->card_status = CARD_AUTH_COMPLETE;
2472                                         associate(local);
2473                                         local->authentication_state =
2474                                             AUTHENTICATED;
2475                                 } else {
2476                                         pr_debug("Authentication refused\n");
2477                                         local->card_status = CARD_AUTH_REFUSED;
2478                                         join_net((u_long) local);
2479                                         local->authentication_state =
2480                                             UNAUTHENTICATED;
2481                                 }
2482                         }
2483                 }
2484         }
2485
2486 } /* end rx_authenticate */
2487
2488 /*===========================================================================*/
2489 static void associate(ray_dev_t *local)
2490 {
2491         struct ccs __iomem *pccs;
2492         struct pcmcia_device *link = local->finder;
2493         struct net_device *dev = link->priv;
2494         int ccsindex;
2495         if (!(pcmcia_dev_present(link))) {
2496                 dev_dbg(&link->dev, "ray_cs associate - device not present\n");
2497                 return;
2498         }
2499         /* If no tx buffers available, return */
2500         if ((ccsindex = get_free_ccs(local)) < 0) {
2501 /* TBD should never be here but... what if we are? */
2502                 dev_dbg(&link->dev, "ray_cs associate - No free ccs\n");
2503                 return;
2504         }
2505         dev_dbg(&link->dev, "ray_cs Starting association with access point\n");
2506         pccs = ccs_base(local) + ccsindex;
2507         /* fill in the CCS */
2508         writeb(CCS_START_ASSOCIATION, &pccs->cmd);
2509         /* Interrupt the firmware to process the command */
2510         if (interrupt_ecf(local, ccsindex)) {
2511                 dev_dbg(&link->dev, "ray_cs associate failed - ECF not ready for intr\n");
2512                 writeb(CCS_BUFFER_FREE, &(pccs++)->buffer_status);
2513
2514                 del_timer(&local->timer);
2515                 local->timer.expires = jiffies + HZ * 2;
2516                 local->timer.data = (long)local;
2517                 local->timer.function = join_net;
2518                 add_timer(&local->timer);
2519                 local->card_status = CARD_ASSOC_FAILED;
2520                 return;
2521         }
2522         if (!sniffer)
2523                 netif_start_queue(dev);
2524
2525 } /* end associate */
2526
2527 /*===========================================================================*/
2528 static void rx_deauthenticate(ray_dev_t *local, struct rcs __iomem *prcs,
2529                               unsigned int pkt_addr, int rx_len)
2530 {
2531 /*  UCHAR buff[256];
2532     struct ray_rx_msg *msg = (struct ray_rx_msg *) buff;
2533 */
2534         pr_debug("Deauthentication frame received\n");
2535         local->authentication_state = UNAUTHENTICATED;
2536         /* Need to reauthenticate or rejoin depending on reason code */
2537 /*  copy_from_rx_buff(local, buff, pkt_addr, rx_len & 0xff);
2538  */
2539 }
2540
2541 /*===========================================================================*/
2542 static void clear_interrupt(ray_dev_t *local)
2543 {
2544         writeb(0, local->amem + CIS_OFFSET + HCS_INTR_OFFSET);
2545 }
2546
2547 /*===========================================================================*/
2548 #ifdef CONFIG_PROC_FS
2549 #define MAXDATA (PAGE_SIZE - 80)
2550
2551 static const char *card_status[] = {
2552         "Card inserted - uninitialized",        /* 0 */
2553         "Card not downloaded",                  /* 1 */
2554         "Waiting for download parameters",      /* 2 */
2555         "Card doing acquisition",               /* 3 */
2556         "Acquisition complete",                 /* 4 */
2557         "Authentication complete",              /* 5 */
2558         "Association complete",                 /* 6 */
2559         "???", "???", "???", "???",             /* 7 8 9 10 undefined */
2560         "Card init error",                      /* 11 */
2561         "Download parameters error",            /* 12 */
2562         "???",                                  /* 13 */
2563         "Acquisition failed",                   /* 14 */
2564         "Authentication refused",               /* 15 */
2565         "Association failed"                    /* 16 */
2566 };
2567
2568 static const char *nettype[] = { "Adhoc", "Infra " };
2569 static const char *framing[] = { "Encapsulation", "Translation" }
2570
2571 ;
2572 /*===========================================================================*/
2573 static int ray_cs_proc_show(struct seq_file *m, void *v)
2574 {
2575 /* Print current values which are not available via other means
2576  * eg ifconfig
2577  */
2578         int i;
2579         struct pcmcia_device *link;
2580         struct net_device *dev;
2581         ray_dev_t *local;
2582         UCHAR *p;
2583         struct freq_hop_element *pfh;
2584         UCHAR c[33];
2585
2586         link = this_device;
2587         if (!link)
2588                 return 0;
2589         dev = (struct net_device *)link->priv;
2590         if (!dev)
2591                 return 0;
2592         local = netdev_priv(dev);
2593         if (!local)
2594                 return 0;
2595
2596         seq_puts(m, "Raylink Wireless LAN driver status\n");
2597         seq_printf(m, "%s\n", rcsid);
2598         /* build 4 does not report version, and field is 0x55 after memtest */
2599         seq_puts(m, "Firmware version     = ");
2600         if (local->fw_ver == 0x55)
2601                 seq_puts(m, "4 - Use dump_cis for more details\n");
2602         else
2603                 seq_printf(m, "%2d.%02d.%02d\n",
2604                            local->fw_ver, local->fw_bld, local->fw_var);
2605
2606         for (i = 0; i < 32; i++)
2607                 c[i] = local->sparm.b5.a_current_ess_id[i];
2608         c[32] = 0;
2609         seq_printf(m, "%s network ESSID = \"%s\"\n",
2610                    nettype[local->sparm.b5.a_network_type], c);
2611
2612         p = local->bss_id;
2613         seq_printf(m, "BSSID                = %pM\n", p);
2614
2615         seq_printf(m, "Country code         = %d\n",
2616                    local->sparm.b5.a_curr_country_code);
2617
2618         i = local->card_status;
2619         if (i < 0)
2620                 i = 10;
2621         if (i > 16)
2622                 i = 10;
2623         seq_printf(m, "Card status          = %s\n", card_status[i]);
2624
2625         seq_printf(m, "Framing mode         = %s\n", framing[translate]);
2626
2627         seq_printf(m, "Last pkt signal lvl  = %d\n", local->last_rsl);
2628
2629         if (local->beacon_rxed) {
2630                 /* Pull some fields out of last beacon received */
2631                 seq_printf(m, "Beacon Interval      = %d Kus\n",
2632                            local->last_bcn.beacon_intvl[0]
2633                            + 256 * local->last_bcn.beacon_intvl[1]);
2634
2635                 p = local->last_bcn.elements;
2636                 if (p[0] == C_ESSID_ELEMENT_ID)
2637                         p += p[1] + 2;
2638                 else {
2639                         seq_printf(m,
2640                                    "Parse beacon failed at essid element id = %d\n",
2641                                    p[0]);
2642                         return 0;
2643                 }
2644
2645                 if (p[0] == C_SUPPORTED_RATES_ELEMENT_ID) {
2646                         seq_puts(m, "Supported rate codes = ");
2647                         for (i = 2; i < p[1] + 2; i++)
2648                                 seq_printf(m, "0x%02x ", p[i]);
2649                         seq_putc(m, '\n');
2650                         p += p[1] + 2;
2651                 } else {
2652                         seq_puts(m, "Parse beacon failed at rates element\n");
2653                         return 0;
2654                 }
2655
2656                 if (p[0] == C_FH_PARAM_SET_ELEMENT_ID) {
2657                         pfh = (struct freq_hop_element *)p;
2658                         seq_printf(m, "Hop dwell            = %d Kus\n",
2659                                    pfh->dwell_time[0] +
2660                                    256 * pfh->dwell_time[1]);
2661                         seq_printf(m, "Hop set              = %d\n",
2662                                    pfh->hop_set);
2663                         seq_printf(m, "Hop pattern          = %d\n",
2664                                    pfh->hop_pattern);
2665                         seq_printf(m, "Hop index            = %d\n",
2666                                    pfh->hop_index);
2667                         p += p[1] + 2;
2668                 } else {
2669                         seq_puts(m,
2670                                  "Parse beacon failed at FH param element\n");
2671                         return 0;
2672                 }
2673         } else {
2674                 seq_puts(m, "No beacons received\n");
2675         }
2676         return 0;
2677 }
2678
2679 static int ray_cs_proc_open(struct inode *inode, struct file *file)
2680 {
2681         return single_open(file, ray_cs_proc_show, NULL);
2682 }
2683
2684 static const struct file_operations ray_cs_proc_fops = {
2685         .owner = THIS_MODULE,
2686         .open = ray_cs_proc_open,
2687         .read = seq_read,
2688         .llseek = seq_lseek,
2689         .release = single_release,
2690 };
2691 #endif
2692 /*===========================================================================*/
2693 static int build_auth_frame(ray_dev_t *local, UCHAR *dest, int auth_type)
2694 {
2695         int addr;
2696         struct ccs __iomem *pccs;
2697         struct tx_msg __iomem *ptx;
2698         int ccsindex;
2699
2700         /* If no tx buffers available, return */
2701         if ((ccsindex = get_free_tx_ccs(local)) < 0) {
2702                 pr_debug("ray_cs send authenticate - No free tx ccs\n");
2703                 return -1;
2704         }
2705
2706         pccs = ccs_base(local) + ccsindex;
2707
2708         /* Address in card space */
2709         addr = TX_BUF_BASE + (ccsindex << 11);
2710         /* fill in the CCS */
2711         writeb(CCS_TX_REQUEST, &pccs->cmd);
2712         writeb(addr >> 8, pccs->var.tx_request.tx_data_ptr);
2713         writeb(0x20, pccs->var.tx_request.tx_data_ptr + 1);
2714         writeb(TX_AUTHENTICATE_LENGTH_MSB, pccs->var.tx_request.tx_data_length);
2715         writeb(TX_AUTHENTICATE_LENGTH_LSB,
2716                pccs->var.tx_request.tx_data_length + 1);
2717         writeb(0, &pccs->var.tx_request.pow_sav_mode);
2718
2719         ptx = local->sram + addr;
2720         /* fill in the mac header */
2721         writeb(PROTOCOL_VER | AUTHENTIC_TYPE, &ptx->mac.frame_ctl_1);
2722         writeb(0, &ptx->mac.frame_ctl_2);
2723
2724         memcpy_toio(ptx->mac.addr_1, dest, ADDRLEN);
2725         memcpy_toio(ptx->mac.addr_2, local->sparm.b4.a_mac_addr, ADDRLEN);
2726         memcpy_toio(ptx->mac.addr_3, local->bss_id, ADDRLEN);
2727
2728         /* Fill in msg body with protocol 00 00, sequence 01 00 ,status 00 00 */
2729         memset_io(ptx->var, 0, 6);
2730         writeb(auth_type & 0xff, ptx->var + 2);
2731
2732         /* Interrupt the firmware to process the command */
2733         if (interrupt_ecf(local, ccsindex)) {
2734                 pr_debug(
2735                       "ray_cs send authentication request failed - ECF not ready for intr\n");
2736                 writeb(CCS_BUFFER_FREE, &(pccs++)->buffer_status);
2737                 return -1;
2738         }
2739         return 0;
2740 } /* End build_auth_frame */
2741
2742 /*===========================================================================*/
2743 #ifdef CONFIG_PROC_FS
2744 static ssize_t ray_cs_essid_proc_write(struct file *file,
2745                 const char __user *buffer, size_t count, loff_t *pos)
2746 {
2747         static char proc_essid[33];
2748         unsigned int len = count;
2749
2750         if (len > 32)
2751                 len = 32;
2752         memset(proc_essid, 0, 33);
2753         if (copy_from_user(proc_essid, buffer, len))
2754                 return -EFAULT;
2755         essid = proc_essid;
2756         return count;
2757 }
2758
2759 static const struct file_operations ray_cs_essid_proc_fops = {
2760         .owner          = THIS_MODULE,
2761         .write          = ray_cs_essid_proc_write,
2762         .llseek         = noop_llseek,
2763 };
2764
2765 static ssize_t int_proc_write(struct file *file, const char __user *buffer,
2766                               size_t count, loff_t *pos)
2767 {
2768         static char proc_number[10];
2769         char *p;
2770         int nr, len;
2771
2772         if (!count)
2773                 return 0;
2774
2775         if (count > 9)
2776                 return -EINVAL;
2777         if (copy_from_user(proc_number, buffer, count))
2778                 return -EFAULT;
2779         p = proc_number;
2780         nr = 0;
2781         len = count;
2782         do {
2783                 unsigned int c = *p - '0';
2784                 if (c > 9)
2785                         return -EINVAL;
2786                 nr = nr * 10 + c;
2787                 p++;
2788         } while (--len);
2789         *(int *)PDE_DATA(file_inode(file)) = nr;
2790         return count;
2791 }
2792
2793 static const struct file_operations int_proc_fops = {
2794         .owner          = THIS_MODULE,
2795         .write          = int_proc_write,
2796         .llseek         = noop_llseek,
2797 };
2798 #endif
2799
2800 static const struct pcmcia_device_id ray_ids[] = {
2801         PCMCIA_DEVICE_MANF_CARD(0x01a6, 0x0000),
2802         PCMCIA_DEVICE_NULL,
2803 };
2804
2805 MODULE_DEVICE_TABLE(pcmcia, ray_ids);
2806
2807 static struct pcmcia_driver ray_driver = {
2808         .owner = THIS_MODULE,
2809         .name = "ray_cs",
2810         .probe = ray_probe,
2811         .remove = ray_detach,
2812         .id_table = ray_ids,
2813         .suspend = ray_suspend,
2814         .resume = ray_resume,
2815 };
2816
2817 static int __init init_ray_cs(void)
2818 {
2819         int rc;
2820
2821         pr_debug("%s\n", rcsid);
2822         rc = pcmcia_register_driver(&ray_driver);
2823         pr_debug("raylink init_module register_pcmcia_driver returns 0x%x\n",
2824               rc);
2825
2826 #ifdef CONFIG_PROC_FS
2827         proc_mkdir("driver/ray_cs", NULL);
2828
2829         proc_create("driver/ray_cs/ray_cs", 0, NULL, &ray_cs_proc_fops);
2830         proc_create("driver/ray_cs/essid", S_IWUSR, NULL, &ray_cs_essid_proc_fops);
2831         proc_create_data("driver/ray_cs/net_type", S_IWUSR, NULL, &int_proc_fops, &net_type);
2832         proc_create_data("driver/ray_cs/translate", S_IWUSR, NULL, &int_proc_fops, &translate);
2833 #endif
2834         if (translate != 0)
2835                 translate = 1;
2836         return 0;
2837 } /* init_ray_cs */
2838
2839 /*===========================================================================*/
2840
2841 static void __exit exit_ray_cs(void)
2842 {
2843         pr_debug("ray_cs: cleanup_module\n");
2844
2845 #ifdef CONFIG_PROC_FS
2846         remove_proc_entry("driver/ray_cs/ray_cs", NULL);
2847         remove_proc_entry("driver/ray_cs/essid", NULL);
2848         remove_proc_entry("driver/ray_cs/net_type", NULL);
2849         remove_proc_entry("driver/ray_cs/translate", NULL);
2850         remove_proc_entry("driver/ray_cs", NULL);
2851 #endif
2852
2853         pcmcia_unregister_driver(&ray_driver);
2854 } /* exit_ray_cs */
2855
2856 module_init(init_ray_cs);
2857 module_exit(exit_ray_cs);
2858
2859 /*===========================================================================*/