Subversion Repositories HelenOS-historic

Rev

Rev 606 | Rev 625 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. /*
  2.  * Copyright (C) 2005 Ondrej Palkovsky
  3.  * All rights reserved.
  4.  *
  5.  * Redistribution and use in source and binary forms, with or without
  6.  * modification, are permitted provided that the following conditions
  7.  * are met:
  8.  *
  9.  * - Redistributions of source code must retain the above copyright
  10.  *   notice, this list of conditions and the following disclaimer.
  11.  * - Redistributions in binary form must reproduce the above copyright
  12.  *   notice, this list of conditions and the following disclaimer in the
  13.  *   documentation and/or other materials provided with the distribution.
  14.  * - The name of the author may not be used to endorse or promote products
  15.  *   derived from this software without specific prior written permission.
  16.  *
  17.  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  18.  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  19.  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  20.  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  21.  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  22.  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  23.  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  24.  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  25.  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  26.  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  27.  */
  28.  
  29. #include <arch/drivers/arc.h>
  30. #include <arch/mm/page.h>
  31. #include <print.h>
  32. #include <arch.h>
  33. #include <arch/byteorder.h>
  34. #include <arch/mm/frame.h>
  35. #include <mm/frame.h>
  36. #include <interrupt.h>
  37. #include <align.h>
  38. #include <console/console.h>
  39.  
  40. /* This is a good joke, SGI HAS different types than NT bioses... */
  41. /* Here is the SGI type */
  42. static char *basetypes[] = {
  43.     "ExceptionBlock",
  44.     "SystemParameterBlock",
  45.     "FreeContiguous",
  46.     "FreeMemory",
  47.     "BadMemory",
  48.     "LoadedProgram",
  49.     "FirmwareTemporary",
  50.     "FirmwarePermanent"
  51. };
  52.  
  53. static char *ctypes[] = {
  54.     "ARC_type",
  55.     "CPU_type",
  56.     "FPU_type",
  57.     "PrimaryICache",
  58.     "PrimaryDCache",
  59.     "SecondaryICache",
  60.     "SecondaryDCache",
  61.     "SecondaryCache",
  62.     "Memory",
  63.     "EISAAdapter",
  64.     "TCAdapter",
  65.     "SCSIAdapter",
  66.     "DTIAdapter",
  67.     "MultiFunctionAdapter",
  68.     "DiskController",
  69.     "TapeController",
  70.     "CDROMController",
  71.     "WORMController",
  72.     "SerialController",
  73.     "NetworkController",
  74.     "DisplayController",
  75.     "ParallelController",
  76.     "PointerController",
  77.     "KeyboardController",
  78.     "AudioController",
  79.     "OtherController",
  80.     "DiskPeripheral",
  81.     "FloppyDiskPeripheral",
  82.     "TapePeripheral",
  83.     "ModemPeripheral",
  84.     "MonitorPeripheral",
  85.     "PrinterPeripheral",
  86.     "PointerPeripheral",
  87.     "KeyboardPeripheral",
  88.     "TerminalPeripheral",
  89.     "OtherPeripheral",
  90.     "LinePeripheral",
  91.     "NetworkPeripheral"
  92.     "OtherPeripheral",
  93.     "XTalkAdapter",
  94.     "PCIAdapter",
  95.     "GIOAdapter",
  96.     "TPUAdapter",
  97.     "Anonymous"
  98. };
  99.  
  100. static arc_sbp *sbp = (arc_sbp *)PA2KA(0x1000);
  101. static arc_func_vector_t *arc_entry;
  102.  
  103.  
  104. static void arc_putchar(char ch);
  105.  
  106. /** Return true if ARC is available */
  107. int arc_enabled(void)
  108. {
  109.     return sbp != NULL;
  110. }
  111.  
  112. static void arc_print_component(arc_component *c)
  113. {
  114.     int i;
  115.  
  116.     printf("%s: ",ctypes[c->type]);
  117.     for (i=0;i < c->identifier_len;i++)
  118.         arc_putchar(c->identifier[i]);
  119.     arc_putchar('\n');
  120. }
  121.  
  122. void arc_print_devices(void)
  123. {
  124.     arc_component *c,*next;
  125.  
  126.     if (!arc_enabled())
  127.         return;
  128.  
  129.     c = arc_entry->getchild(NULL);
  130.     while (c) {
  131.         arc_print_component(c);
  132.         next = arc_entry->getchild(c);
  133.         while (!next) {
  134.             next = arc_entry->getpeer(c);
  135.             if (!next)
  136.                 c = arc_entry->getparent(c);
  137.             if (!c)
  138.                 return;
  139.         }
  140.         c = next;
  141.     }
  142. }
  143.  
  144. void arc_print_memory_map(void)
  145. {
  146.     arc_memdescriptor_t *desc;
  147.  
  148.     if (!arc_enabled())
  149.         return;
  150.  
  151.     printf("Memory map:\n");
  152.  
  153.     desc = arc_entry->getmemorydescriptor(NULL);
  154.     while (desc) {
  155.         printf("%s: %d (size: %dKB)\n",basetypes[desc->type],
  156.                desc->basepage * ARC_FRAME,
  157.                desc->basecount*ARC_FRAME/1024);
  158.         desc = arc_entry->getmemorydescriptor(desc);
  159.     }
  160. }
  161.  
  162. /** Print charactor to console */
  163. static void arc_putchar(char ch)
  164. {
  165.     __u32 cnt;
  166.     ipl_t ipl;
  167.  
  168.     /* TODO: Should be spinlock? */
  169.     ipl = interrupts_disable();
  170.     arc_entry->write(1, &ch, 1, &cnt);
  171.     interrupts_restore(ipl);
  172.    
  173. }
  174.  
  175. /** Initialize ARC structure
  176.  *
  177.  * @return 0 - ARC OK, -1 - ARC does not exist
  178.  */
  179. int arc_init(void)
  180. {
  181.     if (sbp->signature != ARC_MAGIC) {
  182.         sbp = NULL;
  183.         return -1;
  184.     }
  185.     arc_entry = sbp->firmwarevector;
  186.  
  187.     arc_putchar('A');
  188.     arc_putchar('R');
  189.     arc_putchar('C');
  190.     arc_putchar('\n');
  191. }
  192.  
  193. static bool kbd_polling_enabled;
  194. static chardev_t console;
  195.  
  196. /** Try to get character, return character or -1 if not available */
  197. static void arc_keyboard_poll(void)
  198. {
  199.     char ch;
  200.     __u32 count;
  201.     long result;
  202.    
  203.     if (! kbd_polling_enabled)
  204.         return;
  205.  
  206.     if (arc_entry->getreadstatus(0))
  207.         return;
  208.     result = arc_entry->read(0, &ch, 1, &count);
  209.     if (result || count!=1) {
  210.         return;
  211.     }
  212.     if (ch == '\r')
  213.         ch = '\n';
  214.     if (ch == 0x7f)
  215.         ch = '\b';
  216.    
  217.     chardev_push_character(&console, ch);
  218. }
  219.  
  220. static char arc_read(chardev_t *dev)
  221. {
  222.     char ch;
  223.     __u32 count;
  224.     long result;
  225.  
  226.     result = arc_entry->read(0, &ch, 1, &count);
  227.     if (result || count!=1) {
  228.         printf("Error reading from ARC keyboard.\n");
  229.         cpu_halt();
  230.     }
  231.     if (ch == '\r')
  232.         return '\n';
  233.     if (ch == 0x7f)
  234.         return '\b';
  235.     return ch;
  236. }
  237.  
  238. static void arc_write(chardev_t *dev, const char ch)
  239. {
  240.     arc_putchar(ch);
  241. }
  242.  
  243. static void arc_enable(chardev_t *dev)
  244. {
  245.     kbd_polling_enabled = true;
  246. }
  247.  
  248. static void arc_disable(chardev_t *dev)
  249. {
  250.     kbd_polling_enabled = false;
  251. }
  252.  
  253. static chardev_operations_t arc_ops = {
  254.     .resume = arc_enable,
  255.     .suspend = arc_disable,
  256.     .write = arc_write,
  257.     .read = arc_read
  258. };
  259.  
  260. iroutine old_timer;
  261. /** Do polling on timer interrupt */
  262. static void timer_replace(int n, void *stack)
  263. {
  264.     arc_keyboard_poll();
  265.     old_timer(n, stack);
  266.     arc_keyboard_poll();
  267. }
  268.  
  269. void arc_console(void)
  270. {
  271.     kbd_polling_enabled = true;
  272.    
  273.     chardev_initialize("arc_console", &console, &arc_ops);
  274.     old_timer = int_register(TIMER_IRQ, "arc_kb_poll", timer_replace);
  275.     stdin = &console;
  276.     stdout = &console;
  277. }
  278.  
  279. /* Initialize frame zones from ARC firmware.
  280.  * In the future we may use even the FirmwareTemporary regions,
  281.  * currently we use the FreeMemory (what about the LoadedProgram?)
  282.  */
  283. void arc_frame_init(void)
  284. {
  285.     arc_memdescriptor_t *desc;
  286.     int total = 0;
  287.     __address base;
  288.     size_t basesize;
  289.     unsigned int i,j;
  290.  
  291.     desc = arc_entry->getmemorydescriptor(NULL);
  292.     while (desc) {
  293.         if (desc->type == FreeMemory ||
  294.             desc->type == FreeContiguous) {
  295.             base = desc->basepage*ARC_FRAME;
  296.             basesize = desc->basecount*ARC_FRAME;
  297.  
  298.             if (base % FRAME_SIZE ) {
  299.                 basesize -= FRAME_SIZE - (base % FRAME_SIZE);
  300.                 base = ALIGN_UP(base, FRAME_SIZE);
  301.             }
  302.             basesize = ALIGN_DOWN(basesize, FRAME_SIZE);
  303.  
  304.             total += basesize;
  305.             zone_create_in_region(base, basesize);
  306.         }
  307.         desc = arc_entry->getmemorydescriptor(desc);
  308.     }
  309.  
  310.     config.memory_size = total;
  311. }
  312.  
  313.