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