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