rbus_ppb.c revision 1.35 1 1.35 dyoung /* $NetBSD: rbus_ppb.c,v 1.35 2010/02/26 00:57:02 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.35 dyoung __KERNEL_RCSID(0, "$NetBSD: rbus_ppb.c,v 1.35 2010/02/26 00:57:02 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.1 mcr
49 1.1 mcr #if NRND > 0
50 1.1 mcr #include <sys/rnd.h>
51 1.1 mcr #endif
52 1.1 mcr
53 1.1 mcr #include <machine/endian.h>
54 1.1 mcr
55 1.20 ad #include <sys/bus.h>
56 1.20 ad #include <sys/intr.h>
57 1.1 mcr
58 1.1 mcr #include <dev/pci/pcivar.h>
59 1.1 mcr #include <dev/pci/pcireg.h>
60 1.1 mcr #include <dev/pci/pcidevs.h>
61 1.1 mcr #include <dev/pci/ppbreg.h>
62 1.1 mcr
63 1.1 mcr #include <dev/ic/i82365reg.h>
64 1.1 mcr
65 1.1 mcr #include <dev/pci/pccbbreg.h>
66 1.1 mcr #include <dev/pci/pccbbvar.h>
67 1.1 mcr
68 1.1 mcr #include <dev/cardbus/cardbusvar.h>
69 1.12 mycroft #include <dev/pci/pcidevs.h>
70 1.1 mcr
71 1.23 jmcneill #include <x86/pci/pci_addr_fixup.h>
72 1.23 jmcneill #include <x86/pci/pci_bus_fixup.h>
73 1.1 mcr #include <i386/pci/pci_intr_fixup.h>
74 1.1 mcr #include <i386/pci/pcibios.h>
75 1.1 mcr
76 1.1 mcr struct ppb_softc;
77 1.1 mcr
78 1.31 cegger static int ppb_cardbus_match(device_t, cfdata_t, void *);
79 1.31 cegger static void ppb_cardbus_attach(device_t, device_t, void *);
80 1.31 cegger static int ppb_cardbus_detach(device_t self, int flags);
81 1.14 perry /*static*/ void ppb_cardbus_setup(struct ppb_softc * sc);
82 1.14 perry /*static*/ int ppb_cardbus_enable(struct ppb_softc * sc);
83 1.14 perry /*static*/ void ppb_cardbus_disable(struct ppb_softc * sc);
84 1.31 cegger static int ppb_activate(device_t, enum devact);
85 1.16 drochner int rppbprint(void *, const char *);
86 1.16 drochner int rbus_intr_fixup(pci_chipset_tag_t, int, int, int);
87 1.16 drochner void rbus_do_header_fixup(pci_chipset_tag_t, pcitag_t, void *);
88 1.1 mcr
89 1.16 drochner static void rbus_pci_phys_allocate(pci_chipset_tag_t, pcitag_t, void *);
90 1.16 drochner
91 1.16 drochner static int rbus_do_phys_allocate(pci_chipset_tag_t, pcitag_t, int,
92 1.16 drochner void *, int, bus_addr_t *, bus_size_t);
93 1.16 drochner
94 1.16 drochner static void rbus_pci_phys_countspace(pci_chipset_tag_t, pcitag_t, void *);
95 1.16 drochner
96 1.16 drochner static int rbus_do_phys_countspace(pci_chipset_tag_t, pcitag_t, int,
97 1.16 drochner void *, int, bus_addr_t *, bus_size_t);
98 1.16 drochner
99 1.16 drochner unsigned int rbus_round_up(unsigned int, unsigned int);
100 1.1 mcr
101 1.1 mcr
102 1.1 mcr struct ppb_cardbus_softc {
103 1.25 joerg device_t sc_dev;
104 1.3 thorpej pcitag_t sc_tag;
105 1.1 mcr int foo;
106 1.1 mcr };
107 1.1 mcr
108 1.25 joerg CFATTACH_DECL_NEW(rbus_ppb, sizeof(struct ppb_cardbus_softc),
109 1.8 thorpej ppb_cardbus_match, ppb_cardbus_attach, ppb_cardbus_detach, ppb_activate);
110 1.1 mcr
111 1.1 mcr #ifdef CBB_DEBUG
112 1.1 mcr int rbus_ppb_debug = 0; /* hack with kdb */
113 1.1 mcr #define DPRINTF(X) if(rbus_ppb_debug) printf X
114 1.1 mcr #else
115 1.1 mcr #define DPRINTF(X)
116 1.1 mcr #endif
117 1.1 mcr
118 1.1 mcr static int
119 1.31 cegger ppb_cardbus_match(device_t parent, cfdata_t match, void *aux)
120 1.1 mcr {
121 1.1 mcr struct cardbus_attach_args *ca = aux;
122 1.1 mcr
123 1.35 dyoung if (PCI_VENDOR(ca->ca_id) == PCI_VENDOR_DEC &&
124 1.35 dyoung PCI_PRODUCT(ca->ca_id) == PCI_PRODUCT_DEC_21152)
125 1.1 mcr return (1);
126 1.1 mcr
127 1.1 mcr if(PCI_CLASS(ca->ca_class) == PCI_CLASS_BRIDGE &&
128 1.1 mcr PCI_SUBCLASS(ca->ca_class) == PCI_SUBCLASS_BRIDGE_PCI) {
129 1.1 mcr /* XXX */
130 1.1 mcr printf("recognizing generic bridge chip\n");
131 1.1 mcr }
132 1.1 mcr
133 1.1 mcr return (0);
134 1.1 mcr }
135 1.1 mcr
136 1.1 mcr
137 1.1 mcr int
138 1.27 dsl rppbprint(void *aux, const char *pnp)
139 1.1 mcr {
140 1.1 mcr struct pcibus_attach_args *pba = aux;
141 1.1 mcr
142 1.1 mcr /* only PCIs can attach to PPBs; easy. */
143 1.1 mcr if (pnp)
144 1.9 thorpej aprint_normal("pci at %s", pnp);
145 1.9 thorpej aprint_normal(" bus %d (rbus)", pba->pba_bus);
146 1.1 mcr return (UNCONF);
147 1.1 mcr }
148 1.1 mcr
149 1.1 mcr int
150 1.1 mcr rbus_intr_fixup(pci_chipset_tag_t pc,
151 1.1 mcr int minbus,
152 1.1 mcr int maxbus,
153 1.1 mcr int line)
154 1.1 mcr {
155 1.1 mcr pci_device_foreach_min(pc, minbus,
156 1.1 mcr maxbus, rbus_do_header_fixup, (void *)&line);
157 1.1 mcr return 0;
158 1.1 mcr }
159 1.1 mcr
160 1.1 mcr void
161 1.27 dsl rbus_do_header_fixup(pci_chipset_tag_t pc, pcitag_t tag, void *context)
162 1.1 mcr {
163 1.1 mcr int pin, irq;
164 1.1 mcr int bus, device, function;
165 1.1 mcr pcireg_t intr, id;
166 1.1 mcr int *pline = (int *)context;
167 1.1 mcr int line = *pline;
168 1.1 mcr
169 1.1 mcr pci_decompose_tag(pc, tag, &bus, &device, &function);
170 1.1 mcr id = pci_conf_read(pc, tag, PCI_ID_REG);
171 1.1 mcr
172 1.1 mcr intr = pci_conf_read(pc, tag, PCI_INTERRUPT_REG);
173 1.1 mcr pin = PCI_INTERRUPT_PIN(intr);
174 1.1 mcr irq = PCI_INTERRUPT_LINE(intr);
175 1.1 mcr
176 1.1 mcr #if 0
177 1.1 mcr printf("do_header %02x:%02x:%02x pin=%d => line %d\n",
178 1.1 mcr bus, device, function, pin, line);
179 1.1 mcr #endif
180 1.1 mcr
181 1.1 mcr intr &= ~(PCI_INTERRUPT_LINE_MASK << PCI_INTERRUPT_LINE_SHIFT);
182 1.1 mcr intr |= (line << PCI_INTERRUPT_LINE_SHIFT);
183 1.1 mcr pci_conf_write(pc, tag, PCI_INTERRUPT_REG, intr);
184 1.1 mcr
185 1.1 mcr }
186 1.1 mcr
187 1.15 perry /*
188 1.1 mcr * This function takes a range of PCI bus numbers and
189 1.1 mcr * allocates space for all devices found in this space (the BARs) from
190 1.1 mcr * the rbus space maps (I/O and memory).
191 1.1 mcr *
192 1.1 mcr * It assumes that "rbus" is defined. The whole concept does.
193 1.1 mcr *
194 1.1 mcr * It uses pci_device_foreach_min() to call rbus_pci_phys_allocate.
195 1.1 mcr * This function is mostly stolen from
196 1.15 perry * pci_addr_fixup.c:pciaddr_resource_reserve.
197 1.1 mcr *
198 1.1 mcr */
199 1.1 mcr struct rbus_pci_addr_fixup_context {
200 1.1 mcr struct ppb_cardbus_softc *csc;
201 1.1 mcr cardbus_chipset_tag_t ct;
202 1.1 mcr struct cardbus_softc *sc;
203 1.1 mcr struct cardbus_attach_args *caa;
204 1.1 mcr int minbus;
205 1.1 mcr int maxbus;
206 1.1 mcr bus_size_t *bussize_ioreqs;
207 1.1 mcr bus_size_t *bussize_memreqs;
208 1.1 mcr rbus_tag_t *iobustags;
209 1.1 mcr rbus_tag_t *membustags;
210 1.15 perry };
211 1.1 mcr
212 1.15 perry unsigned int
213 1.16 drochner rbus_round_up(unsigned int size, unsigned int minval)
214 1.1 mcr {
215 1.1 mcr unsigned int power2;
216 1.1 mcr
217 1.1 mcr if(size == 0) {
218 1.1 mcr return 0;
219 1.1 mcr }
220 1.1 mcr
221 1.16 drochner power2=minval;
222 1.1 mcr
223 1.1 mcr while(power2 < (1 << 31) &&
224 1.1 mcr power2 < size) {
225 1.1 mcr power2 = power2 << 1;
226 1.1 mcr }
227 1.15 perry
228 1.1 mcr return power2;
229 1.1 mcr }
230 1.15 perry
231 1.1 mcr static void
232 1.1 mcr rbus_pci_addr_fixup(struct ppb_cardbus_softc *csc,
233 1.1 mcr cardbus_chipset_tag_t ct,
234 1.1 mcr struct cardbus_softc *sc,
235 1.1 mcr pci_chipset_tag_t pc,
236 1.1 mcr struct cardbus_attach_args *caa,
237 1.1 mcr int minbus, int maxbus)
238 1.1 mcr {
239 1.1 mcr struct rbus_pci_addr_fixup_context rct;
240 1.1 mcr int size, busnum;
241 1.1 mcr bus_addr_t start;
242 1.1 mcr bus_space_handle_t handle;
243 1.1 mcr u_int32_t reg;
244 1.1 mcr
245 1.1 mcr rct.csc=csc;
246 1.1 mcr rct.ct=ct;
247 1.1 mcr rct.sc=sc;
248 1.1 mcr rct.caa=caa;
249 1.1 mcr rct.minbus = minbus;
250 1.1 mcr rct.maxbus = maxbus;
251 1.1 mcr size = sizeof(bus_size_t)*(maxbus+1);
252 1.1 mcr rct.bussize_ioreqs = alloca(size);
253 1.1 mcr rct.bussize_memreqs = alloca(size);
254 1.1 mcr rct.iobustags = alloca(maxbus * sizeof(rbus_tag_t));
255 1.1 mcr rct.membustags = alloca(maxbus * sizeof(rbus_tag_t));
256 1.1 mcr
257 1.29 cegger memset(rct.bussize_ioreqs, 0, size);
258 1.29 cegger memset(rct.bussize_memreqs, 0, size);
259 1.1 mcr
260 1.1 mcr printf("%s: sizing buses %d-%d\n",
261 1.25 joerg device_xname(rct.csc->sc_dev),
262 1.1 mcr minbus, maxbus);
263 1.1 mcr
264 1.1 mcr pci_device_foreach_min(pc, minbus, maxbus,
265 1.1 mcr rbus_pci_phys_countspace, &rct);
266 1.1 mcr
267 1.1 mcr /*
268 1.1 mcr * we need to determine amount of address space for each
269 1.1 mcr * bus. To do this, we have to roll up amounts and then
270 1.1 mcr * we need to divide up the cardbus's extent to allocate
271 1.1 mcr * some space to each bus.
272 1.1 mcr */
273 1.1 mcr
274 1.1 mcr for(busnum=maxbus; busnum > minbus; busnum--) {
275 1.1 mcr if(pci_bus_parent[busnum] != 0) {
276 1.1 mcr if(pci_bus_parent[busnum] < minbus ||
277 1.1 mcr pci_bus_parent[busnum] >= maxbus) {
278 1.1 mcr printf("%s: bus %d has illegal parent %d\n",
279 1.25 joerg device_xname(rct.csc->sc_dev),
280 1.1 mcr busnum, pci_bus_parent[busnum]);
281 1.1 mcr continue;
282 1.1 mcr }
283 1.1 mcr
284 1.1 mcr /* first round amount of space up */
285 1.1 mcr rct.bussize_ioreqs[busnum] =
286 1.1 mcr rbus_round_up(rct.bussize_ioreqs[busnum], PPB_IO_MIN);
287 1.1 mcr rct.bussize_ioreqs[pci_bus_parent[busnum]] +=
288 1.1 mcr rct.bussize_ioreqs[busnum];
289 1.1 mcr
290 1.1 mcr rct.bussize_memreqs[busnum] =
291 1.1 mcr rbus_round_up(rct.bussize_memreqs[busnum], PPB_MEM_MIN);
292 1.1 mcr rct.bussize_memreqs[pci_bus_parent[busnum]] +=
293 1.1 mcr rct.bussize_memreqs[busnum];
294 1.1 mcr
295 1.1 mcr }
296 1.1 mcr }
297 1.1 mcr
298 1.1 mcr rct.bussize_ioreqs[minbus] =
299 1.1 mcr rbus_round_up(rct.bussize_ioreqs[minbus], 4096);
300 1.1 mcr rct.bussize_memreqs[minbus] =
301 1.1 mcr rbus_round_up(rct.bussize_memreqs[minbus], 8);
302 1.1 mcr
303 1.1 mcr printf("%s: total needs IO %08lx and MEM %08lx\n",
304 1.25 joerg device_xname(rct.csc->sc_dev),
305 1.1 mcr rct.bussize_ioreqs[minbus], rct.bussize_memreqs[minbus]);
306 1.1 mcr
307 1.1 mcr if(!caa->ca_rbus_iot) {
308 1.1 mcr panic("no iot bus");
309 1.1 mcr }
310 1.1 mcr
311 1.1 mcr if(rct.bussize_ioreqs[minbus]) {
312 1.1 mcr if(rbus_space_alloc(caa->ca_rbus_iot, 0,
313 1.1 mcr rct.bussize_ioreqs[minbus],
314 1.1 mcr rct.bussize_ioreqs[minbus]-1 /* mask */,
315 1.1 mcr rct.bussize_ioreqs[minbus] /* align */,
316 1.1 mcr /* flags */ 0,
317 1.1 mcr &start,
318 1.1 mcr &handle) != 0) {
319 1.5 provos panic("rbus_ppb: can not allocate %ld bytes in IO bus %d",
320 1.1 mcr rct.bussize_ioreqs[minbus], minbus);
321 1.1 mcr }
322 1.1 mcr rct.iobustags[minbus]=rbus_new(caa->ca_rbus_iot,
323 1.15 perry start,
324 1.1 mcr rct.bussize_ioreqs[minbus],
325 1.1 mcr 0 /* offset to add to physical address
326 1.1 mcr to make processor address */,
327 1.1 mcr RBUS_SPACE_DEDICATE);
328 1.1 mcr }
329 1.1 mcr
330 1.1 mcr if(rct.bussize_memreqs[minbus]) {
331 1.1 mcr if(rbus_space_alloc(caa->ca_rbus_memt, 0,
332 1.1 mcr rct.bussize_memreqs[minbus],
333 1.1 mcr rct.bussize_memreqs[minbus]-1 /* mask */,
334 1.1 mcr rct.bussize_memreqs[minbus] /* align */,
335 1.1 mcr /* flags */ 0,
336 1.1 mcr &start,
337 1.1 mcr &handle) != 0) {
338 1.5 provos panic("%s: can not allocate %ld bytes in MEM bus %d",
339 1.25 joerg device_xname(rct.csc->sc_dev),
340 1.1 mcr rct.bussize_memreqs[minbus], minbus);
341 1.1 mcr }
342 1.1 mcr rct.membustags[minbus]=rbus_new(caa->ca_rbus_memt,
343 1.1 mcr start,
344 1.1 mcr rct.bussize_memreqs[minbus],
345 1.1 mcr 0 /* offset to add to physical
346 1.1 mcr address to make processor
347 1.1 mcr address */,
348 1.1 mcr RBUS_SPACE_DEDICATE);
349 1.1 mcr }
350 1.1 mcr
351 1.1 mcr for(busnum=minbus+1; busnum <= maxbus; busnum++) {
352 1.1 mcr int busparent;
353 1.1 mcr
354 1.1 mcr busparent = pci_bus_parent[busnum];
355 1.1 mcr
356 1.1 mcr printf("%s: bus %d (parent=%d) needs IO %08lx and MEM %08lx\n",
357 1.25 joerg device_xname(rct.csc->sc_dev),
358 1.1 mcr busnum,
359 1.1 mcr busparent,
360 1.1 mcr rct.bussize_ioreqs[busnum],
361 1.1 mcr rct.bussize_memreqs[busnum]);
362 1.1 mcr
363 1.1 mcr if(busparent > maxbus) {
364 1.1 mcr panic("rbus_ppb: illegal parent");
365 1.1 mcr }
366 1.1 mcr
367 1.1 mcr if(rct.bussize_ioreqs[busnum]) {
368 1.1 mcr if(rbus_space_alloc(rct.iobustags[busparent],
369 1.1 mcr 0,
370 1.1 mcr rct.bussize_ioreqs[busnum],
371 1.1 mcr rct.bussize_ioreqs[busnum]-1 /*mask */,
372 1.1 mcr rct.bussize_ioreqs[busnum] /* align */,
373 1.1 mcr /* flags */ 0,
374 1.1 mcr &start,
375 1.1 mcr &handle) != 0) {
376 1.5 provos panic("rbus_ppb: can not allocate %ld bytes in IO bus %d",
377 1.1 mcr rct.bussize_ioreqs[busnum], busnum);
378 1.1 mcr }
379 1.1 mcr rct.iobustags[busnum]=rbus_new(rct.iobustags[busparent],
380 1.1 mcr start,
381 1.1 mcr rct.bussize_ioreqs[busnum],
382 1.1 mcr 0 /* offset to add to physical
383 1.1 mcr address
384 1.1 mcr to make processor address */,
385 1.1 mcr RBUS_SPACE_DEDICATE);
386 1.1 mcr
387 1.1 mcr /* program the bridge */
388 1.15 perry
389 1.1 mcr /* enable I/O space */
390 1.1 mcr reg = pci_conf_read(pc, pci_bus_tag[busnum],
391 1.1 mcr PCI_COMMAND_STATUS_REG);
392 1.1 mcr reg |= PCI_COMMAND_IO_ENABLE | PCI_COMMAND_MASTER_ENABLE;
393 1.1 mcr pci_conf_write(pc, pci_bus_tag[busnum],
394 1.1 mcr PCI_COMMAND_STATUS_REG, reg);
395 1.1 mcr
396 1.1 mcr /* now init the limit register for I/O */
397 1.1 mcr pci_conf_write(pc, pci_bus_tag[busnum], PPB_REG_IOSTATUS,
398 1.1 mcr (((start & 0xf000) >> 8) << PPB_IOBASE_SHIFT) |
399 1.1 mcr ((((start +
400 1.1 mcr rct.bussize_ioreqs[busnum] +
401 1.1 mcr 4095) & 0xf000) >> 8) << PPB_IOLIMIT_SHIFT));
402 1.1 mcr }
403 1.15 perry
404 1.1 mcr if(rct.bussize_memreqs[busnum]) {
405 1.1 mcr if(rbus_space_alloc(rct.membustags[busparent],
406 1.1 mcr 0,
407 1.15 perry rct.bussize_memreqs[busnum] /* size */,
408 1.15 perry rct.bussize_memreqs[busnum]-1 /*mask */,
409 1.1 mcr rct.bussize_memreqs[busnum] /* align */,
410 1.1 mcr /* flags */ 0,
411 1.1 mcr &start,
412 1.1 mcr &handle) != 0) {
413 1.5 provos panic("rbus_ppb: can not allocate %ld bytes in MEM bus %d",
414 1.1 mcr rct.bussize_memreqs[busnum], busnum);
415 1.1 mcr }
416 1.1 mcr rct.membustags[busnum]=rbus_new(rct.membustags[busparent],
417 1.1 mcr start,
418 1.1 mcr rct.bussize_memreqs[busnum],
419 1.1 mcr 0 /* offset to add to physical
420 1.1 mcr address to make processor
421 1.1 mcr address */,
422 1.1 mcr RBUS_SPACE_DEDICATE);
423 1.1 mcr
424 1.1 mcr /* program the bridge */
425 1.1 mcr /* enable memory space */
426 1.1 mcr reg = pci_conf_read(pc, pci_bus_tag[busnum],
427 1.1 mcr PCI_COMMAND_STATUS_REG);
428 1.1 mcr reg |= PCI_COMMAND_MEM_ENABLE | PCI_COMMAND_MASTER_ENABLE;
429 1.1 mcr pci_conf_write(pc, pci_bus_tag[busnum],
430 1.1 mcr PCI_COMMAND_STATUS_REG, reg);
431 1.1 mcr
432 1.1 mcr /* now init the limit register for memory */
433 1.1 mcr pci_conf_write(pc, pci_bus_tag[busnum], PPB_REG_MEM,
434 1.1 mcr ((start & PPB_MEM_MASK)
435 1.1 mcr >> PPB_MEM_SHIFT) << PPB_MEMBASE_SHIFT |
436 1.1 mcr (((start +
437 1.1 mcr rct.bussize_memreqs[busnum] +
438 1.1 mcr PPB_MEM_MIN-1) >> PPB_MEM_SHIFT)
439 1.1 mcr << PPB_MEMLIMIT_SHIFT));
440 1.1 mcr
441 1.1 mcr /* and set the prefetchable limits as well */
442 1.1 mcr pci_conf_write(pc, pci_bus_tag[busnum], PPB_REG_PREFMEM,
443 1.1 mcr ((start & PPB_MEM_MASK)
444 1.1 mcr >> PPB_MEM_SHIFT) << PPB_MEMBASE_SHIFT |
445 1.1 mcr (((start +
446 1.1 mcr rct.bussize_memreqs[busnum] +
447 1.1 mcr PPB_MEM_MIN-1) >> PPB_MEM_SHIFT)
448 1.1 mcr << PPB_MEMLIMIT_SHIFT));
449 1.1 mcr
450 1.1 mcr /* pci_conf_print(pc, pci_bus_tag[busnum], NULL); */
451 1.1 mcr }
452 1.1 mcr }
453 1.1 mcr
454 1.1 mcr printf("%s: configuring buses %d-%d\n",
455 1.25 joerg device_xname(rct.csc->sc_dev),
456 1.1 mcr minbus, maxbus);
457 1.1 mcr pci_device_foreach_min(pc, minbus, maxbus,
458 1.1 mcr rbus_pci_phys_allocate, &rct);
459 1.1 mcr }
460 1.1 mcr
461 1.1 mcr static void
462 1.27 dsl rbus_pci_phys_countspace(pci_chipset_tag_t pc, pcitag_t tag, void *context)
463 1.1 mcr {
464 1.1 mcr int bus, device, function;
465 1.1 mcr struct rbus_pci_addr_fixup_context *rct =
466 1.1 mcr (struct rbus_pci_addr_fixup_context *)context;
467 1.1 mcr
468 1.1 mcr pci_decompose_tag(pc, tag, &bus, &device, &function);
469 1.1 mcr
470 1.1 mcr printf("%s: configuring device %02x:%02x:%02x\n",
471 1.25 joerg device_xname(rct->csc->sc_dev),
472 1.1 mcr bus, device, function);
473 1.1 mcr
474 1.1 mcr pciaddr_resource_manage(pc, tag,
475 1.1 mcr rbus_do_phys_countspace, context);
476 1.1 mcr }
477 1.1 mcr
478 1.15 perry
479 1.1 mcr int
480 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)
481 1.1 mcr {
482 1.1 mcr struct rbus_pci_addr_fixup_context *rct =
483 1.1 mcr (struct rbus_pci_addr_fixup_context *)ctx;
484 1.1 mcr int bus, device, function;
485 1.1 mcr
486 1.1 mcr pci_decompose_tag(pc, tag, &bus, &device, &function);
487 1.1 mcr
488 1.1 mcr if(size > (1<<24)) {
489 1.1 mcr printf("%s: skipping huge space request of size=%08x\n",
490 1.25 joerg device_xname(rct->csc->sc_dev), (unsigned int)size);
491 1.1 mcr return 0;
492 1.1 mcr }
493 1.1 mcr
494 1.1 mcr if(PCI_MAPREG_TYPE(type) == PCI_MAPREG_TYPE_IO) {
495 1.1 mcr rct->bussize_ioreqs[bus] += size;
496 1.1 mcr } else {
497 1.1 mcr rct->bussize_memreqs[bus]+= size;
498 1.1 mcr }
499 1.15 perry
500 1.1 mcr return 0;
501 1.1 mcr }
502 1.1 mcr
503 1.1 mcr static void
504 1.27 dsl rbus_pci_phys_allocate(pci_chipset_tag_t pc, pcitag_t tag, void *context)
505 1.1 mcr {
506 1.1 mcr int bus, device, function, command;
507 1.1 mcr struct rbus_pci_addr_fixup_context *rct =
508 1.1 mcr (struct rbus_pci_addr_fixup_context *)context;
509 1.1 mcr //cardbus_chipset_tag_t ct = rct->ct;
510 1.1 mcr // struct cardbus_softc *sc = rct->sc;
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 cardbus_function_tag_t cf = ct->ct_cf;
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.1 mcr /* shut up compiler */
646 1.24 joerg csc->foo = parent_sc->sc_intrline;
647 1.15 perry
648 1.1 mcr
649 1.11 itojun pci_devinfo(ca->ca_id, ca->ca_class, 0, devinfo, sizeof(devinfo));
650 1.1 mcr printf(": %s (rev. 0x%02x)\n", devinfo, PCI_REVISION(ca->ca_class));
651 1.1 mcr
652 1.32 dyoung csc->sc_tag = ca->ca_tag;
653 1.3 thorpej
654 1.35 dyoung busdata = Cardbus_conf_read(ct, ca->ca_tag, PPB_REG_BUSINFO);
655 1.1 mcr minbus = pcibios_max_bus;
656 1.10 lukem maxbus = minbus; /* XXX; gcc */
657 1.1 mcr
658 1.1 mcr if (PPB_BUSINFO_SECONDARY(busdata) == 0) {
659 1.21 cegger aprint_error_dev(self, "not configured by system firmware calling pci_bus_fixup(%d)\n", 0);
660 1.1 mcr
661 1.1 mcr /*
662 1.1 mcr * first, pull the reset wire on the secondary bridge
663 1.1 mcr * to clear all devices
664 1.1 mcr */
665 1.35 dyoung busdata = Cardbus_conf_read(ct, ca->ca_tag,
666 1.1 mcr PPB_REG_BRIDGECONTROL);
667 1.35 dyoung Cardbus_conf_write(ct, ca->ca_tag, PPB_REG_BRIDGECONTROL,
668 1.1 mcr busdata | PPB_BC_SECONDARY_RESET);
669 1.1 mcr delay(1);
670 1.35 dyoung Cardbus_conf_write(ct, ca->ca_tag, PPB_REG_BRIDGECONTROL,
671 1.1 mcr busdata);
672 1.1 mcr
673 1.1 mcr /* then go initialize the bridge control registers */
674 1.1 mcr maxbus = pci_bus_fixup(psc->sc_pc, 0);
675 1.1 mcr }
676 1.1 mcr
677 1.35 dyoung busdata = Cardbus_conf_read(ct, ca->ca_tag, PPB_REG_BUSINFO);
678 1.1 mcr if(PPB_BUSINFO_SECONDARY(busdata) == 0) {
679 1.21 cegger aprint_error_dev(self, "still not configured, not fixable.\n");
680 1.21 cegger return;
681 1.1 mcr }
682 1.1 mcr
683 1.15 perry #if 0
684 1.1 mcr minbus = PPB_BUSINFO_SECONDARY(busdata);
685 1.1 mcr maxbus = PPB_BUSINFO_SUBORDINATE(busdata);
686 1.1 mcr #endif
687 1.15 perry
688 1.1 mcr /* now, go and assign addresses for the new devices */
689 1.1 mcr rbus_pci_addr_fixup(csc, cc, parent_sc,
690 1.1 mcr psc->sc_pc,
691 1.1 mcr ca,
692 1.1 mcr minbus, maxbus);
693 1.1 mcr
694 1.1 mcr /*
695 1.1 mcr * now configure all connected devices to the IRQ which
696 1.1 mcr * was assigned to this slot, as they will all arrive from
697 1.1 mcr * that IRQ.
698 1.1 mcr */
699 1.1 mcr rbus_intr_fixup(psc->sc_pc, minbus, maxbus, ca->ca_intrline);
700 1.1 mcr
701 1.15 perry /*
702 1.1 mcr * enable direct routing of interrupts. We do this because
703 1.1 mcr * we can not manage to get pccb_intr_establish() called until
704 1.1 mcr * PCI subsystem is merged with rbus. The major thing that this
705 1.1 mcr * routine does is avoid calling the driver's interrupt routine
706 1.1 mcr * when the card has been removed.
707 1.1 mcr *
708 1.1 mcr * The rbus_ppb.c can not cope with card desertions until the merging
709 1.1 mcr * anyway.
710 1.1 mcr */
711 1.1 mcr pccbb_intr_route(psc);
712 1.1 mcr
713 1.1 mcr /*
714 1.1 mcr * Attach the PCI bus than hangs off of it.
715 1.1 mcr *
716 1.1 mcr * XXX Don't pass-through Memory Read Multiple. Should we?
717 1.1 mcr * XXX Consult the spec...
718 1.15 perry */
719 1.1 mcr pba.pba_iot = ca->ca_iot;
720 1.1 mcr pba.pba_memt = ca->ca_memt;
721 1.1 mcr pba.pba_dmat = ca->ca_dmat;
722 1.1 mcr pba.pba_pc = psc->sc_pc;
723 1.1 mcr pba.pba_flags = PCI_FLAGS_IO_ENABLED|PCI_FLAGS_MEM_ENABLED;
724 1.1 mcr pba.pba_bus = PPB_BUSINFO_SECONDARY(busdata);
725 1.4 lukem pba.pba_bridgetag = &csc->sc_tag;
726 1.1 mcr /*pba.pba_intrswiz = parent_sc->sc_intrswiz; */
727 1.1 mcr pba.pba_intrtag = psc->sc_pa.pa_intrtag;
728 1.1 mcr
729 1.13 drochner config_found_ia(self, "pcibus", &pba, rppbprint);
730 1.1 mcr }
731 1.1 mcr
732 1.1 mcr void
733 1.1 mcr ppb_cardbus_setup(struct ppb_softc * sc)
734 1.1 mcr {
735 1.1 mcr struct ppb_cardbus_softc *csc = (struct ppb_cardbus_softc *) sc;
736 1.1 mcr #if 0
737 1.1 mcr cardbus_chipset_tag_t cc = psc->sc_cc;
738 1.1 mcr cardbus_function_tag_t cf = psc->sc_cf;
739 1.1 mcr #endif
740 1.1 mcr
741 1.1 mcr /* shut up compiler */
742 1.1 mcr csc->foo=2;
743 1.1 mcr
744 1.1 mcr printf("ppb_cardbus_setup called\n");
745 1.1 mcr #if 0
746 1.1 mcr /* not sure what to do here */
747 1.33 dyoung pcitag_t tag = csc->sc_tag;
748 1.1 mcr
749 1.35 dyoung command = Cardbus_conf_read(csc->ct, tag, PCI_COMMAND_STATUS_REG);
750 1.1 mcr if (csc->base0_reg) {
751 1.1 mcr Cardbus_conf_write(csc->ct, tag,
752 1.35 dyoung PCI_BAR0, csc->base0_reg);
753 1.35 dyoung command |= PCI_COMMAND_MEM_ENABLE | PCI_COMMAND_MASTER_ENABLE;
754 1.1 mcr } else if (csc->base1_reg) {
755 1.1 mcr Cardbus_conf_write(csc->ct, tag,
756 1.35 dyoung PCI_BAR1, csc->base1_reg);
757 1.35 dyoung command |= (PCI_COMMAND_IO_ENABLE | PCI_COMMAND_MASTER_ENABLE);
758 1.1 mcr }
759 1.1 mcr
760 1.1 mcr /* enable the card */
761 1.35 dyoung Cardbus_conf_write(csc->ct, tag, PCI_COMMAND_STATUS_REG, command);
762 1.1 mcr #endif
763 1.1 mcr }
764 1.1 mcr
765 1.1 mcr int
766 1.1 mcr ppb_cardbus_enable(struct ppb_softc * sc)
767 1.1 mcr {
768 1.1 mcr #if 0
769 1.25 joerg struct ppb_cardbus_softc *csc = (struct ppb_cardbus_softc *) sc;
770 1.25 joerg struct cardbus_softc *psc = device_private(device_parent(sc->sc_dev));
771 1.1 mcr cardbus_chipset_tag_t cc = psc->sc_cc;
772 1.1 mcr cardbus_function_tag_t cf = psc->sc_cf;
773 1.1 mcr
774 1.1 mcr Cardbus_function_enable(csc->ct);
775 1.1 mcr
776 1.1 mcr fxp_cardbus_setup(sc);
777 1.1 mcr
778 1.1 mcr /* Map and establish the interrupt. */
779 1.1 mcr
780 1.1 mcr sc->sc_ih = cardbus_intr_establish(cc, cf, psc->sc_intrline, IPL_NET,
781 1.1 mcr fxp_intr, sc);
782 1.1 mcr if (NULL == sc->sc_ih) {
783 1.25 joerg aprint_error_dev(sc->sc_dev, "couldn't establish interrupt\n");
784 1.1 mcr return 1;
785 1.1 mcr }
786 1.1 mcr
787 1.25 joerg printf("%s: interrupting at %d\n", device_xname(sc->sc_dev),
788 1.1 mcr psc->sc_intrline);
789 1.1 mcr
790 1.1 mcr #endif
791 1.1 mcr return 0;
792 1.1 mcr }
793 1.1 mcr
794 1.1 mcr void
795 1.1 mcr ppb_cardbus_disable(struct ppb_softc * sc)
796 1.1 mcr {
797 1.1 mcr #if 0
798 1.25 joerg struct cardbus_softc *psc = device_private(device_parent(sc->sc_dev));
799 1.1 mcr cardbus_chipset_tag_t cc = psc->sc_cc;
800 1.1 mcr cardbus_function_tag_t cf = psc->sc_cf;
801 1.1 mcr
802 1.1 mcr /* Remove interrupt handler. */
803 1.1 mcr cardbus_intr_disestablish(cc, cf, sc->sc_ih);
804 1.1 mcr
805 1.1 mcr Cardbus_function_disable(((struct fxp_cardbus_softc *) sc)->ct);
806 1.1 mcr #endif
807 1.1 mcr }
808 1.1 mcr
809 1.1 mcr static int
810 1.31 cegger ppb_cardbus_detach(device_t self, int flags)
811 1.1 mcr {
812 1.19 thorpej /* struct ppb_softc *sc = device_private(self);*/
813 1.19 thorpej struct ppb_cardbus_softc *csc = device_private(self);
814 1.1 mcr
815 1.1 mcr #if 0
816 1.1 mcr struct cardbus_devfunc *ct = csc->ct;
817 1.1 mcr int rv, reg;
818 1.1 mcr
819 1.1 mcr #ifdef DIAGNOSTIC
820 1.1 mcr if (ct == NULL)
821 1.25 joerg panic("%s: data structure lacks", device_xname(sc->sc_dev));
822 1.1 mcr #endif
823 1.1 mcr
824 1.1 mcr rv = fxp_detach(sc);
825 1.1 mcr if (rv == 0) {
826 1.1 mcr /*
827 1.1 mcr * Unhook the interrupt handler.
828 1.1 mcr */
829 1.1 mcr cardbus_intr_disestablish(ct->ct_cc, ct->ct_cf, sc->sc_ih);
830 1.1 mcr
831 1.1 mcr /*
832 1.1 mcr * release bus space and close window
833 1.1 mcr */
834 1.1 mcr if (csc->base0_reg)
835 1.35 dyoung reg = PCI_BAR0;
836 1.1 mcr else
837 1.35 dyoung reg = PCI_BAR1;
838 1.1 mcr Cardbus_mapreg_unmap(ct, reg, sc->sc_st, sc->sc_sh, csc->size);
839 1.1 mcr }
840 1.1 mcr return (rv);
841 1.1 mcr
842 1.1 mcr #endif
843 1.1 mcr csc->foo=1;
844 1.1 mcr return 0;
845 1.1 mcr
846 1.1 mcr }
847 1.1 mcr
848 1.1 mcr int
849 1.31 cegger ppb_activate(device_t self, enum devact act)
850 1.1 mcr {
851 1.1 mcr printf("ppb_activate called\n");
852 1.1 mcr return 0;
853 1.1 mcr }
854 1.1 mcr
855