272 lines
6.9 KiB
C
272 lines
6.9 KiB
C
/* $NetBSD: if_sn_nubus.c,v 1.17 1997/10/26 03:17:15 briggs Exp $ */
|
|
|
|
/*
|
|
* Copyright (C) 1997 Allen Briggs
|
|
* All rights reserved.
|
|
*
|
|
* 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 Allen Briggs
|
|
* 4. The name of the author may not be used to endorse or promote products
|
|
* derived from this software without specific prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``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 AUTHOR 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.
|
|
*/
|
|
|
|
#include <sys/param.h>
|
|
#include <sys/device.h>
|
|
#include <sys/errno.h>
|
|
#include <sys/ioctl.h>
|
|
#include <sys/socket.h>
|
|
#include <sys/syslog.h>
|
|
#include <sys/systm.h>
|
|
|
|
#include <net/if.h>
|
|
#include <net/if_ether.h>
|
|
|
|
#if 0 /* XXX this shouldn't be necessary; else reinsert */
|
|
#ifdef INET
|
|
#include <netinet/in.h>
|
|
#include <netinet/if_inarp.h>
|
|
#endif
|
|
#endif
|
|
|
|
#include <machine/bus.h>
|
|
#include <machine/viareg.h>
|
|
|
|
#include <mac68k/dev/nubus.h>
|
|
#include <mac68k/dev/if_snreg.h>
|
|
#include <mac68k/dev/if_snvar.h>
|
|
|
|
static int sn_nubus_match __P((struct device *, struct cfdata *, void *));
|
|
static void sn_nubus_attach __P((struct device *, struct device *, void *));
|
|
static int sn_nb_card_vendor __P((bus_space_tag_t, bus_space_handle_t,
|
|
struct nubus_attach_args *));
|
|
|
|
struct cfattach sn_nubus_ca = {
|
|
sizeof(struct sn_softc), sn_nubus_match, sn_nubus_attach
|
|
};
|
|
|
|
|
|
static int
|
|
sn_nubus_match(parent, cf, aux)
|
|
struct device *parent;
|
|
struct cfdata *cf;
|
|
void *aux;
|
|
{
|
|
struct nubus_attach_args *na = (struct nubus_attach_args *) aux;
|
|
bus_space_handle_t bsh;
|
|
int rv;
|
|
|
|
if (bus_space_map(na->na_tag,
|
|
NUBUS_SLOT2PA(na->slot), NBMEMSIZE, 0, &bsh))
|
|
return (0);
|
|
|
|
rv = 0;
|
|
|
|
if (na->category == NUBUS_CATEGORY_NETWORK &&
|
|
na->type == NUBUS_TYPE_ETHERNET) {
|
|
switch (sn_nb_card_vendor(na->na_tag, bsh, na)) {
|
|
default:
|
|
break;
|
|
|
|
case SN_VENDOR_APPLE:
|
|
case SN_VENDOR_APPLE16:
|
|
case SN_VENDOR_DAYNA:
|
|
rv = 1;
|
|
break;
|
|
}
|
|
}
|
|
|
|
bus_space_unmap(na->na_tag, bsh, NBMEMSIZE);
|
|
|
|
return rv;
|
|
}
|
|
|
|
/*
|
|
* Install interface into kernel networking data structures
|
|
*/
|
|
static void
|
|
sn_nubus_attach(parent, self, aux)
|
|
struct device *parent, *self;
|
|
void *aux;
|
|
{
|
|
struct sn_softc *sc = (void *)self;
|
|
struct nubus_attach_args *na = (struct nubus_attach_args *)aux;
|
|
int i, success, offset;
|
|
bus_space_tag_t bst;
|
|
bus_space_handle_t bsh, tmp_bsh;
|
|
u_int8_t myaddr[ETHER_ADDR_LEN];
|
|
|
|
(void)(&offset); /* Work around lame gcc initialization bug */
|
|
|
|
bst = na->na_tag;
|
|
if (bus_space_map(bst, NUBUS_SLOT2PA(na->slot), NBMEMSIZE, 0, &bsh)) {
|
|
printf(": failed to map memory space.\n");
|
|
return;
|
|
}
|
|
|
|
sc->sc_regt = bst;
|
|
|
|
success = 0;
|
|
|
|
sc->slotno = na->slot;
|
|
|
|
switch (sn_nb_card_vendor(bst, bsh, na)) {
|
|
case SN_VENDOR_DAYNA:
|
|
sc->snr_dcr = DCR_ASYNC | DCR_WAIT0 |
|
|
DCR_DMABLOCK | DCR_RFT16 | DCR_TFT16;
|
|
sc->snr_dcr2 = 0;
|
|
sc->bitmode = 1; /* 32 bit card */
|
|
|
|
if (bus_space_subregion(bst, bsh,
|
|
0x00180000, SN_REGSIZE, &sc->sc_regh)) {
|
|
printf(": failed to map register space.\n");
|
|
break;
|
|
}
|
|
|
|
if (bus_space_subregion(bst, bsh,
|
|
0x00ffe004, ETHER_ADDR_LEN, &tmp_bsh)) {
|
|
printf(": failed to map ROM space.\n");
|
|
break;
|
|
}
|
|
|
|
sn_get_enaddr(bst, tmp_bsh, 0, myaddr);
|
|
|
|
offset = 2;
|
|
success = 1;
|
|
break;
|
|
|
|
case SN_VENDOR_APPLE:
|
|
sc->snr_dcr = DCR_ASYNC | DCR_WAIT0 |
|
|
DCR_DMABLOCK | DCR_RFT16 | DCR_TFT16;
|
|
sc->snr_dcr2 = 0;
|
|
sc->bitmode = 1; /* 32 bit card */
|
|
|
|
if (bus_space_subregion(bst, bsh,
|
|
0x0, SN_REGSIZE, &sc->sc_regh)) {
|
|
printf(": failed to map register space.\n");
|
|
break;
|
|
}
|
|
|
|
if (bus_space_subregion(bst, bsh,
|
|
0x40000, ETHER_ADDR_LEN, &tmp_bsh)) {
|
|
printf(": failed to map ROM space.\n");
|
|
break;
|
|
}
|
|
|
|
sn_get_enaddr(bst, tmp_bsh, 0, myaddr);
|
|
|
|
offset = 0;
|
|
success = 1;
|
|
break;
|
|
|
|
case SN_VENDOR_APPLE16:
|
|
sc->snr_dcr = DCR_ASYNC | DCR_WAIT0 | DCR_EXBUS |
|
|
DCR_DMABLOCK | DCR_PO1 | DCR_RFT16 | DCR_TFT16;
|
|
sc->snr_dcr2 = 0;
|
|
sc->bitmode = 0; /* 16 bit card */
|
|
|
|
if (bus_space_subregion(bst, bsh,
|
|
0x0, SN_REGSIZE, &sc->sc_regh)) {
|
|
printf(": failed to map register space.\n");
|
|
break;
|
|
}
|
|
|
|
if (bus_space_subregion(bst, bsh,
|
|
0x40000, ETHER_ADDR_LEN, &tmp_bsh)) {
|
|
printf(": failed to map ROM space.\n");
|
|
break;
|
|
}
|
|
|
|
sn_get_enaddr(bst, tmp_bsh, 0, myaddr);
|
|
|
|
offset = 0;
|
|
success = 1;
|
|
break;
|
|
|
|
default:
|
|
/*
|
|
* You can't actually get this default, the snmatch
|
|
* will fail for unknown hardware. If you're adding support
|
|
* for a new card, the following defaults are a
|
|
* good starting point.
|
|
*/
|
|
sc->snr_dcr = DCR_SYNC | DCR_WAIT0 | DCR_DW32 |
|
|
DCR_DMABLOCK | DCR_RFT16 | DCR_TFT16;
|
|
sc->snr_dcr2 = 0;
|
|
success = 0;
|
|
printf(": unknown card: attachment incomplete.\n");
|
|
}
|
|
|
|
if (!success) {
|
|
bus_space_unmap(bst, bsh, NBMEMSIZE);
|
|
return;
|
|
}
|
|
|
|
/* Regs are addressed as words, big endian. */
|
|
for (i = 0; i < SN_NREGS; i++) {
|
|
sc->sc_reg_map[i] = (bus_size_t)((i * 4) + offset);
|
|
}
|
|
|
|
/* snsetup returns 1 if something fails */
|
|
if (snsetup(sc, myaddr)) {
|
|
bus_space_unmap(bst, bsh, NBMEMSIZE);
|
|
return;
|
|
}
|
|
|
|
add_nubus_intr(sc->slotno, snintr, (void *)sc);
|
|
|
|
return;
|
|
}
|
|
|
|
static int
|
|
sn_nb_card_vendor(bst, bsh, na)
|
|
bus_space_tag_t bst;
|
|
bus_space_handle_t bsh;
|
|
struct nubus_attach_args *na;
|
|
{
|
|
int vendor = SN_VENDOR_UNKNOWN;
|
|
|
|
switch (na->drsw) {
|
|
case NUBUS_DRSW_3COM:
|
|
if (na->drhw == NUBUS_DRHW_APPLE_SNT)
|
|
vendor = SN_VENDOR_APPLE;
|
|
else if (na->drhw == NUBUS_DRHW_APPLE_SN)
|
|
vendor = SN_VENDOR_APPLE16;
|
|
break;
|
|
case NUBUS_DRSW_APPLE:
|
|
case NUBUS_DRSW_TECHWORKS:
|
|
vendor = SN_VENDOR_APPLE;
|
|
break;
|
|
case NUBUS_DRSW_GATOR:
|
|
if (na->drhw == NUBUS_DRHW_KINETICS &&
|
|
strncmp(nubus_get_card_name(bst, bsh, na->fmt),
|
|
"EtherPort", 9) != 0)
|
|
vendor = SN_VENDOR_DAYNA;
|
|
break;
|
|
case NUBUS_DRSW_DAYNA:
|
|
vendor = SN_VENDOR_DAYNA;
|
|
break;
|
|
}
|
|
|
|
return vendor;
|
|
}
|