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