Home | History | Annotate | Line # | Download | only in isa
if_iy.c revision 1.103
      1  1.103  riastrad /*	$NetBSD: if_iy.c,v 1.103 2018/09/03 16:29:31 riastradh Exp $	*/
      2    1.1        is /* #define IYDEBUG */
      3    1.1        is /* #define IYMEMDEBUG */
      4   1.30        is 
      5    1.1        is /*-
      6   1.52        is  * Copyright (c) 1996,2001 The NetBSD Foundation, Inc.
      7    1.1        is  * All rights reserved.
      8    1.1        is  *
      9   1.30        is  * This code is derived from software contributed to The NetBSD Foundation
     10   1.30        is  * by Ignatios Souvatzis.
     11   1.30        is  *
     12    1.1        is  * Redistribution and use in source and binary forms, with or without
     13    1.1        is  * modification, are permitted provided that the following conditions
     14    1.1        is  * are met:
     15    1.1        is  * 1. Redistributions of source code must retain the above copyright
     16    1.1        is  *    notice, this list of conditions and the following disclaimer.
     17    1.1        is  * 2. Redistributions in binary form must reproduce the above copyright
     18    1.1        is  *    notice, this list of conditions and the following disclaimer in the
     19    1.1        is  *    documentation and/or other materials provided with the distribution.
     20    1.1        is  *
     21   1.30        is  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     22   1.30        is  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     23   1.30        is  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     24   1.30        is  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     25   1.30        is  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     26   1.30        is  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     27   1.30        is  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     28   1.30        is  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     29   1.30        is  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     30   1.30        is  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     31   1.30        is  * POSSIBILITY OF SUCH DAMAGE.
     32   1.27        is  */
     33   1.27        is 
     34   1.27        is /*
     35   1.27        is  * Supported hardware:
     36   1.27        is  *
     37   1.27        is  * - Intel EtherExpress Pro/10.
     38   1.27        is  * - possibly other boards using the i82595 chip and no special tweaks.
     39    1.1        is  */
     40   1.56     lukem 
     41   1.56     lukem #include <sys/cdefs.h>
     42  1.103  riastrad __KERNEL_RCSID(0, "$NetBSD: if_iy.c,v 1.103 2018/09/03 16:29:31 riastradh Exp $");
     43    1.1        is 
     44   1.22  jonathan #include "opt_inet.h"
     45    1.1        is 
     46    1.1        is #include <sys/param.h>
     47    1.1        is #include <sys/systm.h>
     48    1.1        is #include <sys/mbuf.h>
     49    1.1        is #include <sys/buf.h>
     50    1.1        is #include <sys/protosw.h>
     51    1.1        is #include <sys/socket.h>
     52    1.1        is #include <sys/ioctl.h>
     53    1.1        is #include <sys/errno.h>
     54    1.1        is #include <sys/syslog.h>
     55    1.1        is #include <sys/device.h>
     56   1.41        is #include <sys/endian.h>
     57   1.94  riastrad #include <sys/rndsource.h>
     58    1.1        is 
     59    1.1        is #include <net/if.h>
     60    1.1        is #include <net/if_types.h>
     61    1.1        is #include <net/if_dl.h>
     62  1.101   msaitoh #include <net/bpf.h>
     63   1.10        is 
     64   1.10        is #include <net/if_ether.h>
     65    1.1        is 
     66    1.1        is #ifdef INET
     67    1.1        is #include <netinet/in.h>
     68    1.1        is #include <netinet/in_systm.h>
     69    1.1        is #include <netinet/in_var.h>
     70    1.1        is #include <netinet/ip.h>
     71   1.10        is #include <netinet/if_inarp.h>
     72    1.1        is #endif
     73    1.1        is 
     74    1.1        is 
     75   1.18    bouyer #if defined(SIOCSIFMEDIA)
     76   1.18    bouyer #include <net/if_media.h>
     77   1.18    bouyer #endif
     78    1.1        is 
     79   1.78        ad #include <sys/cpu.h>
     80   1.78        ad #include <sys/bus.h>
     81   1.78        ad #include <sys/intr.h>
     82    1.1        is 
     83    1.1        is #include <dev/isa/isareg.h>
     84    1.1        is #include <dev/isa/isavar.h>
     85    1.1        is #include <dev/ic/i82595reg.h>
     86    1.1        is 
     87   1.41        is /* XXX why isn't this centralized? */
     88   1.41        is #ifndef __BUS_SPACE_HAS_STREAM_METHODS
     89   1.41        is #define bus_space_write_stream_2	bus_space_write_2
     90   1.41        is #define bus_space_write_multi_stream_2	bus_space_write_multi_2
     91   1.41        is #define bus_space_read_stream_2		bus_space_read_2
     92   1.41        is #define bus_space_read_multi_stream_2	bus_space_read_multi_2
     93   1.41        is #endif /* __BUS_SPACE_HAS_STREAM_METHODS */
     94   1.41        is 
     95    1.1        is /*
     96    1.1        is  * Ethernet status, per interface.
     97    1.1        is  */
     98    1.1        is struct iy_softc {
     99   1.91       chs 	device_t sc_dev;
    100    1.1        is 	void *sc_ih;
    101    1.1        is 
    102    1.9   thorpej 	bus_space_tag_t sc_iot;
    103    1.9   thorpej 	bus_space_handle_t sc_ioh;
    104    1.6        is 
    105   1.10        is 	struct ethercom sc_ethercom;
    106    1.1        is 
    107   1.18    bouyer 	struct ifmedia iy_ifmedia;
    108   1.18    bouyer 	int iy_media;
    109   1.18    bouyer 
    110    1.1        is 	int mappedirq;
    111    1.1        is 
    112    1.1        is 	int hard_vers;
    113    1.1        is 
    114    1.1        is 	int promisc;
    115    1.1        is 
    116    1.1        is 	int sram, tx_size, rx_size;
    117    1.1        is 
    118    1.1        is 	int tx_start, tx_end, tx_last;
    119    1.1        is 	int rx_start;
    120    1.1        is 
    121   1.26        is 	int doing_mc_setup;
    122    1.1        is #ifdef IYDEBUG
    123    1.1        is 	int sc_debug;
    124    1.1        is #endif
    125   1.14  explorer 
    126   1.89       tls 	krndsource_t rnd_source;
    127    1.1        is };
    128    1.1        is 
    129   1.66     perry void iywatchdog(struct ifnet *);
    130   1.75  christos int iyioctl(struct ifnet *, u_long, void *);
    131   1.66     perry int iyintr(void *);
    132   1.66     perry void iyinit(struct iy_softc *);
    133   1.66     perry void iystop(struct iy_softc *);
    134   1.66     perry void iystart(struct ifnet *);
    135   1.66     perry 
    136   1.66     perry void iy_intr_rx(struct iy_softc *);
    137   1.66     perry void iy_intr_tx(struct iy_softc *);
    138   1.66     perry 
    139   1.66     perry void iyreset(struct iy_softc *);
    140   1.66     perry void iy_readframe(struct iy_softc *, int);
    141   1.66     perry void iy_drop_packet_buffer(struct iy_softc *);
    142   1.66     perry void iy_find_mem_size(struct iy_softc *);
    143   1.66     perry void iyrint(struct iy_softc *);
    144   1.66     perry void iytint(struct iy_softc *);
    145   1.66     perry void iyxmit(struct iy_softc *);
    146   1.66     perry static void iy_mc_setup(struct iy_softc *);
    147   1.66     perry static void iy_mc_reset(struct iy_softc *);
    148   1.66     perry void iyget(struct iy_softc *, bus_space_tag_t, bus_space_handle_t, int);
    149   1.66     perry void iyprobemem(struct iy_softc *);
    150   1.70     perry static inline void eepromwritebit(bus_space_tag_t, bus_space_handle_t, int);
    151   1.70     perry static inline int eepromreadbit(bus_space_tag_t, bus_space_handle_t);
    152   1.26        is 
    153    1.1        is #ifdef IYDEBUGX
    154   1.66     perry void print_rbd(volatile struct iy_recv_buf_desc *);
    155    1.1        is 
    156    1.1        is int in_ifrint = 0;
    157    1.1        is int in_iftint = 0;
    158    1.1        is #endif
    159    1.1        is 
    160   1.66     perry int iy_mediachange(struct ifnet *);
    161   1.66     perry void iy_mediastatus(struct ifnet *, struct ifmediareq *);
    162   1.18    bouyer 
    163   1.86    cegger int iyprobe(device_t, cfdata_t, void *);
    164   1.86    cegger void iyattach(device_t, device_t, void *);
    165    1.1        is 
    166   1.66     perry static u_int16_t eepromread(bus_space_tag_t, bus_space_handle_t, int);
    167   1.10        is 
    168   1.66     perry static int eepromreadall(bus_space_tag_t, bus_space_handle_t, u_int16_t *,
    169   1.66     perry     int);
    170    1.1        is 
    171   1.91       chs CFATTACH_DECL_NEW(iy, sizeof(struct iy_softc),
    172   1.61   thorpej     iyprobe, iyattach, NULL, NULL);
    173    1.1        is 
    174    1.1        is static u_int8_t eepro_irqmap[] = EEPP_INTMAP;
    175    1.1        is static u_int8_t eepro_revirqmap[] = EEPP_RINTMAP;
    176    1.1        is 
    177    1.1        is int
    178   1.86    cegger iyprobe(device_t parent, cfdata_t match, void *aux)
    179    1.1        is {
    180    1.1        is 	struct isa_attach_args *ia = aux;
    181    1.1        is 	u_int16_t eaddr[8];
    182    1.9   thorpej 	bus_space_tag_t iot;
    183    1.9   thorpej 	bus_space_handle_t ioh;
    184   1.57   thorpej 	u_int8_t c, d;
    185   1.57   thorpej 	int irq;
    186   1.57   thorpej 
    187   1.57   thorpej 	if (ia->ia_nio < 1)
    188   1.57   thorpej 		return (0);
    189   1.57   thorpej 	if (ia->ia_nirq < 1)
    190   1.57   thorpej 		return (0);
    191    1.6        is 
    192   1.57   thorpej 	if (ISA_DIRECT_CONFIG(ia))
    193   1.57   thorpej 		return (0);
    194    1.1        is 
    195    1.9   thorpej 	iot = ia->ia_iot;
    196   1.15  drochner 
    197   1.64  drochner 	if (ia->ia_io[0].ir_addr == ISA_UNKNOWN_PORT)
    198   1.15  drochner 		return 0;
    199   1.15  drochner 
    200   1.57   thorpej 	if (bus_space_map(iot, ia->ia_io[0].ir_addr, 16, 0, &ioh))
    201   1.10        is 		return 0;
    202    1.1        is 
    203    1.1        is 	/* try to find the round robin sig: */
    204    1.1        is 
    205    1.9   thorpej 	c = bus_space_read_1(iot, ioh, ID_REG);
    206   1.10        is 	if ((c & ID_REG_MASK) != ID_REG_SIG)
    207    1.6        is 		goto out;
    208    1.1        is 
    209    1.9   thorpej 	d = bus_space_read_1(iot, ioh, ID_REG);
    210   1.10        is 	if ((d & ID_REG_MASK) != ID_REG_SIG)
    211    1.6        is 		goto out;
    212    1.1        is 
    213    1.1        is 	if (((d-c) & R_ROBIN_BITS) != 0x40)
    214    1.6        is 		goto out;
    215   1.67     perry 
    216    1.9   thorpej 	d = bus_space_read_1(iot, ioh, ID_REG);
    217   1.10        is 	if ((d & ID_REG_MASK) != ID_REG_SIG)
    218    1.6        is 		goto out;
    219    1.1        is 
    220    1.1        is 	if (((d-c) & R_ROBIN_BITS) != 0x80)
    221    1.6        is 		goto out;
    222   1.67     perry 
    223    1.9   thorpej 	d = bus_space_read_1(iot, ioh, ID_REG);
    224   1.10        is 	if ((d & ID_REG_MASK) != ID_REG_SIG)
    225    1.6        is 		goto out;
    226    1.1        is 
    227    1.1        is 	if (((d-c) & R_ROBIN_BITS) != 0xC0)
    228    1.6        is 		goto out;
    229   1.67     perry 
    230    1.9   thorpej 	d = bus_space_read_1(iot, ioh, ID_REG);
    231   1.10        is 	if ((d & ID_REG_MASK) != ID_REG_SIG)
    232    1.6        is 		goto out;
    233    1.1        is 
    234    1.1        is 	if (((d-c) & R_ROBIN_BITS) != 0x00)
    235    1.6        is 		goto out;
    236   1.67     perry 
    237    1.1        is #ifdef IYDEBUG
    238   1.10        is 		printf("iyprobe verified working ID reg.\n");
    239    1.1        is #endif
    240   1.67     perry 
    241   1.10        is 	if (eepromreadall(iot, ioh, eaddr, 8))
    242   1.10        is 		goto out;
    243   1.67     perry 
    244   1.64  drochner 	if (ia->ia_irq[0].ir_irq == ISA_UNKNOWN_IRQ)
    245   1.57   thorpej 		irq = eepro_irqmap[eaddr[EEPPW1] & EEPP_Int];
    246   1.57   thorpej 	else
    247   1.57   thorpej 		irq = ia->ia_irq[0].ir_irq;
    248    1.1        is 
    249   1.57   thorpej 	if (irq >= sizeof(eepro_revirqmap))
    250    1.6        is 		goto out;
    251    1.1        is 
    252   1.57   thorpej 	if (eepro_revirqmap[irq] == 0xff)
    253    1.6        is 		goto out;
    254    1.1        is 
    255    1.1        is 	/* now lets reset the chip */
    256   1.67     perry 
    257    1.9   thorpej 	bus_space_write_1(iot, ioh, COMMAND_REG, RESET_CMD);
    258    1.1        is 	delay(200);
    259   1.67     perry 
    260   1.57   thorpej 	ia->ia_nio = 1;
    261   1.57   thorpej 	ia->ia_io[0].ir_size = 16;
    262   1.57   thorpej 
    263   1.57   thorpej 	ia->ia_nirq = 1;
    264   1.57   thorpej 	ia->ia_irq[0].ir_irq = irq;
    265   1.57   thorpej 
    266   1.57   thorpej 	ia->ia_niomem = 0;
    267   1.57   thorpej 	ia->ia_ndrq = 0;
    268    1.6        is 
    269   1.10        is 	bus_space_unmap(iot, ioh, 16);
    270    1.1        is 	return 1;		/* found */
    271    1.6        is out:
    272    1.9   thorpej 	bus_space_unmap(iot, ioh, 16);
    273    1.6        is 	return 0;
    274    1.1        is }
    275    1.1        is 
    276    1.1        is void
    277   1.86    cegger iyattach(device_t parent, device_t self, void *aux)
    278    1.1        is {
    279   1.91       chs 	struct iy_softc *sc = device_private(self);
    280    1.1        is 	struct isa_attach_args *ia = aux;
    281   1.10        is 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
    282    1.9   thorpej 	bus_space_tag_t iot;
    283    1.9   thorpej 	bus_space_handle_t ioh;
    284   1.10        is 	unsigned temp;
    285   1.10        is 	u_int16_t eaddr[8];
    286   1.10        is 	u_int8_t myaddr[ETHER_ADDR_LEN];
    287   1.10        is 	int eirq;
    288    1.6        is 
    289   1.10        is 	iot = ia->ia_iot;
    290   1.67     perry 
    291   1.57   thorpej 	if (bus_space_map(iot, ia->ia_io[0].ir_addr, 16, 0, &ioh)) {
    292   1.97   msaitoh 		aprint_error(": can't map i/o space\n");
    293   1.16   thorpej 		return;
    294   1.16   thorpej 	}
    295   1.10        is 
    296   1.10        is 	sc->sc_iot = iot;
    297   1.10        is 	sc->sc_ioh = ioh;
    298   1.10        is 
    299   1.57   thorpej 	sc->mappedirq = eepro_revirqmap[ia->ia_irq[0].ir_irq];
    300   1.10        is 
    301   1.10        is 	/* now let's reset the chip */
    302   1.67     perry 
    303   1.10        is 	bus_space_write_1(iot, ioh, COMMAND_REG, RESET_CMD);
    304   1.10        is 	delay(200);
    305   1.67     perry 
    306   1.10        is 	iyprobemem(sc);
    307    1.1        is 
    308   1.91       chs 	strlcpy(ifp->if_xname, device_xname(sc->sc_dev), IFNAMSIZ);
    309    1.2   thorpej 	ifp->if_softc = sc;
    310    1.1        is 	ifp->if_start = iystart;
    311   1.26        is 	ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_NOTRAILERS
    312   1.26        is 	    | IFF_MULTICAST;
    313   1.26        is 
    314   1.26        is 	sc->doing_mc_setup = 0;
    315    1.1        is 
    316    1.1        is 	ifp->if_ioctl = iyioctl;
    317    1.1        is 	ifp->if_watchdog = iywatchdog;
    318    1.1        is 
    319   1.45   thorpej 	IFQ_SET_READY(&ifp->if_snd);
    320   1.45   thorpej 
    321   1.10        is 	(void)eepromreadall(iot, ioh, eaddr, 8);
    322   1.10        is 	sc->hard_vers = eaddr[EEPW6] & EEPP_BoardRev;
    323   1.10        is 
    324   1.10        is #ifdef DIAGNOSTICS
    325   1.67     perry 	if ((eaddr[EEPPEther0] !=
    326   1.10        is 	     eepromread(iot, ioh, EEPPEther0a)) &&
    327   1.67     perry 	    (eaddr[EEPPEther1] !=
    328   1.10        is 	     eepromread(iot, ioh, EEPPEther1a)) &&
    329   1.67     perry 	    (eaddr[EEPPEther2] !=
    330   1.10        is 	     eepromread(iot, ioh, EEPPEther2a)))
    331   1.10        is 
    332   1.97   msaitoh 		aprint_error("EEPROM Ethernet address differs from copy\n");
    333   1.10        is #endif
    334   1.10        is 
    335   1.10        is         myaddr[1] = eaddr[EEPPEther0] & 0xFF;
    336   1.10        is         myaddr[0] = eaddr[EEPPEther0] >> 8;
    337   1.10        is         myaddr[3] = eaddr[EEPPEther1] & 0xFF;
    338   1.10        is         myaddr[2] = eaddr[EEPPEther1] >> 8;
    339   1.10        is         myaddr[5] = eaddr[EEPPEther2] & 0xFF;
    340   1.10        is         myaddr[4] = eaddr[EEPPEther2] >> 8;
    341   1.67     perry 
    342   1.18    bouyer 	ifmedia_init(&sc->iy_ifmedia, 0, iy_mediachange, iy_mediastatus);
    343   1.18    bouyer 	ifmedia_add(&sc->iy_ifmedia, IFM_ETHER | IFM_10_2, 0, NULL);
    344   1.18    bouyer 	ifmedia_add(&sc->iy_ifmedia, IFM_ETHER | IFM_10_5, 0, NULL);
    345   1.18    bouyer 	ifmedia_add(&sc->iy_ifmedia, IFM_ETHER | IFM_10_T, 0, NULL);
    346   1.18    bouyer 	ifmedia_add(&sc->iy_ifmedia, IFM_ETHER | IFM_AUTO, 0, NULL);
    347   1.18    bouyer 	ifmedia_set(&sc->iy_ifmedia, IFM_ETHER | IFM_AUTO);
    348    1.1        is 	/* Attach the interface. */
    349    1.1        is 	if_attach(ifp);
    350   1.10        is 	ether_ifattach(ifp, myaddr);
    351   1.97   msaitoh 	aprint_normal(": address %s, rev. %d, %d kB\n",
    352   1.10        is 	    ether_sprintf(myaddr),
    353    1.1        is 	    sc->hard_vers, sc->sram/1024);
    354   1.10        is 
    355   1.10        is 	eirq = eepro_irqmap[eaddr[EEPPW1] & EEPP_Int];
    356   1.57   thorpej 	if (eirq != ia->ia_irq[0].ir_irq)
    357   1.97   msaitoh 		aprint_error("%s: EEPROM irq setting %d ignored\n",
    358   1.91       chs 		    device_xname(sc->sc_dev), eirq);
    359    1.1        is 
    360   1.57   thorpej 	sc->sc_ih = isa_intr_establish(ia->ia_ic, ia->ia_irq[0].ir_irq,
    361   1.57   thorpej 	    IST_EDGE, IPL_NET, iyintr, sc);
    362   1.10        is 
    363   1.91       chs 	rnd_attach_source(&sc->rnd_source, device_xname(sc->sc_dev),
    364   1.93       tls 			  RND_TYPE_NET, RND_FLAG_DEFAULT);
    365   1.14  explorer 
    366   1.10        is 	temp = bus_space_read_1(iot, ioh, INT_NO_REG);
    367   1.10        is 	bus_space_write_1(iot, ioh, INT_NO_REG, (temp & 0xf8) | sc->mappedirq);
    368    1.1        is }
    369    1.1        is 
    370    1.1        is void
    371   1.84       dsl iystop(struct iy_softc *sc)
    372    1.1        is {
    373    1.9   thorpej 	bus_space_tag_t iot;
    374    1.9   thorpej 	bus_space_handle_t ioh;
    375    1.1        is #ifdef IYDEBUG
    376    1.1        is 	u_int p, v;
    377    1.1        is #endif
    378    1.1        is 
    379    1.9   thorpej 	iot = sc->sc_iot;
    380    1.6        is 	ioh = sc->sc_ioh;
    381   1.67     perry 
    382    1.9   thorpej 	bus_space_write_1(iot, ioh, COMMAND_REG, RCV_DISABLE_CMD);
    383    1.1        is 
    384    1.9   thorpej 	bus_space_write_1(iot, ioh, INT_MASK_REG, ALL_INTS);
    385    1.9   thorpej 	bus_space_write_1(iot, ioh, STATUS_REG, ALL_INTS);
    386    1.1        is 
    387    1.9   thorpej 	bus_space_write_1(iot, ioh, COMMAND_REG, RESET_CMD);
    388    1.1        is 	delay(200);
    389   1.67     perry #ifdef IYDEBUG
    390   1.67     perry 	printf("%s: dumping tx chain (st 0x%x end 0x%x last 0x%x)\n",
    391   1.97   msaitoh 	    device_xname(sc->sc_dev), sc->tx_start, sc->tx_end, sc->tx_last);
    392    1.1        is 	p = sc->tx_last;
    393    1.1        is 	if (!p)
    394    1.1        is 		p = sc->tx_start;
    395    1.1        is 	do {
    396   1.42        tv 		char sbuf[128];
    397   1.42        tv 
    398    1.9   thorpej 		bus_space_write_2(iot, ioh, HOST_ADDR_REG, p);
    399   1.42        tv 
    400   1.41        is 		v = le16toh(bus_space_read_stream_2(iot, ioh, MEM_PORT_REG));
    401   1.82  christos 		snprintb(sbuf, sizeof(sbuf), "\020\006Ab\010Dn", v);
    402   1.42        tv 		printf("0x%04x: %s ", p, sbuf);
    403   1.42        tv 
    404   1.41        is 		v = le16toh(bus_space_read_stream_2(iot, ioh, MEM_PORT_REG));
    405   1.97   msaitoh 		snprintb(sbuf, sizeof(sbuf),
    406   1.82  christos 		    "\020\6MAX_COL\7HRT_BEAT\010TX_DEF\011UND_RUN"
    407   1.82  christos 		    "\012JERR\013LST_CRS\014LTCOL\016TX_OK\020COLL", v);
    408  1.100   msaitoh 		printf("%s", sbuf);
    409   1.42        tv 
    410   1.41        is 		p = le16toh(bus_space_read_stream_2(iot, ioh, MEM_PORT_REG));
    411    1.8  christos 		printf(" 0x%04x", p);
    412   1.42        tv 
    413   1.41        is 		v = le16toh(bus_space_read_stream_2(iot, ioh, MEM_PORT_REG));
    414   1.82  christos 		snprintb(sbuf, sizeof(sbuf), "\020\020Ch", v);
    415  1.100   msaitoh 		printf(" %s\n", sbuf);
    416   1.42        tv 
    417    1.1        is 	} while (v & 0x8000);
    418    1.1        is #endif
    419    1.1        is 	sc->tx_start = sc->tx_end = sc->rx_size;
    420    1.1        is 	sc->tx_last = 0;
    421   1.10        is 	sc->sc_ethercom.ec_if.if_flags &= ~(IFF_RUNNING|IFF_OACTIVE);
    422    1.1        is }
    423    1.1        is 
    424    1.1        is void
    425   1.84       dsl iyreset(struct iy_softc *sc)
    426    1.1        is {
    427    1.1        is 	int s;
    428   1.29   mycroft 	s = splnet();
    429    1.1        is 	iystop(sc);
    430    1.1        is 	iyinit(sc);
    431    1.1        is 	splx(s);
    432    1.1        is }
    433    1.1        is 
    434    1.1        is void
    435   1.84       dsl iyinit(struct iy_softc *sc)
    436    1.1        is {
    437    1.1        is 	int i;
    438    1.1        is 	unsigned temp;
    439    1.1        is 	struct ifnet *ifp;
    440    1.9   thorpej 	bus_space_tag_t iot;
    441    1.9   thorpej 	bus_space_handle_t ioh;
    442    1.6        is 
    443    1.9   thorpej 	iot = sc->sc_iot;
    444    1.6        is 	ioh = sc->sc_ioh;
    445    1.1        is 
    446   1.10        is 	ifp = &sc->sc_ethercom.ec_if;
    447    1.1        is #ifdef IYDEBUG
    448    1.8  christos 	printf("ifp is %p\n", ifp);
    449    1.1        is #endif
    450    1.1        is 
    451    1.9   thorpej 	bus_space_write_1(iot, ioh, 0, BANK_SEL(2));
    452    1.1        is 
    453    1.9   thorpej 	temp = bus_space_read_1(iot, ioh, EEPROM_REG);
    454    1.1        is 	if (temp & 0x10)
    455    1.9   thorpej 		bus_space_write_1(iot, ioh, EEPROM_REG, temp & ~0x10);
    456   1.67     perry 
    457    1.1        is 	for (i=0; i<6; ++i) {
    458   1.76    dyoung 		bus_space_write_1(iot, ioh, I_ADD(i), CLLADDR(ifp->if_sadl)[i]);
    459    1.1        is 	}
    460    1.1        is 
    461    1.9   thorpej 	temp = bus_space_read_1(iot, ioh, REG1);
    462   1.10        is 	bus_space_write_1(iot, ioh, REG1,
    463   1.49        is 	    temp | /* XMT_CHAIN_INT | XMT_CHAIN_ERRSTOP | */ RCV_DISCARD_BAD);
    464   1.67     perry 
    465   1.25        is 	if (ifp->if_flags & (IFF_PROMISC|IFF_ALLMULTI)) {
    466   1.25        is 		temp = MATCH_ALL;
    467   1.67     perry 	} else
    468   1.51        is 		temp = MATCH_BRDCST;
    469   1.25        is 
    470   1.25        is 	bus_space_write_1(iot, ioh, RECV_MODES_REG, temp);
    471   1.26        is 
    472    1.1        is #ifdef IYDEBUG
    473   1.42        tv 	{
    474   1.42        tv 		char sbuf[128];
    475   1.42        tv 
    476   1.97   msaitoh 		snprintb(sbuf, sizeof(sbuf),
    477   1.82  christos 		    "\020\1PRMSC\2NOBRDST\3SEECRC\4LENGTH\5NOSaIns\6MultiIA",
    478   1.82  christos 		    temp);
    479   1.97   msaitoh 
    480   1.97   msaitoh 		printf("%s: RECV_MODES set to %s\n", device_xname(sc->sc_dev),
    481   1.97   msaitoh 		    sbuf);
    482   1.42        tv 	}
    483    1.1        is #endif
    484   1.26        is 	/* XXX VOODOO */
    485   1.26        is 	temp = bus_space_read_1(iot, ioh, MEDIA_SELECT);
    486   1.26        is 	bus_space_write_1(iot, ioh, MEDIA_SELECT, temp);
    487   1.26        is 	/* XXX END OF VOODOO */
    488    1.1        is 
    489    1.1        is 
    490   1.10        is 	delay(500000); /* for the hardware to test for the connector */
    491    1.1        is 
    492    1.9   thorpej 	temp = bus_space_read_1(iot, ioh, MEDIA_SELECT);
    493    1.1        is #ifdef IYDEBUG
    494   1.42        tv 	{
    495   1.42        tv 		char sbuf[128];
    496   1.42        tv 
    497   1.82  christos 		snprintb(sbuf, sizeof(sbuf),
    498   1.83    cegger 		    "\020\1LnkInDis\2PolCor\3TPE\4JabberDis\5NoAport\6BNC",
    499   1.83    cegger 		    temp);
    500  1.100   msaitoh 		printf("%s: media select was %s ", device_xname(sc->sc_dev),
    501   1.97   msaitoh 		    sbuf);
    502   1.42        tv 	}
    503    1.1        is #endif
    504    1.5        is 	temp = (temp & TEST_MODE_MASK);
    505   1.67     perry 
    506   1.18    bouyer 	switch(IFM_SUBTYPE(sc->iy_ifmedia.ifm_media)) {
    507   1.18    bouyer 	case IFM_10_5:
    508    1.6        is 		temp &= ~ (BNC_BIT | TPE_BIT);
    509    1.6        is 		break;
    510    1.5        is 
    511   1.18    bouyer 	case IFM_10_2:
    512   1.10        is 		temp = (temp & ~TPE_BIT) | BNC_BIT;
    513    1.6        is 		break;
    514   1.67     perry 
    515   1.18    bouyer 	case IFM_10_T:
    516   1.10        is 		temp = (temp & ~BNC_BIT) | TPE_BIT;
    517    1.6        is 		break;
    518    1.5        is 	default:
    519   1.53     lukem 		;
    520    1.6        is 		/* nothing; leave as it is */
    521    1.5        is 	}
    522   1.18    bouyer 	switch (temp & (BNC_BIT | TPE_BIT)) {
    523   1.18    bouyer 	case BNC_BIT:
    524   1.18    bouyer 		sc->iy_media = IFM_ETHER | IFM_10_2;
    525   1.18    bouyer 		break;
    526   1.18    bouyer 	case TPE_BIT:
    527   1.18    bouyer 		sc->iy_media = IFM_ETHER | IFM_10_T;
    528   1.18    bouyer 		break;
    529   1.18    bouyer 	default:
    530   1.18    bouyer 		sc->iy_media = IFM_ETHER | IFM_10_5;
    531   1.18    bouyer 	}
    532    1.6        is 
    533    1.9   thorpej 	bus_space_write_1(iot, ioh, MEDIA_SELECT, temp);
    534    1.1        is #ifdef IYDEBUG
    535   1.42        tv 	{
    536   1.42        tv 		char sbuf[128];
    537   1.42        tv 
    538   1.82  christos 		snprintb(sbuf, sizeof(sbuf),
    539   1.82  christos 		    "\020\1LnkInDis\2PolCor\3TPE\4JabberDis\5NoAport\6BNC",
    540   1.82  christos 		    temp);
    541  1.100   msaitoh 		printf("changed to %s\n", sbuf);
    542   1.42        tv 	}
    543    1.1        is #endif
    544    1.1        is 
    545   1.10        is 	bus_space_write_1(iot, ioh, 0, BANK_SEL(0));
    546   1.10        is 	bus_space_write_1(iot, ioh, INT_MASK_REG, ALL_INTS);
    547    1.9   thorpej 	bus_space_write_1(iot, ioh, 0, BANK_SEL(1));
    548    1.1        is 
    549    1.9   thorpej 	temp = bus_space_read_1(iot, ioh, INT_NO_REG);
    550    1.9   thorpej 	bus_space_write_1(iot, ioh, INT_NO_REG, (temp & 0xf8) | sc->mappedirq);
    551    1.1        is 
    552    1.1        is #ifdef IYDEBUG
    553   1.42        tv 	{
    554   1.42        tv 		char sbuf[128];
    555   1.42        tv 
    556   1.82  christos 		snprintb(sbuf, sizeof(sbuf),
    557   1.82  christos 		    "\020\4bad_irq\010flash/boot present", temp);
    558   1.97   msaitoh 
    559   1.91       chs 		printf("%s: int no was %s\n", device_xname(sc->sc_dev), sbuf);
    560   1.42        tv 
    561   1.42        tv 		temp = bus_space_read_1(iot, ioh, INT_NO_REG);
    562   1.82  christos 		snprintb(sbuf, sizeof(sbuf),
    563   1.82  christos 		    "\020\4bad_irq\010flash/boot present", temp);
    564   1.91       chs 		printf("%s: int no now %s\n", device_xname(sc->sc_dev), sbuf);
    565   1.42        tv 	}
    566    1.1        is #endif
    567    1.1        is 
    568    1.9   thorpej 	bus_space_write_1(iot, ioh, RCV_LOWER_LIMIT_REG, 0);
    569   1.48        is 	bus_space_write_1(iot, ioh, RCV_UPPER_LIMIT_REG, (sc->rx_size -2) >>8);
    570   1.48        is 	bus_space_write_1(iot, ioh, XMT_LOWER_LIMIT_REG, sc->rx_size >>8);
    571   1.48        is 	bus_space_write_1(iot, ioh, XMT_UPPER_LIMIT_REG, (sc->sram - 2) >>8);
    572    1.1        is 
    573    1.9   thorpej 	temp = bus_space_read_1(iot, ioh, REG1);
    574    1.1        is #ifdef IYDEBUG
    575   1.42        tv 	{
    576   1.42        tv 		char sbuf[128];
    577   1.42        tv 
    578   1.82  christos 		snprintb(sbuf, sizeof(sbuf), "\020\2WORD_WIDTH\010INT_ENABLE",
    579   1.82  christos 		    temp);
    580   1.97   msaitoh 
    581   1.91       chs 		printf("%s: HW access is %s\n", device_xname(sc->sc_dev), sbuf);
    582   1.42        tv 	}
    583    1.1        is #endif
    584    1.9   thorpej 	bus_space_write_1(iot, ioh, REG1, temp | INT_ENABLE); /* XXX what about WORD_WIDTH? */
    585    1.1        is 
    586    1.1        is #ifdef IYDEBUG
    587   1.42        tv 	{
    588   1.42        tv 		char sbuf[128];
    589   1.42        tv 
    590   1.42        tv 		temp = bus_space_read_1(iot, ioh, REG1);
    591   1.82  christos 		snprintb(sbuf, sizeof(sbuf), "\020\2WORD_WIDTH\010INT_ENABLE",
    592   1.82  christos 		    temp);
    593   1.91       chs 		printf("%s: HW access is %s\n", device_xname(sc->sc_dev), sbuf);
    594   1.42        tv 	}
    595    1.1        is #endif
    596    1.1        is 
    597    1.9   thorpej 	bus_space_write_1(iot, ioh, 0, BANK_SEL(0));
    598    1.1        is 
    599    1.9   thorpej 	bus_space_write_1(iot, ioh, INT_MASK_REG, ALL_INTS & ~(RX_BIT|TX_BIT));
    600    1.9   thorpej 	bus_space_write_1(iot, ioh, STATUS_REG, ALL_INTS); /* clear ints */
    601    1.1        is 
    602   1.50        is 	bus_space_write_1(iot, ioh, RCV_COPY_THRESHOLD, 0);
    603   1.50        is 
    604    1.9   thorpej 	bus_space_write_2(iot, ioh, RCV_START_LOW, 0);
    605    1.9   thorpej 	bus_space_write_2(iot, ioh, RCV_STOP_LOW,  sc->rx_size - 2);
    606    1.1        is 	sc->rx_start = 0;
    607    1.1        is 
    608    1.9   thorpej 	bus_space_write_1(iot, ioh, 0, SEL_RESET_CMD);
    609   1.10        is 	delay(200);
    610    1.1        is 
    611    1.9   thorpej 	bus_space_write_2(iot, ioh, XMT_ADDR_REG, sc->rx_size);
    612    1.1        is 
    613    1.1        is 	sc->tx_start = sc->tx_end = sc->rx_size;
    614    1.1        is 	sc->tx_last = 0;
    615    1.1        is 
    616    1.9   thorpej 	bus_space_write_1(iot, ioh, 0, RCV_ENABLE_CMD);
    617    1.1        is 
    618    1.1        is 	ifp->if_flags |= IFF_RUNNING;
    619    1.1        is 	ifp->if_flags &= ~IFF_OACTIVE;
    620    1.1        is }
    621    1.1        is 
    622    1.1        is void
    623   1.84       dsl iystart(struct ifnet *ifp)
    624    1.1        is {
    625    1.1        is 	struct iy_softc *sc;
    626    1.6        is 
    627    1.1        is 
    628    1.1        is 	struct mbuf *m0, *m;
    629    1.1        is 	u_int len, pad, last, end;
    630    1.1        is 	u_int llen, residual;
    631    1.1        is 	int avail;
    632   1.75  christos 	char *data;
    633   1.52        is 	unsigned temp;
    634    1.1        is 	u_int16_t resval, stat;
    635    1.9   thorpej 	bus_space_tag_t iot;
    636    1.9   thorpej 	bus_space_handle_t ioh;
    637    1.1        is 
    638    1.1        is #ifdef IYDEBUG
    639    1.8  christos 	printf("iystart called\n");
    640    1.1        is #endif
    641   1.26        is 	sc = ifp->if_softc;
    642   1.26        is 
    643    1.1        is 	if ((ifp->if_flags & (IFF_RUNNING | IFF_OACTIVE)) != IFF_RUNNING)
    644    1.1        is                 return;
    645    1.1        is 
    646   1.52        is 	iy_intr_tx(sc);
    647   1.52        is 
    648    1.9   thorpej 	iot = sc->sc_iot;
    649    1.6        is 	ioh = sc->sc_ioh;
    650    1.1        is 
    651   1.45   thorpej 	for (;;) {
    652   1.45   thorpej 		IFQ_POLL(&ifp->if_snd, m0);
    653   1.45   thorpej 		if (m0 == NULL)
    654   1.45   thorpej 			break;
    655    1.1        is #ifdef IYDEBUG
    656    1.8  christos 		printf("%s: trying to write another packet to the hardware\n",
    657   1.91       chs 		    device_xname(sc->sc_dev));
    658    1.1        is #endif
    659    1.1        is 
    660    1.1        is 		/* We need to use m->m_pkthdr.len, so require the header */
    661    1.1        is 		if ((m0->m_flags & M_PKTHDR) == 0)
    662    1.1        is 			panic("iystart: no header mbuf");
    663    1.1        is 
    664    1.1        is 		len = m0->m_pkthdr.len;
    665    1.1        is 		pad = len & 1;
    666    1.1        is 
    667    1.1        is #ifdef IYDEBUG
    668   1.91       chs 		printf("%s: length is %d.\n", device_xname(sc->sc_dev), len);
    669    1.1        is #endif
    670   1.35   thorpej 		if (len < (ETHER_MIN_LEN - ETHER_CRC_LEN)) {
    671   1.35   thorpej 			pad = ETHER_MIN_LEN - ETHER_CRC_LEN - len;
    672    1.1        is 		}
    673    1.1        is 
    674    1.1        is         	if (len + pad > ETHER_MAX_LEN) {
    675    1.1        is         	        /* packet is obviously too large: toss it */
    676    1.1        is         	        ++ifp->if_oerrors;
    677   1.58    itojun         	        IFQ_DEQUEUE(&ifp->if_snd, m0);
    678    1.1        is         	        m_freem(m0);
    679    1.1        is 			continue;
    680    1.1        is         	}
    681    1.1        is 
    682  1.102   msaitoh 		bpf_mtap(ifp, m0, BPF_D_OUT);
    683    1.1        is 
    684    1.1        is 		avail = sc->tx_start - sc->tx_end;
    685    1.1        is 		if (avail <= 0)
    686    1.1        is 			avail += sc->tx_size;
    687    1.1        is 
    688    1.1        is #ifdef IYDEBUG
    689   1.91       chs 		printf("%s: avail is %d.\n", device_xname(sc->sc_dev), avail);
    690    1.1        is #endif
    691   1.67     perry 		/*
    692   1.67     perry 		 * we MUST RUN at splnet here  ---
    693   1.67     perry 		 * XXX todo: or even turn off the boards ints ??? hm...
    694    1.1        is 		 */
    695   1.67     perry 
    696    1.1        is        		/* See if there is room to put another packet in the buffer. */
    697   1.67     perry 
    698    1.1        is 		if ((len+pad+2*I595_XMT_HDRLEN) > avail) {
    699   1.20        is #ifdef IYDEBUG
    700    1.8  christos 			printf("%s: len = %d, avail = %d, setting OACTIVE\n",
    701   1.91       chs 			    device_xname(sc->sc_dev), len, avail);
    702   1.20        is #endif
    703   1.52        is 			/* mark interface as full ... */
    704    1.1        is 			ifp->if_flags |= IFF_OACTIVE;
    705   1.52        is 
    706   1.52        is 			/* and wait for any transmission result */
    707   1.52        is 			bus_space_write_1(iot, ioh, 0, BANK_SEL(2));
    708   1.52        is 
    709   1.52        is 			temp = bus_space_read_1(iot, ioh, REG1);
    710   1.52        is 			bus_space_write_1(iot, ioh, REG1,
    711   1.52        is 	    			temp & ~XMT_CHAIN_INT);
    712   1.52        is 
    713   1.52        is 			bus_space_write_1(iot, ioh, 0, BANK_SEL(0));
    714   1.52        is 
    715    1.1        is 			return;
    716    1.1        is 		}
    717   1.67     perry 
    718    1.1        is 		/* we know it fits in the hardware now, so dequeue it */
    719   1.45   thorpej 		IFQ_DEQUEUE(&ifp->if_snd, m0);
    720   1.67     perry 
    721    1.1        is 		last = sc->tx_end;
    722   1.67     perry 		end = last + pad + len + I595_XMT_HDRLEN;
    723   1.67     perry 
    724    1.1        is 		if (end >= sc->sram) {
    725    1.1        is 			if ((sc->sram - last) <= I595_XMT_HDRLEN) {
    726    1.1        is 				/* keep header in one piece */
    727    1.1        is 				last = sc->rx_size;
    728    1.1        is 				end = last + pad + len + I595_XMT_HDRLEN;
    729    1.1        is 			} else
    730    1.1        is 				end -= sc->tx_size;
    731    1.1        is 		}
    732    1.1        is 
    733    1.9   thorpej 		bus_space_write_2(iot, ioh, HOST_ADDR_REG, last);
    734   1.41        is 		bus_space_write_stream_2(iot, ioh, MEM_PORT_REG,
    735   1.41        is 			htole16(XMT_CMD));
    736   1.41        is 
    737    1.9   thorpej 		bus_space_write_2(iot, ioh, MEM_PORT_REG, 0);
    738    1.9   thorpej 		bus_space_write_2(iot, ioh, MEM_PORT_REG, 0);
    739   1.41        is 
    740   1.67     perry 		bus_space_write_stream_2(iot, ioh, MEM_PORT_REG,
    741   1.41        is 			htole16(len + pad));
    742    1.1        is 
    743    1.1        is 		residual = resval = 0;
    744    1.1        is 
    745    1.1        is 		while ((m = m0)!=0) {
    746   1.75  christos 			data = mtod(m, void *);
    747    1.1        is 			llen = m->m_len;
    748    1.1        is 			if (residual) {
    749    1.1        is #ifdef IYDEBUG
    750    1.8  christos 				printf("%s: merging residual with next mbuf.\n",
    751   1.91       chs 				    device_xname(sc->sc_dev));
    752    1.1        is #endif
    753    1.1        is 				resval |= *data << 8;
    754   1.41        is 				bus_space_write_stream_2(iot, ioh,
    755   1.41        is 					MEM_PORT_REG, resval);
    756    1.1        is 				--llen;
    757    1.1        is 				++data;
    758    1.1        is 			}
    759   1.65   thorpej 			/*
    760   1.65   thorpej 			 * XXX ALIGNMENT LOSSAGE HERE.
    761   1.65   thorpej 			 */
    762    1.1        is 			if (llen > 1)
    763   1.41        is 				bus_space_write_multi_stream_2(iot, ioh,
    764   1.65   thorpej 					MEM_PORT_REG, (u_int16_t *) data,
    765   1.65   thorpej 					llen>>1);
    766    1.1        is 			residual = llen & 1;
    767    1.1        is 			if (residual) {
    768    1.1        is 				resval = *(data + llen - 1);
    769    1.1        is #ifdef IYDEBUG
    770    1.8  christos 				printf("%s: got odd mbuf to send.\n",
    771   1.91       chs 				    device_xname(sc->sc_dev));
    772    1.1        is #endif
    773    1.1        is 			}
    774    1.1        is 
    775   1.98  christos 			m0 = m_free(m);
    776    1.1        is 		}
    777    1.1        is 
    778    1.1        is 		if (residual)
    779   1.41        is 			bus_space_write_stream_2(iot, ioh, MEM_PORT_REG,
    780   1.41        is 				resval);
    781    1.1        is 
    782    1.1        is 		pad >>= 1;
    783    1.1        is 		while (pad-- > 0)
    784   1.41        is 			bus_space_write_stream_2(iot, ioh, MEM_PORT_REG, 0);
    785   1.67     perry 
    786    1.1        is #ifdef IYDEBUG
    787    1.8  christos 		printf("%s: new last = 0x%x, end = 0x%x.\n",
    788   1.91       chs 		    device_xname(sc->sc_dev), last, end);
    789    1.8  christos 		printf("%s: old start = 0x%x, end = 0x%x, last = 0x%x\n",
    790   1.97   msaitoh 		    device_xname(sc->sc_dev), sc->tx_start, sc->tx_end,
    791   1.97   msaitoh 		    sc->tx_last);
    792    1.1        is #endif
    793    1.1        is 
    794    1.1        is 		if (sc->tx_start != sc->tx_end) {
    795   1.41        is 			bus_space_write_2(iot, ioh, HOST_ADDR_REG,
    796   1.41        is 				sc->tx_last + XMT_COUNT);
    797    1.1        is 
    798   1.41        is 			/*
    799   1.41        is 			 * XXX We keep stat in le order, to potentially save
    800   1.41        is 			 * a byte swap.
    801   1.41        is 			 */
    802   1.41        is 			stat = bus_space_read_stream_2(iot, ioh, MEM_PORT_REG);
    803   1.41        is 
    804   1.41        is 			bus_space_write_2(iot, ioh, HOST_ADDR_REG,
    805   1.41        is 				sc->tx_last + XMT_CHAIN);
    806   1.41        is 
    807   1.41        is 			bus_space_write_stream_2(iot, ioh, MEM_PORT_REG,
    808   1.41        is 				htole16(last));
    809   1.41        is 
    810   1.41        is 			bus_space_write_stream_2(iot, ioh, MEM_PORT_REG,
    811   1.41        is 				stat | htole16(CHAIN));
    812    1.1        is #ifdef IYDEBUG
    813    1.8  christos 			printf("%s: setting 0x%x to 0x%x\n",
    814   1.91       chs 			    device_xname(sc->sc_dev), sc->tx_last + XMT_COUNT,
    815   1.41        is 			    le16toh(stat) | CHAIN);
    816    1.1        is #endif
    817    1.1        is 		}
    818    1.9   thorpej 		stat = bus_space_read_2(iot, ioh, MEM_PORT_REG); /* dummy read */
    819    1.1        is 
    820    1.1        is 		/* XXX todo: enable ints here if disabled */
    821   1.67     perry 
    822    1.1        is 		++ifp->if_opackets;
    823    1.1        is 
    824    1.1        is 		if (sc->tx_start == sc->tx_end) {
    825    1.9   thorpej 			bus_space_write_2(iot, ioh, XMT_ADDR_REG, last);
    826    1.9   thorpej 			bus_space_write_1(iot, ioh, 0, XMT_CMD);
    827    1.1        is 			sc->tx_start = last;
    828    1.1        is #ifdef IYDEBUG
    829    1.8  christos 			printf("%s: writing 0x%x to XAR and giving XCMD\n",
    830   1.91       chs 			    device_xname(sc->sc_dev), last);
    831    1.1        is #endif
    832    1.1        is 		} else {
    833    1.9   thorpej 			bus_space_write_1(iot, ioh, 0, RESUME_XMT_CMD);
    834    1.1        is #ifdef IYDEBUG
    835    1.8  christos 			printf("%s: giving RESUME_XCMD\n",
    836   1.91       chs 			    device_xname(sc->sc_dev));
    837    1.1        is #endif
    838    1.1        is 		}
    839    1.1        is 		sc->tx_last = last;
    840    1.1        is 		sc->tx_end = end;
    841    1.1        is 	}
    842   1.52        is 	/* and wait only for end of transmission chain */
    843   1.52        is 	bus_space_write_1(iot, ioh, 0, BANK_SEL(2));
    844   1.52        is 
    845   1.52        is 	temp = bus_space_read_1(iot, ioh, REG1);
    846   1.52        is 	bus_space_write_1(iot, ioh, REG1, temp | XMT_CHAIN_INT);
    847   1.52        is 
    848   1.52        is 	bus_space_write_1(iot, ioh, 0, BANK_SEL(0));
    849    1.1        is }
    850    1.1        is 
    851    1.1        is 
    852   1.70     perry static inline void
    853   1.84       dsl eepromwritebit(bus_space_tag_t iot, bus_space_handle_t ioh, int what)
    854    1.1        is {
    855   1.10        is 	bus_space_write_1(iot, ioh, EEPROM_REG, what);
    856    1.1        is 	delay(1);
    857   1.10        is 	bus_space_write_1(iot, ioh, EEPROM_REG, what|EESK);
    858    1.1        is 	delay(1);
    859   1.10        is 	bus_space_write_1(iot, ioh, EEPROM_REG, what);
    860    1.1        is 	delay(1);
    861    1.1        is }
    862    1.1        is 
    863   1.70     perry static inline int
    864   1.84       dsl eepromreadbit(bus_space_tag_t iot, bus_space_handle_t ioh)
    865    1.1        is {
    866   1.67     perry 	int b;
    867    1.1        is 
    868   1.67     perry 	bus_space_write_1(iot, ioh, EEPROM_REG, EECS|EESK);
    869    1.1        is 	delay(1);
    870   1.10        is 	b = bus_space_read_1(iot, ioh, EEPROM_REG);
    871   1.10        is 	bus_space_write_1(iot, ioh, EEPROM_REG, EECS);
    872    1.1        is 	delay(1);
    873    1.1        is 
    874    1.1        is 	return ((b & EEDO) != 0);
    875    1.1        is }
    876    1.1        is 
    877    1.1        is static u_int16_t
    878   1.84       dsl eepromread(bus_space_tag_t iot, bus_space_handle_t ioh, int offset)
    879    1.1        is {
    880    1.1        is 	volatile int i;
    881    1.1        is 	volatile int j;
    882    1.1        is 	volatile u_int16_t readval;
    883    1.1        is 
    884    1.9   thorpej 	bus_space_write_1(iot, ioh, 0, BANK_SEL(2));
    885    1.1        is 	delay(1);
    886   1.10        is 	bus_space_write_1(iot, ioh, EEPROM_REG, EECS); /* XXXX??? */
    887    1.1        is 	delay(1);
    888   1.67     perry 
    889   1.10        is 	eepromwritebit(iot, ioh, EECS|EEDI);
    890   1.10        is 	eepromwritebit(iot, ioh, EECS|EEDI);
    891   1.10        is 	eepromwritebit(iot, ioh, EECS);
    892   1.67     perry 
    893    1.1        is 	for (j=5; j>=0; --j) {
    894   1.67     perry 		if ((offset>>j) & 1)
    895   1.10        is 			eepromwritebit(iot, ioh, EECS|EEDI);
    896    1.1        is 		else
    897   1.10        is 			eepromwritebit(iot, ioh, EECS);
    898    1.1        is 	}
    899    1.1        is 
    900    1.1        is 	for (readval=0, i=0; i<16; ++i) {
    901    1.1        is 		readval<<=1;
    902   1.10        is 		readval |= eepromreadbit(iot, ioh);
    903    1.1        is 	}
    904    1.1        is 
    905   1.10        is 	bus_space_write_1(iot, ioh, EEPROM_REG, 0|EESK);
    906    1.1        is 	delay(1);
    907   1.10        is 	bus_space_write_1(iot, ioh, EEPROM_REG, 0);
    908    1.1        is 
    909   1.10        is 	bus_space_write_1(iot, ioh, COMMAND_REG, BANK_SEL(0));
    910    1.1        is 
    911    1.1        is 	return readval;
    912    1.1        is }
    913    1.1        is 
    914    1.1        is /*
    915    1.1        is  * Device timeout/watchdog routine.  Entered if the device neglects to generate
    916    1.1        is  * an interrupt after a transmit has been started on it.
    917    1.1        is  */
    918    1.1        is void
    919   1.84       dsl iywatchdog(struct ifnet *ifp)
    920    1.1        is {
    921    1.2   thorpej 	struct iy_softc *sc = ifp->if_softc;
    922    1.1        is 
    923   1.91       chs 	log(LOG_ERR, "%s: device timeout\n", device_xname(sc->sc_dev));
    924   1.10        is 	++sc->sc_ethercom.ec_if.if_oerrors;
    925    1.1        is 	iyreset(sc);
    926    1.1        is }
    927    1.1        is 
    928    1.1        is /*
    929    1.1        is  * What to do upon receipt of an interrupt.
    930    1.1        is  */
    931    1.1        is int
    932   1.84       dsl iyintr(void *arg)
    933    1.1        is {
    934   1.52        is 	struct iy_softc *sc;
    935   1.52        is 	struct ifnet *ifp;
    936    1.9   thorpej 	bus_space_tag_t iot;
    937    1.9   thorpej 	bus_space_handle_t ioh;
    938    1.6        is 
    939   1.36  augustss 	u_short status;
    940    1.1        is 
    941   1.52        is 	sc = arg;
    942    1.9   thorpej 	iot = sc->sc_iot;
    943    1.6        is 	ioh = sc->sc_ioh;
    944    1.6        is 
    945   1.52        is 	ifp = &sc->sc_ethercom.ec_if;
    946   1.52        is 
    947    1.9   thorpej 	status = bus_space_read_1(iot, ioh, STATUS_REG);
    948    1.1        is #ifdef IYDEBUG
    949    1.1        is 	if (status & ALL_INTS) {
    950   1.42        tv 		char sbuf[128];
    951   1.42        tv 
    952   1.82  christos 		snprintb(sbuf, sizeof(sbuf), "\020\1RX_STP\2RX\3TX\4EXEC",
    953   1.82  christos 		    status);
    954   1.91       chs 		printf("%s: got interrupt %s", device_xname(sc->sc_dev), sbuf);
    955   1.42        tv 
    956   1.42        tv 		if (status & EXEC_INT) {
    957   1.97   msaitoh 			snprintb(sbuf, sizeof(sbuf),
    958   1.82  christos 			     "\020\6ABORT", bus_space_read_1(iot, ioh, 0));
    959   1.42        tv 			printf(" event %s\n", sbuf);
    960   1.42        tv 		} else
    961    1.8  christos 			printf("\n");
    962    1.1        is 	}
    963    1.1        is #endif
    964   1.26        is 	if ((status & (RX_INT | TX_INT)) == 0)
    965    1.1        is 		return 0;
    966    1.1        is 
    967    1.1        is 	if (status & RX_INT) {
    968    1.1        is 		iy_intr_rx(sc);
    969    1.9   thorpej 		bus_space_write_1(iot, ioh, STATUS_REG, RX_INT);
    970   1.26        is 	}
    971   1.26        is 	if (status & TX_INT) {
    972   1.52        is 		/* Tell feeders we may be able to accept more data... */
    973   1.52        is 		ifp->if_flags &= ~IFF_OACTIVE;
    974   1.52        is 		/* and get more data. */
    975   1.52        is 		iystart(ifp);
    976    1.9   thorpej 		bus_space_write_1(iot, ioh, STATUS_REG, TX_INT);
    977    1.1        is 	}
    978   1.14  explorer 
    979   1.14  explorer 	rnd_add_uint32(&sc->rnd_source, status);
    980   1.14  explorer 
    981    1.1        is 	return 1;
    982    1.1        is }
    983    1.1        is 
    984    1.1        is void
    985   1.97   msaitoh iyget(struct iy_softc *sc, bus_space_tag_t iot, bus_space_handle_t ioh,
    986   1.97   msaitoh     int rxlen)
    987    1.1        is {
    988    1.1        is 	struct mbuf *m, *top, **mp;
    989    1.1        is 	struct ifnet *ifp;
    990    1.1        is 	int len;
    991    1.1        is 
    992   1.10        is 	ifp = &sc->sc_ethercom.ec_if;
    993    1.1        is 
    994   1.13   mycroft 	MGETHDR(m, M_DONTWAIT, MT_DATA);
    995   1.13   mycroft 	if (m == 0)
    996   1.13   mycroft 		goto dropped;
    997   1.96     ozaki 	m_set_rcvif(m, ifp);
    998    1.1        is 	m->m_pkthdr.len = rxlen;
    999    1.1        is 	len = MHLEN;
   1000    1.1        is 	top = 0;
   1001    1.1        is 	mp = &top;
   1002    1.1        is 
   1003    1.1        is 	while (rxlen > 0) {
   1004    1.1        is 		if (top) {
   1005   1.13   mycroft 			MGET(m, M_DONTWAIT, MT_DATA);
   1006    1.1        is 			if (m == 0) {
   1007   1.13   mycroft 				m_freem(top);
   1008   1.13   mycroft 				goto dropped;
   1009    1.1        is 			}
   1010    1.1        is 			len = MLEN;
   1011    1.1        is 		}
   1012    1.1        is 		if (rxlen >= MINCLSIZE) {
   1013    1.1        is 			MCLGET(m, M_DONTWAIT);
   1014   1.12   mycroft 			if ((m->m_flags & M_EXT) == 0) {
   1015   1.13   mycroft 				m_free(m);
   1016   1.11   mycroft 				m_freem(top);
   1017   1.11   mycroft 				goto dropped;
   1018   1.11   mycroft 			}
   1019   1.11   mycroft 			len = MCLBYTES;
   1020    1.1        is 		}
   1021  1.103  riastrad 		len = uimin(rxlen, len);
   1022   1.65   thorpej 		/*
   1023   1.65   thorpej 		 * XXX ALIGNMENT LOSSAGE HERE.
   1024   1.65   thorpej 		 */
   1025    1.1        is 		if (len > 1) {
   1026    1.1        is 			len &= ~1;
   1027    1.6        is 
   1028   1.67     perry 			bus_space_read_multi_stream_2(iot, ioh, MEM_PORT_REG,
   1029   1.65   thorpej 			    mtod(m, u_int16_t *), len/2);
   1030    1.1        is 		} else {
   1031    1.1        is #ifdef IYDEBUG
   1032   1.97   msaitoh 			printf("%s: received odd mbuf\n",
   1033   1.97   msaitoh 			    device_xname(sc->sc_dev));
   1034    1.1        is #endif
   1035   1.75  christos 			*(mtod(m, char *)) = bus_space_read_stream_2(iot, ioh,
   1036    1.6        is 			    MEM_PORT_REG);
   1037    1.1        is 		}
   1038    1.1        is 		m->m_len = len;
   1039    1.1        is 		rxlen -= len;
   1040    1.1        is 		*mp = m;
   1041    1.1        is 		mp = &m->m_next;
   1042    1.1        is 	}
   1043   1.71  christos 
   1044   1.71  christos 	if (top == NULL)
   1045   1.71  christos 		return;
   1046   1.71  christos 
   1047   1.95     ozaki 	if_percpuq_enqueue(ifp->if_percpuq, top);
   1048    1.1        is 	return;
   1049    1.1        is 
   1050    1.1        is dropped:
   1051    1.1        is 	++ifp->if_ierrors;
   1052    1.1        is 	return;
   1053    1.1        is }
   1054   1.26        is 
   1055    1.1        is void
   1056   1.84       dsl iy_intr_rx(struct iy_softc *sc)
   1057    1.1        is {
   1058    1.9   thorpej 	bus_space_tag_t iot;
   1059    1.9   thorpej 	bus_space_handle_t ioh;
   1060    1.6        is 
   1061    1.1        is 	u_int rxadrs, rxevnt, rxstatus, rxnext, rxlen;
   1062    1.1        is 
   1063    1.9   thorpej 	iot = sc->sc_iot;
   1064    1.6        is 	ioh = sc->sc_ioh;
   1065    1.1        is 
   1066    1.1        is 	rxadrs = sc->rx_start;
   1067    1.9   thorpej 	bus_space_write_2(iot, ioh, HOST_ADDR_REG, rxadrs);
   1068   1.41        is 	rxevnt = le16toh(bus_space_read_stream_2(iot, ioh, MEM_PORT_REG));
   1069    1.1        is 	rxnext = 0;
   1070   1.67     perry 
   1071    1.1        is 	while (rxevnt == RCV_DONE) {
   1072   1.41        is 		rxstatus = le16toh(bus_space_read_stream_2(iot, ioh,
   1073   1.41        is 				MEM_PORT_REG));
   1074   1.41        is 		rxnext = le16toh(bus_space_read_stream_2(iot, ioh,
   1075   1.41        is 				MEM_PORT_REG));
   1076   1.41        is 		rxlen = le16toh(bus_space_read_stream_2(iot, ioh,
   1077   1.41        is 				MEM_PORT_REG));
   1078    1.1        is #ifdef IYDEBUG
   1079   1.42        tv 		{
   1080   1.42        tv 			char sbuf[128];
   1081   1.42        tv 
   1082   1.82  christos 			snprintb(sbuf, sizeof(sbuf),
   1083   1.82  christos 			    "\020\1RCLD\2IA_MCH\010SHORT\011OVRN\013ALGERR"
   1084   1.82  christos 			    "\014CRCERR\015LENERR\016RCVOK\020TYP", rxstatus);
   1085   1.82  christos 
   1086   1.42        tv 			printf("%s: pck at 0x%04x stat %s next 0x%x len 0x%x\n",
   1087   1.97   msaitoh 			    device_xname(sc->sc_dev), rxadrs, sbuf, rxnext,
   1088   1.97   msaitoh 			    rxlen);
   1089   1.42        tv 		}
   1090   1.92  christos #else
   1091   1.92  christos 		__USE(rxstatus);
   1092    1.1        is #endif
   1093    1.9   thorpej 		iyget(sc, iot, ioh, rxlen);
   1094    1.1        is 
   1095    1.1        is 		/* move stop address */
   1096    1.9   thorpej 		bus_space_write_2(iot, ioh, RCV_STOP_LOW,
   1097    1.1        is 			    rxnext == 0 ? sc->rx_size - 2 : rxnext - 2);
   1098    1.1        is 
   1099    1.9   thorpej 		bus_space_write_2(iot, ioh, HOST_ADDR_REG, rxnext);
   1100    1.1        is 		rxadrs = rxnext;
   1101   1.41        is 		rxevnt = le16toh(bus_space_read_stream_2(iot, ioh,
   1102   1.41        is 				MEM_PORT_REG));
   1103    1.1        is 	}
   1104    1.1        is 	sc->rx_start = rxnext;
   1105    1.1        is }
   1106    1.1        is 
   1107    1.1        is void
   1108   1.84       dsl iy_intr_tx(struct iy_softc *sc)
   1109    1.1        is {
   1110    1.9   thorpej 	bus_space_tag_t iot;
   1111    1.9   thorpej 	bus_space_handle_t ioh;
   1112    1.1        is 	struct ifnet *ifp;
   1113    1.1        is 	u_int txstatus, txstat2, txlen, txnext;
   1114    1.1        is 
   1115   1.10        is 	ifp = &sc->sc_ethercom.ec_if;
   1116    1.9   thorpej 	iot = sc->sc_iot;
   1117    1.6        is 	ioh = sc->sc_ioh;
   1118    1.6        is 
   1119    1.1        is 	while (sc->tx_start != sc->tx_end) {
   1120    1.9   thorpej 		bus_space_write_2(iot, ioh, HOST_ADDR_REG, sc->tx_start);
   1121   1.41        is 		txstatus = le16toh(bus_space_read_stream_2(iot, ioh,
   1122   1.41        is 			MEM_PORT_REG));
   1123   1.41        is 
   1124    1.1        is 		if ((txstatus & (TX_DONE|CMD_MASK)) != (TX_DONE|XMT_CMD))
   1125    1.1        is 			break;
   1126    1.1        is 
   1127   1.41        is 		txstat2 = le16toh(bus_space_read_stream_2(iot, ioh,
   1128   1.41        is 				MEM_PORT_REG));
   1129   1.41        is 		txnext = le16toh(bus_space_read_stream_2(iot, ioh,
   1130   1.41        is 				MEM_PORT_REG));
   1131   1.41        is 		txlen = le16toh(bus_space_read_stream_2(iot, ioh,
   1132   1.41        is 				MEM_PORT_REG));
   1133    1.1        is #ifdef IYDEBUG
   1134   1.42        tv 		{
   1135   1.42        tv 			char sbuf[128];
   1136   1.42        tv 
   1137   1.82  christos 			snprintb(sbuf, sizeof(sbuf),
   1138   1.82  christos 			    "\020\6MAX_COL\7HRT_BEAT\010TX_DEF"
   1139   1.82  christos 			    "\011UND_RUN\012JERR\013LST_CRS"
   1140   1.83    cegger 			    "\014LTCOL\016TX_OK\020COLL", txstat2);
   1141   1.82  christos 
   1142  1.100   msaitoh 			printf("txstat 0x%x stat2 %s next 0x%x len 0x%x\n",
   1143   1.42        tv 			       txstatus, sbuf, txnext, txlen);
   1144   1.42        tv 		}
   1145    1.1        is #endif
   1146    1.1        is 		if (txlen & CHAIN)
   1147    1.1        is 			sc->tx_start = txnext;
   1148    1.1        is 		else
   1149    1.1        is 			sc->tx_start = sc->tx_end;
   1150    1.1        is 		ifp->if_flags &= ~IFF_OACTIVE;
   1151   1.67     perry 
   1152   1.47        is 		if (txstat2 & 0x0020)
   1153   1.47        is 			ifp->if_collisions += 16;
   1154   1.47        is 		else
   1155   1.47        is 			ifp->if_collisions += txstat2 & 0x000f;
   1156   1.47        is 
   1157   1.49        is 		if ((txstat2 & 0x2000) == 0)
   1158    1.1        is 			++ifp->if_oerrors;
   1159    1.1        is 	}
   1160    1.1        is }
   1161    1.1        is 
   1162    1.1        is int
   1163   1.81    dyoung iyioctl(struct ifnet *ifp, u_long cmd, void *data)
   1164    1.1        is {
   1165    1.1        is 	struct iy_softc *sc;
   1166    1.1        is 	struct ifaddr *ifa;
   1167    1.1        is 	struct ifreq *ifr;
   1168    1.1        is 	int s, error = 0;
   1169    1.1        is 
   1170    1.2   thorpej 	sc = ifp->if_softc;
   1171    1.1        is 	ifa = (struct ifaddr *)data;
   1172    1.1        is 	ifr = (struct ifreq *)data;
   1173    1.1        is 
   1174    1.1        is #ifdef IYDEBUG
   1175   1.68  christos 	printf("iyioctl called with ifp %p (%s) cmd 0x%lx data %p\n",
   1176    1.2   thorpej 	    ifp, ifp->if_xname, cmd, data);
   1177    1.1        is #endif
   1178    1.1        is 
   1179   1.29   mycroft 	s = splnet();
   1180    1.1        is 
   1181    1.1        is 	switch (cmd) {
   1182    1.1        is 
   1183   1.81    dyoung 	case SIOCINITIFADDR:
   1184    1.1        is 		ifp->if_flags |= IFF_UP;
   1185    1.1        is 
   1186   1.81    dyoung 		iyinit(sc);
   1187    1.1        is 		switch (ifa->ifa_addr->sa_family) {
   1188    1.1        is #ifdef INET
   1189    1.1        is 		case AF_INET:
   1190   1.10        is 			arp_ifinit(ifp, ifa);
   1191    1.1        is 			break;
   1192    1.1        is #endif
   1193    1.1        is 		default:
   1194    1.1        is 			break;
   1195    1.1        is 		}
   1196    1.1        is 		break;
   1197    1.1        is 
   1198    1.1        is 	case SIOCSIFFLAGS:
   1199   1.81    dyoung 		if ((error = ifioctl_common(ifp, cmd, data)) != 0)
   1200   1.81    dyoung 			break;
   1201    1.1        is 		sc->promisc = ifp->if_flags & (IFF_PROMISC | IFF_ALLMULTI);
   1202   1.81    dyoung 		/* XXX re-use ether_ioctl() */
   1203   1.81    dyoung 		switch (ifp->if_flags & (IFF_UP|IFF_RUNNING)) {
   1204   1.81    dyoung 		case IFF_RUNNING:
   1205    1.1        is 			/*
   1206    1.1        is 			 * If interface is marked down and it is running, then
   1207    1.1        is 			 * stop it.
   1208    1.1        is 			 */
   1209    1.1        is 			iystop(sc);
   1210    1.1        is 			ifp->if_flags &= ~IFF_RUNNING;
   1211   1.81    dyoung 			break;
   1212   1.81    dyoung 		case IFF_UP:
   1213    1.1        is 			/*
   1214    1.1        is 			 * If interface is marked up and it is stopped, then
   1215    1.1        is 			 * start it.
   1216    1.1        is 			 */
   1217    1.1        is 			iyinit(sc);
   1218   1.81    dyoung 			break;
   1219   1.81    dyoung 		default:
   1220    1.1        is 			/*
   1221    1.1        is 			 * Reset the interface to pick up changes in any other
   1222    1.1        is 			 * flags that affect hardware registers.
   1223    1.1        is 			 */
   1224    1.1        is 			iystop(sc);
   1225    1.1        is 			iyinit(sc);
   1226   1.81    dyoung 			break;
   1227    1.1        is 		}
   1228    1.1        is #ifdef IYDEBUGX
   1229    1.1        is 		if (ifp->if_flags & IFF_DEBUG)
   1230    1.1        is 			sc->sc_debug = IFY_ALL;
   1231    1.1        is 		else
   1232    1.1        is 			sc->sc_debug = 0;
   1233    1.1        is #endif
   1234    1.1        is 		break;
   1235    1.1        is 
   1236    1.1        is 	case SIOCADDMULTI:
   1237    1.1        is 	case SIOCDELMULTI:
   1238   1.77    dyoung 		if ((error = ether_ioctl(ifp, cmd, data)) == ENETRESET) {
   1239    1.1        is 			/*
   1240    1.1        is 			 * Multicast list has changed; set the hardware filter
   1241    1.1        is 			 * accordingly.
   1242    1.1        is 			 */
   1243   1.65   thorpej 			if (ifp->if_flags & IFF_RUNNING) {
   1244   1.65   thorpej 				/* XXX can't make it work otherwise */
   1245   1.65   thorpej 				iyreset(sc);
   1246   1.65   thorpej 				iy_mc_reset(sc);
   1247   1.65   thorpej 			}
   1248    1.1        is 			error = 0;
   1249    1.1        is 		}
   1250    1.1        is 		break;
   1251   1.28       rvb 
   1252   1.18    bouyer 	case SIOCSIFMEDIA:
   1253   1.18    bouyer 	case SIOCGIFMEDIA:
   1254   1.18    bouyer 		error = ifmedia_ioctl(ifp, ifr, &sc->iy_ifmedia, cmd);
   1255   1.18    bouyer 		break;
   1256    1.1        is 	default:
   1257   1.81    dyoung 		error = ether_ioctl(ifp, cmd, data);
   1258    1.1        is 	}
   1259    1.1        is 	splx(s);
   1260    1.1        is 	return error;
   1261   1.18    bouyer }
   1262   1.18    bouyer 
   1263   1.18    bouyer int
   1264   1.84       dsl iy_mediachange(struct ifnet *ifp)
   1265   1.18    bouyer {
   1266   1.18    bouyer 	struct iy_softc *sc = ifp->if_softc;
   1267   1.18    bouyer 
   1268   1.18    bouyer 	if (IFM_TYPE(sc->iy_ifmedia.ifm_media) != IFM_ETHER)
   1269   1.18    bouyer 	    return EINVAL;
   1270   1.18    bouyer 	switch(IFM_SUBTYPE(sc->iy_ifmedia.ifm_media)) {
   1271   1.18    bouyer 	case IFM_10_5:
   1272   1.18    bouyer 	case IFM_10_2:
   1273   1.18    bouyer 	case IFM_10_T:
   1274   1.18    bouyer 	case IFM_AUTO:
   1275   1.18    bouyer 	    iystop(sc);
   1276   1.18    bouyer 	    iyinit(sc);
   1277   1.18    bouyer 	    return 0;
   1278   1.18    bouyer 	default:
   1279   1.18    bouyer 	    return EINVAL;
   1280   1.18    bouyer 	}
   1281   1.18    bouyer }
   1282   1.18    bouyer 
   1283   1.18    bouyer void
   1284   1.84       dsl iy_mediastatus(struct ifnet *ifp, struct ifmediareq *ifmr)
   1285   1.18    bouyer {
   1286   1.18    bouyer 	struct iy_softc *sc = ifp->if_softc;
   1287   1.18    bouyer 
   1288   1.18    bouyer 	ifmr->ifm_active = sc->iy_media;
   1289   1.18    bouyer 	ifmr->ifm_status = IFM_AVALID | IFM_ACTIVE;
   1290    1.1        is }
   1291    1.1        is 
   1292   1.26        is 
   1293   1.26        is static void
   1294   1.84       dsl iy_mc_setup(struct iy_softc *sc)
   1295   1.26        is {
   1296   1.26        is 	struct ether_multi *enm;
   1297   1.26        is 	struct ether_multistep step;
   1298   1.26        is 	struct ethercom *ecp;
   1299   1.26        is 	struct ifnet *ifp;
   1300   1.26        is 	bus_space_tag_t iot;
   1301   1.26        is 	bus_space_handle_t ioh;
   1302   1.26        is 	int avail, last /*, end*/ , len;
   1303   1.26        is 	int timeout;
   1304   1.40        is 	volatile u_int16_t dum;
   1305   1.26        is 	u_int8_t temp;
   1306   1.67     perry 
   1307   1.26        is 
   1308   1.26        is 	ecp = &sc->sc_ethercom;
   1309   1.26        is 	ifp = &ecp->ec_if;
   1310   1.26        is 
   1311   1.26        is 	iot = sc->sc_iot;
   1312   1.26        is 	ioh = sc->sc_ioh;
   1313   1.26        is 
   1314   1.50        is 	len = 6 * ecp->ec_multicnt;
   1315   1.67     perry 
   1316   1.26        is 	avail = sc->tx_start - sc->tx_end;
   1317   1.26        is 	if (avail <= 0)
   1318   1.26        is 		avail += sc->tx_size;
   1319   1.37        is 	if (ifp->if_flags & IFF_DEBUG)
   1320   1.37        is 		printf("%s: iy_mc_setup called, %d addresses, "
   1321   1.67     perry 		    "%d/%d bytes needed/avail\n", ifp->if_xname,
   1322   1.37        is 		    ecp->ec_multicnt, len + I595_XMT_HDRLEN, avail);
   1323   1.26        is 
   1324   1.26        is 	last = sc->rx_size;
   1325   1.26        is 
   1326   1.26        is 	bus_space_write_1(iot, ioh, 0, BANK_SEL(2));
   1327   1.51        is 	bus_space_write_1(iot, ioh, RECV_MODES_REG, MATCH_BRDCST);
   1328   1.26        is 	/* XXX VOODOO */
   1329   1.26        is 	temp = bus_space_read_1(iot, ioh, MEDIA_SELECT);
   1330   1.26        is 	bus_space_write_1(iot, ioh, MEDIA_SELECT, temp);
   1331   1.26        is 	/* XXX END OF VOODOO */
   1332   1.26        is 	bus_space_write_1(iot, ioh, 0, BANK_SEL(0));
   1333   1.26        is 	bus_space_write_2(iot, ioh, HOST_ADDR_REG, last);
   1334   1.41        is 	bus_space_write_stream_2(iot, ioh, MEM_PORT_REG, htole16(MC_SETUP_CMD));
   1335   1.26        is 	bus_space_write_2(iot, ioh, MEM_PORT_REG, 0);
   1336   1.26        is 	bus_space_write_2(iot, ioh, MEM_PORT_REG, 0);
   1337   1.41        is 	bus_space_write_stream_2(iot, ioh, MEM_PORT_REG, htole16(len));
   1338   1.67     perry 
   1339   1.26        is 	ETHER_FIRST_MULTI(step, ecp, enm);
   1340   1.26        is 	while(enm) {
   1341   1.65   thorpej 		/*
   1342   1.65   thorpej 		 * XXX ALIGNMENT LOSSAGE HERE?
   1343   1.65   thorpej 		 */
   1344   1.41        is 		bus_space_write_multi_stream_2(iot, ioh, MEM_PORT_REG,
   1345   1.65   thorpej 		    (u_int16_t *) enm->enm_addrlo, 3);
   1346   1.26        is 
   1347   1.26        is 		ETHER_NEXT_MULTI(step, enm);
   1348   1.26        is 	}
   1349   1.40        is 	dum = bus_space_read_2(iot, ioh, MEM_PORT_REG); /* dummy read */
   1350   1.92  christos 	__USE(dum);
   1351   1.26        is 	bus_space_write_2(iot, ioh, XMT_ADDR_REG, last);
   1352   1.26        is 	bus_space_write_1(iot, ioh, 0, MC_SETUP_CMD);
   1353   1.67     perry 
   1354   1.26        is 
   1355   1.26        is 	sc->tx_start =  sc->rx_size;
   1356   1.26        is 	sc->tx_end = sc->rx_size + I595_XMT_HDRLEN + len;
   1357   1.26        is 
   1358   1.26        is 	for (timeout=0; timeout<100; timeout++) {
   1359   1.26        is 		DELAY(2);
   1360   1.26        is 		if ((bus_space_read_1(iot, ioh, STATUS_REG) & EXEC_INT) == 0)
   1361   1.26        is 			continue;
   1362   1.26        is 
   1363   1.26        is 		temp = bus_space_read_1(iot, ioh, 0);
   1364   1.26        is 		bus_space_write_1(iot, ioh, STATUS_REG, EXEC_INT);
   1365   1.26        is #ifdef DIAGNOSTIC
   1366   1.26        is 		if (temp & 0x20) {
   1367   1.97   msaitoh 			aprint_error_dev(sc->sc_dev,
   1368   1.97   msaitoh 			    "mc setup failed, %d usec\n", timeout * 2);
   1369   1.37        is 		} else if (((temp & 0x0f) == 0x03) &&
   1370   1.37        is 			    (ifp->if_flags & IFF_DEBUG)) {
   1371   1.26        is 				printf("%s: mc setup done, %d usec\n",
   1372   1.91       chs 			    device_xname(sc->sc_dev), timeout * 2);
   1373   1.26        is 		}
   1374   1.26        is #endif
   1375   1.26        is 		break;
   1376   1.26        is 	}
   1377   1.26        is 	sc->tx_start = sc->tx_end;
   1378   1.38        is 	ifp->if_flags &= ~IFF_OACTIVE;
   1379   1.67     perry 
   1380   1.26        is }
   1381   1.26        is 
   1382    1.1        is static void
   1383   1.84       dsl iy_mc_reset(struct iy_softc *sc)
   1384    1.1        is {
   1385    1.1        is 	struct ether_multi *enm;
   1386    1.1        is 	struct ether_multistep step;
   1387   1.25        is 	struct ethercom *ecp;
   1388   1.25        is 	struct ifnet *ifp;
   1389   1.26        is 	bus_space_tag_t iot;
   1390   1.26        is 	bus_space_handle_t ioh;
   1391   1.26        is 	u_int16_t temp;
   1392   1.25        is 
   1393   1.25        is 	ecp = &sc->sc_ethercom;
   1394   1.25        is 	ifp = &ecp->ec_if;
   1395    1.1        is 
   1396   1.26        is 	iot = sc->sc_iot;
   1397   1.26        is 	ioh = sc->sc_ioh;
   1398   1.26        is 
   1399   1.25        is 	if (ecp->ec_multicnt > 63) {
   1400   1.26        is 		ifp->if_flags |= IFF_ALLMULTI;
   1401   1.25        is 
   1402   1.26        is 	} else if (ecp->ec_multicnt > 0) {
   1403   1.25        is 		/*
   1404   1.25        is 		 * Step through the list of addresses.
   1405   1.25        is 		 */
   1406   1.25        is 		ETHER_FIRST_MULTI(step, ecp, enm);
   1407   1.25        is 		while(enm) {
   1408   1.54   thorpej 			if (memcmp(enm->enm_addrlo, enm->enm_addrhi, 6) != 0) {
   1409   1.26        is 				ifp->if_flags |= IFF_ALLMULTI;
   1410   1.26        is 				goto setupmulti;
   1411   1.25        is 			}
   1412   1.25        is 			ETHER_NEXT_MULTI(step, enm);
   1413   1.67     perry 		}
   1414   1.25        is 		/* OK, we really need to do it now: */
   1415   1.26        is #if 0
   1416   1.26        is 		if ((ifp->if_flags & (IFF_RUNNING | IFF_OACTIVE))
   1417   1.26        is 		    != IFF_RUNNING) {
   1418   1.26        is 			ifp->if_flags |= IFF_OACTIVE;
   1419   1.26        is 			sc->want_mc_setup = 1;
   1420   1.26        is                 	return;
   1421   1.25        is 		}
   1422   1.26        is #endif
   1423   1.26        is 		iy_mc_setup(sc);
   1424   1.25        is 	} else {
   1425   1.26        is 		ifp->if_flags &= ~IFF_ALLMULTI;
   1426    1.1        is 	}
   1427   1.25        is 
   1428   1.26        is setupmulti:
   1429   1.26        is 	bus_space_write_1(iot, ioh, 0, BANK_SEL(2));
   1430   1.26        is 	if (ifp->if_flags & (IFF_PROMISC|IFF_ALLMULTI)) {
   1431   1.26        is 		temp = MATCH_ALL;
   1432   1.67     perry 	} else
   1433   1.51        is 		temp = MATCH_BRDCST;
   1434   1.26        is 
   1435   1.26        is 	bus_space_write_1(iot, ioh, RECV_MODES_REG, temp);
   1436   1.26        is 	/* XXX VOODOO */
   1437   1.26        is 	temp = bus_space_read_1(iot, ioh, MEDIA_SELECT);
   1438   1.26        is 	bus_space_write_1(iot, ioh, MEDIA_SELECT, temp);
   1439   1.26        is 	/* XXX END OF VOODOO */
   1440   1.26        is 
   1441   1.26        is 	/* XXX TBD: setup hardware for all multicasts */
   1442   1.26        is 	bus_space_write_1(iot, ioh, 0, BANK_SEL(0));
   1443   1.25        is 	return;
   1444    1.1        is }
   1445    1.1        is 
   1446   1.42        tv #ifdef IYDEBUGX
   1447    1.1        is void
   1448   1.84       dsl print_rbd(volatile struct ie_recv_buf_desc *rbd)
   1449    1.1        is {
   1450    1.8  christos 	printf("RBD at %08lx:\nactual %04x, next %04x, buffer %08x\n"
   1451    1.1        is 	    "length %04x, mbz %04x\n", (u_long)rbd, rbd->ie_rbd_actual,
   1452    1.1        is 	    rbd->ie_rbd_next, rbd->ie_rbd_buffer, rbd->ie_rbd_length,
   1453    1.1        is 	    rbd->mbz);
   1454    1.1        is }
   1455    1.1        is #endif
   1456    1.1        is 
   1457    1.1        is void
   1458   1.84       dsl iyprobemem(struct iy_softc *sc)
   1459    1.1        is {
   1460    1.9   thorpej 	bus_space_tag_t iot;
   1461    1.9   thorpej 	bus_space_handle_t ioh;
   1462    1.1        is 	int testing;
   1463    1.1        is 
   1464    1.9   thorpej 	iot = sc->sc_iot;
   1465    1.6        is 	ioh = sc->sc_ioh;
   1466    1.1        is 
   1467   1.10        is 	bus_space_write_1(iot, ioh, COMMAND_REG, BANK_SEL(0));
   1468   1.10        is 	delay(1);
   1469    1.9   thorpej 	bus_space_write_2(iot, ioh, HOST_ADDR_REG, 4096-2);
   1470    1.9   thorpej 	bus_space_write_2(iot, ioh, MEM_PORT_REG, 0);
   1471    1.1        is 
   1472    1.1        is 	for (testing=65536; testing >= 4096; testing >>= 1) {
   1473    1.9   thorpej 		bus_space_write_2(iot, ioh, HOST_ADDR_REG, testing-2);
   1474    1.9   thorpej 		bus_space_write_2(iot, ioh, MEM_PORT_REG, 0xdead);
   1475    1.9   thorpej 		bus_space_write_2(iot, ioh, HOST_ADDR_REG, testing-2);
   1476    1.9   thorpej 		if (bus_space_read_2(iot, ioh, MEM_PORT_REG) != 0xdead) {
   1477    1.1        is #ifdef IYMEMDEBUG
   1478    1.8  christos 			printf("%s: Didn't keep 0xdead at 0x%x\n",
   1479   1.91       chs 			    device_xname(sc->sc_dev), testing-2);
   1480    1.1        is #endif
   1481    1.1        is 			continue;
   1482    1.1        is 		}
   1483    1.1        is 
   1484    1.9   thorpej 		bus_space_write_2(iot, ioh, HOST_ADDR_REG, testing-2);
   1485    1.9   thorpej 		bus_space_write_2(iot, ioh, MEM_PORT_REG, 0xbeef);
   1486    1.9   thorpej 		bus_space_write_2(iot, ioh, HOST_ADDR_REG, testing-2);
   1487    1.9   thorpej 		if (bus_space_read_2(iot, ioh, MEM_PORT_REG) != 0xbeef) {
   1488    1.1        is #ifdef IYMEMDEBUG
   1489    1.8  christos 			printf("%s: Didn't keep 0xbeef at 0x%x\n",
   1490   1.91       chs 			    device_xname(sc->sc_dev), testing-2);
   1491    1.1        is #endif
   1492    1.1        is 			continue;
   1493    1.1        is 		}
   1494    1.1        is 
   1495    1.9   thorpej 		bus_space_write_2(iot, ioh, HOST_ADDR_REG, 0);
   1496    1.9   thorpej 		bus_space_write_2(iot, ioh, MEM_PORT_REG, 0);
   1497    1.9   thorpej 		bus_space_write_2(iot, ioh, HOST_ADDR_REG, testing >> 1);
   1498    1.9   thorpej 		bus_space_write_2(iot, ioh, MEM_PORT_REG, testing >> 1);
   1499    1.9   thorpej 		bus_space_write_2(iot, ioh, HOST_ADDR_REG, 0);
   1500    1.9   thorpej 		if (bus_space_read_2(iot, ioh, MEM_PORT_REG) == (testing >> 1)) {
   1501    1.1        is #ifdef IYMEMDEBUG
   1502    1.8  christos 			printf("%s: 0x%x alias of 0x0\n",
   1503   1.91       chs 			    device_xname(sc->sc_dev), testing >> 1);
   1504    1.1        is #endif
   1505    1.1        is 			continue;
   1506    1.1        is 		}
   1507    1.1        is 
   1508    1.1        is 		break;
   1509    1.1        is 	}
   1510    1.1        is 
   1511    1.1        is 	sc->sram = testing;
   1512    1.1        is 
   1513    1.1        is 	switch(testing) {
   1514    1.1        is 		case 65536:
   1515    1.1        is 			/* 4 NFS packets + overhead RX, 2 NFS + overhead TX  */
   1516    1.1        is 			sc->rx_size = 44*1024;
   1517    1.1        is 			break;
   1518    1.1        is 
   1519    1.1        is 		case 32768:
   1520    1.1        is 			/* 2 NFS packets + overhead RX, 1 NFS + overhead TX  */
   1521    1.1        is 			sc->rx_size = 22*1024;
   1522    1.1        is 			break;
   1523    1.1        is 
   1524    1.1        is 		case 16384:
   1525    1.1        is 			/* 1 NFS packet + overhead RX, 4 big packets TX */
   1526    1.1        is 			sc->rx_size = 10*1024;
   1527    1.1        is 			break;
   1528   1.67     perry 		default:
   1529    1.1        is 			sc->rx_size = testing/2;
   1530    1.1        is 			break;
   1531    1.1        is 	}
   1532    1.1        is 	sc->tx_size = testing - sc->rx_size;
   1533   1.10        is }
   1534   1.10        is 
   1535   1.10        is static int
   1536   1.97   msaitoh eepromreadall(bus_space_tag_t iot, bus_space_handle_t ioh, u_int16_t *wordp,
   1537   1.97   msaitoh     int maxi)
   1538   1.10        is {
   1539   1.10        is 	int i;
   1540   1.10        is 	u_int16_t checksum, tmp;
   1541   1.10        is 
   1542   1.10        is 	checksum = 0;
   1543   1.10        is 
   1544   1.10        is 	for (i=0; i<EEPP_LENGTH; ++i) {
   1545   1.10        is 		tmp = eepromread(iot, ioh, i);
   1546   1.10        is 		checksum += tmp;
   1547   1.10        is 		if (i<maxi)
   1548   1.10        is 			wordp[i] = tmp;
   1549   1.10        is 	}
   1550   1.10        is 
   1551   1.10        is 	if (checksum != EEPP_CHKSUM) {
   1552   1.10        is #ifdef IYDEBUG
   1553   1.10        is 		printf("wrong EEPROM checksum 0x%x should be 0x%x\n",
   1554   1.10        is 		    checksum, EEPP_CHKSUM);
   1555   1.10        is #endif
   1556   1.10        is 		return 1;
   1557   1.10        is 	}
   1558   1.10        is 	return 0;
   1559    1.1        is }
   1560