NetBSD/sys/dev/mca/if_tra_mca.c
2006-08-30 16:59:34 +00:00

260 lines
7.2 KiB
C

/* $NetBSD: if_tra_mca.c,v 1.5 2006/08/30 16:59:34 christos Exp $ */
/*-
* Copyright (c) 2004 The NetBSD Foundation, Inc.
* All rights reserved.
*
* This code is derived from software contributed to The NetBSD Foundation
* by Jaromir Dolecek.
*
* 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 NetBSD
* Foundation, Inc. and its contributors.
* 4. Neither the name of The NetBSD Foundation 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 NETBSD FOUNDATION, INC. 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 FOUNDATION 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.
*/
/*
* Driver for Tiara LANCard/E II and friends adapted from if_ate_mca.c
* by Dave J. Barnes 2004.
*/
#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: if_tra_mca.c,v 1.5 2006/08/30 16:59:34 christos Exp $");
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/device.h>
#include <sys/socket.h>
#include <sys/syslog.h>
#include <net/if.h>
#include <net/if_ether.h>
#include <net/if_media.h>
#include <machine/bus.h>
#include <machine/intr.h>
#include <dev/ic/mb86950reg.h>
#include <dev/ic/mb86950var.h>
#include <dev/mca/mcavar.h>
#include <dev/mca/mcadevs.h>
int tiara_mca_match __P((struct device *, struct cfdata *, void *));
void tiara_mca_attach __P((struct device *, struct device *, void *));
#define TIARA_NPORTS 0x20 /* 32 */
#define TIARA_PROM_ID 24 /* offset to mac addr stored in prom */
struct tiara_softc {
struct mb86950_softc sc_mb86950; /* real "mb86950" softc */
/* MCA-specific goo. */
void *sc_ih; /* interrupt cookie */
};
CFATTACH_DECL(tra_mca, sizeof(struct tiara_softc),
tiara_mca_match, tiara_mca_attach, NULL, NULL);
static const struct tiara_mca_product {
u_int32_t tra_prodid; /* MCA product ID */
const char *tra_name; /* device name */
} tiara_mca_products[] = {
{ MCA_PRODUCT_TIARA, "Tiara LANCard/E2"},
{ MCA_PRODUCT_TIARA_TP, "Tiara LANCard/E2 TP"},
{ MCA_PRODUCT_SMC3016, "SMC 3016/MC"},
{ 0, NULL },
};
static const struct tiara_mca_product *tiara_mca_lookup __P((u_int32_t));
static const struct tiara_mca_product *
tiara_mca_lookup(id)
u_int32_t id;
{
const struct tiara_mca_product *tra_p;
for (tra_p = tiara_mca_products; tra_p->tra_name != NULL; tra_p++)
if (id == tra_p->tra_prodid)
return (tra_p);
return (NULL);
}
int
tiara_mca_match(parent, match, aux)
struct device *parent;
struct cfdata *match;
void *aux;
{
struct mca_attach_args *ma = (struct mca_attach_args *) aux;
if (tiara_mca_lookup(ma->ma_id) != NULL)
return (1);
return (0);
}
/* see POS diagrams below for explanation */
static const int tiara_irq[] = {
3, 4, 7, 9
};
static const int smc_iobase[] = {
0x300, 0x340, 0x360, 0x1980, 0x2000, 0x5680, 0x5900, 0x8080
};
static const int smc_irq[] = {
9, 10, 11, 15, 3, 5, 7, 4
};
void
tiara_mca_attach(parent, self, aux)
struct device *parent, *self;
void *aux;
{
struct tiara_softc *isc = device_private(self);
struct mb86950_softc *sc = &isc->sc_mb86950;
struct mca_attach_args *ma = aux;
bus_space_tag_t iot = ma->ma_iot;
bus_space_handle_t ioh;
u_int8_t myea[ETHER_ADDR_LEN];
int pos2;
int iobase = 0, irq = 0;
const struct tiara_mca_product *tra_p;
pos2 = mca_conf_read(ma->ma_mc, ma->ma_slot, 2);
tra_p = tiara_mca_lookup(ma->ma_id);
switch (tra_p->tra_prodid) {
case MCA_PRODUCT_TIARA:
case MCA_PRODUCT_TIARA_TP:
/*
* POS register 2: (adf pos0)
* 7 6 5 4 3 2 1 0
* \_____/ \_/ \ \__ enable: 0=disabled, 1=enabled
* \ \ \___ boot rom: 0=disabled, 1=enabled
* \ \______ IRQ 00=3 01=4 10=7 11=9
* \_________ Base I/O Port
* 0000=0x1200 0001=0x1220 ... 1110=0x13c0 1111=0x13e0
*
* POS register 3: (adf pos1) not used
* POS register 4: (adf pos2) not used
*
* POS register 5: (adf pos3) ignored
*
* 7 6 5 4 3 2 1 0
* 1 1 0 X \____/
* \____EPROM Address
*/
iobase = 0x1200 + ((pos2 & 0xf0) << 1);
irq = tiara_irq[((pos2 & 0x0c) >> 2)];
/* XXX SWAG for number pkts. */
/* My Tiara LANCard has 128K memory ?!? */
sc->txb_num_pkt = 4;
sc->rxb_num_pkt = (65535 - 8192 - 4) / 64;
/* XXX */
break;
case MCA_PRODUCT_SMC3016:
/*
* POS register 2: (adf pos0)
* 7 6 5 4 3 2 1 0
* \_____/ \___/ \__ enable: 0=disabled, 1=enabled
* \ \_____ I/O Address (see ioaddr table)
* \__________ IRQ (see irq table)
*
* POS register 3: (adf pos1) ignored
* 7 6 5 4 3 2 1 0
* X X X X \____/
* \____EPROM Address (0000 = not used)
*/
iobase = smc_iobase[((pos2 & 0x0e) >> 1)];
if ((pos2 & 0x80) != 0)
irq = smc_irq[((pos2 & 0x70) >> 4)];
else {
printf("%s: unsupported irq selected\n",
sc->sc_dev.dv_xname);
return;
}
/* XXX SWAG for number pkts. */
/* The SMC3016 has a 12K rx buffer and a 4k tx buffer */
sc->txb_num_pkt = 2;
sc->rxb_num_pkt = (12288 - 4) / 64;
/* XXX */
break;
}
#ifdef DIAGNOSTIC
tra_p = tiara_mca_lookup(ma->ma_id);
if (tra_p == NULL) {
printf("\n%s: where did the card go?\n", sc->sc_dev.dv_xname);
return;
}
#endif
printf(" slot %d ports %#x-%#x irq %d: %s\n", ma->ma_slot + 1,iobase, iobase + TIARA_NPORTS, irq, tra_p->tra_name);
/* Map i/o space. */
if (bus_space_map(iot, iobase, TIARA_NPORTS, 0, &ioh)) {
printf("%s: can't map i/o space\n", sc->sc_dev.dv_xname);
return;
}
sc->sc_bst = iot;
sc->sc_bsh = ioh;
/* Get ethernet address from PROM */
bus_space_read_region_1(iot, ioh, TIARA_PROM_ID, myea, ETHER_ADDR_LEN);
/* This interface is always enabled. */
/* XXX
sc->sc_stat |= NIC_STAT_ENABLED;
*/
/*
* Do generic MB86950 attach.
*/
mb86950_attach(sc, myea);
mb86950_config(sc, NULL, 0, 0);
/* Establish the interrupt handler. */
isc->sc_ih = mca_intr_establish(ma->ma_mc, irq, IPL_NET,
mb86950_intr, sc);
if (isc->sc_ih == NULL) {
printf("%s: couldn't establish interrupt handler\n",
sc->sc_dev.dv_xname);
return;
}
}