Subversion Repositories HelenOS

Rev

Rev 3766 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3766 Rev 3844
1
/*
1
/*
2
 * Copyright (c) 2005 Jakub Jermar
2
 * Copyright (c) 2005 Jakub Jermar
3
 * All rights reserved.
3
 * All rights reserved.
4
 *
4
 *
5
 * Redistribution and use in source and binary forms, with or without
5
 * Redistribution and use in source and binary forms, with or without
6
 * modification, are permitted provided that the following conditions
6
 * modification, are permitted provided that the following conditions
7
 * are met:
7
 * are met:
8
 *
8
 *
9
 * - Redistributions of source code must retain the above copyright
9
 * - Redistributions of source code must retain the above copyright
10
 *   notice, this list of conditions and the following disclaimer.
10
 *   notice, this list of conditions and the following disclaimer.
11
 * - Redistributions in binary form must reproduce the above copyright
11
 * - Redistributions in binary form must reproduce the above copyright
12
 *   notice, this list of conditions and the following disclaimer in the
12
 *   notice, this list of conditions and the following disclaimer in the
13
 *   documentation and/or other materials provided with the distribution.
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
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.
15
 *   derived from this software without specific prior written permission.
16
 *
16
 *
17
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
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
18
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
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
23
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
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
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.
26
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27
 */
27
 */
28
 
28
 
29
/** @addtogroup ia64   
29
/** @addtogroup ia64   
30
 * @{
30
 * @{
31
 */
31
 */
32
/** @file
32
/** @file
33
 */
33
 */
34
 
34
 
35
#include <arch/ski/ski.h>
35
#include <arch/ski/ski.h>
36
#include <console/console.h>
36
#include <console/console.h>
37
#include <console/chardev.h>
37
#include <console/chardev.h>
38
#include <arch/interrupt.h>
38
#include <arch/interrupt.h>
39
#include <sysinfo/sysinfo.h>
39
#include <sysinfo/sysinfo.h>
40
#include <arch/types.h>
40
#include <arch/types.h>
41
#include <ddi/device.h>
41
#include <ddi/device.h>
42
#include <ddi/irq.h>
42
#include <ddi/irq.h>
43
#include <ipc/irq.h>
43
#include <ipc/irq.h>
44
#include <proc/thread.h>
44
#include <proc/thread.h>
45
#include <synch/spinlock.h>
45
#include <synch/spinlock.h>
46
#include <arch/asm.h>
46
#include <arch/asm.h>
47
#include <arch/drivers/kbd.h>
47
#include <arch/drivers/kbd.h>
48
 
48
 
49
#define SKI_KBD_INR 0
49
#define SKI_KBD_INR 0
50
 
50
 
51
static irq_t ski_kbd_irq;
51
static irq_t ski_kbd_irq;
52
static devno_t ski_kbd_devno;
52
static devno_t ski_kbd_devno;
53
 
53
 
54
chardev_t ski_console;
54
chardev_t ski_console;
55
chardev_t ski_uconsole;
55
chardev_t ski_uconsole;
56
 
56
 
57
static bool kbd_disabled;
57
static bool kbd_disabled;
58
 
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
59
/** Display character on debug console
63
 *
60
 *
64
 * Use SSC (Simulator System Call) to
61
 * Use SSC (Simulator System Call) to
65
 * display character on debug console.
62
 * display character on debug console.
66
 *
63
 *
67
 * @param d Character device.
64
 * @param d Character device.
68
 * @param ch Character to be printed.
65
 * @param ch Character to be printed.
69
 */
66
 */
70
void ski_putchar(chardev_t *d, const char ch)
67
static void ski_putchar(chardev_t *d, const char ch, bool silent)
71
{
68
{
-
 
69
    if (!silent) {
72
    asm volatile (
70
        asm volatile (
73
        "mov r15 = %0\n"
71
            "mov r15 = %0\n"
74
        "mov r32 = %1\n"    /* r32 is in0 */
72
            "mov r32 = %1\n"   /* r32 is in0 */
75
        "break 0x80000\n"   /* modifies r8 */
73
            "break 0x80000\n"  /* modifies r8 */
76
        :
74
            :
77
        : "i" (SKI_PUTCHAR), "r" (ch)
75
            : "i" (SKI_PUTCHAR), "r" (ch)
78
        : "r15", "in0", "r8"
76
            : "r15", "in0", "r8"
79
    );
77
        );
80
   
78
       
81
    if (ch == '\n')
79
        if (ch == '\n')
82
        ski_putchar(d, '\r');
80
            ski_putchar(d, '\r');
-
 
81
    }
83
}
82
}
84
 
83
 
85
/** Ask debug console if a key was pressed.
84
/** Ask debug console if a key was pressed.
86
 *
85
 *
87
 * Use SSC (Simulator System Call) to
86
 * Use SSC (Simulator System Call) to
88
 * get character from debug console.
87
 * get character from debug console.
89
 *
88
 *
90
 * This call is non-blocking.
89
 * This call is non-blocking.
91
 *
90
 *
92
 * @return ASCII code of pressed key or 0 if no key pressed.
91
 * @return ASCII code of pressed key or 0 if no key pressed.
93
 */
92
 */
94
int32_t ski_getchar(void)
93
static int32_t ski_getchar(void)
95
{
94
{
96
    uint64_t ch;
95
    uint64_t ch;
97
   
96
   
98
    asm volatile (
97
    asm volatile (
99
        "mov r15 = %1\n"
98
        "mov r15 = %1\n"
100
        "break 0x80000;;\n" /* modifies r8 */
99
        "break 0x80000;;\n" /* modifies r8 */
101
        "mov %0 = r8;;\n"      
100
        "mov %0 = r8;;\n"      
102
 
101
 
103
        : "=r" (ch)
102
        : "=r" (ch)
104
        : "i" (SKI_GETCHAR)
103
        : "i" (SKI_GETCHAR)
105
        : "r15", "r8"
104
        : "r15", "r8"
106
    );
105
    );
107
 
106
 
108
    return (int32_t) ch;
107
    return (int32_t) ch;
109
}
108
}
110
 
109
 
111
/**
110
/**
112
 * This is a blocking wrapper for ski_getchar().
111
 * This is a blocking wrapper for ski_getchar().
113
 * To be used when the kernel crashes.
112
 * To be used when the kernel crashes.
114
 */
113
 */
115
static char ski_getchar_blocking(chardev_t *d)
114
static char ski_getchar_blocking(chardev_t *d)
116
{
115
{
117
    int ch;
116
    int ch;
118
 
117
 
119
    while(!(ch = ski_getchar()))
118
    while(!(ch = ski_getchar()))
120
        ;
119
        ;
121
    if (ch == '\r')
120
    if (ch == '\r')
122
        ch = '\n';
121
        ch = '\n';
123
    return (char) ch;
122
    return (char) ch;
124
}
123
}
125
 
124
 
126
/** Ask keyboard if a key was pressed. */
125
/** Ask keyboard if a key was pressed. */
127
static void poll_keyboard(void)
126
static void poll_keyboard(void)
128
{
127
{
129
    char ch;
128
    char ch;
130
    static char last;
129
    static char last;
131
    ipl_t ipl;
130
    ipl_t ipl;
132
 
131
 
133
    ipl = interrupts_disable();
132
    ipl = interrupts_disable();
134
 
133
 
135
    if (kbd_disabled) {
134
    if (kbd_disabled) {
136
        interrupts_restore(ipl);
135
        interrupts_restore(ipl);
137
        return;
136
        return;
138
    }
137
    }
139
       
138
       
140
    spinlock_lock(&ski_kbd_irq.lock);
139
    spinlock_lock(&ski_kbd_irq.lock);
141
 
140
 
142
    ch = ski_getchar();
141
    ch = ski_getchar();
143
    if(ch == '\r')
142
    if(ch == '\r')
144
        ch = '\n';
143
        ch = '\n';
145
    if (ch) {
144
    if (ch) {
146
        if (ski_kbd_irq.notif_cfg.notify &&
145
        if (ski_kbd_irq.notif_cfg.notify &&
147
            ski_kbd_irq.notif_cfg.answerbox) {
146
            ski_kbd_irq.notif_cfg.answerbox) {
148
            chardev_push_character(&ski_uconsole, ch);
147
            chardev_push_character(&ski_uconsole, ch);
149
            ipc_irq_send_notif(&ski_kbd_irq);
148
            ipc_irq_send_notif(&ski_kbd_irq);
150
        } else {
149
        } else {
151
            chardev_push_character(&ski_console, ch);
150
            chardev_push_character(&ski_console, ch);
152
        }  
151
        }  
153
        last = ch;
152
        last = ch;
154
        spinlock_unlock(&ski_kbd_irq.lock);
153
        spinlock_unlock(&ski_kbd_irq.lock);
155
        interrupts_restore(ipl);
154
        interrupts_restore(ipl);
156
        return;
155
        return;
157
    }
156
    }
158
 
157
 
159
    if (last) {
158
    if (last) {
160
        if (ski_kbd_irq.notif_cfg.notify &&
159
        if (ski_kbd_irq.notif_cfg.notify &&
161
            ski_kbd_irq.notif_cfg.answerbox) {
160
            ski_kbd_irq.notif_cfg.answerbox) {
162
            chardev_push_character(&ski_uconsole, 0);
161
            chardev_push_character(&ski_uconsole, 0);
163
            ipc_irq_send_notif(&ski_kbd_irq);
162
            ipc_irq_send_notif(&ski_kbd_irq);
164
        }
163
        }
165
        last = 0;
164
        last = 0;
166
    }
165
    }
167
 
166
 
168
    spinlock_unlock(&ski_kbd_irq.lock);
167
    spinlock_unlock(&ski_kbd_irq.lock);
169
    interrupts_restore(ipl);
168
    interrupts_restore(ipl);
170
}
169
}
171
 
170
 
172
/* Called from getc(). */
171
/* Called from getc(). */
173
static void ski_kbd_enable(chardev_t *d)
172
static void ski_kbd_enable(chardev_t *d)
174
{
173
{
175
    kbd_disabled = false;
174
    kbd_disabled = false;
176
}
175
}
177
 
176
 
178
/* Called from getc(). */
177
/* Called from getc(). */
179
static void ski_kbd_disable(chardev_t *d)
178
static void ski_kbd_disable(chardev_t *d)
180
{
179
{
181
    kbd_disabled = true;   
180
    kbd_disabled = true;   
182
}
181
}
183
 
182
 
184
/** Decline to service hardware IRQ.
183
/** Decline to service hardware IRQ.
185
 *
184
 *
186
 * This is only a virtual IRQ, so always decline.
185
 * This is only a virtual IRQ, so always decline.
187
 *
186
 *
188
 * @return Always IRQ_DECLINE.
187
 * @return Always IRQ_DECLINE.
189
 */
188
 */
190
static irq_ownership_t ski_kbd_claim(void)
189
static irq_ownership_t ski_kbd_claim(void)
191
{
190
{
192
    return IRQ_DECLINE;
191
    return IRQ_DECLINE;
193
}
192
}
194
 
193
 
195
static chardev_operations_t ski_ops = {
194
static chardev_operations_t ski_ops = {
196
    .resume = ski_kbd_enable,
195
    .resume = ski_kbd_enable,
197
    .suspend = ski_kbd_disable,
196
    .suspend = ski_kbd_disable,
198
    .write = ski_putchar,
197
    .write = ski_putchar,
199
    .read = ski_getchar_blocking
198
    .read = ski_getchar_blocking
200
};
199
};
201
 
200
 
202
/** Initialize debug console
201
/** Initialize debug console
203
 *
202
 *
204
 * Issue SSC (Simulator System Call) to
203
 * Issue SSC (Simulator System Call) to
205
 * to open debug console.
204
 * to open debug console.
206
 */
205
 */
207
void ski_init_console(void)
206
void ski_init_console(void)
208
{
207
{
209
    asm volatile (
208
    asm volatile (
210
        "mov r15 = %0\n"
209
        "mov r15 = %0\n"
211
        "break 0x80000\n"
210
        "break 0x80000\n"
212
        :
211
        :
213
        : "i" (SKI_INIT_CONSOLE)
212
        : "i" (SKI_INIT_CONSOLE)
214
        : "r15", "r8"
213
        : "r15", "r8"
215
    );
214
    );
216
 
215
 
217
    chardev_initialize("ski_console", &ski_console, &ski_ops);
216
    chardev_initialize("ski_console", &ski_console, &ski_ops);
218
    chardev_initialize("ski_uconsole", &ski_uconsole, &ski_ops);
217
    chardev_initialize("ski_uconsole", &ski_uconsole, &ski_ops);
219
    stdin = &ski_console;
218
    stdin = &ski_console;
220
    stdout = &ski_console;
219
    stdout = &ski_console;
221
 
220
 
222
    ski_kbd_devno = device_assign_devno();
221
    ski_kbd_devno = device_assign_devno();
223
   
222
   
224
    irq_initialize(&ski_kbd_irq);
223
    irq_initialize(&ski_kbd_irq);
225
    ski_kbd_irq.inr = SKI_KBD_INR;
224
    ski_kbd_irq.inr = SKI_KBD_INR;
226
    ski_kbd_irq.devno = ski_kbd_devno;
225
    ski_kbd_irq.devno = ski_kbd_devno;
227
    ski_kbd_irq.claim = ski_kbd_claim;
226
    ski_kbd_irq.claim = ski_kbd_claim;
228
    irq_register(&ski_kbd_irq);
227
    irq_register(&ski_kbd_irq);
229
 
228
 
230
    sysinfo_set_item_val("kbd", NULL, true);
229
    sysinfo_set_item_val("kbd", NULL, true);
231
    sysinfo_set_item_val("kbd.inr", NULL, SKI_KBD_INR);
230
    sysinfo_set_item_val("kbd.inr", NULL, SKI_KBD_INR);
232
    sysinfo_set_item_val("kbd.devno", NULL, ski_kbd_devno);
231
    sysinfo_set_item_val("kbd.devno", NULL, ski_kbd_devno);
233
    sysinfo_set_item_val("kbd.type", NULL, KBD_SKI);
232
    sysinfo_set_item_val("kbd.type", NULL, KBD_SKI);
234
 
233
 
235
    sysinfo_set_item_val("fb", NULL, false);
234
    sysinfo_set_item_val("fb", NULL, false);
236
}
235
}
237
 
236
 
238
void ski_kbd_grab(void)
237
void ski_kbd_grab(void)
239
{
238
{
240
    ipl_t ipl = interrupts_disable();
239
    ipl_t ipl = interrupts_disable();
241
    spinlock_lock(&ski_kbd_irq.lock);
240
    spinlock_lock(&ski_kbd_irq.lock);
242
    ski_kbd_irq.notif_cfg.notify = false;
241
    ski_kbd_irq.notif_cfg.notify = false;
243
    spinlock_unlock(&ski_kbd_irq.lock);
242
    spinlock_unlock(&ski_kbd_irq.lock);
244
    interrupts_restore(ipl);
243
    interrupts_restore(ipl);
245
}
244
}
246
 
245
 
247
void ski_kbd_release(void)
246
void ski_kbd_release(void)
248
{
247
{
249
    ipl_t ipl = interrupts_disable();
248
    ipl_t ipl = interrupts_disable();
250
    spinlock_lock(&ski_kbd_irq.lock);
249
    spinlock_lock(&ski_kbd_irq.lock);
251
    if (ski_kbd_irq.notif_cfg.answerbox)
250
    if (ski_kbd_irq.notif_cfg.answerbox)
252
        ski_kbd_irq.notif_cfg.notify = true;
251
        ski_kbd_irq.notif_cfg.notify = true;
253
    spinlock_unlock(&ski_kbd_irq.lock);
252
    spinlock_unlock(&ski_kbd_irq.lock);
254
    interrupts_restore(ipl);
253
    interrupts_restore(ipl);
255
}
254
}
256
 
255
 
257
 
256
 
258
#define POLL_INTERVAL       50000       /* 50 ms */
257
#define POLL_INTERVAL       50000       /* 50 ms */
259
 
258
 
260
/** Kernel thread for polling keyboard. */
259
/** Kernel thread for polling keyboard. */
261
void kkbdpoll(void *arg)
260
void kkbdpoll(void *arg)
262
{
261
{
263
    while (1) {
262
    while (1) {
264
        poll_keyboard();
263
        poll_keyboard();
265
        thread_usleep(POLL_INTERVAL);
264
        thread_usleep(POLL_INTERVAL);
266
    }
265
    }
267
}
266
}
268
 
267
 
269
/** @}
268
/** @}
270
 */
269
 */
271
 
270