cyber938x.c 6.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340
  1. #include <u.h>
  2. #include <libc.h>
  3. #include <bio.h>
  4. #include "pci.h"
  5. #include "vga.h"
  6. /*
  7. * Trident Cyber938x.
  8. */
  9. typedef struct {
  10. uchar old[3];
  11. int pcr; /* Pixel Command Register */
  12. int x;
  13. int y;
  14. } Cyber938x;
  15. /*
  16. * Access to the DAC Pixel Command Register.
  17. * The access is similar to that used on the old
  18. * SGS-Thompson STG1702 Enhanced True Color Palette-DAC
  19. * and Sierra SC1502[56] HiCOLOR-24 Palette.
  20. */
  21. static void
  22. pcrrw(void)
  23. {
  24. int i;
  25. inportb(PaddrW);
  26. for(i = 0; i < 4; i++)
  27. inportb(Pixmask);
  28. }
  29. static int
  30. pcrr(void)
  31. {
  32. int pcr;
  33. pcrrw();
  34. pcr = inportb(Pixmask);
  35. inportb(PaddrW);
  36. return pcr;
  37. }
  38. static void
  39. pcrw(int pcr)
  40. {
  41. pcrrw();
  42. outportb(Pixmask, pcr);
  43. inportb(PaddrW);
  44. }
  45. static void
  46. snarf(Vga* vga, Ctlr* ctlr)
  47. {
  48. int i;
  49. Cyber938x *cyber;
  50. if(vga->private == nil)
  51. vga->private = alloc(sizeof(Cyber938x));
  52. cyber = vga->private;
  53. /*
  54. * Switch to old mode (write to Seq0B), read the old
  55. * mode registers (Seq0[CDE]) then switch to new mode
  56. * (read Seq0B).
  57. */
  58. vgaxo(Seqx, 0x0B, 0);
  59. cyber->old[0] = vgaxi(Seqx, 0x0C);
  60. cyber->old[1] = vgaxi(Seqx, 0x0D);
  61. cyber->old[2] = vgaxi(Seqx, 0x0E);
  62. vga->sequencer[0x0B] = vgaxi(Seqx, 0x0B);
  63. cyber->pcr = pcrr();
  64. for(i = 0x08; i < 0x20; i++){
  65. if(i == 0x0B)
  66. continue;
  67. vga->sequencer[i] = vgaxi(Seqx, i);
  68. }
  69. for(i = 0x19; i < 0x60; i++)
  70. vga->crt[i] = vgaxi(Crtx, i);
  71. vga->crt[0xCF] = vgaxi(Crtx, 0xCF);
  72. for(i = 0x09; i < 0x60; i++)
  73. vga->graphics[i] = vgaxi(Grx, i);
  74. vga->vma = 4*1024*1024;
  75. switch(vga->crt[0x1F] & 0x07){
  76. case 0:
  77. case 4:
  78. vga->vma = 8*1024*1024;
  79. vga->vmz = 8*1024*1024;
  80. break;
  81. case 1:
  82. case 5:
  83. vga->vmz = 4*1024*1024;
  84. break;
  85. case 2:
  86. case 6:
  87. vga->vmz = 768*1024;
  88. break;
  89. case 7:
  90. vga->vmz = 2*1024*1024;
  91. break;
  92. case 3:
  93. default:
  94. vga->vmz = 1024*1024;
  95. break;
  96. }
  97. switch((vga->graphics[0x52]>>4) & 0x03){
  98. case 0:
  99. cyber->x = 1280;
  100. cyber->y = 1024;
  101. break;
  102. case 1:
  103. cyber->x = 640;
  104. cyber->y = 480;
  105. break;
  106. case 2:
  107. cyber->x = 1024;
  108. cyber->y = 768;
  109. break;
  110. case 3:
  111. cyber->x = 800;
  112. cyber->y = 600;
  113. break;
  114. }
  115. ctlr->flag |= Fsnarf;
  116. }
  117. static void
  118. options(Vga* vga, Ctlr* ctlr)
  119. {
  120. USED(vga);
  121. ctlr->flag |= Hlinear|Foptions;
  122. }
  123. static void
  124. init(Vga* vga, Ctlr* ctlr)
  125. {
  126. Cyber938x *cyber;
  127. cyber = vga->private;
  128. vga->crt[0x1E] = 0x80;
  129. vga->crt[0x2A] |= 0x40;
  130. if(vga->linear && (ctlr->flag & Hlinear))
  131. ctlr->flag |= Ulinear;
  132. vga->graphics[0x31] &= 0x8F;
  133. if(vga->mode->y > 768)
  134. vga->graphics[0x31] |= 0x30;
  135. else if(vga->mode->y > 600)
  136. vga->graphics[0x31] |= 0x20;
  137. else if(vga->mode->y > 480)
  138. vga->graphics[0x31] |= 0x10;
  139. switch(vga->mode->z){
  140. case 8:
  141. cyber->pcr = 0; /* DAC Pixel Command Register */
  142. vga->crt[0x38] = 0x00; /* Pixel Bus Register */
  143. break;
  144. case 16:
  145. cyber->pcr = 0x30;
  146. vga->crt[0x38] = 0x05;
  147. vga->crt[0x29] |= 0x10; /* RSC: necessary for Versa SX */
  148. break;
  149. case 24:
  150. cyber->pcr = 0xD0;
  151. vga->crt[0x38] = 0x29;
  152. break;
  153. default:
  154. error("depth %d not supported\n", vga->mode->z);
  155. }
  156. switch(vga->sequencer[0x09]){
  157. default:
  158. error("unknown Cyber revision 0x%uX\n", vga->sequencer[0x09]);
  159. break;
  160. case 0x21: /* ProVidia 9685 */
  161. /*
  162. * Incomplete - no clock code so only 640x480x8 works.
  163. */
  164. vga->attribute[0x11] = 0;
  165. vga->graphics[0x0F] |= 0x07;
  166. break;
  167. case 0x42: /* Cyber9382 */
  168. /*
  169. * Try a little magic for DSTN displays.
  170. * May work on other chips too, who knows.
  171. */
  172. if(!(vga->graphics[0x42] & 0x80) /* !TFT */
  173. && (vga->graphics[0x43] & 0x20)){ /* DSTN */
  174. if(vga->mode->x == 640)
  175. vga->graphics[0x30] |= 0x81;
  176. else
  177. vga->graphics[0x30] &= ~0x81;
  178. }
  179. /*FALLTHROUGH*/
  180. case 0x3: /* Cyber9320 */
  181. case 0x33: /* Cyber9385 */
  182. case 0x34: /* Cyber9385 */
  183. case 0x35: /* Cyber9385 */
  184. case 0x3A: /* Cyber9385 */
  185. vga->graphics[0x0F] |= 0x07;
  186. break;
  187. case 0x41: /* Cyber9525/DVD */
  188. vga->graphics[0x0F] |= 0x17;
  189. break;
  190. case 0x4A: /* Cyber9388 */
  191. case 0x5D: /* CyberBlade */
  192. case 0x6A: /* CyberBlade (iTuner) */
  193. case 0x7A: /* CyberBlade */
  194. vga->crt[0x2F] = 0x3F;
  195. vga->graphics[0x0F] |= 0x17;
  196. if(vga->mode->x == 1024)
  197. vga->graphics[0x30] = 0x18;
  198. break;
  199. }
  200. vga->graphics[0x52] &= ~0x01;
  201. vga->graphics[0x53] &= ~0x01;
  202. ctlr->flag |= Finit;
  203. }
  204. static void
  205. load(Vga* vga, Ctlr* ctlr)
  206. {
  207. Cyber938x *cyber;
  208. cyber = vga->private;
  209. outportw(0x3C4, 0x000B);
  210. outportb(0x3C4, 0x0B);
  211. inportb(0x3C5);
  212. pcrw(cyber->pcr);
  213. outportw(0x3C4, (0xC2 << 8) | 0x0E);
  214. vgaxo(Grx, 0x52, vga->graphics[0x52]);
  215. vgaxo(Grx, 0x53, vga->graphics[0x53]);
  216. vgaxo(Grx, 0x30, vga->graphics[0x30]);
  217. vgaxo(Grx, 0x31, vga->graphics[0x31]);
  218. vgaxo(Crtx, 0x1E, vga->crt[0x1E]);
  219. if(ctlr->flag & Ulinear)
  220. vga->crt[0x21] |= 0x20;
  221. vgaxo(Crtx, 0x21, vga->crt[0x21]);
  222. vgaxo(Crtx, 0x29, vga->crt[0x29]);
  223. vgaxo(Crtx, 0x2A, vga->crt[0x2A]);
  224. vgaxo(Crtx, 0x2F, vga->crt[0x2F]);
  225. vgaxo(Crtx, 0x38, vga->crt[0x38]);
  226. vgaxo(Grx, 0x0F, vga->graphics[0x0F]);
  227. ctlr->flag |= Fload;
  228. }
  229. static void
  230. dump(Vga* vga, Ctlr* ctlr)
  231. {
  232. char *name;
  233. Cyber938x *cyber;
  234. int i, k, m, n, vclka, vclkb;
  235. name = ctlr->name;
  236. cyber = vga->private;
  237. printitem(name, "Seq08");
  238. for(i = 0x08; i < 0x20; i++)
  239. printreg(vga->sequencer[i]);
  240. printitem(name, "Old Seq0C");
  241. for(i = 0; i < 3; i++)
  242. printreg(cyber->old[i]);
  243. printitem(name, "pcr");
  244. printreg(cyber->pcr);
  245. printitem(name, "Crt19");
  246. for(i = 0x19; i < 0x20; i++)
  247. printreg(vga->crt[i]);
  248. printitem(name, "Crt20");
  249. for(i = 0x20; i < 0x60; i++)
  250. printreg(vga->crt[i]);
  251. printitem(name, "CrtCF");
  252. printreg(vga->crt[0xCF]);
  253. printitem(name, "Gr09");
  254. for(i = 0x09; i < 0x10; i++)
  255. printreg(vga->graphics[i]);
  256. printitem(name, "Gr10");
  257. for(i = 0x10; i < 0x60; i++)
  258. printreg(vga->graphics[i]);
  259. if(vga->sequencer[0x09] >= 0x4A){
  260. vclka = vga->sequencer[0x18];
  261. vclkb = vga->sequencer[0x19];
  262. }
  263. else{
  264. vclka = inportb(0x43C8);
  265. vclkb = inportb(0x43C9);
  266. printitem(name, "mclk");
  267. printreg(inportb(0x43C6));
  268. printreg(inportb(0x43C7));
  269. }
  270. printitem(name, "vclk");
  271. printreg(vclka);
  272. printreg(vclkb);
  273. k = vclkb>>6;
  274. m = vclkb & 0x3F;
  275. n = vclka;
  276. Bprint(&stdout, "%18d\n", (((n+8)*RefFreq)*(1<<k))/(m+2));
  277. printitem(name, "lcd size");
  278. Bprint(&stdout, "%9ud %8ud\n", cyber->x, cyber->y);
  279. }
  280. Ctlr cyber938x = {
  281. "cyber938x", /* name */
  282. snarf, /* snarf */
  283. options, /* options */
  284. init, /* init */
  285. load, /* load */
  286. dump, /* dump */
  287. };
  288. Ctlr cyber938xhwgc = {
  289. "cyber938xhwgc", /* name */
  290. 0, /* snarf */
  291. 0, /* options */
  292. 0, /* init */
  293. 0, /* load */
  294. 0, /* dump */
  295. };