devvga.c 7.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407
  1. /*
  2. * VGA controller
  3. */
  4. #include "u.h"
  5. #include "../port/lib.h"
  6. #include "mem.h"
  7. #include "dat.h"
  8. #include "fns.h"
  9. #include "io.h"
  10. #include "../port/error.h"
  11. #define Image IMAGE
  12. #include <draw.h>
  13. #include <memdraw.h>
  14. #include <cursor.h>
  15. #include "screen.h"
  16. extern uchar *vgabios;
  17. enum {
  18. Qdir,
  19. Qvgactl,
  20. Qvgabios,
  21. };
  22. static Dirtab vgadir[] = {
  23. ".", { Qdir, 0, QTDIR }, 0, 0550,
  24. "vgactl", { Qvgactl, 0 }, 0, 0660,
  25. "vgabios", { Qvgabios, 0 }, 0x10000, 0440,
  26. };
  27. static void
  28. vgareset(void)
  29. {
  30. /* reserve the 'standard' vga registers */
  31. if(ioalloc(0x2b0, 0x2df-0x2b0+1, 0, "vga") < 0)
  32. panic("vga ports already allocated");
  33. if(ioalloc(0x3c0, 0x3da-0x3c0+1, 0, "vga") < 0)
  34. panic("vga ports already allocated");
  35. conf.monitor = 1;
  36. }
  37. static Chan*
  38. vgaattach(char* spec)
  39. {
  40. if(*spec && strcmp(spec, "0"))
  41. error(Eio);
  42. return devattach('v', spec);
  43. }
  44. Walkqid*
  45. vgawalk(Chan* c, Chan *nc, char** name, int nname)
  46. {
  47. return devwalk(c, nc, name, nname, vgadir, nelem(vgadir), devgen);
  48. }
  49. static int
  50. vgastat(Chan* c, uchar* dp, int n)
  51. {
  52. return devstat(c, dp, n, vgadir, nelem(vgadir), devgen);
  53. }
  54. static Chan*
  55. vgaopen(Chan* c, int omode)
  56. {
  57. return devopen(c, omode, vgadir, nelem(vgadir), devgen);
  58. }
  59. static void
  60. vgaclose(Chan*)
  61. {
  62. }
  63. static void
  64. checkport(int start, int end)
  65. {
  66. /* standard vga regs are OK */
  67. if(start >= 0x2b0 && end <= 0x2df+1)
  68. return;
  69. if(start >= 0x3c0 && end <= 0x3da+1)
  70. return;
  71. if(iounused(start, end))
  72. return;
  73. error(Eperm);
  74. }
  75. static long
  76. vgaread(Chan* c, void* a, long n, vlong off)
  77. {
  78. int len;
  79. char *p, *s;
  80. VGAscr *scr;
  81. ulong offset = off;
  82. char chbuf[30];
  83. switch((ulong)c->qid.path){
  84. case Qdir:
  85. return devdirread(c, a, n, vgadir, nelem(vgadir), devgen);
  86. case Qvgactl:
  87. scr = &vgascreen[0];
  88. p = malloc(READSTR);
  89. if(waserror()){
  90. free(p);
  91. nexterror();
  92. }
  93. len = 0;
  94. if(scr->dev)
  95. s = scr->dev->name;
  96. else
  97. s = "cga";
  98. len += snprint(p+len, READSTR-len, "type %s\n", s);
  99. if(scr->gscreen) {
  100. len += snprint(p+len, READSTR-len, "size %dx%dx%d %s\n",
  101. scr->gscreen->r.max.x, scr->gscreen->r.max.y,
  102. scr->gscreen->depth, chantostr(chbuf, scr->gscreen->chan));
  103. if(Dx(scr->gscreen->r) != Dx(physgscreenr)
  104. || Dy(scr->gscreen->r) != Dy(physgscreenr))
  105. len += snprint(p+len, READSTR-len, "actualsize %dx%d\n",
  106. physgscreenr.max.x, physgscreenr.max.y);
  107. }
  108. len += snprint(p+len, READSTR-len, "blanktime %lud\n", blanktime);
  109. len += snprint(p+len, READSTR-len, "hwaccel %s\n", hwaccel ? "on" : "off");
  110. len += snprint(p+len, READSTR-len, "hwblank %s\n", hwblank ? "on" : "off");
  111. snprint(p+len, READSTR-len, "addr 0x%lux\n", scr->paddr);
  112. n = readstr(offset, a, n, p);
  113. poperror();
  114. free(p);
  115. return n;
  116. case Qvgabios:
  117. if(vgabios == nil)
  118. error(Egreg);
  119. if(offset&0x80000000)
  120. offset &= ~0x800E0000;
  121. if(offset+n > 0x10000)
  122. n = 0x10000-offset;
  123. if(n < 0)
  124. return 0;
  125. memmove(a, vgabios+offset, n);
  126. return n;
  127. default:
  128. error(Egreg);
  129. break;
  130. }
  131. return 0;
  132. }
  133. static char Ebusy[] = "vga already configured";
  134. static void
  135. vgactl(char* a)
  136. {
  137. int align, i, n, size, x, y, z;
  138. char *chanstr, *field[6], *p;
  139. ulong chan;
  140. VGAscr *scr;
  141. extern VGAdev *vgadev[];
  142. extern VGAcur *vgacur[];
  143. Rectangle r;
  144. n = tokenize(a, field, nelem(field));
  145. if(n < 1)
  146. error(Ebadarg);
  147. scr = &vgascreen[0];
  148. if(strcmp(field[0], "hwgc") == 0){
  149. if(n < 2)
  150. error(Ebadarg);
  151. if(strcmp(field[1], "off") == 0){
  152. lock(&cursor);
  153. if(scr->cur){
  154. if(scr->cur->disable)
  155. scr->cur->disable(scr);
  156. scr->cur = nil;
  157. }
  158. unlock(&cursor);
  159. return;
  160. }
  161. for(i = 0; vgacur[i]; i++){
  162. if(strcmp(field[1], vgacur[i]->name))
  163. continue;
  164. lock(&cursor);
  165. if(scr->cur && scr->cur->disable)
  166. scr->cur->disable(scr);
  167. scr->cur = vgacur[i];
  168. if(scr->cur->enable)
  169. scr->cur->enable(scr);
  170. unlock(&cursor);
  171. return;
  172. }
  173. }
  174. else if(strcmp(field[0], "type") == 0){
  175. if(n < 2)
  176. error(Ebadarg);
  177. for(i = 0; vgadev[i]; i++){
  178. if(strcmp(field[1], vgadev[i]->name))
  179. continue;
  180. if(scr->dev && scr->dev->disable)
  181. scr->dev->disable(scr);
  182. scr->dev = vgadev[i];
  183. if(scr->dev->enable)
  184. scr->dev->enable(scr);
  185. return;
  186. }
  187. }
  188. else if(strcmp(field[0], "size") == 0){
  189. if(n < 3)
  190. error(Ebadarg);
  191. if(drawhasclients())
  192. error(Ebusy);
  193. x = strtoul(field[1], &p, 0);
  194. if(x == 0 || x > 2048)
  195. error(Ebadarg);
  196. if(*p)
  197. p++;
  198. y = strtoul(p, &p, 0);
  199. if(y == 0 || y > 2048)
  200. error(Ebadarg);
  201. if(*p)
  202. p++;
  203. z = strtoul(p, &p, 0);
  204. chanstr = field[2];
  205. if((chan = strtochan(chanstr)) == 0)
  206. error("bad channel");
  207. if(chantodepth(chan) != z)
  208. error("depth, channel do not match");
  209. cursoroff(1);
  210. deletescreenimage();
  211. if(screensize(x, y, z, chan))
  212. error(Egreg);
  213. vgascreenwin(scr);
  214. cursoron(1);
  215. return;
  216. }
  217. else if(strcmp(field[0], "actualsize") == 0){
  218. if(scr->gscreen == nil)
  219. error("set the screen size first");
  220. if(n < 2)
  221. error(Ebadarg);
  222. x = strtoul(field[1], &p, 0);
  223. if(x == 0 || x > 2048)
  224. error(Ebadarg);
  225. if(*p)
  226. p++;
  227. y = strtoul(p, nil, 0);
  228. if(y == 0 || y > 2048)
  229. error(Ebadarg);
  230. if(x > scr->gscreen->r.max.x || y > scr->gscreen->r.max.y)
  231. error("physical screen bigger than virtual");
  232. r = Rect(0,0,x,y);
  233. if(!eqrect(r, scr->gscreen->r)){
  234. if(scr->cur == nil || scr->cur->doespanning == 0)
  235. error("virtual screen not supported");
  236. }
  237. physgscreenr = r;
  238. return;
  239. }
  240. else if(strcmp(field[0], "palettedepth") == 0){
  241. if(n < 2)
  242. error(Ebadarg);
  243. x = strtoul(field[1], &p, 0);
  244. if(x != 8 && x != 6)
  245. error(Ebadarg);
  246. scr->palettedepth = x;
  247. return;
  248. }
  249. else if(strcmp(field[0], "drawinit") == 0){
  250. if(scr && scr->dev && scr->dev->drawinit)
  251. scr->dev->drawinit(scr);
  252. return;
  253. }
  254. else if(strcmp(field[0], "linear") == 0){
  255. if(n < 2)
  256. error(Ebadarg);
  257. size = strtoul(field[1], 0, 0);
  258. if(n < 3)
  259. align = 0;
  260. else
  261. align = strtoul(field[2], 0, 0);
  262. if(screenaperture(size, align))
  263. error("not enough free address space");
  264. return;
  265. }
  266. /* else if(strcmp(field[0], "memset") == 0){
  267. if(n < 4)
  268. error(Ebadarg);
  269. memset((void*)strtoul(field[1], 0, 0), atoi(field[2]), atoi(field[3]));
  270. return;
  271. }
  272. */
  273. else if(strcmp(field[0], "blank") == 0){
  274. if(n < 1)
  275. error(Ebadarg);
  276. drawblankscreen(1);
  277. return;
  278. }
  279. else if(strcmp(field[0], "blanktime") == 0){
  280. if(n < 2)
  281. error(Ebadarg);
  282. blanktime = strtoul(field[1], 0, 0);
  283. return;
  284. }
  285. else if(strcmp(field[0], "hwaccel") == 0){
  286. if(n < 2)
  287. error(Ebadarg);
  288. if(strcmp(field[1], "on") == 0)
  289. hwaccel = 1;
  290. else if(strcmp(field[1], "off") == 0)
  291. hwaccel = 0;
  292. return;
  293. }
  294. else if(strcmp(field[0], "hwblank") == 0){
  295. if(n < 2)
  296. error(Ebadarg);
  297. if(strcmp(field[1], "on") == 0)
  298. hwblank = 1;
  299. else if(strcmp(field[1], "off") == 0)
  300. hwblank = 0;
  301. return;
  302. }
  303. error(Ebadarg);
  304. }
  305. static long
  306. vgawrite(Chan* c, void* a, long n, vlong off)
  307. {
  308. char *p;
  309. ulong offset = off;
  310. switch((ulong)c->qid.path){
  311. case Qdir:
  312. error(Eperm);
  313. case Qvgactl:
  314. if(offset || n >= READSTR)
  315. error(Ebadarg);
  316. p = malloc(READSTR);
  317. if(waserror()){
  318. free(p);
  319. nexterror();
  320. }
  321. memmove(p, a, n);
  322. p[n] = 0;
  323. vgactl(p);
  324. poperror();
  325. free(p);
  326. return n;
  327. default:
  328. error(Egreg);
  329. break;
  330. }
  331. return 0;
  332. }
  333. Dev vgadevtab = {
  334. 'v',
  335. "vga",
  336. vgareset,
  337. devinit,
  338. devshutdown,
  339. vgaattach,
  340. vgawalk,
  341. vgastat,
  342. vgaopen,
  343. devcreate,
  344. vgaclose,
  345. vgaread,
  346. devbread,
  347. vgawrite,
  348. devbwrite,
  349. devremove,
  350. devwstat,
  351. };