Subversion Repositories HelenOS

Rev

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

Rev 4055 Rev 4156
1
/*
1
/*
2
 * Copyright (c) 2003 Josef Cejka
2
 * Copyright (c) 2003 Josef Cejka
3
 * Copyright (c) 2005 Jakub Jermar
3
 * Copyright (c) 2005 Jakub Jermar
4
 * All rights reserved.
4
 * All rights reserved.
5
 *
5
 *
6
 * Redistribution and use in source and binary forms, with or without
6
 * Redistribution and use in source and binary forms, with or without
7
 * modification, are permitted provided that the following conditions
7
 * modification, are permitted provided that the following conditions
8
 * are met:
8
 * are met:
9
 *
9
 *
10
 * - Redistributions of source code must retain the above copyright
10
 * - Redistributions of source code must retain the above copyright
11
 *   notice, this list of conditions and the following disclaimer.
11
 *   notice, this list of conditions and the following disclaimer.
12
 * - Redistributions in binary form must reproduce the above copyright
12
 * - Redistributions in binary form must reproduce the above copyright
13
 *   notice, this list of conditions and the following disclaimer in the
13
 *   notice, this list of conditions and the following disclaimer in the
14
 *   documentation and/or other materials provided with the distribution.
14
 *   documentation and/or other materials provided with the distribution.
15
 * - The name of the author may not be used to endorse or promote products
15
 * - The name of the author may not be used to endorse or promote products
16
 *   derived from this software without specific prior written permission.
16
 *   derived from this software without specific prior written permission.
17
 *
17
 *
18
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28
 */
28
 */
29
 
29
 
30
/** @addtogroup genericconsole
30
/** @addtogroup genericconsole
31
 * @{
31
 * @{
32
 */
32
 */
33
/** @file
33
/** @file
34
 */
34
 */
35
 
35
 
36
#include <console/console.h>
36
#include <console/console.h>
37
#include <console/chardev.h>
37
#include <console/chardev.h>
38
#include <sysinfo/sysinfo.h>
38
#include <sysinfo/sysinfo.h>
39
#include <synch/waitq.h>
39
#include <synch/waitq.h>
40
#include <synch/spinlock.h>
40
#include <synch/spinlock.h>
41
#include <arch/types.h>
41
#include <arch/types.h>
42
#include <ddi/device.h>
-
 
43
#include <ddi/irq.h>
42
#include <ddi/irq.h>
44
#include <ddi/ddi.h>
43
#include <ddi/ddi.h>
45
#include <ipc/irq.h>
44
#include <ipc/irq.h>
46
#include <arch.h>
45
#include <arch.h>
47
#include <func.h>
46
#include <func.h>
48
#include <print.h>
47
#include <print.h>
49
#include <atomic.h>
48
#include <atomic.h>
-
 
49
#include <syscall/copy.h>
-
 
50
#include <errno.h>
50
 
51
 
51
#define KLOG_SIZE PAGE_SIZE
52
#define KLOG_SIZE PAGE_SIZE
52
#define KLOG_LATENCY 8
53
#define KLOG_LATENCY 8
53
 
54
 
54
/** Kernel log cyclic buffer */
55
/** Kernel log cyclic buffer */
55
static char klog[KLOG_SIZE] __attribute__ ((aligned (PAGE_SIZE)));
56
static char klog[KLOG_SIZE] __attribute__ ((aligned (PAGE_SIZE)));
56
 
57
 
57
/** Kernel log initialized */
58
/** Kernel log initialized */
58
static bool klog_inited = false;
59
static bool klog_inited = false;
59
/** First kernel log characters */
60
/** First kernel log characters */
60
static index_t klog_start = 0;
61
static index_t klog_start = 0;
61
/** Number of valid kernel log characters */
62
/** Number of valid kernel log characters */
62
static size_t klog_len = 0;
63
static size_t klog_len = 0;
63
/** Number of stored (not printed) kernel log characters */
64
/** Number of stored (not printed) kernel log characters */
64
static size_t klog_stored = 0;
65
static size_t klog_stored = 0;
65
/** Number of stored kernel log characters for uspace */
66
/** Number of stored kernel log characters for uspace */
66
static size_t klog_uspace = 0;
67
static size_t klog_uspace = 0;
67
 
68
 
68
/** Silence output */
69
/** Silence output */
69
bool silent = false;
70
bool silent = false;
70
 
71
 
71
/** Kernel log spinlock */
72
/** Kernel log spinlock */
72
SPINLOCK_INITIALIZE(klog_lock);
73
SPINLOCK_INITIALIZE(klog_lock);
73
 
74
 
74
/** Physical memory area used for klog buffer */
75
/** Physical memory area used for klog buffer */
75
static parea_t klog_parea;
76
static parea_t klog_parea;
76
 
77
 
77
/*
-
 
78
 * For now, we use 0 as INR.
-
 
79
 * However, it is therefore desirable to have architecture specific
-
 
80
 * definition of KLOG_VIRT_INR in the future.
-
 
81
 */
-
 
82
#define KLOG_VIRT_INR   0
-
 
83
 
-
 
84
static irq_t klog_irq;
-
 
85
 
-
 
86
static chardev_operations_t null_stdout_ops = {
-
 
87
    .suspend = NULL,
-
 
88
    .resume = NULL,
-
 
89
    .write = NULL,
-
 
90
    .read = NULL
-
 
91
};
-
 
92
 
-
 
93
chardev_t null_stdout = {
-
 
94
    .name = "null",
-
 
95
    .op = &null_stdout_ops
-
 
96
};
-
 
97
 
-
 
98
/** Allways refuse IRQ ownership.
-
 
99
 *
-
 
100
 * This is not a real IRQ, so we always decline.
-
 
101
 *
-
 
102
 * @return Always returns IRQ_DECLINE.
-
 
103
 */
-
 
104
static irq_ownership_t klog_claim(irq_t *irq)
-
 
105
{
-
 
106
    return IRQ_DECLINE;
-
 
107
}
-
 
108
 
-
 
109
static void stdin_suspend(chardev_t *d)
-
 
110
{
-
 
111
}
-
 
112
 
-
 
113
static void stdin_resume(chardev_t *d)
-
 
114
{
-
 
115
}
-
 
116
 
-
 
117
static chardev_operations_t stdin_ops = {
-
 
118
    .suspend = stdin_suspend,
-
 
119
    .resume = stdin_resume,
-
 
120
};
-
 
121
 
-
 
122
/** Standard input character device */
78
/** Standard input and output character devices */
123
static chardev_t _stdin;
-
 
124
chardev_t *stdin = NULL;
79
indev_t *stdin = NULL;
125
chardev_t *stdout = &null_stdout;
80
outdev_t *stdout = NULL;
126
 
-
 
127
void console_init(void)
-
 
128
{
-
 
129
    chardev_initialize("stdin", &_stdin, &stdin_ops);
-
 
130
    stdin = &_stdin;
-
 
131
}
-
 
132
 
81
 
133
/** Initialize kernel logging facility
82
/** Initialize kernel logging facility
134
 *
83
 *
135
 * The shared area contains kernel cyclic buffer. Userspace application may
84
 * The shared area contains kernel cyclic buffer. Userspace application may
136
 * be notified on new data with indication of position and size
85
 * be notified on new data with indication of position and size
137
 * of the data within the circular buffer.
86
 * of the data within the circular buffer.
-
 
87
 *
138
 */
88
 */
139
void klog_init(void)
89
void klog_init(void)
140
{
90
{
141
    void *faddr = (void *) KA2PA(klog);
91
    void *faddr = (void *) KA2PA(klog);
142
   
92
   
143
    ASSERT((uintptr_t) faddr % FRAME_SIZE == 0);
93
    ASSERT((uintptr_t) faddr % FRAME_SIZE == 0);
144
    ASSERT(KLOG_SIZE % FRAME_SIZE == 0);
94
    ASSERT(KLOG_SIZE % FRAME_SIZE == 0);
145
 
-
 
146
    devno_t devno = device_assign_devno();
-
 
147
   
95
   
148
    klog_parea.pbase = (uintptr_t) faddr;
96
    klog_parea.pbase = (uintptr_t) faddr;
149
    klog_parea.frames = SIZE2FRAMES(KLOG_SIZE);
97
    klog_parea.frames = SIZE2FRAMES(KLOG_SIZE);
150
    ddi_parea_register(&klog_parea);
98
    ddi_parea_register(&klog_parea);
151
 
99
   
152
    sysinfo_set_item_val("klog.faddr", NULL, (unative_t) faddr);
100
    sysinfo_set_item_val("klog.faddr", NULL, (unative_t) faddr);
153
    sysinfo_set_item_val("klog.pages", NULL, SIZE2FRAMES(KLOG_SIZE));
101
    sysinfo_set_item_val("klog.pages", NULL, SIZE2FRAMES(KLOG_SIZE));
154
    sysinfo_set_item_val("klog.devno", NULL, devno);
-
 
155
    sysinfo_set_item_val("klog.inr", NULL, KLOG_VIRT_INR);
-
 
156
 
102
   
157
    irq_initialize(&klog_irq);
103
    //irq_initialize(&klog_irq);
158
    klog_irq.devno = devno;
104
    //klog_irq.devno = devno;
159
    klog_irq.inr = KLOG_VIRT_INR;
105
    //klog_irq.inr = KLOG_VIRT_INR;
160
    klog_irq.claim = klog_claim;
106
    //klog_irq.claim = klog_claim;
161
    irq_register(&klog_irq);
107
    //irq_register(&klog_irq);
162
   
108
   
163
    spinlock_lock(&klog_lock);
109
    spinlock_lock(&klog_lock);
164
    klog_inited = true;
110
    klog_inited = true;
165
    spinlock_unlock(&klog_lock);
111
    spinlock_unlock(&klog_lock);
166
}
112
}
167
 
113
 
168
void grab_console(void)
114
void grab_console(void)
169
{
115
{
170
    silent = false;
116
    silent = false;
171
    arch_grab_console();
117
    arch_grab_console();
172
}
118
}
173
 
119
 
174
void release_console(void)
120
void release_console(void)
175
{
121
{
176
    silent = true;
122
    silent = true;
177
    arch_release_console();
123
    arch_release_console();
178
}
124
}
179
 
125
 
180
/** Get character from character device. Do not echo character.
126
/** Tell kernel to get keyboard/console access again */
-
 
127
unative_t sys_debug_enable_console(void)
181
 *
128
{
-
 
129
#ifdef CONFIG_KCONSOLE
-
 
130
    grab_console();
-
 
131
    return true;
-
 
132
#else
-
 
133
    return false;
-
 
134
#endif
-
 
135
}
-
 
136
 
-
 
137
/** Tell kernel to relinquish keyboard/console access */
-
 
138
unative_t sys_debug_disable_console(void)
-
 
139
{
-
 
140
    release_console();
-
 
141
    return true;
-
 
142
}
-
 
143
 
-
 
144
bool check_poll(indev_t *indev)
-
 
145
{
-
 
146
    if (indev == NULL)
-
 
147
        return false;
-
 
148
   
-
 
149
    if (indev->op == NULL)
-
 
150
        return false;
-
 
151
   
182
 * @param chardev Character device.
152
    return (indev->op->poll != NULL);
-
 
153
}
-
 
154
 
-
 
155
/** Get character from input character device. Do not echo character.
183
 *
156
 *
-
 
157
 * @param indev Input character device.
184
 * @return Character read.
158
 * @return Character read.
-
 
159
 *
185
 */
160
 */
186
uint8_t _getc(chardev_t *chardev)
161
uint8_t _getc(indev_t *indev)
187
{
162
{
188
    uint8_t ch;
-
 
189
    ipl_t ipl;
-
 
190
 
-
 
191
    if (atomic_get(&haltstate)) {
163
    if (atomic_get(&haltstate)) {
192
        /* If we are here, we are hopefully on the processor, that
164
        /* If we are here, we are hopefully on the processor that
193
         * issued the 'halt' command, so proceed to read the character
165
         * issued the 'halt' command, so proceed to read the character
194
         * directly from input
166
         * directly from input
195
         */
167
         */
196
        if (chardev->op->read)
168
        if (check_poll(indev))
197
            return chardev->op->read(chardev);
169
            return indev->op->poll(indev);
-
 
170
       
198
        /* no other way of interacting with user, halt */
171
        /* No other way of interacting with user */
-
 
172
        interrupts_disable();
-
 
173
       
199
        if (CPU)
174
        if (CPU)
200
            printf("cpu%u: ", CPU->id);
175
            printf("cpu%u: ", CPU->id);
201
        else
176
        else
202
            printf("cpu: ");
177
            printf("cpu: ");
203
        printf("halted (no kconsole)\n");
178
        printf("halted (no polling input)\n");
204
        cpu_halt();
179
        cpu_halt();
205
    }
180
    }
206
 
181
   
207
    waitq_sleep(&chardev->wq);
182
    waitq_sleep(&indev->wq);
208
    ipl = interrupts_disable();
183
    ipl_t ipl = interrupts_disable();
209
    spinlock_lock(&chardev->lock);
184
    spinlock_lock(&indev->lock);
210
    ch = chardev->buffer[(chardev->index - chardev->counter) % CHARDEV_BUFLEN];
185
    uint8_t ch = indev->buffer[(indev->index - indev->counter) % INDEV_BUFLEN];
211
    chardev->counter--;
186
    indev->counter--;
212
    spinlock_unlock(&chardev->lock);
187
    spinlock_unlock(&indev->lock);
213
    interrupts_restore(ipl);
188
    interrupts_restore(ipl);
214
 
-
 
215
    chardev->op->resume(chardev);
-
 
216
 
189
   
217
    return ch;
190
    return ch;
218
}
191
}
219
 
192
 
220
/** Get string from character device.
193
/** Get string from input character device.
221
 *
194
 *
222
 * Read characters from character device until first occurrence
195
 * Read characters from input character device until first occurrence
223
 * of newline character.
196
 * of newline character.
224
 *
197
 *
225
 * @param chardev Character device.
198
 * @param indev  Input character device.
226
 * @param buf Buffer where to store string terminated by '\0'.
199
 * @param buf    Buffer where to store string terminated by '\0'.
227
 * @param buflen Size of the buffer.
200
 * @param buflen Size of the buffer.
228
 *
201
 *
229
 * @return Number of characters read.
202
 * @return Number of characters read.
-
 
203
 *
230
 */
204
 */
231
count_t gets(chardev_t *chardev, char *buf, size_t buflen)
205
count_t gets(indev_t *indev, char *buf, size_t buflen)
232
{
206
{
233
    index_t index = 0;
207
    index_t index = 0;
234
    char ch;
-
 
235
   
208
   
236
    while (index < buflen) {
209
    while (index < buflen) {
237
        ch = _getc(chardev);
210
        char ch = _getc(indev);
238
        if (ch == '\b') {
211
        if (ch == '\b') {
239
            if (index > 0) {
212
            if (index > 0) {
240
                index--;
213
                index--;
241
                /* Space backspace, space */
214
                /* Space backspace, space */
242
                putchar('\b');
215
                putchar('\b');
243
                putchar(' ');
216
                putchar(' ');
244
                putchar('\b');
217
                putchar('\b');
245
            }
218
            }
246
            continue;
219
            continue;
247
        }
220
        }
248
        putchar(ch);
221
        putchar(ch);
249
       
222
       
250
        if (ch == '\n') { /* end of string => write 0, return */
223
        if (ch == '\n') { /* end of string => write 0, return */
251
            buf[index] = '\0';
224
            buf[index] = '\0';
252
            return (count_t) index;
225
            return (count_t) index;
253
        }
226
        }
254
        buf[index++] = ch;
227
        buf[index++] = ch;
255
    }
228
    }
-
 
229
   
256
    return (count_t) index;
230
    return (count_t) index;
257
}
231
}
258
 
232
 
259
/** Get character from device & echo it to screen */
233
/** Get character from input device & echo it to screen */
260
uint8_t getc(chardev_t *chardev)
234
uint8_t getc(indev_t *indev)
261
{
235
{
262
    uint8_t ch;
-
 
263
 
-
 
264
    ch = _getc(chardev);
236
    uint8_t ch = _getc(indev);
265
    putchar(ch);
237
    putchar(ch);
266
    return ch;
238
    return ch;
267
}
239
}
268
 
240
 
269
void klog_update(void)
241
void klog_update(void)
270
{
242
{
271
    spinlock_lock(&klog_lock);
243
    spinlock_lock(&klog_lock);
272
   
244
   
273
    if ((klog_inited) && (klog_irq.notif_cfg.notify) && (klog_uspace > 0)) {
245
//  if ((klog_inited) && (klog_irq.notif_cfg.notify) && (klog_uspace > 0)) {
274
        ipc_irq_send_msg_3(&klog_irq, klog_start, klog_len, klog_uspace);
246
//      ipc_irq_send_msg_3(&klog_irq, klog_start, klog_len, klog_uspace);
275
        klog_uspace = 0;
247
//      klog_uspace = 0;
276
    }
248
//  }
277
   
249
   
278
    spinlock_unlock(&klog_lock);
250
    spinlock_unlock(&klog_lock);
279
}
251
}
280
 
252
 
281
void putchar(char c)
253
void putchar(char c)
282
{
254
{
283
    spinlock_lock(&klog_lock);
255
    spinlock_lock(&klog_lock);
284
   
256
   
285
    if ((klog_stored > 0) && (stdout->op->write)) {
257
    if ((klog_stored > 0) && (stdout) && (stdout->op->write)) {
286
        /* Print charaters stored in kernel log */
258
        /* Print charaters stored in kernel log */
287
        index_t i;
259
        index_t i;
288
        for (i = klog_len - klog_stored; i < klog_len; i++)
260
        for (i = klog_len - klog_stored; i < klog_len; i++)
289
            stdout->op->write(stdout, klog[(klog_start + i) % KLOG_SIZE], silent);
261
            stdout->op->write(stdout, klog[(klog_start + i) % KLOG_SIZE], silent);
290
        klog_stored = 0;
262
        klog_stored = 0;
291
    }
263
    }
292
   
264
   
293
    /* Store character in the cyclic kernel log */
265
    /* Store character in the cyclic kernel log */
294
    klog[(klog_start + klog_len) % KLOG_SIZE] = c;
266
    klog[(klog_start + klog_len) % KLOG_SIZE] = c;
295
    if (klog_len < KLOG_SIZE)
267
    if (klog_len < KLOG_SIZE)
296
        klog_len++;
268
        klog_len++;
297
    else
269
    else
298
        klog_start = (klog_start + 1) % KLOG_SIZE;
270
        klog_start = (klog_start + 1) % KLOG_SIZE;
299
   
271
   
300
    if (stdout->op->write)
272
    if ((stdout) && (stdout->op->write))
301
        stdout->op->write(stdout, c, silent);
273
        stdout->op->write(stdout, c, silent);
302
    else {
274
    else {
303
        /* The character is just in the kernel log */
275
        /* The character is just in the kernel log */
304
        if (klog_stored < klog_len)
276
        if (klog_stored < klog_len)
305
            klog_stored++;
277
            klog_stored++;
306
    }
278
    }
307
   
279
   
308
    /* The character is stored for uspace */
280
    /* The character is stored for uspace */
309
    if (klog_uspace < klog_len)
281
    if (klog_uspace < klog_len)
310
        klog_uspace++;
282
        klog_uspace++;
311
   
283
   
312
    /* Check notify uspace to update */
284
    /* Check notify uspace to update */
313
    bool update;
285
    bool update;
314
    if ((klog_uspace > KLOG_LATENCY) || (c == '\n'))
286
    if ((klog_uspace > KLOG_LATENCY) || (c == '\n'))
315
        update = true;
287
        update = true;
316
    else
288
    else
317
        update = false;
289
        update = false;
318
   
290
   
319
    spinlock_unlock(&klog_lock);
291
    spinlock_unlock(&klog_lock);
320
   
292
   
321
    if (update)
293
    if (update)
322
        klog_update();
294
        klog_update();
323
}
295
}
-
 
296
 
-
 
297
/** Print using kernel facility
-
 
298
 *
-
 
299
 * Print to kernel log.
-
 
300
 *
-
 
301
 */
-
 
302
unative_t sys_klog(int fd, const void * buf, size_t count)
-
 
303
{
-
 
304
    char *data;
-
 
305
    int rc;
-
 
306
 
-
 
307
    if (count > PAGE_SIZE)
-
 
308
        return ELIMIT;
-
 
309
   
-
 
310
    if (count > 0) {
-
 
311
        data = (char *) malloc(count + 1, 0);
-
 
312
        if (!data)
-
 
313
            return ENOMEM;
-
 
314
       
-
 
315
        rc = copy_from_uspace(data, buf, count);
-
 
316
        if (rc) {
-
 
317
            free(data);
-
 
318
            return rc;
-
 
319
        }
-
 
320
        data[count] = 0;
-
 
321
       
-
 
322
        printf("%s", data);
-
 
323
        free(data);
-
 
324
    } else
-
 
325
        klog_update();
-
 
326
   
-
 
327
    return count;
-
 
328
}
324
 
329
 
325
/** @}
330
/** @}
326
 */
331
 */
327
 
332