2 * Copyright (c) 1996 Gardner Buchanan <gbuchanan@shl.com>
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by Gardner Buchanan.
16 * 4. The name of Gardner Buchanan may not be used to endorse or promote
17 * products derived from this software without specific prior written
20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
22 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
23 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
24 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
26 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
27 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
28 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
29 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 * $FreeBSD: src/sys/dev/sn/if_sn.c,v 1.7.2.3 2001/02/04 04:38:38 toshi Exp $
32 * $DragonFly: src/sys/dev/netif/sn/if_sn.c,v 1.29 2008/08/17 04:32:34 sephe Exp $
36 * This is a driver for SMC's 9000 series of Ethernet adapters.
38 * This FreeBSD driver is derived from the smc9194 Linux driver by
39 * Erik Stahlman and is Copyright (C) 1996 by Erik Stahlman.
40 * This driver also shamelessly borrows from the FreeBSD ep driver
41 * which is Copyright (C) 1994 Herb Peyerl <hpeyerl@novatel.ca>
42 * All rights reserved.
44 * It is set up for my SMC91C92 equipped Ampro LittleBoard embedded
45 * PC. It is adapted from Erik Stahlman's Linux driver which worked
46 * with his EFA Info*Express SVC VLB adaptor. According to SMC's databook,
47 * it will work for the entire SMC 9xxx series. (Ha Ha)
49 * "Features" of the SMC chip:
50 * 4608 byte packet memory. (for the 91C92. Others have more)
51 * EEPROM for configuration
55 * Erik Stahlman erik@vt.edu
56 * Herb Peyerl hpeyerl@novatel.ca
57 * Andres Vega Garcia avega@sophia.inria.fr
58 * Serge Babkin babkin@hq.icb.chel.su
59 * Gardner Buchanan gbuchanan@shl.com
63 * o "smc9194.c:v0.10(FIXED) 02/15/96 by Erik Stahlman (erik@vt.edu)"
64 * o "if_ep.c,v 1.19 1995/01/24 20:53:45 davidg Exp"
67 * o The hardware multicast filter isn't used yet.
68 * o Setting of the hardware address isn't supported.
69 * o Hardware padding isn't used.
73 * Modifications for Megahertz X-Jack Ethernet Card (XJ-10BT)
75 * Copyright (c) 1996 by Tatsumi Hosokawa <hosokawa@jp.FreeBSD.org>
76 * BSD-nomads, Tokyo, Japan.
79 * Multicast support by Kei TANAKA <kei@pal.xerox.com>
80 * Special thanks to itojun@itojun.org
83 #undef SN_DEBUG /* (by hosokawa) */
85 #include <sys/param.h>
86 #include <sys/systm.h>
87 #include <sys/kernel.h>
88 #include <sys/interrupt.h>
89 #include <sys/errno.h>
90 #include <sys/sockio.h>
91 #include <sys/malloc.h>
93 #include <sys/socket.h>
94 #include <sys/syslog.h>
95 #include <sys/serialize.h>
96 #include <sys/module.h>
99 #include <sys/thread2.h>
101 #include <net/ethernet.h>
103 #include <net/ifq_var.h>
104 #include <net/if_arp.h>
105 #include <net/if_dl.h>
106 #include <net/if_types.h>
107 #include <net/if_mib.h>
110 #include <netinet/in.h>
111 #include <netinet/in_systm.h>
112 #include <netinet/in_var.h>
113 #include <netinet/ip.h>
117 #include <net/bpfdesc.h>
119 #include <machine/clock.h>
121 #include "if_snreg.h"
122 #include "if_snvar.h"
124 /* Exported variables */
125 devclass_t sn_devclass;
127 static int snioctl(struct ifnet * ifp, u_long, caddr_t, struct ucred *);
129 static void snresume(struct ifnet *);
132 void snread(struct ifnet *);
133 void snreset(struct sn_softc *);
134 void snstart(struct ifnet *);
135 void snstop(struct sn_softc *);
136 void snwatchdog(struct ifnet *);
138 static void sn_setmcast(struct sn_softc *);
139 static int sn_getmcf(struct arpcom *ac, u_char *mcf);
140 static u_int smc_crc(u_char *);
142 DECLARE_DUMMY_MODULE(if_sn);
144 /* I (GB) have been unlucky getting the hardware padding
149 static const char *chip_ids[15] = {
151 /* 3 */ "SMC91C90/91C92",
156 /* 8 */ "SMC91C100FD",
162 sn_attach(device_t dev)
164 struct sn_softc *sc = device_get_softc(dev);
165 struct ifnet *ifp = &sc->arpcom.ac_if;
178 sc->pages_wanted = -1;
180 device_printf(dev, " ");
183 rev = inw(BASE + REVISION_REG_W);
184 if (chip_ids[(rev >> 4) & 0xF])
185 kprintf("%s ", chip_ids[(rev >> 4) & 0xF]);
188 i = inw(BASE + CONFIG_REG_W);
189 kprintf("%s\n", i & CR_AUI_SELECT ? "AUI" : "UTP");
191 if (sc->pccard_enaddr)
192 for (j = 0; j < 3; j++) {
195 w = (u_short)sc->arpcom.ac_enaddr[j * 2] |
196 (((u_short)sc->arpcom.ac_enaddr[j * 2 + 1]) << 8);
197 outw(BASE + IAR_ADDR0_REG_W + j * 2, w);
201 * Read the station address from the chip. The MAC address is bank 1,
205 p = (u_char *) & sc->arpcom.ac_enaddr;
206 for (i = 0; i < 6; i += 2) {
207 address = inw(BASE + IAR_ADDR0_REG_W + i);
208 p[i + 1] = address >> 8;
209 p[i] = address & 0xFF;
212 if_initname(ifp, "sn", device_get_unit(dev));
213 ifp->if_mtu = ETHERMTU;
214 ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST;
215 ifp->if_start = snstart;
216 ifp->if_ioctl = snioctl;
217 ifp->if_watchdog = snwatchdog;
218 ifp->if_init = sninit;
219 ifq_set_maxlen(&ifp->if_snd, IFQ_MAXLEN);
220 ifq_set_ready(&ifp->if_snd);
223 ether_ifattach(ifp, sc->arpcom.ac_enaddr, NULL);
225 error = bus_setup_intr(dev, sc->irq_res, INTR_MPSAFE,
226 sn_intr, sc, &sc->intrhand,
234 ifp->if_cpuid = ithread_cpuid(rman_get_start(sc->irq_res));
235 KKASSERT(ifp->if_cpuid >= 0 && ifp->if_cpuid < ncpus);
242 * Reset and initialize the chip
247 struct sn_softc *sc = xsc;
248 struct ifnet *ifp = &sc->arpcom.ac_if;
253 * This resets the registers mostly to defaults, but doesn't affect
254 * EEPROM. After the reset cycle, we pause briefly for the chip to
258 outw(BASE + RECV_CONTROL_REG_W, RCR_SOFTRESET);
260 outw(BASE + RECV_CONTROL_REG_W, 0x0000);
264 outw(BASE + TXMIT_CONTROL_REG_W, 0x0000);
267 * Set the control register to automatically release succesfully
268 * transmitted packets (making the best use out of our limited
269 * memory) and to enable the EPH interrupt on certain TX errors.
272 outw(BASE + CONTROL_REG_W, (CTR_AUTO_RELEASE | CTR_TE_ENABLE |
273 CTR_CR_ENABLE | CTR_LE_ENABLE));
275 /* Set squelch level to 240mV (default 480mV) */
276 flags = inw(BASE + CONFIG_REG_W);
277 flags |= CR_SET_SQLCH;
278 outw(BASE + CONFIG_REG_W, flags);
281 * Reset the MMU and wait for it to be un-busy.
284 outw(BASE + MMU_CMD_REG_W, MMUCR_RESET);
285 while (inw(BASE + MMU_CMD_REG_W) & MMUCR_BUSY) /* NOTHING */
289 * Disable all interrupts
291 outb(BASE + INTR_MASK_REG_B, 0x00);
296 * Set the transmitter control. We want it enabled.
302 * I (GB) have been unlucky getting this to work.
304 flags |= TCR_PAD_ENABLE;
307 outw(BASE + TXMIT_CONTROL_REG_W, flags);
311 * Now, enable interrupts
320 outb(BASE + INTR_MASK_REG_B, mask);
321 sc->intr_mask = mask;
322 sc->pages_wanted = -1;
326 * Mark the interface running but not active.
328 ifp->if_flags |= IFF_RUNNING;
329 ifp->if_flags &= ~IFF_OACTIVE;
332 * Attempt to push out any waiting packets.
339 snstart(struct ifnet *ifp)
341 struct sn_softc *sc = ifp->if_softc;
352 if ((ifp->if_flags & (IFF_OACTIVE | IFF_RUNNING)) != IFF_RUNNING)
355 if (sc->pages_wanted != -1) {
356 /* XXX should never happen */
357 kprintf("%s: snstart() while memory allocation pending\n",
359 ifp->if_flags |= IFF_OACTIVE;
365 * Sneak a peek at the next packet
367 m = ifq_dequeue(&ifp->if_snd, NULL);
372 * Compute the frame length and set pad to give an overall even
373 * number of bytes. Below we assume that the packet length is even.
375 for (len = 0, top = m; m; m = m->m_next)
381 * We drop packets that are too large. Perhaps we should truncate
384 if (len + pad > ETHER_MAX_LEN - ETHER_CRC_LEN) {
385 kprintf("%s: large packet discarded (A)\n", ifp->if_xname);
386 ++sc->arpcom.ac_if.if_oerrors;
393 * If HW padding is not turned on, then pad to ETHER_MIN_LEN.
395 if (len < ETHER_MIN_LEN - ETHER_CRC_LEN)
396 pad = ETHER_MIN_LEN - ETHER_CRC_LEN - len;
403 * The MMU wants the number of pages to be the number of 256 byte
404 * 'pages', minus 1 (A packet can't ever have 0 pages. We also
405 * include space for the status word, byte count and control bytes in
406 * the allocation request.
408 numPages = (length + 6) >> 8;
412 * Now, try to allocate the memory
415 outw(BASE + MMU_CMD_REG_W, MMUCR_ALLOC | numPages);
418 * Wait a short amount of time to see if the allocation request
419 * completes. Otherwise, I enable the interrupt and wait for
420 * completion asyncronously.
423 time_out = MEMORY_WAIT_TIME;
425 if (inb(BASE + INTR_STAT_REG_B) & IM_ALLOC_INT)
427 } while (--time_out);
432 * No memory now. Oh well, wait until the chip finds memory
433 * later. Remember how many pages we were asking for and
434 * enable the allocation completion interrupt. Also set a
435 * watchdog in case we miss the interrupt. We mark the
436 * interface active since there is no point in attempting an
437 * snstart() until after the memory is available.
439 mask = inb(BASE + INTR_MASK_REG_B) | IM_ALLOC_INT;
440 outb(BASE + INTR_MASK_REG_B, mask);
441 sc->intr_mask = mask;
444 ifp->if_flags |= IFF_OACTIVE;
445 sc->pages_wanted = numPages;
446 ifq_prepend(&ifp->if_snd, top);
451 * The memory allocation completed. Check the results.
453 packet_no = inb(BASE + ALLOC_RESULT_REG_B);
454 if (packet_no & ARR_FAILED) {
455 kprintf("%s: Memory allocation failed\n", ifp->if_xname);
456 ifq_prepend(&ifp->if_snd, top);
460 * We have a packet number, so tell the card to use it.
462 outb(BASE + PACKET_NUM_REG_B, packet_no);
465 * Point to the beginning of the packet
467 outw(BASE + POINTER_REG_W, PTR_AUTOINC | 0x0000);
470 * Send the packet length (+6 for status, length and control byte)
471 * and the status word (set to zeros)
473 outw(BASE + DATA_REG_W, 0);
474 outb(BASE + DATA_REG_B, (length + 6) & 0xFF);
475 outb(BASE + DATA_REG_B, (length + 6) >> 8);
478 * Push out the data to the card.
480 for (m = top; m != NULL; m = m->m_next) {
485 outsw(BASE + DATA_REG_W, mtod(m, caddr_t), m->m_len / 2);
488 * Push out remaining byte.
491 outb(BASE + DATA_REG_B, *(mtod(m, caddr_t) + m->m_len - 1));
498 outw(BASE + DATA_REG_W, 0);
502 outb(BASE + DATA_REG_B, 0);
505 * Push out control byte and unused packet byte The control byte is 0
506 * meaning the packet is even lengthed and no special CRC handling is
509 outw(BASE + DATA_REG_W, 0);
512 * Enable the interrupts and let the chipset deal with it Also set a
513 * watchdog in case we miss the interrupt.
515 mask = inb(BASE + INTR_MASK_REG_B) | (IM_TX_INT | IM_TX_EMPTY_INT);
516 outb(BASE + INTR_MASK_REG_B, mask);
517 sc->intr_mask = mask;
519 outw(BASE + MMU_CMD_REG_W, MMUCR_ENQUEUE);
521 ifp->if_flags |= IFF_OACTIVE;
532 * Is another packet coming in? We don't want to overflow the tiny
533 * RX FIFO. If nothing has arrived then attempt to queue another
536 if (inw(BASE + FIFO_PORTS_REG_W) & FIFO_REMPTY)
542 /* Resume a packet transmit operation after a memory allocation
545 * This is basically a hacked up copy of snstart() which handles
546 * a completed memory allocation the same way snstart() does.
547 * It then passes control to snstart to handle any other queued
551 snresume(struct ifnet *ifp)
553 struct sn_softc *sc = ifp->if_softc;
561 u_short pages_wanted;
564 if (sc->pages_wanted < 0)
567 pages_wanted = sc->pages_wanted;
568 sc->pages_wanted = -1;
571 * Sneak a peek at the next packet
573 m = ifq_dequeue(&ifp->if_snd, NULL);
575 kprintf("%s: snresume() with nothing to send\n",
581 * Compute the frame length and set pad to give an overall even
582 * number of bytes. Below we assume that the packet length is even.
584 for (len = 0, top = m; m; m = m->m_next)
590 * We drop packets that are too large. Perhaps we should truncate
593 if (len + pad > ETHER_MAX_LEN - ETHER_CRC_LEN) {
594 kprintf("%s: large packet discarded (B)\n", ifp->if_xname);
602 * If HW padding is not turned on, then pad to ETHER_MIN_LEN.
604 if (len < ETHER_MIN_LEN - ETHER_CRC_LEN)
605 pad = ETHER_MIN_LEN - ETHER_CRC_LEN - len;
613 * The MMU wants the number of pages to be the number of 256 byte
614 * 'pages', minus 1 (A packet can't ever have 0 pages. We also
615 * include space for the status word, byte count and control bytes in
616 * the allocation request.
618 numPages = (length + 6) >> 8;
624 * The memory allocation completed. Check the results. If it failed,
625 * we simply set a watchdog timer and hope for the best.
627 packet_no = inb(BASE + ALLOC_RESULT_REG_B);
628 if (packet_no & ARR_FAILED) {
629 kprintf("%s: Memory allocation failed. Weird.\n", ifp->if_xname);
631 ifq_prepend(&ifp->if_snd, top);
635 * We have a packet number, so tell the card to use it.
637 outb(BASE + PACKET_NUM_REG_B, packet_no);
640 * Now, numPages should match the pages_wanted recorded when the
641 * memory allocation was initiated.
643 if (pages_wanted != numPages) {
644 kprintf("%s: memory allocation wrong size. Weird.\n", ifp->if_xname);
646 * If the allocation was the wrong size we simply release the
647 * memory once it is granted. Wait for the MMU to be un-busy.
649 while (inw(BASE + MMU_CMD_REG_W) & MMUCR_BUSY) /* NOTHING */
651 outw(BASE + MMU_CMD_REG_W, MMUCR_FREEPKT);
653 ifq_prepend(&ifp->if_snd, top);
657 * Point to the beginning of the packet
659 outw(BASE + POINTER_REG_W, PTR_AUTOINC | 0x0000);
662 * Send the packet length (+6 for status, length and control byte)
663 * and the status word (set to zeros)
665 outw(BASE + DATA_REG_W, 0);
666 outb(BASE + DATA_REG_B, (length + 6) & 0xFF);
667 outb(BASE + DATA_REG_B, (length + 6) >> 8);
670 * Push out the data to the card.
672 for (m = top; m != NULL; m = m->m_next) {
677 outsw(BASE + DATA_REG_W, mtod(m, caddr_t), m->m_len / 2);
680 * Push out remaining byte.
683 outb(BASE + DATA_REG_B, *(mtod(m, caddr_t) + m->m_len - 1));
690 outw(BASE + DATA_REG_W, 0);
694 outb(BASE + DATA_REG_B, 0);
697 * Push out control byte and unused packet byte The control byte is 0
698 * meaning the packet is even lengthed and no special CRC handling is
701 outw(BASE + DATA_REG_W, 0);
704 * Enable the interrupts and let the chipset deal with it Also set a
705 * watchdog in case we miss the interrupt.
707 mask = inb(BASE + INTR_MASK_REG_B) | (IM_TX_INT | IM_TX_EMPTY_INT);
708 outb(BASE + INTR_MASK_REG_B, mask);
709 sc->intr_mask = mask;
710 outw(BASE + MMU_CMD_REG_W, MMUCR_ENQUEUE);
720 * Now pass control to snstart() to queue any additional packets
722 ifp->if_flags &= ~IFF_OACTIVE;
726 * We've sent something, so we're active. Set a watchdog in case the
727 * TX_EMPTY interrupt is lost.
729 ifp->if_flags |= IFF_OACTIVE;
737 int status, interrupts;
738 struct sn_softc *sc = (struct sn_softc *) arg;
739 struct ifnet *ifp = &sc->arpcom.ac_if;
742 * Chip state registers
750 * Clear the watchdog.
757 * Obtain the current interrupt mask and clear the hardware mask
758 * while servicing interrupts.
760 mask = inb(BASE + INTR_MASK_REG_B);
761 outb(BASE + INTR_MASK_REG_B, 0x00);
764 * Get the set of interrupts which occurred and eliminate any which
767 interrupts = inb(BASE + INTR_STAT_REG_B);
768 status = interrupts & mask;
771 * Now, process each of the interrupt types.
777 if (status & IM_RX_OVRN_INT) {
780 * Acknowlege Interrupt
783 outb(BASE + INTR_ACK_REG_B, IM_RX_OVRN_INT);
785 ++sc->arpcom.ac_if.if_ierrors;
790 if (status & IM_RCV_INT) {
795 packet_number = inw(BASE + FIFO_PORTS_REG_W);
797 if (packet_number & FIFO_REMPTY) {
800 * we got called , but nothing was on the FIFO
802 kprintf("sn: Receive interrupt with nothing on FIFO\n");
810 * An on-card memory allocation came through.
812 if (status & IM_ALLOC_INT) {
815 * Disable this interrupt.
817 mask &= ~IM_ALLOC_INT;
818 sc->arpcom.ac_if.if_flags &= ~IFF_OACTIVE;
819 snresume(&sc->arpcom.ac_if);
822 * TX Completion. Handle a transmit error message. This will only be
823 * called when there is an error, because of the AUTO_RELEASE mode.
825 if (status & IM_TX_INT) {
828 * Acknowlege Interrupt
831 outb(BASE + INTR_ACK_REG_B, IM_TX_INT);
833 packet_no = inw(BASE + FIFO_PORTS_REG_W);
834 packet_no &= FIFO_TX_MASK;
837 * select this as the packet to read from
839 outb(BASE + PACKET_NUM_REG_B, packet_no);
842 * Position the pointer to the first word from this packet
844 outw(BASE + POINTER_REG_W, PTR_AUTOINC | PTR_READ | 0x0000);
847 * Fetch the TX status word. The value found here will be a
848 * copy of the EPH_STATUS_REG_W at the time the transmit
851 tx_status = inw(BASE + DATA_REG_W);
853 if (tx_status & EPHSR_TX_SUC) {
854 device_printf(sc->dev,
855 "Successful packet caused interrupt\n");
857 ++sc->arpcom.ac_if.if_oerrors;
860 if (tx_status & EPHSR_LATCOL)
861 ++sc->arpcom.ac_if.if_collisions;
864 * Some of these errors will have disabled transmit.
865 * Re-enable transmit now.
870 outw(BASE + TXMIT_CONTROL_REG_W, TCR_ENABLE);
872 outw(BASE + TXMIT_CONTROL_REG_W, TCR_ENABLE | TCR_PAD_ENABLE);
876 * kill the failed packet. Wait for the MMU to be un-busy.
879 while (inw(BASE + MMU_CMD_REG_W) & MMUCR_BUSY) /* NOTHING */
881 outw(BASE + MMU_CMD_REG_W, MMUCR_FREEPKT);
884 * Attempt to queue more transmits.
886 sc->arpcom.ac_if.if_flags &= ~IFF_OACTIVE;
887 if_devstart(&sc->arpcom.ac_if);
890 * Transmit underrun. We use this opportunity to update transmit
891 * statistics from the card.
893 if (status & IM_TX_EMPTY_INT) {
896 * Acknowlege Interrupt
899 outb(BASE + INTR_ACK_REG_B, IM_TX_EMPTY_INT);
902 * Disable this interrupt.
904 mask &= ~IM_TX_EMPTY_INT;
907 card_stats = inw(BASE + COUNTER_REG_W);
912 sc->arpcom.ac_if.if_collisions += card_stats & ECR_COLN_MASK;
915 * Multiple collisions
917 sc->arpcom.ac_if.if_collisions += (card_stats & ECR_MCOLN_MASK) >> 4;
922 * Attempt to enqueue some more stuff.
924 sc->arpcom.ac_if.if_flags &= ~IFF_OACTIVE;
925 if_devstart(&sc->arpcom.ac_if);
928 * Some other error. Try to fix it by resetting the adapter.
930 if (status & IM_EPH_INT) {
937 * Handled all interrupt sources.
943 * Reestablish interrupts from mask which have not been deselected
944 * during this interrupt. Note that the hardware mask, which was set
945 * to 0x00 at the start of this service routine, may have been
946 * updated by one or more of the interrupt handers and we must let
947 * those new interrupts stay enabled here.
949 mask |= inb(BASE + INTR_MASK_REG_B);
950 outb(BASE + INTR_MASK_REG_B, mask);
951 sc->intr_mask = mask;
955 snread(struct ifnet *ifp)
957 struct sn_softc *sc = ifp->if_softc;
961 u_short packet_length;
966 packet_number = inw(BASE + FIFO_PORTS_REG_W);
968 if (packet_number & FIFO_REMPTY) {
971 * we got called , but nothing was on the FIFO
973 kprintf("sn: Receive interrupt with nothing on FIFO\n");
980 * Start reading from the start of the packet. Since PTR_RCV is set,
981 * packet number is found in FIFO_PORTS_REG_W, FIFO_RX_MASK.
983 outw(BASE + POINTER_REG_W, PTR_READ | PTR_RCV | PTR_AUTOINC | 0x0000);
986 * First two words are status and packet_length
988 status = inw(BASE + DATA_REG_W);
989 packet_length = inw(BASE + DATA_REG_W) & RLEN_MASK;
992 * The packet length contains 3 extra words: status, length, and a
993 * extra word with the control byte.
998 * Account for receive errors and discard.
1000 if (status & RS_ERRORS) {
1005 * A packet is received.
1009 * Adjust for odd-length packet.
1011 if (status & RS_ODDFRAME)
1015 * Allocate a header mbuf from the kernel.
1017 MGETHDR(m, MB_DONTWAIT, MT_DATA);
1021 m->m_pkthdr.rcvif = ifp;
1022 m->m_pkthdr.len = m->m_len = packet_length;
1025 * Attach an mbuf cluster
1027 MCLGET(m, MB_DONTWAIT);
1030 * Insist on getting a cluster
1032 if ((m->m_flags & M_EXT) == 0) {
1035 kprintf("sn: snread() kernel memory allocation problem\n");
1040 * Get packet, including link layer address, from interface.
1043 data = mtod(m, u_char *);
1044 insw(BASE + DATA_REG_W, data, packet_length >> 1);
1045 if (packet_length & 1) {
1046 data += packet_length & ~1;
1047 *data = inb(BASE + DATA_REG_B);
1051 m->m_pkthdr.len = m->m_len = packet_length;
1053 ifp->if_input(ifp, m);
1058 * Error or good, tell the card to get rid of this packet Wait for
1059 * the MMU to be un-busy.
1062 while (inw(BASE + MMU_CMD_REG_W) & MMUCR_BUSY) /* NOTHING */
1064 outw(BASE + MMU_CMD_REG_W, MMUCR_RELEASE);
1067 * Check whether another packet is ready
1069 packet_number = inw(BASE + FIFO_PORTS_REG_W);
1070 if (packet_number & FIFO_REMPTY) {
1078 * Handle IOCTLS. This function is completely stolen from if_ep.c
1079 * As with its progenitor, it does not handle hardware address
1083 snioctl(struct ifnet *ifp, u_long cmd, caddr_t data, struct ucred *cr)
1085 struct sn_softc *sc = ifp->if_softc;
1090 if ((ifp->if_flags & IFF_UP) == 0 && ifp->if_flags & IFF_RUNNING) {
1091 ifp->if_flags &= ~IFF_RUNNING;
1095 /* reinitialize card on any parameter change */
1103 bcopy((caddr_t) sc->sc_addr, (caddr_t) & ifr->ifr_data,
1104 sizeof(sc->sc_addr));
1109 /* update multicast filter list. */
1114 /* update multicast filter list. */
1119 error = ether_ioctl(ifp, cmd, data);
1127 snreset(struct sn_softc *sc)
1134 snwatchdog(struct ifnet *ifp)
1136 sn_intr(ifp->if_softc);
1140 /* 1. zero the interrupt mask
1141 * 2. clear the enable receive flag
1142 * 3. clear the enable xmit flags
1145 snstop(struct sn_softc *sc)
1148 struct ifnet *ifp = &sc->arpcom.ac_if;
1151 * Clear interrupt mask; disable all interrupts.
1154 outb(BASE + INTR_MASK_REG_B, 0x00);
1157 * Disable transmitter and Receiver
1160 outw(BASE + RECV_CONTROL_REG_W, 0x0000);
1161 outw(BASE + TXMIT_CONTROL_REG_W, 0x0000);
1171 sn_activate(device_t dev)
1173 struct sn_softc *sc = device_get_softc(dev);
1176 sc->port_res = bus_alloc_resource(dev, SYS_RES_IOPORT, &sc->port_rid,
1177 0, ~0, SMC_IO_EXTENT, RF_ACTIVE);
1178 if (!sc->port_res) {
1180 device_printf(dev, "Cannot allocate ioport\n");
1186 sc->irq_res = bus_alloc_resource_any(dev, SYS_RES_IRQ, &sc->irq_rid,
1190 device_printf(dev, "Cannot allocate irq\n");
1196 sc->sn_io_addr = rman_get_start(sc->port_res);
1201 sn_deactivate(device_t dev)
1203 struct sn_softc *sc = device_get_softc(dev);
1206 bus_release_resource(dev, SYS_RES_IOPORT, sc->port_rid,
1210 bus_release_resource(dev, SYS_RES_IRQ, sc->irq_rid,
1217 * Function: sn_probe( device_t dev, int pccard )
1220 * Tests to see if a given ioaddr points to an SMC9xxx chip.
1221 * Tries to cause as little damage as possible if it's not a SMC chip.
1222 * Returns a 0 on success
1225 * (1) see if the high byte of BANK_SELECT is 0x33
1226 * (2) compare the ioaddr with the base register's address
1227 * (3) see if I recognize the chip ID in the appropriate register
1232 sn_probe(device_t dev, int pccard)
1234 struct sn_softc *sc = device_get_softc(dev);
1236 u_short revision_register;
1237 u_short base_address_register;
1241 if ((err = sn_activate(dev)) != 0)
1244 ioaddr = sc->sn_io_addr;
1247 * First, see if the high byte is 0x33
1249 bank = inw(ioaddr + BANK_SELECT_REG_W);
1250 if ((bank & BSR_DETECT_MASK) != BSR_DETECT_VALUE) {
1252 device_printf(dev, "test1 failed\n");
1257 * The above MIGHT indicate a device, but I need to write to further
1258 * test this. Go to bank 0, then test that the register still
1259 * reports the high byte is 0x33.
1261 outw(ioaddr + BANK_SELECT_REG_W, 0x0000);
1262 bank = inw(ioaddr + BANK_SELECT_REG_W);
1263 if ((bank & BSR_DETECT_MASK) != BSR_DETECT_VALUE) {
1265 device_printf(dev, "test2 failed\n");
1270 * well, we've already written once, so hopefully another time won't
1271 * hurt. This time, I need to switch the bank register to bank 1, so
1272 * I can access the base address register. The contents of the
1273 * BASE_ADDR_REG_W register, after some jiggery pokery, is expected
1274 * to match the I/O port address where the adapter is being probed.
1276 outw(ioaddr + BANK_SELECT_REG_W, 0x0001);
1277 base_address_register = inw(ioaddr + BASE_ADDR_REG_W);
1280 * This test is nonsence on PC-card architecture, so if
1281 * pccard == 1, skip this test. (hosokawa)
1283 if (!pccard && (ioaddr != (base_address_register >> 3 & 0x3E0))) {
1286 * Well, the base address register didn't match. Must not
1287 * have been a SMC chip after all.
1290 * kprintf("sn: ioaddr %x doesn't match card configuration
1291 * (%x)\n", ioaddr, base_address_register >> 3 & 0x3E0 );
1295 device_printf(dev, "test3 failed ioaddr = 0x%x, "
1296 "base_address_register = 0x%x\n", ioaddr,
1297 base_address_register >> 3 & 0x3E0);
1302 * Check if the revision register is something that I recognize.
1303 * These might need to be added to later, as future revisions could
1306 outw(ioaddr + BANK_SELECT_REG_W, 0x3);
1307 revision_register = inw(ioaddr + REVISION_REG_W);
1308 if (!chip_ids[(revision_register >> 4) & 0xF]) {
1311 * I don't regonize this chip, so...
1314 device_printf(dev, "test4 failed\n");
1319 * at this point I'll assume that the chip is an SMC9xxx. It might be
1320 * prudent to check a listing of MAC addresses against the hardware
1321 * address, or do some other tests.
1333 sn_setmcast(struct sn_softc *sc)
1335 struct ifnet *ifp = (struct ifnet *)sc;
1339 * Set the receiver filter. We want receive enabled and auto strip
1340 * of CRC from received packet. If we are promiscuous then set that
1343 flags = RCR_ENABLE | RCR_STRIP_CRC;
1345 if (ifp->if_flags & IFF_PROMISC) {
1346 flags |= RCR_PROMISC | RCR_ALMUL;
1347 } else if (ifp->if_flags & IFF_ALLMULTI) {
1351 if (sn_getmcf(&sc->arpcom, mcf)) {
1354 outw(BASE + MULTICAST1_REG_W,
1355 ((u_short)mcf[1] << 8) | mcf[0]);
1356 outw(BASE + MULTICAST2_REG_W,
1357 ((u_short)mcf[3] << 8) | mcf[2]);
1358 outw(BASE + MULTICAST3_REG_W,
1359 ((u_short)mcf[5] << 8) | mcf[4]);
1360 outw(BASE + MULTICAST4_REG_W,
1361 ((u_short)mcf[7] << 8) | mcf[6]);
1367 outw(BASE + RECV_CONTROL_REG_W, flags);
1371 sn_getmcf(struct arpcom *ac, u_char *mcf)
1374 u_int index, index2;
1375 u_char *af = (u_char *) mcf;
1376 struct ifmultiaddr *ifma;
1380 TAILQ_FOREACH(ifma, &ac->ac_if.if_multiaddrs, ifma_link) {
1381 if (ifma->ifma_addr->sa_family != AF_LINK)
1383 index = smc_crc(LLADDR((struct sockaddr_dl *)ifma->ifma_addr)) & 0x3f;
1385 for (i = 0; i < 6; i++) {
1387 index2 |= (index & 0x01);
1390 af[index2 >> 3] |= 1 << (index2 & 7);
1392 return 1; /* use multicast filter */
1400 const u_int poly = 0xedb88320;
1401 u_int v = 0xffffffff;
1404 for (perByte = 0; perByte < ETHER_ADDR_LEN; perByte++) {
1406 for (perBit = 0; perBit < 8; perBit++) {
1407 v = (v >> 1)^(((v ^ c) & 0x01) ? poly : 0);