apne.c
上传用户:jlfgdled
上传日期:2013-04-10
资源大小:33168k
文件大小:17k
源码类别:

Linux/Unix编程

开发平台:

Unix_Linux

  1. /*
  2.  * Amiga Linux/68k 8390 based PCMCIA Ethernet Driver for the Amiga 1200
  3.  *
  4.  * (C) Copyright 1997 Alain Malek
  5.  *                    (Alain.Malek@cryogen.com)
  6.  *
  7.  * ----------------------------------------------------------------------------
  8.  *
  9.  * This program is based on
  10.  *
  11.  * ne.c:       A general non-shared-memory NS8390 ethernet driver for linux
  12.  *             Written 1992-94 by Donald Becker.
  13.  *
  14.  * 8390.c:     A general NS8390 ethernet driver core for linux.
  15.  *             Written 1992-94 by Donald Becker.
  16.  *
  17.  * cnetdevice: A Sana-II ethernet driver for AmigaOS
  18.  *             Written by Bruce Abbott (bhabbott@inhb.co.nz)
  19.  *
  20.  * ----------------------------------------------------------------------------
  21.  *
  22.  * This file is subject to the terms and conditions of the GNU General Public
  23.  * License.  See the file COPYING in the main directory of the Linux
  24.  * distribution for more details.
  25.  *
  26.  * ----------------------------------------------------------------------------
  27.  *
  28.  */
  29. #include <linux/module.h>
  30. #include <linux/kernel.h>
  31. #include <linux/sched.h>
  32. #include <linux/errno.h>
  33. #include <linux/pci.h>
  34. #include <linux/init.h>
  35. #include <linux/delay.h>
  36. #include <asm/system.h>
  37. #include <asm/io.h>
  38. #include <linux/netdevice.h>
  39. #include <linux/etherdevice.h>
  40. #include <asm/setup.h>
  41. #include <asm/amigaints.h>
  42. #include <asm/amigahw.h>
  43. #include <asm/amigayle.h>
  44. #include <asm/amipcmcia.h>
  45. #include "8390.h"
  46. /* ---- No user-serviceable parts below ---- */
  47. #define NE_BASE  (dev->base_addr)
  48. #define NE_CMD   0x00
  49. #define NE_DATAPORT 0x10            /* NatSemi-defined port window offset. */
  50. #define NE_RESET 0x1f            /* Issue a read to reset, a write to clear. */
  51. #define NE_IO_EXTENT         0x20
  52. #define NE_EN0_ISR 0x07
  53. #define NE_EN0_DCFG 0x0e
  54. #define NE_EN0_RSARLO         0x08
  55. #define NE_EN0_RSARHI         0x09
  56. #define NE_EN0_RCNTLO         0x0a
  57. #define NE_EN0_RXCR 0x0c
  58. #define NE_EN0_TXCR 0x0d
  59. #define NE_EN0_RCNTHI         0x0b
  60. #define NE_EN0_IMR 0x0f
  61. #define NE1SM_START_PG 0x20 /* First page of TX buffer */
  62. #define NE1SM_STOP_PG  0x40 /* Last page +1 of RX ring */
  63. #define NESM_START_PG 0x40 /* First page of TX buffer */
  64. #define NESM_STOP_PG 0x80 /* Last page +1 of RX ring */
  65. int apne_probe(struct net_device *dev);
  66. static int apne_probe1(struct net_device *dev, int ioaddr);
  67. static int apne_open(struct net_device *dev);
  68. static int apne_close(struct net_device *dev);
  69. static void apne_reset_8390(struct net_device *dev);
  70. static void apne_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr,
  71.   int ring_page);
  72. static void apne_block_input(struct net_device *dev, int count,
  73. struct sk_buff *skb, int ring_offset);
  74. static void apne_block_output(struct net_device *dev, const int count,
  75. const unsigned char *buf, const int start_page);
  76. static void apne_interrupt(int irq, void *dev_id, struct pt_regs *regs);
  77. static int init_pcmcia(void);
  78. /* IO base address used for nic */
  79. #define IOBASE 0x300
  80. /*
  81.    use MANUAL_CONFIG and MANUAL_OFFSET for enabling IO by hand
  82.    you can find the values to use by looking at the cnet.device
  83.    config file example (the default values are for the CNET40BC card)
  84. */
  85. /*
  86. #define MANUAL_CONFIG 0x20
  87. #define MANUAL_OFFSET 0x3f8
  88. #define MANUAL_HWADDR0 0x00
  89. #define MANUAL_HWADDR1 0x12
  90. #define MANUAL_HWADDR2 0x34
  91. #define MANUAL_HWADDR3 0x56
  92. #define MANUAL_HWADDR4 0x78
  93. #define MANUAL_HWADDR5 0x9a
  94. */
  95. #define WORDSWAP(a) ( (((a)>>8)&0xff) | ((a)<<8) )
  96. static const char version[] =
  97.     "apne.c:v1.1 7/10/98 Alain Malek (Alain.Malek@cryogen.ch)n";
  98. static int apne_owned; /* signal if card already owned */
  99. int __init apne_probe(struct net_device *dev)
  100. {
  101. #ifndef MANUAL_CONFIG
  102. char tuple[8];
  103. #endif
  104. if (apne_owned)
  105. return -ENODEV;
  106. SET_MODULE_OWNER(dev);
  107. if ( !(AMIGAHW_PRESENT(PCMCIA)) )
  108. return (-ENODEV);
  109.                                 
  110. printk("Looking for PCMCIA ethernet card : ");
  111.                                         
  112. /* check if a card is inserted */
  113. if (!(PCMCIA_INSERTED)) {
  114. printk("NO PCMCIA card insertedn");
  115. return (-ENODEV);
  116. }
  117.                                                                                                 
  118. /* disable pcmcia irq for readtuple */
  119. pcmcia_disable_irq();
  120. #ifndef MANUAL_CONFIG
  121. if ((pcmcia_copy_tuple(CISTPL_FUNCID, tuple, 8) < 3) ||
  122. (tuple[2] != CISTPL_FUNCID_NETWORK)) {
  123. printk("not an ethernet cardn");
  124. return (-ENODEV);
  125. }
  126. #endif
  127. printk("ethernet PCMCIA card insertedn");
  128. if (init_pcmcia())
  129. return apne_probe1(dev, IOBASE);
  130. else
  131. return (-ENODEV);
  132. }
  133. static int __init apne_probe1(struct net_device *dev, int ioaddr)
  134. {
  135.     int i;
  136.     unsigned char SA_prom[32];
  137.     int wordlength = 2;
  138.     const char *name = NULL;
  139.     int start_page, stop_page;
  140. #ifndef MANUAL_HWADDR0
  141.     int neX000, ctron;
  142. #endif
  143.     static unsigned version_printed;
  144.  
  145.     if (ei_debug  &&  version_printed++ == 0)
  146. printk(version);
  147.     printk("PCMCIA NE*000 ethercard probe");
  148.     /* Reset card. Who knows what dain-bramaged state it was left in. */
  149.     { unsigned long reset_start_time = jiffies;
  150. outb(inb(ioaddr + NE_RESET), ioaddr + NE_RESET);
  151. while ((inb(ioaddr + NE_EN0_ISR) & ENISR_RESET) == 0)
  152. if (jiffies - reset_start_time > 2*HZ/100) {
  153. printk(" not found (no reset ack).n");
  154. return -ENODEV;
  155. }
  156. outb(0xff, ioaddr + NE_EN0_ISR); /* Ack all intr. */
  157.     }
  158. #ifndef MANUAL_HWADDR0
  159.     /* Read the 16 bytes of station address PROM.
  160.        We must first initialize registers, similar to NS8390_init(eifdev, 0).
  161.        We can't reliably read the SAPROM address without this.
  162.        (I learned the hard way!). */
  163.     {
  164. struct {unsigned long value, offset; } program_seq[] = {
  165.     {E8390_NODMA+E8390_PAGE0+E8390_STOP, NE_CMD}, /* Select page 0*/
  166.     {0x48, NE_EN0_DCFG}, /* Set byte-wide (0x48) access. */
  167.     {0x00, NE_EN0_RCNTLO}, /* Clear the count regs. */
  168.     {0x00, NE_EN0_RCNTHI},
  169.     {0x00, NE_EN0_IMR}, /* Mask completion irq. */
  170.     {0xFF, NE_EN0_ISR},
  171.     {E8390_RXOFF, NE_EN0_RXCR}, /* 0x20  Set to monitor */
  172.     {E8390_TXOFF, NE_EN0_TXCR}, /* 0x02  and loopback mode. */
  173.     {32, NE_EN0_RCNTLO},
  174.     {0x00, NE_EN0_RCNTHI},
  175.     {0x00, NE_EN0_RSARLO}, /* DMA starting at 0x0000. */
  176.     {0x00, NE_EN0_RSARHI},
  177.     {E8390_RREAD+E8390_START, NE_CMD},
  178. };
  179. for (i = 0; i < sizeof(program_seq)/sizeof(program_seq[0]); i++) {
  180.     outb(program_seq[i].value, ioaddr + program_seq[i].offset);
  181. }
  182.     }
  183.     for(i = 0; i < 32 /*sizeof(SA_prom)*/; i+=2) {
  184. SA_prom[i] = inb(ioaddr + NE_DATAPORT);
  185. SA_prom[i+1] = inb(ioaddr + NE_DATAPORT);
  186. if (SA_prom[i] != SA_prom[i+1])
  187.     wordlength = 1;
  188.     }
  189.     /* At this point, wordlength *only* tells us if the SA_prom is doubled
  190. up or not because some broken PCI cards don't respect the byte-wide
  191. request in program_seq above, and hence don't have doubled up values. 
  192. These broken cards would otherwise be detected as an ne1000.  */
  193.     if (wordlength == 2)
  194. for (i = 0; i < 16; i++)
  195. SA_prom[i] = SA_prom[i+i];
  196.     
  197.     if (wordlength == 2) {
  198. /* We must set the 8390 for word mode. */
  199. outb(0x49, ioaddr + NE_EN0_DCFG);
  200. start_page = NESM_START_PG;
  201. stop_page = NESM_STOP_PG;
  202.     } else {
  203. start_page = NE1SM_START_PG;
  204. stop_page = NE1SM_STOP_PG;
  205.     }
  206.     neX000 = (SA_prom[14] == 0x57  &&  SA_prom[15] == 0x57);
  207.     ctron =  (SA_prom[0] == 0x00 && SA_prom[1] == 0x00 && SA_prom[2] == 0x1d);
  208.     /* Set up the rest of the parameters. */
  209.     if (neX000) {
  210. name = (wordlength == 2) ? "NE2000" : "NE1000";
  211.     } else if (ctron) {
  212. name = (wordlength == 2) ? "Ctron-8" : "Ctron-16";
  213. start_page = 0x01;
  214. stop_page = (wordlength == 2) ? 0x40 : 0x20;
  215.     } else {
  216. printk(" not found.n");
  217. return -ENXIO;
  218.     }
  219. #else
  220.     wordlength = 2;
  221.     /* We must set the 8390 for word mode. */
  222.     outb(0x49, ioaddr + NE_EN0_DCFG);
  223.     start_page = NESM_START_PG;
  224.     stop_page = NESM_STOP_PG;
  225.     SA_prom[0] = MANUAL_HWADDR0;
  226.     SA_prom[1] = MANUAL_HWADDR1;
  227.     SA_prom[2] = MANUAL_HWADDR2;
  228.     SA_prom[3] = MANUAL_HWADDR3;
  229.     SA_prom[4] = MANUAL_HWADDR4;
  230.     SA_prom[5] = MANUAL_HWADDR5;
  231.     name = "NE2000";
  232. #endif
  233.     dev->base_addr = ioaddr;
  234.     /* Install the Interrupt handler */
  235.     i = request_irq(IRQ_AMIGA_PORTS, apne_interrupt, SA_SHIRQ, dev->name, dev);
  236.     if (i) return i;
  237.     /* Allocate dev->priv and fill in 8390 specific dev fields. */
  238.     if (ethdev_init(dev)) {
  239. printk (" unable to get memory for dev->priv.n");
  240. return -ENOMEM;
  241.     }
  242.     for(i = 0; i < ETHER_ADDR_LEN; i++) {
  243. printk(" %2.2x", SA_prom[i]);
  244. dev->dev_addr[i] = SA_prom[i];
  245.     }
  246.     printk("n%s: %s found.n", dev->name, name);
  247.     ei_status.name = name;
  248.     ei_status.tx_start_page = start_page;
  249.     ei_status.stop_page = stop_page;
  250.     ei_status.word16 = (wordlength == 2);
  251.     ei_status.rx_start_page = start_page + TX_PAGES;
  252.     ei_status.reset_8390 = &apne_reset_8390;
  253.     ei_status.block_input = &apne_block_input;
  254.     ei_status.block_output = &apne_block_output;
  255.     ei_status.get_8390_hdr = &apne_get_8390_hdr;
  256.     dev->open = &apne_open;
  257.     dev->stop = &apne_close;
  258.     NS8390_init(dev, 0);
  259.     pcmcia_ack_int(pcmcia_get_intreq()); /* ack PCMCIA int req */
  260.     pcmcia_enable_irq();
  261.     apne_owned = 1;
  262.     return 0;
  263. }
  264. static int
  265. apne_open(struct net_device *dev)
  266. {
  267.     ei_open(dev);
  268.     return 0;
  269. }
  270. static int
  271. apne_close(struct net_device *dev)
  272. {
  273.     if (ei_debug > 1)
  274. printk("%s: Shutting down ethercard.n", dev->name);
  275.     ei_close(dev);
  276.     return 0;
  277. }
  278. /* Hard reset the card.  This used to pause for the same period that a
  279.    8390 reset command required, but that shouldn't be necessary. */
  280. static void
  281. apne_reset_8390(struct net_device *dev)
  282. {
  283.     unsigned long reset_start_time = jiffies;
  284.     init_pcmcia();
  285.     if (ei_debug > 1) printk("resetting the 8390 t=%ld...", jiffies);
  286.     outb(inb(NE_BASE + NE_RESET), NE_BASE + NE_RESET);
  287.     ei_status.txing = 0;
  288.     ei_status.dmaing = 0;
  289.     /* This check _should_not_ be necessary, omit eventually. */
  290.     while ((inb(NE_BASE+NE_EN0_ISR) & ENISR_RESET) == 0)
  291. if (jiffies - reset_start_time > 2*HZ/100) {
  292.     printk("%s: ne_reset_8390() did not complete.n", dev->name);
  293.     break;
  294. }
  295.     outb(ENISR_RESET, NE_BASE + NE_EN0_ISR); /* Ack intr. */
  296. }
  297. /* Grab the 8390 specific header. Similar to the block_input routine, but
  298.    we don't need to be concerned with ring wrap as the header will be at
  299.    the start of a page, so we optimize accordingly. */
  300. static void
  301. apne_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page)
  302. {
  303.     int nic_base = dev->base_addr;
  304.     int cnt;
  305.     char *ptrc;
  306.     short *ptrs;
  307.     /* This *shouldn't* happen. If it does, it's the last thing you'll see */
  308.     if (ei_status.dmaing) {
  309. printk("%s: DMAing conflict in ne_get_8390_hdr "
  310.    "[DMAstat:%d][irqlock:%d][intr:%d].n",
  311.    dev->name, ei_status.dmaing, ei_status.irqlock, dev->irq);
  312. return;
  313.     }
  314.     ei_status.dmaing |= 0x01;
  315.     outb(E8390_NODMA+E8390_PAGE0+E8390_START, nic_base+ NE_CMD);
  316.     outb(ENISR_RDC, nic_base + NE_EN0_ISR);
  317.     outb(sizeof(struct e8390_pkt_hdr), nic_base + NE_EN0_RCNTLO);
  318.     outb(0, nic_base + NE_EN0_RCNTHI);
  319.     outb(0, nic_base + NE_EN0_RSARLO); /* On page boundary */
  320.     outb(ring_page, nic_base + NE_EN0_RSARHI);
  321.     outb(E8390_RREAD+E8390_START, nic_base + NE_CMD);
  322.     if (ei_status.word16) {
  323.         ptrs = (short*)hdr;
  324.         for(cnt = 0; cnt < (sizeof(struct e8390_pkt_hdr)>>1); cnt++)
  325.             *ptrs++ = inw(NE_BASE + NE_DATAPORT);
  326.     } else {
  327.         ptrc = (char*)hdr;
  328.         for(cnt = 0; cnt < sizeof(struct e8390_pkt_hdr); cnt++)
  329.             *ptrc++ = inb(NE_BASE + NE_DATAPORT);
  330.     }
  331.     outb(ENISR_RDC, nic_base + NE_EN0_ISR); /* Ack intr. */
  332.     hdr->count = WORDSWAP(hdr->count);
  333.     ei_status.dmaing &= ~0x01;
  334. }
  335. /* Block input and output, similar to the Crynwr packet driver.  If you
  336.    are porting to a new ethercard, look at the packet driver source for hints.
  337.    The NEx000 doesn't share the on-board packet memory -- you have to put
  338.    the packet out through the "remote DMA" dataport using outb. */
  339. static void
  340. apne_block_input(struct net_device *dev, int count, struct sk_buff *skb, int ring_offset)
  341. {
  342.     int nic_base = dev->base_addr;
  343.     char *buf = skb->data;
  344.     char *ptrc;
  345.     short *ptrs;
  346.     int cnt;
  347.     /* This *shouldn't* happen. If it does, it's the last thing you'll see */
  348.     if (ei_status.dmaing) {
  349. printk("%s: DMAing conflict in ne_block_input "
  350.    "[DMAstat:%d][irqlock:%d][intr:%d].n",
  351.    dev->name, ei_status.dmaing, ei_status.irqlock, dev->irq);
  352. return;
  353.     }
  354.     ei_status.dmaing |= 0x01;
  355.     outb(E8390_NODMA+E8390_PAGE0+E8390_START, nic_base+ NE_CMD);
  356.     outb(ENISR_RDC, nic_base + NE_EN0_ISR);
  357.     outb(count & 0xff, nic_base + NE_EN0_RCNTLO);
  358.     outb(count >> 8, nic_base + NE_EN0_RCNTHI);
  359.     outb(ring_offset & 0xff, nic_base + NE_EN0_RSARLO);
  360.     outb(ring_offset >> 8, nic_base + NE_EN0_RSARHI);
  361.     outb(E8390_RREAD+E8390_START, nic_base + NE_CMD);
  362.     if (ei_status.word16) {
  363.       ptrs = (short*)buf;
  364.       for (cnt = 0; cnt < (count>>1); cnt++)
  365.         *ptrs++ = inw(NE_BASE + NE_DATAPORT);
  366.       if (count & 0x01) {
  367. buf[count-1] = inb(NE_BASE + NE_DATAPORT);
  368.       }
  369.     } else {
  370.       ptrc = (char*)buf;
  371.       for (cnt = 0; cnt < count; cnt++)
  372.         *ptrc++ = inb(NE_BASE + NE_DATAPORT);
  373.     }
  374.     outb(ENISR_RDC, nic_base + NE_EN0_ISR); /* Ack intr. */
  375.     ei_status.dmaing &= ~0x01;
  376. }
  377. static void
  378. apne_block_output(struct net_device *dev, int count,
  379. const unsigned char *buf, const int start_page)
  380. {
  381.     int nic_base = NE_BASE;
  382.     unsigned long dma_start;
  383.     char *ptrc;
  384.     short *ptrs;
  385.     int cnt;
  386.     /* Round the count up for word writes.  Do we need to do this?
  387.        What effect will an odd byte count have on the 8390?
  388.        I should check someday. */
  389.     if (ei_status.word16 && (count & 0x01))
  390.       count++;
  391.     /* This *shouldn't* happen. If it does, it's the last thing you'll see */
  392.     if (ei_status.dmaing) {
  393. printk("%s: DMAing conflict in ne_block_output."
  394.    "[DMAstat:%d][irqlock:%d][intr:%d]n",
  395.    dev->name, ei_status.dmaing, ei_status.irqlock, dev->irq);
  396. return;
  397.     }
  398.     ei_status.dmaing |= 0x01;
  399.     /* We should already be in page 0, but to be safe... */
  400.     outb(E8390_PAGE0+E8390_START+E8390_NODMA, nic_base + NE_CMD);
  401.     outb(ENISR_RDC, nic_base + NE_EN0_ISR);
  402.    /* Now the normal output. */
  403.     outb(count & 0xff, nic_base + NE_EN0_RCNTLO);
  404.     outb(count >> 8,   nic_base + NE_EN0_RCNTHI);
  405.     outb(0x00, nic_base + NE_EN0_RSARLO);
  406.     outb(start_page, nic_base + NE_EN0_RSARHI);
  407.     outb(E8390_RWRITE+E8390_START, nic_base + NE_CMD);
  408.     if (ei_status.word16) {
  409.         ptrs = (short*)buf;
  410.         for (cnt = 0; cnt < count>>1; cnt++)
  411.             outw(*ptrs++, NE_BASE+NE_DATAPORT);
  412.     } else {
  413.         ptrc = (char*)buf;
  414.         for (cnt = 0; cnt < count; cnt++)
  415.     outb(*ptrc++, NE_BASE + NE_DATAPORT);
  416.     }
  417.     dma_start = jiffies;
  418.     while ((inb(NE_BASE + NE_EN0_ISR) & ENISR_RDC) == 0)
  419. if (jiffies - dma_start > 2*HZ/100) { /* 20ms */
  420. printk("%s: timeout waiting for Tx RDC.n", dev->name);
  421. apne_reset_8390(dev);
  422. NS8390_init(dev,1);
  423. break;
  424. }
  425.     outb(ENISR_RDC, nic_base + NE_EN0_ISR); /* Ack intr. */
  426.     ei_status.dmaing &= ~0x01;
  427.     return;
  428. }
  429. static void apne_interrupt(int irq, void *dev_id, struct pt_regs *regs)
  430. {
  431.     unsigned char pcmcia_intreq;
  432.     if (!(gayle.inten & GAYLE_IRQ_IRQ))
  433.         return;
  434.     pcmcia_intreq = pcmcia_get_intreq();
  435.     if (!(pcmcia_intreq & GAYLE_IRQ_IRQ)) {
  436.         pcmcia_ack_int(pcmcia_intreq);
  437.         return;
  438.     }
  439.     if (ei_debug > 3)
  440.         printk("pcmcia intreq = %xn", pcmcia_intreq);
  441.     pcmcia_disable_irq(); /* to get rid of the sti() within ei_interrupt */
  442.     ei_interrupt(irq, dev_id, regs);
  443.     pcmcia_ack_int(pcmcia_get_intreq());
  444.     pcmcia_enable_irq();
  445. }
  446. #ifdef MODULE
  447. static struct net_device apne_dev;
  448. int init_module(void)
  449. {
  450. int err;
  451. apne_dev.init = apne_probe;
  452. if ((err = register_netdev(&apne_dev))) {
  453. if (err == -EIO)
  454. printk("No PCMCIA NEx000 ethernet card found.n");
  455. return (err);
  456. }
  457. return (0);
  458. }
  459. void cleanup_module(void)
  460. {
  461. unregister_netdev(&apne_dev);
  462. pcmcia_disable_irq();
  463. free_irq(IRQ_AMIGA_PORTS, &apne_dev);
  464. pcmcia_reset();
  465. apne_owned = 0;
  466. }
  467. #endif
  468. static int init_pcmcia(void)
  469. {
  470. u_char config;
  471. #ifndef MANUAL_CONFIG
  472. u_char tuple[32];
  473. int offset_len;
  474. #endif
  475. u_long offset;
  476. pcmcia_reset();
  477. pcmcia_program_voltage(PCMCIA_0V);
  478. pcmcia_access_speed(PCMCIA_SPEED_250NS);
  479. pcmcia_write_enable();
  480. #ifdef MANUAL_CONFIG
  481. config = MANUAL_CONFIG;
  482. #else
  483. /* get and write config byte to enable IO port */
  484. if (pcmcia_copy_tuple(CISTPL_CFTABLE_ENTRY, tuple, 32) < 3)
  485. return 0;
  486. config = tuple[2] & 0x3f;
  487. #endif
  488. #ifdef MANUAL_OFFSET
  489. offset = MANUAL_OFFSET;
  490. #else
  491. if (pcmcia_copy_tuple(CISTPL_CONFIG, tuple, 32) < 6)
  492. return 0;
  493. offset_len = (tuple[2] & 0x3) + 1;
  494. offset = 0;
  495. while(offset_len--) {
  496. offset = (offset << 8) | tuple[4+offset_len];
  497. }
  498. #endif
  499. out_8(GAYLE_ATTRIBUTE+offset, config);
  500. return 1;
  501. }
  502. MODULE_LICENSE("GPL");