1// SPDX-License-Identifier: GPL-2.0-only
2/*=============================================================================
3 *
4 * A  PCMCIA client driver for the Raylink wireless LAN card.
5 * The starting point for this module was the skeleton.c in the
6 * PCMCIA 2.9.12 package written by David Hinds, dahinds@users.sourceforge.net
7 *
8 * Copyright (c) 1998  Corey Thomas (corey@world.std.com)
9 *
10 * Changes:
11 * Arnaldo Carvalho de Melo <acme@conectiva.com.br> - 08/08/2000
12 * - reorganize kmallocs in ray_attach, checking all for failure
13 *   and releasing the previous allocations if one fails
14 *
15 * Daniele Bellucci <bellucda@tiscali.it> - 07/10/2003
16 * - Audit copy_to_user in ioctl(SIOCGIWESSID)
17 *
18=============================================================================*/
19
20#include <linux/module.h>
21#include <linux/kernel.h>
22#include <linux/proc_fs.h>
23#include <linux/ptrace.h>
24#include <linux/seq_file.h>
25#include <linux/string.h>
26#include <linux/timer.h>
27#include <linux/init.h>
28#include <linux/netdevice.h>
29#include <linux/etherdevice.h>
30#include <linux/if_arp.h>
31#include <linux/ioport.h>
32#include <linux/skbuff.h>
33#include <linux/ieee80211.h>
34
35#include <pcmcia/cistpl.h>
36#include <pcmcia/cisreg.h>
37#include <pcmcia/ds.h>
38
39#include <linux/wireless.h>
40#include <net/iw_handler.h>
41
42#include <asm/io.h>
43#include <asm/byteorder.h>
44#include <linux/uaccess.h>
45
46/* Warning : these stuff will slow down the driver... */
47#define WIRELESS_SPY		/* Enable spying addresses */
48/* Definitions we need for spy */
49typedef struct iw_statistics iw_stats;
50typedef u_char mac_addr[ETH_ALEN];	/* Hardware address */
51
52#include "rayctl.h"
53#include "ray_cs.h"
54
55
56/** Prototypes based on PCMCIA skeleton driver *******************************/
57static int ray_config(struct pcmcia_device *link);
58static void ray_release(struct pcmcia_device *link);
59static void ray_detach(struct pcmcia_device *p_dev);
60
61/***** Prototypes indicated by device structure ******************************/
62static int ray_dev_close(struct net_device *dev);
63static int ray_dev_config(struct net_device *dev, struct ifmap *map);
64static struct net_device_stats *ray_get_stats(struct net_device *dev);
65static int ray_dev_init(struct net_device *dev);
66
67static int ray_open(struct net_device *dev);
68static netdev_tx_t ray_dev_start_xmit(struct sk_buff *skb,
69					    struct net_device *dev);
70static void set_multicast_list(struct net_device *dev);
71static void ray_update_multi_list(struct net_device *dev, int all);
72static int translate_frame(ray_dev_t *local, struct tx_msg __iomem *ptx,
73			   unsigned char *data, int len);
74static void ray_build_header(ray_dev_t *local, struct tx_msg __iomem *ptx,
75			     UCHAR msg_type, unsigned char *data);
76static void untranslate(ray_dev_t *local, struct sk_buff *skb, int len);
77static iw_stats *ray_get_wireless_stats(struct net_device *dev);
78static const struct iw_handler_def ray_handler_def;
79
80/***** Prototypes for raylink functions **************************************/
81static void authenticate(ray_dev_t *local);
82static int build_auth_frame(ray_dev_t *local, UCHAR *dest, int auth_type);
83static void authenticate_timeout(struct timer_list *t);
84static int get_free_ccs(ray_dev_t *local);
85static int get_free_tx_ccs(ray_dev_t *local);
86static void init_startup_params(ray_dev_t *local);
87static int parse_addr(char *in_str, UCHAR *out);
88static int ray_hw_xmit(unsigned char *data, int len, struct net_device *dev, UCHAR type);
89static int ray_init(struct net_device *dev);
90static int interrupt_ecf(ray_dev_t *local, int ccs);
91static void ray_reset(struct net_device *dev);
92static void ray_update_parm(struct net_device *dev, UCHAR objid, UCHAR *value, int len);
93static void verify_dl_startup(struct timer_list *t);
94
95/* Prototypes for interrpt time functions **********************************/
96static irqreturn_t ray_interrupt(int reg, void *dev_id);
97static void clear_interrupt(ray_dev_t *local);
98static void rx_deauthenticate(ray_dev_t *local, struct rcs __iomem *prcs,
99			      unsigned int pkt_addr, int rx_len);
100static int copy_from_rx_buff(ray_dev_t *local, UCHAR *dest, int pkt_addr, int len);
101static void ray_rx(struct net_device *dev, ray_dev_t *local, struct rcs __iomem *prcs);
102static void release_frag_chain(ray_dev_t *local, struct rcs __iomem *prcs);
103static void rx_authenticate(ray_dev_t *local, struct rcs __iomem *prcs,
104			    unsigned int pkt_addr, int rx_len);
105static void rx_data(struct net_device *dev, struct rcs __iomem *prcs,
106		    unsigned int pkt_addr, int rx_len);
107static void associate(ray_dev_t *local);
108
109/* Card command functions */
110static int dl_startup_params(struct net_device *dev);
111static void join_net(struct timer_list *t);
112static void start_net(struct timer_list *t);
113
114/*===========================================================================*/
115/* Parameters that can be set with 'insmod' */
116
117/* ADHOC=0, Infrastructure=1 */
118static int net_type = ADHOC;
119
120/* Hop dwell time in Kus (1024 us units defined by 802.11) */
121static int hop_dwell = 128;
122
123/* Beacon period in Kus */
124static int beacon_period = 256;
125
126/* power save mode (0 = off, 1 = save power) */
127static int psm;
128
129/* String for network's Extended Service Set ID. 32 Characters max */
130static char *essid;
131
132/* Default to encapsulation unless translation requested */
133static bool translate = true;
134
135static int country = USA;
136
137static int sniffer;
138
139static int bc;
140
141/* 48 bit physical card address if overriding card's real physical
142 * address is required.  Since IEEE 802.11 addresses are 48 bits
143 * like ethernet, an int can't be used, so a string is used. To
144 * allow use of addresses starting with a decimal digit, the first
145 * character must be a letter and will be ignored. This letter is
146 * followed by up to 12 hex digits which are the address.  If less
147 * than 12 digits are used, the address will be left filled with 0's.
148 * Note that bit 0 of the first byte is the broadcast bit, and evil
149 * things will happen if it is not 0 in a card address.
150 */
151static char *phy_addr = NULL;
152
153static unsigned int ray_mem_speed = 500;
154
155/* WARNING: THIS DRIVER IS NOT CAPABLE OF HANDLING MULTIPLE DEVICES! */
156static struct pcmcia_device *this_device = NULL;
157
158MODULE_AUTHOR("Corey Thomas <corey@world.std.com>");
159MODULE_DESCRIPTION("Raylink/WebGear wireless LAN driver");
160MODULE_LICENSE("GPL");
161
162module_param(net_type, int, 0);
163module_param(hop_dwell, int, 0);
164module_param(beacon_period, int, 0);
165module_param(psm, int, 0);
166module_param(essid, charp, 0);
167module_param(translate, bool, 0);
168module_param(country, int, 0);
169module_param(sniffer, int, 0);
170module_param(bc, int, 0);
171module_param(phy_addr, charp, 0);
172module_param(ray_mem_speed, int, 0);
173
174static const UCHAR b5_default_startup_parms[] = {
175	0, 0,			/* Adhoc station */
176	'L', 'I', 'N', 'U', 'X', 0, 0, 0,	/* 32 char ESSID */
177	0, 0, 0, 0, 0, 0, 0, 0,
178	0, 0, 0, 0, 0, 0, 0, 0,
179	0, 0, 0, 0, 0, 0, 0, 0,
180	1, 0,			/* Active scan, CA Mode */
181	0, 0, 0, 0, 0, 0,	/* No default MAC addr  */
182	0x7f, 0xff,		/* Frag threshold */
183	0x00, 0x80,		/* Hop time 128 Kus */
184	0x01, 0x00,		/* Beacon period 256 Kus */
185	0x01, 0x07, 0xa3,	/* DTIM, retries, ack timeout */
186	0x1d, 0x82, 0x4e,	/* SIFS, DIFS, PIFS */
187	0x7f, 0xff,		/* RTS threshold */
188	0x04, 0xe2, 0x38, 0xA4,	/* scan_dwell, max_scan_dwell */
189	0x05,			/* assoc resp timeout thresh */
190	0x08, 0x02, 0x08,	/* adhoc, infra, super cycle max */
191	0,			/* Promiscuous mode */
192	0x0c, 0x0bd,		/* Unique word */
193	0x32,			/* Slot time */
194	0xff, 0xff,		/* roam-low snr, low snr count */
195	0x05, 0xff,		/* Infra, adhoc missed bcn thresh */
196	0x01, 0x0b, 0x4f,	/* USA, hop pattern, hop pat length */
197/* b4 - b5 differences start here */
198	0x00, 0x3f,		/* CW max */
199	0x00, 0x0f,		/* CW min */
200	0x04, 0x08,		/* Noise gain, limit offset */
201	0x28, 0x28,		/* det rssi, med busy offsets */
202	7,			/* det sync thresh */
203	0, 2, 2,		/* test mode, min, max */
204	0,			/* allow broadcast SSID probe resp */
205	0, 0,			/* privacy must start, can join */
206	2, 0, 0, 0, 0, 0, 0, 0	/* basic rate set */
207};
208
209static const UCHAR b4_default_startup_parms[] = {
210	0, 0,			/* Adhoc station */
211	'L', 'I', 'N', 'U', 'X', 0, 0, 0,	/* 32 char ESSID */
212	0, 0, 0, 0, 0, 0, 0, 0,
213	0, 0, 0, 0, 0, 0, 0, 0,
214	0, 0, 0, 0, 0, 0, 0, 0,
215	1, 0,			/* Active scan, CA Mode */
216	0, 0, 0, 0, 0, 0,	/* No default MAC addr  */
217	0x7f, 0xff,		/* Frag threshold */
218	0x02, 0x00,		/* Hop time */
219	0x00, 0x01,		/* Beacon period */
220	0x01, 0x07, 0xa3,	/* DTIM, retries, ack timeout */
221	0x1d, 0x82, 0xce,	/* SIFS, DIFS, PIFS */
222	0x7f, 0xff,		/* RTS threshold */
223	0xfb, 0x1e, 0xc7, 0x5c,	/* scan_dwell, max_scan_dwell */
224	0x05,			/* assoc resp timeout thresh */
225	0x04, 0x02, 0x4,	/* adhoc, infra, super cycle max */
226	0,			/* Promiscuous mode */
227	0x0c, 0x0bd,		/* Unique word */
228	0x4e,			/* Slot time (TBD seems wrong) */
229	0xff, 0xff,		/* roam-low snr, low snr count */
230	0x05, 0xff,		/* Infra, adhoc missed bcn thresh */
231	0x01, 0x0b, 0x4e,	/* USA, hop pattern, hop pat length */
232/* b4 - b5 differences start here */
233	0x3f, 0x0f,		/* CW max, min */
234	0x04, 0x08,		/* Noise gain, limit offset */
235	0x28, 0x28,		/* det rssi, med busy offsets */
236	7,			/* det sync thresh */
237	0, 2, 2,		/* test mode, min, max */
238	0,			/* rx/tx delay */
239	0, 0, 0, 0, 0, 0,	/* current BSS id */
240	0			/* hop set */
241};
242
243/*===========================================================================*/
244static const u8 eth2_llc[] = { 0xaa, 0xaa, 3, 0, 0, 0 };
245
246static const char hop_pattern_length[] = { 1,
247	USA_HOP_MOD, EUROPE_HOP_MOD,
248	JAPAN_HOP_MOD, KOREA_HOP_MOD,
249	SPAIN_HOP_MOD, FRANCE_HOP_MOD,
250	ISRAEL_HOP_MOD, AUSTRALIA_HOP_MOD,
251	JAPAN_TEST_HOP_MOD
252};
253
254static const char rcsid[] =
255    "Raylink/WebGear wireless LAN - Corey <Thomas corey@world.std.com>";
256
257static const struct net_device_ops ray_netdev_ops = {
258	.ndo_init 		= ray_dev_init,
259	.ndo_open 		= ray_open,
260	.ndo_stop 		= ray_dev_close,
261	.ndo_start_xmit		= ray_dev_start_xmit,
262	.ndo_set_config		= ray_dev_config,
263	.ndo_get_stats		= ray_get_stats,
264	.ndo_set_rx_mode	= set_multicast_list,
265	.ndo_set_mac_address 	= eth_mac_addr,
266	.ndo_validate_addr	= eth_validate_addr,
267};
268
269static int ray_probe(struct pcmcia_device *p_dev)
270{
271	ray_dev_t *local;
272	struct net_device *dev;
273	int ret;
274
275	dev_dbg(&p_dev->dev, "ray_attach()\n");
276
277	/* Allocate space for private device-specific data */
278	dev = alloc_etherdev(sizeof(ray_dev_t));
279	if (!dev)
280		return -ENOMEM;
281
282	local = netdev_priv(dev);
283	local->finder = p_dev;
284
285	/* The io structure describes IO port mapping. None used here */
286	p_dev->resource[0]->end = 0;
287	p_dev->resource[0]->flags |= IO_DATA_PATH_WIDTH_8;
288
289	/* General socket configuration */
290	p_dev->config_flags |= CONF_ENABLE_IRQ;
291	p_dev->config_index = 1;
292
293	p_dev->priv = dev;
294
295	local->finder = p_dev;
296	local->card_status = CARD_INSERTED;
297	local->authentication_state = UNAUTHENTICATED;
298	local->num_multi = 0;
299	dev_dbg(&p_dev->dev, "ray_attach p_dev = %p,  dev = %p,  local = %p, intr = %p\n",
300	      p_dev, dev, local, &ray_interrupt);
301
302	/* Raylink entries in the device structure */
303	dev->netdev_ops = &ray_netdev_ops;
304	dev->wireless_handlers = &ray_handler_def;
305#ifdef WIRELESS_SPY
306	local->wireless_data.spy_data = &local->spy_data;
307	dev->wireless_data = &local->wireless_data;
308#endif /* WIRELESS_SPY */
309
310
311	dev_dbg(&p_dev->dev, "ray_cs ray_attach calling ether_setup.)\n");
312	netif_stop_queue(dev);
313
314	timer_setup(&local->timer, NULL, 0);
315
316	this_device = p_dev;
317	ret = ray_config(p_dev);
318	if (ret)
319		goto err_free_dev;
320
321	return 0;
322
323err_free_dev:
324	free_netdev(dev);
325	return ret;
326}
327
328static void ray_detach(struct pcmcia_device *link)
329{
330	struct net_device *dev;
331	ray_dev_t *local;
332
333	dev_dbg(&link->dev, "ray_detach\n");
334
335	this_device = NULL;
336	dev = link->priv;
337
338	ray_release(link);
339
340	local = netdev_priv(dev);
341	del_timer_sync(&local->timer);
342
343	if (link->priv) {
344		unregister_netdev(dev);
345		free_netdev(dev);
346	}
347	dev_dbg(&link->dev, "ray_cs ray_detach ending\n");
348} /* ray_detach */
349
350#define MAX_TUPLE_SIZE 128
351static int ray_config(struct pcmcia_device *link)
352{
353	int ret = 0;
354	int i;
355	struct net_device *dev = (struct net_device *)link->priv;
356	ray_dev_t *local = netdev_priv(dev);
357
358	dev_dbg(&link->dev, "ray_config\n");
359
360	/* Determine card type and firmware version */
361	printk(KERN_INFO "ray_cs Detected: %s%s%s%s\n",
362	       link->prod_id[0] ? link->prod_id[0] : " ",
363	       link->prod_id[1] ? link->prod_id[1] : " ",
364	       link->prod_id[2] ? link->prod_id[2] : " ",
365	       link->prod_id[3] ? link->prod_id[3] : " ");
366
367	/* Now allocate an interrupt line.  Note that this does not
368	   actually assign a handler to the interrupt.
369	 */
370	ret = pcmcia_request_irq(link, ray_interrupt);
371	if (ret)
372		goto failed;
373	dev->irq = link->irq;
374
375	ret = pcmcia_enable_device(link);
376	if (ret)
377		goto failed;
378
379/*** Set up 32k window for shared memory (transmit and control) ************/
380	link->resource[2]->flags |= WIN_DATA_WIDTH_8 | WIN_MEMORY_TYPE_CM | WIN_ENABLE | WIN_USE_WAIT;
381	link->resource[2]->start = 0;
382	link->resource[2]->end = 0x8000;
383	ret = pcmcia_request_window(link, link->resource[2], ray_mem_speed);
384	if (ret)
385		goto failed;
386	ret = pcmcia_map_mem_page(link, link->resource[2], 0);
387	if (ret)
388		goto failed;
389	local->sram = ioremap(link->resource[2]->start,
390			resource_size(link->resource[2]));
391	if (!local->sram)
392		goto failed;
393
394/*** Set up 16k window for shared memory (receive buffer) ***************/
395	link->resource[3]->flags |=
396	    WIN_DATA_WIDTH_8 | WIN_MEMORY_TYPE_CM | WIN_ENABLE | WIN_USE_WAIT;
397	link->resource[3]->start = 0;
398	link->resource[3]->end = 0x4000;
399	ret = pcmcia_request_window(link, link->resource[3], ray_mem_speed);
400	if (ret)
401		goto failed;
402	ret = pcmcia_map_mem_page(link, link->resource[3], 0x8000);
403	if (ret)
404		goto failed;
405	local->rmem = ioremap(link->resource[3]->start,
406			resource_size(link->resource[3]));
407	if (!local->rmem)
408		goto failed;
409
410/*** Set up window for attribute memory ***********************************/
411	link->resource[4]->flags |=
412	    WIN_DATA_WIDTH_8 | WIN_MEMORY_TYPE_AM | WIN_ENABLE | WIN_USE_WAIT;
413	link->resource[4]->start = 0;
414	link->resource[4]->end = 0x1000;
415	ret = pcmcia_request_window(link, link->resource[4], ray_mem_speed);
416	if (ret)
417		goto failed;
418	ret = pcmcia_map_mem_page(link, link->resource[4], 0);
419	if (ret)
420		goto failed;
421	local->amem = ioremap(link->resource[4]->start,
422			resource_size(link->resource[4]));
423	if (!local->amem)
424		goto failed;
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	struct ccs __iomem *pccs;
474	ray_dev_t *local = netdev_priv(dev);
475	struct pcmcia_device *link = local->finder;
476	dev_dbg(&link->dev, "ray_init(0x%p)\n", dev);
477	if (!(pcmcia_dev_present(link))) {
478		dev_dbg(&link->dev, "ray_init - device not present\n");
479		return -1;
480	}
481
482	local->net_type = net_type;
483	local->sta_type = TYPE_STA;
484
485	/* Copy the startup results to local memory */
486	memcpy_fromio(&local->startup_res, local->sram + ECF_TO_HOST_BASE,
487		      sizeof(struct startup_res_6));
488
489	/* Check Power up test status and get mac address from card */
490	if (local->startup_res.startup_word != 0x80) {
491		printk(KERN_INFO "ray_init ERROR card status = %2x\n",
492		       local->startup_res.startup_word);
493		local->card_status = CARD_INIT_ERROR;
494		return -1;
495	}
496
497	local->fw_ver = local->startup_res.firmware_version[0];
498	local->fw_bld = local->startup_res.firmware_version[1];
499	local->fw_var = local->startup_res.firmware_version[2];
500	dev_dbg(&link->dev, "ray_init firmware version %d.%d\n", local->fw_ver,
501	      local->fw_bld);
502
503	local->tib_length = 0x20;
504	if ((local->fw_ver == 5) && (local->fw_bld >= 30))
505		local->tib_length = local->startup_res.tib_length;
506	dev_dbg(&link->dev, "ray_init tib_length = 0x%02x\n", local->tib_length);
507	/* Initialize CCS's to buffer free state */
508	pccs = ccs_base(local);
509	for (i = 0; i < NUMBER_OF_CCS; i++) {
510		writeb(CCS_BUFFER_FREE, &(pccs++)->buffer_status);
511	}
512	init_startup_params(local);
513
514	/* copy mac address to startup parameters */
515	if (!parse_addr(phy_addr, local->sparm.b4.a_mac_addr)) {
516		memcpy(&local->sparm.b4.a_mac_addr,
517		       &local->startup_res.station_addr, ADDRLEN);
518	}
519
520	clear_interrupt(local);	/* Clear any interrupt from the card */
521	local->card_status = CARD_AWAITING_PARAM;
522	dev_dbg(&link->dev, "ray_init ending\n");
523	return 0;
524} /* ray_init */
525
526/*===========================================================================*/
527/* Download startup parameters to the card and command it to read them       */
528static int dl_startup_params(struct net_device *dev)
529{
530	int ccsindex;
531	ray_dev_t *local = netdev_priv(dev);
532	struct ccs __iomem *pccs;
533	struct pcmcia_device *link = local->finder;
534
535	dev_dbg(&link->dev, "dl_startup_params entered\n");
536	if (!(pcmcia_dev_present(link))) {
537		dev_dbg(&link->dev, "ray_cs dl_startup_params - device not present\n");
538		return -1;
539	}
540
541	/* Copy parameters to host to ECF area */
542	if (local->fw_ver == 0x55)
543		memcpy_toio(local->sram + HOST_TO_ECF_BASE, &local->sparm.b4,
544			    sizeof(struct b4_startup_params));
545	else
546		memcpy_toio(local->sram + HOST_TO_ECF_BASE, &local->sparm.b5,
547			    sizeof(struct b5_startup_params));
548
549	/* Fill in the CCS fields for the ECF */
550	if ((ccsindex = get_free_ccs(local)) < 0)
551		return -1;
552	local->dl_param_ccs = ccsindex;
553	pccs = ccs_base(local) + ccsindex;
554	writeb(CCS_DOWNLOAD_STARTUP_PARAMS, &pccs->cmd);
555	dev_dbg(&link->dev, "dl_startup_params start ccsindex = %d\n",
556	      local->dl_param_ccs);
557	/* Interrupt the firmware to process the command */
558	if (interrupt_ecf(local, ccsindex)) {
559		printk(KERN_INFO "ray dl_startup_params failed - "
560		       "ECF not ready for intr\n");
561		local->card_status = CARD_DL_PARAM_ERROR;
562		writeb(CCS_BUFFER_FREE, &(pccs++)->buffer_status);
563		return -2;
564	}
565	local->card_status = CARD_DL_PARAM;
566	/* Start kernel timer to wait for dl startup to complete. */
567	local->timer.expires = jiffies + HZ / 2;
568	local->timer.function = verify_dl_startup;
569	add_timer(&local->timer);
570	dev_dbg(&link->dev,
571	      "ray_cs dl_startup_params started timer for verify_dl_startup\n");
572	return 0;
573} /* dl_startup_params */
574
575/*===========================================================================*/
576static void init_startup_params(ray_dev_t *local)
577{
578	int i;
579
580	if (country > JAPAN_TEST)
581		country = USA;
582	else if (country < USA)
583		country = USA;
584	/* structure for hop time and beacon period is defined here using
585	 * New 802.11D6.1 format.  Card firmware is still using old format
586	 * until version 6.
587	 *    Before                    After
588	 *    a_hop_time ms byte        a_hop_time ms byte
589	 *    a_hop_time 2s byte        a_hop_time ls byte
590	 *    a_hop_time ls byte        a_beacon_period ms byte
591	 *    a_beacon_period           a_beacon_period ls byte
592	 *
593	 *    a_hop_time = uS           a_hop_time = KuS
594	 *    a_beacon_period = hops    a_beacon_period = KuS
595	 *//* 64ms = 010000 */
596	if (local->fw_ver == 0x55) {
597		memcpy(&local->sparm.b4, b4_default_startup_parms,
598		       sizeof(struct b4_startup_params));
599		/* Translate sane kus input values to old build 4/5 format */
600		/* i = hop time in uS truncated to 3 bytes */
601		i = (hop_dwell * 1024) & 0xffffff;
602		local->sparm.b4.a_hop_time[0] = (i >> 16) & 0xff;
603		local->sparm.b4.a_hop_time[1] = (i >> 8) & 0xff;
604		local->sparm.b4.a_beacon_period[0] = 0;
605		local->sparm.b4.a_beacon_period[1] =
606		    ((beacon_period / hop_dwell) - 1) & 0xff;
607		local->sparm.b4.a_curr_country_code = country;
608		local->sparm.b4.a_hop_pattern_length =
609		    hop_pattern_length[(int)country] - 1;
610		if (bc) {
611			local->sparm.b4.a_ack_timeout = 0x50;
612			local->sparm.b4.a_sifs = 0x3f;
613		}
614	} else { /* Version 5 uses real kus values */
615		memcpy((UCHAR *) &local->sparm.b5, b5_default_startup_parms,
616		       sizeof(struct b5_startup_params));
617
618		local->sparm.b5.a_hop_time[0] = (hop_dwell >> 8) & 0xff;
619		local->sparm.b5.a_hop_time[1] = hop_dwell & 0xff;
620		local->sparm.b5.a_beacon_period[0] =
621		    (beacon_period >> 8) & 0xff;
622		local->sparm.b5.a_beacon_period[1] = beacon_period & 0xff;
623		if (psm)
624			local->sparm.b5.a_power_mgt_state = 1;
625		local->sparm.b5.a_curr_country_code = country;
626		local->sparm.b5.a_hop_pattern_length =
627		    hop_pattern_length[(int)country];
628	}
629
630	local->sparm.b4.a_network_type = net_type & 0x01;
631	local->sparm.b4.a_acting_as_ap_status = TYPE_STA;
632
633	if (essid != NULL)
634		strncpy(local->sparm.b4.a_current_ess_id, essid, ESSID_SIZE);
635} /* init_startup_params */
636
637/*===========================================================================*/
638static void verify_dl_startup(struct timer_list *t)
639{
640	ray_dev_t *local = from_timer(local, t, timer);
641	struct ccs __iomem *pccs = ccs_base(local) + local->dl_param_ccs;
642	UCHAR status;
643	struct pcmcia_device *link = local->finder;
644
645	if (!(pcmcia_dev_present(link))) {
646		dev_dbg(&link->dev, "ray_cs verify_dl_startup - device not present\n");
647		return;
648	}
649#if 0
650	{
651		int i;
652		printk(KERN_DEBUG
653		       "verify_dl_startup parameters sent via ccs %d:\n",
654		       local->dl_param_ccs);
655		for (i = 0; i < sizeof(struct b5_startup_params); i++) {
656			printk(" %2x",
657			       (unsigned int)readb(local->sram +
658						   HOST_TO_ECF_BASE + i));
659		}
660		printk("\n");
661	}
662#endif
663
664	status = readb(&pccs->buffer_status);
665	if (status != CCS_BUFFER_FREE) {
666		printk(KERN_INFO
667		       "Download startup params failed.  Status = %d\n",
668		       status);
669		local->card_status = CARD_DL_PARAM_ERROR;
670		return;
671	}
672	if (local->sparm.b4.a_network_type == ADHOC)
673		start_net(&local->timer);
674	else
675		join_net(&local->timer);
676} /* end verify_dl_startup */
677
678/*===========================================================================*/
679/* Command card to start a network */
680static void start_net(struct timer_list *t)
681{
682	ray_dev_t *local = from_timer(local, t, timer);
683	struct ccs __iomem *pccs;
684	int ccsindex;
685	struct pcmcia_device *link = local->finder;
686	if (!(pcmcia_dev_present(link))) {
687		dev_dbg(&link->dev, "ray_cs start_net - device not present\n");
688		return;
689	}
690	/* Fill in the CCS fields for the ECF */
691	if ((ccsindex = get_free_ccs(local)) < 0)
692		return;
693	pccs = ccs_base(local) + ccsindex;
694	writeb(CCS_START_NETWORK, &pccs->cmd);
695	writeb(0, &pccs->var.start_network.update_param);
696	/* Interrupt the firmware to process the command */
697	if (interrupt_ecf(local, ccsindex)) {
698		dev_dbg(&link->dev, "ray start net failed - card not ready for intr\n");
699		writeb(CCS_BUFFER_FREE, &(pccs++)->buffer_status);
700		return;
701	}
702	local->card_status = CARD_DOING_ACQ;
703} /* end start_net */
704
705/*===========================================================================*/
706/* Command card to join a network */
707static void join_net(struct timer_list *t)
708{
709	ray_dev_t *local = from_timer(local, t, timer);
710
711	struct ccs __iomem *pccs;
712	int ccsindex;
713	struct pcmcia_device *link = local->finder;
714
715	if (!(pcmcia_dev_present(link))) {
716		dev_dbg(&link->dev, "ray_cs join_net - device not present\n");
717		return;
718	}
719	/* Fill in the CCS fields for the ECF */
720	if ((ccsindex = get_free_ccs(local)) < 0)
721		return;
722	pccs = ccs_base(local) + ccsindex;
723	writeb(CCS_JOIN_NETWORK, &pccs->cmd);
724	writeb(0, &pccs->var.join_network.update_param);
725	writeb(0, &pccs->var.join_network.net_initiated);
726	/* Interrupt the firmware to process the command */
727	if (interrupt_ecf(local, ccsindex)) {
728		dev_dbg(&link->dev, "ray join net failed - card not ready for intr\n");
729		writeb(CCS_BUFFER_FREE, &(pccs++)->buffer_status);
730		return;
731	}
732	local->card_status = CARD_DOING_ACQ;
733}
734
735
736static void ray_release(struct pcmcia_device *link)
737{
738	struct net_device *dev = link->priv;
739	ray_dev_t *local = netdev_priv(dev);
740
741	dev_dbg(&link->dev, "ray_release\n");
742
743	del_timer(&local->timer);
744
745	iounmap(local->sram);
746	iounmap(local->rmem);
747	iounmap(local->amem);
748	pcmcia_disable_device(link);
749
750	dev_dbg(&link->dev, "ray_release ending\n");
751}
752
753static int ray_suspend(struct pcmcia_device *link)
754{
755	struct net_device *dev = link->priv;
756
757	if (link->open)
758		netif_device_detach(dev);
759
760	return 0;
761}
762
763static int ray_resume(struct pcmcia_device *link)
764{
765	struct net_device *dev = link->priv;
766
767	if (link->open) {
768		ray_reset(dev);
769		netif_device_attach(dev);
770	}
771
772	return 0;
773}
774
775/*===========================================================================*/
776static int ray_dev_init(struct net_device *dev)
777{
778#ifdef RAY_IMMEDIATE_INIT
779	int i;
780#endif /* RAY_IMMEDIATE_INIT */
781	ray_dev_t *local = netdev_priv(dev);
782	struct pcmcia_device *link = local->finder;
783
784	dev_dbg(&link->dev, "ray_dev_init(dev=%p)\n", dev);
785	if (!(pcmcia_dev_present(link))) {
786		dev_dbg(&link->dev, "ray_dev_init - device not present\n");
787		return -1;
788	}
789#ifdef RAY_IMMEDIATE_INIT
790	/* Download startup parameters */
791	if ((i = dl_startup_params(dev)) < 0) {
792		printk(KERN_INFO "ray_dev_init dl_startup_params failed - "
793		       "returns 0x%x\n", i);
794		return -1;
795	}
796#else /* RAY_IMMEDIATE_INIT */
797	/* Postpone the card init so that we can still configure the card,
798	 * for example using the Wireless Extensions. The init will happen
799	 * in ray_open() - Jean II */
800	dev_dbg(&link->dev,
801	      "ray_dev_init: postponing card init to ray_open() ; Status = %d\n",
802	      local->card_status);
803#endif /* RAY_IMMEDIATE_INIT */
804
805	/* copy mac and broadcast addresses to linux device */
806	memcpy(dev->dev_addr, &local->sparm.b4.a_mac_addr, ADDRLEN);
807	eth_broadcast_addr(dev->broadcast);
808
809	dev_dbg(&link->dev, "ray_dev_init ending\n");
810	return 0;
811}
812
813/*===========================================================================*/
814static int ray_dev_config(struct net_device *dev, struct ifmap *map)
815{
816	ray_dev_t *local = netdev_priv(dev);
817	struct pcmcia_device *link = local->finder;
818	/* Dummy routine to satisfy device structure */
819	dev_dbg(&link->dev, "ray_dev_config(dev=%p,ifmap=%p)\n", dev, map);
820	if (!(pcmcia_dev_present(link))) {
821		dev_dbg(&link->dev, "ray_dev_config - device not present\n");
822		return -1;
823	}
824
825	return 0;
826}
827
828/*===========================================================================*/
829static netdev_tx_t ray_dev_start_xmit(struct sk_buff *skb,
830					    struct net_device *dev)
831{
832	ray_dev_t *local = netdev_priv(dev);
833	struct pcmcia_device *link = local->finder;
834	short length = skb->len;
835
836	if (!pcmcia_dev_present(link)) {
837		dev_dbg(&link->dev, "ray_dev_start_xmit - device not present\n");
838		dev_kfree_skb(skb);
839		return NETDEV_TX_OK;
840	}
841
842	dev_dbg(&link->dev, "ray_dev_start_xmit(skb=%p, dev=%p)\n", skb, dev);
843	if (local->authentication_state == NEED_TO_AUTH) {
844		dev_dbg(&link->dev, "ray_cs Sending authentication request.\n");
845		if (!build_auth_frame(local, local->auth_id, OPEN_AUTH_REQUEST)) {
846			local->authentication_state = AUTHENTICATED;
847			netif_stop_queue(dev);
848			return NETDEV_TX_BUSY;
849		}
850	}
851
852	if (length < ETH_ZLEN) {
853		if (skb_padto(skb, ETH_ZLEN))
854			return NETDEV_TX_OK;
855		length = ETH_ZLEN;
856	}
857	switch (ray_hw_xmit(skb->data, length, dev, DATA_TYPE)) {
858	case XMIT_NO_CCS:
859	case XMIT_NEED_AUTH:
860		netif_stop_queue(dev);
861		return NETDEV_TX_BUSY;
862	case XMIT_NO_INTR:
863	case XMIT_MSG_BAD:
864	case XMIT_OK:
865	default:
866		dev_kfree_skb(skb);
867	}
868
869	return NETDEV_TX_OK;
870} /* ray_dev_start_xmit */
871
872/*===========================================================================*/
873static int ray_hw_xmit(unsigned char *data, int len, struct net_device *dev,
874		       UCHAR msg_type)
875{
876	ray_dev_t *local = netdev_priv(dev);
877	struct ccs __iomem *pccs;
878	int ccsindex;
879	int offset;
880	struct tx_msg __iomem *ptx;	/* Address of xmit buffer in PC space */
881	short int addr;		/* Address of xmit buffer in card space */
882
883	pr_debug("ray_hw_xmit(data=%p, len=%d, dev=%p)\n", data, len, dev);
884	if (len + TX_HEADER_LENGTH > TX_BUF_SIZE) {
885		printk(KERN_INFO "ray_hw_xmit packet too large: %d bytes\n",
886		       len);
887		return XMIT_MSG_BAD;
888	}
889	switch (ccsindex = get_free_tx_ccs(local)) {
890	case ECCSBUSY:
891		pr_debug("ray_hw_xmit tx_ccs table busy\n");
892		/* fall through */
893	case ECCSFULL:
894		pr_debug("ray_hw_xmit No free tx ccs\n");
895		/* fall through */
896	case ECARDGONE:
897		netif_stop_queue(dev);
898		return XMIT_NO_CCS;
899	default:
900		break;
901	}
902	addr = TX_BUF_BASE + (ccsindex << 11);
903
904	if (msg_type == DATA_TYPE) {
905		local->stats.tx_bytes += len;
906		local->stats.tx_packets++;
907	}
908
909	ptx = local->sram + addr;
910
911	ray_build_header(local, ptx, msg_type, data);
912	if (translate) {
913		offset = translate_frame(local, ptx, data, len);
914	} else { /* Encapsulate frame */
915		/* TBD TIB length will move address of ptx->var */
916		memcpy_toio(&ptx->var, data, len);
917		offset = 0;
918	}
919
920	/* fill in the CCS */
921	pccs = ccs_base(local) + ccsindex;
922	len += TX_HEADER_LENGTH + offset;
923	writeb(CCS_TX_REQUEST, &pccs->cmd);
924	writeb(addr >> 8, &pccs->var.tx_request.tx_data_ptr[0]);
925	writeb(local->tib_length, &pccs->var.tx_request.tx_data_ptr[1]);
926	writeb(len >> 8, &pccs->var.tx_request.tx_data_length[0]);
927	writeb(len & 0xff, &pccs->var.tx_request.tx_data_length[1]);
928/* TBD still need psm_cam? */
929	writeb(PSM_CAM, &pccs->var.tx_request.pow_sav_mode);
930	writeb(local->net_default_tx_rate, &pccs->var.tx_request.tx_rate);
931	writeb(0, &pccs->var.tx_request.antenna);
932	pr_debug("ray_hw_xmit default_tx_rate = 0x%x\n",
933	      local->net_default_tx_rate);
934
935	/* Interrupt the firmware to process the command */
936	if (interrupt_ecf(local, ccsindex)) {
937		pr_debug("ray_hw_xmit failed - ECF not ready for intr\n");
938/* TBD very inefficient to copy packet to buffer, and then not
939   send it, but the alternative is to queue the messages and that
940   won't be done for a while.  Maybe set tbusy until a CCS is free?
941*/
942		writeb(CCS_BUFFER_FREE, &pccs->buffer_status);
943		return XMIT_NO_INTR;
944	}
945	return XMIT_OK;
946} /* end ray_hw_xmit */
947
948/*===========================================================================*/
949static int translate_frame(ray_dev_t *local, struct tx_msg __iomem *ptx,
950			   unsigned char *data, int len)
951{
952	__be16 proto = ((struct ethhdr *)data)->h_proto;
953	if (ntohs(proto) >= ETH_P_802_3_MIN) { /* DIX II ethernet frame */
954		pr_debug("ray_cs translate_frame DIX II\n");
955		/* Copy LLC header to card buffer */
956		memcpy_toio(&ptx->var, eth2_llc, sizeof(eth2_llc));
957		memcpy_toio(((void __iomem *)&ptx->var) + sizeof(eth2_llc),
958			    (UCHAR *) &proto, 2);
959		if (proto == htons(ETH_P_AARP) || proto == htons(ETH_P_IPX)) {
960			/* This is the selective translation table, only 2 entries */
961			writeb(0xf8,
962			       &((struct snaphdr_t __iomem *)ptx->var)->org[2]);
963		}
964		/* Copy body of ethernet packet without ethernet header */
965		memcpy_toio((void __iomem *)&ptx->var +
966			    sizeof(struct snaphdr_t), data + ETH_HLEN,
967			    len - ETH_HLEN);
968		return (int)sizeof(struct snaphdr_t) - ETH_HLEN;
969	} else { /* already  802 type, and proto is length */
970		pr_debug("ray_cs translate_frame 802\n");
971		if (proto == htons(0xffff)) { /* evil netware IPX 802.3 without LLC */
972			pr_debug("ray_cs translate_frame evil IPX\n");
973			memcpy_toio(&ptx->var, data + ETH_HLEN, len - ETH_HLEN);
974			return 0 - ETH_HLEN;
975		}
976		memcpy_toio(&ptx->var, data + ETH_HLEN, len - ETH_HLEN);
977		return 0 - ETH_HLEN;
978	}
979	/* TBD do other frame types */
980} /* end translate_frame */
981
982/*===========================================================================*/
983static void ray_build_header(ray_dev_t *local, struct tx_msg __iomem *ptx,
984			     UCHAR msg_type, unsigned char *data)
985{
986	writeb(PROTOCOL_VER | msg_type, &ptx->mac.frame_ctl_1);
987/*** IEEE 802.11 Address field assignments *************
988		TODS	FROMDS	addr_1		addr_2		addr_3	addr_4
989Adhoc		0	0	dest		src (terminal)	BSSID	N/A
990AP to Terminal	0	1	dest		AP(BSSID)	source	N/A
991Terminal to AP	1	0	AP(BSSID)	src (terminal)	dest	N/A
992AP to AP	1	1	dest AP		src AP		dest	source
993*******************************************************/
994	if (local->net_type == ADHOC) {
995		writeb(0, &ptx->mac.frame_ctl_2);
996		memcpy_toio(ptx->mac.addr_1, ((struct ethhdr *)data)->h_dest,
997			    2 * ADDRLEN);
998		memcpy_toio(ptx->mac.addr_3, local->bss_id, ADDRLEN);
999	} else { /* infrastructure */
1000
1001		if (local->sparm.b4.a_acting_as_ap_status) {
1002			writeb(FC2_FROM_DS, &ptx->mac.frame_ctl_2);
1003			memcpy_toio(ptx->mac.addr_1,
1004				    ((struct ethhdr *)data)->h_dest, ADDRLEN);
1005			memcpy_toio(ptx->mac.addr_2, local->bss_id, 6);
1006			memcpy_toio(ptx->mac.addr_3,
1007				    ((struct ethhdr *)data)->h_source, ADDRLEN);
1008		} else { /* Terminal */
1009
1010			writeb(FC2_TO_DS, &ptx->mac.frame_ctl_2);
1011			memcpy_toio(ptx->mac.addr_1, local->bss_id, ADDRLEN);
1012			memcpy_toio(ptx->mac.addr_2,
1013				    ((struct ethhdr *)data)->h_source, ADDRLEN);
1014			memcpy_toio(ptx->mac.addr_3,
1015				    ((struct ethhdr *)data)->h_dest, ADDRLEN);
1016		}
1017	}
1018} /* end encapsulate_frame */
1019
1020/*====================================================================*/
1021
1022/*------------------------------------------------------------------*/
1023/*
1024 * Wireless Handler : get protocol name
1025 */
1026static int ray_get_name(struct net_device *dev, struct iw_request_info *info,
1027			union iwreq_data *wrqu, char *extra)
1028{
1029	strcpy(wrqu->name, "IEEE 802.11-FH");
1030	return 0;
1031}
1032
1033/*------------------------------------------------------------------*/
1034/*
1035 * Wireless Handler : set frequency
1036 */
1037static int ray_set_freq(struct net_device *dev, struct iw_request_info *info,
1038			union iwreq_data *wrqu, char *extra)
1039{
1040	ray_dev_t *local = netdev_priv(dev);
1041	int err = -EINPROGRESS;	/* Call commit handler */
1042
1043	/* Reject if card is already initialised */
1044	if (local->card_status != CARD_AWAITING_PARAM)
1045		return -EBUSY;
1046
1047	/* Setting by channel number */
1048	if ((wrqu->freq.m > USA_HOP_MOD) || (wrqu->freq.e > 0))
1049		err = -EOPNOTSUPP;
1050	else
1051		local->sparm.b5.a_hop_pattern = wrqu->freq.m;
1052
1053	return err;
1054}
1055
1056/*------------------------------------------------------------------*/
1057/*
1058 * Wireless Handler : get frequency
1059 */
1060static int ray_get_freq(struct net_device *dev, struct iw_request_info *info,
1061			union iwreq_data *wrqu, char *extra)
1062{
1063	ray_dev_t *local = netdev_priv(dev);
1064
1065	wrqu->freq.m = local->sparm.b5.a_hop_pattern;
1066	wrqu->freq.e = 0;
1067	return 0;
1068}
1069
1070/*------------------------------------------------------------------*/
1071/*
1072 * Wireless Handler : set ESSID
1073 */
1074static int ray_set_essid(struct net_device *dev, struct iw_request_info *info,
1075			 union iwreq_data *wrqu, char *extra)
1076{
1077	ray_dev_t *local = netdev_priv(dev);
1078
1079	/* Reject if card is already initialised */
1080	if (local->card_status != CARD_AWAITING_PARAM)
1081		return -EBUSY;
1082
1083	/* Check if we asked for `any' */
1084	if (wrqu->essid.flags == 0)
1085		/* Corey : can you do that ? */
1086		return -EOPNOTSUPP;
1087
1088	/* Check the size of the string */
1089	if (wrqu->essid.length > IW_ESSID_MAX_SIZE)
1090		return -E2BIG;
1091
1092	/* Set the ESSID in the card */
1093	memset(local->sparm.b5.a_current_ess_id, 0, IW_ESSID_MAX_SIZE);
1094	memcpy(local->sparm.b5.a_current_ess_id, extra, wrqu->essid.length);
1095
1096	return -EINPROGRESS;	/* Call commit handler */
1097}
1098
1099/*------------------------------------------------------------------*/
1100/*
1101 * Wireless Handler : get ESSID
1102 */
1103static int ray_get_essid(struct net_device *dev, struct iw_request_info *info,
1104			 union iwreq_data *wrqu, char *extra)
1105{
1106	ray_dev_t *local = netdev_priv(dev);
1107	UCHAR tmp[IW_ESSID_MAX_SIZE + 1];
1108
1109	/* Get the essid that was set */
1110	memcpy(extra, local->sparm.b5.a_current_ess_id, IW_ESSID_MAX_SIZE);
1111	memcpy(tmp, local->sparm.b5.a_current_ess_id, IW_ESSID_MAX_SIZE);
1112	tmp[IW_ESSID_MAX_SIZE] = '\0';
1113
1114	/* Push it out ! */
1115	wrqu->essid.length = strlen(tmp);
1116	wrqu->essid.flags = 1;	/* active */
1117
1118	return 0;
1119}
1120
1121/*------------------------------------------------------------------*/
1122/*
1123 * Wireless Handler : get AP address
1124 */
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(struct timer_list *t)
1639{
1640	ray_dev_t *local = from_timer(local, t, timer);
1641	del_timer(&local->timer);
1642	printk(KERN_INFO "ray_cs Authentication with access point failed"
1643	       " - timeout\n");
1644	join_net(&local->timer);
1645}
1646
1647/*===========================================================================*/
1648static int parse_addr(char *in_str, UCHAR *out)
1649{
1650	int i, k;
1651	int len;
1652
1653	if (in_str == NULL)
1654		return 0;
1655	len = strnlen(in_str, ADDRLEN * 2 + 1) - 1;
1656	if (len < 1)
1657		return 0;
1658	memset(out, 0, ADDRLEN);
1659
1660	i = 5;
1661
1662	while (len > 0) {
1663		if ((k = hex_to_bin(in_str[len--])) != -1)
1664			out[i] = k;
1665		else
1666			return 0;
1667
1668		if (len == 0)
1669			break;
1670		if ((k = hex_to_bin(in_str[len--])) != -1)
1671			out[i] += k << 4;
1672		else
1673			return 0;
1674		if (!i--)
1675			break;
1676	}
1677	return 1;
1678}
1679
1680/*===========================================================================*/
1681static struct net_device_stats *ray_get_stats(struct net_device *dev)
1682{
1683	ray_dev_t *local = netdev_priv(dev);
1684	struct pcmcia_device *link = local->finder;
1685	struct status __iomem *p = local->sram + STATUS_BASE;
1686	if (!(pcmcia_dev_present(link))) {
1687		dev_dbg(&link->dev, "ray_cs net_device_stats - device not present\n");
1688		return &local->stats;
1689	}
1690	if (readb(&p->mrx_overflow_for_host)) {
1691		local->stats.rx_over_errors += swab16(readw(&p->mrx_overflow));
1692		writeb(0, &p->mrx_overflow);
1693		writeb(0, &p->mrx_overflow_for_host);
1694	}
1695	if (readb(&p->mrx_checksum_error_for_host)) {
1696		local->stats.rx_crc_errors +=
1697		    swab16(readw(&p->mrx_checksum_error));
1698		writeb(0, &p->mrx_checksum_error);
1699		writeb(0, &p->mrx_checksum_error_for_host);
1700	}
1701	if (readb(&p->rx_hec_error_for_host)) {
1702		local->stats.rx_frame_errors += swab16(readw(&p->rx_hec_error));
1703		writeb(0, &p->rx_hec_error);
1704		writeb(0, &p->rx_hec_error_for_host);
1705	}
1706	return &local->stats;
1707}
1708
1709/*===========================================================================*/
1710static void ray_update_parm(struct net_device *dev, UCHAR objid, UCHAR *value,
1711			    int len)
1712{
1713	ray_dev_t *local = netdev_priv(dev);
1714	struct pcmcia_device *link = local->finder;
1715	int ccsindex;
1716	int i;
1717	struct ccs __iomem *pccs;
1718
1719	if (!(pcmcia_dev_present(link))) {
1720		dev_dbg(&link->dev, "ray_update_parm - device not present\n");
1721		return;
1722	}
1723
1724	if ((ccsindex = get_free_ccs(local)) < 0) {
1725		dev_dbg(&link->dev, "ray_update_parm - No free ccs\n");
1726		return;
1727	}
1728	pccs = ccs_base(local) + ccsindex;
1729	writeb(CCS_UPDATE_PARAMS, &pccs->cmd);
1730	writeb(objid, &pccs->var.update_param.object_id);
1731	writeb(1, &pccs->var.update_param.number_objects);
1732	writeb(0, &pccs->var.update_param.failure_cause);
1733	for (i = 0; i < len; i++) {
1734		writeb(value[i], local->sram + HOST_TO_ECF_BASE);
1735	}
1736	/* Interrupt the firmware to process the command */
1737	if (interrupt_ecf(local, ccsindex)) {
1738		dev_dbg(&link->dev, "ray_cs associate failed - ECF not ready for intr\n");
1739		writeb(CCS_BUFFER_FREE, &(pccs++)->buffer_status);
1740	}
1741}
1742
1743/*===========================================================================*/
1744static void ray_update_multi_list(struct net_device *dev, int all)
1745{
1746	int ccsindex;
1747	struct ccs __iomem *pccs;
1748	ray_dev_t *local = netdev_priv(dev);
1749	struct pcmcia_device *link = local->finder;
1750	void __iomem *p = local->sram + HOST_TO_ECF_BASE;
1751
1752	if (!(pcmcia_dev_present(link))) {
1753		dev_dbg(&link->dev, "ray_update_multi_list - device not present\n");
1754		return;
1755	} else
1756		dev_dbg(&link->dev, "ray_update_multi_list(%p)\n", dev);
1757	if ((ccsindex = get_free_ccs(local)) < 0) {
1758		dev_dbg(&link->dev, "ray_update_multi - No free ccs\n");
1759		return;
1760	}
1761	pccs = ccs_base(local) + ccsindex;
1762	writeb(CCS_UPDATE_MULTICAST_LIST, &pccs->cmd);
1763
1764	if (all) {
1765		writeb(0xff, &pccs->var);
1766		local->num_multi = 0xff;
1767	} else {
1768		struct netdev_hw_addr *ha;
1769		int i = 0;
1770
1771		/* Copy the kernel's list of MC addresses to card */
1772		netdev_for_each_mc_addr(ha, dev) {
1773			memcpy_toio(p, ha->addr, ETH_ALEN);
1774			dev_dbg(&link->dev, "ray_update_multi add addr %pm\n",
1775				ha->addr);
1776			p += ETH_ALEN;
1777			i++;
1778		}
1779		if (i > 256 / ADDRLEN)
1780			i = 256 / ADDRLEN;
1781		writeb((UCHAR) i, &pccs->var);
1782		dev_dbg(&link->dev, "ray_cs update_multi %d addresses in list\n", i);
1783		/* Interrupt the firmware to process the command */
1784		local->num_multi = i;
1785	}
1786	if (interrupt_ecf(local, ccsindex)) {
1787		dev_dbg(&link->dev,
1788		      "ray_cs update_multi failed - ECF not ready for intr\n");
1789		writeb(CCS_BUFFER_FREE, &(pccs++)->buffer_status);
1790	}
1791} /* end ray_update_multi_list */
1792
1793/*===========================================================================*/
1794static void set_multicast_list(struct net_device *dev)
1795{
1796	ray_dev_t *local = netdev_priv(dev);
1797	UCHAR promisc;
1798
1799	pr_debug("ray_cs set_multicast_list(%p)\n", dev);
1800
1801	if (dev->flags & IFF_PROMISC) {
1802		if (local->sparm.b5.a_promiscuous_mode == 0) {
1803			pr_debug("ray_cs set_multicast_list promisc on\n");
1804			local->sparm.b5.a_promiscuous_mode = 1;
1805			promisc = 1;
1806			ray_update_parm(dev, OBJID_promiscuous_mode,
1807					&promisc, sizeof(promisc));
1808		}
1809	} else {
1810		if (local->sparm.b5.a_promiscuous_mode == 1) {
1811			pr_debug("ray_cs set_multicast_list promisc off\n");
1812			local->sparm.b5.a_promiscuous_mode = 0;
1813			promisc = 0;
1814			ray_update_parm(dev, OBJID_promiscuous_mode,
1815					&promisc, sizeof(promisc));
1816		}
1817	}
1818
1819	if (dev->flags & IFF_ALLMULTI)
1820		ray_update_multi_list(dev, 1);
1821	else {
1822		if (local->num_multi != netdev_mc_count(dev))
1823			ray_update_multi_list(dev, 0);
1824	}
1825} /* end set_multicast_list */
1826
1827/*=============================================================================
1828 * All routines below here are run at interrupt time.
1829=============================================================================*/
1830static irqreturn_t ray_interrupt(int irq, void *dev_id)
1831{
1832	struct net_device *dev = (struct net_device *)dev_id;
1833	struct pcmcia_device *link;
1834	ray_dev_t *local;
1835	struct ccs __iomem *pccs;
1836	struct rcs __iomem *prcs;
1837	UCHAR rcsindex;
1838	UCHAR tmp;
1839	UCHAR cmd;
1840	UCHAR status;
1841	UCHAR memtmp[ESSID_SIZE + 1];
1842
1843
1844	if (dev == NULL)	/* Note that we want interrupts with dev->start == 0 */
1845		return IRQ_NONE;
1846
1847	pr_debug("ray_cs: interrupt for *dev=%p\n", dev);
1848
1849	local = netdev_priv(dev);
1850	link = local->finder;
1851	if (!pcmcia_dev_present(link)) {
1852		pr_debug(
1853			"ray_cs interrupt from device not present or suspended.\n");
1854		return IRQ_NONE;
1855	}
1856	rcsindex = readb(&((struct scb __iomem *)(local->sram))->rcs_index);
1857
1858	if (rcsindex >= (NUMBER_OF_CCS + NUMBER_OF_RCS)) {
1859		dev_dbg(&link->dev, "ray_cs interrupt bad rcsindex = 0x%x\n", rcsindex);
1860		clear_interrupt(local);
1861		return IRQ_HANDLED;
1862	}
1863	if (rcsindex < NUMBER_OF_CCS) { /* If it's a returned CCS */
1864		pccs = ccs_base(local) + rcsindex;
1865		cmd = readb(&pccs->cmd);
1866		status = readb(&pccs->buffer_status);
1867		switch (cmd) {
1868		case CCS_DOWNLOAD_STARTUP_PARAMS:	/* Happens in firmware someday */
1869			del_timer(&local->timer);
1870			if (status == CCS_COMMAND_COMPLETE) {
1871				dev_dbg(&link->dev,
1872				      "ray_cs interrupt download_startup_parameters OK\n");
1873			} else {
1874				dev_dbg(&link->dev,
1875				      "ray_cs interrupt download_startup_parameters fail\n");
1876			}
1877			break;
1878		case CCS_UPDATE_PARAMS:
1879			dev_dbg(&link->dev, "ray_cs interrupt update params done\n");
1880			if (status != CCS_COMMAND_COMPLETE) {
1881				tmp =
1882				    readb(&pccs->var.update_param.
1883					  failure_cause);
1884				dev_dbg(&link->dev,
1885				      "ray_cs interrupt update params failed - reason %d\n",
1886				      tmp);
1887			}
1888			break;
1889		case CCS_REPORT_PARAMS:
1890			dev_dbg(&link->dev, "ray_cs interrupt report params done\n");
1891			break;
1892		case CCS_UPDATE_MULTICAST_LIST:	/* Note that this CCS isn't returned */
1893			dev_dbg(&link->dev,
1894			      "ray_cs interrupt CCS Update Multicast List done\n");
1895			break;
1896		case CCS_UPDATE_POWER_SAVINGS_MODE:
1897			dev_dbg(&link->dev,
1898			      "ray_cs interrupt update power save mode done\n");
1899			break;
1900		case CCS_START_NETWORK:
1901		case CCS_JOIN_NETWORK:
1902			memcpy(memtmp, local->sparm.b4.a_current_ess_id,
1903								ESSID_SIZE);
1904			memtmp[ESSID_SIZE] = '\0';
1905
1906			if (status == CCS_COMMAND_COMPLETE) {
1907				if (readb
1908				    (&pccs->var.start_network.net_initiated) ==
1909				    1) {
1910					dev_dbg(&link->dev,
1911					      "ray_cs interrupt network \"%s\" started\n",
1912					      memtmp);
1913				} else {
1914					dev_dbg(&link->dev,
1915					      "ray_cs interrupt network \"%s\" joined\n",
1916					      memtmp);
1917				}
1918				memcpy_fromio(&local->bss_id,
1919					      pccs->var.start_network.bssid,
1920					      ADDRLEN);
1921
1922				if (local->fw_ver == 0x55)
1923					local->net_default_tx_rate = 3;
1924				else
1925					local->net_default_tx_rate =
1926					    readb(&pccs->var.start_network.
1927						  net_default_tx_rate);
1928				local->encryption =
1929				    readb(&pccs->var.start_network.encryption);
1930				if (!sniffer && (local->net_type == INFRA)
1931				    && !(local->sparm.b4.a_acting_as_ap_status)) {
1932					authenticate(local);
1933				}
1934				local->card_status = CARD_ACQ_COMPLETE;
1935			} else {
1936				local->card_status = CARD_ACQ_FAILED;
1937
1938				del_timer(&local->timer);
1939				local->timer.expires = jiffies + HZ * 5;
1940				if (status == CCS_START_NETWORK) {
1941					dev_dbg(&link->dev,
1942					      "ray_cs interrupt network \"%s\" start failed\n",
1943					      memtmp);
1944					local->timer.function = start_net;
1945				} else {
1946					dev_dbg(&link->dev,
1947					      "ray_cs interrupt network \"%s\" join failed\n",
1948					      memtmp);
1949					local->timer.function = join_net;
1950				}
1951				add_timer(&local->timer);
1952			}
1953			break;
1954		case CCS_START_ASSOCIATION:
1955			if (status == CCS_COMMAND_COMPLETE) {
1956				local->card_status = CARD_ASSOC_COMPLETE;
1957				dev_dbg(&link->dev, "ray_cs association successful\n");
1958			} else {
1959				dev_dbg(&link->dev, "ray_cs association failed,\n");
1960				local->card_status = CARD_ASSOC_FAILED;
1961				join_net(&local->timer);
1962			}
1963			break;
1964		case CCS_TX_REQUEST:
1965			if (status == CCS_COMMAND_COMPLETE) {
1966				dev_dbg(&link->dev,
1967				      "ray_cs interrupt tx request complete\n");
1968			} else {
1969				dev_dbg(&link->dev,
1970				      "ray_cs interrupt tx request failed\n");
1971			}
1972			if (!sniffer)
1973				netif_start_queue(dev);
1974			netif_wake_queue(dev);
1975			break;
1976		case CCS_TEST_MEMORY:
1977			dev_dbg(&link->dev, "ray_cs interrupt mem test done\n");
1978			break;
1979		case CCS_SHUTDOWN:
1980			dev_dbg(&link->dev,
1981			      "ray_cs interrupt Unexpected CCS returned - Shutdown\n");
1982			break;
1983		case CCS_DUMP_MEMORY:
1984			dev_dbg(&link->dev, "ray_cs interrupt dump memory done\n");
1985			break;
1986		case CCS_START_TIMER:
1987			dev_dbg(&link->dev,
1988			      "ray_cs interrupt DING - raylink timer expired\n");
1989			break;
1990		default:
1991			dev_dbg(&link->dev,
1992			      "ray_cs interrupt Unexpected CCS 0x%x returned 0x%x\n",
1993			      rcsindex, cmd);
1994		}
1995		writeb(CCS_BUFFER_FREE, &pccs->buffer_status);
1996	} else { /* It's an RCS */
1997
1998		prcs = rcs_base(local) + rcsindex;
1999
2000		switch (readb(&prcs->interrupt_id)) {
2001		case PROCESS_RX_PACKET:
2002			ray_rx(dev, local, prcs);
2003			break;
2004		case REJOIN_NET_COMPLETE:
2005			dev_dbg(&link->dev, "ray_cs interrupt rejoin net complete\n");
2006			local->card_status = CARD_ACQ_COMPLETE;
2007			/* do we need to clear tx buffers CCS's? */
2008			if (local->sparm.b4.a_network_type == ADHOC) {
2009				if (!sniffer)
2010					netif_start_queue(dev);
2011			} else {
2012				memcpy_fromio(&local->bss_id,
2013					      prcs->var.rejoin_net_complete.
2014					      bssid, ADDRLEN);
2015				dev_dbg(&link->dev, "ray_cs new BSSID = %pm\n",
2016					local->bss_id);
2017				if (!sniffer)
2018					authenticate(local);
2019			}
2020			break;
2021		case ROAMING_INITIATED:
2022			dev_dbg(&link->dev, "ray_cs interrupt roaming initiated\n");
2023			netif_stop_queue(dev);
2024			local->card_status = CARD_DOING_ACQ;
2025			break;
2026		case JAPAN_CALL_SIGN_RXD:
2027			dev_dbg(&link->dev, "ray_cs interrupt japan call sign rx\n");
2028			break;
2029		default:
2030			dev_dbg(&link->dev,
2031			      "ray_cs Unexpected interrupt for RCS 0x%x cmd = 0x%x\n",
2032			      rcsindex,
2033			      (unsigned int)readb(&prcs->interrupt_id));
2034			break;
2035		}
2036		writeb(CCS_BUFFER_FREE, &prcs->buffer_status);
2037	}
2038	clear_interrupt(local);
2039	return IRQ_HANDLED;
2040} /* ray_interrupt */
2041
2042/*===========================================================================*/
2043static void ray_rx(struct net_device *dev, ray_dev_t *local,
2044		   struct rcs __iomem *prcs)
2045{
2046	int rx_len;
2047	unsigned int pkt_addr;
2048	void __iomem *pmsg;
2049	pr_debug("ray_rx process rx packet\n");
2050
2051	/* Calculate address of packet within Rx buffer */
2052	pkt_addr = ((readb(&prcs->var.rx_packet.rx_data_ptr[0]) << 8)
2053		    + readb(&prcs->var.rx_packet.rx_data_ptr[1])) & RX_BUFF_END;
2054	/* Length of first packet fragment */
2055	rx_len = (readb(&prcs->var.rx_packet.rx_data_length[0]) << 8)
2056	    + readb(&prcs->var.rx_packet.rx_data_length[1]);
2057
2058	local->last_rsl = readb(&prcs->var.rx_packet.rx_sig_lev);
2059	pmsg = local->rmem + pkt_addr;
2060	switch (readb(pmsg)) {
2061	case DATA_TYPE:
2062		pr_debug("ray_rx data type\n");
2063		rx_data(dev, prcs, pkt_addr, rx_len);
2064		break;
2065	case AUTHENTIC_TYPE:
2066		pr_debug("ray_rx authentic type\n");
2067		if (sniffer)
2068			rx_data(dev, prcs, pkt_addr, rx_len);
2069		else
2070			rx_authenticate(local, prcs, pkt_addr, rx_len);
2071		break;
2072	case DEAUTHENTIC_TYPE:
2073		pr_debug("ray_rx deauth type\n");
2074		if (sniffer)
2075			rx_data(dev, prcs, pkt_addr, rx_len);
2076		else
2077			rx_deauthenticate(local, prcs, pkt_addr, rx_len);
2078		break;
2079	case NULL_MSG_TYPE:
2080		pr_debug("ray_cs rx NULL msg\n");
2081		break;
2082	case BEACON_TYPE:
2083		pr_debug("ray_rx beacon type\n");
2084		if (sniffer)
2085			rx_data(dev, prcs, pkt_addr, rx_len);
2086
2087		copy_from_rx_buff(local, (UCHAR *) &local->last_bcn, pkt_addr,
2088				  rx_len < sizeof(struct beacon_rx) ?
2089				  rx_len : sizeof(struct beacon_rx));
2090
2091		local->beacon_rxed = 1;
2092		/* Get the statistics so the card counters never overflow */
2093		ray_get_stats(dev);
2094		break;
2095	default:
2096		pr_debug("ray_cs unknown pkt type %2x\n",
2097		      (unsigned int)readb(pmsg));
2098		break;
2099	}
2100
2101} /* end ray_rx */
2102
2103/*===========================================================================*/
2104static void rx_data(struct net_device *dev, struct rcs __iomem *prcs,
2105		    unsigned int pkt_addr, int rx_len)
2106{
2107	struct sk_buff *skb = NULL;
2108	struct rcs __iomem *prcslink = prcs;
2109	ray_dev_t *local = netdev_priv(dev);
2110	UCHAR *rx_ptr;
2111	int total_len;
2112	int tmp;
2113#ifdef WIRELESS_SPY
2114	int siglev = local->last_rsl;
2115	u_char linksrcaddr[ETH_ALEN];	/* Other end of the wireless link */
2116#endif
2117
2118	if (!sniffer) {
2119		if (translate) {
2120/* TBD length needs fixing for translated header */
2121			if (rx_len < (ETH_HLEN + RX_MAC_HEADER_LENGTH) ||
2122			    rx_len >
2123			    (dev->mtu + RX_MAC_HEADER_LENGTH + ETH_HLEN +
2124			     FCS_LEN)) {
2125				pr_debug(
2126				      "ray_cs invalid packet length %d received\n",
2127				      rx_len);
2128				return;
2129			}
2130		} else { /* encapsulated ethernet */
2131
2132			if (rx_len < (ETH_HLEN + RX_MAC_HEADER_LENGTH) ||
2133			    rx_len >
2134			    (dev->mtu + RX_MAC_HEADER_LENGTH + ETH_HLEN +
2135			     FCS_LEN)) {
2136				pr_debug(
2137				      "ray_cs invalid packet length %d received\n",
2138				      rx_len);
2139				return;
2140			}
2141		}
2142	}
2143	pr_debug("ray_cs rx_data packet\n");
2144	/* If fragmented packet, verify sizes of fragments add up */
2145	if (readb(&prcs->var.rx_packet.next_frag_rcs_index) != 0xFF) {
2146		pr_debug("ray_cs rx'ed fragment\n");
2147		tmp = (readb(&prcs->var.rx_packet.totalpacketlength[0]) << 8)
2148		    + readb(&prcs->var.rx_packet.totalpacketlength[1]);
2149		total_len = tmp;
2150		prcslink = prcs;
2151		do {
2152			tmp -=
2153			    (readb(&prcslink->var.rx_packet.rx_data_length[0])
2154			     << 8)
2155			    + readb(&prcslink->var.rx_packet.rx_data_length[1]);
2156			if (readb(&prcslink->var.rx_packet.next_frag_rcs_index)
2157			    == 0xFF || tmp < 0)
2158				break;
2159			prcslink = rcs_base(local)
2160			    + readb(&prcslink->link_field);
2161		} while (1);
2162
2163		if (tmp < 0) {
2164			pr_debug(
2165			      "ray_cs rx_data fragment lengths don't add up\n");
2166			local->stats.rx_dropped++;
2167			release_frag_chain(local, prcs);
2168			return;
2169		}
2170	} else { /* Single unfragmented packet */
2171		total_len = rx_len;
2172	}
2173
2174	skb = dev_alloc_skb(total_len + 5);
2175	if (skb == NULL) {
2176		pr_debug("ray_cs rx_data could not allocate skb\n");
2177		local->stats.rx_dropped++;
2178		if (readb(&prcs->var.rx_packet.next_frag_rcs_index) != 0xFF)
2179			release_frag_chain(local, prcs);
2180		return;
2181	}
2182	skb_reserve(skb, 2);	/* Align IP on 16 byte (TBD check this) */
2183
2184	pr_debug("ray_cs rx_data total_len = %x, rx_len = %x\n", total_len,
2185	      rx_len);
2186
2187/************************/
2188	/* Reserve enough room for the whole damn packet. */
2189	rx_ptr = skb_put(skb, total_len);
2190	/* Copy the whole packet to sk_buff */
2191	rx_ptr +=
2192	    copy_from_rx_buff(local, rx_ptr, pkt_addr & RX_BUFF_END, rx_len);
2193	/* Get source address */
2194#ifdef WIRELESS_SPY
2195	skb_copy_from_linear_data_offset(skb,
2196					 offsetof(struct mac_header, addr_2),
2197					 linksrcaddr, ETH_ALEN);
2198#endif
2199	/* Now, deal with encapsulation/translation/sniffer */
2200	if (!sniffer) {
2201		if (!translate) {
2202			/* Encapsulated ethernet, so just lop off 802.11 MAC header */
2203/* TBD reserve            skb_reserve( skb, RX_MAC_HEADER_LENGTH); */
2204			skb_pull(skb, RX_MAC_HEADER_LENGTH);
2205		} else {
2206			/* Do translation */
2207			untranslate(local, skb, total_len);
2208		}
2209	} else { /* sniffer mode, so just pass whole packet */
2210	}
2211
2212/************************/
2213	/* Now pick up the rest of the fragments if any */
2214	tmp = 17;
2215	if (readb(&prcs->var.rx_packet.next_frag_rcs_index) != 0xFF) {
2216		prcslink = prcs;
2217		pr_debug("ray_cs rx_data in fragment loop\n");
2218		do {
2219			prcslink = rcs_base(local)
2220			    +
2221			    readb(&prcslink->var.rx_packet.next_frag_rcs_index);
2222			rx_len =
2223			    ((readb(&prcslink->var.rx_packet.rx_data_length[0])
2224			      << 8)
2225			     +
2226			     readb(&prcslink->var.rx_packet.rx_data_length[1]))
2227			    & RX_BUFF_END;
2228			pkt_addr =
2229			    ((readb(&prcslink->var.rx_packet.rx_data_ptr[0]) <<
2230			      8)
2231			     + readb(&prcslink->var.rx_packet.rx_data_ptr[1]))
2232			    & RX_BUFF_END;
2233
2234			rx_ptr +=
2235			    copy_from_rx_buff(local, rx_ptr, pkt_addr, rx_len);
2236
2237		} while (tmp-- &&
2238			 readb(&prcslink->var.rx_packet.next_frag_rcs_index) !=
2239			 0xFF);
2240		release_frag_chain(local, prcs);
2241	}
2242
2243	skb->protocol = eth_type_trans(skb, dev);
2244	netif_rx(skb);
2245	local->stats.rx_packets++;
2246	local->stats.rx_bytes += total_len;
2247
2248	/* Gather signal strength per address */
2249#ifdef WIRELESS_SPY
2250	/* For the Access Point or the node having started the ad-hoc net
2251	 * note : ad-hoc work only in some specific configurations, but we
2252	 * kludge in ray_get_wireless_stats... */
2253	if (!memcmp(linksrcaddr, local->bss_id, ETH_ALEN)) {
2254		/* Update statistics */
2255		/*local->wstats.qual.qual = none ? */
2256		local->wstats.qual.level = siglev;
2257		/*local->wstats.qual.noise = none ? */
2258		local->wstats.qual.updated = 0x2;
2259	}
2260	/* Now, update the spy stuff */
2261	{
2262		struct iw_quality wstats;
2263		wstats.level = siglev;
2264		/* wstats.noise = none ? */
2265		/* wstats.qual = none ? */
2266		wstats.updated = 0x2;
2267		/* Update spy records */
2268		wireless_spy_update(dev, linksrcaddr, &wstats);
2269	}
2270#endif /* WIRELESS_SPY */
2271} /* end rx_data */
2272
2273/*===========================================================================*/
2274static void untranslate(ray_dev_t *local, struct sk_buff *skb, int len)
2275{
2276	snaphdr_t *psnap = (snaphdr_t *) (skb->data + RX_MAC_HEADER_LENGTH);
2277	struct ieee80211_hdr *pmac = (struct ieee80211_hdr *)skb->data;
2278	__be16 type = *(__be16 *) psnap->ethertype;
2279	int delta;
2280	struct ethhdr *peth;
2281	UCHAR srcaddr[ADDRLEN];
2282	UCHAR destaddr[ADDRLEN];
2283	static const UCHAR org_bridge[3] = { 0, 0, 0xf8 };
2284	static const UCHAR org_1042[3] = { 0, 0, 0 };
2285
2286	memcpy(destaddr, ieee80211_get_DA(pmac), ADDRLEN);
2287	memcpy(srcaddr, ieee80211_get_SA(pmac), ADDRLEN);
2288
2289#if 0
2290	if {
2291		print_hex_dump(KERN_DEBUG, "skb->data before untranslate: ",
2292			       DUMP_PREFIX_NONE, 16, 1,
2293			       skb->data, 64, true);
2294		printk(KERN_DEBUG
2295		       "type = %08x, xsap = %02x%02x%02x, org = %02x02x02x\n",
2296		       ntohs(type), psnap->dsap, psnap->ssap, psnap->ctrl,
2297		       psnap->org[0], psnap->org[1], psnap->org[2]);
2298		printk(KERN_DEBUG "untranslate skb->data = %p\n", skb->data);
2299	}
2300#endif
2301
2302	if (psnap->dsap != 0xaa || psnap->ssap != 0xaa || psnap->ctrl != 3) {
2303		/* not a snap type so leave it alone */
2304		pr_debug("ray_cs untranslate NOT SNAP %02x %02x %02x\n",
2305		      psnap->dsap, psnap->ssap, psnap->ctrl);
2306
2307		delta = RX_MAC_HEADER_LENGTH - ETH_HLEN;
2308		peth = (struct ethhdr *)(skb->data + delta);
2309		peth->h_proto = htons(len - RX_MAC_HEADER_LENGTH);
2310	} else { /* Its a SNAP */
2311		if (memcmp(psnap->org, org_bridge, 3) == 0) {
2312		/* EtherII and nuke the LLC */
2313			pr_debug("ray_cs untranslate Bridge encap\n");
2314			delta = RX_MAC_HEADER_LENGTH
2315			    + sizeof(struct snaphdr_t) - ETH_HLEN;
2316			peth = (struct ethhdr *)(skb->data + delta);
2317			peth->h_proto = type;
2318		} else if (memcmp(psnap->org, org_1042, 3) == 0) {
2319			switch (ntohs(type)) {
2320			case ETH_P_IPX:
2321			case ETH_P_AARP:
2322				pr_debug("ray_cs untranslate RFC IPX/AARP\n");
2323				delta = RX_MAC_HEADER_LENGTH - ETH_HLEN;
2324				peth = (struct ethhdr *)(skb->data + delta);
2325				peth->h_proto =
2326				    htons(len - RX_MAC_HEADER_LENGTH);
2327				break;
2328			default:
2329				pr_debug("ray_cs untranslate RFC default\n");
2330				delta = RX_MAC_HEADER_LENGTH +
2331				    sizeof(struct snaphdr_t) - ETH_HLEN;
2332				peth = (struct ethhdr *)(skb->data + delta);
2333				peth->h_proto = type;
2334				break;
2335			}
2336		} else {
2337			printk("ray_cs untranslate very confused by packet\n");
2338			delta = RX_MAC_HEADER_LENGTH - ETH_HLEN;
2339			peth = (struct ethhdr *)(skb->data + delta);
2340			peth->h_proto = type;
2341		}
2342	}
2343/* TBD reserve  skb_reserve(skb, delta); */
2344	skb_pull(skb, delta);
2345	pr_debug("untranslate after skb_pull(%d), skb->data = %p\n", delta,
2346	      skb->data);
2347	memcpy(peth->h_dest, destaddr, ADDRLEN);
2348	memcpy(peth->h_source, srcaddr, ADDRLEN);
2349#if 0
2350	{
2351		int i;
2352		printk(KERN_DEBUG "skb->data after untranslate:");
2353		for (i = 0; i < 64; i++)
2354			printk("%02x ", skb->data[i]);
2355		printk("\n");
2356	}
2357#endif
2358} /* end untranslate */
2359
2360/*===========================================================================*/
2361/* Copy data from circular receive buffer to PC memory.
2362 * dest     = destination address in PC memory
2363 * pkt_addr = source address in receive buffer
2364 * len      = length of packet to copy
2365 */
2366static int copy_from_rx_buff(ray_dev_t *local, UCHAR *dest, int pkt_addr,
2367			     int length)
2368{
2369	int wrap_bytes = (pkt_addr + length) - (RX_BUFF_END + 1);
2370	if (wrap_bytes <= 0) {
2371		memcpy_fromio(dest, local->rmem + pkt_addr, length);
2372	} else { /* Packet wrapped in circular buffer */
2373
2374		memcpy_fromio(dest, local->rmem + pkt_addr,
2375			      length - wrap_bytes);
2376		memcpy_fromio(dest + length - wrap_bytes, local->rmem,
2377			      wrap_bytes);
2378	}
2379	return length;
2380}
2381
2382/*===========================================================================*/
2383static void release_frag_chain(ray_dev_t *local, struct rcs __iomem *prcs)
2384{
2385	struct rcs __iomem *prcslink = prcs;
2386	int tmp = 17;
2387	unsigned rcsindex = readb(&prcs->var.rx_packet.next_frag_rcs_index);
2388
2389	while (tmp--) {
2390		writeb(CCS_BUFFER_FREE, &prcslink->buffer_status);
2391		if (rcsindex >= (NUMBER_OF_CCS + NUMBER_OF_RCS)) {
2392			pr_debug("ray_cs interrupt bad rcsindex = 0x%x\n",
2393			      rcsindex);
2394			break;
2395		}
2396		prcslink = rcs_base(local) + rcsindex;
2397		rcsindex = readb(&prcslink->var.rx_packet.next_frag_rcs_index);
2398	}
2399	writeb(CCS_BUFFER_FREE, &prcslink->buffer_status);
2400}
2401
2402/*===========================================================================*/
2403static void authenticate(ray_dev_t *local)
2404{
2405	struct pcmcia_device *link = local->finder;
2406	dev_dbg(&link->dev, "ray_cs Starting authentication.\n");
2407	if (!(pcmcia_dev_present(link))) {
2408		dev_dbg(&link->dev, "ray_cs authenticate - device not present\n");
2409		return;
2410	}
2411
2412	del_timer(&local->timer);
2413	if (build_auth_frame(local, local->bss_id, OPEN_AUTH_REQUEST)) {
2414		local->timer.function = join_net;
2415	} else {
2416		local->timer.function = authenticate_timeout;
2417	}
2418	local->timer.expires = jiffies + HZ * 2;
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(&local->timer);
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.function = join_net;
2500		add_timer(&local->timer);
2501		local->card_status = CARD_ASSOC_FAILED;
2502		return;
2503	}
2504	if (!sniffer)
2505		netif_start_queue(dev);
2506
2507} /* end associate */
2508
2509/*===========================================================================*/
2510static void rx_deauthenticate(ray_dev_t *local, struct rcs __iomem *prcs,
2511			      unsigned int pkt_addr, int rx_len)
2512{
2513/*  UCHAR buff[256];
2514    struct ray_rx_msg *msg = (struct ray_rx_msg *) buff;
2515*/
2516	pr_debug("Deauthentication frame received\n");
2517	local->authentication_state = UNAUTHENTICATED;
2518	/* Need to reauthenticate or rejoin depending on reason code */
2519/*  copy_from_rx_buff(local, buff, pkt_addr, rx_len & 0xff);
2520 */
2521}
2522
2523/*===========================================================================*/
2524static void clear_interrupt(ray_dev_t *local)
2525{
2526	writeb(0, local->amem + CIS_OFFSET + HCS_INTR_OFFSET);
2527}
2528
2529/*===========================================================================*/
2530#ifdef CONFIG_PROC_FS
2531#define MAXDATA (PAGE_SIZE - 80)
2532
2533static const char *card_status[] = {
2534	"Card inserted - uninitialized",	/* 0 */
2535	"Card not downloaded",			/* 1 */
2536	"Waiting for download parameters",	/* 2 */
2537	"Card doing acquisition",		/* 3 */
2538	"Acquisition complete",			/* 4 */
2539	"Authentication complete",		/* 5 */
2540	"Association complete",			/* 6 */
2541	"???", "???", "???", "???",		/* 7 8 9 10 undefined */
2542	"Card init error",			/* 11 */
2543	"Download parameters error",		/* 12 */
2544	"???",					/* 13 */
2545	"Acquisition failed",			/* 14 */
2546	"Authentication refused",		/* 15 */
2547	"Association failed"			/* 16 */
2548};
2549
2550static const char *nettype[] = { "Adhoc", "Infra " };
2551static const char *framing[] = { "Encapsulation", "Translation" }
2552
2553;
2554/*===========================================================================*/
2555static int ray_cs_proc_show(struct seq_file *m, void *v)
2556{
2557/* Print current values which are not available via other means
2558 * eg ifconfig
2559 */
2560	int i;
2561	struct pcmcia_device *link;
2562	struct net_device *dev;
2563	ray_dev_t *local;
2564	UCHAR *p;
2565	struct freq_hop_element *pfh;
2566	UCHAR c[33];
2567
2568	link = this_device;
2569	if (!link)
2570		return 0;
2571	dev = (struct net_device *)link->priv;
2572	if (!dev)
2573		return 0;
2574	local = netdev_priv(dev);
2575	if (!local)
2576		return 0;
2577
2578	seq_puts(m, "Raylink Wireless LAN driver status\n");
2579	seq_printf(m, "%s\n", rcsid);
2580	/* build 4 does not report version, and field is 0x55 after memtest */
2581	seq_puts(m, "Firmware version     = ");
2582	if (local->fw_ver == 0x55)
2583		seq_puts(m, "4 - Use dump_cis for more details\n");
2584	else
2585		seq_printf(m, "%2d.%02d.%02d\n",
2586			   local->fw_ver, local->fw_bld, local->fw_var);
2587
2588	for (i = 0; i < 32; i++)
2589		c[i] = local->sparm.b5.a_current_ess_id[i];
2590	c[32] = 0;
2591	seq_printf(m, "%s network ESSID = \"%s\"\n",
2592		   nettype[local->sparm.b5.a_network_type], c);
2593
2594	p = local->bss_id;
2595	seq_printf(m, "BSSID                = %pM\n", p);
2596
2597	seq_printf(m, "Country code         = %d\n",
2598		   local->sparm.b5.a_curr_country_code);
2599
2600	i = local->card_status;
2601	if (i < 0)
2602		i = 10;
2603	if (i > 16)
2604		i = 10;
2605	seq_printf(m, "Card status          = %s\n", card_status[i]);
2606
2607	seq_printf(m, "Framing mode         = %s\n", framing[translate]);
2608
2609	seq_printf(m, "Last pkt signal lvl  = %d\n", local->last_rsl);
2610
2611	if (local->beacon_rxed) {
2612		/* Pull some fields out of last beacon received */
2613		seq_printf(m, "Beacon Interval      = %d Kus\n",
2614			   local->last_bcn.beacon_intvl[0]
2615			   + 256 * local->last_bcn.beacon_intvl[1]);
2616
2617		p = local->last_bcn.elements;
2618		if (p[0] == C_ESSID_ELEMENT_ID)
2619			p += p[1] + 2;
2620		else {
2621			seq_printf(m,
2622				   "Parse beacon failed at essid element id = %d\n",
2623				   p[0]);
2624			return 0;
2625		}
2626
2627		if (p[0] == C_SUPPORTED_RATES_ELEMENT_ID) {
2628			seq_puts(m, "Supported rate codes = ");
2629			for (i = 2; i < p[1] + 2; i++)
2630				seq_printf(m, "0x%02x ", p[i]);
2631			seq_putc(m, '\n');
2632			p += p[1] + 2;
2633		} else {
2634			seq_puts(m, "Parse beacon failed at rates element\n");
2635			return 0;
2636		}
2637
2638		if (p[0] == C_FH_PARAM_SET_ELEMENT_ID) {
2639			pfh = (struct freq_hop_element *)p;
2640			seq_printf(m, "Hop dwell            = %d Kus\n",
2641				   pfh->dwell_time[0] +
2642				   256 * pfh->dwell_time[1]);
2643			seq_printf(m, "Hop set              = %d\n",
2644				   pfh->hop_set);
2645			seq_printf(m, "Hop pattern          = %d\n",
2646				   pfh->hop_pattern);
2647			seq_printf(m, "Hop index            = %d\n",
2648				   pfh->hop_index);
2649			p += p[1] + 2;
2650		} else {
2651			seq_puts(m,
2652				 "Parse beacon failed at FH param element\n");
2653			return 0;
2654		}
2655	} else {
2656		seq_puts(m, "No beacons received\n");
2657	}
2658	return 0;
2659}
2660#endif
2661/*===========================================================================*/
2662static int build_auth_frame(ray_dev_t *local, UCHAR *dest, int auth_type)
2663{
2664	int addr;
2665	struct ccs __iomem *pccs;
2666	struct tx_msg __iomem *ptx;
2667	int ccsindex;
2668
2669	/* If no tx buffers available, return */
2670	if ((ccsindex = get_free_tx_ccs(local)) < 0) {
2671		pr_debug("ray_cs send authenticate - No free tx ccs\n");
2672		return -1;
2673	}
2674
2675	pccs = ccs_base(local) + ccsindex;
2676
2677	/* Address in card space */
2678	addr = TX_BUF_BASE + (ccsindex << 11);
2679	/* fill in the CCS */
2680	writeb(CCS_TX_REQUEST, &pccs->cmd);
2681	writeb(addr >> 8, pccs->var.tx_request.tx_data_ptr);
2682	writeb(0x20, pccs->var.tx_request.tx_data_ptr + 1);
2683	writeb(TX_AUTHENTICATE_LENGTH_MSB, pccs->var.tx_request.tx_data_length);
2684	writeb(TX_AUTHENTICATE_LENGTH_LSB,
2685	       pccs->var.tx_request.tx_data_length + 1);
2686	writeb(0, &pccs->var.tx_request.pow_sav_mode);
2687
2688	ptx = local->sram + addr;
2689	/* fill in the mac header */
2690	writeb(PROTOCOL_VER | AUTHENTIC_TYPE, &ptx->mac.frame_ctl_1);
2691	writeb(0, &ptx->mac.frame_ctl_2);
2692
2693	memcpy_toio(ptx->mac.addr_1, dest, ADDRLEN);
2694	memcpy_toio(ptx->mac.addr_2, local->sparm.b4.a_mac_addr, ADDRLEN);
2695	memcpy_toio(ptx->mac.addr_3, local->bss_id, ADDRLEN);
2696
2697	/* Fill in msg body with protocol 00 00, sequence 01 00 ,status 00 00 */
2698	memset_io(ptx->var, 0, 6);
2699	writeb(auth_type & 0xff, ptx->var + 2);
2700
2701	/* Interrupt the firmware to process the command */
2702	if (interrupt_ecf(local, ccsindex)) {
2703		pr_debug(
2704		      "ray_cs send authentication request failed - ECF not ready for intr\n");
2705		writeb(CCS_BUFFER_FREE, &(pccs++)->buffer_status);
2706		return -1;
2707	}
2708	return 0;
2709} /* End build_auth_frame */
2710
2711/*===========================================================================*/
2712#ifdef CONFIG_PROC_FS
2713static ssize_t ray_cs_essid_proc_write(struct file *file,
2714		const char __user *buffer, size_t count, loff_t *pos)
2715{
2716	static char proc_essid[33];
2717	unsigned int len = count;
2718
2719	if (len > 32)
2720		len = 32;
2721	memset(proc_essid, 0, 33);
2722	if (copy_from_user(proc_essid, buffer, len))
2723		return -EFAULT;
2724	essid = proc_essid;
2725	return count;
2726}
2727
2728static const struct proc_ops ray_cs_essid_proc_ops = {
2729	.proc_write	= ray_cs_essid_proc_write,
2730	.proc_lseek	= noop_llseek,
2731};
2732
2733static ssize_t int_proc_write(struct file *file, const char __user *buffer,
2734			      size_t count, loff_t *pos)
2735{
2736	static char proc_number[10];
2737	char *p;
2738	int nr, len;
2739
2740	if (!count)
2741		return 0;
2742
2743	if (count > 9)
2744		return -EINVAL;
2745	if (copy_from_user(proc_number, buffer, count))
2746		return -EFAULT;
2747	p = proc_number;
2748	nr = 0;
2749	len = count;
2750	do {
2751		unsigned int c = *p - '0';
2752		if (c > 9)
2753			return -EINVAL;
2754		nr = nr * 10 + c;
2755		p++;
2756	} while (--len);
2757	*(int *)PDE_DATA(file_inode(file)) = nr;
2758	return count;
2759}
2760
2761static const struct proc_ops int_proc_ops = {
2762	.proc_write	= int_proc_write,
2763	.proc_lseek	= noop_llseek,
2764};
2765#endif
2766
2767static const struct pcmcia_device_id ray_ids[] = {
2768	PCMCIA_DEVICE_MANF_CARD(0x01a6, 0x0000),
2769	PCMCIA_DEVICE_NULL,
2770};
2771
2772MODULE_DEVICE_TABLE(pcmcia, ray_ids);
2773
2774static struct pcmcia_driver ray_driver = {
2775	.owner = THIS_MODULE,
2776	.name = "ray_cs",
2777	.probe = ray_probe,
2778	.remove = ray_detach,
2779	.id_table = ray_ids,
2780	.suspend = ray_suspend,
2781	.resume = ray_resume,
2782};
2783
2784static int __init init_ray_cs(void)
2785{
2786	int rc;
2787
2788	pr_debug("%s\n", rcsid);
2789	rc = pcmcia_register_driver(&ray_driver);
2790	pr_debug("raylink init_module register_pcmcia_driver returns 0x%x\n",
2791	      rc);
2792	if (rc)
2793		return rc;
2794
2795#ifdef CONFIG_PROC_FS
2796	proc_mkdir("driver/ray_cs", NULL);
2797
2798	proc_create_single("driver/ray_cs/ray_cs", 0, NULL, ray_cs_proc_show);
2799	proc_create("driver/ray_cs/essid", 0200, NULL, &ray_cs_essid_proc_ops);
2800	proc_create_data("driver/ray_cs/net_type", 0200, NULL, &int_proc_ops,
2801			 &net_type);
2802	proc_create_data("driver/ray_cs/translate", 0200, NULL, &int_proc_ops,
2803			 &translate);
2804#endif
2805	translate = !!translate;
2806	return 0;
2807} /* init_ray_cs */
2808
2809/*===========================================================================*/
2810
2811static void __exit exit_ray_cs(void)
2812{
2813	pr_debug("ray_cs: cleanup_module\n");
2814
2815#ifdef CONFIG_PROC_FS
2816	remove_proc_subtree("driver/ray_cs", NULL);
2817#endif
2818
2819	pcmcia_unregister_driver(&ray_driver);
2820} /* exit_ray_cs */
2821
2822module_init(init_ray_cs);
2823module_exit(exit_ray_cs);
2824
2825/*===========================================================================*/
2826