rbus_ppb.c revision 1.40 1 1.40 dyoung /* $NetBSD: rbus_ppb.c,v 1.40 2011/05/17 17:34:53 dyoung Exp $ */
2 1.1 mcr
3 1.1 mcr /*
4 1.1 mcr * Copyright (c) 1999 The NetBSD Foundation, Inc.
5 1.1 mcr * All rights reserved.
6 1.1 mcr *
7 1.1 mcr * This code is derived from software contributed to The NetBSD Foundation
8 1.1 mcr * by Michael Richardson <mcr (at) sandelman.ottawa.on.ca>
9 1.1 mcr *
10 1.1 mcr * Redistribution and use in source and binary forms, with or without
11 1.1 mcr * modification, are permitted provided that the following conditions
12 1.1 mcr * are met:
13 1.1 mcr * 1. Redistributions of source code must retain the above copyright
14 1.1 mcr * notice, this list of conditions and the following disclaimer.
15 1.1 mcr * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 mcr * notice, this list of conditions and the following disclaimer in the
17 1.1 mcr * documentation and/or other materials provided with the distribution.
18 1.1 mcr *
19 1.1 mcr * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 1.1 mcr * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 1.1 mcr * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 1.1 mcr * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 1.1 mcr * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 1.1 mcr * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 1.1 mcr * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 1.1 mcr * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 1.1 mcr * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 1.1 mcr * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 1.1 mcr * POSSIBILITY OF SUCH DAMAGE.
30 1.1 mcr */
31 1.1 mcr
32 1.1 mcr /*
33 1.1 mcr * CardBus front-end for the Intel/Digital DECchip 21152 PCI-PCI bridge
34 1.1 mcr */
35 1.2 lukem
36 1.2 lukem #include <sys/cdefs.h>
37 1.40 dyoung __KERNEL_RCSID(0, "$NetBSD: rbus_ppb.c,v 1.40 2011/05/17 17:34:53 dyoung Exp $");
38 1.1 mcr
39 1.1 mcr #include <sys/param.h>
40 1.1 mcr #include <sys/systm.h>
41 1.1 mcr #include <sys/mbuf.h>
42 1.1 mcr #include <sys/malloc.h>
43 1.1 mcr #include <sys/kernel.h>
44 1.1 mcr #include <sys/socket.h>
45 1.1 mcr #include <sys/ioctl.h>
46 1.1 mcr #include <sys/errno.h>
47 1.1 mcr #include <sys/device.h>
48 1.38 dyoung #include <sys/kmem.h>
49 1.1 mcr
50 1.1 mcr #if NRND > 0
51 1.1 mcr #include <sys/rnd.h>
52 1.1 mcr #endif
53 1.1 mcr
54 1.1 mcr #include <machine/endian.h>
55 1.1 mcr
56 1.20 ad #include <sys/bus.h>
57 1.20 ad #include <sys/intr.h>
58 1.1 mcr
59 1.1 mcr #include <dev/pci/pcivar.h>
60 1.1 mcr #include <dev/pci/pcireg.h>
61 1.1 mcr #include <dev/pci/pcidevs.h>
62 1.1 mcr #include <dev/pci/ppbreg.h>
63 1.1 mcr
64 1.1 mcr #include <dev/ic/i82365reg.h>
65 1.1 mcr
66 1.1 mcr #include <dev/pci/pccbbreg.h>
67 1.1 mcr #include <dev/pci/pccbbvar.h>
68 1.1 mcr
69 1.1 mcr #include <dev/cardbus/cardbusvar.h>
70 1.12 mycroft #include <dev/pci/pcidevs.h>
71 1.1 mcr
72 1.23 jmcneill #include <x86/pci/pci_addr_fixup.h>
73 1.23 jmcneill #include <x86/pci/pci_bus_fixup.h>
74 1.1 mcr #include <i386/pci/pci_intr_fixup.h>
75 1.1 mcr #include <i386/pci/pcibios.h>
76 1.1 mcr
77 1.1 mcr struct ppb_softc;
78 1.1 mcr
79 1.31 cegger static int ppb_cardbus_match(device_t, cfdata_t, void *);
80 1.31 cegger static void ppb_cardbus_attach(device_t, device_t, void *);
81 1.31 cegger static int ppb_activate(device_t, enum devact);
82 1.16 drochner int rppbprint(void *, const char *);
83 1.16 drochner int rbus_intr_fixup(pci_chipset_tag_t, int, int, int);
84 1.16 drochner void rbus_do_header_fixup(pci_chipset_tag_t, pcitag_t, void *);
85 1.1 mcr
86 1.16 drochner static void rbus_pci_phys_allocate(pci_chipset_tag_t, pcitag_t, void *);
87 1.16 drochner
88 1.16 drochner static int rbus_do_phys_allocate(pci_chipset_tag_t, pcitag_t, int,
89 1.16 drochner void *, int, bus_addr_t *, bus_size_t);
90 1.16 drochner
91 1.16 drochner static void rbus_pci_phys_countspace(pci_chipset_tag_t, pcitag_t, void *);
92 1.16 drochner
93 1.16 drochner static int rbus_do_phys_countspace(pci_chipset_tag_t, pcitag_t, int,
94 1.16 drochner void *, int, bus_addr_t *, bus_size_t);
95 1.16 drochner
96 1.16 drochner unsigned int rbus_round_up(unsigned int, unsigned int);
97 1.1 mcr
98 1.1 mcr
99 1.1 mcr struct ppb_cardbus_softc {
100 1.25 joerg device_t sc_dev;
101 1.3 thorpej pcitag_t sc_tag;
102 1.1 mcr int foo;
103 1.1 mcr };
104 1.1 mcr
105 1.25 joerg CFATTACH_DECL_NEW(rbus_ppb, sizeof(struct ppb_cardbus_softc),
106 1.39 dyoung ppb_cardbus_match, ppb_cardbus_attach, NULL, ppb_activate);
107 1.1 mcr
108 1.1 mcr #ifdef CBB_DEBUG
109 1.1 mcr int rbus_ppb_debug = 0; /* hack with kdb */
110 1.1 mcr #define DPRINTF(X) if(rbus_ppb_debug) printf X
111 1.1 mcr #else
112 1.1 mcr #define DPRINTF(X)
113 1.1 mcr #endif
114 1.1 mcr
115 1.1 mcr static int
116 1.31 cegger ppb_cardbus_match(device_t parent, cfdata_t match, void *aux)
117 1.1 mcr {
118 1.1 mcr struct cardbus_attach_args *ca = aux;
119 1.1 mcr
120 1.35 dyoung if (PCI_VENDOR(ca->ca_id) == PCI_VENDOR_DEC &&
121 1.35 dyoung PCI_PRODUCT(ca->ca_id) == PCI_PRODUCT_DEC_21152)
122 1.1 mcr return (1);
123 1.1 mcr
124 1.1 mcr if(PCI_CLASS(ca->ca_class) == PCI_CLASS_BRIDGE &&
125 1.1 mcr PCI_SUBCLASS(ca->ca_class) == PCI_SUBCLASS_BRIDGE_PCI) {
126 1.1 mcr /* XXX */
127 1.1 mcr printf("recognizing generic bridge chip\n");
128 1.1 mcr }
129 1.1 mcr
130 1.1 mcr return (0);
131 1.1 mcr }
132 1.1 mcr
133 1.1 mcr
134 1.1 mcr int
135 1.27 dsl rppbprint(void *aux, const char *pnp)
136 1.1 mcr {
137 1.1 mcr struct pcibus_attach_args *pba = aux;
138 1.1 mcr
139 1.1 mcr /* only PCIs can attach to PPBs; easy. */
140 1.1 mcr if (pnp)
141 1.9 thorpej aprint_normal("pci at %s", pnp);
142 1.9 thorpej aprint_normal(" bus %d (rbus)", pba->pba_bus);
143 1.1 mcr return (UNCONF);
144 1.1 mcr }
145 1.1 mcr
146 1.1 mcr int
147 1.1 mcr rbus_intr_fixup(pci_chipset_tag_t pc,
148 1.1 mcr int minbus,
149 1.1 mcr int maxbus,
150 1.1 mcr int line)
151 1.1 mcr {
152 1.1 mcr pci_device_foreach_min(pc, minbus,
153 1.1 mcr maxbus, rbus_do_header_fixup, (void *)&line);
154 1.1 mcr return 0;
155 1.1 mcr }
156 1.1 mcr
157 1.1 mcr void
158 1.27 dsl rbus_do_header_fixup(pci_chipset_tag_t pc, pcitag_t tag, void *context)
159 1.1 mcr {
160 1.1 mcr int pin, irq;
161 1.1 mcr int bus, device, function;
162 1.1 mcr pcireg_t intr, id;
163 1.1 mcr int *pline = (int *)context;
164 1.1 mcr int line = *pline;
165 1.1 mcr
166 1.1 mcr pci_decompose_tag(pc, tag, &bus, &device, &function);
167 1.1 mcr id = pci_conf_read(pc, tag, PCI_ID_REG);
168 1.1 mcr
169 1.1 mcr intr = pci_conf_read(pc, tag, PCI_INTERRUPT_REG);
170 1.1 mcr pin = PCI_INTERRUPT_PIN(intr);
171 1.1 mcr irq = PCI_INTERRUPT_LINE(intr);
172 1.1 mcr
173 1.1 mcr #if 0
174 1.1 mcr printf("do_header %02x:%02x:%02x pin=%d => line %d\n",
175 1.1 mcr bus, device, function, pin, line);
176 1.1 mcr #endif
177 1.1 mcr
178 1.1 mcr intr &= ~(PCI_INTERRUPT_LINE_MASK << PCI_INTERRUPT_LINE_SHIFT);
179 1.1 mcr intr |= (line << PCI_INTERRUPT_LINE_SHIFT);
180 1.1 mcr pci_conf_write(pc, tag, PCI_INTERRUPT_REG, intr);
181 1.1 mcr
182 1.1 mcr }
183 1.1 mcr
184 1.15 perry /*
185 1.1 mcr * This function takes a range of PCI bus numbers and
186 1.1 mcr * allocates space for all devices found in this space (the BARs) from
187 1.1 mcr * the rbus space maps (I/O and memory).
188 1.1 mcr *
189 1.1 mcr * It assumes that "rbus" is defined. The whole concept does.
190 1.1 mcr *
191 1.1 mcr * It uses pci_device_foreach_min() to call rbus_pci_phys_allocate.
192 1.1 mcr * This function is mostly stolen from
193 1.15 perry * pci_addr_fixup.c:pciaddr_resource_reserve.
194 1.1 mcr *
195 1.1 mcr */
196 1.1 mcr struct rbus_pci_addr_fixup_context {
197 1.1 mcr struct ppb_cardbus_softc *csc;
198 1.1 mcr cardbus_chipset_tag_t ct;
199 1.1 mcr struct cardbus_softc *sc;
200 1.1 mcr struct cardbus_attach_args *caa;
201 1.1 mcr int minbus;
202 1.1 mcr int maxbus;
203 1.1 mcr bus_size_t *bussize_ioreqs;
204 1.1 mcr bus_size_t *bussize_memreqs;
205 1.1 mcr rbus_tag_t *iobustags;
206 1.1 mcr rbus_tag_t *membustags;
207 1.15 perry };
208 1.1 mcr
209 1.15 perry unsigned int
210 1.16 drochner rbus_round_up(unsigned int size, unsigned int minval)
211 1.1 mcr {
212 1.1 mcr unsigned int power2;
213 1.1 mcr
214 1.1 mcr if(size == 0) {
215 1.1 mcr return 0;
216 1.1 mcr }
217 1.1 mcr
218 1.16 drochner power2=minval;
219 1.1 mcr
220 1.1 mcr while(power2 < (1 << 31) &&
221 1.1 mcr power2 < size) {
222 1.1 mcr power2 = power2 << 1;
223 1.1 mcr }
224 1.15 perry
225 1.1 mcr return power2;
226 1.1 mcr }
227 1.15 perry
228 1.1 mcr static void
229 1.1 mcr rbus_pci_addr_fixup(struct ppb_cardbus_softc *csc,
230 1.1 mcr cardbus_chipset_tag_t ct,
231 1.1 mcr struct cardbus_softc *sc,
232 1.1 mcr pci_chipset_tag_t pc,
233 1.1 mcr struct cardbus_attach_args *caa,
234 1.38 dyoung int minbus, const int maxbus)
235 1.1 mcr {
236 1.1 mcr struct rbus_pci_addr_fixup_context rct;
237 1.38 dyoung const size_t size = sizeof(bus_size_t[maxbus+1]);
238 1.38 dyoung int busnum;
239 1.1 mcr bus_addr_t start;
240 1.1 mcr bus_space_handle_t handle;
241 1.1 mcr u_int32_t reg;
242 1.1 mcr
243 1.1 mcr rct.csc=csc;
244 1.1 mcr rct.ct=ct;
245 1.1 mcr rct.sc=sc;
246 1.1 mcr rct.caa=caa;
247 1.1 mcr rct.minbus = minbus;
248 1.1 mcr rct.maxbus = maxbus;
249 1.38 dyoung if ((rct.bussize_ioreqs = kmem_zalloc(size, KM_SLEEP)) == NULL ||
250 1.38 dyoung (rct.bussize_memreqs = kmem_zalloc(size, KM_SLEEP)) == NULL ||
251 1.38 dyoung (rct.iobustags =
252 1.38 dyoung kmem_zalloc(maxbus * sizeof(rbus_tag_t), KM_SLEEP)) == NULL ||
253 1.38 dyoung (rct.membustags =
254 1.38 dyoung kmem_zalloc(maxbus * sizeof(rbus_tag_t), KM_SLEEP)) == NULL)
255 1.38 dyoung panic("%s: memory allocation failed", __func__);
256 1.1 mcr
257 1.1 mcr printf("%s: sizing buses %d-%d\n",
258 1.25 joerg device_xname(rct.csc->sc_dev),
259 1.1 mcr minbus, maxbus);
260 1.1 mcr
261 1.1 mcr pci_device_foreach_min(pc, minbus, maxbus,
262 1.1 mcr rbus_pci_phys_countspace, &rct);
263 1.1 mcr
264 1.1 mcr /*
265 1.1 mcr * we need to determine amount of address space for each
266 1.1 mcr * bus. To do this, we have to roll up amounts and then
267 1.1 mcr * we need to divide up the cardbus's extent to allocate
268 1.1 mcr * some space to each bus.
269 1.1 mcr */
270 1.1 mcr
271 1.1 mcr for(busnum=maxbus; busnum > minbus; busnum--) {
272 1.1 mcr if(pci_bus_parent[busnum] != 0) {
273 1.1 mcr if(pci_bus_parent[busnum] < minbus ||
274 1.1 mcr pci_bus_parent[busnum] >= maxbus) {
275 1.1 mcr printf("%s: bus %d has illegal parent %d\n",
276 1.25 joerg device_xname(rct.csc->sc_dev),
277 1.1 mcr busnum, pci_bus_parent[busnum]);
278 1.1 mcr continue;
279 1.1 mcr }
280 1.1 mcr
281 1.1 mcr /* first round amount of space up */
282 1.1 mcr rct.bussize_ioreqs[busnum] =
283 1.1 mcr rbus_round_up(rct.bussize_ioreqs[busnum], PPB_IO_MIN);
284 1.1 mcr rct.bussize_ioreqs[pci_bus_parent[busnum]] +=
285 1.1 mcr rct.bussize_ioreqs[busnum];
286 1.1 mcr
287 1.1 mcr rct.bussize_memreqs[busnum] =
288 1.1 mcr rbus_round_up(rct.bussize_memreqs[busnum], PPB_MEM_MIN);
289 1.1 mcr rct.bussize_memreqs[pci_bus_parent[busnum]] +=
290 1.1 mcr rct.bussize_memreqs[busnum];
291 1.1 mcr
292 1.1 mcr }
293 1.1 mcr }
294 1.1 mcr
295 1.1 mcr rct.bussize_ioreqs[minbus] =
296 1.1 mcr rbus_round_up(rct.bussize_ioreqs[minbus], 4096);
297 1.1 mcr rct.bussize_memreqs[minbus] =
298 1.1 mcr rbus_round_up(rct.bussize_memreqs[minbus], 8);
299 1.1 mcr
300 1.38 dyoung printf("%s: total needs IO %08zx and MEM %08zx\n",
301 1.25 joerg device_xname(rct.csc->sc_dev),
302 1.1 mcr rct.bussize_ioreqs[minbus], rct.bussize_memreqs[minbus]);
303 1.1 mcr
304 1.1 mcr if(!caa->ca_rbus_iot) {
305 1.1 mcr panic("no iot bus");
306 1.1 mcr }
307 1.1 mcr
308 1.1 mcr if(rct.bussize_ioreqs[minbus]) {
309 1.1 mcr if(rbus_space_alloc(caa->ca_rbus_iot, 0,
310 1.1 mcr rct.bussize_ioreqs[minbus],
311 1.1 mcr rct.bussize_ioreqs[minbus]-1 /* mask */,
312 1.1 mcr rct.bussize_ioreqs[minbus] /* align */,
313 1.1 mcr /* flags */ 0,
314 1.1 mcr &start,
315 1.1 mcr &handle) != 0) {
316 1.38 dyoung panic("rbus_ppb: can not allocate %zu bytes in IO bus %d",
317 1.1 mcr rct.bussize_ioreqs[minbus], minbus);
318 1.1 mcr }
319 1.1 mcr rct.iobustags[minbus]=rbus_new(caa->ca_rbus_iot,
320 1.15 perry start,
321 1.1 mcr rct.bussize_ioreqs[minbus],
322 1.1 mcr 0 /* offset to add to physical address
323 1.1 mcr to make processor address */,
324 1.1 mcr RBUS_SPACE_DEDICATE);
325 1.1 mcr }
326 1.1 mcr
327 1.1 mcr if(rct.bussize_memreqs[minbus]) {
328 1.1 mcr if(rbus_space_alloc(caa->ca_rbus_memt, 0,
329 1.1 mcr rct.bussize_memreqs[minbus],
330 1.1 mcr rct.bussize_memreqs[minbus]-1 /* mask */,
331 1.1 mcr rct.bussize_memreqs[minbus] /* align */,
332 1.1 mcr /* flags */ 0,
333 1.1 mcr &start,
334 1.1 mcr &handle) != 0) {
335 1.38 dyoung panic("%s: can not allocate %zu bytes in MEM bus %d",
336 1.25 joerg device_xname(rct.csc->sc_dev),
337 1.1 mcr rct.bussize_memreqs[minbus], minbus);
338 1.1 mcr }
339 1.1 mcr rct.membustags[minbus]=rbus_new(caa->ca_rbus_memt,
340 1.1 mcr start,
341 1.1 mcr rct.bussize_memreqs[minbus],
342 1.1 mcr 0 /* offset to add to physical
343 1.1 mcr address to make processor
344 1.1 mcr address */,
345 1.1 mcr RBUS_SPACE_DEDICATE);
346 1.1 mcr }
347 1.1 mcr
348 1.1 mcr for(busnum=minbus+1; busnum <= maxbus; busnum++) {
349 1.1 mcr int busparent;
350 1.1 mcr
351 1.1 mcr busparent = pci_bus_parent[busnum];
352 1.1 mcr
353 1.38 dyoung printf("%s: bus %d (parent=%d) needs IO %08zx and MEM %08zx\n",
354 1.25 joerg device_xname(rct.csc->sc_dev),
355 1.1 mcr busnum,
356 1.1 mcr busparent,
357 1.1 mcr rct.bussize_ioreqs[busnum],
358 1.1 mcr rct.bussize_memreqs[busnum]);
359 1.1 mcr
360 1.1 mcr if(busparent > maxbus) {
361 1.1 mcr panic("rbus_ppb: illegal parent");
362 1.1 mcr }
363 1.1 mcr
364 1.1 mcr if(rct.bussize_ioreqs[busnum]) {
365 1.1 mcr if(rbus_space_alloc(rct.iobustags[busparent],
366 1.1 mcr 0,
367 1.1 mcr rct.bussize_ioreqs[busnum],
368 1.1 mcr rct.bussize_ioreqs[busnum]-1 /*mask */,
369 1.1 mcr rct.bussize_ioreqs[busnum] /* align */,
370 1.1 mcr /* flags */ 0,
371 1.1 mcr &start,
372 1.1 mcr &handle) != 0) {
373 1.38 dyoung panic("rbus_ppb: can not allocate %zu bytes in IO bus %d",
374 1.1 mcr rct.bussize_ioreqs[busnum], busnum);
375 1.1 mcr }
376 1.1 mcr rct.iobustags[busnum]=rbus_new(rct.iobustags[busparent],
377 1.1 mcr start,
378 1.1 mcr rct.bussize_ioreqs[busnum],
379 1.1 mcr 0 /* offset to add to physical
380 1.1 mcr address
381 1.1 mcr to make processor address */,
382 1.1 mcr RBUS_SPACE_DEDICATE);
383 1.1 mcr
384 1.1 mcr /* program the bridge */
385 1.15 perry
386 1.1 mcr /* enable I/O space */
387 1.1 mcr reg = pci_conf_read(pc, pci_bus_tag[busnum],
388 1.1 mcr PCI_COMMAND_STATUS_REG);
389 1.1 mcr reg |= PCI_COMMAND_IO_ENABLE | PCI_COMMAND_MASTER_ENABLE;
390 1.1 mcr pci_conf_write(pc, pci_bus_tag[busnum],
391 1.1 mcr PCI_COMMAND_STATUS_REG, reg);
392 1.1 mcr
393 1.1 mcr /* now init the limit register for I/O */
394 1.1 mcr pci_conf_write(pc, pci_bus_tag[busnum], PPB_REG_IOSTATUS,
395 1.1 mcr (((start & 0xf000) >> 8) << PPB_IOBASE_SHIFT) |
396 1.1 mcr ((((start +
397 1.1 mcr rct.bussize_ioreqs[busnum] +
398 1.1 mcr 4095) & 0xf000) >> 8) << PPB_IOLIMIT_SHIFT));
399 1.1 mcr }
400 1.15 perry
401 1.1 mcr if(rct.bussize_memreqs[busnum]) {
402 1.1 mcr if(rbus_space_alloc(rct.membustags[busparent],
403 1.1 mcr 0,
404 1.15 perry rct.bussize_memreqs[busnum] /* size */,
405 1.15 perry rct.bussize_memreqs[busnum]-1 /*mask */,
406 1.1 mcr rct.bussize_memreqs[busnum] /* align */,
407 1.1 mcr /* flags */ 0,
408 1.1 mcr &start,
409 1.1 mcr &handle) != 0) {
410 1.38 dyoung panic("rbus_ppb: can not allocate %zu bytes in MEM bus %d",
411 1.1 mcr rct.bussize_memreqs[busnum], busnum);
412 1.1 mcr }
413 1.1 mcr rct.membustags[busnum]=rbus_new(rct.membustags[busparent],
414 1.1 mcr start,
415 1.1 mcr rct.bussize_memreqs[busnum],
416 1.1 mcr 0 /* offset to add to physical
417 1.1 mcr address to make processor
418 1.1 mcr address */,
419 1.1 mcr RBUS_SPACE_DEDICATE);
420 1.1 mcr
421 1.1 mcr /* program the bridge */
422 1.1 mcr /* enable memory space */
423 1.1 mcr reg = pci_conf_read(pc, pci_bus_tag[busnum],
424 1.1 mcr PCI_COMMAND_STATUS_REG);
425 1.1 mcr reg |= PCI_COMMAND_MEM_ENABLE | PCI_COMMAND_MASTER_ENABLE;
426 1.1 mcr pci_conf_write(pc, pci_bus_tag[busnum],
427 1.1 mcr PCI_COMMAND_STATUS_REG, reg);
428 1.1 mcr
429 1.1 mcr /* now init the limit register for memory */
430 1.1 mcr pci_conf_write(pc, pci_bus_tag[busnum], PPB_REG_MEM,
431 1.1 mcr ((start & PPB_MEM_MASK)
432 1.1 mcr >> PPB_MEM_SHIFT) << PPB_MEMBASE_SHIFT |
433 1.1 mcr (((start +
434 1.1 mcr rct.bussize_memreqs[busnum] +
435 1.1 mcr PPB_MEM_MIN-1) >> PPB_MEM_SHIFT)
436 1.1 mcr << PPB_MEMLIMIT_SHIFT));
437 1.1 mcr
438 1.1 mcr /* and set the prefetchable limits as well */
439 1.1 mcr pci_conf_write(pc, pci_bus_tag[busnum], PPB_REG_PREFMEM,
440 1.1 mcr ((start & PPB_MEM_MASK)
441 1.1 mcr >> PPB_MEM_SHIFT) << PPB_MEMBASE_SHIFT |
442 1.1 mcr (((start +
443 1.1 mcr rct.bussize_memreqs[busnum] +
444 1.1 mcr PPB_MEM_MIN-1) >> PPB_MEM_SHIFT)
445 1.1 mcr << PPB_MEMLIMIT_SHIFT));
446 1.1 mcr
447 1.1 mcr /* pci_conf_print(pc, pci_bus_tag[busnum], NULL); */
448 1.1 mcr }
449 1.1 mcr }
450 1.1 mcr
451 1.1 mcr printf("%s: configuring buses %d-%d\n",
452 1.25 joerg device_xname(rct.csc->sc_dev),
453 1.1 mcr minbus, maxbus);
454 1.1 mcr pci_device_foreach_min(pc, minbus, maxbus,
455 1.1 mcr rbus_pci_phys_allocate, &rct);
456 1.38 dyoung
457 1.38 dyoung kmem_free(rct.bussize_ioreqs, size);
458 1.38 dyoung kmem_free(rct.bussize_memreqs, size);
459 1.38 dyoung kmem_free(rct.iobustags, maxbus * sizeof(rbus_tag_t));
460 1.38 dyoung kmem_free(rct.membustags, maxbus * sizeof(rbus_tag_t));
461 1.1 mcr }
462 1.1 mcr
463 1.1 mcr static void
464 1.27 dsl rbus_pci_phys_countspace(pci_chipset_tag_t pc, pcitag_t tag, void *context)
465 1.1 mcr {
466 1.1 mcr int bus, device, function;
467 1.1 mcr struct rbus_pci_addr_fixup_context *rct =
468 1.1 mcr (struct rbus_pci_addr_fixup_context *)context;
469 1.1 mcr
470 1.1 mcr pci_decompose_tag(pc, tag, &bus, &device, &function);
471 1.1 mcr
472 1.1 mcr printf("%s: configuring device %02x:%02x:%02x\n",
473 1.25 joerg device_xname(rct->csc->sc_dev),
474 1.1 mcr bus, device, function);
475 1.1 mcr
476 1.1 mcr pciaddr_resource_manage(pc, tag,
477 1.1 mcr rbus_do_phys_countspace, context);
478 1.1 mcr }
479 1.1 mcr
480 1.15 perry
481 1.1 mcr int
482 1.28 dsl rbus_do_phys_countspace(pci_chipset_tag_t pc, pcitag_t tag, int mapreg, void *ctx, int type, bus_addr_t *addr, bus_size_t size)
483 1.1 mcr {
484 1.1 mcr struct rbus_pci_addr_fixup_context *rct =
485 1.1 mcr (struct rbus_pci_addr_fixup_context *)ctx;
486 1.1 mcr int bus, device, function;
487 1.1 mcr
488 1.1 mcr pci_decompose_tag(pc, tag, &bus, &device, &function);
489 1.1 mcr
490 1.1 mcr if(size > (1<<24)) {
491 1.1 mcr printf("%s: skipping huge space request of size=%08x\n",
492 1.25 joerg device_xname(rct->csc->sc_dev), (unsigned int)size);
493 1.1 mcr return 0;
494 1.1 mcr }
495 1.1 mcr
496 1.1 mcr if(PCI_MAPREG_TYPE(type) == PCI_MAPREG_TYPE_IO) {
497 1.1 mcr rct->bussize_ioreqs[bus] += size;
498 1.1 mcr } else {
499 1.1 mcr rct->bussize_memreqs[bus]+= size;
500 1.1 mcr }
501 1.15 perry
502 1.1 mcr return 0;
503 1.1 mcr }
504 1.1 mcr
505 1.1 mcr static void
506 1.27 dsl rbus_pci_phys_allocate(pci_chipset_tag_t pc, pcitag_t tag, void *context)
507 1.1 mcr {
508 1.1 mcr int bus, device, function, command;
509 1.1 mcr struct rbus_pci_addr_fixup_context *rct =
510 1.1 mcr (struct rbus_pci_addr_fixup_context *)context;
511 1.15 perry
512 1.1 mcr pci_decompose_tag(pc, tag, &bus, &device, &function);
513 1.1 mcr
514 1.1 mcr printf("%s: configuring device %02x:%02x:%02x\n",
515 1.25 joerg device_xname(rct->csc->sc_dev),
516 1.1 mcr bus, device, function);
517 1.1 mcr
518 1.1 mcr pciaddr_resource_manage(pc, tag,
519 1.1 mcr rbus_do_phys_allocate, context);
520 1.1 mcr
521 1.1 mcr /* now turn the device's memory and I/O on */
522 1.1 mcr command = pci_conf_read(pc, tag, PCI_COMMAND_STATUS_REG);
523 1.1 mcr command |= PCI_COMMAND_IO_ENABLE|PCI_COMMAND_MEM_ENABLE;
524 1.1 mcr pci_conf_write(pc, tag, PCI_COMMAND_STATUS_REG, command);
525 1.1 mcr }
526 1.1 mcr
527 1.1 mcr int
528 1.28 dsl rbus_do_phys_allocate(pci_chipset_tag_t pc, pcitag_t tag, int mapreg, void *ctx, int type, bus_addr_t *addr, bus_size_t size)
529 1.1 mcr {
530 1.1 mcr struct rbus_pci_addr_fixup_context *rct =
531 1.1 mcr (struct rbus_pci_addr_fixup_context *)ctx;
532 1.1 mcr cardbus_chipset_tag_t ct = rct->ct;
533 1.1 mcr struct cardbus_softc *sc = rct->sc;
534 1.1 mcr cardbus_function_t *cf = sc->sc_cf;
535 1.1 mcr rbus_tag_t rbustag;
536 1.1 mcr bus_space_tag_t bustag;
537 1.1 mcr bus_addr_t mask = size -1;
538 1.1 mcr bus_addr_t base = 0;
539 1.1 mcr bus_space_handle_t handle;
540 1.1 mcr int busflags = 0;
541 1.1 mcr int flags = 0;
542 1.16 drochner const char *bustype;
543 1.1 mcr int bus, device, function;
544 1.1 mcr
545 1.1 mcr pci_decompose_tag(pc, tag, &bus, &device, &function);
546 1.1 mcr
547 1.1 mcr /*
548 1.1 mcr * some devices come up with garbage in them (Tulip?)
549 1.1 mcr * we are in charge here, so give them address
550 1.15 perry * space anyway.
551 1.1 mcr *
552 1.1 mcr * XXX this may be due to no secondary PCI reset!!!
553 1.1 mcr */
554 1.1 mcr #if 0
555 1.1 mcr if (*addr) {
556 1.1 mcr printf("Already allocated space at %08x\n",
557 1.1 mcr (unsigned int)*addr);
558 1.1 mcr return (0);
559 1.1 mcr }
560 1.1 mcr #endif
561 1.1 mcr
562 1.1 mcr if(size > (1<<24)) {
563 1.1 mcr printf("%s: skipping huge space request of size=%08x\n",
564 1.25 joerg device_xname(rct->csc->sc_dev), (unsigned int)size);
565 1.1 mcr return 0;
566 1.1 mcr }
567 1.1 mcr
568 1.1 mcr if(PCI_MAPREG_TYPE(type) == PCI_MAPREG_TYPE_IO) {
569 1.1 mcr bustag = sc->sc_iot;
570 1.1 mcr rbustag = rct->iobustags[bus];
571 1.1 mcr bustype = "io";
572 1.1 mcr } else {
573 1.1 mcr bustag = sc->sc_memt;
574 1.1 mcr rbustag = rct->membustags[bus];
575 1.1 mcr bustype = "mem";
576 1.1 mcr }
577 1.1 mcr
578 1.1 mcr if((*cf->cardbus_space_alloc)(ct, rbustag, base, size,
579 1.1 mcr mask, size, busflags|flags,
580 1.1 mcr addr, &handle)) {
581 1.1 mcr printf("%s: no available resources (size=%08x) for bar %2d. fixup failed\n",
582 1.25 joerg device_xname(rct->csc->sc_dev), (unsigned int)size, mapreg);
583 1.1 mcr
584 1.1 mcr *addr = 0;
585 1.1 mcr pci_conf_write(pc, tag, mapreg, *addr);
586 1.1 mcr return (1);
587 1.1 mcr }
588 1.1 mcr
589 1.1 mcr printf("%s: alloc %s space of size %08x for %02d:%02d:%02d -> %08x\n",
590 1.25 joerg device_xname(rct->csc->sc_dev),
591 1.15 perry bustype,
592 1.1 mcr (unsigned int)size,
593 1.1 mcr bus, device, function, (unsigned int)*addr);
594 1.1 mcr
595 1.1 mcr /* write new address to PCI device configuration header */
596 1.1 mcr pci_conf_write(pc, tag, mapreg, *addr);
597 1.1 mcr
598 1.1 mcr /* check */
599 1.1 mcr {
600 1.1 mcr DPRINTF(("%s: pci_addr_fixup: ",
601 1.25 joerg device_xname(rct->csc->sc_dev)));
602 1.1 mcr #ifdef CBB_DEBUG
603 1.1 mcr if(rbus_ppb_debug) { pciaddr_print_devid(pc, tag); }
604 1.1 mcr #endif
605 1.1 mcr }
606 1.1 mcr
607 1.1 mcr /* double check that the value got inserted correctly */
608 1.1 mcr if (pciaddr_ioaddr(pci_conf_read(pc, tag, mapreg)) != *addr) {
609 1.1 mcr pci_conf_write(pc, tag, mapreg, 0); /* clear */
610 1.1 mcr printf("%s: fixup failed. (new address=%#x)\n",
611 1.25 joerg device_xname(rct->csc->sc_dev),
612 1.1 mcr (unsigned)*addr);
613 1.1 mcr return (1);
614 1.1 mcr }
615 1.1 mcr
616 1.1 mcr DPRINTF(("new address 0x%08x\n",
617 1.1 mcr (unsigned)*addr));
618 1.1 mcr
619 1.1 mcr return (0);
620 1.1 mcr }
621 1.1 mcr
622 1.1 mcr static void
623 1.25 joerg ppb_cardbus_attach(device_t parent, device_t self, void *aux)
624 1.1 mcr {
625 1.19 thorpej struct ppb_cardbus_softc *csc = device_private(self);
626 1.24 joerg struct cardbus_softc *parent_sc = device_private(parent);
627 1.1 mcr struct cardbus_attach_args *ca = aux;
628 1.1 mcr cardbus_devfunc_t ct = ca->ca_ct;
629 1.1 mcr cardbus_chipset_tag_t cc = ct->ct_cc;
630 1.1 mcr struct pccbb_softc *psc = (struct pccbb_softc *)cc;
631 1.1 mcr struct pcibus_attach_args pba;
632 1.1 mcr char devinfo[256];
633 1.1 mcr pcireg_t busdata;
634 1.1 mcr int mybus, rv;
635 1.1 mcr u_int16_t pciirq;
636 1.1 mcr int minbus, maxbus;
637 1.1 mcr
638 1.25 joerg csc->sc_dev = self;
639 1.25 joerg
640 1.1 mcr mybus = ct->ct_bus;
641 1.1 mcr pciirq = 0;
642 1.1 mcr rv = 0;
643 1.1 mcr
644 1.1 mcr /* shut up compiler */
645 1.24 joerg csc->foo = parent_sc->sc_intrline;
646 1.15 perry
647 1.1 mcr
648 1.11 itojun pci_devinfo(ca->ca_id, ca->ca_class, 0, devinfo, sizeof(devinfo));
649 1.1 mcr printf(": %s (rev. 0x%02x)\n", devinfo, PCI_REVISION(ca->ca_class));
650 1.1 mcr
651 1.32 dyoung csc->sc_tag = ca->ca_tag;
652 1.3 thorpej
653 1.35 dyoung busdata = Cardbus_conf_read(ct, ca->ca_tag, PPB_REG_BUSINFO);
654 1.1 mcr minbus = pcibios_max_bus;
655 1.10 lukem maxbus = minbus; /* XXX; gcc */
656 1.1 mcr
657 1.1 mcr if (PPB_BUSINFO_SECONDARY(busdata) == 0) {
658 1.21 cegger aprint_error_dev(self, "not configured by system firmware calling pci_bus_fixup(%d)\n", 0);
659 1.1 mcr
660 1.1 mcr /*
661 1.1 mcr * first, pull the reset wire on the secondary bridge
662 1.1 mcr * to clear all devices
663 1.1 mcr */
664 1.35 dyoung busdata = Cardbus_conf_read(ct, ca->ca_tag,
665 1.1 mcr PPB_REG_BRIDGECONTROL);
666 1.35 dyoung Cardbus_conf_write(ct, ca->ca_tag, PPB_REG_BRIDGECONTROL,
667 1.1 mcr busdata | PPB_BC_SECONDARY_RESET);
668 1.1 mcr delay(1);
669 1.35 dyoung Cardbus_conf_write(ct, ca->ca_tag, PPB_REG_BRIDGECONTROL,
670 1.1 mcr busdata);
671 1.1 mcr
672 1.1 mcr /* then go initialize the bridge control registers */
673 1.1 mcr maxbus = pci_bus_fixup(psc->sc_pc, 0);
674 1.1 mcr }
675 1.1 mcr
676 1.35 dyoung busdata = Cardbus_conf_read(ct, ca->ca_tag, PPB_REG_BUSINFO);
677 1.1 mcr if(PPB_BUSINFO_SECONDARY(busdata) == 0) {
678 1.21 cegger aprint_error_dev(self, "still not configured, not fixable.\n");
679 1.21 cegger return;
680 1.1 mcr }
681 1.1 mcr
682 1.15 perry #if 0
683 1.1 mcr minbus = PPB_BUSINFO_SECONDARY(busdata);
684 1.1 mcr maxbus = PPB_BUSINFO_SUBORDINATE(busdata);
685 1.1 mcr #endif
686 1.15 perry
687 1.1 mcr /* now, go and assign addresses for the new devices */
688 1.1 mcr rbus_pci_addr_fixup(csc, cc, parent_sc,
689 1.1 mcr psc->sc_pc,
690 1.1 mcr ca,
691 1.1 mcr minbus, maxbus);
692 1.1 mcr
693 1.1 mcr /*
694 1.1 mcr * now configure all connected devices to the IRQ which
695 1.1 mcr * was assigned to this slot, as they will all arrive from
696 1.1 mcr * that IRQ.
697 1.1 mcr */
698 1.1 mcr rbus_intr_fixup(psc->sc_pc, minbus, maxbus, ca->ca_intrline);
699 1.1 mcr
700 1.15 perry /*
701 1.1 mcr * enable direct routing of interrupts. We do this because
702 1.1 mcr * we can not manage to get pccb_intr_establish() called until
703 1.1 mcr * PCI subsystem is merged with rbus. The major thing that this
704 1.1 mcr * routine does is avoid calling the driver's interrupt routine
705 1.1 mcr * when the card has been removed.
706 1.1 mcr *
707 1.1 mcr * The rbus_ppb.c can not cope with card desertions until the merging
708 1.1 mcr * anyway.
709 1.1 mcr */
710 1.1 mcr pccbb_intr_route(psc);
711 1.1 mcr
712 1.1 mcr /*
713 1.1 mcr * Attach the PCI bus than hangs off of it.
714 1.1 mcr *
715 1.1 mcr * XXX Don't pass-through Memory Read Multiple. Should we?
716 1.1 mcr * XXX Consult the spec...
717 1.15 perry */
718 1.1 mcr pba.pba_iot = ca->ca_iot;
719 1.1 mcr pba.pba_memt = ca->ca_memt;
720 1.1 mcr pba.pba_dmat = ca->ca_dmat;
721 1.1 mcr pba.pba_pc = psc->sc_pc;
722 1.40 dyoung pba.pba_flags = PCI_FLAGS_IO_OKAY|PCI_FLAGS_MEM_OKAY;
723 1.1 mcr pba.pba_bus = PPB_BUSINFO_SECONDARY(busdata);
724 1.4 lukem pba.pba_bridgetag = &csc->sc_tag;
725 1.1 mcr /*pba.pba_intrswiz = parent_sc->sc_intrswiz; */
726 1.1 mcr pba.pba_intrtag = psc->sc_pa.pa_intrtag;
727 1.1 mcr
728 1.13 drochner config_found_ia(self, "pcibus", &pba, rppbprint);
729 1.1 mcr }
730 1.1 mcr
731 1.1 mcr int
732 1.31 cegger ppb_activate(device_t self, enum devact act)
733 1.1 mcr {
734 1.1 mcr printf("ppb_activate called\n");
735 1.1 mcr return 0;
736 1.1 mcr }
737 1.1 mcr
738