Subversion Repositories HelenOS

Rev

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

Rev 3906 Rev 3908
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>
42
#include <ddi/device.h>
43
#include <ddi/irq.h>
43
#include <ddi/irq.h>
44
#include <ddi/ddi.h>
44
#include <ddi/ddi.h>
45
#include <ipc/irq.h>
45
#include <ipc/irq.h>
46
#include <arch.h>
46
#include <arch.h>
47
#include <func.h>
47
#include <func.h>
48
#include <print.h>
48
#include <print.h>
49
#include <atomic.h>
49
#include <atomic.h>
50
 
50
 
51
#define KLOG_SIZE PAGE_SIZE
51
#define KLOG_SIZE PAGE_SIZE
52
#define KLOG_LATENCY 8
52
#define KLOG_LATENCY 8
53
 
53
 
54
/**< Kernel log cyclic buffer */
54
/**< Kernel log cyclic buffer */
55
static char klog[KLOG_SIZE] __attribute__ ((aligned (PAGE_SIZE)));
55
static char klog[KLOG_SIZE] __attribute__ ((aligned (PAGE_SIZE)));
56
 
56
 
57
/**< Kernel log initialized */
57
/**< Kernel log initialized */
58
static bool klog_inited = false;
58
static bool klog_inited = false;
59
/**< First kernel log characters */
59
/**< First kernel log characters */
60
static index_t klog_start = 0;
60
static index_t klog_start = 0;
61
/**< Number of valid kernel log characters */
61
/**< Number of valid kernel log characters */
62
static size_t klog_len = 0;
62
static size_t klog_len = 0;
63
/**< Number of stored (not printed) kernel log characters */
63
/**< Number of stored (not printed) kernel log characters */
64
static size_t klog_stored = 0;
64
static size_t klog_stored = 0;
65
/**< Number of stored kernel log characters for uspace */
65
/**< Number of stored kernel log characters for uspace */
66
static size_t klog_uspace = 0;
66
static size_t klog_uspace = 0;
67
 
67
 
68
/**< Silent output */
68
/**< Silent output */
69
static bool silent = false;
69
static bool silent = false;
70
 
70
 
71
/**< Kernel log spinlock */
71
/**< Kernel log spinlock */
72
SPINLOCK_INITIALIZE(klog_lock);
72
SPINLOCK_INITIALIZE(klog_lock);
73
 
73
 
74
/** Physical memory area used for klog buffer */
74
/** Physical memory area used for klog buffer */
75
static parea_t klog_parea;
75
static parea_t klog_parea;
76
 
76
 
77
/*
77
/*
78
 * For now, we use 0 as INR.
78
 * For now, we use 0 as INR.
79
 * However, it is therefore desirable to have architecture specific
79
 * However, it is therefore desirable to have architecture specific
80
 * definition of KLOG_VIRT_INR in the future.
80
 * definition of KLOG_VIRT_INR in the future.
81
 */
81
 */
82
#define KLOG_VIRT_INR   0
82
#define KLOG_VIRT_INR   0
83
 
83
 
84
static irq_t klog_irq;
84
static irq_t klog_irq;
85
 
85
 
86
static chardev_operations_t null_stdout_ops = {
86
static chardev_operations_t null_stdout_ops = {
87
    .suspend = NULL,
87
    .suspend = NULL,
88
    .resume = NULL,
88
    .resume = NULL,
89
    .write = NULL,
89
    .write = NULL,
90
    .read = NULL
90
    .read = NULL
91
};
91
};
92
 
92
 
93
chardev_t null_stdout = {
93
chardev_t null_stdout = {
94
    .name = "null",
94
    .name = "null",
95
    .op = &null_stdout_ops
95
    .op = &null_stdout_ops
96
};
96
};
97
 
97
 
98
/** Allways refuse IRQ ownership.
98
/** Allways refuse IRQ ownership.
99
 *
99
 *
100
 * This is not a real IRQ, so we always decline.
100
 * This is not a real IRQ, so we always decline.
101
 *
101
 *
102
 * @return Always returns IRQ_DECLINE.
102
 * @return Always returns IRQ_DECLINE.
103
 */
103
 */
104
static irq_ownership_t klog_claim(void *instance)
104
static irq_ownership_t klog_claim(void *instance)
105
{
105
{
106
    return IRQ_DECLINE;
106
    return IRQ_DECLINE;
107
}
107
}
108
 
108
 
109
/** Standard input character device */
109
/** Standard input character device */
110
chardev_t *stdin = NULL;
110
chardev_t *stdin = NULL;
111
chardev_t *stdout = &null_stdout;
111
chardev_t *stdout = &null_stdout;
112
 
112
 
113
/** Initialize kernel logging facility
113
/** Initialize kernel logging facility
114
 *
114
 *
115
 * The shared area contains kernel cyclic buffer. Userspace application may
115
 * The shared area contains kernel cyclic buffer. Userspace application may
116
 * be notified on new data with indication of position and size
116
 * be notified on new data with indication of position and size
117
 * of the data within the circular buffer.
117
 * of the data within the circular buffer.
118
 */
118
 */
119
void klog_init(void)
119
void klog_init(void)
120
{
120
{
121
    void *faddr = (void *) KA2PA(klog);
121
    void *faddr = (void *) KA2PA(klog);
122
   
122
   
123
    ASSERT((uintptr_t) faddr % FRAME_SIZE == 0);
123
    ASSERT((uintptr_t) faddr % FRAME_SIZE == 0);
124
    ASSERT(KLOG_SIZE % FRAME_SIZE == 0);
124
    ASSERT(KLOG_SIZE % FRAME_SIZE == 0);
125
 
125
 
126
    devno_t devno = device_assign_devno();
126
    devno_t devno = device_assign_devno();
127
   
127
   
128
    klog_parea.pbase = (uintptr_t) faddr;
128
    klog_parea.pbase = (uintptr_t) faddr;
129
    klog_parea.vbase = (uintptr_t) klog;
-
 
130
    klog_parea.frames = SIZE2FRAMES(KLOG_SIZE);
129
    klog_parea.frames = SIZE2FRAMES(KLOG_SIZE);
131
    klog_parea.cacheable = true;
-
 
132
    ddi_parea_register(&klog_parea);
130
    ddi_parea_register(&klog_parea);
133
 
131
 
134
    sysinfo_set_item_val("klog.faddr", NULL, (unative_t) faddr);
132
    sysinfo_set_item_val("klog.faddr", NULL, (unative_t) faddr);
135
    sysinfo_set_item_val("klog.pages", NULL, SIZE2FRAMES(KLOG_SIZE));
133
    sysinfo_set_item_val("klog.pages", NULL, SIZE2FRAMES(KLOG_SIZE));
136
    sysinfo_set_item_val("klog.devno", NULL, devno);
134
    sysinfo_set_item_val("klog.devno", NULL, devno);
137
    sysinfo_set_item_val("klog.inr", NULL, KLOG_VIRT_INR);
135
    sysinfo_set_item_val("klog.inr", NULL, KLOG_VIRT_INR);
138
 
136
 
139
    irq_initialize(&klog_irq);
137
    irq_initialize(&klog_irq);
140
    klog_irq.devno = devno;
138
    klog_irq.devno = devno;
141
    klog_irq.inr = KLOG_VIRT_INR;
139
    klog_irq.inr = KLOG_VIRT_INR;
142
    klog_irq.claim = klog_claim;
140
    klog_irq.claim = klog_claim;
143
    irq_register(&klog_irq);
141
    irq_register(&klog_irq);
144
   
142
   
145
    spinlock_lock(&klog_lock);
143
    spinlock_lock(&klog_lock);
146
    klog_inited = true;
144
    klog_inited = true;
147
    spinlock_unlock(&klog_lock);
145
    spinlock_unlock(&klog_lock);
148
}
146
}
149
 
147
 
150
void grab_console(void)
148
void grab_console(void)
151
{
149
{
152
    silent = false;
150
    silent = false;
153
    arch_grab_console();
151
    arch_grab_console();
154
}
152
}
155
 
153
 
156
void release_console(void)
154
void release_console(void)
157
{
155
{
158
    silent = true;
156
    silent = true;
159
    arch_release_console();
157
    arch_release_console();
160
}
158
}
161
 
159
 
162
/** Get character from character device. Do not echo character.
160
/** Get character from character device. Do not echo character.
163
 *
161
 *
164
 * @param chardev Character device.
162
 * @param chardev Character device.
165
 *
163
 *
166
 * @return Character read.
164
 * @return Character read.
167
 */
165
 */
168
uint8_t _getc(chardev_t *chardev)
166
uint8_t _getc(chardev_t *chardev)
169
{
167
{
170
    uint8_t ch;
168
    uint8_t ch;
171
    ipl_t ipl;
169
    ipl_t ipl;
172
 
170
 
173
    if (atomic_get(&haltstate)) {
171
    if (atomic_get(&haltstate)) {
174
        /* If we are here, we are hopefully on the processor, that
172
        /* If we are here, we are hopefully on the processor, that
175
         * issued the 'halt' command, so proceed to read the character
173
         * issued the 'halt' command, so proceed to read the character
176
         * directly from input
174
         * directly from input
177
         */
175
         */
178
        if (chardev->op->read)
176
        if (chardev->op->read)
179
            return chardev->op->read(chardev);
177
            return chardev->op->read(chardev);
180
        /* no other way of interacting with user, halt */
178
        /* no other way of interacting with user, halt */
181
        if (CPU)
179
        if (CPU)
182
            printf("cpu%u: ", CPU->id);
180
            printf("cpu%u: ", CPU->id);
183
        else
181
        else
184
            printf("cpu: ");
182
            printf("cpu: ");
185
        printf("halted (no kconsole)\n");
183
        printf("halted (no kconsole)\n");
186
        cpu_halt();
184
        cpu_halt();
187
    }
185
    }
188
 
186
 
189
    waitq_sleep(&chardev->wq);
187
    waitq_sleep(&chardev->wq);
190
    ipl = interrupts_disable();
188
    ipl = interrupts_disable();
191
    spinlock_lock(&chardev->lock);
189
    spinlock_lock(&chardev->lock);
192
    ch = chardev->buffer[(chardev->index - chardev->counter) % CHARDEV_BUFLEN];
190
    ch = chardev->buffer[(chardev->index - chardev->counter) % CHARDEV_BUFLEN];
193
    chardev->counter--;
191
    chardev->counter--;
194
    spinlock_unlock(&chardev->lock);
192
    spinlock_unlock(&chardev->lock);
195
    interrupts_restore(ipl);
193
    interrupts_restore(ipl);
196
 
194
 
197
    chardev->op->resume(chardev);
195
    chardev->op->resume(chardev);
198
 
196
 
199
    return ch;
197
    return ch;
200
}
198
}
201
 
199
 
202
/** Get string from character device.
200
/** Get string from character device.
203
 *
201
 *
204
 * Read characters from character device until first occurrence
202
 * Read characters from character device until first occurrence
205
 * of newline character.
203
 * of newline character.
206
 *
204
 *
207
 * @param chardev Character device.
205
 * @param chardev Character device.
208
 * @param buf Buffer where to store string terminated by '\0'.
206
 * @param buf Buffer where to store string terminated by '\0'.
209
 * @param buflen Size of the buffer.
207
 * @param buflen Size of the buffer.
210
 *
208
 *
211
 * @return Number of characters read.
209
 * @return Number of characters read.
212
 */
210
 */
213
count_t gets(chardev_t *chardev, char *buf, size_t buflen)
211
count_t gets(chardev_t *chardev, char *buf, size_t buflen)
214
{
212
{
215
    index_t index = 0;
213
    index_t index = 0;
216
    char ch;
214
    char ch;
217
   
215
   
218
    while (index < buflen) {
216
    while (index < buflen) {
219
        ch = _getc(chardev);
217
        ch = _getc(chardev);
220
        if (ch == '\b') {
218
        if (ch == '\b') {
221
            if (index > 0) {
219
            if (index > 0) {
222
                index--;
220
                index--;
223
                /* Space backspace, space */
221
                /* Space backspace, space */
224
                putchar('\b');
222
                putchar('\b');
225
                putchar(' ');
223
                putchar(' ');
226
                putchar('\b');
224
                putchar('\b');
227
            }
225
            }
228
            continue;
226
            continue;
229
        }
227
        }
230
        putchar(ch);
228
        putchar(ch);
231
       
229
       
232
        if (ch == '\n') { /* end of string => write 0, return */
230
        if (ch == '\n') { /* end of string => write 0, return */
233
            buf[index] = '\0';
231
            buf[index] = '\0';
234
            return (count_t) index;
232
            return (count_t) index;
235
        }
233
        }
236
        buf[index++] = ch;
234
        buf[index++] = ch;
237
    }
235
    }
238
    return (count_t) index;
236
    return (count_t) index;
239
}
237
}
240
 
238
 
241
/** Get character from device & echo it to screen */
239
/** Get character from device & echo it to screen */
242
uint8_t getc(chardev_t *chardev)
240
uint8_t getc(chardev_t *chardev)
243
{
241
{
244
    uint8_t ch;
242
    uint8_t ch;
245
 
243
 
246
    ch = _getc(chardev);
244
    ch = _getc(chardev);
247
    putchar(ch);
245
    putchar(ch);
248
    return ch;
246
    return ch;
249
}
247
}
250
 
248
 
251
void klog_update(void)
249
void klog_update(void)
252
{
250
{
253
    spinlock_lock(&klog_lock);
251
    spinlock_lock(&klog_lock);
254
   
252
   
255
    if ((klog_inited) && (klog_irq.notif_cfg.notify) && (klog_uspace > 0)) {
253
    if ((klog_inited) && (klog_irq.notif_cfg.notify) && (klog_uspace > 0)) {
256
        ipc_irq_send_msg_3(&klog_irq, klog_start, klog_len, klog_uspace);
254
        ipc_irq_send_msg_3(&klog_irq, klog_start, klog_len, klog_uspace);
257
        klog_uspace = 0;
255
        klog_uspace = 0;
258
    }
256
    }
259
   
257
   
260
    spinlock_unlock(&klog_lock);
258
    spinlock_unlock(&klog_lock);
261
}
259
}
262
 
260
 
263
void putchar(char c)
261
void putchar(char c)
264
{
262
{
265
    spinlock_lock(&klog_lock);
263
    spinlock_lock(&klog_lock);
266
   
264
   
267
    if ((klog_stored > 0) && (stdout->op->write)) {
265
    if ((klog_stored > 0) && (stdout->op->write)) {
268
        /* Print charaters stored in kernel log */
266
        /* Print charaters stored in kernel log */
269
        index_t i;
267
        index_t i;
270
        for (i = klog_len - klog_stored; i < klog_len; i++)
268
        for (i = klog_len - klog_stored; i < klog_len; i++)
271
            stdout->op->write(stdout, klog[(klog_start + i) % KLOG_SIZE], silent);
269
            stdout->op->write(stdout, klog[(klog_start + i) % KLOG_SIZE], silent);
272
        klog_stored = 0;
270
        klog_stored = 0;
273
    }
271
    }
274
   
272
   
275
    /* Store character in the cyclic kernel log */
273
    /* Store character in the cyclic kernel log */
276
    klog[(klog_start + klog_len) % KLOG_SIZE] = c;
274
    klog[(klog_start + klog_len) % KLOG_SIZE] = c;
277
    if (klog_len < KLOG_SIZE)
275
    if (klog_len < KLOG_SIZE)
278
        klog_len++;
276
        klog_len++;
279
    else
277
    else
280
        klog_start = (klog_start + 1) % KLOG_SIZE;
278
        klog_start = (klog_start + 1) % KLOG_SIZE;
281
   
279
   
282
    if (stdout->op->write)
280
    if (stdout->op->write)
283
        stdout->op->write(stdout, c, silent);
281
        stdout->op->write(stdout, c, silent);
284
    else {
282
    else {
285
        /* The character is just in the kernel log */
283
        /* The character is just in the kernel log */
286
        if (klog_stored < klog_len)
284
        if (klog_stored < klog_len)
287
            klog_stored++;
285
            klog_stored++;
288
    }
286
    }
289
   
287
   
290
    /* The character is stored for uspace */
288
    /* The character is stored for uspace */
291
    if (klog_uspace < klog_len)
289
    if (klog_uspace < klog_len)
292
        klog_uspace++;
290
        klog_uspace++;
293
   
291
   
294
    /* Check notify uspace to update */
292
    /* Check notify uspace to update */
295
    bool update;
293
    bool update;
296
    if ((klog_uspace > KLOG_LATENCY) || (c == '\n'))
294
    if ((klog_uspace > KLOG_LATENCY) || (c == '\n'))
297
        update = true;
295
        update = true;
298
    else
296
    else
299
        update = false;
297
        update = false;
300
   
298
   
301
    spinlock_unlock(&klog_lock);
299
    spinlock_unlock(&klog_lock);
302
   
300
   
303
    if (update)
301
    if (update)
304
        klog_update();
302
        klog_update();
305
}
303
}
306
 
304
 
307
/** @}
305
/** @}
308
 */
306
 */
309
 
307