Home | History | Annotate | Line # | Download | only in dev
if_qn.c revision 1.17
      1  1.17   thorpej /*	$NetBSD: if_qn.c,v 1.17 1999/03/25 23:10:53 thorpej Exp $	*/
      2   1.1    chopps 
      3   1.1    chopps /*
      4   1.1    chopps  * Copyright (c) 1995 Mika Kortelainen
      5   1.1    chopps  * All rights reserved.
      6   1.1    chopps  *
      7   1.1    chopps  * Redistribution and use in source and binary forms, with or without
      8   1.1    chopps  * modification, are permitted provided that the following conditions
      9   1.1    chopps  * are met:
     10   1.1    chopps  * 1. Redistributions of source code must retain the above copyright
     11   1.1    chopps  *    notice, this list of conditions and the following disclaimer.
     12   1.1    chopps  * 2. Redistributions in binary form must reproduce the above copyright
     13   1.1    chopps  *    notice, this list of conditions and the following disclaimer in the
     14   1.1    chopps  *    documentation and/or other materials provided with the distribution.
     15   1.1    chopps  * 3. All advertising materials mentioning features or use of this software
     16   1.1    chopps  *    must display the following acknowledgement:
     17   1.1    chopps  *      This product includes software developed by  Mika Kortelainen
     18   1.1    chopps  * 4. The name of the author may not be used to endorse or promote products
     19   1.1    chopps  *    derived from this software without specific prior written permission
     20   1.1    chopps  *
     21   1.1    chopps  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     22   1.1    chopps  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     23   1.1    chopps  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     24   1.1    chopps  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     25   1.1    chopps  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     26   1.1    chopps  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     27   1.1    chopps  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     28   1.1    chopps  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     29   1.1    chopps  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     30   1.1    chopps  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     31   1.1    chopps  *
     32   1.1    chopps  * Thanks for Aspecs Oy (Finland) for the data book for the NIC used
     33   1.1    chopps  * in this card and also many thanks for the Resource Management Force
     34   1.1    chopps  * (QuickNet card manufacturer) and especially Daniel Koch for providing
     35   1.1    chopps  * me with the necessary 'inside' information to write the driver.
     36   1.1    chopps  *
     37   1.1    chopps  * This is partly based on other code:
     38   1.2       jtc  * - if_ed.c: basic function structure for Ethernet driver and now also
     39   1.2       jtc  *	qn_put() is done similarly, i.e. no extra packet buffers.
     40   1.1    chopps  *
     41   1.1    chopps  *	Device driver for National Semiconductor DS8390/WD83C690 based ethernet
     42   1.1    chopps  *	adapters.
     43   1.1    chopps  *
     44   1.1    chopps  *	Copyright (c) 1994, 1995 Charles M. Hannum.  All rights reserved.
     45   1.1    chopps  *
     46   1.1    chopps  *	Copyright (C) 1993, David Greenman.  This software may be used,
     47   1.1    chopps  *	modified, copied, distributed, and sold, in both source and binary
     48   1.1    chopps  *	form provided that the above copyright and these terms are retained.
     49   1.1    chopps  *	Under no circumstances is the author responsible for the proper
     50   1.1    chopps  *	functioning of this software, nor does the author assume any
     51   1.1    chopps  *	responsibility for damages incurred with its use.
     52   1.1    chopps  *
     53   1.1    chopps  * - if_es.c: used as an example of -current driver
     54   1.1    chopps  *
     55   1.1    chopps  *	Copyright (c) 1995 Michael L. Hitch
     56   1.1    chopps  *	All rights reserved.
     57   1.1    chopps  *
     58   1.2       jtc  * - if_fe.c: some ideas for error handling for qn_rint() which might
     59   1.2       jtc  *	have fixed those random lock ups, too.
     60   1.2       jtc  *
     61   1.2       jtc  *	All Rights Reserved, Copyright (C) Fujitsu Limited 1995
     62   1.2       jtc  *
     63   1.1    chopps  *
     64   1.1    chopps  * TODO:
     65   1.1    chopps  * - add multicast support
     66   1.1    chopps  */
     67   1.1    chopps 
     68   1.1    chopps #include "qn.h"
     69   1.1    chopps #if NQN > 0
     70   1.1    chopps 
     71   1.1    chopps #define QN_DEBUG
     72   1.2       jtc #define QN_DEBUG1_no /* hides some old tests */
     73   1.7        is #define QN_CHECKS_no /* adds some checks (not needed in normal situations) */
     74   1.1    chopps 
     75   1.1    chopps #include "bpfilter.h"
     76   1.1    chopps 
     77   1.1    chopps /*
     78   1.2       jtc  * Fujitsu MB86950 Ethernet Controller (as used in the QuickNet QN2000
     79   1.2       jtc  * Ethernet card)
     80   1.1    chopps  */
     81  1.15  jonathan 
     82  1.15  jonathan #include "opt_inet.h"
     83  1.16  jonathan #include "opt_ns.h"
     84   1.1    chopps 
     85   1.1    chopps #include <sys/param.h>
     86   1.1    chopps #include <sys/systm.h>
     87   1.1    chopps #include <sys/mbuf.h>
     88   1.1    chopps #include <sys/buf.h>
     89   1.1    chopps #include <sys/device.h>
     90   1.1    chopps #include <sys/protosw.h>
     91   1.1    chopps #include <sys/socket.h>
     92   1.1    chopps #include <sys/syslog.h>
     93   1.1    chopps #include <sys/ioctl.h>
     94   1.1    chopps #include <sys/errno.h>
     95   1.1    chopps 
     96   1.1    chopps #include <net/if.h>
     97  1.12        is #include <net/if_dl.h>
     98  1.11        is #include <net/if_ether.h>
     99   1.1    chopps 
    100   1.1    chopps #ifdef INET
    101   1.1    chopps #include <netinet/in.h>
    102   1.1    chopps #include <netinet/in_systm.h>
    103   1.1    chopps #include <netinet/in_var.h>
    104   1.1    chopps #include <netinet/ip.h>
    105  1.11        is #include <netinet/if_inarp.h>
    106   1.1    chopps #endif
    107   1.1    chopps 
    108   1.1    chopps #ifdef NS
    109   1.1    chopps #include <netns/ns.h>
    110   1.1    chopps #include <netns/ns_if.h>
    111   1.1    chopps #endif
    112   1.1    chopps 
    113   1.1    chopps #include <machine/cpu.h>
    114   1.1    chopps #include <machine/mtpr.h>
    115   1.1    chopps #include <amiga/amiga/device.h>
    116   1.1    chopps #include <amiga/amiga/isr.h>
    117   1.1    chopps #include <amiga/dev/zbusvar.h>
    118   1.1    chopps #include <amiga/dev/if_qnreg.h>
    119   1.1    chopps 
    120   1.1    chopps 
    121   1.2       jtc #define	NIC_R_MASK	(R_INT_PKT_RDY | R_INT_ALG_ERR |\
    122   1.2       jtc 			 R_INT_CRC_ERR | R_INT_OVR_FLO)
    123   1.2       jtc #define	MAX_PACKETS	30 /* max number of packets read per interrupt */
    124   1.1    chopps 
    125   1.1    chopps /*
    126   1.1    chopps  * Ethernet software status per interface
    127   1.1    chopps  *
    128   1.1    chopps  * Each interface is referenced by a network interface structure,
    129   1.1    chopps  * qn_if, which the routing code uses to locate the interface.
    130   1.1    chopps  * This structure contains the output queue for the interface, its address, ...
    131   1.1    chopps  */
    132   1.1    chopps struct	qn_softc {
    133   1.1    chopps 	struct	device sc_dev;
    134   1.1    chopps 	struct	isr sc_isr;
    135  1.11        is 	struct	ethercom sc_ethercom;	/* Common ethernet structures */
    136   1.1    chopps 	u_char	volatile *sc_base;
    137   1.1    chopps 	u_char	volatile *sc_nic_base;
    138   1.1    chopps 	u_short	volatile *nic_fifo;
    139   1.1    chopps 	u_short	volatile *nic_r_status;
    140   1.1    chopps 	u_short	volatile *nic_t_status;
    141   1.1    chopps 	u_short	volatile *nic_r_mask;
    142   1.1    chopps 	u_short	volatile *nic_t_mask;
    143   1.1    chopps 	u_short	volatile *nic_r_mode;
    144   1.1    chopps 	u_short	volatile *nic_t_mode;
    145   1.1    chopps 	u_short	volatile *nic_reset;
    146   1.1    chopps 	u_short	volatile *nic_len;
    147   1.1    chopps 	u_char	transmit_pending;
    148   1.1    chopps #if NBPFILTER > 0
    149   1.1    chopps 	caddr_t	sc_bpf;
    150   1.1    chopps #endif
    151   1.1    chopps } qn_softc[NQN];
    152   1.1    chopps 
    153   1.1    chopps #if NBPFILTER > 0
    154   1.1    chopps #include <net/bpf.h>
    155   1.1    chopps #include <net/bpfdesc.h>
    156   1.1    chopps #endif
    157   1.1    chopps 
    158   1.1    chopps 
    159  1.10     veego int	qnmatch __P((struct device *, struct cfdata *, void *));
    160   1.1    chopps void	qnattach __P((struct device *, struct device *, void *));
    161   1.5     veego int	qnintr __P((void *));
    162   1.1    chopps int	qnioctl __P((struct ifnet *, u_long, caddr_t));
    163   1.1    chopps void	qnstart __P((struct ifnet *));
    164   1.6   thorpej void	qnwatchdog __P((struct ifnet *));
    165   1.1    chopps void	qnreset __P((struct qn_softc *));
    166   1.1    chopps void	qninit __P((struct qn_softc *));
    167   1.1    chopps void	qnstop __P((struct qn_softc *));
    168   1.1    chopps static	u_short qn_put __P((u_short volatile *, struct mbuf *));
    169   1.2       jtc static	void qn_rint __P((struct qn_softc *, u_short));
    170   1.1    chopps static	void qn_flush __P((struct qn_softc *));
    171   1.5     veego static	void inline word_copy_from_card __P((u_short volatile *, u_short *, u_short));
    172   1.7        is static	void inline word_copy_to_card __P((u_short *, u_short volatile *, register u_short));
    173   1.5     veego static	void qn_get_packet __P((struct qn_softc *, u_short));
    174   1.2       jtc #ifdef QN_DEBUG1
    175   1.2       jtc static	void qn_dump __P((struct qn_softc *));
    176   1.2       jtc #endif
    177   1.1    chopps 
    178   1.4   thorpej struct cfattach qn_ca = {
    179   1.4   thorpej 	sizeof(struct qn_softc), qnmatch, qnattach
    180   1.4   thorpej };
    181   1.2       jtc 
    182   1.1    chopps int
    183  1.10     veego qnmatch(parent, cfp, aux)
    184   1.1    chopps 	struct device *parent;
    185  1.10     veego 	struct cfdata *cfp;
    186  1.10     veego 	void *aux;
    187   1.1    chopps {
    188   1.1    chopps 	struct zbus_args *zap;
    189   1.1    chopps 
    190   1.1    chopps 	zap = (struct zbus_args *)aux;
    191   1.1    chopps 
    192   1.1    chopps 	/* RMF QuickNet QN2000 EtherNet card */
    193   1.1    chopps 	if (zap->manid == 2011 && zap->prodid == 2)
    194   1.1    chopps 		return (1);
    195   1.1    chopps 
    196   1.1    chopps 	return (0);
    197   1.1    chopps }
    198   1.1    chopps 
    199   1.1    chopps /*
    200   1.1    chopps  * Interface exists: make available by filling in network interface
    201   1.1    chopps  * record.  System will initialize the interface when it is ready
    202   1.1    chopps  * to accept packets.
    203   1.1    chopps  */
    204   1.1    chopps void
    205   1.1    chopps qnattach(parent, self, aux)
    206   1.1    chopps 	struct device *parent, *self;
    207   1.1    chopps 	void *aux;
    208   1.1    chopps {
    209   1.1    chopps 	struct zbus_args *zap;
    210   1.1    chopps 	struct qn_softc *sc = (struct qn_softc *)self;
    211  1.11        is 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
    212  1.11        is 	u_int8_t myaddr[ETHER_ADDR_LEN];
    213   1.1    chopps 
    214   1.1    chopps 	zap = (struct zbus_args *)aux;
    215   1.1    chopps 
    216   1.1    chopps 	sc->sc_base = zap->va;
    217   1.1    chopps 	sc->sc_nic_base = sc->sc_base + QUICKNET_NIC_BASE;
    218   1.1    chopps 	sc->nic_fifo = (u_short volatile *)(sc->sc_nic_base + NIC_BMPR0);
    219   1.1    chopps 	sc->nic_len = (u_short volatile *)(sc->sc_nic_base + NIC_BMPR2);
    220   1.1    chopps 	sc->nic_t_status = (u_short volatile *)(sc->sc_nic_base + NIC_DLCR0);
    221   1.1    chopps 	sc->nic_r_status = (u_short volatile *)(sc->sc_nic_base + NIC_DLCR2);
    222   1.1    chopps 	sc->nic_t_mask = (u_short volatile *)(sc->sc_nic_base + NIC_DLCR1);
    223   1.1    chopps 	sc->nic_r_mask = (u_short volatile *)(sc->sc_nic_base + NIC_DLCR3);
    224   1.1    chopps 	sc->nic_t_mode = (u_short volatile *)(sc->sc_nic_base + NIC_DLCR4);
    225   1.1    chopps 	sc->nic_r_mode = (u_short volatile *)(sc->sc_nic_base + NIC_DLCR5);
    226   1.1    chopps 	sc->nic_reset = (u_short volatile *)(sc->sc_nic_base + NIC_DLCR6);
    227   1.1    chopps 	sc->transmit_pending = 0;
    228   1.1    chopps 
    229   1.1    chopps 	/*
    230   1.1    chopps 	 * The ethernet address of the board (1st three bytes are the vendor
    231   1.1    chopps 	 * address, the rest is the serial number of the board).
    232   1.1    chopps 	 */
    233  1.11        is 	myaddr[0] = 0x5c;
    234  1.11        is 	myaddr[1] = 0x5c;
    235  1.11        is 	myaddr[2] = 0x00;
    236  1.11        is 	myaddr[3] = (zap->serno >> 16) & 0xff;
    237  1.11        is 	myaddr[4] = (zap->serno >> 8) & 0xff;
    238  1.11        is 	myaddr[5] = zap->serno & 0xff;
    239   1.1    chopps 
    240   1.1    chopps 	/* set interface to stopped condition (reset) */
    241   1.1    chopps 	qnstop(sc);
    242   1.1    chopps 
    243   1.6   thorpej 	bcopy(sc->sc_dev.dv_xname, ifp->if_xname, IFNAMSIZ);
    244   1.6   thorpej 	ifp->if_softc = sc;
    245   1.1    chopps 	ifp->if_ioctl = qnioctl;
    246   1.1    chopps 	ifp->if_watchdog = qnwatchdog;
    247   1.1    chopps 	ifp->if_output = ether_output;
    248   1.1    chopps 	ifp->if_start = qnstart;
    249   1.1    chopps 	/* XXX IFF_MULTICAST */
    250   1.1    chopps 	ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_NOTRAILERS;
    251   1.1    chopps 	ifp->if_mtu = ETHERMTU;
    252   1.1    chopps 
    253   1.1    chopps 	/* Attach the interface. */
    254   1.1    chopps 	if_attach(ifp);
    255  1.11        is 	ether_ifattach(ifp, myaddr);
    256   1.1    chopps 
    257   1.1    chopps #ifdef QN_DEBUG
    258  1.11        is 	printf(": hardware address %s\n", ether_sprintf(myaddr));
    259   1.1    chopps #endif
    260   1.1    chopps 
    261   1.1    chopps #if NBPFILTER > 0
    262   1.1    chopps 	bpfattach(&sc->sc_bpf, ifp, DLT_EN10MB, sizeof(struct ether_header));
    263   1.1    chopps #endif
    264   1.1    chopps 
    265   1.1    chopps 	sc->sc_isr.isr_intr = qnintr;
    266   1.1    chopps 	sc->sc_isr.isr_arg = sc;
    267   1.1    chopps 	sc->sc_isr.isr_ipl = 2;
    268   1.1    chopps 	add_isr(&sc->sc_isr);
    269   1.1    chopps }
    270   1.1    chopps 
    271   1.1    chopps /*
    272   1.1    chopps  * Initialize device
    273   1.1    chopps  *
    274   1.1    chopps  */
    275   1.1    chopps void
    276   1.1    chopps qninit(sc)
    277   1.1    chopps 	struct qn_softc *sc;
    278   1.1    chopps {
    279  1.11        is 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
    280   1.1    chopps 	u_short i;
    281  1.14     veego 	static int retry = 0;
    282   1.1    chopps 
    283   1.2       jtc 	*sc->nic_r_mask   = NIC_R_MASK;
    284   1.2       jtc 	*sc->nic_t_mode   = NO_LOOPBACK;
    285   1.1    chopps 
    286  1.11        is 	if (sc->sc_ethercom.ec_if.if_flags & IFF_PROMISC) {
    287   1.1    chopps 		*sc->nic_r_mode = PROMISCUOUS_MODE;
    288   1.1    chopps 		log(LOG_INFO, "qn: Promiscuous mode (not tested)\n");
    289   1.1    chopps 	} else
    290   1.1    chopps 		*sc->nic_r_mode = NORMAL_MODE;
    291   1.1    chopps 
    292   1.1    chopps 	/* Set physical ethernet address. */
    293   1.1    chopps 	for (i = 0; i < ETHER_ADDR_LEN; i++)
    294   1.2       jtc 		*((u_short volatile *)(sc->sc_nic_base+
    295   1.2       jtc 				       QNET_HARDWARE_ADDRESS+2*i)) =
    296  1.11        is 		    ((((u_short)LLADDR(ifp->if_sadl)[i]) << 8) |
    297  1.11        is 		    LLADDR(ifp->if_sadl)[i]);
    298   1.1    chopps 
    299   1.1    chopps 	ifp->if_flags |= IFF_RUNNING;
    300   1.1    chopps 	ifp->if_flags &= ~IFF_OACTIVE;
    301   1.2       jtc 	sc->transmit_pending = 0;
    302   1.1    chopps 
    303   1.1    chopps 	qn_flush(sc);
    304   1.1    chopps 
    305   1.2       jtc 	/* QuickNet magic. Done ONLY once, otherwise a lockup occurs. */
    306   1.2       jtc 	if (retry == 0) {
    307   1.2       jtc 		*((u_short volatile *)(sc->sc_nic_base + QNET_MAGIC)) = 0;
    308   1.2       jtc 		retry = 1;
    309   1.2       jtc 	}
    310   1.2       jtc 
    311   1.1    chopps 	/* Enable data link controller. */
    312   1.1    chopps 	*sc->nic_reset = ENABLE_DLC;
    313   1.1    chopps 
    314   1.1    chopps 	/* Attempt to start output, if any. */
    315   1.1    chopps 	qnstart(ifp);
    316   1.1    chopps }
    317   1.1    chopps 
    318   1.1    chopps /*
    319   1.1    chopps  * Device timeout/watchdog routine.  Entered if the device neglects to
    320   1.1    chopps  * generate an interrupt after a transmit has been started on it.
    321   1.1    chopps  */
    322   1.1    chopps void
    323   1.6   thorpej qnwatchdog(ifp)
    324   1.6   thorpej 	struct ifnet *ifp;
    325   1.1    chopps {
    326   1.6   thorpej 	struct qn_softc *sc = ifp->if_softc;
    327   1.1    chopps 
    328   1.2       jtc 	log(LOG_INFO, "qn: device timeout (watchdog)\n");
    329  1.11        is 	++sc->sc_ethercom.ec_if.if_oerrors;
    330   1.1    chopps 
    331   1.1    chopps 	qnreset(sc);
    332   1.1    chopps }
    333   1.1    chopps 
    334   1.1    chopps /*
    335   1.2       jtc  * Flush card's buffer RAM.
    336   1.1    chopps  */
    337   1.1    chopps static void
    338   1.1    chopps qn_flush(sc)
    339   1.1    chopps 	struct qn_softc *sc;
    340   1.1    chopps {
    341   1.2       jtc #if 1
    342   1.1    chopps 	/* Read data until bus read error (i.e. buffer empty). */
    343   1.2       jtc 	while (!(*sc->nic_r_status & R_BUS_RD_ERR))
    344   1.1    chopps 		(void)(*sc->nic_fifo);
    345   1.2       jtc #else
    346   1.2       jtc 	/* Read data twice to clear some internal pipelines. */
    347   1.2       jtc 	(void)(*sc->nic_fifo);
    348   1.2       jtc 	(void)(*sc->nic_fifo);
    349   1.1    chopps #endif
    350   1.1    chopps 
    351   1.1    chopps 	/* Clear bus read error. */
    352   1.1    chopps 	*sc->nic_r_status = R_BUS_RD_ERR;
    353   1.1    chopps }
    354   1.1    chopps 
    355   1.1    chopps /*
    356   1.2       jtc  * Reset the interface.
    357   1.1    chopps  *
    358   1.1    chopps  */
    359   1.1    chopps void
    360   1.1    chopps qnreset(sc)
    361   1.1    chopps 	struct qn_softc *sc;
    362   1.1    chopps {
    363   1.1    chopps 	int s;
    364   1.1    chopps 
    365   1.3   mycroft 	s = splnet();
    366   1.1    chopps 	qnstop(sc);
    367   1.1    chopps 	qninit(sc);
    368   1.1    chopps 	splx(s);
    369   1.1    chopps }
    370   1.1    chopps 
    371   1.1    chopps /*
    372   1.2       jtc  * Take interface offline.
    373   1.1    chopps  */
    374   1.1    chopps void
    375   1.1    chopps qnstop(sc)
    376   1.1    chopps 	struct qn_softc *sc;
    377   1.1    chopps {
    378   1.1    chopps 
    379   1.1    chopps 	/* Stop the interface. */
    380   1.2       jtc 	*sc->nic_reset    = DISABLE_DLC;
    381   1.2       jtc 	delay(200);
    382   1.2       jtc 	*sc->nic_t_status = CLEAR_T_ERR;
    383   1.2       jtc 	*sc->nic_t_mask   = CLEAR_T_MASK;
    384   1.2       jtc 	*sc->nic_r_status = CLEAR_R_ERR;
    385   1.2       jtc 	*sc->nic_r_mask   = CLEAR_R_MASK;
    386   1.2       jtc 
    387   1.2       jtc 	/* Turn DMA off */
    388   1.2       jtc 	*((u_short volatile *)(sc->sc_nic_base + NIC_BMPR4)) = 0;
    389   1.1    chopps 
    390   1.2       jtc 	/* Accept no packets. */
    391   1.2       jtc 	*sc->nic_r_mode = 0;
    392   1.2       jtc 	*sc->nic_t_mode = 0;
    393   1.1    chopps 
    394   1.1    chopps 	qn_flush(sc);
    395   1.1    chopps }
    396   1.1    chopps 
    397   1.1    chopps /*
    398   1.1    chopps  * Start output on interface. Get another datagram to send
    399   1.1    chopps  * off the interface queue, and copy it to the
    400   1.1    chopps  * interface before starting the output.
    401   1.1    chopps  *
    402   1.1    chopps  * This assumes that it is called inside a critical section...
    403   1.1    chopps  *
    404   1.1    chopps  */
    405   1.1    chopps void
    406   1.1    chopps qnstart(ifp)
    407   1.1    chopps 	struct ifnet *ifp;
    408   1.1    chopps {
    409   1.6   thorpej 	struct qn_softc *sc = ifp->if_softc;
    410   1.1    chopps 	struct mbuf *m;
    411   1.1    chopps 	u_short len;
    412   1.2       jtc 	int timout = 60000;
    413   1.2       jtc 
    414   1.1    chopps 
    415   1.2       jtc 	if ((ifp->if_flags & (IFF_RUNNING | IFF_OACTIVE)) != IFF_RUNNING)
    416   1.1    chopps 		return;
    417   1.1    chopps 
    418  1.11        is 	IF_DEQUEUE(&ifp->if_snd, m);
    419   1.1    chopps 	if (m == 0)
    420   1.1    chopps 		return;
    421   1.1    chopps 
    422   1.1    chopps #if NBPFILTER > 0
    423   1.1    chopps 	/*
    424   1.1    chopps 	 * If bpf is listening on this interface, let it
    425   1.1    chopps 	 * see the packet before we commit it to the wire
    426   1.1    chopps 	 *
    427   1.1    chopps 	 * (can't give the copy in QuickNet card RAM to bpf, because
    428   1.1    chopps 	 * that RAM is not visible to the host but is read from FIFO)
    429   1.1    chopps 	 *
    430   1.1    chopps 	 */
    431   1.1    chopps 	if (sc->sc_bpf)
    432   1.1    chopps 		bpf_mtap(sc->sc_bpf, m);
    433   1.1    chopps #endif
    434   1.1    chopps 	len = qn_put(sc->nic_fifo, m);
    435   1.2       jtc 	m_freem(m);
    436   1.1    chopps 
    437   1.1    chopps 	/*
    438   1.2       jtc 	 * Really transmit the packet.
    439   1.1    chopps 	 */
    440   1.1    chopps 
    441   1.2       jtc 	/* Set packet length (byte-swapped). */
    442   1.1    chopps 	len = ((len >> 8) & 0x0007) | TRANSMIT_START | ((len & 0x00ff) << 8);
    443   1.1    chopps 	*sc->nic_len = len;
    444   1.1    chopps 
    445   1.2       jtc 	/* Wait for the packet to really leave. */
    446   1.2       jtc 	while (!(*sc->nic_t_status & T_TMT_OK) && --timout) {
    447   1.2       jtc 		if ((timout % 10000) == 0)
    448   1.2       jtc 			log(LOG_INFO, "qn: timout...\n");
    449   1.2       jtc 	}
    450   1.2       jtc 
    451   1.1    chopps 	if (timout == 0)
    452   1.1    chopps 		/* Maybe we should try to recover from this one? */
    453   1.2       jtc 		/* But now, let's just fall thru and hope the best... */
    454   1.2       jtc 		log(LOG_INFO, "qn: transmit timout (fatal?)\n");
    455   1.1    chopps 
    456   1.1    chopps 	sc->transmit_pending = 1;
    457   1.1    chopps 	*sc->nic_t_mask = INT_TMT_OK | INT_SIXTEEN_COL;
    458   1.1    chopps 
    459  1.11        is 	ifp->if_flags |= IFF_OACTIVE;
    460   1.1    chopps 	ifp->if_timer = 2;
    461   1.1    chopps }
    462   1.1    chopps 
    463   1.1    chopps /*
    464   1.1    chopps  * Memory copy, copies word at a time
    465   1.1    chopps  */
    466   1.1    chopps static void inline
    467   1.1    chopps word_copy_from_card(card, b, len)
    468   1.1    chopps 	u_short volatile *card;
    469   1.1    chopps 	u_short *b, len;
    470   1.1    chopps {
    471   1.1    chopps 	register u_short l = len/2;
    472   1.1    chopps 
    473   1.1    chopps 	while (l--)
    474   1.1    chopps 		*b++ = *card;
    475   1.1    chopps }
    476   1.1    chopps 
    477   1.1    chopps static void inline
    478   1.1    chopps word_copy_to_card(a, card, len)
    479   1.5     veego 	u_short *a;
    480   1.1    chopps 	u_short volatile *card;
    481   1.7        is 	register u_short len;
    482   1.1    chopps {
    483   1.7        is 	/*register u_short l = len/2;*/
    484   1.1    chopps 
    485   1.7        is 	while (len--)
    486   1.1    chopps 		*card = *a++;
    487   1.1    chopps }
    488   1.1    chopps 
    489   1.1    chopps /*
    490   1.1    chopps  * Copy packet from mbuf to the board memory
    491   1.1    chopps  *
    492   1.1    chopps  */
    493   1.1    chopps static u_short
    494   1.1    chopps qn_put(addr, m)
    495   1.1    chopps 	u_short volatile *addr;
    496   1.1    chopps 	struct mbuf *m;
    497   1.1    chopps {
    498   1.7        is 	u_short *data;
    499   1.7        is 	u_char savebyte[2];
    500   1.7        is 	int len, len1, wantbyte;
    501   1.2       jtc 	u_short totlen;
    502   1.2       jtc 
    503   1.2       jtc 	totlen = wantbyte = 0;
    504   1.2       jtc 
    505   1.2       jtc 	for (; m != NULL; m = m->m_next) {
    506   1.5     veego 		data = mtod(m, u_short *);
    507   1.2       jtc 		len = m->m_len;
    508   1.2       jtc 		if (len > 0) {
    509   1.7        is 			totlen += len;
    510   1.7        is 
    511   1.2       jtc 			/* Finish the last word. */
    512   1.2       jtc 			if (wantbyte) {
    513   1.7        is 				savebyte[1] = *((u_char *)data);
    514   1.2       jtc 				*addr = *((u_short *)savebyte);
    515   1.7        is 				((u_char *)data)++;
    516   1.2       jtc 				len--;
    517   1.2       jtc 				wantbyte = 0;
    518   1.2       jtc 			}
    519   1.2       jtc 			/* Output contiguous words. */
    520   1.2       jtc 			if (len > 1) {
    521   1.7        is 				len1 = len/2;
    522   1.7        is 				word_copy_to_card(data, addr, len1);
    523   1.7        is 				data += len1;
    524   1.2       jtc 				len &= 1;
    525   1.2       jtc 			}
    526   1.2       jtc 			/* Save last byte, if necessary. */
    527   1.2       jtc 			if (len == 1) {
    528   1.7        is 				savebyte[0] = *((u_char *)data);
    529   1.2       jtc 				wantbyte = 1;
    530   1.2       jtc 			}
    531   1.2       jtc 		}
    532   1.2       jtc 	}
    533   1.1    chopps 
    534   1.2       jtc 	if (wantbyte) {
    535   1.2       jtc 		savebyte[1] = 0;
    536   1.2       jtc 		*addr = *((u_short *)savebyte);
    537   1.2       jtc 	}
    538   1.1    chopps 
    539  1.17   thorpej 	if(totlen < (ETHER_MIN_LEN - ETHER_CRC_LEN)) {
    540   1.2       jtc 		/*
    541   1.2       jtc 		 * Fill the rest of the packet with zeros.
    542   1.2       jtc 		 * N.B.: This is required! Otherwise MB86950 fails.
    543   1.2       jtc 		 */
    544  1.17   thorpej 		for(len = totlen + 1; len < (ETHER_MIN_LEN - ETHER_CRC_LEN);
    545  1.17   thorpej 		    len += 2)
    546   1.2       jtc 	  		*addr = (u_short)0x0000;
    547  1.17   thorpej 		totlen = (ETHER_MIN_LEN - ETHER_CRC_LEN);
    548   1.1    chopps 	}
    549   1.1    chopps 
    550   1.2       jtc 	return (totlen);
    551   1.1    chopps }
    552   1.1    chopps 
    553   1.1    chopps /*
    554   1.2       jtc  * Copy packet from board RAM.
    555   1.1    chopps  *
    556   1.1    chopps  * Trailers not supported.
    557   1.1    chopps  *
    558   1.1    chopps  */
    559   1.1    chopps static void
    560   1.1    chopps qn_get_packet(sc, len)
    561   1.1    chopps 	struct qn_softc *sc;
    562   1.1    chopps 	u_short len;
    563   1.1    chopps {
    564   1.1    chopps 	register u_short volatile *nic_fifo_ptr = sc->nic_fifo;
    565  1.12        is 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
    566   1.1    chopps 	struct ether_header *eh;
    567   1.2       jtc 	struct mbuf *m, *dst, *head = NULL;
    568   1.1    chopps 	register u_short len1;
    569   1.1    chopps 	u_short amount;
    570   1.1    chopps 
    571   1.1    chopps 	/* Allocate header mbuf. */
    572   1.1    chopps 	MGETHDR(m, M_DONTWAIT, MT_DATA);
    573   1.2       jtc 	if (m == NULL)
    574   1.1    chopps 		goto bad;
    575   1.1    chopps 
    576   1.2       jtc 	/*
    577   1.2       jtc 	 * Round len to even value.
    578   1.2       jtc 	 */
    579   1.2       jtc 	if (len & 1)
    580   1.2       jtc 		len++;
    581   1.2       jtc 
    582  1.11        is 	m->m_pkthdr.rcvif = &sc->sc_ethercom.ec_if;
    583   1.1    chopps 	m->m_pkthdr.len = len;
    584   1.1    chopps 	m->m_len = 0;
    585   1.1    chopps 	head = m;
    586   1.1    chopps 
    587   1.1    chopps 	eh = mtod(head, struct ether_header *);
    588   1.1    chopps 
    589   1.1    chopps 	word_copy_from_card(nic_fifo_ptr,
    590   1.1    chopps 	    mtod(head, u_short *),
    591   1.1    chopps 	    sizeof(struct ether_header));
    592   1.1    chopps 
    593   1.1    chopps 	head->m_len += sizeof(struct ether_header);
    594   1.1    chopps 	len -= sizeof(struct ether_header);
    595   1.1    chopps 
    596   1.1    chopps 	while (len > 0) {
    597   1.1    chopps 		len1 = len;
    598   1.1    chopps 
    599   1.1    chopps 		amount = M_TRAILINGSPACE(m);
    600   1.1    chopps 		if (amount == 0) {
    601   1.2       jtc 			/* Allocate another mbuf. */
    602   1.1    chopps 			dst = m;
    603   1.1    chopps 			MGET(m, M_DONTWAIT, MT_DATA);
    604   1.2       jtc 			if (m == NULL)
    605   1.1    chopps 				goto bad;
    606   1.1    chopps 
    607   1.1    chopps 			if (len1 >= MINCLSIZE)
    608   1.1    chopps 				MCLGET(m, M_DONTWAIT);
    609   1.1    chopps 
    610   1.1    chopps 			m->m_len = 0;
    611   1.1    chopps 			dst->m_next = m;
    612   1.1    chopps 
    613   1.1    chopps 			amount = M_TRAILINGSPACE(m);
    614   1.1    chopps 		}
    615   1.1    chopps 
    616   1.2       jtc 		if (amount < len1)
    617   1.1    chopps 			len1 = amount;
    618   1.2       jtc 
    619   1.1    chopps 		word_copy_from_card(nic_fifo_ptr,
    620   1.1    chopps 		    (u_short *)(mtod(m, caddr_t) + m->m_len),
    621   1.2       jtc 		    len1);
    622   1.1    chopps 		m->m_len += len1;
    623   1.1    chopps 		len -= len1;
    624   1.1    chopps 	}
    625   1.1    chopps 
    626   1.1    chopps #if NBPFILTER > 0
    627   1.1    chopps 	if (sc->sc_bpf) {
    628   1.1    chopps 		bpf_mtap(sc->sc_bpf, head);
    629   1.1    chopps 
    630   1.1    chopps 		/*
    631   1.1    chopps 		 * The interface cannot be in promiscuous mode if there are
    632   1.1    chopps 		 * no BPF listeners. And in prom. mode we have to check
    633   1.1    chopps 		 * if the packet is really ours...
    634   1.1    chopps 		 */
    635  1.12        is 		if ((ifp->if_flags & IFF_PROMISC) &&
    636   1.1    chopps 		    (eh->ether_dhost[0] & 1) == 0 && /* not bcast or mcast */
    637   1.1    chopps 		    bcmp(eh->ether_dhost,
    638  1.11        is         	        LLADDR(ifp->if_sadl),
    639   1.1    chopps 		        ETHER_ADDR_LEN) != 0) {
    640   1.1    chopps 			m_freem(head);
    641   1.1    chopps 			return;
    642   1.1    chopps 		}
    643   1.1    chopps 	}
    644   1.1    chopps #endif
    645   1.1    chopps 
    646   1.1    chopps 	m_adj(head, sizeof(struct ether_header));
    647  1.12        is 	ether_input(ifp, eh, head);
    648   1.1    chopps 	return;
    649   1.1    chopps 
    650   1.1    chopps bad:
    651   1.2       jtc 	if (head) {
    652   1.1    chopps 		m_freem(head);
    653   1.2       jtc 		log(LOG_INFO, "qn_get_packet: mbuf alloc failed\n");
    654   1.2       jtc 	}
    655   1.1    chopps }
    656   1.1    chopps 
    657   1.1    chopps /*
    658   1.1    chopps  * Ethernet interface receiver interrupt.
    659   1.1    chopps  */
    660   1.1    chopps static void
    661   1.2       jtc qn_rint(sc, rstat)
    662   1.1    chopps 	struct qn_softc *sc;
    663   1.2       jtc 	u_short rstat;
    664   1.1    chopps {
    665   1.1    chopps 	int i;
    666   1.1    chopps 	u_short len, status;
    667   1.1    chopps 
    668   1.2       jtc 	/* Clear the status register. */
    669   1.2       jtc 	*sc->nic_r_status = CLEAR_R_ERR;
    670   1.2       jtc 
    671   1.1    chopps 	/*
    672   1.2       jtc 	 * Was there some error?
    673   1.2       jtc 	 * Some of them are senseless because they are masked off.
    674   1.2       jtc 	 * XXX
    675   1.1    chopps 	 */
    676   1.7        is 	if (rstat & R_INT_OVR_FLO) {
    677   1.1    chopps #ifdef QN_DEBUG
    678   1.2       jtc 		log(LOG_INFO, "Overflow\n");
    679   1.1    chopps #endif
    680  1.11        is 		++sc->sc_ethercom.ec_if.if_ierrors;
    681   1.2       jtc 	}
    682   1.7        is 	if (rstat & R_INT_CRC_ERR) {
    683   1.1    chopps #ifdef QN_DEBUG
    684   1.2       jtc 		log(LOG_INFO, "CRC Error\n");
    685   1.1    chopps #endif
    686  1.11        is 		++sc->sc_ethercom.ec_if.if_ierrors;
    687   1.2       jtc 	}
    688   1.7        is 	if (rstat & R_INT_ALG_ERR) {
    689   1.1    chopps #ifdef QN_DEBUG
    690   1.2       jtc 		log(LOG_INFO, "Alignment error\n");
    691   1.1    chopps #endif
    692  1.11        is 		++sc->sc_ethercom.ec_if.if_ierrors;
    693   1.2       jtc 	}
    694   1.7        is 	if (rstat & R_INT_SRT_PKT) {
    695   1.2       jtc 		/* Short packet (these may occur and are
    696   1.2       jtc 		 * no reason to worry about - or maybe
    697   1.2       jtc 		 * they are?).
    698   1.2       jtc 		 */
    699   1.1    chopps #ifdef QN_DEBUG
    700   1.2       jtc 		log(LOG_INFO, "Short packet\n");
    701   1.1    chopps #endif
    702  1.11        is 		++sc->sc_ethercom.ec_if.if_ierrors;
    703   1.2       jtc 	}
    704   1.2       jtc 	if (rstat & 0x4040) {
    705   1.1    chopps #ifdef QN_DEBUG
    706   1.2       jtc 		log(LOG_INFO, "Bus read error\n");
    707   1.1    chopps #endif
    708  1.11        is 		++sc->sc_ethercom.ec_if.if_ierrors;
    709   1.2       jtc 		qnreset(sc);
    710   1.2       jtc 	}
    711   1.1    chopps 
    712   1.2       jtc 	/*
    713   1.2       jtc 	 * Read at most MAX_PACKETS packets per interrupt
    714   1.2       jtc 	 */
    715   1.2       jtc 	for (i = 0; i < MAX_PACKETS; i++) {
    716   1.2       jtc 		if (*sc->nic_r_mode & RM_BUF_EMP)
    717   1.2       jtc 			/* Buffer empty. */
    718   1.2       jtc 			break;
    719   1.1    chopps 
    720   1.2       jtc 		/*
    721   1.2       jtc 		 * Read the first word: upper byte contains useful
    722   1.2       jtc 		 * information.
    723   1.2       jtc 		 */
    724   1.2       jtc 		status = *sc->nic_fifo;
    725   1.2       jtc 		if ((status & 0x7000) != 0x2000) {
    726   1.2       jtc 			log(LOG_INFO, "qn: ERROR: status=%04x\n", status);
    727   1.2       jtc 			continue;
    728   1.2       jtc 		}
    729   1.2       jtc 
    730   1.2       jtc 		/*
    731   1.2       jtc 		 * Read packet length (byte-swapped).
    732   1.2       jtc 		 * CRC is stripped off by the NIC.
    733   1.2       jtc 		 */
    734   1.2       jtc 		len = *sc->nic_fifo;
    735   1.2       jtc 		len = ((len << 8) & 0xff00) | ((len >> 8) & 0x00ff);
    736   1.1    chopps 
    737   1.7        is #ifdef QN_CHECKS
    738  1.17   thorpej 		if (len > (ETHER_MAX_LEN - ETHER_CRC_LEN) ||
    739  1.17   thorpej 		    len < ETHER_HDR_LEN) {
    740   1.2       jtc 			log(LOG_WARNING,
    741   1.2       jtc 			    "%s: received a %s packet? (%u bytes)\n",
    742   1.2       jtc 			    sc->sc_dev.dv_xname,
    743  1.17   thorpej 			    len < ETHER_HDR_LEN ? "partial" : "big", len);
    744  1.11        is 			++sc->sc_ethercom.ec_if.if_ierrors;
    745   1.2       jtc 			continue;
    746   1.1    chopps 		}
    747   1.2       jtc #endif
    748   1.7        is #ifdef QN_CHECKS
    749  1.17   thorpej 		if (len < (ETHER_MIN_LEN - ETHER_CRC_LEN))
    750   1.2       jtc 			log(LOG_WARNING,
    751   1.2       jtc 			    "%s: received a short packet? (%u bytes)\n",
    752   1.2       jtc 			    sc->sc_dev.dv_xname, len);
    753   1.2       jtc #endif
    754   1.2       jtc 
    755   1.2       jtc 		/* Read the packet. */
    756   1.2       jtc 		qn_get_packet(sc, len);
    757   1.2       jtc 
    758  1.11        is 		++sc->sc_ethercom.ec_if.if_ipackets;
    759   1.1    chopps 	}
    760   1.1    chopps 
    761   1.2       jtc #ifdef QN_DEBUG
    762   1.2       jtc 	/* This print just to see whether MAX_PACKETS is large enough. */
    763   1.2       jtc 	if (i == MAX_PACKETS)
    764   1.2       jtc 		log(LOG_INFO, "used all the %d loops\n", MAX_PACKETS);
    765   1.2       jtc #endif
    766   1.1    chopps }
    767   1.1    chopps 
    768   1.1    chopps /*
    769   1.1    chopps  * Our interrupt routine
    770   1.1    chopps  */
    771   1.1    chopps int
    772   1.5     veego qnintr(arg)
    773   1.5     veego 	void *arg;
    774   1.1    chopps {
    775   1.5     veego 	struct qn_softc *sc = arg;
    776   1.2       jtc 	u_short tint, rint, tintmask;
    777   1.2       jtc 	char return_tintmask = 0;
    778   1.1    chopps 
    779   1.1    chopps 	/*
    780   1.1    chopps 	 * If the driver has not been initialized, just return immediately.
    781   1.1    chopps 	 * This also happens if there is no QuickNet board present.
    782   1.1    chopps 	 */
    783   1.1    chopps 	if (sc->sc_base == NULL)
    784   1.1    chopps 		return (0);
    785   1.1    chopps 
    786   1.1    chopps 	/* Get interrupt statuses and masks. */
    787   1.2       jtc 	rint = (*sc->nic_r_status) & NIC_R_MASK;
    788   1.1    chopps 	tintmask = *sc->nic_t_mask;
    789   1.2       jtc 	tint = (*sc->nic_t_status) & tintmask;
    790   1.2       jtc 	if (tint == 0 && rint == 0)
    791   1.1    chopps 		return (0);
    792   1.1    chopps 
    793   1.2       jtc 	/* Disable interrupts so that we won't miss anything. */
    794   1.1    chopps 	*sc->nic_r_mask = CLEAR_R_MASK;
    795   1.2       jtc 	*sc->nic_t_mask = CLEAR_T_MASK;
    796   1.1    chopps 
    797   1.1    chopps 	/*
    798   1.1    chopps 	 * Handle transmitter interrupts. Some of them are not asked for
    799   1.1    chopps 	 * but do happen, anyway.
    800   1.1    chopps 	 */
    801   1.2       jtc 
    802   1.2       jtc 	if (tint != 0) {
    803   1.2       jtc 		/* Clear transmit interrupt status. */
    804   1.1    chopps 		*sc->nic_t_status = CLEAR_T_ERR;
    805   1.2       jtc 
    806   1.1    chopps 		if (sc->transmit_pending && (tint & T_TMT_OK)) {
    807   1.1    chopps 			sc->transmit_pending = 0;
    808   1.1    chopps 			/*
    809   1.1    chopps 			 * Update total number of successfully
    810   1.1    chopps 			 * transmitted packets.
    811   1.1    chopps 			 */
    812  1.11        is 			sc->sc_ethercom.ec_if.if_opackets++;
    813   1.1    chopps 		}
    814   1.1    chopps 
    815   1.1    chopps 		if (tint & T_SIXTEEN_COL) {
    816   1.1    chopps 			/*
    817   1.1    chopps 			 * 16 collision (i.e., packet lost).
    818   1.1    chopps 			 */
    819   1.1    chopps 			log(LOG_INFO, "qn: 16 collision - packet lost\n");
    820   1.2       jtc #ifdef QN_DEBUG1
    821   1.2       jtc 			qn_dump(sc);
    822   1.2       jtc #endif
    823  1.11        is 			sc->sc_ethercom.ec_if.if_oerrors++;
    824  1.11        is 			sc->sc_ethercom.ec_if.if_collisions += 16;
    825   1.1    chopps 			sc->transmit_pending = 0;
    826   1.1    chopps 		}
    827   1.1    chopps 
    828   1.1    chopps 		if (sc->transmit_pending) {
    829   1.1    chopps 			log(LOG_INFO, "qn:still pending...\n");
    830   1.2       jtc 
    831   1.2       jtc 			/* Must return transmission interrupt mask. */
    832   1.2       jtc 			return_tintmask = 1;
    833   1.1    chopps 		} else {
    834  1.11        is 			sc->sc_ethercom.ec_if.if_flags &= ~IFF_OACTIVE;
    835   1.1    chopps 
    836   1.1    chopps 			/* Clear watchdog timer. */
    837  1.11        is 			sc->sc_ethercom.ec_if.if_timer = 0;
    838   1.1    chopps 		}
    839   1.2       jtc 	} else
    840   1.2       jtc 		return_tintmask = 1;
    841   1.1    chopps 
    842   1.1    chopps 	/*
    843   1.1    chopps 	 * Handle receiver interrupts.
    844   1.1    chopps 	 */
    845   1.2       jtc 	if (rint != 0)
    846   1.2       jtc 		qn_rint(sc, rint);
    847   1.1    chopps 
    848  1.11        is 	if ((sc->sc_ethercom.ec_if.if_flags & IFF_OACTIVE) == 0)
    849  1.11        is 		qnstart(&sc->sc_ethercom.ec_if);
    850   1.2       jtc 	else if (return_tintmask == 1)
    851   1.2       jtc 		*sc->nic_t_mask = tintmask;
    852   1.2       jtc 
    853   1.2       jtc 	/* Set receive interrupt mask back. */
    854   1.2       jtc 	*sc->nic_r_mask = NIC_R_MASK;
    855   1.1    chopps 
    856   1.1    chopps 	return (1);
    857   1.1    chopps }
    858   1.1    chopps 
    859   1.1    chopps /*
    860   1.1    chopps  * Process an ioctl request. This code needs some work - it looks pretty ugly.
    861   1.1    chopps  * I somehow think that this is quite a common excuse... ;-)
    862   1.1    chopps  */
    863   1.1    chopps int
    864   1.1    chopps qnioctl(ifp, command, data)
    865   1.1    chopps 	register struct ifnet *ifp;
    866   1.1    chopps 	u_long command;
    867   1.1    chopps 	caddr_t data;
    868   1.1    chopps {
    869   1.6   thorpej 	struct qn_softc *sc = ifp->if_softc;
    870   1.1    chopps 	register struct ifaddr *ifa = (struct ifaddr *)data;
    871   1.1    chopps #if 0
    872   1.1    chopps 	struct ifreg *ifr = (struct ifreg *)data;
    873   1.1    chopps #endif
    874   1.1    chopps 	int s, error = 0;
    875   1.1    chopps 
    876   1.3   mycroft 	s = splnet();
    877   1.1    chopps 
    878   1.1    chopps 	switch (command) {
    879   1.1    chopps 
    880   1.1    chopps 	case SIOCSIFADDR:
    881   1.1    chopps 		ifp->if_flags |= IFF_UP;
    882   1.1    chopps 
    883   1.1    chopps 		switch (ifa->ifa_addr->sa_family) {
    884   1.1    chopps #ifdef INET
    885   1.1    chopps 		case AF_INET:
    886   1.2       jtc 			qnstop(sc);
    887   1.1    chopps 			qninit(sc);
    888  1.11        is 			arp_ifinit(ifp, ifa);
    889   1.1    chopps 			break;
    890   1.1    chopps #endif
    891   1.1    chopps #ifdef NS
    892   1.1    chopps 		case AF_NS:
    893   1.1    chopps 		    {
    894   1.1    chopps 			register struct ns_addr *ina = &(IA_SNS(ifa)->sns_addr);
    895   1.1    chopps 
    896   1.1    chopps 			if (ns_nullhost(*ina))
    897   1.1    chopps 				ina->x_host =
    898  1.11        is 				    *(union ns_host *)LLADDR(ifp->if_sadl);
    899   1.1    chopps 			else
    900   1.1    chopps 				bcopy(ina->x_host.c_host,
    901  1.11        is 				    LLADDR(ifp->if_sadl), ETHER_ADDR_LEN);
    902   1.2       jtc 			qnstop(sc);
    903   1.1    chopps 			qninit(sc);
    904   1.1    chopps 			break;
    905   1.1    chopps 		    }
    906   1.1    chopps #endif
    907   1.1    chopps 		default:
    908   1.1    chopps 			log(LOG_INFO, "qn:sa_family:default (not tested)\n");
    909   1.2       jtc 			qnstop(sc);
    910   1.1    chopps 			qninit(sc);
    911   1.1    chopps 			break;
    912   1.1    chopps 		}
    913   1.1    chopps 		break;
    914   1.1    chopps 
    915   1.1    chopps 	case SIOCSIFFLAGS:
    916   1.1    chopps 		if ((ifp->if_flags & IFF_UP) == 0 &&
    917   1.1    chopps 		    (ifp->if_flags & IFF_RUNNING) != 0) {
    918   1.1    chopps 			/*
    919   1.1    chopps 			 * If interface is marked down and it is running, then
    920   1.1    chopps 			 * stop it.
    921   1.1    chopps 			 */
    922   1.2       jtc #ifdef QN_DEBUG1
    923   1.2       jtc 			qn_dump(sc);
    924   1.2       jtc #endif
    925   1.1    chopps 			qnstop(sc);
    926   1.1    chopps 			ifp->if_flags &= ~IFF_RUNNING;
    927   1.1    chopps 		} else if ((ifp->if_flags & IFF_UP) != 0 &&
    928   1.2       jtc 			   (ifp->if_flags & IFF_RUNNING) == 0) {
    929   1.1    chopps 			/*
    930   1.1    chopps 			 * If interface is marked up and it is stopped, then
    931   1.1    chopps 			 * start it.
    932   1.1    chopps 			 */
    933   1.1    chopps 			qninit(sc);
    934   1.2       jtc 		} else {
    935   1.1    chopps 			/*
    936   1.1    chopps 			 * Something else... we won't do anything so we won't
    937   1.1    chopps 			 * break anything (hope so).
    938   1.1    chopps 			 */
    939   1.2       jtc #ifdef QN_DEBUG1
    940   1.2       jtc 			log(LOG_INFO, "Else branch...\n");
    941   1.2       jtc #endif
    942   1.1    chopps 		}
    943   1.1    chopps 		break;
    944   1.1    chopps 
    945   1.1    chopps 	case SIOCADDMULTI:
    946   1.1    chopps 	case SIOCDELMULTI:
    947   1.1    chopps 		log(LOG_INFO, "qnioctl: multicast not done yet\n");
    948   1.1    chopps #if 0
    949   1.1    chopps 		error = (command == SIOCADDMULTI) ?
    950  1.11        is 		    ether_addmulti(ifr, &sc->sc_ethercom) :
    951  1.11        is 		    ether_delmulti(ifr, &sc->sc_ethercom);
    952   1.1    chopps 
    953   1.1    chopps 		if (error == ENETRESET) {
    954   1.1    chopps 			/*
    955   1.1    chopps 			 * Multicast list has changed; set the hardware filter
    956   1.1    chopps 			 * accordingly.
    957   1.1    chopps 			 */
    958   1.1    chopps 			log(LOG_INFO, "qnioctl: multicast not done yet\n");
    959   1.1    chopps 			error = 0;
    960   1.1    chopps 		}
    961   1.1    chopps #else
    962   1.1    chopps 		error = EINVAL;
    963   1.1    chopps #endif
    964   1.1    chopps 		break;
    965   1.1    chopps 
    966   1.1    chopps 	default:
    967   1.1    chopps 		log(LOG_INFO, "qnioctl: default\n");
    968   1.1    chopps 		error = EINVAL;
    969   1.1    chopps 	}
    970   1.1    chopps 
    971   1.2       jtc 	splx(s);
    972   1.1    chopps 	return (error);
    973   1.1    chopps }
    974   1.2       jtc 
    975   1.2       jtc /*
    976   1.2       jtc  * Dump some register information.
    977   1.2       jtc  */
    978   1.2       jtc #ifdef QN_DEBUG1
    979   1.2       jtc static void
    980   1.2       jtc qn_dump(sc)
    981   1.2       jtc 	struct qn_softc *sc;
    982   1.2       jtc {
    983   1.2       jtc 
    984   1.2       jtc 	log(LOG_INFO, "t_status  : %04x\n", *sc->nic_t_status);
    985   1.2       jtc 	log(LOG_INFO, "t_mask    : %04x\n", *sc->nic_t_mask);
    986   1.2       jtc 	log(LOG_INFO, "t_mode    : %04x\n", *sc->nic_t_mode);
    987   1.2       jtc 	log(LOG_INFO, "r_status  : %04x\n", *sc->nic_r_status);
    988   1.2       jtc 	log(LOG_INFO, "r_mask    : %04x\n", *sc->nic_r_mask);
    989   1.2       jtc 	log(LOG_INFO, "r_mode    : %04x\n", *sc->nic_r_mode);
    990   1.2       jtc 	log(LOG_INFO, "pending   : %02x\n", sc->transmit_pending);
    991  1.11        is 	log(LOG_INFO, "if_flags  : %04x\n", sc->sc_ethercom.ec_if.if_flags);
    992   1.2       jtc }
    993   1.2       jtc #endif
    994   1.1    chopps 
    995   1.1    chopps #endif /* NQN > 0 */
    996