Go to most recent revision | Details | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
1 | jermar | 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 | |||
1754 | jermar | 29 | /** @addtogroup genarch |
1702 | cejka | 30 | * @{ |
31 | */ |
||
1754 | jermar | 32 | /** |
1757 | jermar | 33 | * @file |
1842 | jermar | 34 | * @brief Zilog 8530 serial port / keyboard driver. |
1702 | cejka | 35 | */ |
36 | |||
1842 | jermar | 37 | #include <genarch/kbd/z8530.h> |
1843 | jermar | 38 | #include <genarch/kbd/key.h> |
1842 | jermar | 39 | #include <genarch/kbd/scanc.h> |
40 | #include <genarch/kbd/scanc_sun.h> |
||
41 | #include <arch/drivers/z8530.h> |
||
1920 | jermar | 42 | #include <ddi/irq.h> |
1923 | jermar | 43 | #include <ipc/irq.h> |
1 | jermar | 44 | #include <arch/interrupt.h> |
1875 | jermar | 45 | #include <arch/drivers/kbd.h> |
1919 | jermar | 46 | #include <arch/drivers/fhc.h> |
1 | jermar | 47 | #include <cpu.h> |
48 | #include <arch/asm.h> |
||
49 | #include <arch.h> |
||
508 | jermar | 50 | #include <typedefs.h> |
511 | jermar | 51 | #include <console/chardev.h> |
52 | #include <console/console.h> |
||
576 | palkovsky | 53 | #include <interrupt.h> |
1875 | jermar | 54 | #include <sysinfo/sysinfo.h> |
55 | #include <print.h> |
||
1 | jermar | 56 | |
670 | vana | 57 | /* |
1842 | jermar | 58 | * These codes read from z8530 data register are silently ignored. |
895 | jermar | 59 | */ |
1842 | jermar | 60 | #define IGNORE_CODE 0x7f /* all keys up */ |
895 | jermar | 61 | |
1921 | jermar | 62 | static z8530_t z8530; /**< z8530 device structure. */ |
63 | static irq_t z8530_irq; /**< z8530's IRQ. */ |
||
64 | |||
1842 | jermar | 65 | static void z8530_suspend(chardev_t *); |
66 | static void z8530_resume(chardev_t *); |
||
511 | jermar | 67 | |
68 | static chardev_operations_t ops = { |
||
1842 | jermar | 69 | .suspend = z8530_suspend, |
70 | .resume = z8530_resume, |
||
1896 | jermar | 71 | .read = z8530_key_read |
511 | jermar | 72 | }; |
73 | |||
1923 | jermar | 74 | /** Initialize keyboard and service interrupts using kernel routine. */ |
1842 | jermar | 75 | void z8530_grab(void) |
1 | jermar | 76 | { |
1944 | jermar | 77 | ipl_t ipl = interrupts_disable(); |
78 | |||
1925 | jermar | 79 | (void) z8530_read_a(&z8530, RR8); |
80 | |||
81 | /* |
||
82 | * Clear any pending TX interrupts or we never manage |
||
83 | * to set FHC UART interrupt state to idle. |
||
84 | */ |
||
85 | z8530_write_a(&z8530, WR0, WR0_TX_IP_RST); |
||
86 | |||
87 | z8530_write_a(&z8530, WR1, WR1_IARCSC); /* interrupt on all characters */ |
||
88 | |||
89 | /* 8 bits per character and enable receiver */ |
||
90 | z8530_write_a(&z8530, WR3, WR3_RX8BITSCH | WR3_RX_ENABLE); |
||
91 | |||
92 | z8530_write_a(&z8530, WR9, WR9_MIE); /* Master Interrupt Enable. */ |
||
93 | |||
1944 | jermar | 94 | spinlock_lock(&z8530_irq.lock); |
1932 | jermar | 95 | z8530_irq.notif_cfg.notify = false; |
1944 | jermar | 96 | spinlock_unlock(&z8530_irq.lock); |
97 | interrupts_restore(ipl); |
||
1474 | palkovsky | 98 | } |
1849 | jermar | 99 | |
1923 | jermar | 100 | /** Resume the former IPC notification behavior. */ |
1842 | jermar | 101 | void z8530_release(void) |
1474 | palkovsky | 102 | { |
1944 | jermar | 103 | ipl_t ipl = interrupts_disable(); |
104 | spinlock_lock(&z8530_irq.lock); |
||
1932 | jermar | 105 | if (z8530_irq.notif_cfg.answerbox) |
106 | z8530_irq.notif_cfg.notify = true; |
||
1944 | jermar | 107 | spinlock_unlock(&z8530_irq.lock); |
108 | interrupts_restore(ipl); |
||
1474 | palkovsky | 109 | } |
670 | vana | 110 | |
1842 | jermar | 111 | /** Initialize z8530. */ |
1921 | jermar | 112 | void z8530_init(devno_t devno, inr_t inr, uintptr_t vaddr) |
1474 | palkovsky | 113 | { |
1842 | jermar | 114 | chardev_initialize("z8530_kbd", &kbrd, &ops); |
511 | jermar | 115 | stdin = &kbrd; |
1195 | jermar | 116 | |
1921 | jermar | 117 | z8530.devno = devno; |
118 | z8530.reg = (uint8_t *) vaddr; |
||
119 | |||
120 | irq_initialize(&z8530_irq); |
||
121 | z8530_irq.devno = devno; |
||
122 | z8530_irq.inr = inr; |
||
123 | z8530_irq.claim = z8530_claim; |
||
124 | z8530_irq.handler = z8530_irq_handler; |
||
125 | irq_register(&z8530_irq); |
||
126 | |||
1875 | jermar | 127 | sysinfo_set_item_val("kbd", NULL, true); |
1931 | jermar | 128 | sysinfo_set_item_val("kbd.type", NULL, KBD_Z8530); |
1921 | jermar | 129 | sysinfo_set_item_val("kbd.devno", NULL, devno); |
130 | sysinfo_set_item_val("kbd.inr", NULL, inr); |
||
131 | sysinfo_set_item_val("kbd.address.virtual", NULL, vaddr); |
||
1875 | jermar | 132 | |
1925 | jermar | 133 | z8530_grab(); |
1 | jermar | 134 | } |
135 | |||
1842 | jermar | 136 | /** Process z8530 interrupt. |
508 | jermar | 137 | * |
138 | * @param n Interrupt vector. |
||
1708 | jermar | 139 | * @param istate Interrupted state. |
508 | jermar | 140 | */ |
1849 | jermar | 141 | void z8530_interrupt(void) |
1 | jermar | 142 | { |
1849 | jermar | 143 | z8530_poll(); |
1 | jermar | 144 | } |
508 | jermar | 145 | |
511 | jermar | 146 | /* Called from getc(). */ |
1842 | jermar | 147 | void z8530_resume(chardev_t *d) |
511 | jermar | 148 | { |
149 | } |
||
150 | |||
151 | /* Called from getc(). */ |
||
1842 | jermar | 152 | void z8530_suspend(chardev_t *d) |
511 | jermar | 153 | { |
154 | } |
||
878 | vana | 155 | |
1896 | jermar | 156 | char z8530_key_read(chardev_t *d) |
878 | vana | 157 | { |
158 | char ch; |
||
159 | |||
894 | jermar | 160 | while(!(ch = active_read_buff_read())) { |
1780 | jermar | 161 | uint8_t x; |
1921 | jermar | 162 | while (!(z8530_read_a(&z8530, RR0) & RR0_RCA)) |
894 | jermar | 163 | ; |
1921 | jermar | 164 | x = z8530_read_a(&z8530, RR8); |
895 | jermar | 165 | if (x != IGNORE_CODE) { |
166 | if (x & KEY_RELEASE) |
||
167 | key_released(x ^ KEY_RELEASE); |
||
168 | else |
||
169 | active_read_key_pressed(x); |
||
170 | } |
||
878 | vana | 171 | } |
172 | return ch; |
||
173 | } |
||
895 | jermar | 174 | |
175 | /** Poll for key press and release events. |
||
176 | * |
||
177 | * This function can be used to implement keyboard polling. |
||
178 | */ |
||
1842 | jermar | 179 | void z8530_poll(void) |
895 | jermar | 180 | { |
1780 | jermar | 181 | uint8_t x; |
895 | jermar | 182 | |
1921 | jermar | 183 | while (z8530_read_a(&z8530, RR0) & RR0_RCA) { |
184 | x = z8530_read_a(&z8530, RR8); |
||
895 | jermar | 185 | if (x != IGNORE_CODE) { |
186 | if (x & KEY_RELEASE) |
||
187 | key_released(x ^ KEY_RELEASE); |
||
188 | else |
||
189 | key_pressed(x); |
||
190 | } |
||
191 | } |
||
192 | } |
||
1702 | cejka | 193 | |
1919 | jermar | 194 | irq_ownership_t z8530_claim(void) |
195 | { |
||
1921 | jermar | 196 | return (z8530_read_a(&z8530, RR0) & RR0_RCA); |
1919 | jermar | 197 | } |
198 | |||
199 | void z8530_irq_handler(irq_t *irq, void *arg, ...) |
||
200 | { |
||
201 | /* |
||
202 | * So far, we know we got this interrupt through the FHC. |
||
1923 | jermar | 203 | * Since we don't have enough documentation about the FHC |
204 | * and because the interrupt looks like level sensitive, |
||
1919 | jermar | 205 | * we cannot handle it by scheduling one of the level |
206 | * interrupt traps. Process the interrupt directly. |
||
207 | */ |
||
1932 | jermar | 208 | if (irq->notif_cfg.notify && irq->notif_cfg.answerbox) |
1923 | jermar | 209 | ipc_irq_send_notif(irq); |
210 | else |
||
1919 | jermar | 211 | z8530_interrupt(); |
212 | fhc_clear_interrupt(central_fhc, irq->inr); |
||
213 | } |
||
214 | |||
1754 | jermar | 215 | /** @} |
1702 | cejka | 216 | */ |