drivers/net/tokenring/proteon.c

   1 /*
   2  *  proteon.c: A network driver for Proteon ISA token ring cards.
   3  *
   4  *  Based on tmspci written 1999 by Adam Fritzler
   5  *
   6  *  Written 2003 by Jochen Friedrich
   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  *  This driver module supports the following cards:
  12  *      - Proteon 1392, 1392+
  13  *
  14  *  Maintainer(s):
  15  *    AF        Adam Fritzler           mid@auk.cx
  16  *    JF        Jochen Friedrich        jochen@scram.de
  17  *
  18  *  Modification History:
  19  *      02-Jan-03       JF      Created
  20  *
  21  */
  22 static const char version[] = "proteon.c: v1.00 02/01/2003 by Jochen Friedrich\n";
  23
  24 #include <linux/module.h>
  25 #include <linux/kernel.h>
  26 #include <linux/delay.h>
  27 #include <linux/errno.h>
  28 #include <linux/pci.h>
  29 #include <linux/init.h>
  30 #include <linux/netdevice.h>
  31 #include <linux/trdevice.h>
  32
  33 #include <asm/system.h>
  34 #include <asm/io.h>
  35 #include <asm/irq.h>
  36 #include <asm/pci.h>
  37 #include <asm/dma.h>
  38
  39 #include "tms380tr.h"
  40
  41 #define PROTEON_IO_EXTENT 32
  42
  43 /* A zero-terminated list of I/O addresses to be probed. */
  44 static unsigned int portlist[] __initdata = {
  45         0x0A20, 0x0E20, 0x1A20, 0x1E20, 0x2A20, 0x2E20, 0x3A20, 0x3E20,// Prot.
  46         0x4A20, 0x4E20, 0x5A20, 0x5E20, 0x6A20, 0x6E20, 0x7A20, 0x7E20,// Prot.
  47         0x8A20, 0x8E20, 0x9A20, 0x9E20, 0xAA20, 0xAE20, 0xBA20, 0xBE20,// Prot.
  48         0xCA20, 0xCE20, 0xDA20, 0xDE20, 0xEA20, 0xEE20, 0xFA20, 0xFE20,// Prot.
  49         0
  50 };
  51
  52 /* A zero-terminated list of IRQs to be probed. */
  53 static unsigned short irqlist[] = {
  54         7, 6, 5, 4, 3, 12, 11, 10, 9,
  55         0
  56 };
  57
  58 /* A zero-terminated list of DMAs to be probed. */
  59 static int dmalist[] __initdata = {
  60         5, 6, 7,
  61         0
  62 };
  63
  64 static char cardname[] = "Proteon 1392\0";
  65 static u64 dma_mask = ISA_MAX_ADDRESS;
  66 static int proteon_open(struct net_device *dev);
  67 static void proteon_read_eeprom(struct net_device *dev);
  68 static unsigned short proteon_setnselout_pins(struct net_device *dev);
  69
  70 static unsigned short proteon_sifreadb(struct net_device *dev, unsigned short reg)
  71 {
  72         return inb(dev->base_addr + reg);
  73 }
  74
  75 static unsigned short proteon_sifreadw(struct net_device *dev, unsigned short reg)
  76 {
  77         return inw(dev->base_addr + reg);
  78 }
  79
  80 static void proteon_sifwriteb(struct net_device *dev, unsigned short val, unsigned short reg)
  81 {
  82         outb(val, dev->base_addr + reg);
  83 }
  84
  85 static void proteon_sifwritew(struct net_device *dev, unsigned short val, unsigned short reg)
  86 {
  87         outw(val, dev->base_addr + reg);
  88 }
  89
  90 static int __init proteon_probe1(struct net_device *dev, int ioaddr)
  91 {
  92         unsigned char chk1, chk2;
  93         int i;
  94
  95         if (!request_region(ioaddr, PROTEON_IO_EXTENT, cardname))
  96                 return -ENODEV;
  97
  98
  99         chk1 = inb(ioaddr + 0x1f);      /* Get Proteon ID reg 1 */
 100         if (chk1 != 0x1f)
 101                 goto nodev;
 102
 103         chk1 = inb(ioaddr + 0x1e) & 0x07;       /* Get Proteon ID reg 0 */
 104         for (i=0; i<16; i++) {
 105                 chk2 = inb(ioaddr + 0x1e) & 0x07;
 106                 if (((chk1 + 1) & 0x07) != chk2)
 107                         goto nodev;
 108                 chk1 = chk2;
 109         }
 110
 111         dev->base_addr = ioaddr;
 112         return (0);
 113 nodev:
 114         release_region(ioaddr, PROTEON_IO_EXTENT);
 115         return -ENODEV;
 116 }
 117
 118 static int __init setup_card(struct net_device *dev, struct device *pdev)
 119 {
 120         struct net_local *tp;
 121         static int versionprinted;
 122         const unsigned *port;
 123         int j,err = 0;
 124
 125         if (!dev)
 126                 return -ENOMEM;
 127
 128         SET_MODULE_OWNER(dev);
 129         if (dev->base_addr)     /* probe specific location */
 130                 err = proteon_probe1(dev, dev->base_addr);
 131         else {
 132                 for (port = portlist; *port; port++) {
 133                         err = proteon_probe1(dev, *port);
 134                         if (!err)
 135                                 break;
 136                 }
 137         }
 138         if (err)
 139                 goto out5;
 140
 141         /* At this point we have found a valid card. */
 142
 143         if (versionprinted++ == 0)
 144                 printk(KERN_DEBUG "%s", version);
 145
 146         err = -EIO;
 147         pdev->dma_mask = &dma_mask;
 148         if (tmsdev_init(dev, pdev))
 149                 goto out4;
 150
 151         dev->base_addr &= ~3;
 152
 153         proteon_read_eeprom(dev);
 154
 155         printk(KERN_DEBUG "proteon.c:    Ring Station Address: ");
 156         printk("%2.2x", dev->dev_addr[0]);
 157         for (j = 1; j < 6; j++)
 158                 printk(":%2.2x", dev->dev_addr[j]);
 159         printk("\n");
 160
 161         tp = netdev_priv(dev);
 162         tp->setnselout = proteon_setnselout_pins;
 163
 164         tp->sifreadb = proteon_sifreadb;
 165         tp->sifreadw = proteon_sifreadw;
 166         tp->sifwriteb = proteon_sifwriteb;
 167         tp->sifwritew = proteon_sifwritew;
 168
 169         memcpy(tp->ProductID, cardname, PROD_ID_SIZE + 1);
 170
 171         tp->tmspriv = NULL;
 172
 173         dev->open = proteon_open;
 174         dev->stop = tms380tr_close;
 175
 176         if (dev->irq == 0)
 177         {
 178                 for(j = 0; irqlist[j] != 0; j++)
 179                 {
 180                         dev->irq = irqlist[j];
 181                         if (!request_irq(dev->irq, tms380tr_interrupt, 0,
 182                                 cardname, dev))
 183                                 break;
 184                 }
 185
 186                 if(irqlist[j] == 0)
 187                 {
 188                         printk(KERN_INFO "proteon.c: AutoSelect no IRQ available\n");
 189                         goto out3;
 190                 }
 191         }
 192         else
 193         {
 194                 for(j = 0; irqlist[j] != 0; j++)
 195                         if (irqlist[j] == dev->irq)
 196                                 break;
 197                 if (irqlist[j] == 0)
 198                 {
 199                         printk(KERN_INFO "proteon.c: Illegal IRQ %d specified\n",
 200                                 dev->irq);
 201                         goto out3;
 202                 }
 203                 if (request_irq(dev->irq, tms380tr_interrupt, 0,
 204                         cardname, dev))
 205                 {
 206                         printk(KERN_INFO "proteon.c: Selected IRQ %d not available\n",
 207                                 dev->irq);
 208                         goto out3;
 209                 }
 210         }
 211
 212         if (dev->dma == 0)
 213         {
 214                 for(j = 0; dmalist[j] != 0; j++)
 215                 {
 216                         dev->dma = dmalist[j];
 217                         if (!request_dma(dev->dma, cardname))
 218                                 break;
 219                 }
 220
 221                 if(dmalist[j] == 0)
 222                 {
 223                         printk(KERN_INFO "proteon.c: AutoSelect no DMA available\n");
 224                         goto out2;
 225                 }
 226         }
 227         else
 228         {
 229                 for(j = 0; dmalist[j] != 0; j++)
 230                         if (dmalist[j] == dev->dma)
 231                                 break;
 232                 if (dmalist[j] == 0)
 233                 {
 234                         printk(KERN_INFO "proteon.c: Illegal DMA %d specified\n",
 235                                 dev->dma);
 236                         goto out2;
 237                 }
 238                 if (request_dma(dev->dma, cardname))
 239                 {
 240                         printk(KERN_INFO "proteon.c: Selected DMA %d not available\n",
 241                                 dev->dma);
 242                         goto out2;
 243                 }
 244         }
 245
 246         err = register_netdev(dev);
 247         if (err)
 248                 goto out;
 249
 250         printk(KERN_DEBUG "%s:    IO: %#4lx  IRQ: %d  DMA: %d\n",
 251                dev->name, dev->base_addr, dev->irq, dev->dma);
 252
 253         return 0;
 254 out:
 255         free_dma(dev->dma);
 256 out2:
 257         free_irq(dev->irq, dev);
 258 out3:
 259         tmsdev_term(dev);
 260 out4:
 261         release_region(dev->base_addr, PROTEON_IO_EXTENT);
 262 out5:
 263         return err;
 264 }
 265
 266 /*
 267  * Reads MAC address from adapter RAM, which should've read it from
 268  * the onboard ROM.
 269  *
 270  * Calling this on a board that does not support it can be a very
 271  * dangerous thing.  The Madge board, for instance, will lock your
 272  * machine hard when this is called.  Luckily, its supported in a
 273  * separate driver.  --ASF
 274  */
 275 static void proteon_read_eeprom(struct net_device *dev)
 276 {
 277         int i;
 278
 279         /* Address: 0000:0000 */
 280         proteon_sifwritew(dev, 0, SIFADX);
 281         proteon_sifwritew(dev, 0, SIFADR);
 282
 283         /* Read six byte MAC address data */
 284         dev->addr_len = 6;
 285         for(i = 0; i < 6; i++)
 286                 dev->dev_addr[i] = proteon_sifreadw(dev, SIFINC) >> 8;
 287 }
 288
 289 unsigned short proteon_setnselout_pins(struct net_device *dev)
 290 {
 291         return 0;
 292 }
 293
 294 static int proteon_open(struct net_device *dev)
 295 {
 296         struct net_local *tp = netdev_priv(dev);
 297         unsigned short val = 0;
 298         int i;
 299
 300         /* Proteon reset sequence */
 301         outb(0, dev->base_addr + 0x11);
 302         mdelay(20);
 303         outb(0x04, dev->base_addr + 0x11);
 304         mdelay(20);
 305         outb(0, dev->base_addr + 0x11);
 306         mdelay(100);
 307
 308         /* set control/status reg */
 309         val = inb(dev->base_addr + 0x11);
 310         val |= 0x78;
 311         val &= 0xf9;
 312         if(tp->DataRate == SPEED_4)
 313                 val |= 0x20;
 314         else
 315                 val &= ~0x20;
 316
 317         outb(val, dev->base_addr + 0x11);
 318         outb(0xff, dev->base_addr + 0x12);
 319         for(i = 0; irqlist[i] != 0; i++)
 320         {
 321                 if(irqlist[i] == dev->irq)
 322                         break;
 323         }
 324         val = i;
 325         i = (7 - dev->dma) << 4;
 326         val |= i;
 327         outb(val, dev->base_addr + 0x13);
 328
 329         return tms380tr_open(dev);
 330 }
 331
 332 #define ISATR_MAX_ADAPTERS 3
 333
 334 static int io[ISATR_MAX_ADAPTERS];
 335 static int irq[ISATR_MAX_ADAPTERS];
 336 static int dma[ISATR_MAX_ADAPTERS];
 337
 338 MODULE_LICENSE("GPL");
 339
 340 module_param_array(io, int, NULL, 0);
 341 module_param_array(irq, int, NULL, 0);
 342 module_param_array(dma, int, NULL, 0);
 343
 344 static struct platform_device *proteon_dev[ISATR_MAX_ADAPTERS];
 345
 346 static struct device_driver proteon_driver = {
 347         .name           = "proteon",
 348         .bus            = &platform_bus_type,
 349 };
 350
 351 static int __init proteon_init(void)
 352 {
 353         struct net_device *dev;
 354         struct platform_device *pdev;
 355         int i, num = 0, err = 0;
 356
 357         err = driver_register(&proteon_driver);
 358         if (err)
 359                 return err;
 360
 361         for (i = 0; i < ISATR_MAX_ADAPTERS ; i++) {
 362                 dev = alloc_trdev(sizeof(struct net_local));
 363                 if (!dev)
 364                         continue;
 365
 366                 dev->base_addr = io[i];
 367                 dev->irq = irq[i];
 368                 dev->dma = dma[i];
 369                 pdev = platform_device_register_simple("proteon",
 370                         i, NULL, 0);
 371                 err = setup_card(dev, &pdev->dev);
 372                 if (!err) {
 373                         proteon_dev[i] = pdev;
 374                         dev_set_drvdata(&pdev->dev, dev);
 375                         ++num;
 376                 } else {
 377                         platform_device_unregister(pdev);
 378                         free_netdev(dev);
 379                 }
 380         }
 381
 382         printk(KERN_NOTICE "proteon.c: %d cards found.\n", num);
 383         /* Probe for cards. */
 384         if (num == 0) {
 385                 printk(KERN_NOTICE "proteon.c: No cards found.\n");
 386                 return (-ENODEV);
 387         }
 388         return (0);
 389 }
 390
 391 static void __exit proteon_cleanup(void)
 392 {
 393         struct net_device *dev;
 394         int i;
 395
 396         for (i = 0; i < ISATR_MAX_ADAPTERS ; i++) {
 397                 struct platform_device *pdev = proteon_dev[i];
 398
 399                 if (!pdev)
 400                         continue;
 401                 dev = dev_get_drvdata(&pdev->dev);
 402                 unregister_netdev(dev);
 403                 release_region(dev->base_addr, PROTEON_IO_EXTENT);
 404                 free_irq(dev->irq, dev);
 405                 free_dma(dev->dma);
 406                 tmsdev_term(dev);
 407                 free_netdev(dev);
 408                 dev_set_drvdata(&pdev->dev, NULL);
 409                 platform_device_unregister(pdev);
 410         }
 411         driver_unregister(&proteon_driver);
 412 }
 413
 414 module_init(proteon_init);
 415 module_exit(proteon_cleanup);