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