Home | History | Annotate | Line # | Download | only in pci
if_hme_pci.c revision 1.17
      1 /*	$NetBSD: if_hme_pci.c,v 1.17 2005/04/21 11:35:01 christos Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 2000 Matthew R. Green
      5  * All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  * 3. The name of the author may not be used to endorse or promote products
     16  *    derived from this software without specific prior written permission.
     17  *
     18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     19  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     20  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     21  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     22  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
     23  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
     24  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
     25  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
     26  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     27  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     28  * SUCH DAMAGE.
     29  */
     30 
     31 /*
     32  * PCI front-end device driver for the HME ethernet device.
     33  */
     34 
     35 #include <sys/cdefs.h>
     36 __KERNEL_RCSID(0, "$NetBSD: if_hme_pci.c,v 1.17 2005/04/21 11:35:01 christos Exp $");
     37 
     38 #include <sys/param.h>
     39 #include <sys/systm.h>
     40 #include <sys/syslog.h>
     41 #include <sys/device.h>
     42 #include <sys/malloc.h>
     43 #include <sys/socket.h>
     44 
     45 #include <net/if.h>
     46 #include <net/if_dl.h>
     47 #include <net/if_ether.h>
     48 #include <net/if_media.h>
     49 
     50 #include <dev/mii/mii.h>
     51 #include <dev/mii/miivar.h>
     52 
     53 #include <machine/intr.h>
     54 
     55 #include <dev/pci/pcivar.h>
     56 #include <dev/pci/pcireg.h>
     57 #include <dev/pci/pcidevs.h>
     58 
     59 #include <dev/ic/hmevar.h>
     60 #ifdef __sparc__
     61 #include <machine/promlib.h>
     62 #endif
     63 
     64 #ifndef HME_USE_LOCAL_MAC_ADDRESS
     65 #ifdef __sparc__
     66 #define HME_USE_LOCAL_MAC_ADDRESS	0	/* use system-wide address */
     67 #else
     68 #define HME_USE_LOCAL_MAC_ADDRESS	1
     69 #endif
     70 #endif
     71 
     72 struct hme_pci_softc {
     73 	struct	hme_softc	hsc_hme;	/* HME device */
     74 	bus_space_tag_t		hsc_memt;
     75 	bus_space_handle_t	hsc_memh;
     76 	void			*hsc_ih;
     77 };
     78 
     79 int	hmematch_pci(struct device *, struct cfdata *, void *);
     80 void	hmeattach_pci(struct device *, struct device *, void *);
     81 
     82 CFATTACH_DECL(hme_pci, sizeof(struct hme_pci_softc),
     83     hmematch_pci, hmeattach_pci, NULL, NULL);
     84 
     85 int
     86 hmematch_pci(parent, cf, aux)
     87 	struct device *parent;
     88 	struct cfdata *cf;
     89 	void *aux;
     90 {
     91 	struct pci_attach_args *pa = aux;
     92 
     93 	if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_SUN &&
     94 	    PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_SUN_HMENETWORK)
     95 		return (1);
     96 
     97 	return (0);
     98 }
     99 
    100 void
    101 hmeattach_pci(parent, self, aux)
    102 	struct device *parent, *self;
    103 	void *aux;
    104 {
    105 	struct pci_attach_args *pa = aux;
    106 	struct hme_pci_softc *hsc = (void *)self;
    107 	struct hme_softc *sc = &hsc->hsc_hme;
    108 	pci_intr_handle_t ih;
    109 	pcireg_t csr;
    110 	const char *intrstr;
    111 	int type;
    112 #if HME_USE_LOCAL_MAC_ADDRESS
    113 	struct pci_attach_args	ebus_pa;
    114 	pcireg_t		ebus_cl, ebus_id;
    115 	u_int8_t		*enaddr;
    116 	bus_space_tag_t		romt;
    117 	bus_space_handle_t	romh;
    118 	bus_size_t		romsize;
    119 	u_int8_t		buf[64];
    120 	int			dataoff, vpdoff;
    121 	struct pci_vpd		*vpd;
    122 	static const u_int8_t promhdr[] = { 0x55, 0xaa };
    123 #define PROMHDR_PTR_DATA	0x18
    124 	static const u_int8_t promdat[] = {
    125 		0x50, 0x43, 0x49, 0x52,		/* "PCIR" */
    126 		PCI_VENDOR_SUN & 0xff, PCI_VENDOR_SUN >> 8,
    127 		PCI_PRODUCT_SUN_HMENETWORK & 0xff,
    128 		PCI_PRODUCT_SUN_HMENETWORK >> 8
    129 	};
    130 #define PROMDATA_PTR_VPD	0x08
    131 #define PROMDATA_DATA2		0x0a
    132 	static const u_int8_t promdat2hme[] = {
    133 		0x18, 0x00,			/* structure length */
    134 		0x00,				/* structure revision */
    135 		0x00,				/* interface revision */
    136 		PCI_SUBCLASS_NETWORK_ETHERNET,	/* subclass code */
    137 		PCI_CLASS_NETWORK		/* class code */
    138 	};
    139 	static const u_int8_t promdat2qfe[] = {
    140 		0x00,				/* structure revision */
    141 		0x80,				/* interface revision */
    142 		PCI_SUBCLASS_NETWORK_ETHERNET,	/* subclass code */
    143 		PCI_CLASS_NETWORK		/* class code */
    144 	};
    145 #endif	/* HME_USE_LOCAL_MAC_ADDRESS */
    146 
    147 	printf(": Sun Happy Meal Ethernet, rev. %d\n",
    148 	    PCI_REVISION(pa->pa_class));
    149 
    150 	/*
    151 	 * enable io/memory-space accesses.  this is kinda of gross; but
    152 	 # the hme comes up with neither IO space enabled, or memory space.
    153 	 */
    154 	if (pa->pa_memt)
    155 		pa->pa_flags |= PCI_FLAGS_MEM_ENABLED;
    156 	if (pa->pa_iot)
    157 		pa->pa_flags |= PCI_FLAGS_IO_ENABLED;
    158 	csr = pci_conf_read(pa->pa_pc, pa->pa_tag, PCI_COMMAND_STATUS_REG);
    159 	if (pa->pa_memt) {
    160 		type = PCI_MAPREG_TYPE_MEM;
    161 		csr |= PCI_COMMAND_MEM_ENABLE;
    162 		sc->sc_bustag = pa->pa_memt;
    163 	} else {
    164 		type = PCI_MAPREG_TYPE_IO;
    165 		csr |= PCI_COMMAND_IO_ENABLE;
    166 		sc->sc_bustag = pa->pa_iot;
    167 	}
    168 	pci_conf_write(pa->pa_pc, pa->pa_tag, PCI_COMMAND_STATUS_REG,
    169 	    csr | PCI_COMMAND_MEM_ENABLE);
    170 
    171 	sc->sc_dmatag = pa->pa_dmat;
    172 
    173 	sc->sc_pci = 1; /* XXXXX should all be done in bus_dma. */
    174 	/*
    175 	 * Map five register banks:
    176 	 *
    177 	 *	bank 0: HME SEB registers:	+0x0000
    178 	 *	bank 1: HME ETX registers:	+0x2000
    179 	 *	bank 2: HME ERX registers:	+0x4000
    180 	 *	bank 3: HME MAC registers:	+0x6000
    181 	 *	bank 4: HME MIF registers:	+0x7000
    182 	 *
    183 	 */
    184 
    185 #define PCI_HME_BASEADDR	0x10
    186 	if (pci_mapreg_map(pa, PCI_HME_BASEADDR, type, 0,
    187 	    &hsc->hsc_memt, &hsc->hsc_memh, NULL, NULL) != 0)
    188 	{
    189 		printf("%s: unable to map device registers\n",
    190 		    sc->sc_dev.dv_xname);
    191 		return;
    192 	}
    193 	sc->sc_seb = hsc->hsc_memh;
    194 	if (bus_space_subregion(hsc->hsc_memt, hsc->hsc_memh, 0x2000,
    195 	    0x1000, &sc->sc_etx)) {
    196 		printf("%s: unable to subregion ETX registers\n",
    197 		    sc->sc_dev.dv_xname);
    198 		return;
    199 	}
    200 	if (bus_space_subregion(hsc->hsc_memt, hsc->hsc_memh, 0x4000,
    201 	    0x1000, &sc->sc_erx)) {
    202 		printf("%s: unable to subregion ERX registers\n",
    203 		    sc->sc_dev.dv_xname);
    204 		return;
    205 	}
    206 	if (bus_space_subregion(hsc->hsc_memt, hsc->hsc_memh, 0x6000,
    207 	    0x1000, &sc->sc_mac)) {
    208 		printf("%s: unable to subregion MAC registers\n",
    209 		    sc->sc_dev.dv_xname);
    210 		return;
    211 	}
    212 	if (bus_space_subregion(hsc->hsc_memt, hsc->hsc_memh, 0x7000,
    213 	    0x1000, &sc->sc_mif)) {
    214 		printf("%s: unable to subregion MIF registers\n",
    215 		    sc->sc_dev.dv_xname);
    216 		return;
    217 	}
    218 
    219 #if HME_USE_LOCAL_MAC_ADDRESS
    220 	/*
    221 	 * Dig out VPD (vital product data) and acquire Ethernet address.
    222 	 * The VPD of hme resides in the Boot PROM (PCI FCode) attached
    223 	 * to the EBus interface.
    224 	 */
    225 	/*
    226 	 * ``Writing FCode 3.x Programs'' (newer ones, dated 1997 and later)
    227 	 * chapter 2 describes the data structure.
    228 	 */
    229 
    230 	enaddr = NULL;
    231 
    232 	/* get a PCI tag for the EBus bridge (function 0 of the same device) */
    233 	ebus_pa = *pa;
    234 	ebus_pa.pa_tag = pci_make_tag(pa->pa_pc, pa->pa_bus, pa->pa_device, 0);
    235 
    236 	ebus_cl = pci_conf_read(ebus_pa.pa_pc, ebus_pa.pa_tag, PCI_CLASS_REG);
    237 	ebus_id = pci_conf_read(ebus_pa.pa_pc, ebus_pa.pa_tag, PCI_ID_REG);
    238 
    239 #define PCI_EBUS2_BOOTROM	0x10
    240 	if (PCI_CLASS(ebus_cl) == PCI_CLASS_BRIDGE &&
    241 	    PCI_PRODUCT(ebus_id) == PCI_PRODUCT_SUN_EBUS &&
    242 	    pci_mapreg_map(&ebus_pa, PCI_EBUS2_BOOTROM, PCI_MAPREG_TYPE_MEM,
    243 		BUS_SPACE_MAP_CACHEABLE | BUS_SPACE_MAP_PREFETCHABLE,
    244 		&romt, &romh, 0, &romsize) == 0) {
    245 
    246 		/* read PCI Expansion PROM Header */
    247 		bus_space_read_region_1(romt, romh, 0, buf, sizeof buf);
    248 		if (memcmp(buf, promhdr, sizeof promhdr) == 0 &&
    249 		    (dataoff = (buf[PROMHDR_PTR_DATA] |
    250 			(buf[PROMHDR_PTR_DATA + 1] << 8))) >= 0x1c) {
    251 
    252 			/* read PCI Expansion PROM Data */
    253 			bus_space_read_region_1(romt, romh, dataoff,
    254 			    buf, sizeof buf);
    255 			if (memcmp(buf, promdat, sizeof promdat) == 0 &&
    256 			    (memcmp(buf + PROMDATA_DATA2, promdat2hme,
    257 				sizeof promdat2hme) == 0 ||
    258 			     memcmp(buf + PROMDATA_DATA2, promdat2qfe,
    259 				sizeof promdat2qfe) == 0) &&
    260 			    (vpdoff = (buf[PROMDATA_PTR_VPD] |
    261 				(buf[PROMDATA_PTR_VPD + 1] << 8))) >= 0x1c) {
    262 
    263 				/*
    264 				 * The VPD of hme is not in PCI 2.2 standard
    265 				 * format.  The length in the resource header
    266 				 * is in big endian, and resources are not
    267 				 * properly terminated (only one resource
    268 				 * and no end tag).
    269 				 */
    270 				if (bus_space_read_1(romt, romh,
    271 				    vpdoff + (3 + sizeof(struct pci_vpd)) +
    272 				    ETHER_ADDR_LEN) != 0x79 &&
    273 				    bus_space_read_1(romt, romh,
    274 				    vpdoff + 4 * (3 + sizeof(struct pci_vpd) +
    275 				    ETHER_ADDR_LEN)) == 0x79) {
    276 					/*
    277 					 * Use the Nth NA for the Nth HME on
    278 					 * this SUNW,qfe.
    279 					 */
    280 					vpdoff += pa->pa_device *
    281 					    (3 + sizeof(struct pci_vpd) +
    282 					    ETHER_ADDR_LEN);
    283 				}
    284 				/* read PCI VPD */
    285 				bus_space_read_region_1(romt, romh,
    286 				    vpdoff, buf, sizeof buf);
    287 				vpd = (void *)(buf + 3);
    288 				if (PCI_VPDRES_ISLARGE(buf[0]) &&
    289 				    PCI_VPDRES_LARGE_NAME(buf[0])
    290 					== PCI_VPDRES_TYPE_VPD &&
    291 				    /* buf[1] == 0 && buf[2] == 9 && */ /*len*/
    292 				    vpd->vpd_key0 == 0x4e /* N */ &&
    293 				    vpd->vpd_key1 == 0x41 /* A */ &&
    294 				    vpd->vpd_len == ETHER_ADDR_LEN) {
    295 					/*
    296 					 * Ethernet address found
    297 					 */
    298 					enaddr = buf + 6;
    299 				}
    300 			}
    301 		}
    302 		bus_space_unmap(romt, romh, romsize);
    303 	}
    304 
    305 	if (enaddr)
    306 		memcpy(sc->sc_enaddr, enaddr, ETHER_ADDR_LEN);
    307 	else
    308 #endif	/* HME_USE_LOCAL_MAC_ADDRESS */
    309 #ifdef __sparc__
    310 		prom_getether(PCITAG_NODE(pa->pa_tag), sc->sc_enaddr);
    311 #else
    312 		printf("%s: no Ethernet address found\n", sc->sc_dev.dv_xname);
    313 #endif
    314 
    315 	/*
    316 	 * Map and establish our interrupt.
    317 	 */
    318 	if (pci_intr_map(pa, &ih) != 0) {
    319 		printf("%s: unable to map interrupt\n", sc->sc_dev.dv_xname);
    320 		return;
    321 	}
    322 	intrstr = pci_intr_string(pa->pa_pc, ih);
    323 	hsc->hsc_ih = pci_intr_establish(pa->pa_pc, ih, IPL_NET, hme_intr, sc);
    324 	if (hsc->hsc_ih == NULL) {
    325 		printf("%s: unable to establish interrupt",
    326 		    sc->sc_dev.dv_xname);
    327 		if (intrstr != NULL)
    328 			printf(" at %s", intrstr);
    329 		printf("\n");
    330 		return;
    331 	}
    332 	printf("%s: interrupting at %s\n", sc->sc_dev.dv_xname, intrstr);
    333 
    334 	sc->sc_burst = 16;	/* XXX */
    335 
    336 	/* Finish off the attach. */
    337 	hme_config(sc);
    338 }
    339