Kernel/drv/vga.c

   1 /*
   2  * Acess2 VGA Controller Driver
   3  */
   4 #define DEBUG   0
   5 #include <acess.h>
   6 #include <fs_devfs.h>
   7 #include <tpl_drv_video.h>
   8 #include <modules.h>
   9
  10 // === CONSTANTS ===
  11 #define VGA_WIDTH       80
  12 #define VGA_HEIGHT      25
  13
  14 // === PROTOTYPES ===
  15  int    VGA_Install(char **Arguments);
  16 Uint64  VGA_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer);
  17  int    VGA_IOCtl(tVFS_Node *Node, int Id, void *Data);
  18 Uint16  VGA_int_GetWord(tVT_Char *Char);
  19 void    VGA_int_SetCursor(Sint16 x, Sint16 y);
  20
  21 // === GLOBALS ===
  22 MODULE_DEFINE(0, 0x000A, VGA, VGA_Install, NULL, NULL);
  23 tDevFS_Driver   gVGA_DevInfo = {
  24         NULL, "VGA",
  25         {
  26         .NumACLs = 0,
  27         .Size = VGA_WIDTH*VGA_HEIGHT*sizeof(tVT_Char),
  28         //.Read = VGA_Read,
  29         .Write = VGA_Write,
  30         .IOCtl = VGA_IOCtl
  31         }
  32 };
  33 Uint16  *gVGA_Framebuffer = (void*)( KERNEL_BASE|0xB8000 );
  34
  35 // === CODE ===
  36 /**
  37  * \fn int VGA_Install(char **Arguments)
  38  */
  39 int VGA_Install(char **Arguments)
  40 {
  41         Uint8   byte;
  42
  43         // Enable Bright Backgrounds
  44         inb(0x3DA);     // Reset flipflop
  45         outb(0x3C0, 0x30);      // Index 0x10, PAS
  46         byte = inb(0x3C1);
  47         byte &= ~8;     // Disable Blink
  48         outb(0x3C0, byte);      // Write value
  49
  50
  51         // Install DevFS
  52         DevFS_AddDevice( &gVGA_DevInfo );
  53
  54         return MODULE_ERR_OK;
  55 }
  56
  57 /**
  58  * \fn Uint64 VGA_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)
  59  * \brief Writes a string of bytes to the VGA controller
  60  */
  61 Uint64 VGA_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)
  62 {
  63          int    num = Length / sizeof(tVT_Char);
  64          int    ofs = Offset / sizeof(tVT_Char);
  65          int    i = 0;
  66         tVT_Char        *chars = Buffer;
  67         Uint16  word;
  68
  69         //ENTER("pNode XOffset XLength pBuffer", Node, Offset, Length, Buffer);
  70
  71         for( ; num--; i ++, ofs ++)
  72         {
  73                 word = VGA_int_GetWord( &chars[i] );
  74                 gVGA_Framebuffer[ ofs ] = word;
  75         }
  76
  77         //LEAVE('X', Length);
  78         return Length;
  79 }
  80
  81 /**
  82  * \fn int VGA_IOCtl(tVFS_Node *Node, int Id, void *Data)
  83  * \brief IO Control Call
  84  */
  85 int VGA_IOCtl(tVFS_Node *Node, int Id, void *Data)
  86 {
  87         switch(Id)
  88         {
  89         case DRV_IOCTL_TYPE:    return DRV_TYPE_VIDEO;
  90         case DRV_IOCTL_IDENT:   memcpy(Data, "VGA\0", 4);       return 1;
  91         case DRV_IOCTL_VERSION: *(int*)Data = 50;       return 1;
  92         case DRV_IOCTL_LOOKUP:  return 0;
  93
  94         case VIDEO_IOCTL_GETSETMODE:    return 0;       // Mode 0 only
  95         case VIDEO_IOCTL_FINDMODE:      return 0;       // Text Only!
  96         case VIDEO_IOCTL_MODEINFO:
  97                 if( ((tVideo_IOCtl_Mode*)Data)->id != 0)        return 0;
  98                 ((tVideo_IOCtl_Mode*)Data)->width = VGA_WIDTH;
  99                 ((tVideo_IOCtl_Mode*)Data)->height = VGA_HEIGHT;
 100                 ((tVideo_IOCtl_Mode*)Data)->bpp = 4;
 101                 return 1;
 102
 103         case VIDEO_IOCTL_SETBUFFORMAT:
 104                 return 0;
 105
 106         case VIDEO_IOCTL_SETCURSOR:
 107                 VGA_int_SetCursor( ((tVideo_IOCtl_Pos*)Data)->x, ((tVideo_IOCtl_Pos*)Data)->y );
 108                 return 1;
 109         }
 110         return 0;
 111 }
 112
 113 /**
 114  * \fn Uint8 VGA_int_GetColourNibble(Uint16 col)
 115  * \brief Converts a 12-bit colour into a VGA 4-bit colour
 116  */
 117 Uint8 VGA_int_GetColourNibble(Uint16 col)
 118 {
 119         Uint8   ret = 0;
 120          int    bright = 0;
 121
 122         col = col & 0xCCC;
 123         col = ((col>>2)&3) | ((col>>4)&0xC) | ((col>>6)&0x30);
 124         bright = ( (col & 2 ? 1 : 0) + (col & 8 ? 1 : 0) + (col & 32 ? 1 : 0) ) / 2;
 125
 126         switch(col)
 127         {
 128         //      Black
 129         case 0x00:      ret = 0x0;      break;
 130         // Dark Grey
 131         case 0x15:      ret = 0x8;      break;
 132         // Blues
 133         case 0x01:
 134         case 0x02:      ret = 0x1;      break;
 135         case 0x03:      ret = 0x9;      break;
 136         // Green
 137         case 0x04:
 138         case 0x08:      ret = 0x2;      break;
 139         case 0x0C:      ret = 0xA;      break;
 140         // Reds
 141         case 0x10:
 142         case 0x20:      ret = 0x4;      break;
 143         case 0x30:      ret = 0xC;      break;
 144         // Light Grey
 145         case 0x2A:      ret = 0x7;      break;
 146         // White
 147         case 0x3F:      ret = 0xF;      break;
 148
 149         default:
 150                 ret |= (col & 0x03 ? 1 : 0);
 151                 ret |= (col & 0x0C ? 2 : 0);
 152                 ret |= (col & 0x30 ? 4 : 0);
 153                 ret |= (bright ? 8 : 0);
 154                 break;
 155         }
 156         return ret;
 157 }
 158
 159 /**
 160  * \fn Uint16 VGA_int_GetWord(tVT_Char *Char)
 161  * \brief Convers a character structure to a VGA character word
 162  */
 163 Uint16 VGA_int_GetWord(tVT_Char *Char)
 164 {
 165         Uint16  ret;
 166         Uint16  col;
 167
 168         // Get Character
 169         if(Char->Ch < 128)
 170                 ret = Char->Ch;
 171         else {
 172                 switch(Char->Ch)
 173                 {
 174                 default:        ret = 0;        break;
 175                 }
 176         }
 177
 178         col = VGA_int_GetColourNibble(Char->BGCol);
 179         ret |= col << 12;
 180
 181         col = VGA_int_GetColourNibble(Char->FGCol);
 182         ret |= col << 8;
 183
 184         return ret;
 185 }
 186
 187 /**
 188  * \fn void VGA_int_SetCursor(Sint16 x, Sint16 y)
 189  * \brief Updates the cursor position
 190  */
 191 void VGA_int_SetCursor(Sint16 x, Sint16 y)
 192 {
 193          int    pos = x+y*VGA_WIDTH;
 194         if(x == -1 || y == -1)
 195                 pos = -1;
 196     outb(0x3D4, 14);
 197     outb(0x3D5, pos >> 8);
 198     outb(0x3D4, 15);
 199     outb(0x3D5, pos);
 200 }