if_gem_pci.c revision 1.29.4.5 1 /* $NetBSD: if_gem_pci.c,v 1.29.4.5 2010/03/11 15:03:46 yamt Exp $ */
2
3 /*
4 *
5 * Copyright (C) 2001 Eduardo Horvath.
6 * All rights reserved.
7 *
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 *
18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND
19 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE
22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
24 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
25 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
26 * LIABILITY, 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 /*
33 * PCI bindings for Apple GMAC, Sun ERI and Sun GEM Ethernet controllers
34 */
35
36 #include <sys/cdefs.h>
37 __KERNEL_RCSID(0, "$NetBSD: if_gem_pci.c,v 1.29.4.5 2010/03/11 15:03:46 yamt Exp $");
38
39 #include <sys/param.h>
40 #include <sys/systm.h>
41 #include <sys/malloc.h>
42 #include <sys/kernel.h>
43 #include <sys/socket.h>
44 #include <sys/errno.h>
45 #include <sys/device.h>
46
47 #include <machine/endian.h>
48
49 #include <uvm/uvm_extern.h>
50
51 #include <net/if.h>
52 #include <net/if_dl.h>
53 #include <net/if_media.h>
54 #include <net/if_ether.h>
55
56 #include <net/bpf.h>
57
58 #include <sys/bus.h>
59 #include <sys/intr.h>
60
61 #include <dev/mii/mii.h>
62 #include <dev/mii/miivar.h>
63 #include <dev/mii/mii_bitbang.h>
64
65 #include <dev/ic/gemreg.h>
66 #include <dev/ic/gemvar.h>
67
68 #include <dev/pci/pcivar.h>
69 #include <dev/pci/pcireg.h>
70 #include <dev/pci/pcidevs.h>
71 #include <prop/proplib.h>
72
73 struct gem_pci_softc {
74 struct gem_softc gsc_gem; /* GEM device */
75 void *gsc_ih;
76 pci_chipset_tag_t gsc_pc;
77 pci_intr_handle_t gsc_handle;
78 };
79
80 static bool gem_pci_estintr(struct gem_pci_softc *);
81 static bool gem_pci_suspend(device_t, const pmf_qual_t *);
82 static bool gem_pci_resume(device_t, const pmf_qual_t *);
83 static int gem_pci_detach(device_t, int);
84
85 int gem_pci_match(device_t, cfdata_t, void *);
86 void gem_pci_attach(device_t, device_t, void *);
87
88 CFATTACH_DECL3_NEW(gem_pci, sizeof(struct gem_pci_softc),
89 gem_pci_match, gem_pci_attach, gem_pci_detach, NULL, NULL, NULL,
90 DVF_DETACH_SHUTDOWN);
91
92 /*
93 * Attach routines need to be split out to different bus-specific files.
94 */
95
96 int
97 gem_pci_match(device_t parent, cfdata_t cf, void *aux)
98 {
99 struct pci_attach_args *pa = aux;
100
101 if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_SUN &&
102 (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_SUN_ERINETWORK ||
103 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_SUN_GEMNETWORK))
104 return (1);
105
106 if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_APPLE &&
107 (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_GMAC ||
108 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_GMAC2 ||
109 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_GMAC3 ||
110 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_SHASTA_GMAC ||
111 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_K2_GMAC ||
112 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_SHASTA_GMAC ||
113 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_INTREPID2_GMAC))
114 return (1);
115
116
117 return (0);
118 }
119
120 static inline int
121 gempromvalid(u_int8_t* buf)
122 {
123 return buf[0] == 0x18 && buf[1] == 0x00 && /* structure length */
124 buf[2] == 0x00 && /* revision */
125 (buf[3] == 0x00 || /* hme */
126 buf[3] == 0x80) && /* qfe */
127 buf[4] == PCI_SUBCLASS_NETWORK_ETHERNET && /* subclass code */
128 buf[5] == PCI_CLASS_NETWORK; /* class code */
129 }
130
131 static inline int
132 isshared_pins(u_int8_t* buf)
133 {
134 return buf[0] == 's' && buf[1] == 'h' && buf[2] == 'a' &&
135 buf[3] == 'r' && buf[4] == 'e' && buf[5] == 'd' &&
136 buf[6] == '-' && buf[7] == 'p' && buf[8] == 'i' &&
137 buf[9] == 'n' && buf[10] == 's';
138 }
139
140 static inline int
141 isserdes(u_int8_t* buf)
142 {
143 return buf[0] == 's' && buf[1] == 'e' && buf[2] == 'r' &&
144 buf[3] == 'd' && buf[4] == 'e' && buf[5] == 's';
145 }
146
147 void
148 gem_pci_attach(device_t parent, device_t self, void *aux)
149 {
150 struct pci_attach_args *pa = aux;
151 struct gem_pci_softc *gsc = device_private(self);
152 struct gem_softc *sc = &gsc->gsc_gem;
153 char devinfo[256];
154 prop_data_t data;
155 uint8_t enaddr[ETHER_ADDR_LEN];
156 u_int8_t *enp;
157 bus_space_handle_t romh;
158 u_int8_t buf[0x0800];
159 int dataoff, vpdoff, serdes;
160 int i, got_addr = 0;
161 #ifdef GEM_DEBUG
162 int j;
163 #endif
164 struct pci_vpd *vpd;
165 static const u_int8_t promhdr[] = { 0x55, 0xaa };
166 #define PROMHDR_PTR_DATA 0x18
167 static const u_int8_t promdat[] = {
168 0x50, 0x43, 0x49, 0x52, /* "PCIR" */
169 PCI_VENDOR_SUN & 0xff, PCI_VENDOR_SUN >> 8,
170 PCI_PRODUCT_SUN_GEMNETWORK & 0xff,
171 PCI_PRODUCT_SUN_GEMNETWORK >> 8
172 };
173 #define PROMDATA_PTR_VPD 0x08
174 #define PROMDATA_DATA2 0x0a
175
176 aprint_naive(": Ethernet controller\n");
177
178 sc->sc_dev = self;
179 pci_devinfo(pa->pa_id, pa->pa_class, 0, devinfo, sizeof(devinfo));
180 sc->sc_chiprev = PCI_REVISION(pa->pa_class);
181 aprint_normal(": %s (rev. 0x%02x)\n", devinfo, sc->sc_chiprev);
182
183 /*
184 * Some Sun GEMs/ERIs do have their intpin register bogusly set to 0,
185 * although it should be 1. correct that.
186 */
187 if (pa->pa_intrpin == 0)
188 pa->pa_intrpin = 1;
189
190 sc->sc_variant = GEM_UNKNOWN;
191
192 sc->sc_dmatag = pa->pa_dmat;
193
194 sc->sc_flags |= GEM_PCI;
195
196 if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_SUN) {
197 if (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_SUN_GEMNETWORK)
198 sc->sc_variant = GEM_SUN_GEM;
199 if (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_SUN_ERINETWORK)
200 sc->sc_variant = GEM_SUN_ERI;
201 } else if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_APPLE) {
202 if (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_GMAC ||
203 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_GMAC2 ||
204 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_GMAC3 ||
205 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_SHASTA_GMAC ||
206 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_INTREPID2_GMAC)
207 sc->sc_variant = GEM_APPLE_GMAC;
208 if (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_APPLE_K2_GMAC)
209 sc->sc_variant = GEM_APPLE_K2_GMAC;
210 }
211
212 if (sc->sc_variant == GEM_UNKNOWN) {
213 aprint_error_dev(sc->sc_dev, "unknown adaptor\n");
214 return;
215 }
216
217 #define PCI_GEM_BASEADDR (PCI_MAPREG_START + 0x00)
218
219 /* XXX Need to check for a 64-bit mem BAR? */
220 if (pci_mapreg_map(pa, PCI_GEM_BASEADDR,
221 PCI_MAPREG_TYPE_MEM | PCI_MAPREG_MEM_TYPE_32BIT, 0,
222 &sc->sc_bustag, &sc->sc_h1, NULL, &sc->sc_size) != 0)
223 {
224 aprint_error_dev(sc->sc_dev, "unable to map device registers\n");
225 return;
226 }
227 if (bus_space_subregion(sc->sc_bustag, sc->sc_h1,
228 GEM_PCI_BANK2_OFFSET, GEM_PCI_BANK2_SIZE, &sc->sc_h2)) {
229 aprint_error_dev(sc->sc_dev, "unable to create bank 2 subregion\n");
230 return;
231 }
232
233 if ((data = prop_dictionary_get(device_properties(sc->sc_dev),
234 "mac-address")) != NULL) {
235 memcpy(enaddr, prop_data_data_nocopy(data), ETHER_ADDR_LEN);
236 got_addr = 1;
237 if ((data = prop_dictionary_get(device_properties(sc->sc_dev),
238 "shared-pins")) != NULL) {
239 memcpy(buf, prop_data_data_nocopy(data),
240 prop_data_size(data));
241 if (isserdes(buf)) {
242 sc->sc_flags |= GEM_SERDES;
243 }
244 }
245 } else {
246 /*
247 * Dig out VPD (vital product data) and acquire Ethernet address.
248 * The VPD of gem resides in the PCI PROM (PCI FCode).
249 */
250 /*
251 * ``Writing FCode 3.x Programs'' (newer ones, dated 1997 and later)
252 * chapter 2 describes the data structure.
253 */
254
255 enp = NULL;
256
257 if (sc->sc_variant == GEM_SUN_GEM &&
258 (bus_space_subregion(sc->sc_bustag, sc->sc_h1,
259 GEM_PCI_ROM_OFFSET, GEM_PCI_ROM_SIZE, &romh)) == 0) {
260
261 /* read PCI Expansion PROM Header */
262 bus_space_read_region_1(sc->sc_bustag,
263 romh, 0, buf, sizeof buf);
264
265 /* Check for "shared-pins = serdes" in FCode. */
266 i = 0;
267 serdes = 0;
268 while (i < (sizeof buf) - sizeof "serdes") {
269 if (!serdes) {
270 if (isserdes(&buf[i]))
271 serdes = 1;
272 } else {
273 if (isshared_pins(&buf[i]))
274 serdes = 2;
275 }
276 if (serdes == 2) {
277 sc->sc_flags |= GEM_SERDES;
278 break;
279 }
280 i++;
281 }
282 #ifdef GEM_DEBUG
283 /* PROM dump */
284 printf("%s: PROM dump (0x0000 to %04lx)\n", device_xname(sc->sc_dev),
285 (sizeof buf) - 1);
286 i = 0;
287 j = 0;
288 printf(" %04x ", i);
289 while (i < sizeof buf) {
290 printf("%02x ", buf[i]);
291 if (i && !(i % 8))
292 printf(" ");
293 if (i && !(i % 16)) {
294 printf(" ");
295 while (j < i) {
296 if (buf[j] > 31 && buf[j] < 128)
297 printf("%c", buf[j]);
298 else
299 printf(".");
300 j++;
301 }
302 j = i;
303 printf("\n %04x ", i);
304 }
305 i++;
306 }
307 printf("\n");
308 #endif
309
310 if (memcmp(buf, promhdr, sizeof promhdr) == 0 &&
311 (dataoff = (buf[PROMHDR_PTR_DATA] |
312 (buf[PROMHDR_PTR_DATA + 1] << 8))) >= 0x1c) {
313
314 /* read PCI Expansion PROM Data */
315 bus_space_read_region_1(sc->sc_bustag, romh, dataoff,
316 buf, 64);
317 if (memcmp(buf, promdat, sizeof promdat) == 0 &&
318 gempromvalid(buf + PROMDATA_DATA2) &&
319 (vpdoff = (buf[PROMDATA_PTR_VPD] |
320 (buf[PROMDATA_PTR_VPD + 1] << 8))) >= 0x1c) {
321
322 /*
323 * The VPD of gem is not in PCI 2.2 standard
324 * format. The length in the resource header
325 * is in big endian, and resources are not
326 * properly terminated (only one resource
327 * and no end tag).
328 */
329 /* read PCI VPD */
330 bus_space_read_region_1(sc->sc_bustag, romh,
331 vpdoff, buf, 64);
332 vpd = (void *)(buf + 3);
333 if (PCI_VPDRES_ISLARGE(buf[0]) &&
334 PCI_VPDRES_LARGE_NAME(buf[0])
335 == PCI_VPDRES_TYPE_VPD &&
336 vpd->vpd_key0 == 0x4e /* N */ &&
337 vpd->vpd_key1 == 0x41 /* A */ &&
338 vpd->vpd_len == ETHER_ADDR_LEN) {
339 /*
340 * Ethernet address found
341 */
342 enp = buf + 6;
343 }
344 }
345 }
346 }
347
348 if (enp) {
349 memcpy(enaddr, enp, ETHER_ADDR_LEN);
350 got_addr = 1;
351 }
352 }
353 if (!got_addr) {
354 printf("%s: no Ethernet address found\n", device_xname(sc->sc_dev));
355 /* should we bail here? */
356 }
357
358 if (pci_intr_map(pa, &gsc->gsc_handle) != 0) {
359 aprint_error_dev(sc->sc_dev, "unable to map interrupt\n");
360 return;
361 }
362 gsc->gsc_pc = pa->pa_pc;
363 gem_pci_estintr(gsc);
364
365 /* Finish off the attach. */
366 gem_attach(sc, enaddr);
367
368 if (pmf_device_register1(sc->sc_dev,
369 gem_pci_suspend, gem_pci_resume, gem_shutdown))
370 pmf_class_network_register(sc->sc_dev, &sc->sc_ethercom.ec_if);
371 else
372 aprint_error_dev(sc->sc_dev,
373 "could not establish power handlers\n");
374 }
375
376 static bool
377 gem_pci_suspend(device_t self, const pmf_qual_t *qual)
378 {
379 struct gem_pci_softc *gsc = device_private(self);
380
381 if (gsc->gsc_ih != NULL) {
382 pci_intr_disestablish(gsc->gsc_pc, gsc->gsc_ih);
383 gsc->gsc_ih = NULL;
384 }
385
386 return true;
387 }
388
389 static bool
390 gem_pci_estintr(struct gem_pci_softc *gsc)
391 {
392 struct gem_softc *sc = &gsc->gsc_gem;
393 const char *intrstr;
394
395 intrstr = pci_intr_string(gsc->gsc_pc, gsc->gsc_handle);
396 gsc->gsc_ih = pci_intr_establish(gsc->gsc_pc, gsc->gsc_handle, IPL_NET,
397 gem_intr, sc);
398 if (gsc->gsc_ih == NULL) {
399 aprint_error_dev(sc->sc_dev, "unable to establish interrupt");
400 if (intrstr != NULL)
401 aprint_error(" at %s", intrstr);
402 aprint_error("\n");
403 return false;
404 }
405 aprint_normal_dev(sc->sc_dev, "interrupting at %s\n", intrstr);
406 return true;
407 }
408
409 static bool
410 gem_pci_resume(device_t self, const pmf_qual_t *qual)
411 {
412 struct gem_pci_softc *gsc = device_private(self);
413
414 return gem_pci_estintr(gsc);
415 }
416
417 static int
418 gem_pci_detach(device_t self, int flags)
419 {
420 int rc;
421 struct gem_pci_softc *gsc = device_private(self);
422 struct gem_softc *sc = &gsc->gsc_gem;
423
424 switch (sc->sc_att_stage) {
425 case GEM_ATT_BACKEND_2:
426 pmf_device_deregister(self);
427 sc->sc_att_stage = GEM_ATT_FINISHED;
428 /*FALLTHROUGH*/
429 default:
430 if ((rc = gem_detach(sc, flags)) != 0)
431 return rc;
432 /*FALLTHROUGH*/
433 case GEM_ATT_BACKEND_1:
434 if (gsc->gsc_ih != NULL)
435 pci_intr_disestablish(gsc->gsc_pc, gsc->gsc_ih);
436
437 bus_space_unmap(sc->sc_bustag, sc->sc_h1, sc->sc_size);
438 /*FALLTHROUGH*/
439 case GEM_ATT_BACKEND_0:
440 sc->sc_att_stage = GEM_ATT_BACKEND_0;
441 break;
442 }
443 return 0;
444 }
445