Subversion Repositories HelenOS

Rev

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

  1. /*
  2.  * Copyright (c) 2005 Jakub Jermar
  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. /** @addtogroup ia64
  30.  * @{
  31.  */
  32. /** @file
  33.  */
  34.  
  35. #include <arch.h>
  36. #include <arch/ski/ski.h>
  37. #include <arch/drivers/it.h>
  38. #include <arch/interrupt.h>
  39. #include <arch/barrier.h>
  40. #include <arch/asm.h>
  41. #include <arch/register.h>
  42. #include <arch/types.h>
  43. #include <arch/context.h>
  44. #include <arch/stack.h>
  45. #include <arch/mm/page.h>
  46. #include <mm/as.h>
  47. #include <config.h>
  48. #include <userspace.h>
  49. #include <console/console.h>
  50. #include <proc/uarg.h>
  51. #include <syscall/syscall.h>
  52. #include <ddi/irq.h>
  53. #include <ddi/device.h>
  54. #include <arch/bootinfo.h>
  55. #include <genarch/drivers/legacy/ia32/io.h>
  56. #include <genarch/drivers/ega/ega.h>
  57. #include <genarch/kbrd/kbrd.h>
  58. #include <genarch/drivers/i8042/i8042.h>
  59. #include <genarch/kbd/ns16550.h>
  60. #include <smp/smp.h>
  61. #include <smp/ipi.h>
  62. #include <arch/atomic.h>
  63. #include <panic.h>
  64. #include <print.h>
  65. #include <sysinfo/sysinfo.h>
  66. #include <string.h>
  67.  
  68. /* NS16550 as a COM 1 */
  69. #define NS16550_IRQ (4 + LEGACY_INTERRUPT_BASE)
  70.  
  71. bootinfo_t *bootinfo;
  72.  
  73. static uint64_t iosapic_base = 0xfec00000;
  74.  
  75. /** Performs ia64-specific initialization before main_bsp() is called. */
  76. void arch_pre_main(void)
  77. {
  78.     /* Setup usermode init tasks. */
  79.  
  80.     unsigned int i;
  81.    
  82.     init.cnt = bootinfo->taskmap.count;
  83.    
  84.     for (i = 0; i < init.cnt; i++) {
  85.         init.tasks[i].addr =
  86.             ((unsigned long) bootinfo->taskmap.tasks[i].addr) |
  87.             VRN_MASK;
  88.         init.tasks[i].size = bootinfo->taskmap.tasks[i].size;
  89.         strncpy(init.tasks[i].name, bootinfo->taskmap.tasks[i].name,
  90.             CONFIG_TASK_NAME_BUFLEN);
  91.     }
  92. }
  93.  
  94. void arch_pre_mm_init(void)
  95. {
  96.     /*
  97.      * Set Interruption Vector Address (i.e. location of interruption vector
  98.      * table).
  99.      */
  100.     iva_write((uintptr_t) &ivt);
  101.     srlz_d();
  102.    
  103. }
  104.  
  105. static void iosapic_init(void)
  106. {
  107.     uint64_t IOSAPIC = PA2KA((unative_t)(iosapic_base)) | FW_OFFSET;
  108.     int i;
  109.    
  110.     int myid, myeid;
  111.    
  112.     myid = ia64_get_cpu_id();
  113.     myeid = ia64_get_cpu_eid();
  114.  
  115.     for (i = 0; i < 16; i++) {
  116.         if (i == 2)
  117.             continue;    /* Disable Cascade interrupt */
  118.         ((uint32_t *)(IOSAPIC + 0x00))[0] = 0x10 + 2 * i;
  119.         srlz_d();
  120.         ((uint32_t *)(IOSAPIC + 0x10))[0] = LEGACY_INTERRUPT_BASE + i;
  121.         srlz_d();
  122.         ((uint32_t *)(IOSAPIC + 0x00))[0] = 0x10 + 2 * i + 1;
  123.         srlz_d();
  124.         ((uint32_t *)(IOSAPIC + 0x10))[0] = myid << (56 - 32) |
  125.             myeid << (48 - 32);
  126.         srlz_d();
  127.     }
  128.  
  129. }
  130.  
  131.  
  132. void arch_post_mm_init(void)
  133. {
  134.     if (config.cpu_active == 1) {
  135.         iosapic_init();
  136.         irq_init(INR_COUNT, INR_COUNT);
  137. #ifdef SKI
  138.         ski_init_console();
  139. #else
  140.         ega_init(EGA_BASE, EGA_VIDEORAM);
  141. #endif
  142.     }
  143.     it_init();
  144.        
  145. }
  146.  
  147. void arch_post_cpu_init(void)
  148. {
  149. }
  150.  
  151. void arch_pre_smp_init(void)
  152. {
  153. }
  154.  
  155. void arch_post_smp_init(void)
  156. {
  157.     /*
  158.      * Create thread that polls keyboard.
  159.      */
  160. #ifdef SKI
  161.     thread_t *t = thread_create(kkbdpoll, NULL, TASK, 0, "kkbdpoll", true);
  162.     if (!t)
  163.         panic("Cannot create kkbdpoll.");
  164.     thread_ready(t);
  165. #endif     
  166.  
  167. #ifdef I460GX
  168.     devno_t devno = device_assign_devno();
  169.     inr_t inr;
  170.  
  171. #ifdef CONFIG_NS16550
  172.     inr = NS16550_IRQ;
  173.     (void) ns16550_init((ns16550_t *)NS16550_BASE, devno, inr, NULL, NULL);
  174.     sysinfo_set_item_val("kbd.type", NULL, KBD_NS16550);
  175.     sysinfo_set_item_val("kbd.address.physical", NULL,
  176.         (uintptr_t) NS16550_BASE);
  177.     sysinfo_set_item_val("kbd.address.kernel", NULL,
  178.         (uintptr_t) NS16550_BASE);
  179. #else
  180.     inr = IRQ_KBD;
  181.     kbrd_init(stdin);
  182.     (void) i8042_init((i8042_t *)I8042_BASE, devno, inr, &kbrdin);
  183.     trap_virtual_enable_irqs(1 << inr);
  184.     sysinfo_set_item_val("kbd.type", NULL, KBD_LEGACY);
  185.     sysinfo_set_item_val("kbd.address.physical", NULL,
  186.         (uintptr_t) I8042_BASE);
  187.     sysinfo_set_item_val("kbd.address.kernel", NULL,
  188.         (uintptr_t) I8042_BASE);
  189. #endif
  190.     sysinfo_set_item_val("kbd", NULL, true);
  191.     sysinfo_set_item_val("kbd.devno", NULL, devno);
  192.     sysinfo_set_item_val("kbd.inr", NULL, inr);
  193. #endif
  194.  
  195.     sysinfo_set_item_val("ia64_iospace", NULL, true);
  196.     sysinfo_set_item_val("ia64_iospace.address", NULL, true);
  197.     sysinfo_set_item_val("ia64_iospace.address.virtual", NULL, IO_OFFSET);
  198. }
  199.  
  200.  
  201. /** Enter userspace and never return. */
  202. void userspace(uspace_arg_t *kernel_uarg)
  203. {
  204.     psr_t psr;
  205.     rsc_t rsc;
  206.  
  207.     psr.value = psr_read();
  208.     psr.cpl = PL_USER;
  209.     psr.i = true;           /* start with interrupts enabled */
  210.     psr.ic = true;
  211.     psr.ri = 0;         /* start with instruction #0 */
  212.     psr.bn = 1;         /* start in bank 0 */
  213.  
  214.     asm volatile ("mov %0 = ar.rsc\n" : "=r" (rsc.value));
  215.     rsc.loadrs = 0;
  216.     rsc.be = false;
  217.     rsc.pl = PL_USER;
  218.     rsc.mode = 3;           /* eager mode */
  219.  
  220.     switch_to_userspace((uintptr_t) kernel_uarg->uspace_entry,
  221.         ((uintptr_t) kernel_uarg->uspace_stack) + PAGE_SIZE -
  222.         ALIGN_UP(STACK_ITEM_SIZE, STACK_ALIGNMENT),
  223.         ((uintptr_t) kernel_uarg->uspace_stack) + PAGE_SIZE,
  224.         (uintptr_t) kernel_uarg->uspace_uarg, psr.value, rsc.value);
  225.  
  226.     while (1)
  227.         ;
  228. }
  229.  
  230. /** Set thread-local-storage pointer.
  231.  *
  232.  * We use r13 (a.k.a. tp) for this purpose.
  233.  */
  234. unative_t sys_tls_set(unative_t addr)
  235. {
  236.         return 0;
  237. }
  238.  
  239. /** Acquire console back for kernel
  240.  *
  241.  */
  242. void arch_grab_console(void)
  243. {
  244. #ifdef SKI
  245.     ski_kbd_grab();
  246. #endif
  247. }
  248.  
  249. /** Return console to userspace
  250.  *
  251.  */
  252. void arch_release_console(void)
  253. {
  254. #ifdef SKI
  255.     ski_kbd_release();
  256. #endif
  257. }
  258.  
  259. void arch_reboot(void)
  260. {
  261.     pio_write_8((ioport8_t *)0x64, 0xfe);
  262.     while (1)
  263.         ;
  264. }
  265.  
  266. /** Construct function pointer
  267.  *
  268.  * @param fptr   function pointer structure
  269.  * @param addr   function address
  270.  * @param caller calling function address
  271.  *
  272.  * @return address of the function pointer
  273.  *
  274.  */
  275. void *arch_construct_function(fncptr_t *fptr, void *addr, void *caller)
  276. {
  277.     fptr->fnc = (unative_t) addr;
  278.     fptr->gp = ((unative_t *) caller)[1];
  279.    
  280.     return (void *) fptr;
  281. }
  282.  
  283. /** @}
  284.  */
  285.