]> err.no Git - linux-2.6/blob - drivers/net/hp-plus.c
8d4f810fa288919cf19698cf45256f9896e82bf9
[linux-2.6] / drivers / net / hp-plus.c
1 /* hp-plus.c: A HP PCLAN/plus ethernet driver for linux. */
2 /*
3         Written 1994 by Donald Becker.
4
5         This driver is for the Hewlett Packard PC LAN (27***) plus ethercards.
6         These cards are sold under several model numbers, usually 2724*.
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         The author may be reached as becker@scyld.com, or C/O
12         Scyld Computing Corporation
13         410 Severn Ave., Suite 210
14         Annapolis MD 21403
15
16         As is often the case, a great deal of credit is owed to Russ Nelson.
17         The Crynwr packet driver was my primary source of HP-specific
18         programming information.
19 */
20
21 static const char version[] =
22 "hp-plus.c:v1.10 9/24/94 Donald Becker (becker@cesdis.gsfc.nasa.gov)\n";
23
24 #include <linux/module.h>
25
26 #include <linux/string.h>               /* Important -- this inlines word moves. */
27 #include <linux/kernel.h>
28 #include <linux/errno.h>
29 #include <linux/ioport.h>
30 #include <linux/netdevice.h>
31 #include <linux/etherdevice.h>
32 #include <linux/init.h>
33 #include <linux/delay.h>
34
35 #include <asm/system.h>
36 #include <asm/io.h>
37
38 #include "8390.h"
39
40 #define DRV_NAME "hp-plus"
41
42 /* A zero-terminated list of I/O addresses to be probed. */
43 static unsigned int hpplus_portlist[] __initdata =
44 {0x200, 0x240, 0x280, 0x2C0, 0x300, 0x320, 0x340, 0};
45
46 /*
47    The HP EtherTwist chip implementation is a fairly routine DP8390
48    implementation.  It allows both shared memory and programmed-I/O buffer
49    access, using a custom interface for both.  The programmed-I/O mode is
50    entirely implemented in the HP EtherTwist chip, bypassing the problem
51    ridden built-in 8390 facilities used on NE2000 designs.  The shared
52    memory mode is likewise special, with an offset register used to make
53    packets appear at the shared memory base.  Both modes use a base and bounds
54    page register to hide the Rx ring buffer wrap -- a packet that spans the
55    end of physical buffer memory appears continuous to the driver. (c.f. the
56    3c503 and Cabletron E2100)
57
58    A special note: the internal buffer of the board is only 8 bits wide.
59    This lays several nasty traps for the unaware:
60    - the 8390 must be programmed for byte-wide operations
61    - all I/O and memory operations must work on whole words (the access
62      latches are serially preloaded and have no byte-swapping ability).
63
64    This board is laid out in I/O space much like the earlier HP boards:
65    the first 16 locations are for the board registers, and the second 16 are
66    for the 8390.  The board is easy to identify, with both a dedicated 16 bit
67    ID register and a constant 0x530* value in the upper bits of the paging
68    register.
69 */
70
71 #define HP_ID                   0x00    /* ID register, always 0x4850. */
72 #define HP_PAGING               0x02    /* Registers visible @ 8-f, see PageName. */
73 #define HPP_OPTION              0x04    /* Bitmapped options, see HP_Option.    */
74 #define HPP_OUT_ADDR    0x08    /* I/O output location in Perf_Page.    */
75 #define HPP_IN_ADDR             0x0A    /* I/O input location in Perf_Page.             */
76 #define HP_DATAPORT             0x0c    /* I/O data transfer in Perf_Page.              */
77 #define NIC_OFFSET              0x10    /* Offset to the 8390 registers.                */
78 #define HP_IO_EXTENT    32
79
80 #define HP_START_PG             0x00    /* First page of TX buffer */
81 #define HP_STOP_PG              0x80    /* Last page +1 of RX ring */
82
83 /* The register set selected in HP_PAGING. */
84 enum PageName {
85         Perf_Page = 0,                          /* Normal operation. */
86         MAC_Page = 1,                           /* The ethernet address (+checksum). */
87         HW_Page = 2,                            /* EEPROM-loaded hardware parameters. */
88         LAN_Page = 4,                           /* Transceiver selection, testing, etc. */
89         ID_Page = 6 };
90
91 /* The bit definitions for the HPP_OPTION register. */
92 enum HP_Option {
93         NICReset = 1, ChipReset = 2,    /* Active low, really UNreset. */
94         EnableIRQ = 4, FakeIntr = 8, BootROMEnb = 0x10, IOEnb = 0x20,
95         MemEnable = 0x40, ZeroWait = 0x80, MemDisable = 0x1000, };
96
97 static int hpp_probe1(struct net_device *dev, int ioaddr);
98
99 static void hpp_reset_8390(struct net_device *dev);
100 static int hpp_open(struct net_device *dev);
101 static int hpp_close(struct net_device *dev);
102 static void hpp_mem_block_input(struct net_device *dev, int count,
103                                                   struct sk_buff *skb, int ring_offset);
104 static void hpp_mem_block_output(struct net_device *dev, int count,
105                                                         const unsigned char *buf, int start_page);
106 static void hpp_mem_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr,
107                                                   int ring_page);
108 static void hpp_io_block_input(struct net_device *dev, int count,
109                                                   struct sk_buff *skb, int ring_offset);
110 static void hpp_io_block_output(struct net_device *dev, int count,
111                                                         const unsigned char *buf, int start_page);
112 static void hpp_io_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr,
113                                                   int ring_page);
114
115
116 /*      Probe a list of addresses for an HP LAN+ adaptor.
117         This routine is almost boilerplate. */
118
119 static int __init do_hpp_probe(struct net_device *dev)
120 {
121         int i;
122         int base_addr = dev->base_addr;
123         int irq = dev->irq;
124
125         if (base_addr > 0x1ff)          /* Check a single specified location. */
126                 return hpp_probe1(dev, base_addr);
127         else if (base_addr != 0)        /* Don't probe at all. */
128                 return -ENXIO;
129
130         for (i = 0; hpplus_portlist[i]; i++) {
131                 if (hpp_probe1(dev, hpplus_portlist[i]) == 0)
132                         return 0;
133                 dev->irq = irq;
134         }
135
136         return -ENODEV;
137 }
138
139 #ifndef MODULE
140 struct net_device * __init hp_plus_probe(int unit)
141 {
142         struct net_device *dev = alloc_ei_netdev();
143         int err;
144
145         if (!dev)
146                 return ERR_PTR(-ENOMEM);
147
148         sprintf(dev->name, "eth%d", unit);
149         netdev_boot_setup_check(dev);
150
151         err = do_hpp_probe(dev);
152         if (err)
153                 goto out;
154         return dev;
155 out:
156         free_netdev(dev);
157         return ERR_PTR(err);
158 }
159 #endif
160
161 /* Do the interesting part of the probe at a single address. */
162 static int __init hpp_probe1(struct net_device *dev, int ioaddr)
163 {
164         int i, retval;
165         unsigned char checksum = 0;
166         const char name[] = "HP-PC-LAN+";
167         int mem_start;
168         static unsigned version_printed;
169
170         if (!request_region(ioaddr, HP_IO_EXTENT, DRV_NAME))
171                 return -EBUSY;
172
173         /* Check for the HP+ signature, 50 48 0x 53. */
174         if (inw(ioaddr + HP_ID) != 0x4850
175                 || (inw(ioaddr + HP_PAGING) & 0xfff0) != 0x5300) {
176                 retval = -ENODEV;
177                 goto out;
178         }
179
180         if (ei_debug  &&  version_printed++ == 0)
181                 printk(version);
182
183         printk("%s: %s at %#3x,", dev->name, name, ioaddr);
184
185         /* Retrieve and checksum the station address. */
186         outw(MAC_Page, ioaddr + HP_PAGING);
187
188         for(i = 0; i < ETHER_ADDR_LEN; i++) {
189                 unsigned char inval = inb(ioaddr + 8 + i);
190                 dev->dev_addr[i] = inval;
191                 checksum += inval;
192                 printk(" %2.2x", inval);
193         }
194         checksum += inb(ioaddr + 14);
195
196         if (checksum != 0xff) {
197                 printk(" bad checksum %2.2x.\n", checksum);
198                 retval = -ENODEV;
199                 goto out;
200         } else {
201                 /* Point at the Software Configuration Flags. */
202                 outw(ID_Page, ioaddr + HP_PAGING);
203                 printk(" ID %4.4x", inw(ioaddr + 12));
204         }
205
206         /* Read the IRQ line. */
207         outw(HW_Page, ioaddr + HP_PAGING);
208         {
209                 int irq = inb(ioaddr + 13) & 0x0f;
210                 int option = inw(ioaddr + HPP_OPTION);
211
212                 dev->irq = irq;
213                 if (option & MemEnable) {
214                         mem_start = inw(ioaddr + 9) << 8;
215                         printk(", IRQ %d, memory address %#x.\n", irq, mem_start);
216                 } else {
217                         mem_start = 0;
218                         printk(", IRQ %d, programmed-I/O mode.\n", irq);
219                 }
220         }
221
222         /* Set the wrap registers for string I/O reads.   */
223         outw((HP_START_PG + TX_PAGES/2) | ((HP_STOP_PG - 1) << 8), ioaddr + 14);
224
225         /* Set the base address to point to the NIC, not the "real" base! */
226         dev->base_addr = ioaddr + NIC_OFFSET;
227
228         dev->open = &hpp_open;
229         dev->stop = &hpp_close;
230 #ifdef CONFIG_NET_POLL_CONTROLLER
231         dev->poll_controller = ei_poll;
232 #endif
233
234         ei_status.name = name;
235         ei_status.word16 = 0;           /* Agggghhhhh! Debug time: 2 days! */
236         ei_status.tx_start_page = HP_START_PG;
237         ei_status.rx_start_page = HP_START_PG + TX_PAGES/2;
238         ei_status.stop_page = HP_STOP_PG;
239
240         ei_status.reset_8390 = &hpp_reset_8390;
241         ei_status.block_input = &hpp_io_block_input;
242         ei_status.block_output = &hpp_io_block_output;
243         ei_status.get_8390_hdr = &hpp_io_get_8390_hdr;
244
245         /* Check if the memory_enable flag is set in the option register. */
246         if (mem_start) {
247                 ei_status.block_input = &hpp_mem_block_input;
248                 ei_status.block_output = &hpp_mem_block_output;
249                 ei_status.get_8390_hdr = &hpp_mem_get_8390_hdr;
250                 dev->mem_start = mem_start;
251                 ei_status.mem = ioremap(mem_start,
252                                         (HP_STOP_PG - HP_START_PG)*256);
253                 if (!ei_status.mem) {
254                         retval = -ENOMEM;
255                         goto out;
256                 }
257                 ei_status.rmem_start = dev->mem_start + TX_PAGES/2*256;
258                 dev->mem_end = ei_status.rmem_end
259                         = dev->mem_start + (HP_STOP_PG - HP_START_PG)*256;
260         }
261
262         outw(Perf_Page, ioaddr + HP_PAGING);
263         NS8390_init(dev, 0);
264         /* Leave the 8390 and HP chip reset. */
265         outw(inw(ioaddr + HPP_OPTION) & ~EnableIRQ, ioaddr + HPP_OPTION);
266
267         retval = register_netdev(dev);
268         if (retval)
269                 goto out1;
270         return 0;
271 out1:
272         iounmap(ei_status.mem);
273 out:
274         release_region(ioaddr, HP_IO_EXTENT);
275         return retval;
276 }
277
278 static int
279 hpp_open(struct net_device *dev)
280 {
281         int ioaddr = dev->base_addr - NIC_OFFSET;
282         int option_reg;
283         int retval;
284
285         if ((retval = request_irq(dev->irq, ei_interrupt, 0, dev->name, dev))) {
286             return retval;
287         }
288
289         /* Reset the 8390 and HP chip. */
290         option_reg = inw(ioaddr + HPP_OPTION);
291         outw(option_reg & ~(NICReset + ChipReset), ioaddr + HPP_OPTION);
292         udelay(5);
293         /* Unreset the board and enable interrupts. */
294         outw(option_reg | (EnableIRQ + NICReset + ChipReset), ioaddr + HPP_OPTION);
295
296         /* Set the wrap registers for programmed-I/O operation.   */
297         outw(HW_Page, ioaddr + HP_PAGING);
298         outw((HP_START_PG + TX_PAGES/2) | ((HP_STOP_PG - 1) << 8), ioaddr + 14);
299
300         /* Select the operational page. */
301         outw(Perf_Page, ioaddr + HP_PAGING);
302
303         ei_open(dev);
304         return 0;
305 }
306
307 static int
308 hpp_close(struct net_device *dev)
309 {
310         int ioaddr = dev->base_addr - NIC_OFFSET;
311         int option_reg = inw(ioaddr + HPP_OPTION);
312
313         free_irq(dev->irq, dev);
314         ei_close(dev);
315         outw((option_reg & ~EnableIRQ) | MemDisable | NICReset | ChipReset,
316                  ioaddr + HPP_OPTION);
317
318         return 0;
319 }
320
321 static void
322 hpp_reset_8390(struct net_device *dev)
323 {
324         int ioaddr = dev->base_addr - NIC_OFFSET;
325         int option_reg = inw(ioaddr + HPP_OPTION);
326
327         if (ei_debug > 1) printk("resetting the 8390 time=%ld...", jiffies);
328
329         outw(option_reg & ~(NICReset + ChipReset), ioaddr + HPP_OPTION);
330         /* Pause a few cycles for the hardware reset to take place. */
331         udelay(5);
332         ei_status.txing = 0;
333         outw(option_reg | (EnableIRQ + NICReset + ChipReset), ioaddr + HPP_OPTION);
334
335         udelay(5);
336
337
338         if ((inb_p(ioaddr+NIC_OFFSET+EN0_ISR) & ENISR_RESET) == 0)
339                 printk("%s: hp_reset_8390() did not complete.\n", dev->name);
340
341         if (ei_debug > 1) printk("8390 reset done (%ld).", jiffies);
342         return;
343 }
344
345 /* The programmed-I/O version of reading the 4 byte 8390 specific header.
346    Note that transfer with the EtherTwist+ must be on word boundaries. */
347
348 static void
349 hpp_io_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page)
350 {
351         int ioaddr = dev->base_addr - NIC_OFFSET;
352
353         outw((ring_page<<8), ioaddr + HPP_IN_ADDR);
354         insw(ioaddr + HP_DATAPORT, hdr, sizeof(struct e8390_pkt_hdr)>>1);
355 }
356
357 /* Block input and output, similar to the Crynwr packet driver. */
358
359 static void
360 hpp_io_block_input(struct net_device *dev, int count, struct sk_buff *skb, int ring_offset)
361 {
362         int ioaddr = dev->base_addr - NIC_OFFSET;
363         char *buf = skb->data;
364
365         outw(ring_offset, ioaddr + HPP_IN_ADDR);
366         insw(ioaddr + HP_DATAPORT, buf, count>>1);
367         if (count & 0x01)
368         buf[count-1] = inw(ioaddr + HP_DATAPORT);
369 }
370
371 /* The corresponding shared memory versions of the above 2 functions. */
372
373 static void
374 hpp_mem_get_8390_hdr(struct net_device *dev, struct e8390_pkt_hdr *hdr, int ring_page)
375 {
376         int ioaddr = dev->base_addr - NIC_OFFSET;
377         int option_reg = inw(ioaddr + HPP_OPTION);
378
379         outw((ring_page<<8), ioaddr + HPP_IN_ADDR);
380         outw(option_reg & ~(MemDisable + BootROMEnb), ioaddr + HPP_OPTION);
381         memcpy_fromio(hdr, ei_status.mem, sizeof(struct e8390_pkt_hdr));
382         outw(option_reg, ioaddr + HPP_OPTION);
383         hdr->count = (le16_to_cpu(hdr->count) + 3) & ~3;        /* Round up allocation. */
384 }
385
386 static void
387 hpp_mem_block_input(struct net_device *dev, int count, struct sk_buff *skb, int ring_offset)
388 {
389         int ioaddr = dev->base_addr - NIC_OFFSET;
390         int option_reg = inw(ioaddr + HPP_OPTION);
391
392         outw(ring_offset, ioaddr + HPP_IN_ADDR);
393
394         outw(option_reg & ~(MemDisable + BootROMEnb), ioaddr + HPP_OPTION);
395
396         /* Caution: this relies on get_8390_hdr() rounding up count!
397            Also note that we *can't* use eth_io_copy_and_sum() because
398            it will not always copy "count" bytes (e.g. padded IP).  */
399
400         memcpy_fromio(skb->data, ei_status.mem, count);
401         outw(option_reg, ioaddr + HPP_OPTION);
402 }
403
404 /* A special note: we *must* always transfer >=16 bit words.
405    It's always safe to round up, so we do. */
406 static void
407 hpp_io_block_output(struct net_device *dev, int count,
408                                         const unsigned char *buf, int start_page)
409 {
410         int ioaddr = dev->base_addr - NIC_OFFSET;
411         outw(start_page << 8, ioaddr + HPP_OUT_ADDR);
412         outsl(ioaddr + HP_DATAPORT, buf, (count+3)>>2);
413         return;
414 }
415
416 static void
417 hpp_mem_block_output(struct net_device *dev, int count,
418                                 const unsigned char *buf, int start_page)
419 {
420         int ioaddr = dev->base_addr - NIC_OFFSET;
421         int option_reg = inw(ioaddr + HPP_OPTION);
422
423         outw(start_page << 8, ioaddr + HPP_OUT_ADDR);
424         outw(option_reg & ~(MemDisable + BootROMEnb), ioaddr + HPP_OPTION);
425         memcpy_toio(ei_status.mem, buf, (count + 3) & ~3);
426         outw(option_reg, ioaddr + HPP_OPTION);
427
428         return;
429 }
430
431
432 #ifdef MODULE
433 #define MAX_HPP_CARDS   4       /* Max number of HPP cards per module */
434 static struct net_device *dev_hpp[MAX_HPP_CARDS];
435 static int io[MAX_HPP_CARDS];
436 static int irq[MAX_HPP_CARDS];
437
438 module_param_array(io, int, NULL, 0);
439 module_param_array(irq, int, NULL, 0);
440 MODULE_PARM_DESC(io, "I/O port address(es)");
441 MODULE_PARM_DESC(irq, "IRQ number(s); ignored if properly detected");
442 MODULE_DESCRIPTION("HP PC-LAN+ ISA ethernet driver");
443 MODULE_LICENSE("GPL");
444
445 /* This is set up so that only a single autoprobe takes place per call.
446 ISA device autoprobes on a running machine are not recommended. */
447 int __init
448 init_module(void)
449 {
450         struct net_device *dev;
451         int this_dev, found = 0;
452
453         for (this_dev = 0; this_dev < MAX_HPP_CARDS; this_dev++) {
454                 if (io[this_dev] == 0)  {
455                         if (this_dev != 0) break; /* only autoprobe 1st one */
456                         printk(KERN_NOTICE "hp-plus.c: Presently autoprobing (not recommended) for a single card.\n");
457                 }
458                 dev = alloc_ei_netdev();
459                 if (!dev)
460                         break;
461                 dev->irq = irq[this_dev];
462                 dev->base_addr = io[this_dev];
463                 if (do_hpp_probe(dev) == 0) {
464                         dev_hpp[found++] = dev;
465                         continue;
466                 }
467                 free_netdev(dev);
468                 printk(KERN_WARNING "hp-plus.c: No HP-Plus card found (i/o = 0x%x).\n", io[this_dev]);
469                 break;
470         }
471         if (found)
472                 return 0;
473         return -ENXIO;
474 }
475
476 static void cleanup_card(struct net_device *dev)
477 {
478         /* NB: hpp_close() handles free_irq */
479         iounmap(ei_status.mem);
480         release_region(dev->base_addr - NIC_OFFSET, HP_IO_EXTENT);
481 }
482
483 void __exit
484 cleanup_module(void)
485 {
486         int this_dev;
487
488         for (this_dev = 0; this_dev < MAX_HPP_CARDS; this_dev++) {
489                 struct net_device *dev = dev_hpp[this_dev];
490                 if (dev) {
491                         unregister_netdev(dev);
492                         cleanup_card(dev);
493                         free_netdev(dev);
494                 }
495         }
496 }
497 #endif /* MODULE */