Subversion Repositories HelenOS

Rev

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