pci.c revision 1.27 1 /* $NetBSD: pci.c,v 1.27 1997/04/10 23:12:22 cgd Exp $ */
2
3 /*
4 * Copyright (c) 1995, 1996, 1997
5 * Christopher G. Demetriou. All rights reserved.
6 * Copyright (c) 1994 Charles 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 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 <sys/param.h>
39 #include <sys/systm.h>
40 #include <sys/device.h>
41
42 #include <dev/pci/pcireg.h>
43 #include <dev/pci/pcivar.h>
44
45 #ifdef __BROKEN_INDIRECT_CONFIG
46 int pcimatch __P((struct device *, void *, void *));
47 #else
48 int pcimatch __P((struct device *, struct cfdata *, void *));
49 #endif
50 void pciattach __P((struct device *, struct device *, void *));
51
52 struct cfattach pci_ca = {
53 sizeof(struct device), pcimatch, pciattach
54 };
55
56 struct cfdriver pci_cd = {
57 NULL, "pci", DV_DULL
58 };
59
60 int pciprint __P((void *, const char *));
61 #ifdef __BROKEN_INDIRECT_CONFIG
62 int pcisubmatch __P((struct device *, void *, void *));
63 #else
64 int pcisubmatch __P((struct device *, struct cfdata *, void *));
65 #endif
66
67 /*
68 * Callback so that ISA/EISA bridges can attach their child busses
69 * after PCI configuration is done.
70 *
71 * This works because:
72 * (1) there can be at most one ISA/EISA bridge per PCI bus, and
73 * (2) any ISA/EISA bridges must be attached to primary PCI
74 * busses (i.e. bus zero).
75 *
76 * That boils down to: there can only be one of these outstanding
77 * at a time, it is cleared when configuring PCI bus 0 before any
78 * subdevices have been found, and it is run after all subdevices
79 * of PCI bus 0 have been found.
80 *
81 * This is needed because there are some (legacy) PCI devices which
82 * can show up as ISA/EISA devices as well (the prime example of which
83 * are VGA controllers). If you attach ISA from a PCI-ISA/EISA bridge,
84 * and the bridge is seen before the video board is, the board can show
85 * up as an ISA device, and that can (bogusly) complicate the PCI device's
86 * attach code, or make the PCI device not be properly attached at all.
87 */
88 static void (*pci_isa_bridge_callback) __P((void *));
89 static void *pci_isa_bridge_callback_arg;
90
91 int
92 #ifdef __BROKEN_INDIRECT_CONFIG
93 pcimatch(parent, match, aux)
94 #else
95 pcimatch(parent, cf, aux)
96 #endif
97 struct device *parent;
98 #ifdef __BROKEN_INDIRECT_CONFIG
99 void *match;
100 #else
101 struct cfdata *cf;
102 #endif
103 void *aux;
104 {
105 #ifdef __BROKEN_INDIRECT_CONFIG
106 struct cfdata *cf = match;
107 #endif
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 pciattach(parent, self, aux)
131 struct device *parent, *self;
132 void *aux;
133 {
134 struct pcibus_attach_args *pba = aux;
135 bus_space_tag_t iot, memt;
136 pci_chipset_tag_t pc;
137 int bus, device, maxndevs, function, nfunctions;
138
139 pci_attach_hook(parent, self, pba);
140 printf("\n");
141
142 iot = pba->pba_iot;
143 memt = pba->pba_memt;
144 pc = pba->pba_pc;
145 bus = pba->pba_bus;
146 maxndevs = pci_bus_maxdevs(pc, bus);
147
148 if (bus == 0)
149 pci_isa_bridge_callback = NULL;
150
151 for (device = 0; device < maxndevs; device++) {
152 pcitag_t tag;
153 pcireg_t id, class, intr, bhlcr, csr;
154 struct pci_attach_args pa;
155 int pin;
156
157 tag = pci_make_tag(pc, bus, device, 0);
158 id = pci_conf_read(pc, tag, PCI_ID_REG);
159 if (id == 0 || id == 0xffffffff)
160 continue;
161
162 bhlcr = pci_conf_read(pc, tag, PCI_BHLC_REG);
163 nfunctions = PCI_HDRTYPE_MULTIFN(bhlcr) ? 8 : 1;
164
165 for (function = 0; function < nfunctions; function++) {
166 tag = pci_make_tag(pc, bus, device, function);
167 id = pci_conf_read(pc, tag, PCI_ID_REG);
168 if (id == 0 || id == 0xffffffff)
169 continue;
170 csr = pci_conf_read(pc, tag, PCI_COMMAND_STATUS_REG);
171 class = pci_conf_read(pc, tag, PCI_CLASS_REG);
172 intr = pci_conf_read(pc, tag, PCI_INTERRUPT_REG);
173
174 pa.pa_iot = iot;
175 pa.pa_memt = memt;
176 pa.pa_pc = pc;
177 pa.pa_device = device;
178 pa.pa_function = function;
179 pa.pa_tag = tag;
180 pa.pa_id = id;
181 pa.pa_class = class;
182
183 /* set up memory and I/O enable flags as appropriate */
184 pa.pa_flags = 0;
185 if ((pba->pba_flags & PCI_FLAGS_IO_ENABLED) &&
186 (csr & PCI_COMMAND_IO_ENABLE))
187 pa.pa_flags |= PCI_FLAGS_IO_ENABLED;
188 if ((pba->pba_flags & PCI_FLAGS_MEM_ENABLED) &&
189 (csr & PCI_COMMAND_MEM_ENABLE))
190 pa.pa_flags |= PCI_FLAGS_MEM_ENABLED;
191
192 if (bus == 0) {
193 pa.pa_intrswiz = 0;
194 pa.pa_intrtag = tag;
195 } else {
196 pa.pa_intrswiz = pba->pba_intrswiz + device;
197 pa.pa_intrtag = pba->pba_intrtag;
198 }
199 pin = PCI_INTERRUPT_PIN(intr);
200 if (pin == PCI_INTERRUPT_PIN_NONE) {
201 /* no interrupt */
202 pa.pa_intrpin = 0;
203 } else {
204 /*
205 * swizzle it based on the number of
206 * busses we're behind and our device
207 * number.
208 */
209 pa.pa_intrpin = /* XXX */
210 ((pin + pa.pa_intrswiz - 1) % 4) + 1;
211 }
212 pa.pa_intrline = PCI_INTERRUPT_LINE(intr);
213
214 config_found_sm(self, &pa, pciprint, pcisubmatch);
215 }
216 }
217
218 if (bus == 0 && pci_isa_bridge_callback != NULL)
219 (*pci_isa_bridge_callback)(pci_isa_bridge_callback_arg);
220 }
221
222 int
223 pciprint(aux, pnp)
224 void *aux;
225 const char *pnp;
226 {
227 register struct pci_attach_args *pa = aux;
228 char devinfo[256];
229
230 if (pnp) {
231 pci_devinfo(pa->pa_id, pa->pa_class, 1, devinfo);
232 printf("%s at %s", devinfo, pnp);
233 }
234 printf(" dev %d function %d", pa->pa_device, pa->pa_function);
235 #if 0
236 printf(" (%si/o, %smem)",
237 pa->pa_flags & PCI_FLAGS_IO_ENABLED ? "" : "no ",
238 pa->pa_flags & PCI_FLAGS_MEM_ENABLED ? "" : "no ");
239 #endif
240 return (UNCONF);
241 }
242
243 int
244 #ifdef __BROKEN_INDIRECT_CONFIG
245 pcisubmatch(parent, match, aux)
246 #else
247 pcisubmatch(parent, cf, aux)
248 #endif
249 struct device *parent;
250 #ifdef __BROKEN_INDIRECT_CONFIG
251 void *match;
252 #else
253 struct cfdata *cf;
254 #endif
255 void *aux;
256 {
257 #ifdef __BROKEN_INDIRECT_CONFIG
258 struct cfdata *cf = match;
259 #endif
260 struct pci_attach_args *pa = aux;
261
262 if (cf->pcicf_dev != PCI_UNK_DEV &&
263 cf->pcicf_dev != pa->pa_device)
264 return 0;
265 if (cf->pcicf_function != PCI_UNK_FUNCTION &&
266 cf->pcicf_function != pa->pa_function)
267 return 0;
268 return ((*cf->cf_attach->ca_match)(parent, cf, aux));
269 }
270
271 int
272 pci_io_find(pc, pcitag, reg, iobasep, iosizep)
273 pci_chipset_tag_t pc;
274 pcitag_t pcitag;
275 int reg;
276 bus_addr_t *iobasep;
277 bus_size_t *iosizep;
278 {
279 pcireg_t addrdata, sizedata;
280 int s;
281
282 if (reg < PCI_MAPREG_START || reg >= PCI_MAPREG_END || (reg & 3))
283 panic("pci_io_find: bad request");
284
285 /* XXX?
286 * Section 6.2.5.1, `Address Maps', tells us that:
287 *
288 * 1) The builtin software should have already mapped the device in a
289 * reasonable way.
290 *
291 * 2) A device which wants 2^n bytes of memory will hardwire the bottom
292 * n bits of the address to 0. As recommended, we write all 1s and see
293 * what we get back.
294 */
295 addrdata = pci_conf_read(pc, pcitag, reg);
296
297 s = splhigh();
298 pci_conf_write(pc, pcitag, reg, 0xffffffff);
299 sizedata = pci_conf_read(pc, pcitag, reg);
300 pci_conf_write(pc, pcitag, reg, addrdata);
301 splx(s);
302
303 if (PCI_MAPREG_TYPE(addrdata) != PCI_MAPREG_TYPE_IO)
304 panic("pci_io_find: not an I/O region");
305
306 if (iobasep != NULL)
307 *iobasep = PCI_MAPREG_IO_ADDR(addrdata);
308 if (iosizep != NULL)
309 *iosizep = PCI_MAPREG_IO_SIZE(sizedata);
310
311 return (0);
312 }
313
314 int
315 pci_mem_find(pc, pcitag, reg, membasep, memsizep, cacheablep)
316 pci_chipset_tag_t pc;
317 pcitag_t pcitag;
318 int reg;
319 bus_addr_t *membasep;
320 bus_size_t *memsizep;
321 int *cacheablep;
322 {
323 pcireg_t addrdata, sizedata;
324 int s;
325
326 if (reg < PCI_MAPREG_START || reg >= PCI_MAPREG_END || (reg & 3))
327 panic("pci_find_mem: bad request");
328
329 /*
330 * Section 6.2.5.1, `Address Maps', tells us that:
331 *
332 * 1) The builtin software should have already mapped the device in a
333 * reasonable way.
334 *
335 * 2) A device which wants 2^n bytes of memory will hardwire the bottom
336 * n bits of the address to 0. As recommended, we write all 1s and see
337 * what we get back.
338 */
339 addrdata = pci_conf_read(pc, pcitag, reg);
340
341 s = splhigh();
342 pci_conf_write(pc, pcitag, reg, 0xffffffff);
343 sizedata = pci_conf_read(pc, pcitag, reg);
344 pci_conf_write(pc, pcitag, reg, addrdata);
345 splx(s);
346
347 if (PCI_MAPREG_TYPE(addrdata) == PCI_MAPREG_TYPE_IO)
348 panic("pci_find_mem: I/O region");
349
350 switch (PCI_MAPREG_MEM_TYPE(addrdata)) {
351 case PCI_MAPREG_MEM_TYPE_32BIT:
352 case PCI_MAPREG_MEM_TYPE_32BIT_1M:
353 break;
354 case PCI_MAPREG_MEM_TYPE_64BIT:
355 /* XXX */ printf("pci_find_mem: 64-bit region\n");
356 /* XXX */ return (1);
357 default:
358 printf("pci_find_mem: reserved region type\n");
359 return (1);
360 }
361
362 if (membasep != NULL)
363 *membasep = PCI_MAPREG_MEM_ADDR(addrdata); /* PCI addr */
364 if (memsizep != NULL)
365 *memsizep = PCI_MAPREG_MEM_SIZE(sizedata);
366 if (cacheablep != NULL)
367 *cacheablep = PCI_MAPREG_MEM_CACHEABLE(addrdata);
368
369 return 0;
370 }
371
372 void
373 set_pci_isa_bridge_callback(fn, arg)
374 void (*fn) __P((void *));
375 void *arg;
376 {
377
378 if (pci_isa_bridge_callback != NULL)
379 panic("set_pci_isa_bridge_callback");
380 pci_isa_bridge_callback = fn;
381 pci_isa_bridge_callback_arg = arg;
382 }
383