| /branches/dynload/kernel/arch/mips32/src/drivers/arc.c |
|---|
| 0,0 → 1,394 |
| /* |
| * Copyright (c) 2005 Ondrej Palkovsky |
| * All rights reserved. |
| * |
| * Redistribution and use in source and binary forms, with or without |
| * modification, are permitted provided that the following conditions |
| * are met: |
| * |
| * - Redistributions of source code must retain the above copyright |
| * notice, this list of conditions and the following disclaimer. |
| * - Redistributions in binary form must reproduce the above copyright |
| * notice, this list of conditions and the following disclaimer in the |
| * documentation and/or other materials provided with the distribution. |
| * - The name of the author may not be used to endorse or promote products |
| * derived from this software without specific prior written permission. |
| * |
| * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
| * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
| * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
| * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
| * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
| * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
| * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
| * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
| * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
| * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
| */ |
| /** @addtogroup mips32 |
| * @{ |
| */ |
| /** @file |
| */ |
| #include <arch/drivers/arc.h> |
| #include <arch/mm/page.h> |
| #include <print.h> |
| #include <arch.h> |
| #include <byteorder.h> |
| #include <arch/mm/frame.h> |
| #include <mm/frame.h> |
| #include <interrupt.h> |
| #include <align.h> |
| #include <console/console.h> |
| #include <console/kconsole.h> |
| #include <console/cmd.h> |
| #include <mm/slab.h> |
| /* This is a good joke, SGI HAS different types than NT bioses... */ |
| /* Here is the SGI type */ |
| static char *basetypes[] = { |
| "ExceptionBlock", |
| "SystemParameterBlock", |
| "FreeContiguous", |
| "FreeMemory", |
| "BadMemory", |
| "LoadedProgram", |
| "FirmwareTemporary", |
| "FirmwarePermanent" |
| }; |
| static char *ctypes[] = { |
| "ARC_type", |
| "CPU_type", |
| "FPU_type", |
| "PrimaryICache", |
| "PrimaryDCache", |
| "SecondaryICache", |
| "SecondaryDCache", |
| "SecondaryCache", |
| "Memory", |
| "EISAAdapter", |
| "TCAdapter", |
| "SCSIAdapter", |
| "DTIAdapter", |
| "MultiFunctionAdapter", |
| "DiskController", |
| "TapeController", |
| "CDROMController", |
| "WORMController", |
| "SerialController", |
| "NetworkController", |
| "DisplayController", |
| "ParallelController", |
| "PointerController", |
| "KeyboardController", |
| "AudioController", |
| "OtherController", |
| "DiskPeripheral", |
| "FloppyDiskPeripheral", |
| "TapePeripheral", |
| "ModemPeripheral", |
| "MonitorPeripheral", |
| "PrinterPeripheral", |
| "PointerPeripheral", |
| "KeyboardPeripheral", |
| "TerminalPeripheral", |
| "OtherPeripheral", |
| "LinePeripheral", |
| "NetworkPeripheral" |
| "OtherPeripheral", |
| "XTalkAdapter", |
| "PCIAdapter", |
| "GIOAdapter", |
| "TPUAdapter", |
| "Anonymous" |
| }; |
| static arc_sbp *sbp = (arc_sbp *) PA2KA(0x1000); |
| static arc_func_vector_t *arc_entry; |
| /** Return true if ARC is available */ |
| #define arc_enabled() (sbp != NULL) |
| /** Print configuration data that ARC reports about component */ |
| static void arc_print_confdata(arc_component *c) |
| { |
| cm_resource_list *configdata; |
| unsigned int i; |
| if (!c->configdatasize) |
| return; /* No configuration data */ |
| configdata = malloc(c->configdatasize, 0); |
| if (arc_entry->getconfigurationdata(configdata, c)) { |
| free(configdata); |
| return; |
| } |
| /* Does not seem to return meaningful data, don't use now */ |
| free(configdata); |
| return; |
| for (i = 0; i < configdata->count; i++) { |
| switch (configdata->descr[i].type) { |
| case CmResourceTypePort: |
| printf("Port: %p-size:%d ", |
| (uintptr_t) configdata->descr[i].u.port.start, |
| configdata->descr[i].u.port.length); |
| break; |
| case CmResourceTypeInterrupt: |
| printf("Irq: level(%d) vector(%d) ", |
| configdata->descr[i].u.interrupt.level, |
| configdata->descr[i].u.interrupt.vector); |
| break; |
| case CmResourceTypeMemory: |
| printf("Memory: %p-size:%d ", |
| (uintptr_t)configdata->descr[i].u.port.start, |
| configdata->descr[i].u.port.length); |
| break; |
| default: |
| break; |
| } |
| } |
| free(configdata); |
| } |
| /** Print information about component */ |
| static void arc_print_component(arc_component *c) |
| { |
| unsigned int i; |
| printf("%s: ",ctypes[c->type]); |
| for (i = 0; i < c->identifier_len; i++) |
| printf("%c", c->identifier[i]); |
| printf(" "); |
| arc_print_confdata(c); |
| printf("\n"); |
| } |
| /** |
| * Read from ARC bios configuration data and print it |
| */ |
| static int cmd_arc_print_devices(cmd_arg_t *argv) |
| { |
| arc_component *c, *next; |
| c = arc_entry->getchild(NULL); |
| while (c) { |
| arc_print_component(c); |
| next = arc_entry->getchild(c); |
| while (!next) { |
| next = arc_entry->getpeer(c); |
| if (!next) |
| c = arc_entry->getparent(c); |
| if (!c) |
| return 0; |
| } |
| c = next; |
| } |
| return 1; |
| } |
| static cmd_info_t devlist_info = { |
| .name = "arcdevlist", |
| .description = "Print arc device list", |
| .func = cmd_arc_print_devices, |
| .argc = 0 |
| }; |
| /** Read from arc bios memory map and print it |
| * |
| */ |
| void physmem_print(void) |
| { |
| printf("Base Size Type\n"); |
| printf("---------- ---------- ---------\n"); |
| if (arc_enabled()) { |
| arc_memdescriptor_t *desc = arc_entry->getmemorydescriptor(NULL); |
| while (desc) { |
| printf("%#10x %#10x %s\n", |
| desc->basepage * ARC_FRAME, desc->basecount * ARC_FRAME, |
| basetypes[desc->type]); |
| desc = arc_entry->getmemorydescriptor(desc); |
| } |
| } else |
| printf("%#10x %#10x free\n", 0, CONFIG_MEMORY_SIZE); |
| } |
| /** Print charactor to console */ |
| static void arc_putchar(char ch) |
| { |
| uint32_t cnt; |
| ipl_t ipl; |
| /* TODO: Should be spinlock? */ |
| ipl = interrupts_disable(); |
| arc_entry->write(1, &ch, 1, &cnt); |
| interrupts_restore(ipl); |
| } |
| /** Initialize ARC structure |
| * |
| * @return 0 - ARC OK, -1 - ARC does not exist |
| */ |
| int arc_init(void) |
| { |
| if (sbp->signature != ARC_MAGIC) { |
| sbp = NULL; |
| return -1; |
| } |
| arc_entry = sbp->firmwarevector; |
| arc_putchar('A'); |
| arc_putchar('R'); |
| arc_putchar('C'); |
| arc_putchar('\n'); |
| /* Add command for resetting the computer */ |
| cmd_initialize(&devlist_info); |
| cmd_register(&devlist_info); |
| return 0; |
| } |
| int arc_reboot(void) |
| { |
| if (arc_enabled()) { |
| arc_entry->reboot(); |
| return true; |
| } |
| return false; |
| } |
| static bool kbd_polling_enabled; |
| static chardev_t console; |
| /** Try to get character, return character or -1 if not available */ |
| static void arc_keyboard_poll(void) |
| { |
| char ch; |
| uint32_t count; |
| long result; |
| if (!kbd_polling_enabled) |
| return; |
| if (arc_entry->getreadstatus(0)) |
| return; |
| result = arc_entry->read(0, &ch, 1, &count); |
| if ((result) || (count != 1)) { |
| return; |
| } |
| if (ch == '\r') |
| ch = '\n'; |
| if (ch == 0x7f) |
| ch = '\b'; |
| chardev_push_character(&console, ch); |
| } |
| static char arc_read(chardev_t *dev) |
| { |
| char ch; |
| uint32_t count; |
| long result; |
| result = arc_entry->read(0, &ch, 1, &count); |
| if ((result) || (count != 1)) { |
| printf("Error reading from ARC keyboard.\n"); |
| cpu_halt(); |
| } |
| if (ch == '\r') |
| return '\n'; |
| if (ch == 0x7f) |
| return '\b'; |
| return ch; |
| } |
| static void arc_write(chardev_t *dev, const char ch) |
| { |
| arc_putchar(ch); |
| } |
| static void arc_enable(chardev_t *dev) |
| { |
| kbd_polling_enabled = true; |
| } |
| static void arc_disable(chardev_t *dev) |
| { |
| kbd_polling_enabled = false; |
| } |
| static chardev_operations_t arc_ops = { |
| .resume = arc_enable, |
| .suspend = arc_disable, |
| .write = arc_write, |
| .read = arc_read |
| }; |
| int arc_console(void) |
| { |
| if (arc_enabled()) { |
| kbd_polling_enabled = true; |
| chardev_initialize("arc_console", &console, &arc_ops); |
| virtual_timer_fnc = &arc_keyboard_poll; |
| stdin = &console; |
| stdout = &console; |
| return true; |
| } |
| return false; |
| } |
| /* Initialize frame zones from ARC firmware. |
| * In the future we may use even the FirmwareTemporary regions, |
| * currently we use the FreeMemory (what about the LoadedProgram?) |
| */ |
| int arc_frame_init(void) |
| { |
| if (arc_enabled()) { |
| arc_memdescriptor_t *desc; |
| uintptr_t base; |
| size_t basesize; |
| desc = arc_entry->getmemorydescriptor(NULL); |
| while (desc) { |
| if ((desc->type == FreeMemory) || |
| (desc->type == FreeContiguous)) { |
| base = desc->basepage*ARC_FRAME; |
| basesize = desc->basecount*ARC_FRAME; |
| if (base % FRAME_SIZE ) { |
| basesize -= FRAME_SIZE - (base % FRAME_SIZE); |
| base = ALIGN_UP(base, FRAME_SIZE); |
| } |
| basesize = ALIGN_DOWN(basesize, FRAME_SIZE); |
| zone_create(ADDR2PFN(base), SIZE2FRAMES(basesize), |
| ADDR2PFN(base), 0); |
| } |
| desc = arc_entry->getmemorydescriptor(desc); |
| } |
| return true; |
| } |
| return false; |
| } |
| /** @} |
| */ |
| /branches/dynload/kernel/arch/mips32/src/drivers/serial.c |
|---|
| 0,0 → 1,159 |
| /* |
| * Copyright (c) 2005 Ondrej Palkovsky |
| * All rights reserved. |
| * |
| * Redistribution and use in source and binary forms, with or without |
| * modification, are permitted provided that the following conditions |
| * are met: |
| * |
| * - Redistributions of source code must retain the above copyright |
| * notice, this list of conditions and the following disclaimer. |
| * - Redistributions in binary form must reproduce the above copyright |
| * notice, this list of conditions and the following disclaimer in the |
| * documentation and/or other materials provided with the distribution. |
| * - The name of the author may not be used to endorse or promote products |
| * derived from this software without specific prior written permission. |
| * |
| * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
| * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
| * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
| * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
| * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
| * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
| * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
| * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
| * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
| * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
| */ |
| /** @addtogroup mips32 |
| * @{ |
| */ |
| /** @file |
| */ |
| #include <interrupt.h> |
| #include <arch/cp0.h> |
| #include <ipc/irq.h> |
| #include <arch/drivers/serial.h> |
| #include <console/chardev.h> |
| #include <console/console.h> |
| #define SERIAL_IRQ 2 |
| static irq_t serial_irq; |
| static chardev_t console; |
| static serial_t sconf[SERIAL_MAX]; |
| static bool kb_enabled; |
| static void serial_write(chardev_t *d, const char ch) |
| { |
| serial_t *sd = (serial_t *)d->data; |
| if (ch == '\n') |
| serial_write(d, '\r'); |
| /* Wait until transmit buffer empty */ |
| while (! (SERIAL_READ_LSR(sd->port) & (1<<TRANSMIT_EMPTY_BIT))) |
| ; |
| SERIAL_WRITE(sd->port, ch); |
| } |
| static void serial_enable(chardev_t *d) |
| { |
| kb_enabled = true; |
| } |
| static void serial_disable(chardev_t *d) |
| { |
| kb_enabled = false; |
| } |
| int serial_init(void) |
| { |
| int i = 0; |
| if (SERIAL_READ_LSR(SERIAL_COM1) == 0x60) { |
| sconf[i].port = SERIAL_COM1; |
| sconf[i].irq = SERIAL_COM1_IRQ; |
| /* Enable interrupt on available data */ |
| i++; |
| } |
| return i; |
| } |
| /** Read character from serial port, wait until available */ |
| static char serial_do_read(chardev_t *dev) |
| { |
| serial_t *sd = (serial_t *)dev->data; |
| char ch; |
| while (!(SERIAL_READ_LSR(sd->port) & 1)) |
| ; |
| ch = SERIAL_READ(sd->port); |
| if (ch =='\r') |
| ch = '\n'; |
| return ch; |
| } |
| static void serial_handler(void) |
| { |
| serial_t *sd = (serial_t *) console.data; |
| char ch; |
| if (!(SERIAL_READ_LSR(sd->port) & 1)) |
| return; |
| ch = SERIAL_READ(sd->port); |
| if (ch =='\r') |
| ch = '\n'; |
| chardev_push_character(&console, ch); |
| } |
| /** Process keyboard interrupt. Does not work in simics? */ |
| static void serial_irq_handler(irq_t *irq, void *arg, ...) |
| { |
| if ((irq->notif_cfg.notify) && (irq->notif_cfg.answerbox)) |
| ipc_irq_send_notif(irq); |
| else |
| serial_handler(); |
| } |
| static irq_ownership_t serial_claim(void) |
| { |
| return IRQ_ACCEPT; |
| } |
| static chardev_operations_t serial_ops = { |
| .resume = serial_enable, |
| .suspend = serial_disable, |
| .write = serial_write, |
| .read = serial_do_read |
| }; |
| void serial_console(devno_t devno) |
| { |
| serial_t *sd = &sconf[0]; |
| chardev_initialize("serial_console", &console, &serial_ops); |
| console.data = sd; |
| kb_enabled = true; |
| irq_initialize(&serial_irq); |
| serial_irq.devno = devno; |
| serial_irq.inr = SERIAL_IRQ; |
| serial_irq.claim = serial_claim; |
| serial_irq.handler = serial_irq_handler; |
| irq_register(&serial_irq); |
| /* I don't know why, but the serial interrupts simply |
| * don't work on simics |
| */ |
| virtual_timer_fnc = &serial_handler; |
| stdin = &console; |
| stdout = &console; |
| } |
| /** @} |
| */ |
| /branches/dynload/kernel/arch/mips32/src/drivers/msim.c |
|---|
| 0,0 → 1,164 |
| /* |
| * Copyright (c) 2005 Ondrej Palkovsky |
| * All rights reserved. |
| * |
| * Redistribution and use in source and binary forms, with or without |
| * modification, are permitted provided that the following conditions |
| * are met: |
| * |
| * - Redistributions of source code must retain the above copyright |
| * notice, this list of conditions and the following disclaimer. |
| * - Redistributions in binary form must reproduce the above copyright |
| * notice, this list of conditions and the following disclaimer in the |
| * documentation and/or other materials provided with the distribution. |
| * - The name of the author may not be used to endorse or promote products |
| * derived from this software without specific prior written permission. |
| * |
| * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
| * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
| * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
| * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
| * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
| * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
| * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
| * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
| * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
| * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
| */ |
| /** @addtogroup mips32 |
| * @{ |
| */ |
| /** @file |
| */ |
| #include <interrupt.h> |
| #include <ipc/irq.h> |
| #include <console/chardev.h> |
| #include <arch/drivers/msim.h> |
| #include <arch/cp0.h> |
| #include <console/console.h> |
| #include <sysinfo/sysinfo.h> |
| /** Address of devices. */ |
| #define MSIM_VIDEORAM 0xB0000000 |
| #define MSIM_KBD_ADDRESS 0xB0000000 |
| #define MSIM_KBD_IRQ 2 |
| static chardev_t console; |
| static irq_t msim_irq; |
| static void msim_write(chardev_t *dev, const char ch); |
| static void msim_enable(chardev_t *dev); |
| static void msim_disable(chardev_t *dev); |
| static char msim_do_read(chardev_t *dev); |
| static chardev_operations_t msim_ops = { |
| .resume = msim_enable, |
| .suspend = msim_disable, |
| .write = msim_write, |
| .read = msim_do_read, |
| }; |
| /** Putchar that works with MSIM & gxemul */ |
| void msim_write(chardev_t *dev, const char ch) |
| { |
| *((char *) MSIM_VIDEORAM) = ch; |
| } |
| /* Called from getc(). */ |
| void msim_enable(chardev_t *dev) |
| { |
| cp0_unmask_int(MSIM_KBD_IRQ); |
| } |
| /* Called from getc(). */ |
| void msim_disable(chardev_t *dev) |
| { |
| cp0_mask_int(MSIM_KBD_IRQ); |
| } |
| #include <print.h> |
| /** Read character using polling, assume interrupts disabled */ |
| static char msim_do_read(chardev_t *dev) |
| { |
| char ch; |
| while (1) { |
| ch = *((volatile char *) MSIM_KBD_ADDRESS); |
| if (ch) { |
| if (ch == '\r') |
| return '\n'; |
| if (ch == 0x7f) |
| return '\b'; |
| return ch; |
| } |
| } |
| } |
| /** Process keyboard interrupt. */ |
| static void msim_irq_handler(irq_t *irq, void *arg, ...) |
| { |
| if ((irq->notif_cfg.notify) && (irq->notif_cfg.answerbox)) |
| ipc_irq_send_notif(irq); |
| else { |
| char ch = 0; |
| ch = *((char *) MSIM_KBD_ADDRESS); |
| if (ch =='\r') |
| ch = '\n'; |
| if (ch == 0x7f) |
| ch = '\b'; |
| chardev_push_character(&console, ch); |
| } |
| } |
| static irq_ownership_t msim_claim(void) |
| { |
| return IRQ_ACCEPT; |
| } |
| void msim_kbd_grab(void) |
| { |
| ipl_t ipl = interrupts_disable(); |
| spinlock_lock(&msim_irq.lock); |
| msim_irq.notif_cfg.notify = false; |
| spinlock_unlock(&msim_irq.lock); |
| interrupts_restore(ipl); |
| } |
| void msim_kbd_release(void) |
| { |
| ipl_t ipl = interrupts_disable(); |
| spinlock_lock(&msim_irq.lock); |
| if (msim_irq.notif_cfg.answerbox) |
| msim_irq.notif_cfg.notify = true; |
| spinlock_unlock(&msim_irq.lock); |
| interrupts_restore(ipl); |
| } |
| /* Return console object representing msim console */ |
| void msim_console(devno_t devno) |
| { |
| chardev_initialize("msim_console", &console, &msim_ops); |
| stdin = &console; |
| stdout = &console; |
| irq_initialize(&msim_irq); |
| msim_irq.devno = devno; |
| msim_irq.inr = MSIM_KBD_IRQ; |
| msim_irq.claim = msim_claim; |
| msim_irq.handler = msim_irq_handler; |
| irq_register(&msim_irq); |
| cp0_unmask_int(MSIM_KBD_IRQ); |
| sysinfo_set_item_val("kbd", NULL, true); |
| sysinfo_set_item_val("kbd.devno", NULL, devno); |
| sysinfo_set_item_val("kbd.inr", NULL, MSIM_KBD_IRQ); |
| sysinfo_set_item_val("kbd.address.virtual", NULL, MSIM_KBD_ADDRESS); |
| } |
| /** @} |
| */ |