if: Move IFF_OACTIVE bit into ifaltq; prepare multiple TX queues support
[dragonfly.git] / sys / dev / netif / ex / if_ex.c
1 /*
2  * Copyright (c) 1996, Javier Martín Rueda (jmrueda@diatel.upm.es)
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice unmodified, this list of conditions, and the following
10  *    disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  *
15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25  * SUCH DAMAGE.
26  *
27  * $FreeBSD: src/sys/dev/ex/if_ex.c,v 1.26.2.3 2001/03/05 05:33:20 imp Exp $
28  * $DragonFly: src/sys/dev/netif/ex/if_ex.c,v 1.26 2008/08/22 08:33:59 swildner Exp $
29  *
30  * MAINTAINER: Matthew N. Dodd <winter@jurai.net>
31  *                             <mdodd@FreeBSD.org>
32  */
33
34 /*
35  * Intel EtherExpress Pro/10, Pro/10+ Ethernet driver
36  *
37  * Revision history:
38  *
39  * 30-Oct-1996: first beta version. Inet and BPF supported, but no multicast.
40  */
41
42 #include <sys/param.h>
43 #include <sys/systm.h>
44 #include <sys/kernel.h>
45 #include <sys/sockio.h>
46 #include <sys/mbuf.h>
47 #include <sys/socket.h>
48 #include <sys/module.h>
49 #include <sys/bus.h>
50 #include <sys/rman.h>
51 #include <sys/serialize.h>
52 #include <sys/thread2.h>
53
54 #include <net/if.h>
55 #include <net/ifq_var.h>
56 #include <net/if.h>
57 #include <net/if_arp.h>
58 #include <net/if_media.h> 
59 #include <net/ethernet.h>
60 #include <net/bpf.h>
61
62 #include <netinet/in.h>
63 #include <netinet/if_ether.h>
64
65 #include <machine/clock.h>
66
67
68 #include <bus/isa/isavar.h>
69 #include <bus/isa/pnpvar.h>
70
71 #include "if_exreg.h"
72 #include "if_exvar.h"
73
74 DECLARE_DUMMY_MODULE(if_ex);
75
76 #ifdef EXDEBUG
77 # define Start_End 1
78 # define Rcvd_Pkts 2
79 # define Sent_Pkts 4
80 # define Status    8
81 static int debug_mask = 0;
82 static int exintr_count = 0;
83 # define DODEBUG(level, action) if (level & debug_mask) action
84 #else
85 # define DODEBUG(level, action)
86 #endif
87
88 char irq2eemap[] =
89         { -1, -1, 0, 1, -1, 2, -1, -1, -1, 0, 3, 4, -1, -1, -1, -1 };
90 u_char ee2irqmap[] =
91         { 9, 3, 5, 10, 11, 0, 0, 0 };
92                 
93 char plus_irq2eemap[] =
94         { -1, -1, -1, 0, 1, 2, -1, 3, -1, 4, 5, 6, 7, -1, -1, -1 };
95 u_char plus_ee2irqmap[] =
96         { 3, 4, 5, 7, 9, 10, 11, 12 };
97
98 /* Network Interface Functions */
99 static void     ex_init         (void *);
100 static void     ex_start        (struct ifnet *);
101 static int      ex_ioctl(struct ifnet *, u_long, caddr_t, struct ucred *);
102 static void     ex_watchdog     (struct ifnet *);
103
104 /* ifmedia Functions    */
105 static int      ex_ifmedia_upd  (struct ifnet *);
106 static void     ex_ifmedia_sts  (struct ifnet *, struct ifmediareq *);
107
108 static int      ex_get_media    (u_int32_t iobase);
109
110 static void     ex_reset        (struct ex_softc *);
111
112 static void     ex_tx_intr      (struct ex_softc *);
113 static void     ex_rx_intr      (struct ex_softc *);
114
115 int
116 look_for_card (u_int32_t iobase)
117 {
118         int count1, count2;
119
120         /*
121          * Check for the i82595 signature, and check that the round robin
122          * counter actually advances.
123          */
124         if (((count1 = inb(iobase + ID_REG)) & Id_Mask) != Id_Sig)
125                 return(0);
126         count2 = inb(iobase + ID_REG);
127         count2 = inb(iobase + ID_REG);
128         count2 = inb(iobase + ID_REG);
129
130         return((count2 & Counter_bits) == ((count1 + 0xc0) & Counter_bits));
131 }
132
133 void
134 ex_get_address (u_int32_t iobase, u_char *enaddr)
135 {
136         u_int16_t       eaddr_tmp;
137
138         eaddr_tmp = eeprom_read(iobase, EE_Eth_Addr_Lo);
139         enaddr[5] = eaddr_tmp & 0xff;
140         enaddr[4] = eaddr_tmp >> 8;
141         eaddr_tmp = eeprom_read(iobase, EE_Eth_Addr_Mid);
142         enaddr[3] = eaddr_tmp & 0xff;
143         enaddr[2] = eaddr_tmp >> 8;
144         eaddr_tmp = eeprom_read(iobase, EE_Eth_Addr_Hi);
145         enaddr[1] = eaddr_tmp & 0xff;
146         enaddr[0] = eaddr_tmp >> 8;
147         
148         return;
149 }
150
151 int
152 ex_card_type (u_char *enaddr)
153 {
154         if ((enaddr[0] == 0x00) && (enaddr[1] == 0xA0) && (enaddr[2] == 0xC9))
155                 return (CARD_TYPE_EX_10_PLUS);
156
157         return (CARD_TYPE_EX_10);
158 }
159
160 /*
161  * Caller is responsible for eventually calling
162  * ex_release_resources() on failure.
163  */
164 int
165 ex_alloc_resources (device_t dev)
166 {
167         struct ex_softc *       sc = device_get_softc(dev);
168         int                     error = 0;
169
170         sc->ioport = bus_alloc_resource_any(dev, SYS_RES_IOPORT, &sc->ioport_rid,
171             RF_ACTIVE);
172         if (!sc->ioport) {
173                 device_printf(dev, "No I/O space?!\n");
174                 error = ENOMEM;
175                 goto bad;
176         }
177
178         sc->irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, &sc->irq_rid,
179             RF_ACTIVE);
180
181         if (!sc->irq) {
182                 device_printf(dev, "No IRQ?!\n");
183                 error = ENOMEM;
184                 goto bad;
185         }
186
187 bad:
188         return (error);
189 }
190
191 void
192 ex_release_resources (device_t dev)
193 {
194         struct ex_softc *       sc = device_get_softc(dev);
195
196         if (sc->ih) {
197                 bus_teardown_intr(dev, sc->irq, sc->ih);
198                 sc->ih = NULL;
199         }
200
201         if (sc->ioport) {
202                 bus_release_resource(dev, SYS_RES_IOPORT,
203                                         sc->ioport_rid, sc->ioport);
204                 sc->ioport = NULL;
205         }
206
207         if (sc->irq) {
208                 bus_release_resource(dev, SYS_RES_IRQ,
209                                         sc->irq_rid, sc->irq);
210                 sc->irq = NULL;
211         }
212
213         return;
214 }
215
216 int
217 ex_attach(device_t dev)
218 {
219         struct ex_softc *       sc = device_get_softc(dev);
220         struct ifnet *          ifp = &sc->arpcom.ac_if;
221         struct ifmedia *        ifm;
222         int                     unit = device_get_unit(dev);
223         u_int16_t               temp;
224
225         /* work out which set of irq <-> internal tables to use */
226         if (ex_card_type(sc->arpcom.ac_enaddr) == CARD_TYPE_EX_10_PLUS) {
227                 sc->irq2ee = plus_irq2eemap;
228                 sc->ee2irq = plus_ee2irqmap;
229         } else {
230                 sc->irq2ee = irq2eemap;
231                 sc->ee2irq = ee2irqmap;
232         }
233
234         sc->mem_size = CARD_RAM_SIZE;   /* XXX This should be read from the card itself. */
235
236         /*
237          * Initialize the ifnet structure.
238          */
239         ifp->if_softc = sc;
240         if_initname(ifp, "ex", unit);
241         ifp->if_mtu = ETHERMTU;
242         ifp->if_flags = IFF_SIMPLEX | IFF_BROADCAST /* XXX not done yet. | IFF_MULTICAST */;
243         ifp->if_start = ex_start;
244         ifp->if_ioctl = ex_ioctl;
245         ifp->if_watchdog = ex_watchdog;
246         ifp->if_init = ex_init;
247         ifq_set_maxlen(&ifp->if_snd, IFQ_MAXLEN);
248         ifq_set_ready(&ifp->if_snd);
249
250         ifmedia_init(&sc->ifmedia, 0, ex_ifmedia_upd, ex_ifmedia_sts);
251
252         temp = eeprom_read(sc->iobase, EE_W5);
253         if (temp & EE_W5_PORT_TPE)
254                 ifmedia_add(&sc->ifmedia, IFM_ETHER|IFM_10_T, 0, NULL);
255         if (temp & EE_W5_PORT_BNC)
256                 ifmedia_add(&sc->ifmedia, IFM_ETHER|IFM_10_2, 0, NULL);
257         if (temp & EE_W5_PORT_AUI)
258                 ifmedia_add(&sc->ifmedia, IFM_ETHER|IFM_10_5, 0, NULL);
259
260         ifmedia_set(&sc->ifmedia, ex_get_media(sc->iobase));
261
262         ifm = &sc->ifmedia;
263         ifm->ifm_media = ifm->ifm_cur->ifm_media;
264         ex_ifmedia_upd(ifp);
265
266         /*
267          * Attach the interface.
268          */
269         ether_ifattach(ifp, sc->arpcom.ac_enaddr, NULL);
270
271         return(0);
272 }
273
274 static void
275 ex_init(void *xsc)
276 {
277         struct ex_softc *       sc = (struct ex_softc *) xsc;
278         struct ifnet *          ifp = &sc->arpcom.ac_if;
279         int                     i;
280         int                     iobase = sc->iobase;
281         unsigned short          temp_reg;
282
283         DODEBUG(Start_End, kprintf("ex_init%d: start\n", ifp->if_dunit););
284
285         ifp->if_timer = 0;
286
287         /*
288          * Load the ethernet address into the card.
289          */
290         outb(iobase + CMD_REG, Bank2_Sel);
291         temp_reg = inb(iobase + EEPROM_REG);
292         if (temp_reg & Trnoff_Enable) {
293                 outb(iobase + EEPROM_REG, temp_reg & ~Trnoff_Enable);
294         }
295         for (i = 0; i < ETHER_ADDR_LEN; i++) {
296                 outb(iobase + I_ADDR_REG0 + i, sc->arpcom.ac_enaddr[i]);
297         }
298         /*
299          * - Setup transmit chaining and discard bad received frames.
300          * - Match broadcast.
301          * - Clear test mode.
302          * - Set receiving mode.
303          * - Set IRQ number.
304          */
305         outb(iobase + REG1, inb(iobase + REG1) | Tx_Chn_Int_Md | Tx_Chn_ErStp | Disc_Bad_Fr);
306         outb(iobase + REG2, inb(iobase + REG2) | No_SA_Ins | RX_CRC_InMem);
307         outb(iobase + REG3, inb(iobase + REG3) & 0x3f /* XXX constants. */ );
308         outb(iobase + CMD_REG, Bank1_Sel);
309         outb(iobase + INT_NO_REG, (inb(iobase + INT_NO_REG) & 0xf8) | sc->irq2ee[sc->irq_no]);
310
311         /*
312          * Divide the available memory in the card into rcv and xmt buffers.
313          * By default, I use the first 3/4 of the memory for the rcv buffer,
314          * and the remaining 1/4 of the memory for the xmt buffer.
315          */
316         sc->rx_mem_size = sc->mem_size * 3 / 4;
317         sc->tx_mem_size = sc->mem_size - sc->rx_mem_size;
318         sc->rx_lower_limit = 0x0000;
319         sc->rx_upper_limit = sc->rx_mem_size - 2;
320         sc->tx_lower_limit = sc->rx_mem_size;
321         sc->tx_upper_limit = sc->mem_size - 2;
322         outb(iobase + RCV_LOWER_LIMIT_REG, sc->rx_lower_limit >> 8);
323         outb(iobase + RCV_UPPER_LIMIT_REG, sc->rx_upper_limit >> 8);
324         outb(iobase + XMT_LOWER_LIMIT_REG, sc->tx_lower_limit >> 8);
325         outb(iobase + XMT_UPPER_LIMIT_REG, sc->tx_upper_limit >> 8);
326         
327         /*
328          * Enable receive and transmit interrupts, and clear any pending int.
329          */
330         outb(iobase + REG1, inb(iobase + REG1) | TriST_INT);
331         outb(iobase + CMD_REG, Bank0_Sel);
332         outb(iobase + MASK_REG, All_Int & ~(Rx_Int | Tx_Int));
333         outb(iobase + STATUS_REG, All_Int);
334
335         /*
336          * Initialize receive and transmit ring buffers.
337          */
338         outw(iobase + RCV_BAR, sc->rx_lower_limit);
339         sc->rx_head = sc->rx_lower_limit;
340         outw(iobase + RCV_STOP_REG, sc->rx_upper_limit | 0xfe);
341         outw(iobase + XMT_BAR, sc->tx_lower_limit);
342         sc->tx_head = sc->tx_tail = sc->tx_lower_limit;
343
344         ifp->if_flags |= IFF_RUNNING;
345         ifq_clr_oactive(&ifp->if_snd);
346         DODEBUG(Status, kprintf("OIDLE init\n"););
347         
348         /*
349          * Final reset of the board, and enable operation.
350          */
351         outb(iobase + CMD_REG, Sel_Reset_CMD);
352         DELAY(2);
353         outb(iobase + CMD_REG, Rcv_Enable_CMD);
354
355         if (!ifq_is_empty(&ifp->if_snd))
356                 if_devstart(ifp);
357
358         DODEBUG(Start_End, kprintf("ex_init%d: finish\n", ifp->if_dunit););
359 }
360
361
362 static void
363 ex_start(struct ifnet *ifp)
364 {
365         struct ex_softc *       sc = ifp->if_softc;
366         int                     iobase = sc->iobase;
367         int                     i, len, data_len, avail, dest, next;
368         unsigned char           tmp16[2];
369         struct mbuf *           opkt;
370         struct mbuf *           m;
371
372         DODEBUG(Start_End, kprintf("ex_start%d: start\n", unit););
373
374         /*
375          * Main loop: send outgoing packets to network card until there are no
376          * more packets left, or the card cannot accept any more yet.
377          */
378         while (!ifq_is_oactive(&ifp->if_snd)) {
379                 opkt = ifq_dequeue(&ifp->if_snd, NULL);
380                 if (opkt == NULL)
381                         break;
382
383                 /*
384                  * Ensure there is enough free transmit buffer space for
385                  * this packet, including its header. Note: the header
386                  * cannot wrap around the end of the transmit buffer and
387                  * must be kept together, so we allow space for twice the
388                  * length of the header, just in case.
389                  */
390
391                 for (len = 0, m = opkt; m != NULL; m = m->m_next) {
392                         len += m->m_len;
393                 }
394
395                 data_len = len;
396
397                 DODEBUG(Sent_Pkts, kprintf("1. Sending packet with %d data bytes. ", data_len););
398
399                 if (len & 1) {
400                         len += XMT_HEADER_LEN + 1;
401                 } else {
402                         len += XMT_HEADER_LEN;
403                 }
404
405                 if ((i = sc->tx_tail - sc->tx_head) >= 0) {
406                         avail = sc->tx_mem_size - i;
407                 } else {
408                         avail = -i;
409                 }
410
411                 DODEBUG(Sent_Pkts, kprintf("i=%d, avail=%d\n", i, avail););
412
413                 if (avail >= len + XMT_HEADER_LEN) {
414 #ifdef EX_PSA_INTR      
415                         /*
416                          * Disable rx and tx interrupts, to avoid corruption
417                          * of the host address register by interrupt service
418                          * routines.
419                          * XXX Is this necessary with splimp() enabled?
420                          */
421                         outb(iobase + MASK_REG, All_Int);
422 #endif
423
424                         /*
425                          * Compute the start and end addresses of this
426                          * frame in the tx buffer.
427                          */
428                         dest = sc->tx_tail;
429                         next = dest + len;
430
431                         if (next > sc->tx_upper_limit) {
432                                 if ((sc->tx_upper_limit + 2 - sc->tx_tail) <=
433                                     XMT_HEADER_LEN) {
434                                         dest = sc->tx_lower_limit;
435                                         next = dest + len;
436                                 } else {
437                                         next = sc->tx_lower_limit +
438                                                 next - sc->tx_upper_limit - 2;
439                                 }
440                         }
441
442                         /*
443                          * Build the packet frame in the card's ring buffer.
444                          */
445                         DODEBUG(Sent_Pkts, kprintf("2. dest=%d, next=%d. ", dest, next););
446
447                         outw(iobase + HOST_ADDR_REG, dest);
448                         outw(iobase + IO_PORT_REG, Transmit_CMD);
449                         outw(iobase + IO_PORT_REG, 0);
450                         outw(iobase + IO_PORT_REG, next);
451                         outw(iobase + IO_PORT_REG, data_len);
452
453                         /*
454                          * Output the packet data to the card. Ensure all
455                          * transfers are 16-bit wide, even if individual
456                          * mbufs have odd length.
457                          */
458
459                         for (m = opkt, i = 0; m != NULL; m = m->m_next) {
460                                 DODEBUG(Sent_Pkts, kprintf("[%d]", m->m_len););
461                                 if (i) {
462                                         tmp16[1] = *(mtod(m, caddr_t));
463                                         outsw(iobase + IO_PORT_REG, tmp16, 1);
464                                 }
465                                 outsw(iobase + IO_PORT_REG,
466                                       mtod(m, caddr_t) + i, (m->m_len - i) / 2);
467
468                                 if ((i = (m->m_len - i) & 1) != 0) {
469                                         tmp16[0] = *(mtod(m, caddr_t) +
470                                                    m->m_len - 1);
471                                 }
472                         }
473                         if (i) {
474                                 outsw(iobase + IO_PORT_REG, tmp16, 1);
475                         }
476         
477                         /*
478                          * If there were other frames chained, update the
479                          * chain in the last one.
480                          */
481                         if (sc->tx_head != sc->tx_tail) {
482                                 if (sc->tx_tail != dest) {
483                                         outw(iobase + HOST_ADDR_REG,
484                                              sc->tx_last + XMT_Chain_Point);
485                                         outw(iobase + IO_PORT_REG, dest);
486                                 }
487                                 outw(iobase + HOST_ADDR_REG,
488                                      sc->tx_last + XMT_Byte_Count);
489                                 i = inw(iobase + IO_PORT_REG);
490                                 outw(iobase + HOST_ADDR_REG,
491                                      sc->tx_last + XMT_Byte_Count);
492                                 outw(iobase + IO_PORT_REG, i | Ch_bit);
493                         }
494         
495                         /*
496                          * Resume normal operation of the card:
497                          * - Make a dummy read to flush the DRAM write
498                          *   pipeline.
499                          * - Enable receive and transmit interrupts.
500                          * - Send Transmit or Resume_XMT command, as
501                          *   appropriate.
502                          */
503                         inw(iobase + IO_PORT_REG);
504 #ifdef EX_PSA_INTR
505                         outb(iobase + MASK_REG, All_Int & ~(Rx_Int | Tx_Int));
506 #endif
507                         if (sc->tx_head == sc->tx_tail) {
508                                 outw(iobase + XMT_BAR, dest);
509                                 outb(iobase + CMD_REG, Transmit_CMD);
510                                 sc->tx_head = dest;
511                                 DODEBUG(Sent_Pkts, kprintf("Transmit\n"););
512                         } else {
513                                 outb(iobase + CMD_REG, Resume_XMT_List_CMD);
514                                 DODEBUG(Sent_Pkts, kprintf("Resume\n"););
515                         }
516         
517                         sc->tx_last = dest;
518                         sc->tx_tail = next;
519          
520                         BPF_MTAP(ifp, opkt);
521
522                         ifp->if_timer = 2;
523                         ifp->if_opackets++;
524                         m_freem(opkt);
525                 } else {
526                         ifq_set_oactive(&ifp->if_snd);
527                         ifq_prepend(&ifp->if_snd, opkt);
528                         DODEBUG(Status, kprintf("OACTIVE start\n"););
529                 }
530         }
531         DODEBUG(Start_End, kprintf("ex_start%d: finish\n", unit););
532 }
533
534 void
535 ex_stop(struct ex_softc *sc)
536 {
537         int iobase = sc->iobase;
538
539         DODEBUG(Start_End, kprintf("ex_stop%d: start\n", unit););
540
541         /*
542          * Disable card operation:
543          * - Disable the interrupt line.
544          * - Flush transmission and disable reception.
545          * - Mask and clear all interrupts.
546          * - Reset the 82595.
547          */
548         outb(iobase + CMD_REG, Bank1_Sel);
549         outb(iobase + REG1, inb(iobase + REG1) & ~TriST_INT);
550         outb(iobase + CMD_REG, Bank0_Sel);
551         outb(iobase + CMD_REG, Rcv_Stop);
552         sc->tx_head = sc->tx_tail = sc->tx_lower_limit;
553         sc->tx_last = 0; /* XXX I think these two lines are not necessary, because ex_init will always be called again to reinit the interface. */
554         outb(iobase + MASK_REG, All_Int);
555         outb(iobase + STATUS_REG, All_Int);
556         outb(iobase + CMD_REG, Reset_CMD);
557         DELAY(200);
558
559         DODEBUG(Start_End, kprintf("ex_stop%d: finish\n", unit););
560
561         return;
562 }
563
564 void
565 ex_intr(void *arg)
566 {
567         struct ex_softc *       sc = (struct ex_softc *)arg;
568         struct ifnet *  ifp = &sc->arpcom.ac_if;
569         int                     iobase = sc->iobase;
570         int                     int_status, send_pkts;
571
572         DODEBUG(Start_End, kprintf("ex_intr%d: start\n", unit););
573
574 #ifdef EXDEBUG
575         if (++exintr_count != 1)
576                 kprintf("WARNING: nested interrupt (%d). Mail the author.\n", exintr_count);
577 #endif
578
579         send_pkts = 0;
580         while ((int_status = inb(iobase + STATUS_REG)) & (Tx_Int | Rx_Int)) {
581                 if (int_status & Rx_Int) {
582                         outb(iobase + STATUS_REG, Rx_Int);
583
584                         ex_rx_intr(sc);
585                 } else if (int_status & Tx_Int) {
586                         outb(iobase + STATUS_REG, Tx_Int);
587
588                         ex_tx_intr(sc);
589                         send_pkts = 1;
590                 }
591         }
592
593         /*
594          * If any packet has been transmitted, and there are queued packets to
595          * be sent, attempt to send more packets to the network card.
596          */
597
598         if (send_pkts && !ifq_is_empty(&ifp->if_snd))
599                 if_devstart(ifp);
600
601 #ifdef EXDEBUG
602         exintr_count--;
603 #endif
604
605         DODEBUG(Start_End, kprintf("ex_intr%d: finish\n", unit););
606
607         return;
608 }
609
610 static void
611 ex_tx_intr(struct ex_softc *sc)
612 {
613         struct ifnet *  ifp = &sc->arpcom.ac_if;
614         int             iobase = sc->iobase;
615         int             tx_status;
616
617         DODEBUG(Start_End, kprintf("ex_tx_intr%d: start\n", unit););
618
619         /*
620          * - Cancel the watchdog.
621          * For all packets transmitted since last transmit interrupt:
622          * - Advance chain pointer to next queued packet.
623          * - Update statistics.
624          */
625
626         ifp->if_timer = 0;
627
628         while (sc->tx_head != sc->tx_tail) {
629                 outw(iobase + HOST_ADDR_REG, sc->tx_head);
630
631                 if (!(inw(iobase + IO_PORT_REG) & Done_bit))
632                         break;
633
634                 tx_status = inw(iobase + IO_PORT_REG);
635                 sc->tx_head = inw(iobase + IO_PORT_REG);
636
637                 if (tx_status & TX_OK_bit) {
638                         ifp->if_opackets++;
639                 } else {
640                         ifp->if_oerrors++;
641                 }
642
643                 ifp->if_collisions += tx_status & No_Collisions_bits;
644         }
645
646         /*
647          * The card should be ready to accept more packets now.
648          */
649
650         ifq_clr_oactive(&ifp->if_snd);
651
652         DODEBUG(Status, kprintf("OIDLE tx_intr\n"););
653         DODEBUG(Start_End, kprintf("ex_tx_intr%d: finish\n", unit););
654
655         return;
656 }
657
658 static void
659 ex_rx_intr(struct ex_softc *sc)
660 {
661         struct ifnet *          ifp = &sc->arpcom.ac_if;
662         int                     iobase = sc->iobase;
663         int                     rx_status;
664         int                     pkt_len;
665         struct mbuf *           m;
666         struct mbuf *           ipkt;
667
668         DODEBUG(Start_End, kprintf("ex_rx_intr%d: start\n", unit););
669
670         /*
671          * For all packets received since last receive interrupt:
672          * - If packet ok, read it into a new mbuf and queue it to interface,
673          *   updating statistics.
674          * - If packet bad, just discard it, and update statistics.
675          * Finally, advance receive stop limit in card's memory to new location.
676          */
677
678         outw(iobase + HOST_ADDR_REG, sc->rx_head);
679
680         while (inw(iobase + IO_PORT_REG) == RCV_Done) {
681
682                 rx_status = inw(iobase + IO_PORT_REG);
683                 sc->rx_head = inw(iobase + IO_PORT_REG);
684                 pkt_len = inw(iobase + IO_PORT_REG);
685
686                 if (rx_status & RCV_OK_bit) {
687                         MGETHDR(m, MB_DONTWAIT, MT_DATA);
688                         ipkt = m;
689                         if (ipkt == NULL) {
690                                 ifp->if_iqdrops++;
691                         } else {
692                                 ipkt->m_pkthdr.rcvif = ifp;
693                                 ipkt->m_pkthdr.len = pkt_len;
694                                 ipkt->m_len = MHLEN;
695
696                                 while (pkt_len > 0) {
697                                         if (pkt_len > MINCLSIZE) {
698                                                 MCLGET(m, MB_DONTWAIT);
699                                                 if (m->m_flags & M_EXT) {
700                                                         m->m_len = MCLBYTES;
701                                                 } else {
702                                                         m_freem(ipkt);
703                                                         ifp->if_iqdrops++;
704                                                         goto rx_another;
705                                                 }
706                                         }
707                                         m->m_len = min(m->m_len, pkt_len);
708
709           /*
710            * NOTE: I'm assuming that all mbufs allocated are of even length,
711            * except for the last one in an odd-length packet.
712            */
713
714                                         insw(iobase + IO_PORT_REG,
715                                              mtod(m, caddr_t), m->m_len / 2);
716
717                                         if (m->m_len & 1) {
718                                                 *(mtod(m, caddr_t) + m->m_len - 1) = inb(iobase + IO_PORT_REG);
719                                         }
720                                         pkt_len -= m->m_len;
721
722                                         if (pkt_len > 0) {
723                                                 MGET(m->m_next, MB_DONTWAIT, MT_DATA);
724                                                 if (m->m_next == NULL) {
725                                                         m_freem(ipkt);
726                                                         ifp->if_iqdrops++;
727                                                         goto rx_another;
728                                                 }
729                                                 m = m->m_next;
730                                                 m->m_len = MLEN;
731                                         }
732                                 }
733                                 ifp->if_input(ifp, ipkt);
734                                 ifp->if_ipackets++;
735                         }
736                 } else {
737                         ifp->if_ierrors++;
738                 }
739                 outw(iobase + HOST_ADDR_REG, sc->rx_head);
740 rx_another: ;
741         }
742
743         if (sc->rx_head < sc->rx_lower_limit + 2)
744                 outw(iobase + RCV_STOP_REG, sc->rx_upper_limit);
745         else
746                 outw(iobase + RCV_STOP_REG, sc->rx_head - 2);
747
748         DODEBUG(Start_End, kprintf("ex_rx_intr%d: finish\n", unit););
749
750         return;
751 }
752
753
754 static int
755 ex_ioctl(struct ifnet *ifp, u_long cmd, caddr_t data, struct ucred *cr)
756 {
757         struct ex_softc *       sc = ifp->if_softc;
758         struct ifreq *          ifr = (struct ifreq *)data;
759         int                     error = 0;
760
761         DODEBUG(Start_End, kprintf("ex_ioctl%d: start ", ifp->if_dunit););
762
763         switch(cmd) {
764                 case SIOCSIFFLAGS:
765                         DODEBUG(Start_End, kprintf("SIOCSIFFLAGS"););
766                         if ((ifp->if_flags & IFF_UP) == 0 &&
767                             (ifp->if_flags & IFF_RUNNING)) {
768
769                                 ifp->if_flags &= ~IFF_RUNNING;
770                                 ex_stop(sc);
771                         } else {
772                                 ex_init(sc);
773                         }
774                         break;
775 #ifdef NODEF
776                 case SIOCGHWADDR:
777                         DODEBUG(Start_End, kprintf("SIOCGHWADDR"););
778                         bcopy((caddr_t)sc->sc_addr, (caddr_t)&ifr->ifr_data,
779                               sizeof(sc->sc_addr));
780                         break;
781 #endif
782                 case SIOCADDMULTI:
783                         DODEBUG(Start_End, kprintf("SIOCADDMULTI"););
784                 case SIOCDELMULTI:
785                         DODEBUG(Start_End, kprintf("SIOCDELMULTI"););
786                         /* XXX Support not done yet. */
787                         error = EINVAL;
788                         break;
789                 case SIOCSIFMEDIA:
790                 case SIOCGIFMEDIA:
791                         error = ifmedia_ioctl(ifp, ifr, &sc->ifmedia, cmd);
792                         break;
793                 default:
794                         DODEBUG(Start_End, kprintf("unknown"););
795                         error = ether_ioctl(ifp, cmd, data);
796                         break;
797         }
798
799         DODEBUG(Start_End, kprintf("\nex_ioctl%d: finish\n", ifp->if_dunit););
800
801         return(error);
802 }
803
804
805 static void
806 ex_reset(struct ex_softc *sc)
807 {
808         DODEBUG(Start_End, kprintf("ex_reset%d: start\n", unit););
809
810         ex_stop(sc);
811         ex_init(sc);
812
813         DODEBUG(Start_End, kprintf("ex_reset%d: finish\n", unit););
814 }
815
816 static void
817 ex_watchdog(struct ifnet *ifp)
818 {
819         struct ex_softc *       sc = ifp->if_softc;
820
821         DODEBUG(Start_End, kprintf("ex_watchdog%d: start\n", ifp->if_dunit););
822
823         ifq_clr_oactive(&ifp->if_snd);
824
825         DODEBUG(Status, kprintf("OIDLE watchdog\n"););
826
827         ifp->if_oerrors++;
828         ex_reset(sc);
829         if_devstart(ifp);
830
831         DODEBUG(Start_End, kprintf("ex_watchdog%d: finish\n", ifp->if_dunit););
832
833         return;
834 }
835
836 static int
837 ex_get_media (u_int32_t iobase)
838 {
839         int     tmp;
840
841         outb(iobase + CMD_REG, Bank2_Sel);
842         tmp = inb(iobase + REG3);
843         outb(iobase + CMD_REG, Bank0_Sel);
844
845         if (tmp & TPE_bit)
846                 return(IFM_ETHER|IFM_10_T);
847         if (tmp & BNC_bit)
848                 return(IFM_ETHER|IFM_10_2);
849
850         return (IFM_ETHER|IFM_10_5);
851 }
852
853 static int
854 ex_ifmedia_upd (struct ifnet *ifp)
855 {
856
857         return (0);
858 }
859
860 static void
861 ex_ifmedia_sts(struct ifnet *ifp, struct ifmediareq *ifmr)
862 {
863         struct ex_softc *       sc = ifp->if_softc;
864
865         ifmr->ifm_active = ex_get_media(sc->iobase);
866
867         return;
868 }
869
870 u_short
871 eeprom_read(u_int32_t iobase, int location)
872 {
873         int i;
874         u_short data = 0;
875         int ee_addr;
876         int read_cmd = location | EE_READ_CMD;
877         short ctrl_val = EECS;
878
879         ee_addr = iobase + EEPROM_REG;
880         outb(iobase + CMD_REG, Bank2_Sel);
881         outb(ee_addr, EECS);
882         for (i = 8; i >= 0; i--) {
883                 short outval = (read_cmd & (1 << i)) ? ctrl_val | EEDI : ctrl_val;
884                 outb(ee_addr, outval);
885                 outb(ee_addr, outval | EESK);
886                 DELAY(3);
887                 outb(ee_addr, outval);
888                 DELAY(2);
889         }
890         outb(ee_addr, ctrl_val);
891
892         for (i = 16; i > 0; i--) {
893                 outb(ee_addr, ctrl_val | EESK);
894                 DELAY(3);
895                 data = (data << 1) | ((inb(ee_addr) & EEDO) ? 1 : 0);
896                 outb(ee_addr, ctrl_val);
897                 DELAY(2);
898         }
899
900         ctrl_val &= ~EECS;
901         outb(ee_addr, ctrl_val | EESK);
902         DELAY(3);
903         outb(ee_addr, ctrl_val);
904         DELAY(2);
905         outb(iobase + CMD_REG, Bank0_Sel);
906         return(data);
907 }