git.rot13.org Git - linux/blob - drivers/net/wireless/ray_cs.c

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