drivers/net/wireless/ray_cs.c

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