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