Subversion Repositories HelenOS

Rev

Rev 2071 | Rev 2089 | 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/ski/ski.h>
  36. #include <console/console.h>
  37. #include <console/chardev.h>
  38. #include <arch/interrupt.h>
  39. #include <sysinfo/sysinfo.h>
  40. #include <arch/types.h>
  41. #include <typedefs.h>
  42. #include <ddi/device.h>
  43. #include <ddi/irq.h>
  44. #include <ipc/irq.h>
  45. #include <proc/thread.h>
  46. #include <synch/spinlock.h>
  47. #include <arch/asm.h>
  48.  
  49. #define SKI_KBD_INR 0
  50.  
  51. static irq_t ski_kbd_irq;
  52. static devno_t ski_kbd_devno;
  53.  
  54. chardev_t ski_console;
  55. chardev_t ski_uconsole;
  56.  
  57. static bool kbd_disabled;
  58.  
  59. static void ski_putchar(chardev_t *d, const char ch);
  60. static int32_t ski_getchar(void);
  61.  
  62. /** Display character on debug console
  63.  *
  64.  * Use SSC (Simulator System Call) to
  65.  * display character on debug console.
  66.  *
  67.  * @param d Character device.
  68.  * @param ch Character to be printed.
  69.  */
  70. void ski_putchar(chardev_t *d, const char ch)
  71. {
  72.     asm volatile (
  73.         "mov r15 = %0\n"
  74.         "mov r32 = %1\n"    /* r32 is in0 */
  75.         "break 0x80000\n"   /* modifies r8 */
  76.         :
  77.         : "i" (SKI_PUTCHAR), "r" (ch)
  78.         : "r15", "in0", "r8"
  79.     );
  80.    
  81.     if (ch == '\n')
  82.         ski_putchar(d, '\r');
  83. }
  84.  
  85. /** Ask debug console if a key was pressed.
  86.  *
  87.  * Use SSC (Simulator System Call) to
  88.  * get character from debug console.
  89.  *
  90.  * This call is non-blocking.
  91.  *
  92.  * @return ASCII code of pressed key or 0 if no key pressed.
  93.  */
  94. int32_t ski_getchar(void)
  95. {
  96.     uint64_t ch;
  97.    
  98.     asm volatile (
  99.         "mov r15 = %1\n"
  100.         "break 0x80000;;\n" /* modifies r8 */
  101.         "mov %0 = r8;;\n"      
  102.  
  103.         : "=r" (ch)
  104.         : "i" (SKI_GETCHAR)
  105.         : "r15", "r8"
  106.     );
  107.  
  108.     return (int32_t) ch;
  109. }
  110.  
  111. /**
  112.  * This is a blocking wrapper for ski_getchar().
  113.  * To be used when the kernel crashes.
  114.  */
  115. static char ski_getchar_blocking(chardev_t *d)
  116. {
  117.     int ch;
  118.  
  119.     while(!(ch = ski_getchar()))
  120.         ;
  121.     if(ch == '\r')
  122.         ch = '\n';
  123.     return (char) ch;
  124. }
  125.  
  126. /** Ask keyboard if a key was pressed. */
  127. static void poll_keyboard(void)
  128. {
  129.     char ch;
  130.     static char last;
  131.     ipl_t ipl;
  132.  
  133.     ipl = interrupts_disable();
  134.  
  135.     if (kbd_disabled) {
  136.         interrupts_restore(ipl);
  137.         return;
  138.     }
  139.        
  140.     spinlock_lock(&ski_kbd_irq.lock);
  141.  
  142.     ch = ski_getchar();
  143.     if(ch == '\r')
  144.         ch = '\n';
  145.     if (ch) {
  146.         if (ski_kbd_irq.notif_cfg.notify && ski_kbd_irq.notif_cfg.answerbox) {
  147.             chardev_push_character(&ski_uconsole, ch);
  148.             ipc_irq_send_notif(&ski_kbd_irq);
  149.         } else {
  150.             chardev_push_character(&ski_console, ch);
  151.         }  
  152.         last = ch;
  153.         spinlock_unlock(&ski_kbd_irq.lock);
  154.         interrupts_restore(ipl);
  155.         return;
  156.     }
  157.  
  158.     if (last) {
  159.         if (ski_kbd_irq.notif_cfg.notify && ski_kbd_irq.notif_cfg.answerbox) {
  160.             chardev_push_character(&ski_uconsole, 0);
  161.             ipc_irq_send_notif(&ski_kbd_irq);
  162.         }
  163.         last = 0;
  164.     }
  165.  
  166.     spinlock_unlock(&ski_kbd_irq.lock);
  167.     interrupts_restore(ipl);
  168. }
  169.  
  170. /* Called from getc(). */
  171. static void ski_kbd_enable(chardev_t *d)
  172. {
  173.     kbd_disabled = false;
  174. }
  175.  
  176. /* Called from getc(). */
  177. static void ski_kbd_disable(chardev_t *d)
  178. {
  179.     kbd_disabled = true;   
  180. }
  181.  
  182. /** Decline to service hardware IRQ.
  183.  *
  184.  * This is only a virtual IRQ, so always decline.
  185.  *
  186.  * @return Always IRQ_DECLINE.
  187.  */
  188. static irq_ownership_t ski_kbd_claim(void)
  189. {
  190.     return IRQ_DECLINE;
  191. }
  192.  
  193. static chardev_operations_t ski_ops = {
  194.     .resume = ski_kbd_enable,
  195.     .suspend = ski_kbd_disable,
  196.     .write = ski_putchar,
  197.     .read = ski_getchar_blocking
  198. };
  199.  
  200. /** Initialize debug console
  201.  *
  202.  * Issue SSC (Simulator System Call) to
  203.  * to open debug console.
  204.  */
  205. void ski_init_console(void)
  206. {
  207.     asm volatile (
  208.         "mov r15 = %0\n"
  209.         "break 0x80000\n"
  210.         :
  211.         : "i" (SKI_INIT_CONSOLE)
  212.         : "r15", "r8"
  213.     );
  214.  
  215.     chardev_initialize("ski_console", &ski_console, &ski_ops);
  216.     chardev_initialize("ski_uconsole", &ski_uconsole, &ski_ops);
  217.     stdin = &ski_console;
  218.     stdout = &ski_console;
  219.  
  220.     ski_kbd_devno = device_assign_devno();
  221.    
  222.     irq_initialize(&ski_kbd_irq);
  223.     ski_kbd_irq.inr = SKI_KBD_INR;
  224.     ski_kbd_irq.devno = ski_kbd_devno;
  225.     ski_kbd_irq.claim = ski_kbd_claim;
  226.     irq_register(&ski_kbd_irq);
  227.  
  228.     sysinfo_set_item_val("kbd", NULL, true);
  229.     sysinfo_set_item_val("kbd.inr", NULL, SKI_KBD_INR);
  230.     sysinfo_set_item_val("kbd.devno", NULL, ski_kbd_devno);
  231. }
  232.  
  233. void ski_kbd_grab(void)
  234. {
  235.     ipl_t ipl = interrupts_disable();
  236.     spinlock_lock(&ski_kbd_irq.lock);
  237.     ski_kbd_irq.notif_cfg.notify = false;
  238.     spinlock_unlock(&ski_kbd_irq.lock);
  239.     interrupts_restore(ipl);
  240. }
  241.  
  242. void ski_kbd_release(void)
  243. {
  244.     ipl_t ipl = interrupts_disable();
  245.     spinlock_lock(&ski_kbd_irq.lock);
  246.     if (ski_kbd_irq.notif_cfg.answerbox)
  247.         ski_kbd_irq.notif_cfg.notify = true;
  248.     spinlock_unlock(&ski_kbd_irq.lock);
  249.     interrupts_restore(ipl);
  250. }
  251.  
  252.  
  253. #define POLL_INTERVAL       50000       /* 50 ms */
  254.  
  255. /** Kernel thread for polling keyboard. */
  256. void kkbdpoll(void *arg)
  257. {
  258.     while (1) {
  259.         poll_keyboard();
  260.         thread_usleep(POLL_INTERVAL);
  261.     }
  262. }
  263.  
  264. /** @}
  265.  */
  266.