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         case VIDEO_IOCTL_SETCURSOR:
 103                 VGA_int_SetCursor( ((tVideo_IOCtl_Pos*)Data)->x, ((tVideo_IOCtl_Pos*)Data)->y );
 104                 return 1;
 105         }
 106         return 0;
 107 }
 108
 109 /**
 110  * \fn Uint8 VGA_int_GetColourNibble(Uint16 col)
 111  * \brief Converts a 12-bit colour into a VGA 4-bit colour
 112  */
 113 Uint8 VGA_int_GetColourNibble(Uint16 col)
 114 {
 115         Uint8   ret = 0;
 116          int    bright = 0;
 117
 118         col = col & 0xCCC;
 119         col = ((col>>2)&3) | ((col>>4)&0xC) | ((col>>6)&0x30);
 120         bright = ( (col & 2 ? 1 : 0) + (col & 8 ? 1 : 0) + (col & 32 ? 1 : 0) ) / 2;
 121
 122
 123         switch(col)
 124         {
 125         //      Black
 126         case 0x00:      ret = 0x0;      break;
 127         // Dark Grey
 128         case 0x15:      ret = 0x8;      break;
 129         // Blues
 130         case 0x01:
 131         case 0x02:      ret = 0x1;      break;
 132         case 0x03:      ret = 0x9;      break;
 133         // Green
 134         case 0x04:
 135         case 0x08:      ret = 0x2;      break;
 136         case 0x0C:      ret = 0xA;      break;
 137         // Reds
 138         case 0x10:
 139         case 0x20:      ret = 0x4;      break;
 140         case 0x30:      ret = 0xC;      break;
 141         // Light Grey
 142         case 0x2A:      ret = 0x7;      break;
 143         // White
 144         case 0x3F:      ret = 0xF;      break;
 145
 146         default:
 147                 ret |= (col & 0x03 ? 1 : 0);
 148                 ret |= (col & 0x0C ? 2 : 0);
 149                 ret |= (col & 0x30 ? 4 : 0);
 150                 ret |= (bright ? 8 : 0);
 151                 break;
 152         }
 153         return ret;
 154 }
 155
 156 /**
 157  * \fn Uint16 VGA_int_GetWord(tVT_Char *Char)
 158  * \brief Convers a character structure to a VGA character word
 159  */
 160 Uint16 VGA_int_GetWord(tVT_Char *Char)
 161 {
 162         Uint16  ret;
 163         Uint16  col;
 164
 165         // Get Character
 166         if(Char->Ch < 128)
 167                 ret = Char->Ch;
 168         else {
 169                 switch(Char->Ch)
 170                 {
 171                 default:        ret = 0;        break;
 172                 }
 173         }
 174
 175         col = VGA_int_GetColourNibble(Char->BGCol);
 176         ret |= col << 12;
 177
 178         col = VGA_int_GetColourNibble(Char->FGCol);
 179         ret |= col << 8;
 180
 181         return ret;
 182 }
 183
 184 /**
 185  * \fn void VGA_int_SetCursor(Sint16 x, Sint16 y)
 186  * \brief Updates the cursor position
 187  */
 188 void VGA_int_SetCursor(Sint16 x, Sint16 y)
 189 {
 190          int    pos = x+y*VGA_WIDTH;
 191         if(x == -1 || y == -1)
 192                 pos = -1;
 193     outb(0x3D4, 14);
 194     outb(0x3D5, pos >> 8);
 195     outb(0x3D4, 15);
 196     outb(0x3D5, pos);
 197 }