1234567891011121314151617181920212223242526272829303132333435363738394041424344454647 |
- # -*- perl -*-
- #
- # I/O device configuration
- #
- # Common constants
- our %consts = (
- '_PC_RESET' => 0x10,
- '_PC_IRQ' => 0x20,
- 'SRAM_ADDR' => 0,
- 'SRAM_BITS' => 15,
- 'SDRAM_ADDR' => 0x40000000,
- 'SDRAM_BITS' => 25,
- 'SYS_MAGIC_MAX80' => unpack('V', 'MAX8'),
- 'TIMER_SHIFT' => 5, # 32 Hz
- 'TTY_CHANNELS' => 2
- );
- # I/O address definitions
- our $xdev_addr_bits = 2;
- our $xdev_addr_shift = 28;
- our $iodev_addr_bits = 4;
- our $iodev_addr_shift = 7;
- # Special IRQs (CPU or non-device)
- our @sysirqs = ('timer', 'ebreak', 'buserr');
- # Define -irq to a string of 'e' (edge) or 'l' (level)
- # for a corresponding number of IRQs.
- our @iodevs = (
- { -name => 'sys' },
- { -name => 'abc', -irq => 'l' },
- { -name => 'abcmemmap', -xdev => 1 },
- { -name => 'sysclock', -irq => 'e' },
- { -name => 'tty', -irq => 'l' x $consts{'TTY_CHANNELS'} },
- { -name => 'usbdesc', -xdev => 1 },
- { -name => 'romcopy', -irq => 'l' },
- { -name => 'sdcard', -irq => 'l' },
- { -name => 'i2c', -irq => 'l' },
- { -name => 'esp', -irq => 'l' },
- { -name => 'random', -irq => 'l' },
- { -name => 'vjtag', -irq => 'e' }
- );
|