Home | History | Annotate | Line # | Download | only in dev
if_ie_vme.c revision 1.10.4.1
      1  1.10.4.1  gwr /*	$NetBSD: if_ie_vme.c,v 1.10.4.1 1998/01/27 19:19:28 gwr Exp $	*/
      2       1.1  gwr 
      3       1.5  gwr /*-
      4       1.5  gwr  * Copyright (c) 1996 The NetBSD Foundation, Inc.
      5       1.1  gwr  * All rights reserved.
      6       1.1  gwr  *
      7       1.5  gwr  * This code is derived from software contributed to The NetBSD Foundation
      8       1.5  gwr  * by Gordon W. Ross.
      9       1.5  gwr  *
     10       1.1  gwr  * Redistribution and use in source and binary forms, with or without
     11       1.1  gwr  * modification, are permitted provided that the following conditions
     12       1.1  gwr  * are met:
     13       1.1  gwr  * 1. Redistributions of source code must retain the above copyright
     14       1.1  gwr  *    notice, this list of conditions and the following disclaimer.
     15       1.1  gwr  * 2. Redistributions in binary form must reproduce the above copyright
     16       1.1  gwr  *    notice, this list of conditions and the following disclaimer in the
     17       1.1  gwr  *    documentation and/or other materials provided with the distribution.
     18       1.1  gwr  * 3. All advertising materials mentioning features or use of this software
     19       1.1  gwr  *    must display the following acknowledgement:
     20       1.5  gwr  *        This product includes software developed by the NetBSD
     21       1.5  gwr  *        Foundation, Inc. and its contributors.
     22       1.5  gwr  * 4. Neither the name of The NetBSD Foundation nor the names of its
     23       1.5  gwr  *    contributors may be used to endorse or promote products derived
     24       1.5  gwr  *    from this software without specific prior written permission.
     25       1.1  gwr  *
     26       1.5  gwr  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     27       1.5  gwr  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28       1.5  gwr  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29       1.7  gwr  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     30       1.7  gwr  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31       1.5  gwr  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32       1.5  gwr  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33       1.5  gwr  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34       1.5  gwr  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35       1.5  gwr  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36       1.5  gwr  * POSSIBILITY OF SUCH DAMAGE.
     37       1.1  gwr  */
     38       1.1  gwr 
     39       1.1  gwr /*
     40       1.1  gwr  * Machine-dependent glue for the Intel Ethernet (ie) driver.
     41       1.1  gwr  */
     42       1.1  gwr 
     43       1.1  gwr #include <sys/param.h>
     44       1.1  gwr #include <sys/systm.h>
     45       1.1  gwr #include <sys/device.h>
     46       1.1  gwr #include <sys/protosw.h>
     47       1.1  gwr #include <sys/socket.h>
     48       1.1  gwr #include <net/if.h>
     49       1.8   is #include <net/if_ether.h>
     50       1.1  gwr 
     51       1.1  gwr #ifdef INET
     52       1.1  gwr #include <netinet/in.h>
     53       1.1  gwr #include <netinet/in_systm.h>
     54       1.1  gwr #include <netinet/in_var.h>
     55       1.1  gwr #include <netinet/ip.h>
     56       1.8   is #include <netinet/if_inarp.h>
     57       1.1  gwr #endif
     58       1.1  gwr 
     59       1.1  gwr #include <machine/autoconf.h>
     60       1.1  gwr #include <machine/cpu.h>
     61       1.1  gwr #include <machine/dvma.h>
     62       1.1  gwr #include <machine/idprom.h>
     63       1.1  gwr #include <machine/vmparam.h>
     64       1.1  gwr 
     65       1.1  gwr #include "i82586.h"
     66       1.2  gwr #include "if_iereg.h"
     67       1.2  gwr #include "if_ievar.h"
     68       1.1  gwr 
     69       1.1  gwr static void ie_vmereset __P((struct ie_softc *));
     70       1.1  gwr static void ie_vmeattend __P((struct ie_softc *));
     71       1.1  gwr static void ie_vmerun __P((struct ie_softc *));
     72       1.1  gwr 
     73       1.1  gwr /*
     74       1.1  gwr  * zero/copy functions: OBIO can use the normal functions, but VME
     75       1.1  gwr  *    must do only byte or half-word (16 bit) accesses...
     76       1.1  gwr  */
     77       1.6  gwr static void wcopy __P((const void *vb1, void *vb2, u_int l));
     78       1.6  gwr static void wzero __P((void *vb, u_int l));
     79       1.6  gwr 
     80       1.1  gwr 
     81       1.1  gwr /*
     82       1.1  gwr  * New-style autoconfig attachment
     83       1.1  gwr  */
     84       1.1  gwr 
     85  1.10.4.1  gwr static int  ie_vme_match __P((struct device *, struct cfdata *, void *));
     86  1.10.4.1  gwr static void ie_vme_attach __P((struct device *, struct device *, void *));
     87       1.1  gwr 
     88  1.10.4.1  gwr struct cfattach ie_vme_ca = {
     89  1.10.4.1  gwr 	sizeof(struct ie_softc), ie_vme_match, ie_vme_attach
     90       1.1  gwr };
     91       1.1  gwr 
     92       1.1  gwr 
     93       1.1  gwr static int
     94  1.10.4.1  gwr ie_vme_match(parent, cf, args)
     95       1.1  gwr 	struct device *parent;
     96       1.6  gwr 	struct cfdata *cf;
     97       1.6  gwr 	void *args;
     98       1.1  gwr {
     99       1.1  gwr 	struct confargs *ca = args;
    100       1.1  gwr 
    101       1.1  gwr 	/* No default VME address. */
    102       1.1  gwr 	if (ca->ca_paddr == -1)
    103       1.1  gwr 		return(0);
    104       1.1  gwr 
    105       1.9  gwr 	/* Make sure something is there... */
    106       1.9  gwr 	if (bus_peek(ca->ca_bustype, ca->ca_paddr, 2) == -1)
    107       1.9  gwr 		return (0);
    108       1.9  gwr 
    109       1.9  gwr 	/* Default interrupt priority. */
    110       1.1  gwr 	if (ca->ca_intpri == -1)
    111       1.1  gwr 		ca->ca_intpri = 3;
    112       1.1  gwr 
    113       1.9  gwr 	return (1);
    114       1.1  gwr }
    115       1.1  gwr 
    116       1.1  gwr /*
    117       1.1  gwr  * *note*: we don't detect the difference between a VME3E and
    118       1.1  gwr  * a multibus/vme card.   if you want to use a 3E you'll have
    119       1.1  gwr  * to fix this.
    120       1.1  gwr  */
    121       1.1  gwr void
    122  1.10.4.1  gwr ie_vme_attach(parent, self, args)
    123       1.1  gwr 	struct device *parent;
    124       1.1  gwr 	struct device *self;
    125       1.1  gwr 	void *args;
    126       1.1  gwr {
    127       1.1  gwr 	struct ie_softc *sc = (void *) self;
    128       1.1  gwr 	struct confargs *ca = args;
    129       1.1  gwr 	volatile struct ievme *iev;
    130       1.1  gwr 	u_long  rampaddr;
    131       1.1  gwr 	int     lcv, off;
    132       1.1  gwr 
    133       1.1  gwr 	sc->hard_type = IE_VME;
    134       1.1  gwr 	sc->reset_586 = ie_vmereset;
    135       1.1  gwr 	sc->chan_attn = ie_vmeattend;
    136       1.1  gwr 	sc->run_586 = ie_vmerun;
    137       1.1  gwr 	sc->sc_bcopy = wcopy;
    138       1.1  gwr 	sc->sc_bzero = wzero;
    139       1.1  gwr 
    140       1.1  gwr 	/*
    141       1.1  gwr 	 * There is 64K of memory on the VME board.
    142       1.1  gwr 	 * (determined by hardware - NOT configurable!)
    143       1.1  gwr 	 */
    144       1.1  gwr 	sc->sc_msize = 0x10000; /* MEMSIZE 64K */
    145       1.1  gwr 
    146       1.1  gwr 	/* Map in the board control regs. */
    147       1.1  gwr 	sc->sc_reg = bus_mapin(ca->ca_bustype, ca->ca_paddr,
    148       1.1  gwr 						   sizeof(struct ievme));
    149       1.1  gwr 	iev = (volatile struct ievme *) sc->sc_reg;
    150       1.1  gwr 
    151       1.1  gwr 	/*
    152       1.1  gwr 	 * Find and map in the board memory.
    153       1.1  gwr 	 */
    154       1.1  gwr 	/* top 12 bits */
    155       1.1  gwr 	rampaddr = ca->ca_paddr & 0xfff00000;
    156       1.1  gwr 	/* 4 more */
    157       1.1  gwr 	rampaddr |= ((iev->status & IEVME_HADDR) << 16);
    158       1.1  gwr 	sc->sc_maddr = bus_mapin(ca->ca_bustype, rampaddr, sc->sc_msize);
    159       1.1  gwr 
    160       1.1  gwr 	/*
    161       1.1  gwr 	 * On this hardware, the i82586 address is just
    162       1.1  gwr 	 * masked to 16 bits, so sc_iobase == sc_maddr
    163       1.1  gwr 	 */
    164       1.1  gwr 	sc->sc_iobase = sc->sc_maddr;
    165       1.1  gwr 
    166       1.1  gwr 	/*
    167       1.1  gwr 	 * Set up on-board mapping registers for linear map.
    168       1.1  gwr 	 */
    169       1.1  gwr 	iev->pectrl |= IEVME_PARACK; /* clear to start */
    170       1.1  gwr 	for (lcv = 0; lcv < IEVME_MAPSZ; lcv++)
    171       1.1  gwr 		iev->pgmap[lcv] = IEVME_SBORDR | IEVME_OBMEM | lcv;
    172       1.1  gwr 	(sc->sc_bzero)(sc->sc_maddr, sc->sc_msize);
    173       1.1  gwr 
    174       1.1  gwr 	/*
    175       1.1  gwr 	 * Set the System Configuration Pointer (SCP).
    176       1.1  gwr 	 * Its location is system-dependent because the
    177       1.1  gwr 	 * i82586 reads it from a fixed physical address.
    178       1.1  gwr 	 * On this hardware, the i82586 address is just
    179       1.1  gwr 	 * masked down to 16 bits, so the SCP is found
    180       1.1  gwr 	 * at the end of the RAM on the VME board.
    181       1.1  gwr 	 */
    182       1.1  gwr 	off = IE_SCP_ADDR & 0xFFFF;
    183       1.1  gwr 	sc->scp = (volatile void *) (sc->sc_maddr + off);
    184       1.1  gwr 
    185       1.1  gwr 	/*
    186       1.1  gwr 	 * The rest of ram is used for buffers, etc.
    187       1.1  gwr 	 */
    188       1.1  gwr 	sc->buf_area = sc->sc_maddr;
    189       1.1  gwr 	sc->buf_area_sz = off;
    190       1.1  gwr 
    191       1.1  gwr 	/* Set the ethernet address. */
    192       1.1  gwr 	idprom_etheraddr(sc->sc_addr);
    193       1.1  gwr 
    194       1.1  gwr 	/* Do machine-independent parts of attach. */
    195       1.1  gwr 	ie_attach(sc);
    196       1.1  gwr 
    197       1.1  gwr 	/* Install interrupt handler. */
    198       1.1  gwr 	isr_add_vectored(ie_intr, (void *)sc,
    199       1.1  gwr 		ca->ca_intpri, ca->ca_intvec);
    200       1.1  gwr }
    201       1.1  gwr 
    202       1.1  gwr 
    203       1.1  gwr /*
    204       1.1  gwr  * MULTIBUS/VME support
    205       1.1  gwr  */
    206      1.10  gwr 
    207      1.10  gwr void
    208      1.10  gwr ie_vmeattend(sc)
    209       1.1  gwr 	struct ie_softc *sc;
    210       1.1  gwr {
    211       1.1  gwr 	volatile struct ievme *iev = (struct ievme *) sc->sc_reg;
    212      1.10  gwr 
    213      1.10  gwr 	iev->status |= IEVME_ATTEN;	/* flag! */
    214      1.10  gwr 	iev->status &= ~IEVME_ATTEN;	/* down. */
    215       1.1  gwr }
    216       1.1  gwr 
    217      1.10  gwr void
    218      1.10  gwr ie_vmereset(sc)
    219       1.1  gwr 	struct ie_softc *sc;
    220       1.1  gwr {
    221       1.1  gwr 	volatile struct ievme *iev = (struct ievme *) sc->sc_reg;
    222       1.1  gwr 
    223      1.10  gwr 	iev->status = IEVME_RESET;
    224      1.10  gwr 	delay(20);
    225      1.10  gwr 	iev->status = (IEVME_ONAIR | IEVME_IENAB | IEVME_PEINT);
    226       1.1  gwr }
    227       1.1  gwr 
    228      1.10  gwr void
    229       1.1  gwr ie_vmerun(sc)
    230       1.1  gwr 	struct ie_softc *sc;
    231       1.1  gwr {
    232      1.10  gwr 	/* do it all in reset */
    233       1.1  gwr }
    234       1.1  gwr 
    235       1.1  gwr /*
    236       1.1  gwr  * wcopy/wzero - like bcopy/bzero but largest access is 16-bits,
    237       1.1  gwr  * and also does byte swaps...
    238       1.1  gwr  * XXX - Would be nice to have asm versions in some library...
    239       1.1  gwr  */
    240       1.1  gwr 
    241       1.1  gwr static void
    242       1.1  gwr wzero(vb, l)
    243       1.1  gwr 	void *vb;
    244       1.1  gwr 	u_int l;
    245       1.1  gwr {
    246       1.1  gwr 	u_char *b = vb;
    247       1.1  gwr 	u_char *be = b + l;
    248       1.1  gwr 	u_short *sp;
    249       1.1  gwr 
    250       1.1  gwr 	if (l == 0)
    251       1.1  gwr 		return;
    252       1.1  gwr 
    253       1.1  gwr 	/* front, */
    254       1.1  gwr 	if ((u_long)b & 1)
    255       1.1  gwr 		*b++ = 0;
    256       1.1  gwr 
    257       1.1  gwr 	/* back, */
    258       1.1  gwr 	if (b != be && ((u_long)be & 1) != 0) {
    259       1.1  gwr 		be--;
    260       1.1  gwr 		*be = 0;
    261       1.1  gwr 	}
    262       1.1  gwr 
    263       1.1  gwr 	/* and middle. */
    264       1.1  gwr 	sp = (u_short *)b;
    265       1.1  gwr 	while (sp != (u_short *)be)
    266       1.1  gwr 		*sp++ = 0;
    267       1.1  gwr }
    268       1.1  gwr 
    269       1.1  gwr static void
    270       1.1  gwr wcopy(vb1, vb2, l)
    271       1.1  gwr 	const void *vb1;
    272       1.1  gwr 	void *vb2;
    273       1.1  gwr 	u_int l;
    274       1.1  gwr {
    275       1.1  gwr 	const u_char *b1e, *b1 = vb1;
    276       1.1  gwr 	u_char *b2 = vb2;
    277       1.1  gwr 	u_short *sp;
    278       1.1  gwr 	int bstore = 0;
    279       1.1  gwr 
    280       1.1  gwr 	if (l == 0)
    281       1.1  gwr 		return;
    282       1.1  gwr 
    283       1.1  gwr 	/* front, */
    284       1.1  gwr 	if ((u_long)b1 & 1) {
    285       1.1  gwr 		*b2++ = *b1++;
    286       1.1  gwr 		l--;
    287       1.1  gwr 	}
    288       1.1  gwr 
    289       1.1  gwr 	/* middle, */
    290       1.1  gwr 	sp = (u_short *)b1;
    291       1.1  gwr 	b1e = b1 + l;
    292       1.1  gwr 	if (l & 1)
    293       1.1  gwr 		b1e--;
    294       1.1  gwr 	bstore = (u_long)b2 & 1;
    295       1.1  gwr 
    296       1.1  gwr 	while (sp < (u_short *)b1e) {
    297       1.1  gwr 		if (bstore) {
    298       1.1  gwr 			b2[1] = *sp & 0xff;
    299       1.1  gwr 			b2[0] = *sp >> 8;
    300       1.1  gwr 		} else
    301       1.1  gwr 			*((short *)b2) = *sp;
    302       1.1  gwr 		sp++;
    303       1.1  gwr 		b2 += 2;
    304       1.1  gwr 	}
    305       1.1  gwr 
    306       1.1  gwr 	/* and back. */
    307       1.1  gwr 	if (l & 1)
    308       1.1  gwr 		*b2 = *b1e;
    309       1.1  gwr }
    310