drivers/net/pcmcia/fmvj18x_cs.c

   1 /*======================================================================
   2     fmvj18x_cs.c 2.8 2002/03/23
   3
   4     A fmvj18x (and its compatibles) PCMCIA client driver
   5
   6     Contributed by Shingo Fujimoto, shingo@flab.fujitsu.co.jp
   7
   8     TDK LAK-CD021 and CONTEC C-NET(PC)C support added by
   9     Nobuhiro Katayama, kata-n@po.iijnet.or.jp
  10
  11     The PCMCIA client code is based on code written by David Hinds.
  12     Network code is based on the "FMV-18x driver" by Yutaka TAMIYA
  13     but is actually largely Donald Becker's AT1700 driver, which
  14     carries the following attribution:
  15
  16     Written 1993-94 by Donald Becker.
  17
  18     Copyright 1993 United States Government as represented by the
  19     Director, National Security Agency.
  20
  21     This software may be used and distributed according to the terms
  22     of the GNU General Public License, incorporated herein by reference.
  23
  24     The author may be reached as becker@scyld.com, or C/O
  25     Scyld Computing Corporation
  26     410 Severn Ave., Suite 210
  27     Annapolis MD 21403
  28
  29 ======================================================================*/
  30
  31 #define DRV_NAME        "fmvj18x_cs"
  32 #define DRV_VERSION     "2.9"
  33
  34 #include <linux/module.h>
  35 #include <linux/kernel.h>
  36 #include <linux/init.h>
  37 #include <linux/ptrace.h>
  38 #include <linux/slab.h>
  39 #include <linux/string.h>
  40 #include <linux/timer.h>
  41 #include <linux/interrupt.h>
  42 #include <linux/in.h>
  43 #include <linux/delay.h>
  44 #include <linux/ethtool.h>
  45 #include <linux/netdevice.h>
  46 #include <linux/etherdevice.h>
  47 #include <linux/skbuff.h>
  48 #include <linux/if_arp.h>
  49 #include <linux/ioport.h>
  50 #include <linux/crc32.h>
  51
  52 #include <pcmcia/cistpl.h>
  53 #include <pcmcia/ciscode.h>
  54 #include <pcmcia/ds.h>
  55
  56 #include <asm/uaccess.h>
  57 #include <asm/io.h>
  58 #include <asm/system.h>
  59
  60 /*====================================================================*/
  61
  62 /* Module parameters */
  63
  64 MODULE_DESCRIPTION("fmvj18x and compatible PCMCIA ethernet driver");
  65 MODULE_LICENSE("GPL");
  66
  67 #define INT_MODULE_PARM(n, v) static int n = v; module_param(n, int, 0)
  68
  69 /* SRAM configuration */
  70 /* 0:4KB*2 TX buffer   else:8KB*2 TX buffer */
  71 INT_MODULE_PARM(sram_config, 0);
  72
  73
  74 /*====================================================================*/
  75 /*
  76     PCMCIA event handlers
  77  */
  78 static int fmvj18x_config(struct pcmcia_device *link);
  79 static int fmvj18x_get_hwinfo(struct pcmcia_device *link, u_char *node_id);
  80 static int fmvj18x_setup_mfc(struct pcmcia_device *link);
  81 static void fmvj18x_release(struct pcmcia_device *link);
  82 static void fmvj18x_detach(struct pcmcia_device *p_dev);
  83
  84 /*
  85     LAN controller(MBH86960A) specific routines
  86  */
  87 static int fjn_config(struct net_device *dev, struct ifmap *map);
  88 static int fjn_open(struct net_device *dev);
  89 static int fjn_close(struct net_device *dev);
  90 static netdev_tx_t fjn_start_xmit(struct sk_buff *skb,
  91                                         struct net_device *dev);
  92 static irqreturn_t fjn_interrupt(int irq, void *dev_id);
  93 static void fjn_rx(struct net_device *dev);
  94 static void fjn_reset(struct net_device *dev);
  95 static void set_rx_mode(struct net_device *dev);
  96 static void fjn_tx_timeout(struct net_device *dev);
  97 static const struct ethtool_ops netdev_ethtool_ops;
  98
  99 /*
 100     card type
 101  */
 102 typedef enum { MBH10302, MBH10304, TDK, CONTEC, LA501, UNGERMANN,
 103                XXX10304, NEC, KME
 104 } cardtype_t;
 105
 106 /*
 107     driver specific data structure
 108 */
 109 typedef struct local_info_t {
 110         struct pcmcia_device    *p_dev;
 111     long open_time;
 112     uint tx_started:1;
 113     uint tx_queue;
 114     u_short tx_queue_len;
 115     cardtype_t cardtype;
 116     u_short sent;
 117     u_char __iomem *base;
 118 } local_info_t;
 119
 120 #define MC_FILTERBREAK 64
 121
 122 /*====================================================================*/
 123 /*
 124     ioport offset from the base address
 125  */
 126 #define TX_STATUS               0 /* transmit status register */
 127 #define RX_STATUS               1 /* receive status register */
 128 #define TX_INTR                 2 /* transmit interrupt mask register */
 129 #define RX_INTR                 3 /* receive interrupt mask register */
 130 #define TX_MODE                 4 /* transmit mode register */
 131 #define RX_MODE                 5 /* receive mode register */
 132 #define CONFIG_0                6 /* configuration register 0 */
 133 #define CONFIG_1                7 /* configuration register 1 */
 134
 135 #define NODE_ID                 8 /* node ID register            (bank 0) */
 136 #define MAR_ADR                 8 /* multicast address registers (bank 1) */
 137
 138 #define DATAPORT                8 /* buffer mem port registers   (bank 2) */
 139 #define TX_START               10 /* transmit start register */
 140 #define COL_CTRL               11 /* 16 collision control register */
 141 #define BMPR12                 12 /* reserved */
 142 #define BMPR13                 13 /* reserved */
 143 #define RX_SKIP                14 /* skip received packet register */
 144
 145 #define LAN_CTRL               16 /* LAN card control register */
 146
 147 #define MAC_ID               0x1a /* hardware address */
 148 #define UNGERMANN_MAC_ID     0x18 /* UNGERMANN-BASS hardware address */
 149
 150 /*
 151     control bits
 152  */
 153 #define ENA_TMT_OK           0x80
 154 #define ENA_TMT_REC          0x20
 155 #define ENA_COL              0x04
 156 #define ENA_16_COL           0x02
 157 #define ENA_TBUS_ERR         0x01
 158
 159 #define ENA_PKT_RDY          0x80
 160 #define ENA_BUS_ERR          0x40
 161 #define ENA_LEN_ERR          0x08
 162 #define ENA_ALG_ERR          0x04
 163 #define ENA_CRC_ERR          0x02
 164 #define ENA_OVR_FLO          0x01
 165
 166 /* flags */
 167 #define F_TMT_RDY            0x80 /* can accept new packet */
 168 #define F_NET_BSY            0x40 /* carrier is detected */
 169 #define F_TMT_OK             0x20 /* send packet successfully */
 170 #define F_SRT_PKT            0x10 /* short packet error */
 171 #define F_COL_ERR            0x04 /* collision error */
 172 #define F_16_COL             0x02 /* 16 collision error */
 173 #define F_TBUS_ERR           0x01 /* bus read error */
 174
 175 #define F_PKT_RDY            0x80 /* packet(s) in buffer */
 176 #define F_BUS_ERR            0x40 /* bus read error */
 177 #define F_LEN_ERR            0x08 /* short packet */
 178 #define F_ALG_ERR            0x04 /* frame error */
 179 #define F_CRC_ERR            0x02 /* CRC error */
 180 #define F_OVR_FLO            0x01 /* overflow error */
 181
 182 #define F_BUF_EMP            0x40 /* receive buffer is empty */
 183
 184 #define F_SKP_PKT            0x05 /* drop packet in buffer */
 185
 186 /* default bitmaps */
 187 #define D_TX_INTR  ( ENA_TMT_OK )
 188 #define D_RX_INTR  ( ENA_PKT_RDY | ENA_LEN_ERR \
 189                    | ENA_ALG_ERR | ENA_CRC_ERR | ENA_OVR_FLO )
 190 #define TX_STAT_M  ( F_TMT_RDY )
 191 #define RX_STAT_M  ( F_PKT_RDY | F_LEN_ERR \
 192                    | F_ALG_ERR | F_CRC_ERR | F_OVR_FLO )
 193
 194 /* commands */
 195 #define D_TX_MODE            0x06 /* no tests, detect carrier */
 196 #define ID_MATCHED           0x02 /* (RX_MODE) */
 197 #define RECV_ALL             0x03 /* (RX_MODE) */
 198 #define CONFIG0_DFL          0x5a /* 16bit bus, 4K x 2 Tx queues */
 199 #define CONFIG0_DFL_1        0x5e /* 16bit bus, 8K x 2 Tx queues */
 200 #define CONFIG0_RST          0xda /* Data Link Controller off (CONFIG_0) */
 201 #define CONFIG0_RST_1        0xde /* Data Link Controller off (CONFIG_0) */
 202 #define BANK_0               0xa0 /* bank 0 (CONFIG_1) */
 203 #define BANK_1               0xa4 /* bank 1 (CONFIG_1) */
 204 #define BANK_2               0xa8 /* bank 2 (CONFIG_1) */
 205 #define CHIP_OFF             0x80 /* contrl chip power off (CONFIG_1) */
 206 #define DO_TX                0x80 /* do transmit packet */
 207 #define SEND_PKT             0x81 /* send a packet */
 208 #define AUTO_MODE            0x07 /* Auto skip packet on 16 col detected */
 209 #define MANU_MODE            0x03 /* Stop and skip packet on 16 col */
 210 #define TDK_AUTO_MODE        0x47 /* Auto skip packet on 16 col detected */
 211 #define TDK_MANU_MODE        0x43 /* Stop and skip packet on 16 col */
 212 #define INTR_OFF             0x0d /* LAN controller ignores interrupts */
 213 #define INTR_ON              0x1d /* LAN controller will catch interrupts */
 214
 215 #define TX_TIMEOUT              ((400*HZ)/1000)
 216
 217 #define BANK_0U              0x20 /* bank 0 (CONFIG_1) */
 218 #define BANK_1U              0x24 /* bank 1 (CONFIG_1) */
 219 #define BANK_2U              0x28 /* bank 2 (CONFIG_1) */
 220
 221 static const struct net_device_ops fjn_netdev_ops = {
 222         .ndo_open               = fjn_open,
 223         .ndo_stop               = fjn_close,
 224         .ndo_start_xmit         = fjn_start_xmit,
 225         .ndo_tx_timeout         = fjn_tx_timeout,
 226         .ndo_set_config         = fjn_config,
 227         .ndo_set_multicast_list = set_rx_mode,
 228         .ndo_change_mtu         = eth_change_mtu,
 229         .ndo_set_mac_address    = eth_mac_addr,
 230         .ndo_validate_addr      = eth_validate_addr,
 231 };
 232
 233 static int fmvj18x_probe(struct pcmcia_device *link)
 234 {
 235     local_info_t *lp;
 236     struct net_device *dev;
 237
 238     dev_dbg(&link->dev, "fmvj18x_attach()\n");
 239
 240     /* Make up a FMVJ18x specific data structure */
 241     dev = alloc_etherdev(sizeof(local_info_t));
 242     if (!dev)
 243         return -ENOMEM;
 244     lp = netdev_priv(dev);
 245     link->priv = dev;
 246     lp->p_dev = link;
 247     lp->base = NULL;
 248
 249     /* The io structure describes IO port mapping */
 250     link->resource[0]->end = 32;
 251     link->resource[0]->flags |= IO_DATA_PATH_WIDTH_AUTO;
 252
 253     /* General socket configuration */
 254     link->config_flags |= CONF_ENABLE_IRQ;
 255
 256     dev->netdev_ops = &fjn_netdev_ops;
 257     dev->watchdog_timeo = TX_TIMEOUT;
 258
 259     SET_ETHTOOL_OPS(dev, &netdev_ethtool_ops);
 260
 261     return fmvj18x_config(link);
 262 } /* fmvj18x_attach */
 263
 264 /*====================================================================*/
 265
 266 static void fmvj18x_detach(struct pcmcia_device *link)
 267 {
 268     struct net_device *dev = link->priv;
 269
 270     dev_dbg(&link->dev, "fmvj18x_detach\n");
 271
 272     unregister_netdev(dev);
 273
 274     fmvj18x_release(link);
 275
 276     free_netdev(dev);
 277 } /* fmvj18x_detach */
 278
 279 /*====================================================================*/
 280
 281 static int mfc_try_io_port(struct pcmcia_device *link)
 282 {
 283     int i, ret;
 284     static const unsigned int serial_base[5] =
 285         { 0x3f8, 0x2f8, 0x3e8, 0x2e8, 0x0 };
 286
 287     for (i = 0; i < 5; i++) {
 288         link->resource[1]->start = serial_base[i];
 289         link->resource[1]->flags |= IO_DATA_PATH_WIDTH_8;
 290         if (link->resource[1]->start == 0) {
 291             link->resource[1]->end = 0;
 292             printk(KERN_NOTICE "fmvj18x_cs: out of resource for serial\n");
 293         }
 294         ret = pcmcia_request_io(link);
 295         if (ret == 0)
 296                 return ret;
 297     }
 298     return ret;
 299 }
 300
 301 static int ungermann_try_io_port(struct pcmcia_device *link)
 302 {
 303     int ret;
 304     unsigned int ioaddr;
 305     /*
 306         Ungermann-Bass Access/CARD accepts 0x300,0x320,0x340,0x360
 307         0x380,0x3c0 only for ioport.
 308     */
 309     for (ioaddr = 0x300; ioaddr < 0x3e0; ioaddr += 0x20) {
 310         link->resource[0]->start = ioaddr;
 311         ret = pcmcia_request_io(link);
 312         if (ret == 0) {
 313             /* calculate ConfigIndex value */
 314             link->config_index =
 315                 ((link->resource[0]->start & 0x0f0) >> 3) | 0x22;
 316             return ret;
 317         }
 318     }
 319     return ret; /* RequestIO failed */
 320 }
 321
 322 static int fmvj18x_ioprobe(struct pcmcia_device *p_dev, void *priv_data)
 323 {
 324         return 0; /* strange, but that's what the code did already before... */
 325 }
 326
 327 static int fmvj18x_config(struct pcmcia_device *link)
 328 {
 329     struct net_device *dev = link->priv;
 330     local_info_t *lp = netdev_priv(dev);
 331     int i, ret;
 332     unsigned int ioaddr;
 333     cardtype_t cardtype;
 334     char *card_name = "unknown";
 335     u8 *buf;
 336     size_t len;
 337     u_char buggybuf[32];
 338
 339     dev_dbg(&link->dev, "fmvj18x_config\n");
 340
 341     link->io_lines = 5;
 342
 343     len = pcmcia_get_tuple(link, CISTPL_FUNCE, &buf);
 344     kfree(buf);
 345
 346     if (len) {
 347         /* Yes, I have CISTPL_FUNCE. Let's check CISTPL_MANFID */
 348         ret = pcmcia_loop_config(link, fmvj18x_ioprobe, NULL);
 349         if (ret != 0)
 350                 goto failed;
 351
 352         switch (link->manf_id) {
 353         case MANFID_TDK:
 354             cardtype = TDK;
 355             if (link->card_id == PRODID_TDK_GN3410 ||
 356                 link->card_id == PRODID_TDK_NP9610 ||
 357                 link->card_id == PRODID_TDK_MN3200) {
 358                 /* MultiFunction Card */
 359                 link->config_base = 0x800;
 360                 link->config_index = 0x47;
 361                 link->resource[1]->end = 8;
 362             }
 363             break;
 364         case MANFID_NEC:
 365             cardtype = NEC; /* MultiFunction Card */
 366             link->config_base = 0x800;
 367             link->config_index = 0x47;
 368             link->resource[1]->end = 8;
 369             break;
 370         case MANFID_KME:
 371             cardtype = KME; /* MultiFunction Card */
 372             link->config_base = 0x800;
 373             link->config_index = 0x47;
 374             link->resource[1]->end = 8;
 375             break;
 376         case MANFID_CONTEC:
 377             cardtype = CONTEC;
 378             break;
 379         case MANFID_FUJITSU:
 380             if (link->config_base == 0x0fe0)
 381                 cardtype = MBH10302;
 382             else if (link->card_id == PRODID_FUJITSU_MBH10302)
 383                 /* RATOC REX-5588/9822/4886's PRODID are 0004(=MBH10302),
 384                    but these are MBH10304 based card. */
 385                 cardtype = MBH10304;
 386             else if (link->card_id == PRODID_FUJITSU_MBH10304)
 387                 cardtype = MBH10304;
 388             else
 389                 cardtype = LA501;
 390             break;
 391         default:
 392             cardtype = MBH10304;
 393         }
 394     } else {
 395         /* old type card */
 396         switch (link->manf_id) {
 397         case MANFID_FUJITSU:
 398             if (link->card_id == PRODID_FUJITSU_MBH10304) {
 399                 cardtype = XXX10304;    /* MBH10304 with buggy CIS */
 400                 link->config_index = 0x20;
 401             } else {
 402                 cardtype = MBH10302;    /* NextCom NC5310, etc. */
 403                 link->config_index = 1;
 404             }
 405             break;
 406         case MANFID_UNGERMANN:
 407             cardtype = UNGERMANN;
 408             break;
 409         default:
 410             cardtype = MBH10302;
 411             link->config_index = 1;
 412         }
 413     }
 414
 415     if (link->resource[1]->end != 0) {
 416         ret = mfc_try_io_port(link);
 417         if (ret != 0) goto failed;
 418     } else if (cardtype == UNGERMANN) {
 419         ret = ungermann_try_io_port(link);
 420         if (ret != 0) goto failed;
 421     } else {
 422             ret = pcmcia_request_io(link);
 423             if (ret)
 424                     goto failed;
 425     }
 426     ret = pcmcia_request_irq(link, fjn_interrupt);
 427     if (ret)
 428             goto failed;
 429     ret = pcmcia_enable_device(link);
 430     if (ret)
 431             goto failed;
 432
 433     dev->irq = link->irq;
 434     dev->base_addr = link->resource[0]->start;
 435
 436     if (resource_size(link->resource[1]) != 0) {
 437         ret = fmvj18x_setup_mfc(link);
 438         if (ret != 0) goto failed;
 439     }
 440
 441     ioaddr = dev->base_addr;
 442
 443     /* Reset controller */
 444     if (sram_config == 0)
 445         outb(CONFIG0_RST, ioaddr + CONFIG_0);
 446     else
 447         outb(CONFIG0_RST_1, ioaddr + CONFIG_0);
 448
 449     /* Power On chip and select bank 0 */
 450     if (cardtype == MBH10302)
 451         outb(BANK_0, ioaddr + CONFIG_1);
 452     else
 453         outb(BANK_0U, ioaddr + CONFIG_1);
 454
 455     /* Set hardware address */
 456     switch (cardtype) {
 457     case MBH10304:
 458     case TDK:
 459     case LA501:
 460     case CONTEC:
 461     case NEC:
 462     case KME:
 463         if (cardtype == MBH10304) {
 464             card_name = "FMV-J182";
 465
 466             len = pcmcia_get_tuple(link, CISTPL_FUNCE, &buf);
 467             if (len < 11) {
 468                     kfree(buf);
 469                     goto failed;
 470             }
 471             /* Read MACID from CIS */
 472             for (i = 5; i < 11; i++)
 473                     dev->dev_addr[i] = buf[i];
 474             kfree(buf);
 475         } else {
 476             if (pcmcia_get_mac_from_cis(link, dev))
 477                 goto failed;
 478             if( cardtype == TDK ) {
 479                 card_name = "TDK LAK-CD021";
 480             } else if( cardtype == LA501 ) {
 481                 card_name = "LA501";
 482             } else if( cardtype == NEC ) {
 483                 card_name = "PK-UG-J001";
 484             } else if( cardtype == KME ) {
 485                 card_name = "Panasonic";
 486             } else {
 487                 card_name = "C-NET(PC)C";
 488             }
 489         }
 490         break;
 491     case UNGERMANN:
 492         /* Read MACID from register */
 493         for (i = 0; i < 6; i++)
 494             dev->dev_addr[i] = inb(ioaddr + UNGERMANN_MAC_ID + i);
 495         card_name = "Access/CARD";
 496         break;
 497     case XXX10304:
 498         /* Read MACID from Buggy CIS */
 499         if (fmvj18x_get_hwinfo(link, buggybuf) == -1) {
 500             printk(KERN_NOTICE "fmvj18x_cs: unable to read hardware net address.\n");
 501             goto failed;
 502         }
 503         for (i = 0 ; i < 6; i++) {
 504             dev->dev_addr[i] = buggybuf[i];
 505         }
 506         card_name = "FMV-J182";
 507         break;
 508     case MBH10302:
 509     default:
 510         /* Read MACID from register */
 511         for (i = 0; i < 6; i++)
 512             dev->dev_addr[i] = inb(ioaddr + MAC_ID + i);
 513         card_name = "FMV-J181";
 514         break;
 515     }
 516
 517     lp->cardtype = cardtype;
 518     SET_NETDEV_DEV(dev, &link->dev);
 519
 520     if (register_netdev(dev) != 0) {
 521         printk(KERN_NOTICE "fmvj18x_cs: register_netdev() failed\n");
 522         goto failed;
 523     }
 524
 525     /* print current configuration */
 526     printk(KERN_INFO "%s: %s, sram %s, port %#3lx, irq %d, "
 527            "hw_addr %pM\n",
 528            dev->name, card_name, sram_config == 0 ? "4K TX*2" : "8K TX*2",
 529            dev->base_addr, dev->irq, dev->dev_addr);
 530
 531     return 0;
 532
 533 failed:
 534     fmvj18x_release(link);
 535     return -ENODEV;
 536 } /* fmvj18x_config */
 537 /*====================================================================*/
 538
 539 static int fmvj18x_get_hwinfo(struct pcmcia_device *link, u_char *node_id)
 540 {
 541     u_char __iomem *base;
 542     int i, j;
 543
 544     /* Allocate a small memory window */
 545     link->resource[2]->flags |= WIN_DATA_WIDTH_8|WIN_MEMORY_TYPE_AM|WIN_ENABLE;
 546     link->resource[2]->start = 0; link->resource[2]->end = 0;
 547     i = pcmcia_request_window(link, link->resource[2], 0);
 548     if (i != 0)
 549         return -1;
 550
 551     base = ioremap(link->resource[2]->start, resource_size(link->resource[2]));
 552     pcmcia_map_mem_page(link, link->resource[2], 0);
 553
 554     /*
 555      *  MBH10304 CISTPL_FUNCE_LAN_NODE_ID format
 556      *  22 0d xx xx xx 04 06 yy yy yy yy yy yy ff
 557      *  'xx' is garbage.
 558      *  'yy' is MAC address.
 559     */
 560     for (i = 0; i < 0x200; i++) {
 561         if (readb(base+i*2) == 0x22) {
 562                 if (readb(base+(i-1)*2) == 0xff &&
 563                     readb(base+(i+5)*2) == 0x04 &&
 564                     readb(base+(i+6)*2) == 0x06 &&
 565                     readb(base+(i+13)*2) == 0xff)
 566                         break;
 567         }
 568     }
 569
 570     if (i != 0x200) {
 571         for (j = 0 ; j < 6; j++,i++) {
 572             node_id[j] = readb(base+(i+7)*2);
 573         }
 574     }
 575
 576     iounmap(base);
 577     j = pcmcia_release_window(link, link->resource[2]);
 578     return (i != 0x200) ? 0 : -1;
 579
 580 } /* fmvj18x_get_hwinfo */
 581 /*====================================================================*/
 582
 583 static int fmvj18x_setup_mfc(struct pcmcia_device *link)
 584 {
 585     int i;
 586     struct net_device *dev = link->priv;
 587     unsigned int ioaddr;
 588     local_info_t *lp = netdev_priv(dev);
 589
 590     /* Allocate a small memory window */
 591     link->resource[3]->flags = WIN_DATA_WIDTH_8|WIN_MEMORY_TYPE_AM|WIN_ENABLE;
 592     link->resource[3]->start = link->resource[3]->end = 0;
 593     i = pcmcia_request_window(link, link->resource[3], 0);
 594     if (i != 0)
 595         return -1;
 596
 597     lp->base = ioremap(link->resource[3]->start,
 598                        resource_size(link->resource[3]));
 599     if (lp->base == NULL) {
 600         printk(KERN_NOTICE "fmvj18x_cs: ioremap failed\n");
 601         return -1;
 602     }
 603
 604     i = pcmcia_map_mem_page(link, link->resource[3], 0);
 605     if (i != 0) {
 606         iounmap(lp->base);
 607         lp->base = NULL;
 608         return -1;
 609     }
 610
 611     ioaddr = dev->base_addr;
 612     writeb(0x47, lp->base+0x800);       /* Config Option Register of LAN */
 613     writeb(0x0,  lp->base+0x802);       /* Config and Status Register */
 614
 615     writeb(ioaddr & 0xff, lp->base+0x80a);        /* I/O Base(Low) of LAN */
 616     writeb((ioaddr >> 8) & 0xff, lp->base+0x80c); /* I/O Base(High) of LAN */
 617
 618     writeb(0x45, lp->base+0x820);       /* Config Option Register of Modem */
 619     writeb(0x8,  lp->base+0x822);       /* Config and Status Register */
 620
 621     return 0;
 622
 623 }
 624 /*====================================================================*/
 625
 626 static void fmvj18x_release(struct pcmcia_device *link)
 627 {
 628
 629     struct net_device *dev = link->priv;
 630     local_info_t *lp = netdev_priv(dev);
 631     u_char __iomem *tmp;
 632
 633     dev_dbg(&link->dev, "fmvj18x_release\n");
 634
 635     if (lp->base != NULL) {
 636         tmp = lp->base;
 637         lp->base = NULL;    /* set NULL before iounmap */
 638         iounmap(tmp);
 639     }
 640
 641     pcmcia_disable_device(link);
 642
 643 }
 644
 645 static int fmvj18x_suspend(struct pcmcia_device *link)
 646 {
 647         struct net_device *dev = link->priv;
 648
 649         if (link->open)
 650                 netif_device_detach(dev);
 651
 652         return 0;
 653 }
 654
 655 static int fmvj18x_resume(struct pcmcia_device *link)
 656 {
 657         struct net_device *dev = link->priv;
 658
 659         if (link->open) {
 660                 fjn_reset(dev);
 661                 netif_device_attach(dev);
 662         }
 663
 664         return 0;
 665 }
 666
 667 /*====================================================================*/
 668
 669 static struct pcmcia_device_id fmvj18x_ids[] = {
 670         PCMCIA_DEVICE_MANF_CARD(0x0004, 0x0004),
 671         PCMCIA_DEVICE_PROD_ID12("EAGLE Technology", "NE200 ETHERNET LAN MBH10302 04", 0x528c88c4, 0x74f91e59),
 672         PCMCIA_DEVICE_PROD_ID12("Eiger Labs,Inc", "EPX-10BT PC Card Ethernet 10BT", 0x53af556e, 0x877f9922),
 673         PCMCIA_DEVICE_PROD_ID12("Eiger labs,Inc.", "EPX-10BT PC Card Ethernet 10BT", 0xf47e6c66, 0x877f9922),
 674         PCMCIA_DEVICE_PROD_ID12("FUJITSU", "LAN Card(FMV-J182)", 0x6ee5a3d8, 0x5baf31db),
 675         PCMCIA_DEVICE_PROD_ID12("FUJITSU", "MBH10308", 0x6ee5a3d8, 0x3f04875e),
 676         PCMCIA_DEVICE_PROD_ID12("FUJITSU TOWA", "LA501", 0xb8451188, 0x12939ba2),
 677         PCMCIA_DEVICE_PROD_ID12("HITACHI", "HT-4840-11", 0xf4f43949, 0x773910f4),
 678         PCMCIA_DEVICE_PROD_ID12("NextComK.K.", "NC5310B Ver1.0       ", 0x8cef4d3a, 0x075fc7b6),
 679         PCMCIA_DEVICE_PROD_ID12("NextComK.K.", "NC5310 Ver1.0        ", 0x8cef4d3a, 0xbccf43e6),
 680         PCMCIA_DEVICE_PROD_ID12("RATOC System Inc.", "10BASE_T CARD R280", 0x85c10e17, 0xd9413666),
 681         PCMCIA_DEVICE_PROD_ID12("TDK", "LAC-CD02x", 0x1eae9475, 0x8fa0ee70),
 682         PCMCIA_DEVICE_PROD_ID12("TDK", "LAC-CF010", 0x1eae9475, 0x7683bc9a),
 683         PCMCIA_DEVICE_PROD_ID1("CONTEC Co.,Ltd.", 0x58d8fee2),
 684         PCMCIA_DEVICE_PROD_ID1("PCMCIA LAN MBH10304  ES", 0x2599f454),
 685         PCMCIA_DEVICE_PROD_ID1("PCMCIA MBH10302", 0x8f4005da),
 686         PCMCIA_DEVICE_PROD_ID1("UBKK,V2.0", 0x90888080),
 687         PCMCIA_PFC_DEVICE_PROD_ID12(0, "TDK", "GlobalNetworker 3410/3412", 0x1eae9475, 0xd9a93bed),
 688         PCMCIA_PFC_DEVICE_PROD_ID12(0, "NEC", "PK-UG-J001" ,0x18df0ba0 ,0x831b1064),
 689         PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0105, 0x0d0a),
 690         PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0105, 0x0e0a),
 691         PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0032, 0x0e01),
 692         PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0032, 0x0a05),
 693         PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0032, 0x1101),
 694         PCMCIA_DEVICE_NULL,
 695 };
 696 MODULE_DEVICE_TABLE(pcmcia, fmvj18x_ids);
 697
 698 static struct pcmcia_driver fmvj18x_cs_driver = {
 699         .owner          = THIS_MODULE,
 700         .name           = "fmvj18x_cs",
 701         .probe          = fmvj18x_probe,
 702         .remove         = fmvj18x_detach,
 703         .id_table       = fmvj18x_ids,
 704         .suspend        = fmvj18x_suspend,
 705         .resume         = fmvj18x_resume,
 706 };
 707
 708 static int __init init_fmvj18x_cs(void)
 709 {
 710         return pcmcia_register_driver(&fmvj18x_cs_driver);
 711 }
 712
 713 static void __exit exit_fmvj18x_cs(void)
 714 {
 715         pcmcia_unregister_driver(&fmvj18x_cs_driver);
 716 }
 717
 718 module_init(init_fmvj18x_cs);
 719 module_exit(exit_fmvj18x_cs);
 720
 721 /*====================================================================*/
 722
 723 static irqreturn_t fjn_interrupt(int dummy, void *dev_id)
 724 {
 725     struct net_device *dev = dev_id;
 726     local_info_t *lp = netdev_priv(dev);
 727     unsigned int ioaddr;
 728     unsigned short tx_stat, rx_stat;
 729
 730     ioaddr = dev->base_addr;
 731
 732     /* avoid multiple interrupts */
 733     outw(0x0000, ioaddr + TX_INTR);
 734
 735     /* wait for a while */
 736     udelay(1);
 737
 738     /* get status */
 739     tx_stat = inb(ioaddr + TX_STATUS);
 740     rx_stat = inb(ioaddr + RX_STATUS);
 741
 742     /* clear status */
 743     outb(tx_stat, ioaddr + TX_STATUS);
 744     outb(rx_stat, ioaddr + RX_STATUS);
 745
 746     pr_debug("%s: interrupt, rx_status %02x.\n", dev->name, rx_stat);
 747     pr_debug("               tx_status %02x.\n", tx_stat);
 748
 749     if (rx_stat || (inb(ioaddr + RX_MODE) & F_BUF_EMP) == 0) {
 750         /* there is packet(s) in rx buffer */
 751         fjn_rx(dev);
 752     }
 753     if (tx_stat & F_TMT_RDY) {
 754         dev->stats.tx_packets += lp->sent ;
 755         lp->sent = 0 ;
 756         if (lp->tx_queue) {
 757             outb(DO_TX | lp->tx_queue, ioaddr + TX_START);
 758             lp->sent = lp->tx_queue ;
 759             lp->tx_queue = 0;
 760             lp->tx_queue_len = 0;
 761             dev->trans_start = jiffies;
 762         } else {
 763             lp->tx_started = 0;
 764         }
 765         netif_wake_queue(dev);
 766     }
 767     pr_debug("%s: exiting interrupt,\n", dev->name);
 768     pr_debug("    tx_status %02x, rx_status %02x.\n", tx_stat, rx_stat);
 769
 770     outb(D_TX_INTR, ioaddr + TX_INTR);
 771     outb(D_RX_INTR, ioaddr + RX_INTR);
 772
 773     if (lp->base != NULL) {
 774         /* Ack interrupt for multifunction card */
 775         writeb(0x01, lp->base+0x802);
 776         writeb(0x09, lp->base+0x822);
 777     }
 778
 779     return IRQ_HANDLED;
 780
 781 } /* fjn_interrupt */
 782
 783 /*====================================================================*/
 784
 785 static void fjn_tx_timeout(struct net_device *dev)
 786 {
 787     struct local_info_t *lp = netdev_priv(dev);
 788     unsigned int ioaddr = dev->base_addr;
 789
 790     printk(KERN_NOTICE "%s: transmit timed out with status %04x, %s?\n",
 791            dev->name, htons(inw(ioaddr + TX_STATUS)),
 792            inb(ioaddr + TX_STATUS) & F_TMT_RDY
 793            ? "IRQ conflict" : "network cable problem");
 794     printk(KERN_NOTICE "%s: timeout registers: %04x %04x %04x "
 795            "%04x %04x %04x %04x %04x.\n",
 796            dev->name, htons(inw(ioaddr + 0)),
 797            htons(inw(ioaddr + 2)), htons(inw(ioaddr + 4)),
 798            htons(inw(ioaddr + 6)), htons(inw(ioaddr + 8)),
 799            htons(inw(ioaddr +10)), htons(inw(ioaddr +12)),
 800            htons(inw(ioaddr +14)));
 801     dev->stats.tx_errors++;
 802     /* ToDo: We should try to restart the adaptor... */
 803     local_irq_disable();
 804     fjn_reset(dev);
 805
 806     lp->tx_started = 0;
 807     lp->tx_queue = 0;
 808     lp->tx_queue_len = 0;
 809     lp->sent = 0;
 810     lp->open_time = jiffies;
 811     local_irq_enable();
 812     netif_wake_queue(dev);
 813 }
 814
 815 static netdev_tx_t fjn_start_xmit(struct sk_buff *skb,
 816                                         struct net_device *dev)
 817 {
 818     struct local_info_t *lp = netdev_priv(dev);
 819     unsigned int ioaddr = dev->base_addr;
 820     short length = skb->len;
 821
 822     if (length < ETH_ZLEN)
 823     {
 824         if (skb_padto(skb, ETH_ZLEN))
 825                 return NETDEV_TX_OK;
 826         length = ETH_ZLEN;
 827     }
 828
 829     netif_stop_queue(dev);
 830
 831     {
 832         unsigned char *buf = skb->data;
 833
 834         if (length > ETH_FRAME_LEN) {
 835             printk(KERN_NOTICE "%s: Attempting to send a large packet"
 836                    " (%d bytes).\n", dev->name, length);
 837             return NETDEV_TX_BUSY;
 838         }
 839
 840         pr_debug("%s: Transmitting a packet of length %lu.\n",
 841               dev->name, (unsigned long)skb->len);
 842         dev->stats.tx_bytes += skb->len;
 843
 844         /* Disable both interrupts. */
 845         outw(0x0000, ioaddr + TX_INTR);
 846
 847         /* wait for a while */
 848         udelay(1);
 849
 850         outw(length, ioaddr + DATAPORT);
 851         outsw(ioaddr + DATAPORT, buf, (length + 1) >> 1);
 852
 853         lp->tx_queue++;
 854         lp->tx_queue_len += ((length+3) & ~1);
 855
 856         if (lp->tx_started == 0) {
 857             /* If the Tx is idle, always trigger a transmit. */
 858             outb(DO_TX | lp->tx_queue, ioaddr + TX_START);
 859             lp->sent = lp->tx_queue ;
 860             lp->tx_queue = 0;
 861             lp->tx_queue_len = 0;
 862             lp->tx_started = 1;
 863             netif_start_queue(dev);
 864         } else {
 865             if( sram_config == 0 ) {
 866                 if (lp->tx_queue_len < (4096 - (ETH_FRAME_LEN +2)) )
 867                     /* Yes, there is room for one more packet. */
 868                     netif_start_queue(dev);
 869             } else {
 870                 if (lp->tx_queue_len < (8192 - (ETH_FRAME_LEN +2)) &&
 871                                                 lp->tx_queue < 127 )
 872                     /* Yes, there is room for one more packet. */
 873                     netif_start_queue(dev);
 874             }
 875         }
 876
 877         /* Re-enable interrupts */
 878         outb(D_TX_INTR, ioaddr + TX_INTR);
 879         outb(D_RX_INTR, ioaddr + RX_INTR);
 880     }
 881     dev_kfree_skb (skb);
 882
 883     return NETDEV_TX_OK;
 884 } /* fjn_start_xmit */
 885
 886 /*====================================================================*/
 887
 888 static void fjn_reset(struct net_device *dev)
 889 {
 890     struct local_info_t *lp = netdev_priv(dev);
 891     unsigned int ioaddr = dev->base_addr;
 892     int i;
 893
 894     pr_debug("fjn_reset(%s) called.\n",dev->name);
 895
 896     /* Reset controller */
 897     if( sram_config == 0 )
 898         outb(CONFIG0_RST, ioaddr + CONFIG_0);
 899     else
 900         outb(CONFIG0_RST_1, ioaddr + CONFIG_0);
 901
 902     /* Power On chip and select bank 0 */
 903     if (lp->cardtype == MBH10302)
 904         outb(BANK_0, ioaddr + CONFIG_1);
 905     else
 906         outb(BANK_0U, ioaddr + CONFIG_1);
 907
 908     /* Set Tx modes */
 909     outb(D_TX_MODE, ioaddr + TX_MODE);
 910     /* set Rx modes */
 911     outb(ID_MATCHED, ioaddr + RX_MODE);
 912
 913     /* Set hardware address */
 914     for (i = 0; i < 6; i++)
 915         outb(dev->dev_addr[i], ioaddr + NODE_ID + i);
 916
 917     /* (re)initialize the multicast table */
 918     set_rx_mode(dev);
 919
 920     /* Switch to bank 2 (runtime mode) */
 921     if (lp->cardtype == MBH10302)
 922         outb(BANK_2, ioaddr + CONFIG_1);
 923     else
 924         outb(BANK_2U, ioaddr + CONFIG_1);
 925
 926     /* set 16col ctrl bits */
 927     if( lp->cardtype == TDK || lp->cardtype == CONTEC)
 928         outb(TDK_AUTO_MODE, ioaddr + COL_CTRL);
 929     else
 930         outb(AUTO_MODE, ioaddr + COL_CTRL);
 931
 932     /* clear Reserved Regs */
 933     outb(0x00, ioaddr + BMPR12);
 934     outb(0x00, ioaddr + BMPR13);
 935
 936     /* reset Skip packet reg. */
 937     outb(0x01, ioaddr + RX_SKIP);
 938
 939     /* Enable Tx and Rx */
 940     if( sram_config == 0 )
 941         outb(CONFIG0_DFL, ioaddr + CONFIG_0);
 942     else
 943         outb(CONFIG0_DFL_1, ioaddr + CONFIG_0);
 944
 945     /* Init receive pointer ? */
 946     inw(ioaddr + DATAPORT);
 947     inw(ioaddr + DATAPORT);
 948
 949     /* Clear all status */
 950     outb(0xff, ioaddr + TX_STATUS);
 951     outb(0xff, ioaddr + RX_STATUS);
 952
 953     if (lp->cardtype == MBH10302)
 954         outb(INTR_OFF, ioaddr + LAN_CTRL);
 955
 956     /* Turn on Rx interrupts */
 957     outb(D_TX_INTR, ioaddr + TX_INTR);
 958     outb(D_RX_INTR, ioaddr + RX_INTR);
 959
 960     /* Turn on interrupts from LAN card controller */
 961     if (lp->cardtype == MBH10302)
 962         outb(INTR_ON, ioaddr + LAN_CTRL);
 963 } /* fjn_reset */
 964
 965 /*====================================================================*/
 966
 967 static void fjn_rx(struct net_device *dev)
 968 {
 969     unsigned int ioaddr = dev->base_addr;
 970     int boguscount = 10;        /* 5 -> 10: by agy 19940922 */
 971
 972     pr_debug("%s: in rx_packet(), rx_status %02x.\n",
 973           dev->name, inb(ioaddr + RX_STATUS));
 974
 975     while ((inb(ioaddr + RX_MODE) & F_BUF_EMP) == 0) {
 976         u_short status = inw(ioaddr + DATAPORT);
 977
 978         pr_debug("%s: Rxing packet mode %02x status %04x.\n",
 979               dev->name, inb(ioaddr + RX_MODE), status);
 980 #ifndef final_version
 981         if (status == 0) {
 982             outb(F_SKP_PKT, ioaddr + RX_SKIP);
 983             break;
 984         }
 985 #endif
 986         if ((status & 0xF0) != 0x20) {  /* There was an error. */
 987             dev->stats.rx_errors++;
 988             if (status & F_LEN_ERR) dev->stats.rx_length_errors++;
 989             if (status & F_ALG_ERR) dev->stats.rx_frame_errors++;
 990             if (status & F_CRC_ERR) dev->stats.rx_crc_errors++;
 991             if (status & F_OVR_FLO) dev->stats.rx_over_errors++;
 992         } else {
 993             u_short pkt_len = inw(ioaddr + DATAPORT);
 994             /* Malloc up new buffer. */
 995             struct sk_buff *skb;
 996
 997             if (pkt_len > 1550) {
 998                 printk(KERN_NOTICE "%s: The FMV-18x claimed a very "
 999                        "large packet, size %d.\n", dev->name, pkt_len);
1000                 outb(F_SKP_PKT, ioaddr + RX_SKIP);
1001                 dev->stats.rx_errors++;
1002                 break;
1003             }
1004             skb = dev_alloc_skb(pkt_len+2);
1005             if (skb == NULL) {
1006                 printk(KERN_NOTICE "%s: Memory squeeze, dropping "
1007                        "packet (len %d).\n", dev->name, pkt_len);
1008                 outb(F_SKP_PKT, ioaddr + RX_SKIP);
1009                 dev->stats.rx_dropped++;
1010                 break;
1011             }
1012
1013             skb_reserve(skb, 2);
1014             insw(ioaddr + DATAPORT, skb_put(skb, pkt_len),
1015                  (pkt_len + 1) >> 1);
1016             skb->protocol = eth_type_trans(skb, dev);
1017
1018             {
1019                 int i;
1020                 pr_debug("%s: Rxed packet of length %d: ",
1021                         dev->name, pkt_len);
1022                 for (i = 0; i < 14; i++)
1023                         pr_debug(" %02x", skb->data[i]);
1024                 pr_debug(".\n");
1025             }
1026
1027             netif_rx(skb);
1028             dev->stats.rx_packets++;
1029             dev->stats.rx_bytes += pkt_len;
1030         }
1031         if (--boguscount <= 0)
1032             break;
1033     }
1034
1035     /* If any worth-while packets have been received, dev_rint()
1036            has done a netif_wake_queue() for us and will work on them
1037            when we get to the bottom-half routine. */
1038 /*
1039     if (lp->cardtype != TDK) {
1040         int i;
1041         for (i = 0; i < 20; i++) {
1042             if ((inb(ioaddr + RX_MODE) & F_BUF_EMP) == F_BUF_EMP)
1043                 break;
1044             (void)inw(ioaddr + DATAPORT);  /+ dummy status read +/
1045             outb(F_SKP_PKT, ioaddr + RX_SKIP);
1046         }
1047
1048         if (i > 0)
1049             pr_debug("%s: Exint Rx packet with mode %02x after "
1050                   "%d ticks.\n", dev->name, inb(ioaddr + RX_MODE), i);
1051     }
1052 */
1053 } /* fjn_rx */
1054
1055 /*====================================================================*/
1056
1057 static void netdev_get_drvinfo(struct net_device *dev,
1058                                struct ethtool_drvinfo *info)
1059 {
1060         strcpy(info->driver, DRV_NAME);
1061         strcpy(info->version, DRV_VERSION);
1062         sprintf(info->bus_info, "PCMCIA 0x%lx", dev->base_addr);
1063 }
1064
1065 static const struct ethtool_ops netdev_ethtool_ops = {
1066         .get_drvinfo            = netdev_get_drvinfo,
1067 };
1068
1069 static int fjn_config(struct net_device *dev, struct ifmap *map){
1070     return 0;
1071 }
1072
1073 static int fjn_open(struct net_device *dev)
1074 {
1075     struct local_info_t *lp = netdev_priv(dev);
1076     struct pcmcia_device *link = lp->p_dev;
1077
1078     pr_debug("fjn_open('%s').\n", dev->name);
1079
1080     if (!pcmcia_dev_present(link))
1081         return -ENODEV;
1082
1083     link->open++;
1084
1085     fjn_reset(dev);
1086
1087     lp->tx_started = 0;
1088     lp->tx_queue = 0;
1089     lp->tx_queue_len = 0;
1090     lp->open_time = jiffies;
1091     netif_start_queue(dev);
1092
1093     return 0;
1094 } /* fjn_open */
1095
1096 /*====================================================================*/
1097
1098 static int fjn_close(struct net_device *dev)
1099 {
1100     struct local_info_t *lp = netdev_priv(dev);
1101     struct pcmcia_device *link = lp->p_dev;
1102     unsigned int ioaddr = dev->base_addr;
1103
1104     pr_debug("fjn_close('%s').\n", dev->name);
1105
1106     lp->open_time = 0;
1107     netif_stop_queue(dev);
1108
1109     /* Set configuration register 0 to disable Tx and Rx. */
1110     if( sram_config == 0 )
1111         outb(CONFIG0_RST ,ioaddr + CONFIG_0);
1112     else
1113         outb(CONFIG0_RST_1 ,ioaddr + CONFIG_0);
1114
1115     /* Update the statistics -- ToDo. */
1116
1117     /* Power-down the chip.  Green, green, green! */
1118     outb(CHIP_OFF ,ioaddr + CONFIG_1);
1119
1120     /* Set the ethernet adaptor disable IRQ */
1121     if (lp->cardtype == MBH10302)
1122         outb(INTR_OFF, ioaddr + LAN_CTRL);
1123
1124     link->open--;
1125
1126     return 0;
1127 } /* fjn_close */
1128
1129 /*====================================================================*/
1130
1131 /*
1132   Set the multicast/promiscuous mode for this adaptor.
1133 */
1134
1135 static void set_rx_mode(struct net_device *dev)
1136 {
1137     unsigned int ioaddr = dev->base_addr;
1138     u_char mc_filter[8];                 /* Multicast hash filter */
1139     u_long flags;
1140     int i;
1141
1142     int saved_bank;
1143     int saved_config_0 = inb(ioaddr + CONFIG_0);
1144
1145     local_irq_save(flags);
1146
1147     /* Disable Tx and Rx */
1148     if (sram_config == 0)
1149         outb(CONFIG0_RST, ioaddr + CONFIG_0);
1150     else
1151         outb(CONFIG0_RST_1, ioaddr + CONFIG_0);
1152
1153     if (dev->flags & IFF_PROMISC) {
1154         memset(mc_filter, 0xff, sizeof(mc_filter));
1155         outb(3, ioaddr + RX_MODE);      /* Enable promiscuous mode */
1156     } else if (netdev_mc_count(dev) > MC_FILTERBREAK ||
1157                (dev->flags & IFF_ALLMULTI)) {
1158         /* Too many to filter perfectly -- accept all multicasts. */
1159         memset(mc_filter, 0xff, sizeof(mc_filter));
1160         outb(2, ioaddr + RX_MODE);      /* Use normal mode. */
1161     } else if (netdev_mc_empty(dev)) {
1162         memset(mc_filter, 0x00, sizeof(mc_filter));
1163         outb(1, ioaddr + RX_MODE);      /* Ignore almost all multicasts. */
1164     } else {
1165         struct netdev_hw_addr *ha;
1166
1167         memset(mc_filter, 0, sizeof(mc_filter));
1168         netdev_for_each_mc_addr(ha, dev) {
1169             unsigned int bit = ether_crc_le(ETH_ALEN, ha->addr) >> 26;
1170             mc_filter[bit >> 3] |= (1 << (bit & 7));
1171         }
1172         outb(2, ioaddr + RX_MODE);      /* Use normal mode. */
1173     }
1174
1175     /* Switch to bank 1 and set the multicast table. */
1176     saved_bank = inb(ioaddr + CONFIG_1);
1177     outb(0xe4, ioaddr + CONFIG_1);
1178
1179     for (i = 0; i < 8; i++)
1180         outb(mc_filter[i], ioaddr + MAR_ADR + i);
1181     outb(saved_bank, ioaddr + CONFIG_1);
1182
1183     outb(saved_config_0, ioaddr + CONFIG_0);
1184
1185     local_irq_restore(flags);
1186 }