2 * Copyright (c) 2009 Yohanes Nugroho <yohanes@gmail.com>
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
14 * THIS SOFTWARE IS PROVIDED BY AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 #include <sys/cdefs.h>
28 __FBSDID("$FreeBSD$");
30 #include <sys/param.h>
31 #include <sys/systm.h>
33 #include <sys/types.h>
34 #include <sys/kernel.h>
35 #include <sys/malloc.h>
36 #include <sys/module.h>
39 #include <vm/vm_kern.h>
41 #include <vm/vm_page.h>
42 #include <vm/vm_extern.h>
44 #define _ARM32_BUS_DMA_PRIVATE
45 #include <machine/armreg.h>
46 #include <machine/bus.h>
47 #include <machine/intr.h>
48 #include <machine/resource.h>
50 #include "econa_reg.h"
51 #include "econa_var.h"
53 static struct econa_softc *econa_softc;
55 unsigned int CPU_clock = 200000000;
56 unsigned int AHB_clock;
57 unsigned int APB_clock;
59 bus_space_tag_t obio_tag;
62 econa_probe(device_t dev)
65 device_set_desc(dev, "ECONA device bus");
66 return (BUS_PROBE_NOWILDCARD);
70 econa_identify(driver_t *drv, device_t parent)
73 BUS_ADD_CHILD(parent, 0, "econaarm", 0);
76 struct arm32_dma_range *
77 bus_dma_get_range(void)
84 bus_dma_get_range_nb(void)
90 extern void irq_entry(void);
93 econa_add_child(device_t dev, int prio, const char *name, int unit,
94 bus_addr_t addr, bus_size_t size,
96 int irq2, int irq3, int irq4)
99 struct econa_ivar *ivar;
101 kid = device_add_child_ordered(dev, prio, name, unit);
103 printf("Can't add child %s%d ordered\n", name, unit);
106 ivar = malloc(sizeof(*ivar), M_DEVBUF, M_NOWAIT | M_ZERO);
108 device_delete_child(dev, kid);
111 device_set_ivars(kid, ivar);
112 resource_list_init(&ivar->resources);
114 bus_set_resource(kid, SYS_RES_IRQ, 0, irq0, 1);
116 bus_set_resource(kid, SYS_RES_IRQ, 1, irq1, 1);
118 bus_set_resource(kid, SYS_RES_IRQ, 2, irq2, 1);
120 bus_set_resource(kid, SYS_RES_IRQ, 3, irq3, 1);
122 bus_set_resource(kid, SYS_RES_IRQ, 4, irq4, 1);
125 bus_set_resource(kid, SYS_RES_MEMORY, 0, addr, size);
142 struct cpu_devs econarm_devs[] =
146 ECONA_IO_BASE + ECONA_PIC_BASE, ECONA_PIC_SIZE,
151 ECONA_IO_BASE + ECONA_SYSTEM_BASE, ECONA_SYSTEM_SIZE,
156 ECONA_IO_BASE + ECONA_UART_BASE, ECONA_UART_SIZE,
161 ECONA_IO_BASE + ECONA_TIMER_BASE, ECONA_TIMER_SIZE,
162 ECONA_IRQ_TIMER_1, ECONA_IRQ_TIMER_2
166 ECONA_OHCI_VBASE, ECONA_OHCI_SIZE,
171 ECONA_EHCI_VBASE, ECONA_EHCI_SIZE,
176 ECONA_CFI_VBASE, ECONA_CFI_SIZE,
181 ECONA_IO_BASE + ECONA_NET_BASE, ECONA_NET_SIZE,
183 ECONA_IRQ_TSTC, ECONA_IRQ_FSRC,
184 ECONA_IRQ_TSQE, ECONA_IRQ_FSQF,
186 { 0, 0, 0, 0, 0, 0, 0, 0, 0 }
190 econa_cpu_add_builtin_children(device_t dev, struct econa_softc *sc)
193 struct cpu_devs *walker;
195 for (i = 0, walker = econarm_devs; walker->name; i++, walker++) {
196 econa_add_child(dev, i, walker->name, walker->unit,
197 walker->mem_base, walker->mem_len,
198 walker->irq0,walker->irq1, walker->irq2,
199 walker->irq3, walker->irq4);
204 struct intc_trigger_t {
209 static struct intc_trigger_t intc_trigger_table[] = {
210 {INTC_EDGE_TRIGGER, INTC_RISING_EDGE},
211 {INTC_EDGE_TRIGGER, INTC_RISING_EDGE},
212 {INTC_EDGE_TRIGGER, INTC_FALLING_EDGE},
213 {INTC_EDGE_TRIGGER, INTC_RISING_EDGE},
214 {INTC_TRIGGER_UNKNOWN, INTC_TRIGGER_UNKNOWN},
215 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_LOW},
216 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_LOW},
217 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_HIGH},
218 {INTC_TRIGGER_UNKNOWN, INTC_TRIGGER_UNKNOWN},
219 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_HIGH},
220 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_HIGH},
221 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_HIGH},
222 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_HIGH},
223 {INTC_TRIGGER_UNKNOWN, INTC_TRIGGER_UNKNOWN},
224 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_HIGH},
225 {INTC_EDGE_TRIGGER, INTC_FALLING_EDGE},
226 {INTC_TRIGGER_UNKNOWN, INTC_TRIGGER_UNKNOWN},
227 {INTC_TRIGGER_UNKNOWN, INTC_TRIGGER_UNKNOWN},
228 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_HIGH},
229 {INTC_EDGE_TRIGGER, INTC_RISING_EDGE},
230 {INTC_EDGE_TRIGGER, INTC_RISING_EDGE},
231 {INTC_EDGE_TRIGGER, INTC_RISING_EDGE},
232 {INTC_EDGE_TRIGGER, INTC_RISING_EDGE},
233 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_LOW},
234 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_LOW},
237 static inline uint32_t
238 read_4(struct econa_softc *sc, bus_size_t off)
241 return bus_space_read_4(sc->ec_st, sc->ec_sys_sh, off);
245 write_4(struct econa_softc *sc, bus_size_t off, uint32_t val)
248 return bus_space_write_4(sc->ec_st, sc->ec_sys_sh, off, val);
251 static inline uint32_t
252 system_read_4(struct econa_softc *sc, bus_size_t off)
255 return bus_space_read_4(sc->ec_st, sc->ec_system_sh, off);
259 system_write_4(struct econa_softc *sc, bus_size_t off, uint32_t val)
262 return bus_space_write_4(sc->ec_st, sc->ec_system_sh, off, val);
268 econa_set_irq_mode(struct econa_softc * sc, unsigned int irq,
273 if ((mode != INTC_LEVEL_TRIGGER) && (mode != INTC_EDGE_TRIGGER))
276 val = read_4(sc, INTC_INTERRUPT_TRIGGER_MODE_REG_OFFSET);
278 if (mode == INTC_LEVEL_TRIGGER) {
279 if (val & (1UL << irq)) {
280 val &= ~(1UL << irq);
281 write_4(sc, INTC_INTERRUPT_TRIGGER_MODE_REG_OFFSET,
285 if (!(val & (1UL << irq))) {
287 write_4(sc, INTC_INTERRUPT_TRIGGER_MODE_REG_OFFSET,
294 * Configure interrupt trigger level to be Active High/Low
295 * or Rising/Falling Edge
298 econa_set_irq_level(struct econa_softc * sc,
299 unsigned int irq, unsigned int level)
303 if ((level != INTC_ACTIVE_HIGH) &&
304 (level != INTC_ACTIVE_LOW) &&
305 (level != INTC_RISING_EDGE) &&
306 (level != INTC_FALLING_EDGE)) {
310 val = read_4(sc, INTC_INTERRUPT_TRIGGER_LEVEL_REG_OFFSET);
312 if ((level == INTC_ACTIVE_HIGH) || (level == INTC_RISING_EDGE)) {
313 if (val & (1UL << irq)) {
314 val &= ~(1UL << irq);
315 write_4(sc, INTC_INTERRUPT_TRIGGER_LEVEL_REG_OFFSET,
319 if (!(val & (1UL << irq))) {
321 write_4(sc, INTC_INTERRUPT_TRIGGER_LEVEL_REG_OFFSET,
328 get_system_clock(void)
330 uint32_t sclock = system_read_4(econa_softc, SYSTEM_CLOCK);
332 sclock = (sclock >> 6) & 0x03;
336 CPU_clock = 175000000;
339 CPU_clock = 200000000;
342 CPU_clock = 225000000;
345 CPU_clock = 250000000;
348 AHB_clock = CPU_clock >> 1;
349 APB_clock = AHB_clock >> 1;
353 econa_attach(device_t dev)
355 struct econa_softc *sc = device_get_softc(dev);
358 obio_tag = arm_base_bs_tag;
361 sc->ec_st = arm_base_bs_tag;
362 sc->ec_sh = ECONA_IO_BASE;
364 if (bus_space_subregion(sc->ec_st, sc->ec_sh, ECONA_PIC_BASE,
365 ECONA_PIC_SIZE, &sc->ec_sys_sh) != 0)
366 panic("Unable to map IRQ registers");
368 if (bus_space_subregion(sc->ec_st, sc->ec_sh, ECONA_SYSTEM_BASE,
369 ECONA_SYSTEM_SIZE, &sc->ec_system_sh) != 0)
370 panic("Unable to map IRQ registers");
372 sc->ec_irq_rman.rm_type = RMAN_ARRAY;
373 sc->ec_irq_rman.rm_descr = "ECONA IRQs";
374 sc->ec_mem_rman.rm_type = RMAN_ARRAY;
375 sc->ec_mem_rman.rm_descr = "ECONA Memory";
376 if (rman_init(&sc->ec_irq_rman) != 0 ||
377 rman_manage_region(&sc->ec_irq_rman, 0, 31) != 0)
378 panic("econa_attach: failed to set up IRQ rman");
379 if (rman_init(&sc->ec_mem_rman) != 0 ||
380 rman_manage_region(&sc->ec_mem_rman, 0,
382 panic("econa_attach: failed to set up memory rman");
384 write_4(sc, INTC_INTERRUPT_CLEAR_EDGE_TRIGGER_REG_OFFSET, 0xffffffff);
386 write_4(sc, INTC_INTERRUPT_MASK_REG_OFFSET, 0xffffffff);
388 write_4(sc, INTC_FIQ_MODE_SELECT_REG_OFFSET, 0);
391 for (i = 0; i < 32; i++) {
392 if (intc_trigger_table[i].mode != INTC_TRIGGER_UNKNOWN) {
393 econa_set_irq_mode(sc,i, intc_trigger_table[i].mode);
394 econa_set_irq_level(sc, i, intc_trigger_table[i].level);
400 econa_cpu_add_builtin_children(dev, sc);
402 bus_generic_probe(dev);
403 bus_generic_attach(dev);
404 enable_interrupts(PSR_I | PSR_F);
409 static struct resource *
410 econa_alloc_resource(device_t dev, device_t child, int type, int *rid,
411 u_long start, u_long end, u_long count, u_int flags)
413 struct econa_softc *sc = device_get_softc(dev);
414 struct resource_list_entry *rle;
415 struct econa_ivar *ivar = device_get_ivars(child);
416 struct resource_list *rl = &ivar->resources;
418 if (device_get_parent(child) != dev)
419 return (BUS_ALLOC_RESOURCE(device_get_parent(dev), child,
420 type, rid, start, end, count, flags));
422 rle = resource_list_find(rl, type, *rid);
427 panic("Resource rid %d type %d already in use", *rid, type);
428 if (start == 0UL && end == ~0UL) {
430 count = ulmax(count, rle->count);
431 end = ulmax(rle->end, start + count - 1);
436 rle->res = rman_reserve_resource(&sc->ec_irq_rman,
437 start, end, count, flags, child);
440 rle->res = rman_reserve_resource(&sc->ec_mem_rman,
441 start, end, count, flags, child);
442 if (rle->res != NULL) {
443 rman_set_bustag(rle->res, arm_base_bs_tag);
444 rman_set_bushandle(rle->res, start);
449 rle->start = rman_get_start(rle->res);
450 rle->end = rman_get_end(rle->res);
452 rman_set_rid(rle->res, *rid);
457 static struct resource_list *
458 econa_get_resource_list(device_t dev, device_t child)
460 struct econa_ivar *ivar;
461 ivar = device_get_ivars(child);
462 return (&(ivar->resources));
466 econa_release_resource(device_t dev, device_t child, int type,
467 int rid, struct resource *r)
469 struct resource_list *rl;
470 struct resource_list_entry *rle;
472 rl = econa_get_resource_list(dev, child);
475 rle = resource_list_find(rl, type, rid);
478 rman_release_resource(r);
484 econa_setup_intr(device_t dev, device_t child,
485 struct resource *ires, int flags, driver_filter_t *filt,
486 driver_intr_t *intr, void *arg, void **cookiep)
490 if (rman_get_start(ires) == ECONA_IRQ_SYSTEM && filt == NULL)
491 panic("All system interrupt ISRs must be FILTER");
493 error = BUS_SETUP_INTR(device_get_parent(dev), child, ires, flags,
494 filt, intr, arg, cookiep);
502 econa_teardown_intr(device_t dev, device_t child, struct resource *res,
506 return (BUS_TEARDOWN_INTR(device_get_parent(dev), child, res, cookie));
510 econa_activate_resource(device_t bus, device_t child, int type, int rid,
514 return (rman_activate_resource(r));
518 econa_print_child(device_t dev, device_t child)
520 struct econa_ivar *ivars;
521 struct resource_list *rl;
524 ivars = device_get_ivars(child);
525 rl = &ivars->resources;
527 retval += bus_print_child_header(dev, child);
529 retval += resource_list_print_type(rl, "port", SYS_RES_IOPORT, "%#lx");
530 retval += resource_list_print_type(rl, "mem", SYS_RES_MEMORY, "%#lx");
531 retval += resource_list_print_type(rl, "irq", SYS_RES_IRQ, "%ld");
532 if (device_get_flags(dev))
533 retval += printf(" flags %#x", device_get_flags(dev));
535 retval += bus_print_child_footer(dev, child);
541 arm_mask_irq(uintptr_t nb)
545 value = read_4(econa_softc,INTC_INTERRUPT_MASK_REG_OFFSET) | 1<<nb;
546 write_4(econa_softc, INTC_INTERRUPT_MASK_REG_OFFSET, value);
550 arm_unmask_irq(uintptr_t nb)
554 value = read_4(econa_softc,
555 INTC_INTERRUPT_CLEAR_EDGE_TRIGGER_REG_OFFSET) | (1 << nb);
557 INTC_INTERRUPT_CLEAR_EDGE_TRIGGER_REG_OFFSET, value);
558 value = read_4(econa_softc, INTC_INTERRUPT_MASK_REG_OFFSET)& ~(1 << nb);
559 write_4(econa_softc, INTC_INTERRUPT_MASK_REG_OFFSET, value);
563 arm_get_next_irq(int x)
567 irq = read_4(econa_softc, INTC_INTERRUPT_STATUS_REG_OFFSET) &
568 ~(read_4(econa_softc, INTC_INTERRUPT_MASK_REG_OFFSET));
571 return (ffs(irq) - 1);
582 control = system_read_4(econa_softc, RESET_CONTROL);
583 control |= GLOBAL_RESET;
584 system_write_4(econa_softc, RESET_CONTROL, control);
585 control = system_read_4(econa_softc, RESET_CONTROL);
586 control &= (~(GLOBAL_RESET));
587 system_write_4(econa_softc, RESET_CONTROL, control);
594 power_on_network_interface(void)
599 cfg_reg = system_read_4(econa_softc, RESET_CONTROL);
600 cfg_reg |= NET_INTERFACE_RESET;
601 /* set reset bit to HIGH active; */
602 system_write_4(econa_softc, RESET_CONTROL, cfg_reg);
605 for (ii = 0; ii < 0xFFF; ii++)
607 /* set reset bit to LOW active; */
608 cfg_reg = system_read_4(econa_softc, RESET_CONTROL);
609 cfg_reg &= ~(NET_INTERFACE_RESET);
610 system_write_4(econa_softc, RESET_CONTROL, cfg_reg);
613 for (ii = 0; ii < 0xFFF; ii++)
615 cfg_reg = system_read_4(econa_softc, RESET_CONTROL);
616 cfg_reg |= NET_INTERFACE_RESET;
617 /* set reset bit to HIGH active; */
618 system_write_4(econa_softc, RESET_CONTROL, cfg_reg);
628 static device_method_t econa_methods[] = {
629 DEVMETHOD(device_probe, econa_probe),
630 DEVMETHOD(device_attach, econa_attach),
631 DEVMETHOD(device_identify, econa_identify),
632 DEVMETHOD(bus_alloc_resource, econa_alloc_resource),
633 DEVMETHOD(bus_setup_intr, econa_setup_intr),
634 DEVMETHOD(bus_teardown_intr, econa_teardown_intr),
635 DEVMETHOD(bus_activate_resource, econa_activate_resource),
636 DEVMETHOD(bus_deactivate_resource, bus_generic_deactivate_resource),
637 DEVMETHOD(bus_get_resource_list, econa_get_resource_list),
638 DEVMETHOD(bus_set_resource, bus_generic_rl_set_resource),
639 DEVMETHOD(bus_get_resource, bus_generic_rl_get_resource),
640 DEVMETHOD(bus_release_resource, econa_release_resource),
641 DEVMETHOD(bus_print_child, econa_print_child),
645 static driver_t econa_driver = {
648 sizeof(struct econa_softc),
650 static devclass_t econa_devclass;
652 DRIVER_MODULE(econaarm, nexus, econa_driver, econa_devclass, 0, 0);