drivers/net/wireless/ray_cs.c

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