317 lines
9.2 KiB
C
317 lines
9.2 KiB
C
/* $NetBSD: if_hme_pci.c,v 1.14 2004/03/17 08:58:23 martin Exp $ */
|
|
|
|
/*
|
|
* Copyright (c) 2000 Matthew R. Green
|
|
* 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. 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.
|
|
*/
|
|
|
|
/*
|
|
* PCI front-end device driver for the HME ethernet device.
|
|
*/
|
|
|
|
#include <sys/cdefs.h>
|
|
__KERNEL_RCSID(0, "$NetBSD: if_hme_pci.c,v 1.14 2004/03/17 08:58:23 martin Exp $");
|
|
|
|
#include <sys/param.h>
|
|
#include <sys/systm.h>
|
|
#include <sys/syslog.h>
|
|
#include <sys/device.h>
|
|
#include <sys/malloc.h>
|
|
#include <sys/socket.h>
|
|
|
|
#include <net/if.h>
|
|
#include <net/if_dl.h>
|
|
#include <net/if_ether.h>
|
|
#include <net/if_media.h>
|
|
|
|
#include <dev/mii/mii.h>
|
|
#include <dev/mii/miivar.h>
|
|
|
|
#include <machine/intr.h>
|
|
|
|
#include <dev/pci/pcivar.h>
|
|
#include <dev/pci/pcireg.h>
|
|
#include <dev/pci/pcidevs.h>
|
|
|
|
#include <dev/ic/hmevar.h>
|
|
#ifdef __sparc__
|
|
#include <machine/promlib.h>
|
|
#endif
|
|
|
|
#ifndef HME_USE_LOCAL_MAC_ADDRESS
|
|
#ifdef __sparc__
|
|
#define HME_USE_LOCAL_MAC_ADDRESS 0 /* use system-wide address */
|
|
#else
|
|
#define HME_USE_LOCAL_MAC_ADDRESS 1
|
|
#endif
|
|
#endif
|
|
|
|
struct hme_pci_softc {
|
|
struct hme_softc hsc_hme; /* HME device */
|
|
bus_space_tag_t hsc_memt;
|
|
bus_space_handle_t hsc_memh;
|
|
void *hsc_ih;
|
|
};
|
|
|
|
int hmematch_pci __P((struct device *, struct cfdata *, void *));
|
|
void hmeattach_pci __P((struct device *, struct device *, void *));
|
|
|
|
CFATTACH_DECL(hme_pci, sizeof(struct hme_pci_softc),
|
|
hmematch_pci, hmeattach_pci, NULL, NULL);
|
|
|
|
int
|
|
hmematch_pci(parent, cf, aux)
|
|
struct device *parent;
|
|
struct cfdata *cf;
|
|
void *aux;
|
|
{
|
|
struct pci_attach_args *pa = aux;
|
|
|
|
if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_SUN &&
|
|
PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_SUN_HMENETWORK)
|
|
return (1);
|
|
|
|
return (0);
|
|
}
|
|
|
|
void
|
|
hmeattach_pci(parent, self, aux)
|
|
struct device *parent, *self;
|
|
void *aux;
|
|
{
|
|
struct pci_attach_args *pa = aux;
|
|
struct hme_pci_softc *hsc = (void *)self;
|
|
struct hme_softc *sc = &hsc->hsc_hme;
|
|
pci_intr_handle_t ih;
|
|
pcireg_t csr;
|
|
const char *intrstr;
|
|
int type;
|
|
#if HME_USE_LOCAL_MAC_ADDRESS
|
|
struct pci_attach_args ebus_pa;
|
|
pcireg_t ebus_cl, ebus_id;
|
|
u_int8_t *enaddr;
|
|
bus_space_tag_t romt;
|
|
bus_space_handle_t romh;
|
|
bus_size_t romsize;
|
|
u_int8_t buf[32];
|
|
int dataoff, vpdoff;
|
|
struct pci_vpd *vpd;
|
|
static const u_int8_t promhdr[] = { 0x55, 0xaa };
|
|
#define PROMHDR_PTR_DATA 0x18
|
|
static const u_int8_t promdat[] = {
|
|
0x50, 0x43, 0x49, 0x52, /* "PCIR" */
|
|
PCI_VENDOR_SUN & 0xff, PCI_VENDOR_SUN >> 8,
|
|
PCI_PRODUCT_SUN_HMENETWORK & 0xff,
|
|
PCI_PRODUCT_SUN_HMENETWORK >> 8
|
|
};
|
|
#define PROMDATA_PTR_VPD 0x08
|
|
#define PROMDATA_DATA2 0x0a
|
|
static const u_int8_t promdat2[] = {
|
|
0x18, 0x00, /* structure length */
|
|
0x00, /* structure revision */
|
|
0x00, /* interface revision */
|
|
PCI_SUBCLASS_NETWORK_ETHERNET, /* subclass code */
|
|
PCI_CLASS_NETWORK /* class code */
|
|
};
|
|
#endif /* HME_USE_LOCAL_MAC_ADDRESS */
|
|
|
|
printf(": Sun Happy Meal Ethernet, rev. %d\n",
|
|
PCI_REVISION(pa->pa_class));
|
|
|
|
/*
|
|
* enable io/memory-space accesses. this is kinda of gross; but
|
|
# the hme comes up with neither IO space enabled, or memory space.
|
|
*/
|
|
if (pa->pa_memt)
|
|
pa->pa_flags |= PCI_FLAGS_MEM_ENABLED;
|
|
if (pa->pa_iot)
|
|
pa->pa_flags |= PCI_FLAGS_IO_ENABLED;
|
|
csr = pci_conf_read(pa->pa_pc, pa->pa_tag, PCI_COMMAND_STATUS_REG);
|
|
if (pa->pa_memt) {
|
|
type = PCI_MAPREG_TYPE_MEM;
|
|
csr |= PCI_COMMAND_MEM_ENABLE;
|
|
sc->sc_bustag = pa->pa_memt;
|
|
} else {
|
|
type = PCI_MAPREG_TYPE_IO;
|
|
csr |= PCI_COMMAND_IO_ENABLE;
|
|
sc->sc_bustag = pa->pa_iot;
|
|
}
|
|
pci_conf_write(pa->pa_pc, pa->pa_tag, PCI_COMMAND_STATUS_REG,
|
|
csr | PCI_COMMAND_MEM_ENABLE);
|
|
|
|
sc->sc_dmatag = pa->pa_dmat;
|
|
|
|
sc->sc_pci = 1; /* XXXXX should all be done in bus_dma. */
|
|
/*
|
|
* Map five register banks:
|
|
*
|
|
* bank 0: HME SEB registers: +0x0000
|
|
* bank 1: HME ETX registers: +0x2000
|
|
* bank 2: HME ERX registers: +0x4000
|
|
* bank 3: HME MAC registers: +0x6000
|
|
* bank 4: HME MIF registers: +0x7000
|
|
*
|
|
*/
|
|
|
|
#define PCI_HME_BASEADDR 0x10
|
|
if (pci_mapreg_map(pa, PCI_HME_BASEADDR, type, 0,
|
|
&hsc->hsc_memt, &hsc->hsc_memh, NULL, NULL) != 0)
|
|
{
|
|
printf("%s: unable to map device registers\n",
|
|
sc->sc_dev.dv_xname);
|
|
return;
|
|
}
|
|
sc->sc_seb = hsc->hsc_memh;
|
|
if (bus_space_subregion(hsc->hsc_memt, hsc->hsc_memh, 0x2000,
|
|
0x1000, &sc->sc_etx)) {
|
|
printf("%s: unable to subregion ETX registers\n",
|
|
sc->sc_dev.dv_xname);
|
|
return;
|
|
}
|
|
if (bus_space_subregion(hsc->hsc_memt, hsc->hsc_memh, 0x4000,
|
|
0x1000, &sc->sc_erx)) {
|
|
printf("%s: unable to subregion ERX registers\n",
|
|
sc->sc_dev.dv_xname);
|
|
return;
|
|
}
|
|
if (bus_space_subregion(hsc->hsc_memt, hsc->hsc_memh, 0x6000,
|
|
0x1000, &sc->sc_mac)) {
|
|
printf("%s: unable to subregion MAC registers\n",
|
|
sc->sc_dev.dv_xname);
|
|
return;
|
|
}
|
|
if (bus_space_subregion(hsc->hsc_memt, hsc->hsc_memh, 0x7000,
|
|
0x1000, &sc->sc_mif)) {
|
|
printf("%s: unable to subregion MIF registers\n",
|
|
sc->sc_dev.dv_xname);
|
|
return;
|
|
}
|
|
|
|
#if HME_USE_LOCAL_MAC_ADDRESS
|
|
/*
|
|
* Dig out VPD (vital product data) and acquire Ethernet address.
|
|
* The VPD of hme resides in the Boot PROM (PCI FCode) attached
|
|
* to the EBus interface.
|
|
*/
|
|
/*
|
|
* ``Writing FCode 3.x Programs'' (newer ones, dated 1997 and later)
|
|
* chapter 2 describes the data structure.
|
|
*/
|
|
|
|
enaddr = NULL;
|
|
|
|
/* get a PCI tag for the EBus bridge (function 0 of the same device) */
|
|
ebus_pa = *pa;
|
|
ebus_pa.pa_tag = pci_make_tag(pa->pa_pc, pa->pa_bus, pa->pa_device, 0);
|
|
|
|
ebus_cl = pci_conf_read(ebus_pa.pa_pc, ebus_pa.pa_tag, PCI_CLASS_REG);
|
|
ebus_id = pci_conf_read(ebus_pa.pa_pc, ebus_pa.pa_tag, PCI_ID_REG);
|
|
|
|
#define PCI_EBUS2_BOOTROM 0x10
|
|
if (PCI_CLASS(ebus_cl) == PCI_CLASS_BRIDGE &&
|
|
PCI_PRODUCT(ebus_id) == PCI_PRODUCT_SUN_EBUS &&
|
|
pci_mapreg_map(&ebus_pa, PCI_EBUS2_BOOTROM, PCI_MAPREG_TYPE_MEM,
|
|
BUS_SPACE_MAP_CACHEABLE | BUS_SPACE_MAP_PREFETCHABLE,
|
|
&romt, &romh, 0, &romsize) == 0) {
|
|
|
|
/* read PCI Expansion PROM Header */
|
|
bus_space_read_region_1(romt, romh, 0, buf, sizeof buf);
|
|
if (memcmp(buf, promhdr, sizeof promhdr) == 0 &&
|
|
(dataoff = (buf[PROMHDR_PTR_DATA] |
|
|
(buf[PROMHDR_PTR_DATA + 1] << 8))) >= 0x1c) {
|
|
|
|
/* read PCI Expansion PROM Data */
|
|
bus_space_read_region_1(romt, romh, dataoff,
|
|
buf, sizeof buf);
|
|
if (memcmp(buf, promdat, sizeof promdat) == 0 &&
|
|
memcmp(buf + PROMDATA_DATA2, promdat2,
|
|
sizeof promdat2) == 0 &&
|
|
(vpdoff = (buf[PROMDATA_PTR_VPD] |
|
|
(buf[PROMDATA_PTR_VPD + 1] << 8))) >= 0x1c) {
|
|
|
|
/*
|
|
* The VPD of hme is not in PCI 2.2 standard
|
|
* format. The length in the resource header
|
|
* is in big endian, and resources are not
|
|
* properly terminated (only one resource
|
|
* and no end tag).
|
|
*/
|
|
/* read PCI VPD */
|
|
bus_space_read_region_1(romt, romh,
|
|
vpdoff, buf, sizeof buf);
|
|
vpd = (void *)(buf + 3);
|
|
if (PCI_VPDRES_ISLARGE(buf[0]) &&
|
|
PCI_VPDRES_LARGE_NAME(buf[0])
|
|
== PCI_VPDRES_TYPE_VPD &&
|
|
/* buf[1] == 0 && buf[2] == 9 && */ /*len*/
|
|
vpd->vpd_key0 == 0x4e /* N */ &&
|
|
vpd->vpd_key1 == 0x41 /* A */ &&
|
|
vpd->vpd_len == ETHER_ADDR_LEN) {
|
|
/*
|
|
* Ethernet address found
|
|
*/
|
|
enaddr = buf + 6;
|
|
}
|
|
}
|
|
}
|
|
bus_space_unmap(romt, romh, romsize);
|
|
}
|
|
|
|
if (enaddr)
|
|
memcpy(sc->sc_enaddr, enaddr, ETHER_ADDR_LEN);
|
|
else
|
|
#endif /* HME_USE_LOCAL_MAC_ADDRESS */
|
|
#ifdef __sparc__
|
|
prom_getether(PCITAG_NODE(pa->pa_tag), sc->sc_enaddr);
|
|
#else
|
|
printf("%s: no Ethernet address found\n", sc->sc_dev.dv_xname);
|
|
#endif
|
|
|
|
/*
|
|
* Map and establish our interrupt.
|
|
*/
|
|
if (pci_intr_map(pa, &ih) != 0) {
|
|
printf("%s: unable to map interrupt\n", sc->sc_dev.dv_xname);
|
|
return;
|
|
}
|
|
intrstr = pci_intr_string(pa->pa_pc, ih);
|
|
hsc->hsc_ih = pci_intr_establish(pa->pa_pc, ih, IPL_NET, hme_intr, sc);
|
|
if (hsc->hsc_ih == NULL) {
|
|
printf("%s: unable to establish interrupt",
|
|
sc->sc_dev.dv_xname);
|
|
if (intrstr != NULL)
|
|
printf(" at %s", intrstr);
|
|
printf("\n");
|
|
return;
|
|
}
|
|
printf("%s: interrupting at %s\n", sc->sc_dev.dv_xname, intrstr);
|
|
|
|
sc->sc_burst = 16; /* XXX */
|
|
|
|
/* Finish off the attach. */
|
|
hme_config(sc);
|
|
}
|