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