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;
60 bs_protos(generic_armv4);
62 struct bus_space econa_bs_tag = {
66 /* mapping/unmapping */
71 /* allocation/deallocation */
86 generic_armv4_bs_rm_2,
92 generic_armv4_bs_rr_2,
104 generic_armv4_bs_wm_2,
132 /* read (single) stream */
138 /* read multiple stream */
140 generic_armv4_bs_rm_2,
144 /* read region stream */
150 /* write (single) stream */
156 /* write multiple stream */
158 generic_armv4_bs_wm_2,
162 /* write region stream */
169 bus_space_tag_t obio_tag = &econa_bs_tag;
172 econa_probe(device_t dev)
175 device_set_desc(dev, "ECONA device bus");
176 return (BUS_PROBE_NOWILDCARD);
180 econa_identify(driver_t *drv, device_t parent)
183 BUS_ADD_CHILD(parent, 0, "econaarm", 0);
186 struct arm32_dma_range *
187 bus_dma_get_range(void)
194 bus_dma_get_range_nb(void)
200 extern void irq_entry(void);
203 econa_add_child(device_t dev, int prio, const char *name, int unit,
204 bus_addr_t addr, bus_size_t size,
206 int irq2, int irq3, int irq4)
209 struct econa_ivar *ivar;
211 kid = device_add_child_ordered(dev, prio, name, unit);
213 printf("Can't add child %s%d ordered\n", name, unit);
216 ivar = malloc(sizeof(*ivar), M_DEVBUF, M_NOWAIT | M_ZERO);
218 device_delete_child(dev, kid);
221 device_set_ivars(kid, ivar);
222 resource_list_init(&ivar->resources);
224 bus_set_resource(kid, SYS_RES_IRQ, 0, irq0, 1);
226 bus_set_resource(kid, SYS_RES_IRQ, 1, irq1, 1);
228 bus_set_resource(kid, SYS_RES_IRQ, 2, irq2, 1);
230 bus_set_resource(kid, SYS_RES_IRQ, 3, irq3, 1);
232 bus_set_resource(kid, SYS_RES_IRQ, 4, irq4, 1);
235 bus_set_resource(kid, SYS_RES_MEMORY, 0, addr, size);
252 struct cpu_devs econarm_devs[] =
256 ECONA_IO_BASE + ECONA_PIC_BASE, ECONA_PIC_SIZE,
261 ECONA_IO_BASE + ECONA_SYSTEM_BASE, ECONA_SYSTEM_SIZE,
266 ECONA_IO_BASE + ECONA_UART_BASE, ECONA_UART_SIZE,
271 ECONA_IO_BASE + ECONA_TIMER_BASE, ECONA_TIMER_SIZE,
272 ECONA_IRQ_TIMER_1, ECONA_IRQ_TIMER_2
276 ECONA_OHCI_VBASE, ECONA_OHCI_SIZE,
281 ECONA_EHCI_VBASE, ECONA_EHCI_SIZE,
286 ECONA_CFI_VBASE, ECONA_CFI_SIZE,
291 ECONA_IO_BASE + ECONA_NET_BASE, ECONA_NET_SIZE,
293 ECONA_IRQ_TSTC, ECONA_IRQ_FSRC,
294 ECONA_IRQ_TSQE, ECONA_IRQ_FSQF,
296 { 0, 0, 0, 0, 0, 0, 0, 0, 0 }
300 econa_cpu_add_builtin_children(device_t dev, struct econa_softc *sc)
303 struct cpu_devs *walker;
305 for (i = 0, walker = econarm_devs; walker->name; i++, walker++) {
306 econa_add_child(dev, i, walker->name, walker->unit,
307 walker->mem_base, walker->mem_len,
308 walker->irq0,walker->irq1, walker->irq2,
309 walker->irq3, walker->irq4);
314 struct intc_trigger_t {
319 static struct intc_trigger_t intc_trigger_table[] = {
320 {INTC_EDGE_TRIGGER, INTC_RISING_EDGE},
321 {INTC_EDGE_TRIGGER, INTC_RISING_EDGE},
322 {INTC_EDGE_TRIGGER, INTC_FALLING_EDGE},
323 {INTC_EDGE_TRIGGER, INTC_RISING_EDGE},
324 {INTC_TRIGGER_UNKNOWN, INTC_TRIGGER_UNKNOWN},
325 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_LOW},
326 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_LOW},
327 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_HIGH},
328 {INTC_TRIGGER_UNKNOWN, INTC_TRIGGER_UNKNOWN},
329 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_HIGH},
330 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_HIGH},
331 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_HIGH},
332 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_HIGH},
333 {INTC_TRIGGER_UNKNOWN, INTC_TRIGGER_UNKNOWN},
334 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_HIGH},
335 {INTC_EDGE_TRIGGER, INTC_FALLING_EDGE},
336 {INTC_TRIGGER_UNKNOWN, INTC_TRIGGER_UNKNOWN},
337 {INTC_TRIGGER_UNKNOWN, INTC_TRIGGER_UNKNOWN},
338 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_HIGH},
339 {INTC_EDGE_TRIGGER, INTC_RISING_EDGE},
340 {INTC_EDGE_TRIGGER, INTC_RISING_EDGE},
341 {INTC_EDGE_TRIGGER, INTC_RISING_EDGE},
342 {INTC_EDGE_TRIGGER, INTC_RISING_EDGE},
343 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_LOW},
344 {INTC_LEVEL_TRIGGER, INTC_ACTIVE_LOW},
347 static inline uint32_t
348 read_4(struct econa_softc *sc, bus_size_t off)
351 return bus_space_read_4(sc->ec_st, sc->ec_sys_sh, off);
355 write_4(struct econa_softc *sc, bus_size_t off, uint32_t val)
358 return bus_space_write_4(sc->ec_st, sc->ec_sys_sh, off, val);
361 static inline uint32_t
362 system_read_4(struct econa_softc *sc, bus_size_t off)
365 return bus_space_read_4(sc->ec_st, sc->ec_system_sh, off);
369 system_write_4(struct econa_softc *sc, bus_size_t off, uint32_t val)
372 return bus_space_write_4(sc->ec_st, sc->ec_system_sh, off, val);
378 econa_set_irq_mode(struct econa_softc * sc, unsigned int irq,
383 if ((mode != INTC_LEVEL_TRIGGER) && (mode != INTC_EDGE_TRIGGER))
386 val = read_4(sc, INTC_INTERRUPT_TRIGGER_MODE_REG_OFFSET);
388 if (mode == INTC_LEVEL_TRIGGER) {
389 if (val & (1UL << irq)) {
390 val &= ~(1UL << irq);
391 write_4(sc, INTC_INTERRUPT_TRIGGER_MODE_REG_OFFSET,
395 if (!(val & (1UL << irq))) {
397 write_4(sc, INTC_INTERRUPT_TRIGGER_MODE_REG_OFFSET,
404 * Configure interrupt trigger level to be Active High/Low
405 * or Rising/Falling Edge
408 econa_set_irq_level(struct econa_softc * sc,
409 unsigned int irq, unsigned int level)
413 if ((level != INTC_ACTIVE_HIGH) &&
414 (level != INTC_ACTIVE_LOW) &&
415 (level != INTC_RISING_EDGE) &&
416 (level != INTC_FALLING_EDGE)) {
420 val = read_4(sc, INTC_INTERRUPT_TRIGGER_LEVEL_REG_OFFSET);
422 if ((level == INTC_ACTIVE_HIGH) || (level == INTC_RISING_EDGE)) {
423 if (val & (1UL << irq)) {
424 val &= ~(1UL << irq);
425 write_4(sc, INTC_INTERRUPT_TRIGGER_LEVEL_REG_OFFSET,
429 if (!(val & (1UL << irq))) {
431 write_4(sc, INTC_INTERRUPT_TRIGGER_LEVEL_REG_OFFSET,
438 get_system_clock(void)
440 uint32_t sclock = system_read_4(econa_softc, SYSTEM_CLOCK);
442 sclock = (sclock >> 6) & 0x03;
446 CPU_clock = 175000000;
449 CPU_clock = 200000000;
452 CPU_clock = 225000000;
455 CPU_clock = 250000000;
458 AHB_clock = CPU_clock >> 1;
459 APB_clock = AHB_clock >> 1;
463 econa_attach(device_t dev)
465 struct econa_softc *sc = device_get_softc(dev);
469 sc->ec_st = &econa_bs_tag;
470 sc->ec_sh = ECONA_IO_BASE;
472 if (bus_space_subregion(sc->ec_st, sc->ec_sh, ECONA_PIC_BASE,
473 ECONA_PIC_SIZE, &sc->ec_sys_sh) != 0)
474 panic("Unable to map IRQ registers");
476 if (bus_space_subregion(sc->ec_st, sc->ec_sh, ECONA_SYSTEM_BASE,
477 ECONA_SYSTEM_SIZE, &sc->ec_system_sh) != 0)
478 panic("Unable to map IRQ registers");
480 sc->ec_irq_rman.rm_type = RMAN_ARRAY;
481 sc->ec_irq_rman.rm_descr = "ECONA IRQs";
482 sc->ec_mem_rman.rm_type = RMAN_ARRAY;
483 sc->ec_mem_rman.rm_descr = "ECONA Memory";
484 if (rman_init(&sc->ec_irq_rman) != 0 ||
485 rman_manage_region(&sc->ec_irq_rman, 0, 31) != 0)
486 panic("econa_attach: failed to set up IRQ rman");
487 if (rman_init(&sc->ec_mem_rman) != 0 ||
488 rman_manage_region(&sc->ec_mem_rman, 0,
490 panic("econa_attach: failed to set up memory rman");
492 write_4(sc, INTC_INTERRUPT_CLEAR_EDGE_TRIGGER_REG_OFFSET, 0xffffffff);
494 write_4(sc, INTC_INTERRUPT_MASK_REG_OFFSET, 0xffffffff);
496 write_4(sc, INTC_FIQ_MODE_SELECT_REG_OFFSET, 0);
499 for (i = 0; i < 32; i++) {
500 if (intc_trigger_table[i].mode != INTC_TRIGGER_UNKNOWN) {
501 econa_set_irq_mode(sc,i, intc_trigger_table[i].mode);
502 econa_set_irq_level(sc, i, intc_trigger_table[i].level);
508 econa_cpu_add_builtin_children(dev, sc);
510 bus_generic_probe(dev);
511 bus_generic_attach(dev);
512 enable_interrupts(PSR_I | PSR_F);
517 static struct resource *
518 econa_alloc_resource(device_t dev, device_t child, int type, int *rid,
519 u_long start, u_long end, u_long count, u_int flags)
521 struct econa_softc *sc = device_get_softc(dev);
522 struct resource_list_entry *rle;
523 struct econa_ivar *ivar = device_get_ivars(child);
524 struct resource_list *rl = &ivar->resources;
526 if (device_get_parent(child) != dev)
527 return (BUS_ALLOC_RESOURCE(device_get_parent(dev), child,
528 type, rid, start, end, count, flags));
530 rle = resource_list_find(rl, type, *rid);
535 panic("Resource rid %d type %d already in use", *rid, type);
536 if (start == 0UL && end == ~0UL) {
538 count = ulmax(count, rle->count);
539 end = ulmax(rle->end, start + count - 1);
544 rle->res = rman_reserve_resource(&sc->ec_irq_rman,
545 start, end, count, flags, child);
548 rle->res = rman_reserve_resource(&sc->ec_mem_rman,
549 start, end, count, flags, child);
550 if (rle->res != NULL) {
551 rman_set_bustag(rle->res, &econa_bs_tag);
552 rman_set_bushandle(rle->res, start);
557 rle->start = rman_get_start(rle->res);
558 rle->end = rman_get_end(rle->res);
560 rman_set_rid(rle->res, *rid);
565 static struct resource_list *
566 econa_get_resource_list(device_t dev, device_t child)
568 struct econa_ivar *ivar;
569 ivar = device_get_ivars(child);
570 return (&(ivar->resources));
574 econa_release_resource(device_t dev, device_t child, int type,
575 int rid, struct resource *r)
577 struct resource_list *rl;
578 struct resource_list_entry *rle;
580 rl = econa_get_resource_list(dev, child);
583 rle = resource_list_find(rl, type, rid);
586 rman_release_resource(r);
592 econa_setup_intr(device_t dev, device_t child,
593 struct resource *ires, int flags, driver_filter_t *filt,
594 driver_intr_t *intr, void *arg, void **cookiep)
598 if (rman_get_start(ires) == ECONA_IRQ_SYSTEM && filt == NULL)
599 panic("All system interrupt ISRs must be FILTER");
601 error = BUS_SETUP_INTR(device_get_parent(dev), child, ires, flags,
602 filt, intr, arg, cookiep);
610 econa_teardown_intr(device_t dev, device_t child, struct resource *res,
614 return (BUS_TEARDOWN_INTR(device_get_parent(dev), child, res, cookie));
618 econa_activate_resource(device_t bus, device_t child, int type, int rid,
622 return (rman_activate_resource(r));
626 econa_print_child(device_t dev, device_t child)
628 struct econa_ivar *ivars;
629 struct resource_list *rl;
632 ivars = device_get_ivars(child);
633 rl = &ivars->resources;
635 retval += bus_print_child_header(dev, child);
637 retval += resource_list_print_type(rl, "port", SYS_RES_IOPORT, "%#lx");
638 retval += resource_list_print_type(rl, "mem", SYS_RES_MEMORY, "%#lx");
639 retval += resource_list_print_type(rl, "irq", SYS_RES_IRQ, "%ld");
640 if (device_get_flags(dev))
641 retval += printf(" flags %#x", device_get_flags(dev));
643 retval += bus_print_child_footer(dev, child);
649 arm_mask_irq(uintptr_t nb)
653 value = read_4(econa_softc,INTC_INTERRUPT_MASK_REG_OFFSET) | 1<<nb;
654 write_4(econa_softc, INTC_INTERRUPT_MASK_REG_OFFSET, value);
658 arm_unmask_irq(uintptr_t nb)
662 value = read_4(econa_softc,
663 INTC_INTERRUPT_CLEAR_EDGE_TRIGGER_REG_OFFSET) | (1 << nb);
665 INTC_INTERRUPT_CLEAR_EDGE_TRIGGER_REG_OFFSET, value);
666 value = read_4(econa_softc, INTC_INTERRUPT_MASK_REG_OFFSET)& ~(1 << nb);
667 write_4(econa_softc, INTC_INTERRUPT_MASK_REG_OFFSET, value);
671 arm_get_next_irq(int x)
675 irq = read_4(econa_softc, INTC_INTERRUPT_STATUS_REG_OFFSET) &
676 ~(read_4(econa_softc, INTC_INTERRUPT_MASK_REG_OFFSET));
679 return (ffs(irq) - 1);
690 control = system_read_4(econa_softc, RESET_CONTROL);
691 control |= GLOBAL_RESET;
692 system_write_4(econa_softc, RESET_CONTROL, control);
693 control = system_read_4(econa_softc, RESET_CONTROL);
694 control &= (~(GLOBAL_RESET));
695 system_write_4(econa_softc, RESET_CONTROL, control);
702 power_on_network_interface(void)
707 cfg_reg = system_read_4(econa_softc, RESET_CONTROL);
708 cfg_reg |= NET_INTERFACE_RESET;
709 /* set reset bit to HIGH active; */
710 system_write_4(econa_softc, RESET_CONTROL, cfg_reg);
713 for (ii = 0; ii < 0xFFF; ii++)
715 /* set reset bit to LOW active; */
716 cfg_reg = system_read_4(econa_softc, RESET_CONTROL);
717 cfg_reg &= ~(NET_INTERFACE_RESET);
718 system_write_4(econa_softc, RESET_CONTROL, cfg_reg);
721 for (ii = 0; ii < 0xFFF; ii++)
723 cfg_reg = system_read_4(econa_softc, RESET_CONTROL);
724 cfg_reg |= NET_INTERFACE_RESET;
725 /* set reset bit to HIGH active; */
726 system_write_4(econa_softc, RESET_CONTROL, cfg_reg);
736 static device_method_t econa_methods[] = {
737 DEVMETHOD(device_probe, econa_probe),
738 DEVMETHOD(device_attach, econa_attach),
739 DEVMETHOD(device_identify, econa_identify),
740 DEVMETHOD(bus_alloc_resource, econa_alloc_resource),
741 DEVMETHOD(bus_setup_intr, econa_setup_intr),
742 DEVMETHOD(bus_teardown_intr, econa_teardown_intr),
743 DEVMETHOD(bus_activate_resource, econa_activate_resource),
744 DEVMETHOD(bus_deactivate_resource, bus_generic_deactivate_resource),
745 DEVMETHOD(bus_get_resource_list, econa_get_resource_list),
746 DEVMETHOD(bus_set_resource, bus_generic_rl_set_resource),
747 DEVMETHOD(bus_get_resource, bus_generic_rl_get_resource),
748 DEVMETHOD(bus_release_resource, econa_release_resource),
749 DEVMETHOD(bus_print_child, econa_print_child),
753 static driver_t econa_driver = {
756 sizeof(struct econa_softc),
758 static devclass_t econa_devclass;
760 DRIVER_MODULE(econaarm, nexus, econa_driver, econa_devclass, 0, 0);