NetBSD/sys/dev/isa/if_le_isa.c
thorpej 7b3f25271d Make the MI LANCE driver standalone, and use cfattach to resolve
naming conflicts between bus attachments on ports that can have
multiple instances of the LANCE.

Break up ISA LANCE driver into ISA and PCI front-ends.

Changed struct ifnet to have a pointer to the softc of the underlying
device and a printable "external name" (name + unit number), thus eliminating
if_name and if_unit.  Updated interface to (*if_watchdog)() and (*if_start)()
to take a struct ifnet *, rather than a unit number.
1996-05-07 01:50:04 +00:00

368 lines
9.2 KiB
C

/* $NetBSD: if_le_isa.c,v 1.1 1996/05/07 01:50:05 thorpej Exp $ */
/*-
* Copyright (c) 1995 Charles M. Hannum. All rights reserved.
* Copyright (c) 1992, 1993
* The Regents of the University of California. All rights reserved.
*
* This code is derived from software contributed to Berkeley by
* Ralph Campbell and Rick Macklem.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. All advertising materials mentioning features or use of this software
* must display the following acknowledgement:
* This product includes software developed by the University of
* California, Berkeley and its contributors.
* 4. Neither the name of the University nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*
* @(#)if_le.c 8.2 (Berkeley) 11/16/93
*/
#include "bpfilter.h"
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/mbuf.h>
#include <sys/syslog.h>
#include <sys/socket.h>
#include <sys/device.h>
#include <net/if.h>
#ifdef INET
#include <netinet/in.h>
#include <netinet/if_ether.h>
#endif
#include <vm/vm.h>
#include <machine/cpu.h>
#include <machine/pio.h>
#include <dev/isa/isareg.h>
#include <dev/isa/isavar.h>
#include <dev/isa/isadmavar.h>
#include <i386/isa/isa_machdep.h>
#include <dev/ic/am7990reg.h>
#include <dev/ic/am7990var.h>
#include <dev/isa/if_levar.h>
static char *card_type[] =
{ "unknown", "BICC Isolan", "NE2100", "DEPCA", "PCnet-ISA" };
int le_isa_probe __P((struct device *, void *, void *));
void le_isa_attach __P((struct device *, struct device *, void *));
struct cfattach le_isa_ca = {
sizeof(struct le_softc), le_isa_probe, le_isa_attach
};
int depca_isa_probe __P((struct le_softc *, struct isa_attach_args *));
int ne2100_isa_probe __P((struct le_softc *, struct isa_attach_args *));
int bicc_isa_probe __P((struct le_softc *, struct isa_attach_args *));
int lance_isa_probe __P((struct am7990_softc *));
int le_isa_intredge __P((void *));
hide void le_isa_wrcsr __P((struct am7990_softc *, u_int16_t, u_int16_t));
hide u_int16_t le_isa_rdcsr __P((struct am7990_softc *, u_int16_t));
hide void
le_isa_wrcsr(sc, port, val)
struct am7990_softc *sc;
u_int16_t port, val;
{
outw(((struct le_softc *)sc)->sc_rap, port);
outw(((struct le_softc *)sc)->sc_rdp, val);
}
hide u_int16_t
le_isa_rdcsr(sc, port)
struct am7990_softc *sc;
u_int16_t port;
{
u_int16_t val;
outw(((struct le_softc *)sc)->sc_rap, port);
val = inw(((struct le_softc *)sc)->sc_rdp);
return (val);
}
int
le_isa_probe(parent, match, aux)
struct device *parent;
void *match, *aux;
{
struct le_softc *lesc = match;
struct isa_attach_args *ia = aux;
if (bicc_isa_probe(lesc, ia))
return (1);
if (ne2100_isa_probe(lesc, ia))
return (1);
if (depca_isa_probe(lesc, ia))
return (1);
return (0);
}
int
depca_isa_probe(lesc, ia)
struct le_softc *lesc;
struct isa_attach_args *ia;
{
struct am7990_softc *sc = &lesc->sc_am7990;
int iobase = ia->ia_iobase, port;
u_long sum, rom_sum;
u_char x;
int i;
lesc->sc_rap = iobase + DEPCA_RAP;
lesc->sc_rdp = iobase + DEPCA_RDP;
lesc->sc_card = DEPCA;
if (lance_isa_probe(sc) == 0)
return 0;
outb(iobase + DEPCA_CSR, DEPCA_CSR_DUM);
/*
* Extract the physical MAC address from the ROM.
*
* The address PROM is 32 bytes wide, and we access it through
* a single I/O port. On each read, it rotates to the next
* position. We find the ethernet address by looking for a
* particular sequence of bytes (0xff, 0x00, 0x55, 0xaa, 0xff,
* 0x00, 0x55, 0xaa), and then reading the next 8 bytes (the
* ethernet address and a checksum).
*
* It appears that the PROM can be at one of two locations, so
* we just try both.
*/
port = iobase + DEPCA_ADP;
for (i = 0; i < 32; i++)
if (inb(port) == 0xff && inb(port) == 0x00 &&
inb(port) == 0x55 && inb(port) == 0xaa &&
inb(port) == 0xff && inb(port) == 0x00 &&
inb(port) == 0x55 && inb(port) == 0xaa)
goto found;
port = iobase + DEPCA_ADP + 1;
for (i = 0; i < 32; i++)
if (inb(port) == 0xff && inb(port) == 0x00 &&
inb(port) == 0x55 && inb(port) == 0xaa &&
inb(port) == 0xff && inb(port) == 0x00 &&
inb(port) == 0x55 && inb(port) == 0xaa)
goto found;
printf("%s: address not found\n", sc->sc_dev.dv_xname);
return 0;
found:
for (i = 0; i < sizeof(sc->sc_arpcom.ac_enaddr); i++)
sc->sc_arpcom.ac_enaddr[i] = inb(port);
#if 0
sum =
(sc->sc_arpcom.ac_enaddr[0] << 2) +
(sc->sc_arpcom.ac_enaddr[1] << 10) +
(sc->sc_arpcom.ac_enaddr[2] << 1) +
(sc->sc_arpcom.ac_enaddr[3] << 9) +
(sc->sc_arpcom.ac_enaddr[4] << 0) +
(sc->sc_arpcom.ac_enaddr[5] << 8);
sum = (sum & 0xffff) + (sum >> 16);
sum = (sum & 0xffff) + (sum >> 16);
rom_sum = inb(port);
rom_sum |= inb(port) << 8;
if (sum != rom_sum) {
printf("%s: checksum mismatch; calculated %04x != read %04x",
sc->sc_dev.dv_xname, sum, rom_sum);
return 0;
}
#endif
outb(iobase + DEPCA_CSR, DEPCA_CSR_NORMAL);
ia->ia_iosize = 16;
ia->ia_drq = DRQUNK;
return 1;
}
int
ne2100_isa_probe(lesc, ia)
struct le_softc *lesc;
struct isa_attach_args *ia;
{
struct am7990_softc *sc = &lesc->sc_am7990;
int iobase = ia->ia_iobase;
int i;
lesc->sc_rap = iobase + NE2100_RAP;
lesc->sc_rdp = iobase + NE2100_RDP;
lesc->sc_card = NE2100;
if (lance_isa_probe(sc) == 0)
return 0;
/*
* Extract the physical MAC address from the ROM.
*/
for (i = 0; i < sizeof(sc->sc_arpcom.ac_enaddr); i++)
sc->sc_arpcom.ac_enaddr[i] = inb(iobase + i);
ia->ia_iosize = 24;
return 1;
}
int
bicc_isa_probe(lesc, ia)
struct le_softc *lesc;
struct isa_attach_args *ia;
{
struct am7990_softc *sc = &lesc->sc_am7990;
int iobase = ia->ia_iobase;
int i;
lesc->sc_rap = iobase + BICC_RAP;
lesc->sc_rdp = iobase + BICC_RDP;
lesc->sc_card = BICC;
if (lance_isa_probe(sc) == 0)
return 0;
/*
* Extract the physical MAC address from the ROM.
*/
for (i = 0; i < sizeof(sc->sc_arpcom.ac_enaddr); i++)
sc->sc_arpcom.ac_enaddr[i] = inb(iobase + i * 2);
ia->ia_iosize = 16;
return 1;
}
/*
* Determine which chip is present on the card.
*/
int
lance_isa_probe(sc)
struct am7990_softc *sc;
{
/* Stop the LANCE chip and put it in a known state. */
le_isa_wrcsr(sc, LE_CSR0, LE_C0_STOP);
delay(100);
if (le_isa_rdcsr(sc, LE_CSR0) != LE_C0_STOP)
return 0;
le_isa_wrcsr(sc, LE_CSR3, sc->sc_conf3);
return 1;
}
void
le_isa_attach(parent, self, aux)
struct device *parent, *self;
void *aux;
{
struct le_softc *lesc = (void *)self;
struct am7990_softc *sc = &lesc->sc_am7990;
struct isa_attach_args *ia = aux;
printf(": %s Ethernet\n", sc->sc_dev.dv_xname,
card_type[lesc->sc_card]);
if (lesc->sc_card == DEPCA) {
u_char *mem, val;
int i;
mem = sc->sc_mem = ISA_HOLE_VADDR(ia->ia_maddr);
val = 0xff;
for (;;) {
for (i = 0; i < ia->ia_msize; i++)
mem[i] = val;
for (i = 0; i < ia->ia_msize; i++)
if (mem[i] != val) {
printf("%s: failed to clear memory\n",
sc->sc_dev.dv_xname);
return;
}
if (val == 0x00)
break;
val -= 0x55;
}
sc->sc_conf3 = LE_C3_ACON;
sc->sc_addr = 0;
sc->sc_memsize = ia->ia_msize;
} else {
sc->sc_mem = malloc(16384, M_DEVBUF, M_NOWAIT);
if (sc->sc_mem == 0) {
printf("%s: couldn't allocate memory for card\n",
sc->sc_dev.dv_xname);
return;
}
sc->sc_conf3 = 0;
sc->sc_addr = kvtop(sc->sc_mem);
sc->sc_memsize = 16384;
}
sc->sc_copytodesc = am7990_copytobuf_contig;
sc->sc_copyfromdesc = am7990_copyfrombuf_contig;
sc->sc_copytobuf = am7990_copytobuf_contig;
sc->sc_copyfrombuf = am7990_copyfrombuf_contig;
sc->sc_zerobuf = am7990_zerobuf_contig;
sc->sc_rdcsr = le_isa_rdcsr;
sc->sc_wrcsr = le_isa_wrcsr;
sc->sc_hwinit = NULL;
printf("%s", sc->sc_dev.dv_xname);
am7990_config(sc);
if (ia->ia_drq != DRQUNK)
isa_dmacascade(ia->ia_drq);
lesc->sc_ih = isa_intr_establish(ia->ia_ic, ia->ia_irq, IST_EDGE,
IPL_NET, le_isa_intredge, sc);
}
/*
* Controller interrupt.
*/
le_isa_intredge(arg)
void *arg;
{
if (am7990_intr(arg) == 0)
return (0);
for (;;)
if (am7990_intr(arg) == 0)
return (1);
}