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