1 /* $NetBSD: ixp425.c,v 1.10 2005/12/11 12:16:51 christos Exp $ */
2
3 /*
4 * Copyright (c) 2003
5 * Ichiro FUKUHARA <ichiro@ichiro.org>.
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed by Ichiro FUKUHARA.
19 * 4. The name of the company nor the name of the author may be used to
20 * endorse or promote products derived from this software without specific
21 * prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY ICHIRO FUKUHARA ``AS IS'' AND ANY EXPRESS OR
24 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
25 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
26 * IN NO EVENT SHALL ICHIRO FUKUHARA OR THE VOICES IN HIS HEAD BE LIABLE FOR
27 * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * SUCH DAMAGE.
34 */
35
36 #include <sys/cdefs.h>
37 __FBSDID("$FreeBSD$");
38
39 #define _ARM32_BUS_DMA_PRIVATE
40 #include <sys/param.h>
41 #include <sys/systm.h>
42 #include <sys/bus.h>
43 #include <sys/kernel.h>
44 #include <sys/module.h>
45 #include <sys/malloc.h>
46 #include <sys/rman.h>
47 #include <machine/bus.h>
48 #include <machine/intr.h>
49
50 #include <vm/vm.h>
51 #include <vm/pmap.h>
52 #include <arm/xscale/ixp425/ixp425reg.h>
53 #include <arm/xscale/ixp425/ixp425var.h>
54 #include <arm/xscale/ixp425/ixp425_intr.h>
55
56 #include <dev/pci/pcireg.h>
57
58 volatile uint32_t intr_enabled;
59 uint32_t intr_steer = 0;
60
61 struct ixp425_softc *ixp425_softc = NULL;
62
63 static int ixp425_probe(device_t);
64 static void ixp425_identify(driver_t *, device_t);
65 static int ixp425_attach(device_t);
66
67 static struct {
68 uint32_t hwbase;
69 uint32_t size;
70 uint32_t vbase;
71 } hwvtrans[] = {
72 { IXP425_IO_HWBASE, IXP425_IO_SIZE, IXP425_IO_VBASE },
73 { IXP425_EXP_HWBASE, IXP425_EXP_SIZE, IXP425_EXP_VBASE },
74 { IXP425_PCI_HWBASE, IXP425_PCI_SIZE, IXP425_PCI_VBASE },
75 { IXP425_PCI_MEM_HWBASE,IXP425_PCI_MEM_SIZE, IXP425_PCI_MEM_VBASE },
76 #if 0
77 { IXP425_PCI_IO_HWBASE, IXP425_PCI_IO_SIZE, IXP425_PCI_IO_VBASE },
78 #endif
79 { IXP425_MCU_HWBASE, IXP425_MCU_SIZE, IXP425_MCU_VBASE },
80 { IXP425_QMGR_HWBASE, IXP425_QMGR_SIZE, IXP425_QMGR_VBASE },
81 { IXP425_NPE_A_HWBASE, IXP425_NPE_A_SIZE, IXP425_NPE_A_VBASE },
82 { IXP425_NPE_B_HWBASE, IXP425_NPE_B_SIZE, IXP425_NPE_B_VBASE },
83 { IXP425_NPE_C_HWBASE, IXP425_NPE_C_SIZE, IXP425_NPE_C_VBASE },
84 { IXP425_MAC_A_HWBASE, IXP425_MAC_A_SIZE, IXP425_MAC_A_VBASE },
85 { IXP425_MAC_B_HWBASE, IXP425_MAC_B_SIZE, IXP425_MAC_B_VBASE },
86 /* Gateworks Avila IDE/CF is mapped here */
87 { IXP425_EXP_BUS_CS1_HWBASE, IXP425_EXP_BUS_SIZE,
88 IXP425_EXP_BUS_CS1_VBASE },
89 { IXP425_EXP_BUS_CS2_HWBASE, IXP425_EXP_BUS_SIZE,
90 IXP425_EXP_BUS_CS2_VBASE },
91 /* ADI Pronghorn Metro IDE/CF is mapped here */
92 { IXP425_EXP_BUS_CS3_HWBASE, IXP425_EXP_BUS_SIZE,
93 IXP425_EXP_BUS_CS3_VBASE },
94 { IXP425_EXP_BUS_CS4_HWBASE, IXP425_EXP_BUS_SIZE,
95 IXP425_EXP_BUS_CS4_VBASE },
96 };
97
98 int
99 getvbase(uint32_t hwbase, uint32_t size, uint32_t *vbase)
100 {
101 int i;
102
103 for (i = 0; i < sizeof hwvtrans / sizeof *hwvtrans; i++) {
104 if (hwbase >= hwvtrans[i].hwbase &&
105 hwbase + size <= hwvtrans[i].hwbase + hwvtrans[i].size) {
106 *vbase = hwbase - hwvtrans[i].hwbase + hwvtrans[i].vbase;
107 return (0);
108 }
109 }
110
111 return (ENOENT);
112 }
113
114 struct arm32_dma_range *
115 bus_dma_get_range(void)
116 {
117 return (NULL);
118 }
119
120 int
121 bus_dma_get_range_nb(void)
122 {
123 return (0);
124 }
125
126 static __inline u_int32_t
127 ixp425_irq2gpio_bit(int irq)
128 {
129
130 static const uint8_t int2gpio[32] __attribute__ ((aligned(32))) = {
131 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, /* INT#0 -> INT#5 */
132 0x00, 0x01, /* GPIO#0 -> GPIO#1 */
133 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, /* INT#8 -> INT#13 */
134 0xff, 0xff, 0xff, 0xff, 0xff, /* INT#14 -> INT#18 */
135 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, /* GPIO#2 -> GPIO#7 */
136 0x08, 0x09, 0x0a, 0x0b, 0x0c, /* GPIO#8 -> GPIO#12 */
137 0xff, 0xff /* INT#30 -> INT#31 */
138 };
139
140 return (1U << int2gpio[irq]);
141 }
142
143 void
144 arm_mask_irq(uintptr_t nb)
145 {
146 intr_enabled &= ~(1 << nb);
147 ixp425_set_intrmask();
148 /*XXX; If it's a GPIO interrupt, ACK it know. Can it be a problem ?*/
149 if ((1 << nb) & IXP425_INT_GPIOMASK)
150 IXPREG(IXP425_GPIO_VBASE + IXP425_GPIO_GPISR) =
151 ixp425_irq2gpio_bit(nb);
152
153
154 }
155
156 void
157 arm_unmask_irq(uintptr_t nb)
158 {
159
160 intr_enabled |= (1 << nb);
161 ixp425_set_intrmask();
162 }
163
164 static __inline uint32_t
165 ixp425_irq_read(void)
166 {
167 return IXPREG(IXP425_INT_STATUS) & intr_enabled;
168 }
169
170 int
171 arm_get_next_irq(void)
172 {
173 int irq;
174
175 if ((irq = ixp425_irq_read()))
176 return (ffs(irq) - 1);
177 return (-1);
178 }
179
180 void
181 cpu_reset(void)
182 {
183
184 bus_space_write_4(&ixp425_bs_tag, IXP425_TIMER_VBASE,
185 IXP425_OST_WDOG_KEY, OST_WDOG_KEY_MAJICK);
186 bus_space_write_4(&ixp425_bs_tag, IXP425_TIMER_VBASE,
187 IXP425_OST_WDOG, 0);
188 bus_space_write_4(&ixp425_bs_tag, IXP425_TIMER_VBASE,
189 IXP425_OST_WDOG_ENAB, OST_WDOG_ENAB_RST_ENA |
190 OST_WDOG_ENAB_CNT_ENA);
191 printf("Reset failed!\n");
192 for(;;);
193 }
194
195 static void
196 ixp425_identify(driver_t *driver, device_t parent)
197 {
198 BUS_ADD_CHILD(parent, 0, "ixp", 0);
199 }
200
201 static int
202 ixp425_probe(device_t dev)
203 {
204 device_set_desc(dev, "Intel IXP425");
205 return (0);
206 }
207
208 static int
209 ixp425_attach(device_t dev)
210 {
211 struct ixp425_softc *sc;
212
213 sc = device_get_softc(dev);
214 sc->sc_iot = &ixp425_bs_tag;
215 KASSERT(ixp425_softc == NULL, ("ixp425_attach called twice?"));
216 ixp425_softc = sc;
217
218 intr_enabled = 0;
219 ixp425_set_intrmask();
220 ixp425_set_intrsteer();
221
222 if (bus_dma_tag_create(NULL, 1, 0, BUS_SPACE_MAXADDR_32BIT,
223 BUS_SPACE_MAXADDR, NULL, NULL, 0xffffffff, 0xff, 0xffffffff, 0,
224 NULL, NULL, &sc->sc_dmat))
225 panic("couldn't create the IXP425 dma tag !");
226
227 sc->sc_irq_rman.rm_type = RMAN_ARRAY;
228 sc->sc_irq_rman.rm_descr = "IXP425 IRQs";
229 if (rman_init(&sc->sc_irq_rman) != 0 ||
230 rman_manage_region(&sc->sc_irq_rman, 0, 31) != 0)
231 panic("ixp425_attach: failed to set up IRQ rman");
232
233 sc->sc_mem_rman.rm_type = RMAN_ARRAY;
234 sc->sc_mem_rman.rm_descr = "IXP425 Memory";
235 if (rman_init(&sc->sc_mem_rman) != 0 ||
236 rman_manage_region(&sc->sc_mem_rman, 0, ~0) != 0)
237 panic("ixp425_attach: failed to set up memory rman");
238
239 BUS_ADD_CHILD(dev, 0, "pcib", 0);
240 BUS_ADD_CHILD(dev, 0, "ixpclk", 0);
241 BUS_ADD_CHILD(dev, 0, "ixpiic", 0);
242 /* XXX move to hints? */
243 BUS_ADD_CHILD(dev, 0, "ixpwdog", 0);
244
245 /* attach wired devices via hints */
246 bus_enumerate_hinted_children(dev);
247
248 if (bus_space_map(sc->sc_iot, IXP425_GPIO_HWBASE, IXP425_GPIO_SIZE,
249 0, &sc->sc_gpio_ioh))
250 panic("ixp425_attach: unable to map GPIO registers");
251 if (bus_space_map(sc->sc_iot, IXP425_EXP_HWBASE, IXP425_EXP_SIZE,
252 0, &sc->sc_exp_ioh))
253 panic("ixp425_attach: unable to map Expansion Bus registers");
254
255 bus_generic_probe(dev);
256 bus_generic_attach(dev);
257
258 return (0);
259 }
260
261 static void
262 ixp425_hinted_child(device_t bus, const char *dname, int dunit)
263 {
264 device_t child;
265 struct ixp425_ivar *ivar;
266
267 child = BUS_ADD_CHILD(bus, 0, dname, dunit);
268 ivar = IXP425_IVAR(child);
269 resource_int_value(dname, dunit, "addr", &ivar->addr);
270 resource_int_value(dname, dunit, "irq", &ivar->irq);
271 }
272
273 static device_t
274 ixp425_add_child(device_t dev, int order, const char *name, int unit)
275 {
276 device_t child;
277 struct ixp425_ivar *ivar;
278
279 child = device_add_child_ordered(dev, order, name, unit);
280 if (child == NULL)
281 return NULL;
282 ivar = malloc(sizeof(struct ixp425_ivar), M_DEVBUF, M_NOWAIT);
283 if (ivar == NULL) {
284 device_delete_child(dev, child);
285 return NULL;
286 }
287 ivar->addr = 0;
288 ivar->irq = -1;
289 device_set_ivars(child, ivar);
290 return child;
291 }
292
293 static int
294 ixp425_read_ivar(device_t bus, device_t child, int which, u_char *result)
295 {
296 struct ixp425_ivar *ivar = IXP425_IVAR(child);
297
298 switch (which) {
299 case IXP425_IVAR_ADDR:
300 if (ivar->addr != 0) {
301 *(uint32_t *)result = ivar->addr;
302 return 0;
303 }
304 break;
305 case IXP425_IVAR_IRQ:
306 if (ivar->irq != -1) {
307 *(int *)result = ivar->irq;
308 return 0;
309 }
310 break;
311 }
312 return EINVAL;
313 }
314
315 static struct resource *
316 ixp425_alloc_resource(device_t dev, device_t child, int type, int *rid,
317 u_long start, u_long end, u_long count, u_int flags)
318 {
319 struct ixp425_softc *sc = device_get_softc(dev);
320 struct rman *rmanp;
321 struct resource *rv;
322 uint32_t vbase, addr;
323 int irq;
324
325 switch (type) {
326 case SYS_RES_IRQ:
327 rmanp = &sc->sc_irq_rman;
328 /* override per hints */
329 if (BUS_READ_IVAR(dev, child, IXP425_IVAR_IRQ, &irq) == 0)
330 start = end = irq;
331 rv = rman_reserve_resource(rmanp, start, end, count,
332 flags, child);
333 if (rv != NULL)
334 rman_set_rid(rv, *rid);
335 break;
336
337 case SYS_RES_MEMORY:
338 rmanp = &sc->sc_mem_rman;
339 /* override per hints */
340 if (BUS_READ_IVAR(dev, child, IXP425_IVAR_ADDR, &addr) == 0) {
341 start = addr;
342 end = start + 0x1000; /* XXX */
343 }
344 if (getvbase(start, end - start, &vbase))
345 return NULL;
346 rv = rman_reserve_resource(rmanp, start, end, count,
347 flags, child);
348 if (rv != NULL) {
349 rman_set_rid(rv, *rid);
350 if (strcmp(device_get_name(child), "uart") == 0)
351 rman_set_bustag(rv, &ixp425_a4x_bs_tag);
352 else
353 rman_set_bustag(rv, sc->sc_iot);
354 rman_set_bushandle(rv, vbase);
355 }
356 break;
357 default:
358 rv = NULL;
359 break;
360 }
361 return rv;
362 }
363
364 static int
365 ixp425_setup_intr(device_t dev, device_t child,
366 struct resource *ires, int flags, driver_filter_t *filt,
367 driver_intr_t *intr, void *arg, void **cookiep)
368 {
369 uint32_t mask;
370 int i;
371
372 BUS_SETUP_INTR(device_get_parent(dev), child, ires, flags, filt, intr,
373 arg, cookiep);
374
375 mask = 0;
376 for (i = rman_get_start(ires); i <= rman_get_end(ires); i++)
377 mask |= 1 << i;
378 intr_enabled |= mask;
379 ixp425_set_intrmask();
380
381 return (0);
382 }
383
384 static int
385 ixp425_teardown_intr(device_t dev, device_t child, struct resource *res,
386 void *cookie)
387 {
388 uint32_t mask;
389 int i;
390
391 mask = 0;
392 for (i = rman_get_start(res); i <= rman_get_end(res); i++)
393 mask |= 1 << i;
394 intr_enabled &= ~mask;
395 ixp425_set_intrmask();
396
397 return (BUS_TEARDOWN_INTR(device_get_parent(dev), child, res, cookie));
398 }
399
400 static device_method_t ixp425_methods[] = {
401 /* Device interface */
402 DEVMETHOD(device_probe, ixp425_probe),
403 DEVMETHOD(device_attach, ixp425_attach),
404 DEVMETHOD(device_identify, ixp425_identify),
405
406 /* Bus interface */
407 DEVMETHOD(bus_add_child, ixp425_add_child),
408 DEVMETHOD(bus_hinted_child, ixp425_hinted_child),
409 DEVMETHOD(bus_read_ivar, ixp425_read_ivar),
410
411 DEVMETHOD(bus_alloc_resource, ixp425_alloc_resource),
412 DEVMETHOD(bus_setup_intr, ixp425_setup_intr),
413 DEVMETHOD(bus_teardown_intr, ixp425_teardown_intr),
414
415 {0, 0},
416 };
417
418 static driver_t ixp425_driver = {
419 "ixp",
420 ixp425_methods,
421 sizeof(struct ixp425_softc),
422 };
423 static devclass_t ixp425_devclass;
424
425 DRIVER_MODULE(ixp, nexus, ixp425_driver, ixp425_devclass, 0, 0);
Cache object: f35335e935d9e9a88e0dd1590cc5f0b4
|