ixp425.c revision 169952 
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: head/sys/arm/xscale/ixp425/ixp425.c 169952 2007-05-24 16:25:49Z sam $");
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
58volatile uint32_t intr_enabled;
59uint32_t intr_steer = 0;
60
61struct	ixp425_softc *ixp425_softc = NULL;
62
63static int	ixp425_probe(device_t);
64static void	ixp425_identify(driver_t *, device_t);
65static int	ixp425_attach(device_t);
66
67static 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
98static int
99getvbase(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
114struct arm32_dma_range *
115bus_dma_get_range(void)
116{
117	return (NULL);
118}
119
120int
121bus_dma_get_range_nb(void)
122{
123	return (0);
124}
125
126static __inline u_int32_t
127ixp425_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
143void
144arm_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
156void
157arm_unmask_irq(uintptr_t nb)
158{
159
160	intr_enabled |= (1 << nb);
161	ixp425_set_intrmask();
162}
163
164static __inline uint32_t
165ixp425_irq_read(void)
166{
167	return IXPREG(IXP425_INT_STATUS) & intr_enabled;
168}
169
170int
171arm_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
180void
181cpu_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
195static void
196ixp425_identify(driver_t *driver, device_t parent)
197{
198	BUS_ADD_CHILD(parent, 0, "ixp", 0);
199}
200
201static int
202ixp425_probe(device_t dev)
203{
204	device_set_desc(dev, "Intel IXP425");
205	return (0);
206}
207
208static int
209ixp425_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 IRQ 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
261static void
262ixp425_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
273static device_t
274ixp425_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
293static int
294ixp425_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
315static struct resource *
316ixp425_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
364static int
365ixp425_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, irq;
371
372	if (BUS_READ_IVAR(dev, child, IXP425_IVAR_IRQ, &irq) == 0) {
373		rman_set_start(ires, irq);
374		rman_set_end(ires, rman_get_start(ires));
375	}
376	BUS_SETUP_INTR(device_get_parent(dev), child, ires, flags, filt, intr,
377	     arg, cookiep);
378
379	mask = 0;
380	for (i = rman_get_start(ires); i <= rman_get_end(ires); i++)
381		mask |= 1 << i;
382	intr_enabled |= mask;
383	ixp425_set_intrmask();
384
385	return (0);
386}
387
388static int
389ixp425_teardown_intr(device_t dev, device_t child, struct resource *res,
390    void *cookie)
391{
392	uint32_t mask;
393	int i;
394
395	mask = 0;
396	for (i = rman_get_start(res); i <= rman_get_end(res); i++)
397		mask |= 1 << i;
398	intr_enabled &= ~mask;
399	ixp425_set_intrmask();
400
401	return (BUS_TEARDOWN_INTR(device_get_parent(dev), child, res, cookie));
402}
403
404static device_method_t ixp425_methods[] = {
405	/* Device interface */
406	DEVMETHOD(device_probe, ixp425_probe),
407	DEVMETHOD(device_attach, ixp425_attach),
408	DEVMETHOD(device_identify, ixp425_identify),
409
410	/* Bus interface */
411	DEVMETHOD(bus_add_child, ixp425_add_child),
412	DEVMETHOD(bus_hinted_child, ixp425_hinted_child),
413	DEVMETHOD(bus_read_ivar, ixp425_read_ivar),
414
415	DEVMETHOD(bus_alloc_resource, ixp425_alloc_resource),
416	DEVMETHOD(bus_setup_intr, ixp425_setup_intr),
417	DEVMETHOD(bus_teardown_intr, ixp425_teardown_intr),
418
419	{0, 0},
420};
421
422static driver_t ixp425_driver = {
423	"ixp",
424	ixp425_methods,
425	sizeof(struct ixp425_softc),
426};
427static devclass_t ixp425_devclass;
428
429DRIVER_MODULE(ixp, nexus, ixp425_driver, ixp425_devclass, 0, 0);
430