Home | History | Annotate | Line # | Download | only in dev
if_le.c revision 1.26
      1 /*	$NetBSD: if_le.c,v 1.26 1996/01/02 21:56:21 thorpej Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 1995 Charles M. Hannum.  All rights reserved.
      5  * Copyright (c) 1992, 1993
      6  *	The Regents of the University of California.  All rights reserved.
      7  *
      8  * This code is derived from software contributed to Berkeley by
      9  * Ralph Campbell and Rick Macklem.
     10  *
     11  * Redistribution and use in source and binary forms, with or without
     12  * modification, are permitted provided that the following conditions
     13  * are met:
     14  * 1. Redistributions of source code must retain the above copyright
     15  *    notice, this list of conditions and the following disclaimer.
     16  * 2. Redistributions in binary form must reproduce the above copyright
     17  *    notice, this list of conditions and the following disclaimer in the
     18  *    documentation and/or other materials provided with the distribution.
     19  * 3. All advertising materials mentioning features or use of this software
     20  *    must display the following acknowledgement:
     21  *	This product includes software developed by the University of
     22  *	California, Berkeley and its contributors.
     23  * 4. Neither the name of the University nor the names of its contributors
     24  *    may be used to endorse or promote products derived from this software
     25  *    without specific prior written permission.
     26  *
     27  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     28  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     29  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     30  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     31  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     32  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     33  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     34  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     35  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     36  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     37  * SUCH DAMAGE.
     38  *
     39  *	@(#)if_le.c	8.2 (Berkeley) 11/16/93
     40  */
     41 
     42 #include "bpfilter.h"
     43 
     44 #include <sys/param.h>
     45 #include <sys/systm.h>
     46 #include <sys/mbuf.h>
     47 #include <sys/syslog.h>
     48 #include <sys/socket.h>
     49 #include <sys/device.h>
     50 
     51 #include <net/if.h>
     52 
     53 #ifdef INET
     54 #include <netinet/in.h>
     55 #include <netinet/if_ether.h>
     56 #endif
     57 
     58 #include <machine/cpu.h>
     59 #include <machine/mtpr.h>
     60 
     61 #include <hp300/hp300/isr.h>
     62 
     63 #ifdef USELEDS
     64 #include <hp300/hp300/led.h>
     65 #endif
     66 
     67 #include <hp300/dev/device.h>
     68 #include <hp300/dev/if_lereg.h>
     69 #include <hp300/dev/if_levar.h>
     70 #include <dev/ic/am7990reg.h>
     71 #define	LE_NEED_BUF_CONTIG
     72 #include <dev/ic/am7990var.h>
     73 
     74 #include "le.h"
     75 struct	le_softc le_softc[NLE];
     76 
     77 #define	LE_SOFTC(unit)	&le_softc[unit]
     78 #define	LE_DELAY(x)	DELAY(x)
     79 
     80 int	lematch __P((struct hp_device *));
     81 void	leattach __P((struct hp_device *));
     82 int	leintr __P((void *));
     83 static	int hp300_leintr __P((int));	/* machine-dependent wrapper */
     84 
     85 struct	driver ledriver = {
     86 	lematch, leattach, "le",
     87 };
     88 
     89 /* offsets for:	   ID,   REGS,    MEM,  NVRAM */
     90 int	lestd[] = { 0, 0x4000, 0x8000, 0xC008 };
     91 
     92 integrate void
     93 lewrcsr(sc, port, val)
     94 	struct le_softc *sc;
     95 	u_int16_t port, val;
     96 {
     97 	register struct lereg0 *ler0 = sc->sc_r0;
     98 	register struct lereg1 *ler1 = sc->sc_r1;
     99 
    100 	do {
    101 		ler1->ler1_rap = port;
    102 	} while ((ler0->ler0_status & LE_ACK) == 0);
    103 	do {
    104 		ler1->ler1_rdp = val;
    105 	} while ((ler0->ler0_status & LE_ACK) == 0);
    106 }
    107 
    108 integrate u_int16_t
    109 lerdcsr(sc, port)
    110 	struct le_softc *sc;
    111 	u_int16_t port;
    112 {
    113 	register struct lereg0 *ler0 = sc->sc_r0;
    114 	register struct lereg1 *ler1 = sc->sc_r1;
    115 	u_int16_t val;
    116 
    117 	do {
    118 		ler1->ler1_rap = port;
    119 	} while ((ler0->ler0_status & LE_ACK) == 0);
    120 	do {
    121 		val = ler1->ler1_rdp;
    122 	} while ((ler0->ler0_status & LE_ACK) == 0);
    123 	return (val);
    124 }
    125 
    126 int
    127 lematch(hd)
    128 	struct hp_device *hd;
    129 {
    130 	register struct lereg0 *ler0;
    131 	struct le_softc *sc = LE_SOFTC(hd->hp_unit);
    132 
    133 	ler0 = (struct lereg0 *)(lestd[0] + (int)hd->hp_addr);
    134 	if (ler0->ler0_id != LEID)
    135 		return (0);
    136 
    137 	hd->hp_ipl = LE_IPL(ler0->ler0_status);
    138 	sc->sc_hd = hd;
    139 
    140 	return (1);
    141 }
    142 
    143 /*
    144  * Interface exists: make available by filling in network interface
    145  * record.  System will initialize the interface when it is ready
    146  * to accept packets.
    147  */
    148 void
    149 leattach(hd)
    150 	struct hp_device *hd;
    151 {
    152 	register struct lereg0 *ler0;
    153 	struct le_softc *sc = LE_SOFTC(hd->hp_unit);
    154 	char *cp;
    155 	int i;
    156 
    157 	ler0 = sc->sc_r0 = (struct lereg0 *)(lestd[0] + (int)hd->hp_addr);
    158 	ler0->ler0_id = 0xFF;
    159 	DELAY(100);
    160 
    161 	/* XXXX kluge for now */
    162 	sc->sc_dev.dv_unit = hd->hp_unit;
    163 	sprintf(sc->sc_dev.dv_xname, "%s%d", ledriver.d_name, hd->hp_unit);
    164 
    165 	sc->sc_r1 = (struct lereg1 *)(lestd[1] + (int)hd->hp_addr);
    166 	sc->sc_mem = (void *)(lestd[2] + (int)hd->hp_addr);
    167 	sc->sc_conf3 = LE_C3_BSWP;
    168 	sc->sc_addr = 0;
    169 	sc->sc_memsize = 16384;
    170 
    171 	/*
    172 	 * Read the ethernet address off the board, one nibble at a time.
    173 	 */
    174 	cp = (char *)(lestd[3] + (int)hd->hp_addr);
    175 	for (i = 0; i < sizeof(sc->sc_arpcom.ac_enaddr); i++) {
    176 		sc->sc_arpcom.ac_enaddr[i] = (*++cp & 0xF) << 4;
    177 		cp++;
    178 		sc->sc_arpcom.ac_enaddr[i] |= *++cp & 0xF;
    179 		cp++;
    180 	}
    181 
    182 	sc->sc_copytodesc = copytobuf_contig;
    183 	sc->sc_copyfromdesc = copyfrombuf_contig;
    184 	sc->sc_copytobuf = copytobuf_contig;
    185 	sc->sc_copyfrombuf = copyfrombuf_contig;
    186 	sc->sc_zerobuf = zerobuf_contig;
    187 
    188 	sc->sc_arpcom.ac_if.if_name = ledriver.d_name;
    189 	leconfig(sc);
    190 
    191 	sc->sc_isr.isr_intr = hp300_leintr;
    192 	sc->sc_isr.isr_arg = hd->hp_unit;
    193 	sc->sc_isr.isr_ipl = hd->hp_ipl;
    194 	isrlink(&sc->sc_isr);
    195 	ler0->ler0_status = LE_IE;
    196 }
    197 
    198 static int
    199 hp300_leintr(unit)
    200 	int unit;
    201 {
    202 	struct le_softc *sc = LE_SOFTC(unit);
    203 	u_int16_t isr;
    204 
    205 #ifdef USELEDS
    206 	isr = lerdcsr(sc, LE_CSR0);
    207 
    208 	if ((isr & LE_C0_INTR) == 0)
    209 		return (0);
    210 
    211 	if (isr & LE_C0_RINT)
    212 		if (inledcontrol == 0)
    213 			ledcontrol(0, 0, LED_LANRCV);
    214 
    215 	if (isr & LE_C0_TINT)
    216 		if (inledcontrol == 0)
    217 			ledcontrol(0, 0, LED_LANXMT);
    218 #endif /* USELEDS */
    219 
    220 	return (leintr(sc));
    221 }
    222 
    223 #include <dev/ic/am7990.c>
    224