sys/src/9/pc/vgaigfx.c

   1 #include "u.h"
   2 #include "../port/lib.h"
   3 #include "mem.h"
   4 #include "dat.h"
   5 #include "fns.h"
   6 #include "io.h"
   7 #include "../port/error.h"
   8
   9 #define Image   IMAGE
  10 #include <draw.h>
  11 #include <memdraw.h>
  12 #include <cursor.h>
  13 #include "screen.h"
  14
  15 static ulong
  16 stolenmb(Pcidev *p)
  17 {
  18         switch(p->did){
  19         case 0x0412:    /* Haswell HD Graphics 4600 */
  20         case 0x0a16:    /* Haswell HD Graphics 4400 */
  21         case 0x0126:    /* Sandy Bridge HD Graphics 3000 */
  22         case 0x0166:    /* Ivy Bridge */
  23         case 0x0102:    /* Core-5 Sandy Bridge */
  24         case 0x0152:    /* Core-i3 */
  25                 switch((pcicfgr16(p, 0x50) >> 3) & 0x1f){
  26                 case 0x01:      return 32  - 2;
  27                 case 0x02:      return 64  - 2;         /* 0102 Dell machine here */
  28                 case 0x03:      return 96  - 2;
  29                 case 0x04:      return 128 - 2;
  30                 case 0x05:      return 32  - 2;
  31                 case 0x06:      return 48  - 2;
  32                 case 0x07:      return 64  - 2;
  33                 case 0x08:      return 128 - 2;
  34                 case 0x09:      return 256 - 2;
  35                 case 0x0A:      return 96  - 2;
  36                 case 0x0B:      return 160 - 2;
  37                 case 0x0C:      return 224 - 2;
  38                 case 0x0D:      return 352 - 2;
  39                 case 0x0E:      return 448 - 2;
  40                 case 0x0F:      return 480 - 2;
  41                 case 0x10:      return 512 - 2;
  42                 }
  43                 break;
  44         case 0x2a42:    /* X200 */
  45         case 0x29a2:    /* 82P965/G965 HECI desktop */
  46         case 0x2a02:    /* CF-R7 */
  47                 switch((pcicfgr16(p, 0x52) >> 4) & 7){
  48                 case 0x01:      return 1;
  49                 case 0x02:      return 4;
  50                 case 0x03:      return 8;
  51                 case 0x04:      return 16;
  52                 case 0x05:      return 32;
  53                 case 0x06:      return 48;
  54                 case 0x07:      return 64;
  55                 }
  56                 break;
  57         }
  58         return 0;
  59 }
  60
  61 static uintptr
  62 gmsize(Pcidev *pci, void *mmio)
  63 {
  64         u32int x, i, npg, *gtt;
  65
  66         npg = stolenmb(pci)<<(20-12);
  67         if(npg == 0)
  68                 return 0;
  69         gtt = (u32int*)((uchar*)mmio + pci->mem[0].size/2);
  70         if((gtt[0]&1) == 0)
  71                 return 0;
  72         x = (gtt[0]>>12)+1;
  73         for(i=1; i<npg; i++){
  74                 if((gtt[i]&1) == 0 || (gtt[i]>>12) != x)
  75                         break;
  76                 x++;
  77         }
  78         if(0) print("igfx: graphics memory at %p-%p (%ud MB)\n",
  79                 (uintptr)(x-i)<<12, (uintptr)x<<12, (i>>(20-12)));
  80         return (uintptr)i<<12;
  81 }
  82
  83 static void
  84 igfxenable(VGAscr* scr)
  85 {
  86         Pcidev *p;
  87
  88         if(scr->mmio != nil)
  89                 return;
  90         p = scr->pci;
  91         if(p == nil)
  92                 return;
  93         scr->mmio = vmap(p->mem[0].bar&~0x0F, p->mem[0].size);
  94         if(scr->mmio == nil)
  95                 return;
  96         addvgaseg("igfxmmio", p->mem[0].bar&~0x0F, p->mem[0].size);
  97         if(scr->paddr == 0)
  98                 vgalinearpci(scr);
  99         if(scr->apsize){
 100                 addvgaseg("igfxscreen", scr->paddr, scr->apsize);
 101                 scr->storage = gmsize(p, scr->mmio);
 102                 if(scr->storage < MB)
 103                         scr->storage = 0;
 104                 else if(scr->storage > scr->apsize)
 105                         scr->storage = scr->apsize;
 106                 if(scr->storage != 0)
 107                         scr->storage -= PGROUND(64*64*4);
 108         }
 109         scr->softscreen = 1;
 110 }
 111
 112 VGAdev vgaigfxdev = {
 113         "igfx",
 114         igfxenable,
 115 };
 116
 117 static void
 118 igfxcurload(VGAscr* scr, Cursor* curs)
 119 {
 120         uchar set, clr;
 121         u32int *p;
 122         int i, j;
 123
 124         if(scr->storage == 0)
 125                 return;
 126         p = (u32int*)((uchar*)scr->vaddr + scr->storage);
 127         memset(p, 0, 64*64*4);
 128         for(i=0;i<32;i++) {
 129                 set = curs->set[i];
 130                 clr = curs->clr[i];
 131                 for(j=0x80; j; j>>=1){
 132                         if((set|clr)&j)
 133                                 *p++ = (0xFF<<24) | (set&j ? 0x000000 : 0xFFFFFF);
 134                         else
 135                                 *p++ = 0;
 136                 }
 137                 if(i & 1)
 138                         p += 64-16;
 139         }
 140         scr->offset = curs->offset;
 141 }
 142
 143 enum {
 144         CURCTL = 0,
 145         CURBASE,
 146         CURPOS,
 147
 148         NPIPE = 4,
 149 };
 150
 151 static u32int*
 152 igfxcurregs(VGAscr* scr, int pipe)
 153 {
 154         u32int o;
 155
 156         if(scr->mmio == nil || scr->storage == 0)
 157                 return nil;
 158         o = pipe == 3 ? 0xf000 : pipe*0x1000;
 159         /* check PIPExCONF if enabled */
 160         if((scr->mmio[(0x70008 | o)/4] & (1<<31)) == 0)
 161                 return nil;
 162         switch(scr->pci->did){
 163         case 0x0412:    /* Haswell HD Graphics 4600 */
 164         case 0x0a16:    /* Haswell HD Graphics 4400 */
 165                 if(pipe > 3)
 166                         return nil;
 167                 if(pipe == 3)
 168                         o = 0;
 169                 break;
 170         case 0x0166:    /* Ivy Bridge */
 171         case 0x0152:    /* Core-i3 */
 172         case 0x0126:    /* Sandy Bridge HD Graphics 3000 */
 173                 if(pipe > 2)
 174                         return nil;
 175                 break;
 176         case 0x2a42:    /* X200 */
 177         case 0x29a2:    /* 82P965/G965 HECI desktop */
 178         case 0x2a02:    /* CF-R7 */
 179         case 0x0102:    /* Sndy Bridge */
 180                 if(pipe > 1)
 181                         return nil;
 182                 o = pipe*0x40;
 183                 break;
 184         default:
 185                 if(pipe > 0)
 186                         return nil;
 187         }
 188         return (u32int*)((uchar*)scr->mmio + (0x70080 + o));
 189 }
 190
 191 static int
 192 igfxcurmove(VGAscr* scr, Point p)
 193 {
 194         int i, x, y;
 195         u32int *r;
 196
 197         for(i=0; i<NPIPE; i++){
 198                 if((r = igfxcurregs(scr, i)) != nil){
 199                         x = p.x + scr->offset.x;
 200                         if(x < 0) x = -x | 0x8000;
 201                         y = p.y + scr->offset.y;
 202                         if(y < 0) y = -y | 0x8000;
 203                         r[CURPOS] = (y << 16) | x;
 204                 }
 205         }
 206         return 0;
 207 }
 208
 209 static void
 210 igfxcurenable(VGAscr* scr)
 211 {
 212         u32int *r;
 213         int i;
 214
 215         igfxenable(scr);
 216         igfxcurload(scr, &arrow);
 217         igfxcurmove(scr, ZP);
 218
 219         for(i=0; i<NPIPE; i++){
 220                 if((r = igfxcurregs(scr, i)) != nil){
 221                         r[CURCTL] = (r[CURCTL] & ~(3<<28 | 1<<5)) | (i<<28) | 7;
 222                         r[CURBASE] = scr->storage;
 223                 }
 224         }
 225 }
 226
 227 static void
 228 igfxcurdisable(VGAscr* scr)
 229 {
 230         u32int *r;
 231         int i;
 232
 233         for(i=0; i<NPIPE; i++){
 234                 if((r = igfxcurregs(scr, i)) != nil){
 235                         r[CURCTL] &= ~(1<<5 | 7);
 236                         r[CURBASE] = 0;
 237                 }
 238         }
 239 }
 240
 241 VGAcur vgaigfxcur = {
 242         "igfxhwgc",
 243         igfxcurenable,
 244         igfxcurdisable,
 245         igfxcurload,
 246         igfxcurmove,
 247 };