Subversion Repositories HelenOS

Rev

Rev 3941 | Blame | Last modification | View Log | Download | RSS feed

  1. /*
  2.  * Copyright (c) 2001-2004 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 genarch
  30.  * @{
  31.  */
  32. /**
  33.  * @file
  34.  * @brief   Zilog 8530 serial port driver.
  35.  */
  36.  
  37. #include <genarch/kbd/z8530.h>
  38. #include <genarch/kbd/key.h>
  39. #include <genarch/kbd/scanc.h>
  40. #include <genarch/kbd/scanc_sun.h>
  41. #include <arch/drivers/kbd.h>
  42. #include <console/console.h>
  43. #include <console/chardev.h>
  44. #include <sysinfo/sysinfo.h>
  45. #include <ddi/irq.h>
  46. #include <arch/asm.h>
  47. #include <mm/slab.h>
  48.  
  49. static inline void z8530_write(ioport8_t *ctl, uint8_t reg, uint8_t val)
  50. {
  51.     /*
  52.      * Registers 8-15 will automatically issue the Point High
  53.      * command as their bit 3 is 1.
  54.      */
  55.     pio_write_8(ctl, reg);  /* select register */
  56.     pio_write_8(ctl, val);  /* write value */
  57. }
  58.  
  59. static inline uint8_t z8530_read(ioport8_t *ctl, uint8_t reg)
  60. {
  61.     /*
  62.      * Registers 8-15 will automatically issue the Point High
  63.      * command as their bit 3 is 1.
  64.      */
  65.     pio_write_8(ctl, reg);  /* select register */
  66.     return pio_read_8(ctl);
  67. }
  68.  
  69. /*
  70.  * These codes read from z8530 data register are silently ignored.
  71.  */
  72. #define IGNORE_CODE 0x7f        /* all keys up */
  73.  
  74. static void z8530_suspend(chardev_t *);
  75. static void z8530_resume(chardev_t *);
  76.  
  77. static chardev_operations_t ops = {
  78.     .suspend = z8530_suspend,
  79.     .resume = z8530_resume,
  80. };
  81.  
  82. /** Initialize z8530. */
  83. bool
  84. z8530_init(z8530_t *dev, devno_t devno, inr_t inr, cir_t cir, void *cir_arg)
  85. {
  86.     z8530_instance_t *instance;
  87.  
  88.     chardev_initialize("z8530_kbd", &kbrd, &ops);
  89.     stdin = &kbrd;
  90.  
  91.     instance = malloc(sizeof(z8530_instance_t), FRAME_ATOMIC);
  92.     if (!instance)
  93.         return false;
  94.  
  95.     instance->devno = devno;
  96.     instance->z8530 = dev;
  97.  
  98.     irq_initialize(&instance->irq);
  99.     instance->irq.devno = devno;
  100.     instance->irq.inr = inr;
  101.     instance->irq.claim = z8530_claim;
  102.     instance->irq.handler = z8530_irq_handler;
  103.     instance->irq.instance = instance;
  104.     instance->irq.cir = cir;
  105.     instance->irq.cir_arg = cir_arg;
  106.     irq_register(&instance->irq);
  107.  
  108.     (void) z8530_read(&dev->ctl_a, RR8);
  109.  
  110.     /*
  111.      * Clear any pending TX interrupts or we never manage
  112.      * to set FHC UART interrupt state to idle.
  113.      */
  114.     z8530_write(&dev->ctl_a, WR0, WR0_TX_IP_RST);
  115.  
  116.     /* interrupt on all characters */
  117.     z8530_write(&dev->ctl_a, WR1, WR1_IARCSC);
  118.  
  119.     /* 8 bits per character and enable receiver */
  120.     z8530_write(&dev->ctl_a, WR3, WR3_RX8BITSCH | WR3_RX_ENABLE);
  121.    
  122.     /* Master Interrupt Enable. */
  123.     z8530_write(&dev->ctl_a, WR9, WR9_MIE);
  124.  
  125.     /*
  126.      * This is the necessary evil until the userspace drivers are entirely
  127.      * self-sufficient.
  128.      */
  129.     sysinfo_set_item_val("kbd", NULL, true);
  130.     sysinfo_set_item_val("kbd.type", NULL, KBD_Z8530);
  131.     sysinfo_set_item_val("kbd.devno", NULL, devno);
  132.     sysinfo_set_item_val("kbd.inr", NULL, inr);
  133.     sysinfo_set_item_val("kbd.address.virtual", NULL, (uintptr_t) dev);
  134.  
  135.     return true;
  136. }
  137.  
  138. /* Called from getc(). */
  139. void z8530_resume(chardev_t *d)
  140. {
  141. }
  142.  
  143. /* Called from getc(). */
  144. void z8530_suspend(chardev_t *d)
  145. {
  146. }
  147.  
  148. irq_ownership_t z8530_claim(irq_t *irq)
  149. {
  150.     z8530_instance_t *instance = irq->instance;
  151.     z8530_t *dev = instance->z8530;
  152.  
  153.     return (z8530_read(&dev->ctl_a, RR0) & RR0_RCA);
  154. }
  155.  
  156. void z8530_irq_handler(irq_t *irq)
  157. {
  158.     z8530_instance_t *instance = irq->instance;
  159.     z8530_t *dev = instance->z8530;
  160.     uint8_t x;
  161.  
  162.     if (z8530_read(&dev->ctl_a, RR0) & RR0_RCA) {
  163.         x = z8530_read(&dev->ctl_a, RR8);
  164.         if (x != IGNORE_CODE) {
  165.             if (x & KEY_RELEASE)
  166.                 key_released(x ^ KEY_RELEASE);
  167.             else
  168.                 key_pressed(x);
  169.         }
  170.     }
  171. }
  172.  
  173. /** @}
  174.  */
  175.