pci.c revision 1.46 1 /* $NetBSD: pci.c,v 1.46 2000/03/30 12:45:35 augustss 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_device = device;
190 pa.pa_function = function;
191 pa.pa_tag = tag;
192 pa.pa_id = id;
193 pa.pa_class = class;
194
195 /*
196 * Set up memory, I/O enable, and PCI command flags
197 * as appropriate.
198 */
199 pa.pa_flags = sc->sc_flags;
200 if ((csr & PCI_COMMAND_IO_ENABLE) == 0)
201 pa.pa_flags &= ~PCI_FLAGS_IO_ENABLED;
202 if ((csr & PCI_COMMAND_MEM_ENABLE) == 0)
203 pa.pa_flags &= ~PCI_FLAGS_MEM_ENABLED;
204
205 if (bus == 0) {
206 pa.pa_intrswiz = 0;
207 pa.pa_intrtag = tag;
208 } else {
209 pa.pa_intrswiz = sc->sc_intrswiz + device;
210 pa.pa_intrtag = sc->sc_intrtag;
211 }
212 pin = PCI_INTERRUPT_PIN(intr);
213 if (pin == PCI_INTERRUPT_PIN_NONE) {
214 /* no interrupt */
215 pa.pa_intrpin = 0;
216 } else {
217 /*
218 * swizzle it based on the number of
219 * busses we're behind and our device
220 * number.
221 */
222 pa.pa_intrpin = /* XXX */
223 ((pin + pa.pa_intrswiz - 1) % 4) + 1;
224 }
225 pa.pa_intrline = PCI_INTERRUPT_LINE(intr);
226
227 config_found_sm(self, &pa, pciprint, pcisubmatch);
228 }
229 }
230 }
231
232 void
233 pciattach(parent, self, aux)
234 struct device *parent, *self;
235 void *aux;
236 {
237 struct pcibus_attach_args *pba = aux;
238 struct pci_softc *sc = (struct pci_softc *)self;
239 int io_enabled, mem_enabled, mrl_enabled, mrm_enabled, mwi_enabled;
240 const char *sep = "";
241
242 pci_attach_hook(parent, self, pba);
243 printf("\n");
244
245 io_enabled = (pba->pba_flags & PCI_FLAGS_IO_ENABLED);
246 mem_enabled = (pba->pba_flags & PCI_FLAGS_MEM_ENABLED);
247 mrl_enabled = (pba->pba_flags & PCI_FLAGS_MRL_OKAY);
248 mrm_enabled = (pba->pba_flags & PCI_FLAGS_MRM_OKAY);
249 mwi_enabled = (pba->pba_flags & PCI_FLAGS_MWI_OKAY);
250
251 if (io_enabled == 0 && mem_enabled == 0) {
252 printf("%s: no spaces enabled!\n", self->dv_xname);
253 return;
254 }
255
256 #define PRINT(s) do { printf("%s%s", sep, s); sep = ", "; } while (0)
257
258 printf("%s: ", self->dv_xname);
259
260 if (io_enabled)
261 PRINT("i/o space");
262 if (mem_enabled)
263 PRINT("memory space");
264 printf(" enabled");
265
266 if (mrl_enabled || mrm_enabled || mwi_enabled) {
267 if (mrl_enabled)
268 PRINT("rd/line");
269 if (mrm_enabled)
270 PRINT("rd/mult");
271 if (mwi_enabled)
272 PRINT("wr/inv");
273 printf(" ok");
274 }
275
276 printf("\n");
277
278 #undef PRINT
279
280 sc->sc_iot = pba->pba_iot;
281 sc->sc_memt = pba->pba_memt;
282 sc->sc_dmat = pba->pba_dmat;
283 sc->sc_pc = pba->pba_pc;
284 sc->sc_bus = pba->pba_bus;
285 sc->sc_maxndevs = pci_bus_maxdevs(pba->pba_pc, pba->pba_bus);
286 sc->sc_intrswiz = pba->pba_intrswiz;
287 sc->sc_intrtag = pba->pba_intrtag;
288 sc->sc_flags = pba->pba_flags;
289
290 pci_probe_bus(self);
291 }
292
293 int
294 pciprint(aux, pnp)
295 void *aux;
296 const char *pnp;
297 {
298 struct pci_attach_args *pa = aux;
299 char devinfo[256];
300 const struct pci_quirkdata *qd;
301
302 if (pnp) {
303 pci_devinfo(pa->pa_id, pa->pa_class, 1, devinfo);
304 printf("%s at %s", devinfo, pnp);
305 }
306 printf(" dev %d function %d", pa->pa_device, pa->pa_function);
307 if (pci_config_dump) {
308 printf(": ");
309 pci_conf_print(pa->pa_pc, pa->pa_tag, NULL);
310 if (!pnp)
311 pci_devinfo(pa->pa_id, pa->pa_class, 1, devinfo);
312 printf("%s at %s", devinfo, pnp ? pnp : "?");
313 printf(" dev %d function %d (", pa->pa_device, pa->pa_function);
314 #ifdef __i386__
315 printf("tag %#lx, intrtag %#lx, intrswiz %#lx, intrpin %#lx",
316 *(long *)&pa->pa_tag, *(long *)&pa->pa_intrtag,
317 (long)pa->pa_intrswiz, (long)pa->pa_intrpin);
318 #else
319 printf("tag %#lx, intrtag %#lx, intrswiz %#lx, intrpin %#lx",
320 (long)pa->pa_tag, (long)pa->pa_intrtag, (long)pa->pa_intrswiz,
321 (long)pa->pa_intrpin);
322 #endif
323 printf(", i/o %s, mem %s,",
324 pa->pa_flags & PCI_FLAGS_IO_ENABLED ? "on" : "off",
325 pa->pa_flags & PCI_FLAGS_MEM_ENABLED ? "on" : "off");
326 qd = pci_lookup_quirkdata(PCI_VENDOR(pa->pa_id),
327 PCI_PRODUCT(pa->pa_id));
328 if (qd == NULL) {
329 printf(" no quirks");
330 } else {
331 bitmask_snprintf(qd->quirks,
332 "\20\1multifn", devinfo, sizeof (devinfo));
333 printf(" quirks %s", devinfo);
334 }
335 printf(")");
336 }
337 return (UNCONF);
338 }
339
340 int
341 pcisubmatch(parent, cf, aux)
342 struct device *parent;
343 struct cfdata *cf;
344 void *aux;
345 {
346 struct pci_attach_args *pa = aux;
347
348 if (cf->pcicf_dev != PCI_UNK_DEV &&
349 cf->pcicf_dev != pa->pa_device)
350 return 0;
351 if (cf->pcicf_function != PCI_UNK_FUNCTION &&
352 cf->pcicf_function != pa->pa_function)
353 return 0;
354 return ((*cf->cf_attach->ca_match)(parent, cf, aux));
355 }
356
357 int
358 pci_get_capability(pc, tag, capid, offset, value)
359 pci_chipset_tag_t pc;
360 pcitag_t tag;
361 int capid;
362 int *offset;
363 pcireg_t *value;
364 {
365 pcireg_t reg;
366 unsigned int ofs;
367
368 reg = pci_conf_read(pc, tag, PCI_COMMAND_STATUS_REG);
369 if (!(reg & PCI_STATUS_CAPLIST_SUPPORT))
370 return (0);
371
372 ofs = PCI_CAPLIST_PTR(pci_conf_read(pc, tag, PCI_CAPLISTPTR_REG));
373 while (ofs != 0) {
374 #ifdef DIAGNOSTIC
375 if ((ofs & 3) || (ofs < 0x40))
376 panic("pci_get_capability");
377 #endif
378 reg = pci_conf_read(pc, tag, ofs);
379 if (PCI_CAPLIST_CAP(reg) == capid) {
380 if (offset)
381 *offset = ofs;
382 if (value)
383 *value = reg;
384 return (1);
385 }
386 ofs = PCI_CAPLIST_NEXT(reg);
387 }
388
389 return (0);
390 }
391