Subversion Repositories HelenOS

Rev

Rev 3975 | Rev 4177 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  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 <console/chardev.h>
  48. #include <console/console.h>
  49. #include <sysinfo/sysinfo.h>
  50. #include <ddi/ddi.h>
  51.  
  52. /*
  53.  * The EGA driver.
  54.  * Simple and short. Function for displaying characters and "scrolling".
  55.  */
  56.  
  57. SPINLOCK_INITIALIZE(egalock);
  58. static uint32_t ega_cursor;
  59. static uint8_t *videoram;
  60. static uint8_t *backbuf;
  61. static ioport8_t *ega_base;
  62.  
  63. #define EMPTY_CHAR  0x0720
  64.  
  65. chardev_t ega_console;
  66.  
  67. /*
  68.  * This function takes care of scrolling.
  69.  */
  70. static void ega_check_cursor(void)
  71. {
  72.     if (ega_cursor < EGA_SCREEN)
  73.         return;
  74.    
  75.     memmove((void *) videoram, (void *) (videoram + EGA_COLS * 2),
  76.         (EGA_SCREEN - EGA_COLS) * 2);
  77.     memmove((void *) backbuf, (void *) (backbuf + EGA_COLS * 2),
  78.         (EGA_SCREEN - EGA_COLS) * 2);
  79.     memsetw(videoram + (EGA_SCREEN - EGA_COLS) * 2, EGA_COLS, EMPTY_CHAR);
  80.     memsetw(backbuf + (EGA_SCREEN - EGA_COLS) * 2, EGA_COLS, EMPTY_CHAR);
  81.     ega_cursor = ega_cursor - EGA_COLS;
  82. }
  83.  
  84. static void ega_show_cursor(void)
  85. {
  86.     pio_write_8(ega_base + EGA_INDEX_REG, 0x0a);
  87.     uint8_t stat = pio_read_8(ega_base + EGA_DATA_REG);
  88.     pio_write_8(ega_base + EGA_INDEX_REG, 0x0a);
  89.     pio_write_8(ega_base + EGA_DATA_REG, stat & (~(1 << 5)));
  90. }
  91.  
  92. static void ega_move_cursor(void)
  93. {
  94.     pio_write_8(ega_base + EGA_INDEX_REG, 0x0e);
  95.     pio_write_8(ega_base + EGA_DATA_REG, (uint8_t) ((ega_cursor >> 8) & 0xff));
  96.     pio_write_8(ega_base + EGA_INDEX_REG, 0x0f);
  97.     pio_write_8(ega_base + EGA_DATA_REG, (uint8_t) (ega_cursor & 0xff));
  98. }
  99.  
  100. static void ega_sync_cursor(void)
  101. {
  102.     pio_write_8(ega_base + EGA_INDEX_REG, 0x0e);
  103.     uint8_t hi = pio_read_8(ega_base + EGA_DATA_REG);
  104.     pio_write_8(ega_base + EGA_INDEX_REG, 0x0f);
  105.     uint8_t lo = pio_read_8(ega_base + EGA_DATA_REG);
  106.    
  107.     ega_cursor = (hi << 8) | lo;
  108.    
  109.     if (ega_cursor >= EGA_SCREEN)
  110.         ega_cursor = 0;
  111.    
  112.     if ((ega_cursor % EGA_COLS) != 0)
  113.         ega_cursor = (ega_cursor + EGA_COLS) - ega_cursor % EGA_COLS;
  114.    
  115.     memsetw(videoram + ega_cursor * 2, EGA_SCREEN - ega_cursor, EMPTY_CHAR);
  116.     memsetw(backbuf + ega_cursor * 2, EGA_SCREEN - ega_cursor, EMPTY_CHAR);
  117.    
  118.     ega_check_cursor();
  119.     ega_move_cursor();
  120.     ega_show_cursor();
  121. }
  122.  
  123. static void ega_display_char(char ch, bool silent)
  124. {
  125.     backbuf[ega_cursor * 2] = ch;
  126.    
  127.     if (!silent)
  128.         videoram[ega_cursor * 2] = ch;
  129. }
  130.  
  131. static void ega_putchar(chardev_t *dev __attribute__((unused)), const char ch, bool silent)
  132. {
  133.     ipl_t ipl;
  134.    
  135.     ipl = interrupts_disable();
  136.     spinlock_lock(&egalock);
  137.    
  138.     switch (ch) {
  139.     case '\n':
  140.         ega_cursor = (ega_cursor + EGA_COLS) - ega_cursor % EGA_COLS;
  141.         break;
  142.     case '\t':
  143.         ega_cursor = (ega_cursor + 8) - ega_cursor % 8;
  144.         break;
  145.     case '\b':
  146.         if (ega_cursor % EGA_COLS)
  147.             ega_cursor--;
  148.         break;
  149.     default:
  150.         ega_display_char(ch, silent);
  151.         ega_cursor++;
  152.         break;
  153.     }
  154.     ega_check_cursor();
  155.    
  156.     if (!silent)
  157.         ega_move_cursor();
  158.    
  159.     spinlock_unlock(&egalock);
  160.     interrupts_restore(ipl);
  161. }
  162.  
  163. static chardev_operations_t ega_ops = {
  164.     .write = ega_putchar
  165. };
  166.  
  167. void ega_init(ioport8_t *base, uintptr_t videoram_phys)
  168. {
  169.     /* Initialize the software structure. */
  170.     ega_base = base;
  171.    
  172.     backbuf = (uint8_t *) malloc(EGA_VRAM_SIZE, 0);
  173.     if (!backbuf)
  174.         panic("Unable to allocate backbuffer.");
  175.    
  176.     videoram = (uint8_t *) hw_map(videoram_phys, EGA_VRAM_SIZE);
  177.    
  178.     /* Synchronize the back buffer and cursor position. */
  179.     memcpy(backbuf, videoram, EGA_VRAM_SIZE);
  180.     ega_sync_cursor();
  181.    
  182.     chardev_initialize("ega_out", &ega_console, &ega_ops);
  183.     stdout = &ega_console;
  184.    
  185.     sysinfo_set_item_val("fb", NULL, true);
  186.     sysinfo_set_item_val("fb.kind", NULL, 2);
  187.     sysinfo_set_item_val("fb.width", NULL, EGA_COLS);
  188.     sysinfo_set_item_val("fb.height", NULL, EGA_ROWS);
  189.     sysinfo_set_item_val("fb.blinking", NULL, true);
  190.     sysinfo_set_item_val("fb.address.physical", NULL, videoram_phys);
  191. }
  192.  
  193. void ega_redraw(void)
  194. {
  195.     memcpy(videoram, backbuf, EGA_VRAM_SIZE);
  196.     ega_move_cursor();
  197.     ega_show_cursor();
  198. }
  199.  
  200. /** @}
  201.  */
  202.