Home | History | Annotate | Line # | Download | only in if
if_le.c revision 1.10
      1  1.10     ragge /*	$NetBSD: if_le.c,v 1.10 1998/01/24 14:17:02 ragge Exp $	*/
      2   1.1     ragge 
      3   1.1     ragge /* #define LE_CHIP_IS_POKEY	/* does VS2000 need this ??? */
      4   1.1     ragge 
      5   1.1     ragge /*-
      6   1.1     ragge  * Copyright (c) 1995 Charles M. Hannum.  All rights reserved.
      7   1.1     ragge  * Copyright (c) 1992, 1993
      8   1.1     ragge  *	The Regents of the University of California.  All rights reserved.
      9   1.1     ragge  *
     10   1.1     ragge  * This code is derived from software contributed to Berkeley by
     11   1.1     ragge  * Ralph Campbell and Rick Macklem.
     12   1.1     ragge  *
     13   1.1     ragge  * Redistribution and use in source and binary forms, with or without
     14   1.1     ragge  * modification, are permitted provided that the following conditions
     15   1.1     ragge  * are met:
     16   1.1     ragge  * 1. Redistributions of source code must retain the above copyright
     17   1.1     ragge  *    notice, this list of conditions and the following disclaimer.
     18   1.1     ragge  * 2. Redistributions in binary form must reproduce the above copyright
     19   1.1     ragge  *    notice, this list of conditions and the following disclaimer in the
     20   1.1     ragge  *    documentation and/or other materials provided with the distribution.
     21   1.1     ragge  * 3. All advertising materials mentioning features or use of this software
     22   1.1     ragge  *    must display the following acknowledgement:
     23   1.1     ragge  *	This product includes software developed by the University of
     24   1.1     ragge  *	California, Berkeley and its contributors.
     25   1.1     ragge  * 4. Neither the name of the University nor the names of its contributors
     26   1.1     ragge  *    may be used to endorse or promote products derived from this software
     27   1.1     ragge  *    without specific prior written permission.
     28   1.1     ragge  *
     29   1.1     ragge  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     30   1.1     ragge  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     31   1.1     ragge  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     32   1.1     ragge  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     33   1.1     ragge  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     34   1.1     ragge  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     35   1.1     ragge  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     36   1.1     ragge  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     37   1.1     ragge  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     38   1.1     ragge  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     39   1.1     ragge  * SUCH DAMAGE.
     40   1.1     ragge  *
     41   1.1     ragge  *	@(#)if_le.c	8.2 (Berkeley) 11/16/93
     42   1.1     ragge  */
     43   1.1     ragge 
     44   1.1     ragge #include "bpfilter.h"
     45   1.1     ragge 
     46   1.1     ragge #include <sys/param.h>
     47   1.1     ragge #include <sys/syslog.h>
     48   1.1     ragge #include <sys/socket.h>
     49   1.1     ragge #include <sys/device.h>
     50   1.5     ragge #include <sys/reboot.h>
     51   1.1     ragge 
     52   1.1     ragge #include <net/if.h>
     53   1.6        is #include <net/if_ether.h>
     54   1.7   thorpej #include <net/if_media.h>
     55   1.1     ragge 
     56   1.1     ragge #if INET
     57   1.1     ragge #include <netinet/in.h>
     58   1.6        is #include <netinet/if_inarp.h>
     59   1.1     ragge #endif
     60   1.1     ragge 
     61   1.1     ragge /*
     62   1.1     ragge  * This would be nice, but it's not yet there...
     63   1.1     ragge  *
     64   1.1     ragge  * #include <machine/autoconf.h>
     65   1.1     ragge  */
     66   1.1     ragge 
     67   1.1     ragge #include <machine/pte.h>
     68   1.1     ragge #include <machine/cpu.h>
     69   1.1     ragge #include <machine/mtpr.h>
     70   1.1     ragge #include <machine/uvax.h>
     71   1.1     ragge #include <machine/ka410.h>
     72   1.1     ragge #include <machine/vsbus.h>
     73   1.5     ragge #include <machine/rpb.h>
     74   1.1     ragge 
     75   1.1     ragge #include <dev/ic/am7990reg.h>
     76   1.1     ragge #define LE_NEED_BUF_CONTIG
     77   1.1     ragge #include <dev/ic/am7990var.h>
     78   1.1     ragge 
     79   1.1     ragge #include <dev/tc/if_levar.h>
     80   1.1     ragge 
     81   1.1     ragge #define xdebug(x)
     82   1.1     ragge 
     83   1.1     ragge #ifdef LE_CHIP_IS_POKEY
     84   1.1     ragge /*
     85   1.1     ragge  * access LANCE registers and double-check their contents
     86   1.1     ragge  */
     87   1.1     ragge #define wbflush()	/* do nothing */
     88   1.1     ragge void lewritereg();
     89   1.1     ragge #define LERDWR(cntl, src, dst)	{ (dst) = (src); wbflush(); }
     90   1.1     ragge #define LEWREG(src, dst)	lewritereg(&(dst), (src))
     91   1.1     ragge #endif
     92   1.1     ragge 
     93   1.1     ragge #define LE_IOSIZE 64*1024	/* 64K of real-mem are reserved and already */
     94   1.1     ragge extern void *le_iomem;		/* mapped into virt-mem by cpu_steal_pages */
     95   1.1     ragge extern u_long le_ioaddr;	/* le_iomem is virt, le_ioaddr is phys */
     96   1.1     ragge 
     97   1.1     ragge #define LE_SOFTC(unit)	le_cd.cd_devs[unit]
     98   1.1     ragge #define LE_DELAY(x)	DELAY(x)
     99   1.1     ragge 
    100  1.10     ragge int lematch __P((struct device *, struct cfdata *, void *));
    101   1.1     ragge void leattach __P((struct device *, struct device *, void *));
    102   1.1     ragge 
    103   1.1     ragge int leintr __P((void *sc));
    104   1.1     ragge 
    105   1.1     ragge struct cfattach le_ca = {
    106   1.1     ragge 	sizeof(struct le_softc), lematch, leattach
    107   1.1     ragge };
    108   1.9   thorpej 
    109   1.9   thorpej extern struct cfdriver le_cd;
    110   1.1     ragge 
    111   1.4     ragge hide void lewrcsr __P ((struct am7990_softc *, u_int16_t, u_int16_t));
    112   1.4     ragge hide u_int16_t lerdcsr __P ((struct am7990_softc *, u_int16_t));
    113   1.4     ragge 
    114   1.4     ragge hide void
    115   1.1     ragge lewrcsr(sc, port, val)
    116   1.4     ragge 	struct am7990_softc *sc;
    117   1.1     ragge 	u_int16_t port, val;
    118   1.1     ragge {
    119   1.4     ragge 	struct lereg1 *ler1 = ((struct le_softc *)sc)->sc_r1;
    120   1.1     ragge 
    121   1.1     ragge #ifdef LE_CHIP_IS_POKEY
    122   1.1     ragge 	LEWREG(port, ler1->ler1_rap);
    123   1.1     ragge 	LERDWR(port, val, ler1->ler1_rdp);
    124   1.1     ragge #else
    125   1.1     ragge 	ler1->ler1_rap = port;
    126   1.1     ragge 	ler1->ler1_rdp = val;
    127   1.1     ragge #endif
    128   1.1     ragge }
    129   1.1     ragge 
    130   1.4     ragge hide u_int16_t
    131   1.1     ragge lerdcsr(sc, port)
    132   1.4     ragge 	struct am7990_softc *sc;
    133   1.1     ragge 	u_int16_t port;
    134   1.1     ragge {
    135   1.4     ragge 	struct lereg1 *ler1 = ((struct le_softc *)sc)->sc_r1;
    136   1.1     ragge 	u_int16_t val;
    137   1.1     ragge 
    138   1.1     ragge #ifdef LE_CHIP_IS_POKEY
    139   1.1     ragge 	LEWREG(port, ler1->ler1_rap);
    140   1.1     ragge 	LERDWR(0, ler1->ler1_rdp, val);
    141   1.1     ragge #else
    142   1.1     ragge 	ler1->ler1_rap = port;
    143   1.1     ragge 	val = ler1->ler1_rdp;
    144   1.1     ragge #endif
    145   1.1     ragge 	return (val);
    146   1.1     ragge }
    147   1.1     ragge 
    148   1.4     ragge integrate void
    149   1.4     ragge lehwinit(sc)
    150   1.4     ragge 	struct am7990_softc *sc;
    151   1.4     ragge {
    152   1.4     ragge }
    153   1.4     ragge 
    154   1.1     ragge int
    155  1.10     ragge lematch(parent, cf, aux)
    156   1.1     ragge 	struct device *parent;
    157  1.10     ragge 	struct cfdata *cf;
    158  1.10     ragge 	void *aux;
    159   1.1     ragge {
    160   1.1     ragge 	struct confargs *ca = aux;
    161   1.1     ragge 
    162   1.1     ragge 	/*
    163   1.1     ragge 	 * There could/should be more checks, but for now...
    164   1.1     ragge 	 */
    165   1.1     ragge 	if (strcmp(ca->ca_name, "le") &&
    166   1.1     ragge 	    strcmp(ca->ca_name, "am7990") &&
    167   1.1     ragge 	    strcmp(ca->ca_name, "AM7990"))
    168   1.1     ragge 		return (0);
    169   1.1     ragge 
    170   1.1     ragge 	return (1);
    171   1.1     ragge }
    172   1.1     ragge 
    173   1.1     ragge /*
    174   1.1     ragge  *
    175   1.1     ragge  */
    176   1.1     ragge void
    177   1.1     ragge leattach(parent, self, aux)
    178   1.1     ragge 	struct device *parent, *self;
    179   1.1     ragge 	void *aux;
    180   1.1     ragge {
    181   1.1     ragge 	register struct le_softc *sc = (void *)self;
    182   1.1     ragge 	struct confargs *ca = aux;
    183   1.1     ragge 	u_char *cp;	/* pointer to MAC address */
    184   1.1     ragge 	int i;
    185   1.1     ragge 
    186   1.1     ragge 	sc->sc_r1  = (void*)uvax_phys2virt(ca->ca_ioaddr);
    187   1.1     ragge 
    188   1.1     ragge 	sc->sc_am7990.sc_conf3 = 0;
    189   1.1     ragge 	sc->sc_am7990.sc_mem = le_iomem;
    190   1.1     ragge 	sc->sc_am7990.sc_addr = le_ioaddr;
    191   1.1     ragge 	sc->sc_am7990.sc_memsize = LE_IOSIZE;
    192   1.4     ragge 	sc->sc_am7990.sc_wrcsr = lewrcsr;
    193   1.4     ragge 	sc->sc_am7990.sc_rdcsr = lerdcsr;
    194   1.4     ragge 	sc->sc_am7990.sc_hwinit = lehwinit;
    195   1.4     ragge 	sc->sc_am7990.sc_nocarrier = NULL;
    196   1.1     ragge 
    197   1.1     ragge 	xdebug(("leattach: mem=%x, addr=%x, size=%x (%d)\n",
    198   1.1     ragge 	    sc->sc_am7990.sc_mem, sc->sc_am7990.sc_addr,
    199   1.1     ragge 	    sc->sc_am7990.sc_memsize, sc->sc_am7990.sc_memsize));
    200   1.1     ragge 
    201   1.1     ragge 	sc->sc_am7990.sc_copytodesc = am7990_copytobuf_contig;
    202   1.1     ragge 	sc->sc_am7990.sc_copyfromdesc = am7990_copyfrombuf_contig;
    203   1.1     ragge 	sc->sc_am7990.sc_copytobuf = am7990_copytobuf_contig;
    204   1.1     ragge 	sc->sc_am7990.sc_copyfrombuf = am7990_copyfrombuf_contig;
    205   1.1     ragge 	sc->sc_am7990.sc_zerobuf = am7990_zerobuf_contig;
    206   1.1     ragge 
    207   1.1     ragge 	/*
    208   1.1     ragge 	 * Get the ethernet address out of rom
    209   1.1     ragge 	 */
    210   1.6        is 	for (i = 0; i < sizeof(sc->sc_am7990.sc_enaddr); i++) {
    211   1.1     ragge 		int *eaddr = (void*)uvax_phys2virt(ca->ca_enaddr);
    212   1.6        is 		sc->sc_am7990.sc_enaddr[i] = (u_char)eaddr[i];
    213   1.1     ragge 	}
    214   1.1     ragge 
    215   1.6        is 	bcopy(self->dv_xname, sc->sc_am7990.sc_ethercom.ec_if.if_xname,
    216   1.6        is 	    IFNAMSIZ);
    217   1.1     ragge 	am7990_config(&sc->sc_am7990);
    218   1.1     ragge 
    219   1.1     ragge #ifdef LEDEBUG
    220   1.1     ragge 	sc->sc_am7990.sc_debug = LEDEBUG;
    221   1.1     ragge #endif
    222   1.1     ragge 
    223   1.1     ragge 	vsbus_intr_register(ca, am7990_intr, &sc->sc_am7990);
    224   1.1     ragge 	vsbus_intr_enable(ca);
    225   1.5     ragge 
    226   1.5     ragge 	/*
    227   1.5     ragge 	 * Register this device as boot device if we booted from it.
    228   1.5     ragge 	 * This will fail if there are more than one le in a machine,
    229   1.5     ragge 	 * fortunately there may be only one.
    230   1.5     ragge 	 */
    231   1.5     ragge 	if (B_TYPE(bootdev) == BDEV_LE)
    232   1.5     ragge 		booted_from = self;
    233   1.1     ragge }
    234   1.1     ragge 
    235   1.1     ragge #ifdef LE_CHIP_IS_POKEY
    236   1.1     ragge /*
    237   1.1     ragge  * Write a lance register port, reading it back to ensure success. This seems
    238   1.1     ragge  * to be necessary during initialization, since the chip appears to be a bit
    239   1.1     ragge  * pokey sometimes.
    240   1.1     ragge  */
    241   1.1     ragge void
    242   1.1     ragge lewritereg(regptr, val)
    243   1.1     ragge 	register volatile u_short *regptr;
    244   1.1     ragge 	register u_short val;
    245   1.1     ragge {
    246   1.1     ragge 	register int i = 0;
    247   1.1     ragge 
    248   1.1     ragge 	while (*regptr != val) {
    249   1.1     ragge 		*regptr = val;
    250   1.1     ragge 		wbflush();
    251   1.1     ragge 		if (++i > 10000) {
    252   1.3  christos 			printf("le: Reg did not settle (to x%x): x%x\n", val,
    253   1.1     ragge 			    *regptr);
    254   1.1     ragge 			return;
    255   1.1     ragge 		}
    256   1.1     ragge 		DELAY(100);
    257   1.1     ragge 	}
    258   1.1     ragge }
    259   1.1     ragge #endif
    260