pci.c revision 1.90 1 1.90 jmcneill /* $NetBSD: pci.c,v 1.90 2005/01/26 21:49:00 jmcneill Exp $ */
2 1.3 cgd
3 1.1 mycroft /*
4 1.37 cgd * Copyright (c) 1995, 1996, 1997, 1998
5 1.27 cgd * Christopher G. Demetriou. All rights reserved.
6 1.39 mycroft * Copyright (c) 1994 Charles M. Hannum. All rights reserved.
7 1.1 mycroft *
8 1.1 mycroft * Redistribution and use in source and binary forms, with or without
9 1.1 mycroft * modification, are permitted provided that the following conditions
10 1.1 mycroft * are met:
11 1.1 mycroft * 1. Redistributions of source code must retain the above copyright
12 1.1 mycroft * notice, this list of conditions and the following disclaimer.
13 1.1 mycroft * 2. Redistributions in binary form must reproduce the above copyright
14 1.1 mycroft * notice, this list of conditions and the following disclaimer in the
15 1.1 mycroft * documentation and/or other materials provided with the distribution.
16 1.1 mycroft * 3. All advertising materials mentioning features or use of this software
17 1.1 mycroft * must display the following acknowledgement:
18 1.39 mycroft * This product includes software developed by Charles M. Hannum.
19 1.1 mycroft * 4. The name of the author may not be used to endorse or promote products
20 1.1 mycroft * derived from this software without specific prior written permission.
21 1.1 mycroft *
22 1.1 mycroft * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
23 1.1 mycroft * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
24 1.1 mycroft * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
25 1.1 mycroft * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
26 1.1 mycroft * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
27 1.1 mycroft * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
28 1.1 mycroft * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
29 1.1 mycroft * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
30 1.1 mycroft * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
31 1.1 mycroft * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 1.1 mycroft */
33 1.1 mycroft
34 1.1 mycroft /*
35 1.10 cgd * PCI bus autoconfiguration.
36 1.1 mycroft */
37 1.58 lukem
38 1.58 lukem #include <sys/cdefs.h>
39 1.90 jmcneill __KERNEL_RCSID(0, "$NetBSD: pci.c,v 1.90 2005/01/26 21:49:00 jmcneill Exp $");
40 1.1 mycroft
41 1.45 cgd #include "opt_pci.h"
42 1.45 cgd
43 1.1 mycroft #include <sys/param.h>
44 1.10 cgd #include <sys/systm.h>
45 1.1 mycroft #include <sys/device.h>
46 1.1 mycroft
47 1.10 cgd #include <dev/pci/pcireg.h>
48 1.7 cgd #include <dev/pci/pcivar.h>
49 1.33 cgd #include <dev/pci/pcidevs.h>
50 1.76 christos
51 1.80 fvdl #include <uvm/uvm_extern.h>
52 1.80 fvdl
53 1.76 christos #include "locators.h"
54 1.10 cgd
55 1.45 cgd #ifdef PCI_CONFIG_DUMP
56 1.45 cgd int pci_config_dump = 1;
57 1.45 cgd #else
58 1.45 cgd int pci_config_dump = 0;
59 1.45 cgd #endif
60 1.45 cgd
61 1.26 cgd int pcimatch __P((struct device *, struct cfdata *, void *));
62 1.10 cgd void pciattach __P((struct device *, struct device *, void *));
63 1.87 drochner int pcirescan(struct device *, const char *, const int *);
64 1.87 drochner void pcidevdetached(struct device *, struct device *);
65 1.34 drochner
66 1.87 drochner CFATTACH_DECL2(pci, sizeof(struct pci_softc),
67 1.87 drochner pcimatch, pciattach, NULL, NULL, pcirescan, pcidevdetached);
68 1.10 cgd
69 1.21 cgd int pciprint __P((void *, const char *));
70 1.87 drochner int pcisubmatch __P((struct device *, struct cfdata *,
71 1.87 drochner const locdesc_t *, void *));
72 1.10 cgd
73 1.86 drochner #ifdef PCI_MACHDEP_ENUMERATE_BUS
74 1.86 drochner #define pci_enumerate_bus PCI_MACHDEP_ENUMERATE_BUS
75 1.86 drochner #else
76 1.87 drochner int pci_enumerate_bus(struct pci_softc *, const int *,
77 1.86 drochner int (*)(struct pci_attach_args *), struct pci_attach_args *);
78 1.86 drochner #endif
79 1.86 drochner
80 1.25 cgd /*
81 1.38 thorpej * Important note about PCI-ISA bridges:
82 1.38 thorpej *
83 1.38 thorpej * Callbacks are used to configure these devices so that ISA/EISA bridges
84 1.38 thorpej * can attach their child busses after PCI configuration is done.
85 1.25 cgd *
86 1.25 cgd * This works because:
87 1.25 cgd * (1) there can be at most one ISA/EISA bridge per PCI bus, and
88 1.25 cgd * (2) any ISA/EISA bridges must be attached to primary PCI
89 1.25 cgd * busses (i.e. bus zero).
90 1.25 cgd *
91 1.25 cgd * That boils down to: there can only be one of these outstanding
92 1.25 cgd * at a time, it is cleared when configuring PCI bus 0 before any
93 1.25 cgd * subdevices have been found, and it is run after all subdevices
94 1.25 cgd * of PCI bus 0 have been found.
95 1.25 cgd *
96 1.25 cgd * This is needed because there are some (legacy) PCI devices which
97 1.25 cgd * can show up as ISA/EISA devices as well (the prime example of which
98 1.25 cgd * are VGA controllers). If you attach ISA from a PCI-ISA/EISA bridge,
99 1.25 cgd * and the bridge is seen before the video board is, the board can show
100 1.25 cgd * up as an ISA device, and that can (bogusly) complicate the PCI device's
101 1.25 cgd * attach code, or make the PCI device not be properly attached at all.
102 1.38 thorpej *
103 1.38 thorpej * We use the generic config_defer() facility to achieve this.
104 1.25 cgd */
105 1.25 cgd
106 1.10 cgd int
107 1.26 cgd pcimatch(parent, cf, aux)
108 1.10 cgd struct device *parent;
109 1.26 cgd struct cfdata *cf;
110 1.26 cgd void *aux;
111 1.10 cgd {
112 1.10 cgd struct pcibus_attach_args *pba = aux;
113 1.10 cgd
114 1.10 cgd /* Check the locators */
115 1.89 drochner if (cf->cf_loc[PCIBUSCF_BUS] != PCIBUSCF_BUS_DEFAULT &&
116 1.89 drochner cf->cf_loc[PCIBUSCF_BUS] != pba->pba_bus)
117 1.10 cgd return (0);
118 1.10 cgd
119 1.10 cgd /* sanity */
120 1.10 cgd if (pba->pba_bus < 0 || pba->pba_bus > 255)
121 1.10 cgd return (0);
122 1.10 cgd
123 1.10 cgd /*
124 1.10 cgd * XXX check other (hardware?) indicators
125 1.10 cgd */
126 1.10 cgd
127 1.59 thorpej return (1);
128 1.10 cgd }
129 1.1 mycroft
130 1.34 drochner void
131 1.34 drochner pciattach(parent, self, aux)
132 1.34 drochner struct device *parent, *self;
133 1.34 drochner void *aux;
134 1.34 drochner {
135 1.34 drochner struct pcibus_attach_args *pba = aux;
136 1.34 drochner struct pci_softc *sc = (struct pci_softc *)self;
137 1.43 thorpej int io_enabled, mem_enabled, mrl_enabled, mrm_enabled, mwi_enabled;
138 1.43 thorpej const char *sep = "";
139 1.87 drochner static const int wildcard[2] = { PCICF_DEV_DEFAULT,
140 1.87 drochner PCICF_FUNCTION_DEFAULT };
141 1.34 drochner
142 1.34 drochner pci_attach_hook(parent, self, pba);
143 1.78 thorpej
144 1.78 thorpej aprint_naive("\n");
145 1.78 thorpej aprint_normal("\n");
146 1.34 drochner
147 1.34 drochner io_enabled = (pba->pba_flags & PCI_FLAGS_IO_ENABLED);
148 1.34 drochner mem_enabled = (pba->pba_flags & PCI_FLAGS_MEM_ENABLED);
149 1.43 thorpej mrl_enabled = (pba->pba_flags & PCI_FLAGS_MRL_OKAY);
150 1.43 thorpej mrm_enabled = (pba->pba_flags & PCI_FLAGS_MRM_OKAY);
151 1.43 thorpej mwi_enabled = (pba->pba_flags & PCI_FLAGS_MWI_OKAY);
152 1.34 drochner
153 1.34 drochner if (io_enabled == 0 && mem_enabled == 0) {
154 1.78 thorpej aprint_error("%s: no spaces enabled!\n", self->dv_xname);
155 1.34 drochner return;
156 1.34 drochner }
157 1.34 drochner
158 1.78 thorpej #define PRINT(str) \
159 1.78 thorpej do { \
160 1.78 thorpej aprint_normal("%s%s", sep, str); \
161 1.78 thorpej sep = ", "; \
162 1.78 thorpej } while (/*CONSTCOND*/0)
163 1.43 thorpej
164 1.78 thorpej aprint_normal("%s: ", self->dv_xname);
165 1.43 thorpej
166 1.34 drochner if (io_enabled)
167 1.43 thorpej PRINT("i/o space");
168 1.43 thorpej if (mem_enabled)
169 1.43 thorpej PRINT("memory space");
170 1.78 thorpej aprint_normal(" enabled");
171 1.43 thorpej
172 1.43 thorpej if (mrl_enabled || mrm_enabled || mwi_enabled) {
173 1.43 thorpej if (mrl_enabled)
174 1.43 thorpej PRINT("rd/line");
175 1.43 thorpej if (mrm_enabled)
176 1.43 thorpej PRINT("rd/mult");
177 1.43 thorpej if (mwi_enabled)
178 1.43 thorpej PRINT("wr/inv");
179 1.78 thorpej aprint_normal(" ok");
180 1.34 drochner }
181 1.43 thorpej
182 1.78 thorpej aprint_normal("\n");
183 1.43 thorpej
184 1.43 thorpej #undef PRINT
185 1.34 drochner
186 1.34 drochner sc->sc_iot = pba->pba_iot;
187 1.34 drochner sc->sc_memt = pba->pba_memt;
188 1.34 drochner sc->sc_dmat = pba->pba_dmat;
189 1.80 fvdl sc->sc_dmat64 = pba->pba_dmat64;
190 1.34 drochner sc->sc_pc = pba->pba_pc;
191 1.34 drochner sc->sc_bus = pba->pba_bus;
192 1.62 thorpej sc->sc_bridgetag = pba->pba_bridgetag;
193 1.34 drochner sc->sc_maxndevs = pci_bus_maxdevs(pba->pba_pc, pba->pba_bus);
194 1.34 drochner sc->sc_intrswiz = pba->pba_intrswiz;
195 1.34 drochner sc->sc_intrtag = pba->pba_intrtag;
196 1.34 drochner sc->sc_flags = pba->pba_flags;
197 1.87 drochner pcirescan(&sc->sc_dev, "pci", wildcard);
198 1.87 drochner }
199 1.87 drochner
200 1.87 drochner int
201 1.87 drochner pcirescan(struct device *sc, const char *ifattr, const int *locators)
202 1.87 drochner {
203 1.87 drochner
204 1.87 drochner KASSERT(ifattr && !strcmp(ifattr, "pci"));
205 1.87 drochner KASSERT(locators);
206 1.87 drochner
207 1.87 drochner pci_enumerate_bus((struct pci_softc *)sc, locators, NULL, NULL);
208 1.87 drochner return (0);
209 1.34 drochner }
210 1.34 drochner
211 1.1 mycroft int
212 1.10 cgd pciprint(aux, pnp)
213 1.1 mycroft void *aux;
214 1.21 cgd const char *pnp;
215 1.1 mycroft {
216 1.46 augustss struct pci_attach_args *pa = aux;
217 1.10 cgd char devinfo[256];
218 1.37 cgd const struct pci_quirkdata *qd;
219 1.1 mycroft
220 1.10 cgd if (pnp) {
221 1.83 itojun pci_devinfo(pa->pa_id, pa->pa_class, 1, devinfo, sizeof(devinfo));
222 1.75 thorpej aprint_normal("%s at %s", devinfo, pnp);
223 1.10 cgd }
224 1.75 thorpej aprint_normal(" dev %d function %d", pa->pa_device, pa->pa_function);
225 1.45 cgd if (pci_config_dump) {
226 1.45 cgd printf(": ");
227 1.45 cgd pci_conf_print(pa->pa_pc, pa->pa_tag, NULL);
228 1.45 cgd if (!pnp)
229 1.83 itojun pci_devinfo(pa->pa_id, pa->pa_class, 1, devinfo, sizeof(devinfo));
230 1.45 cgd printf("%s at %s", devinfo, pnp ? pnp : "?");
231 1.45 cgd printf(" dev %d function %d (", pa->pa_device, pa->pa_function);
232 1.37 cgd #ifdef __i386__
233 1.45 cgd printf("tag %#lx, intrtag %#lx, intrswiz %#lx, intrpin %#lx",
234 1.45 cgd *(long *)&pa->pa_tag, *(long *)&pa->pa_intrtag,
235 1.45 cgd (long)pa->pa_intrswiz, (long)pa->pa_intrpin);
236 1.37 cgd #else
237 1.54 mrg printf("intrswiz %#lx, intrpin %#lx",
238 1.54 mrg (long)pa->pa_intrswiz, (long)pa->pa_intrpin);
239 1.36 cgd #endif
240 1.45 cgd printf(", i/o %s, mem %s,",
241 1.45 cgd pa->pa_flags & PCI_FLAGS_IO_ENABLED ? "on" : "off",
242 1.45 cgd pa->pa_flags & PCI_FLAGS_MEM_ENABLED ? "on" : "off");
243 1.45 cgd qd = pci_lookup_quirkdata(PCI_VENDOR(pa->pa_id),
244 1.45 cgd PCI_PRODUCT(pa->pa_id));
245 1.45 cgd if (qd == NULL) {
246 1.45 cgd printf(" no quirks");
247 1.45 cgd } else {
248 1.45 cgd bitmask_snprintf(qd->quirks,
249 1.82 itojun "\002\001multifn\002singlefn\003skipfunc0"
250 1.82 itojun "\004skipfunc1\005skipfunc2\006skipfunc3"
251 1.82 itojun "\007skipfunc4\010skipfunc5\011skipfunc6"
252 1.85 kochi "\012skipfunc7",
253 1.82 itojun devinfo, sizeof (devinfo));
254 1.45 cgd printf(" quirks %s", devinfo);
255 1.45 cgd }
256 1.45 cgd printf(")");
257 1.37 cgd }
258 1.6 mycroft return (UNCONF);
259 1.6 mycroft }
260 1.6 mycroft
261 1.6 mycroft int
262 1.87 drochner pcisubmatch(struct device *parent, struct cfdata *cf,
263 1.87 drochner const locdesc_t *ldesc, void *aux)
264 1.6 mycroft {
265 1.6 mycroft
266 1.89 drochner if (cf->cf_loc[PCICF_DEV] != PCICF_DEV_DEFAULT &&
267 1.89 drochner cf->cf_loc[PCICF_DEV] != ldesc->locs[PCICF_DEV])
268 1.59 thorpej return (0);
269 1.89 drochner if (cf->cf_loc[PCICF_FUNCTION] != PCICF_FUNCTION_DEFAULT &&
270 1.89 drochner cf->cf_loc[PCICF_FUNCTION] != ldesc->locs[PCICF_FUNCTION])
271 1.59 thorpej return (0);
272 1.70 thorpej return (config_match(parent, cf, aux));
273 1.40 drochner }
274 1.40 drochner
275 1.40 drochner int
276 1.59 thorpej pci_probe_device(struct pci_softc *sc, pcitag_t tag,
277 1.59 thorpej int (*match)(struct pci_attach_args *), struct pci_attach_args *pap)
278 1.59 thorpej {
279 1.59 thorpej pci_chipset_tag_t pc = sc->sc_pc;
280 1.59 thorpej struct pci_attach_args pa;
281 1.59 thorpej pcireg_t id, csr, class, intr, bhlcr;
282 1.59 thorpej int ret, pin, bus, device, function;
283 1.87 drochner int help[3];
284 1.87 drochner locdesc_t *ldp = (void *)&help; /* XXX XXX */
285 1.87 drochner struct device *subdev;
286 1.59 thorpej
287 1.59 thorpej pci_decompose_tag(pc, tag, &bus, &device, &function);
288 1.59 thorpej
289 1.87 drochner /* a driver already attached? */
290 1.87 drochner if (sc->PCI_SC_DEVICESC(device, function) && !match)
291 1.87 drochner return (0);
292 1.87 drochner
293 1.81 itojun bhlcr = pci_conf_read(pc, tag, PCI_BHLC_REG);
294 1.81 itojun if (PCI_HDRTYPE_TYPE(bhlcr) > 2)
295 1.81 itojun return (0);
296 1.81 itojun
297 1.59 thorpej id = pci_conf_read(pc, tag, PCI_ID_REG);
298 1.59 thorpej csr = pci_conf_read(pc, tag, PCI_COMMAND_STATUS_REG);
299 1.59 thorpej class = pci_conf_read(pc, tag, PCI_CLASS_REG);
300 1.59 thorpej
301 1.59 thorpej /* Invalid vendor ID value? */
302 1.59 thorpej if (PCI_VENDOR(id) == PCI_VENDOR_INVALID)
303 1.68 thorpej return (0);
304 1.59 thorpej /* XXX Not invalid, but we've done this ~forever. */
305 1.59 thorpej if (PCI_VENDOR(id) == 0)
306 1.68 thorpej return (0);
307 1.59 thorpej
308 1.59 thorpej pa.pa_iot = sc->sc_iot;
309 1.59 thorpej pa.pa_memt = sc->sc_memt;
310 1.59 thorpej pa.pa_dmat = sc->sc_dmat;
311 1.80 fvdl pa.pa_dmat64 = sc->sc_dmat64;
312 1.59 thorpej pa.pa_pc = pc;
313 1.63 thorpej pa.pa_bus = bus;
314 1.59 thorpej pa.pa_device = device;
315 1.59 thorpej pa.pa_function = function;
316 1.59 thorpej pa.pa_tag = tag;
317 1.59 thorpej pa.pa_id = id;
318 1.59 thorpej pa.pa_class = class;
319 1.59 thorpej
320 1.59 thorpej /*
321 1.59 thorpej * Set up memory, I/O enable, and PCI command flags
322 1.59 thorpej * as appropriate.
323 1.59 thorpej */
324 1.59 thorpej pa.pa_flags = sc->sc_flags;
325 1.59 thorpej if ((csr & PCI_COMMAND_IO_ENABLE) == 0)
326 1.59 thorpej pa.pa_flags &= ~PCI_FLAGS_IO_ENABLED;
327 1.59 thorpej if ((csr & PCI_COMMAND_MEM_ENABLE) == 0)
328 1.59 thorpej pa.pa_flags &= ~PCI_FLAGS_MEM_ENABLED;
329 1.59 thorpej
330 1.59 thorpej /*
331 1.59 thorpej * If the cache line size is not configured, then
332 1.59 thorpej * clear the MRL/MRM/MWI command-ok flags.
333 1.59 thorpej */
334 1.59 thorpej if (PCI_CACHELINE(bhlcr) == 0)
335 1.59 thorpej pa.pa_flags &= ~(PCI_FLAGS_MRL_OKAY|
336 1.59 thorpej PCI_FLAGS_MRM_OKAY|PCI_FLAGS_MWI_OKAY);
337 1.59 thorpej
338 1.64 sommerfe if (sc->sc_bridgetag == NULL) {
339 1.59 thorpej pa.pa_intrswiz = 0;
340 1.59 thorpej pa.pa_intrtag = tag;
341 1.59 thorpej } else {
342 1.59 thorpej pa.pa_intrswiz = sc->sc_intrswiz + device;
343 1.59 thorpej pa.pa_intrtag = sc->sc_intrtag;
344 1.59 thorpej }
345 1.81 itojun
346 1.81 itojun intr = pci_conf_read(pc, tag, PCI_INTERRUPT_REG);
347 1.81 itojun
348 1.59 thorpej pin = PCI_INTERRUPT_PIN(intr);
349 1.65 sommerfe pa.pa_rawintrpin = pin;
350 1.59 thorpej if (pin == PCI_INTERRUPT_PIN_NONE) {
351 1.59 thorpej /* no interrupt */
352 1.59 thorpej pa.pa_intrpin = 0;
353 1.59 thorpej } else {
354 1.59 thorpej /*
355 1.59 thorpej * swizzle it based on the number of busses we're
356 1.59 thorpej * behind and our device number.
357 1.59 thorpej */
358 1.59 thorpej pa.pa_intrpin = /* XXX */
359 1.59 thorpej ((pin + pa.pa_intrswiz - 1) % 4) + 1;
360 1.59 thorpej }
361 1.59 thorpej pa.pa_intrline = PCI_INTERRUPT_LINE(intr);
362 1.59 thorpej
363 1.59 thorpej if (match != NULL) {
364 1.59 thorpej ret = (*match)(&pa);
365 1.59 thorpej if (ret != 0 && pap != NULL)
366 1.59 thorpej *pap = pa;
367 1.59 thorpej } else {
368 1.87 drochner ldp->len = 2;
369 1.87 drochner ldp->locs[PCICF_DEV] = device;
370 1.87 drochner ldp->locs[PCICF_FUNCTION] = function;
371 1.87 drochner
372 1.87 drochner subdev = config_found_sm_loc(&sc->sc_dev, "pci", ldp, &pa,
373 1.87 drochner pciprint, pcisubmatch);
374 1.87 drochner sc->PCI_SC_DEVICESC(device, function) = subdev;
375 1.87 drochner ret = (subdev != NULL);
376 1.59 thorpej }
377 1.59 thorpej
378 1.59 thorpej return (ret);
379 1.59 thorpej }
380 1.59 thorpej
381 1.87 drochner void
382 1.87 drochner pcidevdetached(struct device *sc, struct device *dev)
383 1.87 drochner {
384 1.87 drochner struct pci_softc *psc = (struct pci_softc *)sc;
385 1.87 drochner int d, f;
386 1.87 drochner
387 1.87 drochner KASSERT(dev->dv_locators);
388 1.87 drochner d = dev->dv_locators[PCICF_DEV];
389 1.87 drochner f = dev->dv_locators[PCICF_FUNCTION];
390 1.87 drochner
391 1.87 drochner KASSERT(psc->PCI_SC_DEVICESC(d, f) == dev);
392 1.87 drochner
393 1.87 drochner psc->PCI_SC_DEVICESC(d, f) = 0;
394 1.87 drochner }
395 1.87 drochner
396 1.59 thorpej int
397 1.40 drochner pci_get_capability(pc, tag, capid, offset, value)
398 1.40 drochner pci_chipset_tag_t pc;
399 1.40 drochner pcitag_t tag;
400 1.40 drochner int capid;
401 1.40 drochner int *offset;
402 1.40 drochner pcireg_t *value;
403 1.40 drochner {
404 1.40 drochner pcireg_t reg;
405 1.40 drochner unsigned int ofs;
406 1.40 drochner
407 1.40 drochner reg = pci_conf_read(pc, tag, PCI_COMMAND_STATUS_REG);
408 1.40 drochner if (!(reg & PCI_STATUS_CAPLIST_SUPPORT))
409 1.40 drochner return (0);
410 1.40 drochner
411 1.48 kleink /* Determine the Capability List Pointer register to start with. */
412 1.47 kleink reg = pci_conf_read(pc, tag, PCI_BHLC_REG);
413 1.47 kleink switch (PCI_HDRTYPE_TYPE(reg)) {
414 1.47 kleink case 0: /* standard device header */
415 1.47 kleink ofs = PCI_CAPLISTPTR_REG;
416 1.47 kleink break;
417 1.47 kleink case 2: /* PCI-CardBus Bridge header */
418 1.47 kleink ofs = PCI_CARDBUS_CAPLISTPTR_REG;
419 1.47 kleink break;
420 1.47 kleink default:
421 1.47 kleink return (0);
422 1.47 kleink }
423 1.47 kleink
424 1.47 kleink ofs = PCI_CAPLIST_PTR(pci_conf_read(pc, tag, ofs));
425 1.40 drochner while (ofs != 0) {
426 1.40 drochner #ifdef DIAGNOSTIC
427 1.40 drochner if ((ofs & 3) || (ofs < 0x40))
428 1.40 drochner panic("pci_get_capability");
429 1.40 drochner #endif
430 1.40 drochner reg = pci_conf_read(pc, tag, ofs);
431 1.40 drochner if (PCI_CAPLIST_CAP(reg) == capid) {
432 1.40 drochner if (offset)
433 1.40 drochner *offset = ofs;
434 1.40 drochner if (value)
435 1.40 drochner *value = reg;
436 1.40 drochner return (1);
437 1.40 drochner }
438 1.40 drochner ofs = PCI_CAPLIST_NEXT(reg);
439 1.40 drochner }
440 1.40 drochner
441 1.40 drochner return (0);
442 1.55 fvdl }
443 1.55 fvdl
444 1.55 fvdl int
445 1.55 fvdl pci_find_device(struct pci_attach_args *pa,
446 1.55 fvdl int (*match)(struct pci_attach_args *))
447 1.55 fvdl {
448 1.59 thorpej extern struct cfdriver pci_cd;
449 1.59 thorpej struct device *pcidev;
450 1.55 fvdl int i;
451 1.87 drochner static const int wildcard[2] = {
452 1.87 drochner PCICF_DEV_DEFAULT,
453 1.87 drochner PCICF_FUNCTION_DEFAULT
454 1.87 drochner };
455 1.55 fvdl
456 1.55 fvdl for (i = 0; i < pci_cd.cd_ndevs; i++) {
457 1.55 fvdl pcidev = pci_cd.cd_devs[i];
458 1.59 thorpej if (pcidev != NULL &&
459 1.87 drochner pci_enumerate_bus((struct pci_softc *)pcidev, wildcard,
460 1.59 thorpej match, pa) != 0)
461 1.59 thorpej return (1);
462 1.59 thorpej }
463 1.59 thorpej return (0);
464 1.59 thorpej }
465 1.59 thorpej
466 1.86 drochner #ifndef PCI_MACHDEP_ENUMERATE_BUS
467 1.59 thorpej /*
468 1.59 thorpej * Generic PCI bus enumeration routine. Used unless machine-dependent
469 1.59 thorpej * code needs to provide something else.
470 1.59 thorpej */
471 1.59 thorpej int
472 1.87 drochner pci_enumerate_bus(struct pci_softc *sc, const int *locators,
473 1.59 thorpej int (*match)(struct pci_attach_args *), struct pci_attach_args *pap)
474 1.59 thorpej {
475 1.59 thorpej pci_chipset_tag_t pc = sc->sc_pc;
476 1.59 thorpej int device, function, nfunctions, ret;
477 1.59 thorpej const struct pci_quirkdata *qd;
478 1.59 thorpej pcireg_t id, bhlcr;
479 1.59 thorpej pcitag_t tag;
480 1.60 thorpej #ifdef __PCI_BUS_DEVORDER
481 1.60 thorpej char devs[32];
482 1.60 thorpej int i;
483 1.60 thorpej #endif
484 1.59 thorpej
485 1.60 thorpej #ifdef __PCI_BUS_DEVORDER
486 1.60 thorpej pci_bus_devorder(sc->sc_pc, sc->sc_bus, devs);
487 1.60 thorpej for (i = 0; (device = devs[i]) < 32 && device >= 0; i++)
488 1.60 thorpej #else
489 1.60 thorpej for (device = 0; device < sc->sc_maxndevs; device++)
490 1.60 thorpej #endif
491 1.60 thorpej {
492 1.87 drochner if ((locators[PCICF_DEV] != PCICF_DEV_DEFAULT) &&
493 1.87 drochner (locators[PCICF_DEV] != device))
494 1.87 drochner continue;
495 1.87 drochner
496 1.59 thorpej tag = pci_make_tag(pc, sc->sc_bus, device, 0);
497 1.81 itojun
498 1.81 itojun bhlcr = pci_conf_read(pc, tag, PCI_BHLC_REG);
499 1.81 itojun if (PCI_HDRTYPE_TYPE(bhlcr) > 2)
500 1.81 itojun continue;
501 1.81 itojun
502 1.59 thorpej id = pci_conf_read(pc, tag, PCI_ID_REG);
503 1.59 thorpej
504 1.59 thorpej /* Invalid vendor ID value? */
505 1.59 thorpej if (PCI_VENDOR(id) == PCI_VENDOR_INVALID)
506 1.59 thorpej continue;
507 1.59 thorpej /* XXX Not invalid, but we've done this ~forever. */
508 1.59 thorpej if (PCI_VENDOR(id) == 0)
509 1.59 thorpej continue;
510 1.59 thorpej
511 1.59 thorpej qd = pci_lookup_quirkdata(PCI_VENDOR(id), PCI_PRODUCT(id));
512 1.59 thorpej
513 1.81 itojun if (qd != NULL &&
514 1.81 itojun (qd->quirks & PCI_QUIRK_MULTIFUNCTION) != 0)
515 1.59 thorpej nfunctions = 8;
516 1.81 itojun else if (qd != NULL &&
517 1.81 itojun (qd->quirks & PCI_QUIRK_MONOFUNCTION) != 0)
518 1.81 itojun nfunctions = 1;
519 1.59 thorpej else
520 1.81 itojun nfunctions = PCI_HDRTYPE_MULTIFN(bhlcr) ? 8 : 1;
521 1.59 thorpej
522 1.59 thorpej for (function = 0; function < nfunctions; function++) {
523 1.87 drochner if ((locators[PCICF_FUNCTION] != PCICF_FUNCTION_DEFAULT)
524 1.87 drochner && (locators[PCICF_FUNCTION] != function))
525 1.87 drochner continue;
526 1.87 drochner
527 1.81 itojun if (qd != NULL &&
528 1.81 itojun (qd->quirks & PCI_QUIRK_SKIP_FUNC(function)) != 0)
529 1.81 itojun continue;
530 1.59 thorpej tag = pci_make_tag(pc, sc->sc_bus, device, function);
531 1.59 thorpej ret = pci_probe_device(sc, tag, match, pap);
532 1.59 thorpej if (match != NULL && ret != 0)
533 1.59 thorpej return (ret);
534 1.59 thorpej }
535 1.55 fvdl }
536 1.59 thorpej return (0);
537 1.66 tshiozak }
538 1.86 drochner #endif /* PCI_MACHDEP_ENUMERATE_BUS */
539 1.66 tshiozak
540 1.66 tshiozak /*
541 1.66 tshiozak * Power Management Capability (Rev 2.2)
542 1.66 tshiozak */
543 1.66 tshiozak
544 1.66 tshiozak int
545 1.84 christos pci_powerstate(pci_chipset_tag_t pc, pcitag_t tag, const int *newstate,
546 1.84 christos int *oldstate)
547 1.66 tshiozak {
548 1.66 tshiozak int offset;
549 1.66 tshiozak pcireg_t value, cap, now;
550 1.66 tshiozak
551 1.66 tshiozak if (!pci_get_capability(pc, tag, PCI_CAP_PWRMGMT, &offset, &value))
552 1.84 christos return EOPNOTSUPP;
553 1.66 tshiozak
554 1.66 tshiozak cap = value >> 16;
555 1.67 itojun value = pci_conf_read(pc, tag, offset + PCI_PMCSR);
556 1.84 christos now = value & PCI_PMCSR_STATE_MASK;
557 1.66 tshiozak value &= ~PCI_PMCSR_STATE_MASK;
558 1.84 christos if (oldstate) {
559 1.84 christos switch (now) {
560 1.84 christos case PCI_PMCSR_STATE_D0:
561 1.84 christos *oldstate = PCI_PWR_D0;
562 1.84 christos break;
563 1.84 christos case PCI_PMCSR_STATE_D1:
564 1.84 christos *oldstate = PCI_PWR_D1;
565 1.84 christos break;
566 1.84 christos case PCI_PMCSR_STATE_D2:
567 1.84 christos *oldstate = PCI_PWR_D2;
568 1.84 christos break;
569 1.84 christos case PCI_PMCSR_STATE_D3:
570 1.84 christos *oldstate = PCI_PWR_D3;
571 1.84 christos break;
572 1.84 christos default:
573 1.84 christos return EINVAL;
574 1.84 christos }
575 1.84 christos }
576 1.84 christos if (newstate == NULL)
577 1.84 christos return 0;
578 1.84 christos switch (*newstate) {
579 1.66 tshiozak case PCI_PWR_D0:
580 1.66 tshiozak if (now == PCI_PMCSR_STATE_D0)
581 1.84 christos return 0;
582 1.66 tshiozak value |= PCI_PMCSR_STATE_D0;
583 1.66 tshiozak break;
584 1.66 tshiozak case PCI_PWR_D1:
585 1.66 tshiozak if (now == PCI_PMCSR_STATE_D1)
586 1.84 christos return 0;
587 1.66 tshiozak if (now == PCI_PMCSR_STATE_D2 || now == PCI_PMCSR_STATE_D3)
588 1.84 christos return EINVAL;
589 1.66 tshiozak if (!(cap & PCI_PMCR_D1SUPP))
590 1.84 christos return EOPNOTSUPP;
591 1.66 tshiozak value |= PCI_PMCSR_STATE_D1;
592 1.66 tshiozak break;
593 1.66 tshiozak case PCI_PWR_D2:
594 1.66 tshiozak if (now == PCI_PMCSR_STATE_D2)
595 1.84 christos return 0;
596 1.66 tshiozak if (now == PCI_PMCSR_STATE_D3)
597 1.84 christos return EINVAL;
598 1.66 tshiozak if (!(cap & PCI_PMCR_D2SUPP))
599 1.84 christos return EOPNOTSUPP;
600 1.66 tshiozak value |= PCI_PMCSR_STATE_D2;
601 1.66 tshiozak break;
602 1.66 tshiozak case PCI_PWR_D3:
603 1.66 tshiozak if (now == PCI_PMCSR_STATE_D3)
604 1.84 christos return 0;
605 1.66 tshiozak value |= PCI_PMCSR_STATE_D3;
606 1.66 tshiozak break;
607 1.66 tshiozak default:
608 1.84 christos return EINVAL;
609 1.66 tshiozak }
610 1.67 itojun pci_conf_write(pc, tag, offset + PCI_PMCSR, value);
611 1.66 tshiozak DELAY(1000);
612 1.66 tshiozak
613 1.84 christos return 0;
614 1.77 thorpej }
615 1.77 thorpej
616 1.77 thorpej /*
617 1.77 thorpej * Vital Product Data (PCI 2.2)
618 1.77 thorpej */
619 1.77 thorpej
620 1.77 thorpej int
621 1.77 thorpej pci_vpd_read(pci_chipset_tag_t pc, pcitag_t tag, int offset, int count,
622 1.77 thorpej pcireg_t *data)
623 1.77 thorpej {
624 1.77 thorpej uint32_t reg;
625 1.77 thorpej int ofs, i, j;
626 1.77 thorpej
627 1.77 thorpej KASSERT(data != NULL);
628 1.77 thorpej KASSERT((offset + count) < 0x7fff);
629 1.77 thorpej
630 1.77 thorpej if (pci_get_capability(pc, tag, PCI_CAP_VPD, &ofs, ®) == 0)
631 1.77 thorpej return (1);
632 1.77 thorpej
633 1.77 thorpej for (i = 0; i < count; offset += sizeof(*data), i++) {
634 1.77 thorpej reg &= 0x0000ffff;
635 1.77 thorpej reg &= ~PCI_VPD_OPFLAG;
636 1.77 thorpej reg |= PCI_VPD_ADDRESS(offset);
637 1.77 thorpej pci_conf_write(pc, tag, ofs, reg);
638 1.77 thorpej
639 1.77 thorpej /*
640 1.77 thorpej * PCI 2.2 does not specify how long we should poll
641 1.77 thorpej * for completion nor whether the operation can fail.
642 1.77 thorpej */
643 1.77 thorpej j = 0;
644 1.77 thorpej do {
645 1.77 thorpej if (j++ == 20)
646 1.77 thorpej return (1);
647 1.77 thorpej delay(4);
648 1.77 thorpej reg = pci_conf_read(pc, tag, ofs);
649 1.77 thorpej } while ((reg & PCI_VPD_OPFLAG) == 0);
650 1.77 thorpej data[i] = pci_conf_read(pc, tag, PCI_VPD_DATAREG(ofs));
651 1.77 thorpej }
652 1.77 thorpej
653 1.77 thorpej return (0);
654 1.77 thorpej }
655 1.77 thorpej
656 1.77 thorpej int
657 1.77 thorpej pci_vpd_write(pci_chipset_tag_t pc, pcitag_t tag, int offset, int count,
658 1.77 thorpej pcireg_t *data)
659 1.77 thorpej {
660 1.77 thorpej pcireg_t reg;
661 1.77 thorpej int ofs, i, j;
662 1.77 thorpej
663 1.77 thorpej KASSERT(data != NULL);
664 1.77 thorpej KASSERT((offset + count) < 0x7fff);
665 1.77 thorpej
666 1.77 thorpej if (pci_get_capability(pc, tag, PCI_CAP_VPD, &ofs, ®) == 0)
667 1.77 thorpej return (1);
668 1.77 thorpej
669 1.77 thorpej for (i = 0; i < count; offset += sizeof(*data), i++) {
670 1.77 thorpej pci_conf_write(pc, tag, PCI_VPD_DATAREG(ofs), data[i]);
671 1.77 thorpej
672 1.77 thorpej reg &= 0x0000ffff;
673 1.79 thorpej reg |= PCI_VPD_OPFLAG;
674 1.77 thorpej reg |= PCI_VPD_ADDRESS(offset);
675 1.77 thorpej pci_conf_write(pc, tag, ofs, reg);
676 1.77 thorpej
677 1.77 thorpej /*
678 1.77 thorpej * PCI 2.2 does not specify how long we should poll
679 1.77 thorpej * for completion nor whether the operation can fail.
680 1.77 thorpej */
681 1.77 thorpej j = 0;
682 1.77 thorpej do {
683 1.77 thorpej if (j++ == 20)
684 1.77 thorpej return (1);
685 1.77 thorpej delay(1);
686 1.77 thorpej reg = pci_conf_read(pc, tag, ofs);
687 1.79 thorpej } while (reg & PCI_VPD_OPFLAG);
688 1.77 thorpej }
689 1.77 thorpej
690 1.77 thorpej return (0);
691 1.80 fvdl }
692 1.80 fvdl
693 1.80 fvdl int
694 1.80 fvdl pci_dma64_available(struct pci_attach_args *pa)
695 1.80 fvdl {
696 1.80 fvdl #ifdef _PCI_HAVE_DMA64
697 1.80 fvdl if (BUS_DMA_TAG_VALID(pa->pa_dmat64) &&
698 1.80 fvdl ((uint64_t)physmem << PAGE_SHIFT) > 0xffffffffULL)
699 1.80 fvdl return 1;
700 1.80 fvdl #endif
701 1.80 fvdl return 0;
702 1.1 mycroft }
703 1.90 jmcneill
704 1.90 jmcneill void
705 1.90 jmcneill pci_conf_capture(pci_chipset_tag_t pc, pcitag_t tag,
706 1.90 jmcneill struct pci_conf_state *pcs)
707 1.90 jmcneill {
708 1.90 jmcneill int off;
709 1.90 jmcneill
710 1.90 jmcneill for (off = 0; off < 16; off++)
711 1.90 jmcneill pcs->reg[off] = pci_conf_read(pc, tag, (off * 4));
712 1.90 jmcneill
713 1.90 jmcneill return;
714 1.90 jmcneill }
715 1.90 jmcneill
716 1.90 jmcneill void
717 1.90 jmcneill pci_conf_restore(pci_chipset_tag_t pc, pcitag_t tag,
718 1.90 jmcneill struct pci_conf_state *pcs)
719 1.90 jmcneill {
720 1.90 jmcneill int off;
721 1.90 jmcneill
722 1.90 jmcneill for (off = 0; off < 16; off++)
723 1.90 jmcneill pci_conf_write(pc, tag, (off * 4), pcs->reg[off]);
724 1.90 jmcneill
725 1.90 jmcneill return;
726 1.90 jmcneill }
727