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         if (ioaddr > 0x1ff) {           /* Check a single specified location. */
 115                 if (!request_region(ioaddr, LNE390_IO_EXTENT, DRV_NAME))
 116                         return -EBUSY;
 117                 ret = lne390_probe1(dev, ioaddr);
 118                 if (ret)
 119                         release_region(ioaddr, LNE390_IO_EXTENT);
 120                 return ret;
 121         }
 122         else if (ioaddr > 0)            /* Don't probe at all. */
 123                 return -ENXIO;
 124
 125         if (!EISA_bus) {
 126 #if LNE390_DEBUG & LNE390_D_PROBE
 127                 printk("lne390-debug: Not an EISA bus. Not probing high ports.\n");
 128 #endif
 129                 return -ENXIO;
 130         }
 131
 132         /* EISA spec allows for up to 16 slots, but 8 is typical. */
 133         for (ioaddr = 0x1000; ioaddr < 0x9000; ioaddr += 0x1000) {
 134                 if (!request_region(ioaddr, LNE390_IO_EXTENT, DRV_NAME))
 135                         continue;
 136                 if (lne390_probe1(dev, ioaddr) == 0)
 137                         return 0;
 138                 release_region(ioaddr, LNE390_IO_EXTENT);
 139                 dev->irq = irq;
 140                 dev->mem_start = mem_start;
 141         }
 142
 143         return -ENODEV;
 144 }
 145
 146 #ifndef MODULE
 147 struct net_device * __init lne390_probe(int unit)
 148 {
 149         struct net_device *dev = alloc_ei_netdev();
 150         int err;
 151
 152         if (!dev)
 153                 return ERR_PTR(-ENOMEM);
 154
 155         sprintf(dev->name, "eth%d", unit);
 156         netdev_boot_setup_check(dev);
 157
 158         err = do_lne390_probe(dev);
 159         if (err)
 160                 goto out;
 161         return dev;
 162 out:
 163         free_netdev(dev);
 164         return ERR_PTR(err);
 165 }
 166 #endif
 167
 168 static int __init lne390_probe1(struct net_device *dev, int ioaddr)
 169 {
 170         int i, revision, ret;
 171         unsigned long eisa_id;
 172         DECLARE_MAC_BUF(mac);
 173
 174         if (inb_p(ioaddr + LNE390_ID_PORT) == 0xff) return -ENODEV;
 175
 176 #if LNE390_DEBUG & LNE390_D_PROBE
 177         printk("lne390-debug: probe at %#x, ID %#8x\n", ioaddr, inl(ioaddr + LNE390_ID_PORT));
 178         printk("lne390-debug: config regs: %#x %#x\n",
 179                 inb(ioaddr + LNE390_CFG1), inb(ioaddr + LNE390_CFG2));
 180 #endif
 181
 182
 183 /*      Check the EISA ID of the card. */
 184         eisa_id = inl(ioaddr + LNE390_ID_PORT);
 185         if ((eisa_id != LNE390_ID0) && (eisa_id != LNE390_ID1)) {
 186                 return -ENODEV;
 187         }
 188
 189         revision = (eisa_id >> 24) & 0x01;      /* 0 = rev A, 1 rev B */
 190
 191 #if 0
 192 /*      Check the Mylex vendor ID as well. Not really required. */
 193         if (inb(ioaddr + LNE390_SA_PROM + 0) != LNE390_ADDR0
 194                 || inb(ioaddr + LNE390_SA_PROM + 1) != LNE390_ADDR1
 195                 || inb(ioaddr + LNE390_SA_PROM + 2) != LNE390_ADDR2 ) {
 196                 printk("lne390.c: card not found");
 197                 for(i = 0; i < ETHER_ADDR_LEN; i++)
 198                         printk(" %02x", inb(ioaddr + LNE390_SA_PROM + i));
 199                 printk(" (invalid prefix).\n");
 200                 return -ENODEV;
 201         }
 202 #endif
 203
 204         for(i = 0; i < ETHER_ADDR_LEN; i++)
 205                 dev->dev_addr[i] = inb(ioaddr + LNE390_SA_PROM + i);
 206         printk("lne390.c: LNE390%X in EISA slot %d, address %s.\n",
 207                0xa+revision, ioaddr/0x1000, print_mac(mac, dev->dev_addr));
 208
 209         printk("lne390.c: ");
 210
 211         /* Snarf the interrupt now. CFG file has them all listed as `edge' with share=NO */
 212         if (dev->irq == 0) {
 213                 unsigned char irq_reg = inb(ioaddr + LNE390_CFG2) >> 3;
 214                 dev->irq = irq_map[irq_reg & 0x07];
 215                 printk("using");
 216         } else {
 217                 /* This is useless unless we reprogram the card here too */
 218                 if (dev->irq == 2) dev->irq = 9;        /* Doh! */
 219                 printk("assigning");
 220         }
 221         printk(" IRQ %d,", dev->irq);
 222
 223         if ((ret = request_irq(dev->irq, ei_interrupt, 0, DRV_NAME, dev))) {
 224                 printk (" unable to get IRQ %d.\n", dev->irq);
 225                 return ret;
 226         }
 227
 228         if (dev->mem_start == 0) {
 229                 unsigned char mem_reg = inb(ioaddr + LNE390_CFG2) & 0x07;
 230
 231                 if (revision)   /* LNE390B */
 232                         dev->mem_start = shmem_mapB[mem_reg] * 0x10000;
 233                 else            /* LNE390A */
 234                         dev->mem_start = shmem_mapA[mem_reg] * 0x10000;
 235                 printk(" using ");
 236         } else {
 237                 /* Should check for value in shmem_map and reprogram the card to use it */
 238                 dev->mem_start &= 0xfff0000;
 239                 printk(" assigning ");
 240         }
 241
 242         printk("%dkB memory at physical address %#lx\n",
 243                         LNE390_STOP_PG/4, dev->mem_start);
 244
 245         /*
 246            BEWARE!! Some dain-bramaged EISA SCUs will allow you to put
 247            the card mem within the region covered by `normal' RAM  !!!
 248
 249            ioremap() will fail in that case.
 250         */
 251         ei_status.mem = ioremap(dev->mem_start, LNE390_STOP_PG*0x100);
 252         if (!ei_status.mem) {
 253                 printk(KERN_ERR "lne390.c: Unable to remap card memory above 1MB !!\n");
 254                 printk(KERN_ERR "lne390.c: Try using EISA SCU to set memory below 1MB.\n");
 255                 printk(KERN_ERR "lne390.c: Driver NOT installed.\n");
 256                 ret = -EAGAIN;
 257                 goto cleanup;
 258         }
 259         printk("lne390.c: remapped %dkB card memory to virtual address %p\n",
 260                         LNE390_STOP_PG/4, ei_status.mem);
 261
 262         dev->mem_start = (unsigned long)ei_status.mem;
 263         dev->mem_end = dev->mem_start + (LNE390_STOP_PG - LNE390_START_PG)*256;
 264
 265         /* The 8390 offset is zero for the LNE390 */
 266         dev->base_addr = ioaddr;
 267
 268         ei_status.name = "LNE390";
 269         ei_status.tx_start_page = LNE390_START_PG;
 270         ei_status.rx_start_page = LNE390_START_PG + TX_PAGES;
 271         ei_status.stop_page = LNE390_STOP_PG;
 272         ei_status.word16 = 1;
 273
 274         if (ei_debug > 0)
 275                 printk(version);
 276
 277         ei_status.reset_8390 = &lne390_reset_8390;
 278         ei_status.block_input = &lne390_block_input;
 279         ei_status.block_output = &lne390_block_output;
 280         ei_status.get_8390_hdr = &lne390_get_8390_hdr;
 281
 282         dev->open = &lne390_open;
 283         dev->stop = &lne390_close;
 284 #ifdef CONFIG_NET_POLL_CONTROLLER
 285         dev->poll_controller = ei_poll;
 286 #endif
 287         NS8390_init(dev, 0);
 288
 289         ret = register_netdev(dev);
 290         if (ret)
 291                 goto unmap;
 292         return 0;
 293 unmap:
 294         if (ei_status.reg0)
 295                 iounmap(ei_status.mem);
 296 cleanup:
 297         free_irq(dev->irq, dev);
 298         return ret;
 299 }
 300
 301 /*
 302  *      Reset as per the packet driver method. Judging by the EISA cfg
 303  *      file, this just toggles the "Board Enable" bits (bit 2 and 0).
 304  */
 305
 306 static void lne390_reset_8390(struct net_device *dev)
 307 {
 308         unsigned short ioaddr = dev->base_addr;
 309
 310         outb(0x04, ioaddr + LNE390_RESET_PORT);
 311         if (ei_debug > 1) printk("%s: resetting the LNE390...", dev->name);
 312
 313         mdelay(2);
 314
 315         ei_status.txing = 0;
 316         outb(0x01, ioaddr + LNE390_RESET_PORT);
 317         if (ei_debug > 1) printk("reset done\n");
 318
 319         return;
 320 }
 321
 322 /*
 323  *      Note: In the following three functions is the implicit assumption
 324  *      that the associated memcpy will only use "rep; movsl" as long as
 325  *      we keep the counts as some multiple of doublewords. This is a
 326  *      requirement of the hardware, and also prevents us from using
 327  *      eth_io_copy_and_sum() since we can't guarantee it will limit
 328  *      itself to doubleword access.
 329  */
 330
 331 /*
 332  *      Grab the 8390 specific header. Similar to the block_input routine, but
 333  *      we don't need to be concerned with ring wrap as the header will be at
 334  *      the start of a page, so we optimize accordingly. (A single doubleword.)
 335  */
 336
 337 static void
 338 lne390_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page)
 339 {
 340         void __iomem *hdr_start = ei_status.mem + ((ring_page - LNE390_START_PG)<<8);
 341         memcpy_fromio(hdr, hdr_start, sizeof(struct e8390_pkt_hdr));
 342         hdr->count = (hdr->count + 3) & ~3;     /* Round up allocation. */
 343 }
 344
 345 /*
 346  *      Block input and output are easy on shared memory ethercards, the only
 347  *      complication is when the ring buffer wraps. The count will already
 348  *      be rounded up to a doubleword value via lne390_get_8390_hdr() above.
 349  */
 350
 351 static void lne390_block_input(struct net_device *dev, int count, struct sk_buff *skb,
 352                                                   int ring_offset)
 353 {
 354         void __iomem *xfer_start = ei_status.mem + ring_offset - (LNE390_START_PG<<8);
 355
 356         if (ring_offset + count > (LNE390_STOP_PG<<8)) {
 357                 /* Packet wraps over end of ring buffer. */
 358                 int semi_count = (LNE390_STOP_PG<<8) - ring_offset;
 359                 memcpy_fromio(skb->data, xfer_start, semi_count);
 360                 count -= semi_count;
 361                 memcpy_fromio(skb->data + semi_count,
 362                         ei_status.mem + (TX_PAGES<<8), count);
 363         } else {
 364                 /* Packet is in one chunk. */
 365                 memcpy_fromio(skb->data, xfer_start, count);
 366         }
 367 }
 368
 369 static void lne390_block_output(struct net_device *dev, int count,
 370                                 const unsigned char *buf, int start_page)
 371 {
 372         void __iomem *shmem = ei_status.mem + ((start_page - LNE390_START_PG)<<8);
 373
 374         count = (count + 3) & ~3;     /* Round up to doubleword */
 375         memcpy_toio(shmem, buf, count);
 376 }
 377
 378 static int lne390_open(struct net_device *dev)
 379 {
 380         ei_open(dev);
 381         return 0;
 382 }
 383
 384 static int lne390_close(struct net_device *dev)
 385 {
 386
 387         if (ei_debug > 1)
 388                 printk("%s: Shutting down ethercard.\n", dev->name);
 389
 390         ei_close(dev);
 391         return 0;
 392 }
 393
 394 #ifdef MODULE
 395 #define MAX_LNE_CARDS   4       /* Max number of LNE390 cards per module */
 396 static struct net_device *dev_lne[MAX_LNE_CARDS];
 397 static int io[MAX_LNE_CARDS];
 398 static int irq[MAX_LNE_CARDS];
 399 static int mem[MAX_LNE_CARDS];
 400
 401 module_param_array(io, int, NULL, 0);
 402 module_param_array(irq, int, NULL, 0);
 403 module_param_array(mem, int, NULL, 0);
 404 MODULE_PARM_DESC(io, "I/O base address(es)");
 405 MODULE_PARM_DESC(irq, "IRQ number(s)");
 406 MODULE_PARM_DESC(mem, "memory base address(es)");
 407 MODULE_DESCRIPTION("Mylex LNE390A/B EISA Ethernet driver");
 408 MODULE_LICENSE("GPL");
 409
 410 int __init init_module(void)
 411 {
 412         struct net_device *dev;
 413         int this_dev, found = 0;
 414
 415         for (this_dev = 0; this_dev < MAX_LNE_CARDS; this_dev++) {
 416                 if (io[this_dev] == 0 && this_dev != 0)
 417                         break;
 418                 dev = alloc_ei_netdev();
 419                 if (!dev)
 420                         break;
 421                 dev->irq = irq[this_dev];
 422                 dev->base_addr = io[this_dev];
 423                 dev->mem_start = mem[this_dev];
 424                 if (do_lne390_probe(dev) == 0) {
 425                         dev_lne[found++] = dev;
 426                         continue;
 427                 }
 428                 free_netdev(dev);
 429                 printk(KERN_WARNING "lne390.c: No LNE390 card found (i/o = 0x%x).\n", io[this_dev]);
 430                 break;
 431         }
 432         if (found)
 433                 return 0;
 434         return -ENXIO;
 435 }
 436
 437 static void cleanup_card(struct net_device *dev)
 438 {
 439         free_irq(dev->irq, dev);
 440         release_region(dev->base_addr, LNE390_IO_EXTENT);
 441         iounmap(ei_status.mem);
 442 }
 443
 444 void __exit cleanup_module(void)
 445 {
 446         int this_dev;
 447
 448         for (this_dev = 0; this_dev < MAX_LNE_CARDS; this_dev++) {
 449                 struct net_device *dev = dev_lne[this_dev];
 450                 if (dev) {
 451                         unregister_netdev(dev);
 452                         cleanup_card(dev);
 453                         free_netdev(dev);
 454                 }
 455         }
 456 }
 457 #endif /* MODULE */
 458