drivers/net/lne390.c

   1 /*
   2         lne390.c
   3
   4         Linux driver for Mylex LNE390 EISA Network Adapter
   5
   6         Copyright (C) 1996-1998, Paul Gortmaker.
   7
   8         This software may be used and distributed according to the terms
   9         of the GNU General Public License, incorporated herein by reference.
  10
  11         Information and Code Sources:
  12
  13         1) Based upon framework of es3210 driver.
  14         2) The existing myriad of other Linux 8390 drivers by Donald Becker.
  15         3) Russ Nelson's asm packet driver provided additional info.
  16         4) Info for getting IRQ and sh-mem gleaned from the EISA cfg files.
  17
  18         The LNE390 is an EISA shared memory NS8390 implementation. Note
  19         that all memory copies to/from the board must be 32bit transfers.
  20         There are two versions of the card: the lne390a and the lne390b.
  21         Going by the EISA cfg files, the "a" has jumpers to select between
  22         BNC/AUI, but the "b" also has RJ-45 and selection is via the SCU.
  23         The shared memory address selection is also slightly different.
  24         Note that shared memory address > 1MB are supported with this driver.
  25
  26         You can try <http://www.mylex.com> if you want more info, as I've
  27         never even seen one of these cards.  :)
  28
  29         Arnaldo Carvalho de Melo <acme@conectiva.com.br> - 2000/09/01
  30         - get rid of check_region
  31         - no need to check if dev == NULL in lne390_probe1
  32 */
  33
  34 static const char *version =
  35         "lne390.c: Driver revision v0.99.1, 01/09/2000\n";
  36
  37 #include <linux/module.h>
  38 #include <linux/eisa.h>
  39 #include <linux/kernel.h>
  40 #include <linux/errno.h>
  41 #include <linux/string.h>
  42 #include <linux/delay.h>
  43 #include <linux/init.h>
  44 #include <linux/netdevice.h>
  45 #include <linux/etherdevice.h>
  46
  47 #include <asm/io.h>
  48 #include <asm/system.h>
  49
  50 #include "8390.h"
  51
  52 #define DRV_NAME "lne390"
  53
  54 static int lne390_probe1(struct net_device *dev, int ioaddr);
  55
  56 static int lne390_open(struct net_device *dev);
  57 static int lne390_close(struct net_device *dev);
  58
  59 static void lne390_reset_8390(struct net_device *dev);
  60
  61 static void lne390_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page);
  62 static void lne390_block_input(struct net_device *dev, int count, struct sk_buff *skb, int ring_offset);
  63 static void lne390_block_output(struct net_device *dev, int count, const unsigned char *buf, const int start_page);
  64
  65 #define LNE390_START_PG         0x00    /* First page of TX buffer      */
  66 #define LNE390_STOP_PG          0x80    /* Last page +1 of RX ring      */
  67
  68 #define LNE390_ID_PORT          0xc80   /* Same for all EISA cards      */
  69 #define LNE390_IO_EXTENT        0x20
  70 #define LNE390_SA_PROM          0x16    /* Start of e'net addr.         */
  71 #define LNE390_RESET_PORT       0xc84   /* From the pkt driver source   */
  72 #define LNE390_NIC_OFFSET       0x00    /* Hello, the 8390 is *here*    */
  73
  74 #define LNE390_ADDR0            0x00    /* 3 byte vendor prefix         */
  75 #define LNE390_ADDR1            0x80
  76 #define LNE390_ADDR2            0xe5
  77
  78 #define LNE390_ID0      0x10009835      /* 0x3598 = 01101 01100 11000 = mlx */
  79 #define LNE390_ID1      0x11009835      /* above is the 390A, this is 390B  */
  80
  81 #define LNE390_CFG1             0xc84   /* NB: 0xc84 is also "reset" port. */
  82 #define LNE390_CFG2             0xc90
  83
  84 /*
  85  *      You can OR any of the following bits together and assign it
  86  *      to LNE390_DEBUG to get verbose driver info during operation.
  87  *      Currently only the probe one is implemented.
  88  */
  89
  90 #define LNE390_D_PROBE  0x01
  91 #define LNE390_D_RX_PKT 0x02
  92 #define LNE390_D_TX_PKT 0x04
  93 #define LNE390_D_IRQ    0x08
  94
  95 #define LNE390_DEBUG    0
  96
  97 static unsigned char irq_map[] __initdata = {15, 12, 11, 10, 9, 7, 5, 3};
  98 static unsigned int shmem_mapA[] __initdata = {0xff, 0xfe, 0xfd, 0xfff, 0xffe, 0xffc, 0x0d, 0x0};
  99 static unsigned int shmem_mapB[] __initdata = {0xff, 0xfe, 0x0e, 0xfff, 0xffe, 0xffc, 0x0d, 0x0};
 100
 101 /*
 102  *      Probe for the card. The best way is to read the EISA ID if it
 103  *      is known. Then we can check the prefix of the station address
 104  *      PROM for a match against the value assigned to Mylex.
 105  */
 106
 107 static int __init do_lne390_probe(struct net_device *dev)
 108 {
 109         unsigned short ioaddr = dev->base_addr;
 110         int irq = dev->irq;
 111         int mem_start = dev->mem_start;
 112         int ret;
 113
 114         SET_MODULE_OWNER(dev);
 115
 116         if (ioaddr > 0x1ff) {           /* Check a single specified location. */
 117                 if (!request_region(ioaddr, LNE390_IO_EXTENT, DRV_NAME))
 118                         return -EBUSY;
 119                 ret = lne390_probe1(dev, ioaddr);
 120                 if (ret)
 121                         release_region(ioaddr, LNE390_IO_EXTENT);
 122                 return ret;
 123         }
 124         else if (ioaddr > 0)            /* Don't probe at all. */
 125                 return -ENXIO;
 126
 127         if (!EISA_bus) {
 128 #if LNE390_DEBUG & LNE390_D_PROBE
 129                 printk("lne390-debug: Not an EISA bus. Not probing high ports.\n");
 130 #endif
 131                 return -ENXIO;
 132         }
 133
 134         /* EISA spec allows for up to 16 slots, but 8 is typical. */
 135         for (ioaddr = 0x1000; ioaddr < 0x9000; ioaddr += 0x1000) {
 136                 if (!request_region(ioaddr, LNE390_IO_EXTENT, DRV_NAME))
 137                         continue;
 138                 if (lne390_probe1(dev, ioaddr) == 0)
 139                         return 0;
 140                 release_region(ioaddr, LNE390_IO_EXTENT);
 141                 dev->irq = irq;
 142                 dev->mem_start = mem_start;
 143         }
 144
 145         return -ENODEV;
 146 }
 147
 148 #ifndef MODULE
 149 struct net_device * __init lne390_probe(int unit)
 150 {
 151         struct net_device *dev = alloc_ei_netdev();
 152         int err;
 153
 154         if (!dev)
 155                 return ERR_PTR(-ENOMEM);
 156
 157         sprintf(dev->name, "eth%d", unit);
 158         netdev_boot_setup_check(dev);
 159
 160         err = do_lne390_probe(dev);
 161         if (err)
 162                 goto out;
 163         return dev;
 164 out:
 165         free_netdev(dev);
 166         return ERR_PTR(err);
 167 }
 168 #endif
 169
 170 static int __init lne390_probe1(struct net_device *dev, int ioaddr)
 171 {
 172         int i, revision, ret;
 173         unsigned long eisa_id;
 174
 175         if (inb_p(ioaddr + LNE390_ID_PORT) == 0xff) return -ENODEV;
 176
 177 #if LNE390_DEBUG & LNE390_D_PROBE
 178         printk("lne390-debug: probe at %#x, ID %#8x\n", ioaddr, inl(ioaddr + LNE390_ID_PORT));
 179         printk("lne390-debug: config regs: %#x %#x\n",
 180                 inb(ioaddr + LNE390_CFG1), inb(ioaddr + LNE390_CFG2));
 181 #endif
 182
 183
 184 /*      Check the EISA ID of the card. */
 185         eisa_id = inl(ioaddr + LNE390_ID_PORT);
 186         if ((eisa_id != LNE390_ID0) && (eisa_id != LNE390_ID1)) {
 187                 return -ENODEV;
 188         }
 189
 190         revision = (eisa_id >> 24) & 0x01;      /* 0 = rev A, 1 rev B */
 191
 192 #if 0
 193 /*      Check the Mylex vendor ID as well. Not really required. */
 194         if (inb(ioaddr + LNE390_SA_PROM + 0) != LNE390_ADDR0
 195                 || inb(ioaddr + LNE390_SA_PROM + 1) != LNE390_ADDR1
 196                 || inb(ioaddr + LNE390_SA_PROM + 2) != LNE390_ADDR2 ) {
 197                 printk("lne390.c: card not found");
 198                 for(i = 0; i < ETHER_ADDR_LEN; i++)
 199                         printk(" %02x", inb(ioaddr + LNE390_SA_PROM + i));
 200                 printk(" (invalid prefix).\n");
 201                 return -ENODEV;
 202         }
 203 #endif
 204
 205         printk("lne390.c: LNE390%X in EISA slot %d, address", 0xa+revision, ioaddr/0x1000);
 206         for(i = 0; i < ETHER_ADDR_LEN; i++)
 207                 printk(" %02x", (dev->dev_addr[i] = inb(ioaddr + LNE390_SA_PROM + i)));
 208         printk(".\nlne390.c: ");
 209
 210         /* Snarf the interrupt now. CFG file has them all listed as `edge' with share=NO */
 211         if (dev->irq == 0) {
 212                 unsigned char irq_reg = inb(ioaddr + LNE390_CFG2) >> 3;
 213                 dev->irq = irq_map[irq_reg & 0x07];
 214                 printk("using");
 215         } else {
 216                 /* This is useless unless we reprogram the card here too */
 217                 if (dev->irq == 2) dev->irq = 9;        /* Doh! */
 218                 printk("assigning");
 219         }
 220         printk(" IRQ %d,", dev->irq);
 221
 222         if ((ret = request_irq(dev->irq, ei_interrupt, 0, DRV_NAME, dev))) {
 223                 printk (" unable to get IRQ %d.\n", dev->irq);
 224                 return ret;
 225         }
 226
 227         if (dev->mem_start == 0) {
 228                 unsigned char mem_reg = inb(ioaddr + LNE390_CFG2) & 0x07;
 229
 230                 if (revision)   /* LNE390B */
 231                         dev->mem_start = shmem_mapB[mem_reg] * 0x10000;
 232                 else            /* LNE390A */
 233                         dev->mem_start = shmem_mapA[mem_reg] * 0x10000;
 234                 printk(" using ");
 235         } else {
 236                 /* Should check for value in shmem_map and reprogram the card to use it */
 237                 dev->mem_start &= 0xfff0000;
 238                 printk(" assigning ");
 239         }
 240
 241         printk("%dkB memory at physical address %#lx\n",
 242                         LNE390_STOP_PG/4, dev->mem_start);
 243
 244         /*
 245            BEWARE!! Some dain-bramaged EISA SCUs will allow you to put
 246            the card mem within the region covered by `normal' RAM  !!!
 247
 248            ioremap() will fail in that case.
 249         */
 250         ei_status.mem = ioremap(dev->mem_start, LNE390_STOP_PG*0x100);
 251         if (!ei_status.mem) {
 252                 printk(KERN_ERR "lne390.c: Unable to remap card memory above 1MB !!\n");
 253                 printk(KERN_ERR "lne390.c: Try using EISA SCU to set memory below 1MB.\n");
 254                 printk(KERN_ERR "lne390.c: Driver NOT installed.\n");
 255                 ret = -EAGAIN;
 256                 goto cleanup;
 257         }
 258         printk("lne390.c: remapped %dkB card memory to virtual address %p\n",
 259                         LNE390_STOP_PG/4, ei_status.mem);
 260
 261         dev->mem_start = (unsigned long)ei_status.mem;
 262         dev->mem_end = dev->mem_start + (LNE390_STOP_PG - LNE390_START_PG)*256;
 263
 264         /* The 8390 offset is zero for the LNE390 */
 265         dev->base_addr = ioaddr;
 266
 267         ei_status.name = "LNE390";
 268         ei_status.tx_start_page = LNE390_START_PG;
 269         ei_status.rx_start_page = LNE390_START_PG + TX_PAGES;
 270         ei_status.stop_page = LNE390_STOP_PG;
 271         ei_status.word16 = 1;
 272
 273         if (ei_debug > 0)
 274                 printk(version);
 275
 276         ei_status.reset_8390 = &lne390_reset_8390;
 277         ei_status.block_input = &lne390_block_input;
 278         ei_status.block_output = &lne390_block_output;
 279         ei_status.get_8390_hdr = &lne390_get_8390_hdr;
 280
 281         dev->open = &lne390_open;
 282         dev->stop = &lne390_close;
 283 #ifdef CONFIG_NET_POLL_CONTROLLER
 284         dev->poll_controller = ei_poll;
 285 #endif
 286         NS8390_init(dev, 0);
 287
 288         ret = register_netdev(dev);
 289         if (ret)
 290                 goto unmap;
 291         return 0;
 292 unmap:
 293         if (ei_status.reg0)
 294                 iounmap(ei_status.mem);
 295 cleanup:
 296         free_irq(dev->irq, dev);
 297         return ret;
 298 }
 299
 300 /*
 301  *      Reset as per the packet driver method. Judging by the EISA cfg
 302  *      file, this just toggles the "Board Enable" bits (bit 2 and 0).
 303  */
 304
 305 static void lne390_reset_8390(struct net_device *dev)
 306 {
 307         unsigned short ioaddr = dev->base_addr;
 308
 309         outb(0x04, ioaddr + LNE390_RESET_PORT);
 310         if (ei_debug > 1) printk("%s: resetting the LNE390...", dev->name);
 311
 312         mdelay(2);
 313
 314         ei_status.txing = 0;
 315         outb(0x01, ioaddr + LNE390_RESET_PORT);
 316         if (ei_debug > 1) printk("reset done\n");
 317
 318         return;
 319 }
 320
 321 /*
 322  *      Note: In the following three functions is the implicit assumption
 323  *      that the associated memcpy will only use "rep; movsl" as long as
 324  *      we keep the counts as some multiple of doublewords. This is a
 325  *      requirement of the hardware, and also prevents us from using
 326  *      eth_io_copy_and_sum() since we can't guarantee it will limit
 327  *      itself to doubleword access.
 328  */
 329
 330 /*
 331  *      Grab the 8390 specific header. Similar to the block_input routine, but
 332  *      we don't need to be concerned with ring wrap as the header will be at
 333  *      the start of a page, so we optimize accordingly. (A single doubleword.)
 334  */
 335
 336 static void
 337 lne390_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page)
 338 {
 339         void __iomem *hdr_start = ei_status.mem + ((ring_page - LNE390_START_PG)<<8);
 340         memcpy_fromio(hdr, hdr_start, sizeof(struct e8390_pkt_hdr));
 341         hdr->count = (hdr->count + 3) & ~3;     /* Round up allocation. */
 342 }
 343
 344 /*
 345  *      Block input and output are easy on shared memory ethercards, the only
 346  *      complication is when the ring buffer wraps. The count will already
 347  *      be rounded up to a doubleword value via lne390_get_8390_hdr() above.
 348  */
 349
 350 static void lne390_block_input(struct net_device *dev, int count, struct sk_buff *skb,
 351                                                   int ring_offset)
 352 {
 353         void __iomem *xfer_start = ei_status.mem + ring_offset - (LNE390_START_PG<<8);
 354
 355         if (ring_offset + count > (LNE390_STOP_PG<<8)) {
 356                 /* Packet wraps over end of ring buffer. */
 357                 int semi_count = (LNE390_STOP_PG<<8) - ring_offset;
 358                 memcpy_fromio(skb->data, xfer_start, semi_count);
 359                 count -= semi_count;
 360                 memcpy_fromio(skb->data + semi_count,
 361                         ei_status.mem + (TX_PAGES<<8), count);
 362         } else {
 363                 /* Packet is in one chunk. */
 364                 memcpy_fromio(skb->data, xfer_start, count);
 365         }
 366 }
 367
 368 static void lne390_block_output(struct net_device *dev, int count,
 369                                 const unsigned char *buf, int start_page)
 370 {
 371         void __iomem *shmem = ei_status.mem + ((start_page - LNE390_START_PG)<<8);
 372
 373         count = (count + 3) & ~3;     /* Round up to doubleword */
 374         memcpy_toio(shmem, buf, count);
 375 }
 376
 377 static int lne390_open(struct net_device *dev)
 378 {
 379         ei_open(dev);
 380         return 0;
 381 }
 382
 383 static int lne390_close(struct net_device *dev)
 384 {
 385
 386         if (ei_debug > 1)
 387                 printk("%s: Shutting down ethercard.\n", dev->name);
 388
 389         ei_close(dev);
 390         return 0;
 391 }
 392
 393 #ifdef MODULE
 394 #define MAX_LNE_CARDS   4       /* Max number of LNE390 cards per module */
 395 static struct net_device *dev_lne[MAX_LNE_CARDS];
 396 static int io[MAX_LNE_CARDS];
 397 static int irq[MAX_LNE_CARDS];
 398 static int mem[MAX_LNE_CARDS];
 399
 400 module_param_array(io, int, NULL, 0);
 401 module_param_array(irq, int, NULL, 0);
 402 module_param_array(mem, int, NULL, 0);
 403 MODULE_PARM_DESC(io, "I/O base address(es)");
 404 MODULE_PARM_DESC(irq, "IRQ number(s)");
 405 MODULE_PARM_DESC(mem, "memory base address(es)");
 406 MODULE_DESCRIPTION("Mylex LNE390A/B EISA Ethernet driver");
 407 MODULE_LICENSE("GPL");
 408
 409 int init_module(void)
 410 {
 411         struct net_device *dev;
 412         int this_dev, found = 0;
 413
 414         for (this_dev = 0; this_dev < MAX_LNE_CARDS; this_dev++) {
 415                 if (io[this_dev] == 0 && this_dev != 0)
 416                         break;
 417                 dev = alloc_ei_netdev();
 418                 if (!dev)
 419                         break;
 420                 dev->irq = irq[this_dev];
 421                 dev->base_addr = io[this_dev];
 422                 dev->mem_start = mem[this_dev];
 423                 if (do_lne390_probe(dev) == 0) {
 424                         dev_lne[found++] = dev;
 425                         continue;
 426                 }
 427                 free_netdev(dev);
 428                 printk(KERN_WARNING "lne390.c: No LNE390 card found (i/o = 0x%x).\n", io[this_dev]);
 429                 break;
 430         }
 431         if (found)
 432                 return 0;
 433         return -ENXIO;
 434 }
 435
 436 static void cleanup_card(struct net_device *dev)
 437 {
 438         free_irq(dev->irq, dev);
 439         release_region(dev->base_addr, LNE390_IO_EXTENT);
 440         iounmap(ei_status.mem);
 441 }
 442
 443 void cleanup_module(void)
 444 {
 445         int this_dev;
 446
 447         for (this_dev = 0; this_dev < MAX_LNE_CARDS; this_dev++) {
 448                 struct net_device *dev = dev_lne[this_dev];
 449                 if (dev) {
 450                         unregister_netdev(dev);
 451                         cleanup_card(dev);
 452                         free_netdev(dev);
 453                 }
 454         }
 455 }
 456 #endif /* MODULE */
 457