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