pci.c revision 1.48.4.1 1 /* $NetBSD: pci.c,v 1.48.4.1 2001/05/15 21:00:40 he Exp $ */
2
3 /*
4 * Copyright (c) 1995, 1996, 1997, 1998
5 * Christopher G. Demetriou. All rights reserved.
6 * Copyright (c) 1994 Charles M. Hannum. All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed by Charles M. Hannum.
19 * 4. The name of the author may not be used to endorse or promote products
20 * derived from this software without specific prior written permission.
21 *
22 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
23 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
24 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
25 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
26 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
27 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
28 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
29 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
30 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
31 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 */
33
34 /*
35 * PCI bus autoconfiguration.
36 */
37
38 #include "opt_pci.h"
39
40 #include <sys/param.h>
41 #include <sys/systm.h>
42 #include <sys/device.h>
43
44 #include <dev/pci/pcireg.h>
45 #include <dev/pci/pcivar.h>
46 #include <dev/pci/pcidevs.h>
47
48 #ifdef PCI_CONFIG_DUMP
49 int pci_config_dump = 1;
50 #else
51 int pci_config_dump = 0;
52 #endif
53
54 int pcimatch __P((struct device *, struct cfdata *, void *));
55 void pciattach __P((struct device *, struct device *, void *));
56
57 struct pci_softc {
58 struct device sc_dev;
59 bus_space_tag_t sc_iot, sc_memt;
60 bus_dma_tag_t sc_dmat;
61 pci_chipset_tag_t sc_pc;
62 int sc_bus, sc_maxndevs;
63 u_int sc_intrswiz;
64 pcitag_t sc_intrtag;
65 int sc_flags;
66 };
67
68 struct cfattach pci_ca = {
69 sizeof(struct pci_softc), pcimatch, pciattach
70 };
71
72 void pci_probe_bus __P((struct device *));
73 int pciprint __P((void *, const char *));
74 int pcisubmatch __P((struct device *, struct cfdata *, void *));
75
76 /*
77 * Important note about PCI-ISA bridges:
78 *
79 * Callbacks are used to configure these devices so that ISA/EISA bridges
80 * can attach their child busses after PCI configuration is done.
81 *
82 * This works because:
83 * (1) there can be at most one ISA/EISA bridge per PCI bus, and
84 * (2) any ISA/EISA bridges must be attached to primary PCI
85 * busses (i.e. bus zero).
86 *
87 * That boils down to: there can only be one of these outstanding
88 * at a time, it is cleared when configuring PCI bus 0 before any
89 * subdevices have been found, and it is run after all subdevices
90 * of PCI bus 0 have been found.
91 *
92 * This is needed because there are some (legacy) PCI devices which
93 * can show up as ISA/EISA devices as well (the prime example of which
94 * are VGA controllers). If you attach ISA from a PCI-ISA/EISA bridge,
95 * and the bridge is seen before the video board is, the board can show
96 * up as an ISA device, and that can (bogusly) complicate the PCI device's
97 * attach code, or make the PCI device not be properly attached at all.
98 *
99 * We use the generic config_defer() facility to achieve this.
100 */
101
102 int
103 pcimatch(parent, cf, aux)
104 struct device *parent;
105 struct cfdata *cf;
106 void *aux;
107 {
108 struct pcibus_attach_args *pba = aux;
109
110 if (strcmp(pba->pba_busname, cf->cf_driver->cd_name))
111 return (0);
112
113 /* Check the locators */
114 if (cf->pcibuscf_bus != PCIBUS_UNK_BUS &&
115 cf->pcibuscf_bus != pba->pba_bus)
116 return (0);
117
118 /* sanity */
119 if (pba->pba_bus < 0 || pba->pba_bus > 255)
120 return (0);
121
122 /*
123 * XXX check other (hardware?) indicators
124 */
125
126 return 1;
127 }
128
129 void
130 pci_probe_bus(self)
131 struct device *self;
132 {
133 struct pci_softc *sc = (struct pci_softc *)self;
134 bus_space_tag_t iot, memt;
135 pci_chipset_tag_t pc;
136 const struct pci_quirkdata *qd;
137 int bus, device, maxndevs, function, nfunctions;
138
139 iot = sc->sc_iot;
140 memt = sc->sc_memt;
141 pc = sc->sc_pc;
142 bus = sc->sc_bus;
143 maxndevs = sc->sc_maxndevs;
144
145 for (device = 0; device < maxndevs; device++) {
146 pcitag_t tag;
147 pcireg_t id, class, intr, bhlcr, csr;
148 struct pci_attach_args pa;
149 int pin;
150
151 tag = pci_make_tag(pc, bus, device, 0);
152 id = pci_conf_read(pc, tag, PCI_ID_REG);
153
154 /* Invalid vendor ID value? */
155 if (PCI_VENDOR(id) == PCI_VENDOR_INVALID)
156 continue;
157 /* XXX Not invalid, but we've done this ~forever. */
158 if (PCI_VENDOR(id) == 0)
159 continue;
160
161 qd = pci_lookup_quirkdata(PCI_VENDOR(id), PCI_PRODUCT(id));
162
163 bhlcr = pci_conf_read(pc, tag, PCI_BHLC_REG);
164 if (PCI_HDRTYPE_MULTIFN(bhlcr) ||
165 (qd != NULL &&
166 (qd->quirks & PCI_QUIRK_MULTIFUNCTION) != 0))
167 nfunctions = 8;
168 else
169 nfunctions = 1;
170
171 for (function = 0; function < nfunctions; function++) {
172 tag = pci_make_tag(pc, bus, device, function);
173 id = pci_conf_read(pc, tag, PCI_ID_REG);
174 csr = pci_conf_read(pc, tag, PCI_COMMAND_STATUS_REG);
175 class = pci_conf_read(pc, tag, PCI_CLASS_REG);
176 intr = pci_conf_read(pc, tag, PCI_INTERRUPT_REG);
177
178 /* Invalid vendor ID value? */
179 if (PCI_VENDOR(id) == PCI_VENDOR_INVALID)
180 continue;
181 /* XXX Not invalid, but we've done this ~forever. */
182 if (PCI_VENDOR(id) == 0)
183 continue;
184
185 pa.pa_iot = iot;
186 pa.pa_memt = memt;
187 pa.pa_dmat = sc->sc_dmat;
188 pa.pa_pc = pc;
189 pa.pa_bus = bus;
190 pa.pa_device = device;
191 pa.pa_function = function;
192 pa.pa_tag = tag;
193 pa.pa_id = id;
194 pa.pa_class = class;
195
196 /*
197 * Set up memory, I/O enable, and PCI command flags
198 * as appropriate.
199 */
200 pa.pa_flags = sc->sc_flags;
201 if ((csr & PCI_COMMAND_IO_ENABLE) == 0)
202 pa.pa_flags &= ~PCI_FLAGS_IO_ENABLED;
203 if ((csr & PCI_COMMAND_MEM_ENABLE) == 0)
204 pa.pa_flags &= ~PCI_FLAGS_MEM_ENABLED;
205
206 if (bus == 0) {
207 pa.pa_intrswiz = 0;
208 pa.pa_intrtag = tag;
209 } else {
210 pa.pa_intrswiz = sc->sc_intrswiz + device;
211 pa.pa_intrtag = sc->sc_intrtag;
212 }
213 pin = PCI_INTERRUPT_PIN(intr);
214 if (pin == PCI_INTERRUPT_PIN_NONE) {
215 /* no interrupt */
216 pa.pa_intrpin = 0;
217 } else {
218 /*
219 * swizzle it based on the number of
220 * busses we're behind and our device
221 * number.
222 */
223 pa.pa_intrpin = /* XXX */
224 ((pin + pa.pa_intrswiz - 1) % 4) + 1;
225 }
226 pa.pa_intrline = PCI_INTERRUPT_LINE(intr);
227
228 config_found_sm(self, &pa, pciprint, pcisubmatch);
229 }
230 }
231 }
232
233 void
234 pciattach(parent, self, aux)
235 struct device *parent, *self;
236 void *aux;
237 {
238 struct pcibus_attach_args *pba = aux;
239 struct pci_softc *sc = (struct pci_softc *)self;
240 int io_enabled, mem_enabled, mrl_enabled, mrm_enabled, mwi_enabled;
241 const char *sep = "";
242
243 pci_attach_hook(parent, self, pba);
244 printf("\n");
245
246 io_enabled = (pba->pba_flags & PCI_FLAGS_IO_ENABLED);
247 mem_enabled = (pba->pba_flags & PCI_FLAGS_MEM_ENABLED);
248 mrl_enabled = (pba->pba_flags & PCI_FLAGS_MRL_OKAY);
249 mrm_enabled = (pba->pba_flags & PCI_FLAGS_MRM_OKAY);
250 mwi_enabled = (pba->pba_flags & PCI_FLAGS_MWI_OKAY);
251
252 if (io_enabled == 0 && mem_enabled == 0) {
253 printf("%s: no spaces enabled!\n", self->dv_xname);
254 return;
255 }
256
257 #define PRINT(s) do { printf("%s%s", sep, s); sep = ", "; } while (0)
258
259 printf("%s: ", self->dv_xname);
260
261 if (io_enabled)
262 PRINT("i/o space");
263 if (mem_enabled)
264 PRINT("memory space");
265 printf(" enabled");
266
267 if (mrl_enabled || mrm_enabled || mwi_enabled) {
268 if (mrl_enabled)
269 PRINT("rd/line");
270 if (mrm_enabled)
271 PRINT("rd/mult");
272 if (mwi_enabled)
273 PRINT("wr/inv");
274 printf(" ok");
275 }
276
277 printf("\n");
278
279 #undef PRINT
280
281 sc->sc_iot = pba->pba_iot;
282 sc->sc_memt = pba->pba_memt;
283 sc->sc_dmat = pba->pba_dmat;
284 sc->sc_pc = pba->pba_pc;
285 sc->sc_bus = pba->pba_bus;
286 sc->sc_maxndevs = pci_bus_maxdevs(pba->pba_pc, pba->pba_bus);
287 sc->sc_intrswiz = pba->pba_intrswiz;
288 sc->sc_intrtag = pba->pba_intrtag;
289 sc->sc_flags = pba->pba_flags;
290
291 pci_probe_bus(self);
292 }
293
294 int
295 pciprint(aux, pnp)
296 void *aux;
297 const char *pnp;
298 {
299 struct pci_attach_args *pa = aux;
300 char devinfo[256];
301 const struct pci_quirkdata *qd;
302
303 if (pnp) {
304 pci_devinfo(pa->pa_id, pa->pa_class, 1, devinfo);
305 printf("%s at %s", devinfo, pnp);
306 }
307 printf(" dev %d function %d", pa->pa_device, pa->pa_function);
308 if (pci_config_dump) {
309 printf(": ");
310 pci_conf_print(pa->pa_pc, pa->pa_tag, NULL);
311 if (!pnp)
312 pci_devinfo(pa->pa_id, pa->pa_class, 1, devinfo);
313 printf("%s at %s", devinfo, pnp ? pnp : "?");
314 printf(" dev %d function %d (", pa->pa_device, pa->pa_function);
315 #ifdef __i386__
316 printf("tag %#lx, intrtag %#lx, intrswiz %#lx, intrpin %#lx",
317 *(long *)&pa->pa_tag, *(long *)&pa->pa_intrtag,
318 (long)pa->pa_intrswiz, (long)pa->pa_intrpin);
319 #else
320 printf("tag %#lx, intrtag %#lx, intrswiz %#lx, intrpin %#lx",
321 (long)pa->pa_tag, (long)pa->pa_intrtag, (long)pa->pa_intrswiz,
322 (long)pa->pa_intrpin);
323 #endif
324 printf(", i/o %s, mem %s,",
325 pa->pa_flags & PCI_FLAGS_IO_ENABLED ? "on" : "off",
326 pa->pa_flags & PCI_FLAGS_MEM_ENABLED ? "on" : "off");
327 qd = pci_lookup_quirkdata(PCI_VENDOR(pa->pa_id),
328 PCI_PRODUCT(pa->pa_id));
329 if (qd == NULL) {
330 printf(" no quirks");
331 } else {
332 bitmask_snprintf(qd->quirks,
333 "\20\1multifn", devinfo, sizeof (devinfo));
334 printf(" quirks %s", devinfo);
335 }
336 printf(")");
337 }
338 return (UNCONF);
339 }
340
341 int
342 pcisubmatch(parent, cf, aux)
343 struct device *parent;
344 struct cfdata *cf;
345 void *aux;
346 {
347 struct pci_attach_args *pa = aux;
348
349 if (cf->pcicf_dev != PCI_UNK_DEV &&
350 cf->pcicf_dev != pa->pa_device)
351 return 0;
352 if (cf->pcicf_function != PCI_UNK_FUNCTION &&
353 cf->pcicf_function != pa->pa_function)
354 return 0;
355 return ((*cf->cf_attach->ca_match)(parent, cf, aux));
356 }
357
358 int
359 pci_get_capability(pc, tag, capid, offset, value)
360 pci_chipset_tag_t pc;
361 pcitag_t tag;
362 int capid;
363 int *offset;
364 pcireg_t *value;
365 {
366 pcireg_t reg;
367 unsigned int ofs;
368
369 reg = pci_conf_read(pc, tag, PCI_COMMAND_STATUS_REG);
370 if (!(reg & PCI_STATUS_CAPLIST_SUPPORT))
371 return (0);
372
373 /* Determine the Capability List Pointer register to start with. */
374 reg = pci_conf_read(pc, tag, PCI_BHLC_REG);
375 switch (PCI_HDRTYPE_TYPE(reg)) {
376 case 0: /* standard device header */
377 ofs = PCI_CAPLISTPTR_REG;
378 break;
379 case 2: /* PCI-CardBus Bridge header */
380 ofs = PCI_CARDBUS_CAPLISTPTR_REG;
381 break;
382 default:
383 return (0);
384 }
385
386 ofs = PCI_CAPLIST_PTR(pci_conf_read(pc, tag, ofs));
387 while (ofs != 0) {
388 #ifdef DIAGNOSTIC
389 if ((ofs & 3) || (ofs < 0x40))
390 panic("pci_get_capability");
391 #endif
392 reg = pci_conf_read(pc, tag, ofs);
393 if (PCI_CAPLIST_CAP(reg) == capid) {
394 if (offset)
395 *offset = ofs;
396 if (value)
397 *value = reg;
398 return (1);
399 }
400 ofs = PCI_CAPLIST_NEXT(reg);
401 }
402
403 return (0);
404 }
405