source: mainline/kernel/genarch/src/drivers/ega/ega.c@ 5646813

lfn serial ticket/834-toolchain-update topic/msim-upgrade topic/simplify-dev-export
Last change on this file since 5646813 was c8bf88d, checked in by Martin Decky <martin@…>, 17 years ago

represent special keystrokes (cursor arrows, page up/down, delete, etc.) as appropriate Unicode characters
do not parse ANSI control sequences in kconsole, but in serial line driver
  • Property mode set to 100644
File size: 10.1 KB
Line 
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_drivers
30 * @{
31 */
32/**
33 * @file
34 * @brief EGA driver.
35 */
36
37#include <genarch/drivers/ega/ega.h>
38#include <putchar.h>
39#include <mm/page.h>
40#include <mm/as.h>
41#include <mm/slab.h>
42#include <arch/mm/page.h>
43#include <synch/spinlock.h>
44#include <arch/types.h>
45#include <arch/asm.h>
46#include <memstr.h>
47#include <string.h>
48#include <console/chardev.h>
49#include <console/console.h>
50#include <sysinfo/sysinfo.h>
51#include <ddi/ddi.h>
52
53/*
54 * The EGA driver.
55 * Simple and short. Function for displaying characters and "scrolling".
56 */
57
58SPINLOCK_INITIALIZE(egalock);
59static uint32_t ega_cursor;
60static uint8_t *videoram;
61static uint8_t *backbuf;
62static ioport8_t *ega_base;
63
64#define SPACE 0x20
65#define STYLE 0x1e
66#define INVAL 0x17
67
68#define EMPTY_CHAR ((STYLE << 8) | SPACE)
69
70static uint16_t ega_oem_glyph(const wchar_t ch)
71{
72 if ((ch >= 0x0000) && (ch <= 0x007f))
73 return ch;
74
75 if (ch == 0x00a0)
76 return 255;
77
78 if (ch == 0x00a1)
79 return 173;
80
81 if ((ch >= 0x00a2) && (ch <= 0x00a3))
82 return (ch - 7);
83
84 if (ch == 0x00a5)
85 return 157;
86
87 if (ch == 0x00aa)
88 return 166;
89
90 if (ch == 0x00ab)
91 return 174;
92
93 if (ch == 0x00ac)
94 return 170;
95
96 if (ch == 0x00b0)
97 return 248;
98
99 if (ch == 0x00b1)
100 return 241;
101
102 if (ch == 0x00b2)
103 return 253;
104
105 if (ch == 0x00b5)
106 return 230;
107
108 if (ch == 0x00b7)
109 return 250;
110
111 if (ch == 0x00ba)
112 return 167;
113
114 if (ch == 0x00bb)
115 return 175;
116
117 if (ch == 0x00bc)
118 return 172;
119
120 if (ch == 0x00bd)
121 return 171;
122
123 if (ch == 0x00bf)
124 return 168;
125
126 if ((ch >= 0x00c4) && (ch <= 0x00c5))
127 return (ch - 54);
128
129 if (ch == 0x00c6)
130 return 146;
131
132 if (ch == 0x00c7)
133 return 128;
134
135 if (ch == 0x00c9)
136 return 144;
137
138 if (ch == 0x00d1)
139 return 165;
140
141 if (ch == 0x00d6)
142 return 153;
143
144 if (ch == 0x00dc)
145 return 154;
146
147 if (ch == 0x00df)
148 return 225;
149
150 if (ch == 0x00e0)
151 return 133;
152
153 if (ch == 0x00e1)
154 return 160;
155
156 if (ch == 0x00e2)
157 return 131;
158
159 if (ch == 0x00e4)
160 return 132;
161
162 if (ch == 0x00e5)
163 return 134;
164
165 if (ch == 0x00e6)
166 return 145;
167
168 if (ch == 0x00e7)
169 return 135;
170
171 if (ch == 0x00e8)
172 return 138;
173
174 if (ch == 0x00e9)
175 return 130;
176
177 if ((ch >= 0x00ea) && (ch <= 0x00eb))
178 return (ch - 98);
179
180 if (ch == 0x00ec)
181 return 141;
182
183 if (ch == 0x00ed)
184 return 161;
185
186 if (ch == 0x00ee)
187 return 140;
188
189 if (ch == 0x00ef)
190 return 139;
191
192 if (ch == 0x00f1)
193 return 164;
194
195 if (ch == 0x00f2)
196 return 149;
197
198 if (ch == 0x00f3)
199 return 162;
200
201 if (ch == 0x00f4)
202 return 147;
203
204 if (ch == 0x00f6)
205 return 148;
206
207 if (ch == 0x00f7)
208 return 246;
209
210 if (ch == 0x00f9)
211 return 151;
212
213 if (ch == 0x00fa)
214 return 163;
215
216 if (ch == 0x00fb)
217 return 150;
218
219 if (ch == 0x00fc)
220 return 129;
221
222 if (ch == 0x00ff)
223 return 152;
224
225 if (ch == 0x0192)
226 return 159;
227
228 if (ch == 0x0393)
229 return 226;
230
231 if (ch == 0x0398)
232 return 233;
233
234 if (ch == 0x03a3)
235 return 228;
236
237 if (ch == 0x03a6)
238 return 232;
239
240 if (ch == 0x03a9)
241 return 234;
242
243 if (ch == 0x03b1)
244 return 224;
245
246 if (ch == 0x03b4)
247 return 235;
248
249 if (ch == 0x03b5)
250 return 238;
251
252 if (ch == 0x03c0)
253 return 227;
254
255 if (ch == 0x03c3)
256 return 229;
257
258 if (ch == 0x03c4)
259 return 231;
260
261 if (ch == 0x03c6)
262 return 237;
263
264 if (ch == 0x207f)
265 return 252;
266
267 if (ch == 0x20a7)
268 return 158;
269
270 if (ch == 0x2219)
271 return 249;
272
273 if (ch == 0x221a)
274 return 251;
275
276 if (ch == 0x221e)
277 return 236;
278
279 if (ch == 0x2229)
280 return 239;
281
282 if (ch == 0x2248)
283 return 247;
284
285 if (ch == 0x2261)
286 return 240;
287
288 if (ch == 0x2264)
289 return 243;
290
291 if (ch == 0x2265)
292 return 242;
293
294 if (ch == 0x2310)
295 return 169;
296
297 if ((ch >= 0x2320) && (ch <= 0x2321))
298 return (ch - 8748);
299
300 if (ch == 0x2500)
301 return 196;
302
303 if (ch == 0x2502)
304 return 179;
305
306 if (ch == 0x250c)
307 return 218;
308
309 if (ch == 0x2510)
310 return 191;
311
312 if (ch == 0x2514)
313 return 192;
314
315 if (ch == 0x2518)
316 return 217;
317
318 if (ch == 0x251c)
319 return 195;
320
321 if (ch == 0x2524)
322 return 180;
323
324 if (ch == 0x252c)
325 return 194;
326
327 if (ch == 0x2534)
328 return 193;
329
330 if (ch == 0x253c)
331 return 197;
332
333 if (ch == 0x2550)
334 return 205;
335
336 if (ch == 0x2551)
337 return 186;
338
339 if ((ch >= 0x2552) && (ch <= 0x2553))
340 return (ch - 9341);
341
342 if (ch == 0x2554)
343 return 201;
344
345 if (ch == 0x2555)
346 return 184;
347
348 if (ch == 0x2556)
349 return 183;
350
351 if (ch == 0x2557)
352 return 187;
353
354 if (ch == 0x2558)
355 return 212;
356
357 if (ch == 0x2559)
358 return 211;
359
360 if (ch == 0x255a)
361 return 200;
362
363 if (ch == 0x255b)
364 return 190;
365
366 if (ch == 0x255c)
367 return 189;
368
369 if (ch == 0x255d)
370 return 188;
371
372 if ((ch >= 0x255e) && (ch <= 0x255f))
373 return (ch - 9368);
374
375 if (ch == 0x2560)
376 return 204;
377
378 if ((ch >= 0x2561) && (ch <= 0x2562))
379 return (ch - 9388);
380
381 if (ch == 0x2563)
382 return 185;
383
384 if ((ch >= 0x2564) && (ch <= 0x2565))
385 return (ch - 9363);
386
387 if (ch == 0x2566)
388 return 203;
389
390 if ((ch >= 0x2567) && (ch <= 0x2568))
391 return (ch - 9368);
392
393 if (ch == 0x2569)
394 return 202;
395
396 if (ch == 0x256a)
397 return 216;
398
399 if (ch == 0x256b)
400 return 215;
401
402 if (ch == 0x256c)
403 return 206;
404
405 if (ch == 0x2580)
406 return 223;
407
408 if (ch == 0x2584)
409 return 220;
410
411 if (ch == 0x2588)
412 return 219;
413
414 if (ch == 0x258c)
415 return 221;
416
417 if (ch == 0x2590)
418 return 222;
419
420 if ((ch >= 0x2591) && (ch <= 0x2593))
421 return (ch - 9441);
422
423 return 256;
424}
425
426/*
427 * This function takes care of scrolling.
428 */
429static void ega_check_cursor(void)
430{
431 if (ega_cursor < EGA_SCREEN)
432 return;
433
434 memmove((void *) videoram, (void *) (videoram + EGA_COLS * 2),
435 (EGA_SCREEN - EGA_COLS) * 2);
436 memmove((void *) backbuf, (void *) (backbuf + EGA_COLS * 2),
437 (EGA_SCREEN - EGA_COLS) * 2);
438 memsetw(videoram + (EGA_SCREEN - EGA_COLS) * 2, EGA_COLS, EMPTY_CHAR);
439 memsetw(backbuf + (EGA_SCREEN - EGA_COLS) * 2, EGA_COLS, EMPTY_CHAR);
440 ega_cursor = ega_cursor - EGA_COLS;
441}
442
443static void ega_show_cursor(void)
444{
445 pio_write_8(ega_base + EGA_INDEX_REG, 0x0a);
446 uint8_t stat = pio_read_8(ega_base + EGA_DATA_REG);
447 pio_write_8(ega_base + EGA_INDEX_REG, 0x0a);
448 pio_write_8(ega_base + EGA_DATA_REG, stat & (~(1 << 5)));
449}
450
451static void ega_move_cursor(void)
452{
453 pio_write_8(ega_base + EGA_INDEX_REG, 0x0e);
454 pio_write_8(ega_base + EGA_DATA_REG, (uint8_t) ((ega_cursor >> 8) & 0xff));
455 pio_write_8(ega_base + EGA_INDEX_REG, 0x0f);
456 pio_write_8(ega_base + EGA_DATA_REG, (uint8_t) (ega_cursor & 0xff));
457}
458
459static void ega_sync_cursor(void)
460{
461 pio_write_8(ega_base + EGA_INDEX_REG, 0x0e);
462 uint8_t hi = pio_read_8(ega_base + EGA_DATA_REG);
463 pio_write_8(ega_base + EGA_INDEX_REG, 0x0f);
464 uint8_t lo = pio_read_8(ega_base + EGA_DATA_REG);
465
466 ega_cursor = (hi << 8) | lo;
467
468 if (ega_cursor >= EGA_SCREEN)
469 ega_cursor = 0;
470
471 if ((ega_cursor % EGA_COLS) != 0)
472 ega_cursor = (ega_cursor + EGA_COLS) - ega_cursor % EGA_COLS;
473
474 memsetw(videoram + ega_cursor * 2, EGA_SCREEN - ega_cursor, EMPTY_CHAR);
475 memsetw(backbuf + ega_cursor * 2, EGA_SCREEN - ega_cursor, EMPTY_CHAR);
476
477 ega_check_cursor();
478 ega_move_cursor();
479 ega_show_cursor();
480}
481
482static void ega_display_char(wchar_t ch, bool silent)
483{
484 uint16_t index = ega_oem_glyph(ch);
485 uint8_t glyph;
486 uint8_t style;
487
488 if ((index >> 8)) {
489 glyph = U_SPECIAL;
490 style = INVAL;
491 } else {
492 glyph = index & 0xff;
493 style = STYLE;
494 }
495
496 backbuf[ega_cursor * 2] = glyph;
497 backbuf[ega_cursor * 2 + 1] = style;
498
499 if (!silent) {
500 videoram[ega_cursor * 2] = glyph;
501 videoram[ega_cursor * 2 + 1] = style;
502 }
503}
504
505static void ega_putchar(outdev_t *dev __attribute__((unused)), wchar_t ch, bool silent)
506{
507 ipl_t ipl;
508
509 ipl = interrupts_disable();
510 spinlock_lock(&egalock);
511
512 switch (ch) {
513 case '\n':
514 ega_cursor = (ega_cursor + EGA_COLS) - ega_cursor % EGA_COLS;
515 break;
516 case '\t':
517 ega_cursor = (ega_cursor + 8) - ega_cursor % 8;
518 break;
519 case '\b':
520 if (ega_cursor % EGA_COLS)
521 ega_cursor--;
522 break;
523 default:
524 ega_display_char(ch, silent);
525 ega_cursor++;
526 break;
527 }
528 ega_check_cursor();
529
530 if (!silent)
531 ega_move_cursor();
532
533 spinlock_unlock(&egalock);
534 interrupts_restore(ipl);
535}
536
537static outdev_t ega_console;
538static outdev_operations_t ega_ops = {
539 .write = ega_putchar
540};
541
542void ega_init(ioport8_t *base, uintptr_t videoram_phys)
543{
544 /* Initialize the software structure. */
545 ega_base = base;
546
547 backbuf = (uint8_t *) malloc(EGA_VRAM_SIZE, 0);
548 if (!backbuf)
549 panic("Unable to allocate backbuffer.");
550
551 videoram = (uint8_t *) hw_map(videoram_phys, EGA_VRAM_SIZE);
552
553 /* Synchronize the back buffer and cursor position. */
554 memcpy(backbuf, videoram, EGA_VRAM_SIZE);
555 ega_sync_cursor();
556
557 outdev_initialize("ega", &ega_console, &ega_ops);
558 stdout = &ega_console;
559
560 sysinfo_set_item_val("fb", NULL, true);
561 sysinfo_set_item_val("fb.kind", NULL, 2);
562 sysinfo_set_item_val("fb.width", NULL, EGA_COLS);
563 sysinfo_set_item_val("fb.height", NULL, EGA_ROWS);
564 sysinfo_set_item_val("fb.blinking", NULL, true);
565 sysinfo_set_item_val("fb.address.physical", NULL, videoram_phys);
566}
567
568void ega_redraw(void)
569{
570 memcpy(videoram, backbuf, EGA_VRAM_SIZE);
571 ega_move_cursor();
572 ega_show_cursor();
573}
574
575/** @}
576 */
Note: See TracBrowser for help on using the repository browser.