vidc20config.c revision 1.17 1 /* $NetBSD: vidc20config.c,v 1.17 2003/09/21 15:12:16 matt Exp $ */
2
3 /*
4 * Copyright (c) 2001 Reinoud Zandijk
5 * Copyright (c) 1996 Mark Brinicombe
6 * Copyright (c) 1996 Robert Black
7 * Copyright (c) 1994-1995 Melvyn Tang-Richardson
8 * Copyright (c) 1994-1995 RiscBSD kernel team
9 * All rights reserved.
10 *
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
13 * are met:
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in the
18 * documentation and/or other materials provided with the distribution.
19 * 3. All advertising materials mentioning features or use of this software
20 * must display the following acknowledgement:
21 * This product includes software developed by the RiscBSD kernel team
22 * 4. The name of the company nor the name of the author may be used to
23 * endorse or promote products derived from this software without specific
24 * prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE RISCBSD TEAM ``AS IS'' AND ANY EXPRESS
27 * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
28 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE
30 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
36 * THE POSSIBILITY OF SUCH DAMAGE.
37 *
38 * NetBSD kernel project
39 *
40 * vidcvideo.c
41 *
42 * This file is the lower basis of the wscons driver for VIDC based ARM machines.
43 * It features the initialisation and all VIDC writing and keeps in internal state
44 * copy.
45 * Its currenly set up as a library file and not as a device; it could be named
46 * vidcvideo0 eventually.
47 */
48
49 #include <sys/cdefs.h>
50
51 __KERNEL_RCSID(0, "$NetBSD: vidc20config.c,v 1.17 2003/09/21 15:12:16 matt Exp $");
52
53 #include <sys/types.h>
54 #include <sys/param.h>
55 #include <arm/iomd/vidc.h>
56 #include <arm/arm32/katelib.h>
57 #include <machine/bootconfig.h>
58 #include <machine/intr.h>
59
60 #include <sys/systm.h>
61 #include <sys/device.h>
62 #include <uvm/uvm_extern.h>
63
64 #include <arm/iomd/iomdreg.h>
65 #include <arm/iomd/iomdvar.h>
66 #include <arm/iomd/vidc20config.h>
67
68
69 /*
70 * A structure containing ALL the information required to restore
71 * the VIDC20 to any given state. ALL vidc transactions should
72 * go through these procedures, which record the vidc's state.
73 * it may be an idea to set the permissions of the vidc base address
74 * so we get a fault, so the fault routine can record the state but
75 * I guess that's not really necessary for the time being, since we
76 * can make the kernel more secure later on. Also, it is possible
77 * to write a routine to allow 'reading' of the vidc registers.
78 */
79
80 static struct vidc_state vidc_lookup = {
81 { 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,
82 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,
83 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,
84 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,
85 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,
86 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,
87 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,
88 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0
89 },
90
91 VIDC_PALREG,
92 VIDC_BCOL,
93 VIDC_CP1 ,
94 VIDC_CP2,
95 VIDC_CP3,
96 VIDC_HCR,
97 VIDC_HSWR,
98 VIDC_HBSR,
99 VIDC_HDSR,
100 VIDC_HDER,
101 VIDC_HBER,
102 VIDC_HCSR,
103 VIDC_HIR,
104 VIDC_VCR,
105 VIDC_VSWR,
106 VIDC_VBSR,
107 VIDC_VDSR,
108 VIDC_VDER,
109 VIDC_VBER,
110 VIDC_VCSR,
111 VIDC_VCER,
112 VIDC_EREG,
113 VIDC_FSYNREG,
114 VIDC_CONREG,
115 VIDC_DCTL
116 };
117
118 struct vidc_state vidc_current[1];
119
120
121 /*
122 * XXX global display variables XXX ... should be a structure
123 */
124 static int cold_init = 0; /* flags initialisation */
125 extern videomemory_t videomemory;
126
127 static struct vidc_mode vidc_initialmode;
128 static struct vidc_mode *vidc_currentmode;
129
130 unsigned int dispstart;
131 unsigned int dispsize;
132 unsigned int dispbase;
133 unsigned int dispend;
134 unsigned int ptov;
135 unsigned int vmem_base;
136 unsigned int phys_base;
137 unsigned int transfersize;
138
139
140 /* cursor stuff */
141 char *cursor_normal;
142 char *cursor_transparent;
143 int p_cursor_normal;
144 int p_cursor_transparent;
145 int cursor_width;
146 int cursor_height;
147
148
149 /*
150 * VIDC mode definitions
151 * generated from RISC OS mode definition file by an `awk' script
152 */
153 extern struct vidc_mode vidcmodes[];
154
155
156 /*
157 * configuration printing
158 *
159 */
160
161 void
162 vidcvideo_printdetails(void)
163 {
164 printf(": refclk=%dMHz %dKB %s ", (vidc_fref / 1000000),
165 videomemory.vidm_size / 1024,
166 (videomemory.vidm_type == VIDEOMEM_TYPE_VRAM) ? "VRAM" : "DRAM");
167 }
168
169
170 /*
171 * Common functions to directly access VIDC registers
172 */
173 int
174 vidcvideo_write(reg, value)
175 u_int reg;
176 int value;
177 {
178 int counter;
179
180 int *current;
181 int *tab;
182
183 tab = (int *)&vidc_lookup;
184 current = (int *)vidc_current;
185
186
187 /*
188 * OK, the VIDC_PALETTE register is handled differently
189 * to the others on the VIDC, so take that into account here
190 */
191 if (reg==VIDC_PALREG) {
192 vidc_current->palreg = 0;
193 WriteWord(vidc_base, reg | value);
194 return 0;
195 }
196
197 if (reg==VIDC_PALETTE) {
198 WriteWord(vidc_base, reg | value);
199 vidc_current->palette[vidc_current->palreg] = value;
200 vidc_current->palreg++;
201 vidc_current->palreg = vidc_current->palreg & 0xff;
202 return 0;
203 }
204
205 /*
206 * Undefine SAFER if you wish to speed things up (a little)
207 * although this means the function will assume things abou
208 * the structure of vidc_state. i.e. the first 256 words are
209 * the palette array
210 */
211
212 #define SAFER
213
214 #ifdef SAFER
215 #define INITVALUE 0
216 #else
217 #define INITVALUE 256
218 #endif
219
220 for ( counter=INITVALUE; counter<= sizeof(struct vidc_state); counter++ ) {
221 if ( reg==tab[counter] ) {
222 WriteWord ( vidc_base, reg | value );
223 current[counter] = value;
224 return 0;
225 }
226 }
227 return -1;
228 }
229
230
231 void
232 vidcvideo_setpalette(vidc)
233 struct vidc_state *vidc;
234 {
235 int counter = 0;
236
237 vidcvideo_write(VIDC_PALREG, 0x00000000);
238 for (counter = 0; counter <= 255; counter++)
239 vidcvideo_write(VIDC_PALETTE, vidc->palette[counter]);
240 }
241
242
243 void
244 vidcvideo_setstate(vidc)
245 struct vidc_state *vidc;
246 {
247 vidcvideo_write ( VIDC_PALREG, vidc->palreg );
248 vidcvideo_write ( VIDC_BCOL, vidc->bcol );
249 vidcvideo_write ( VIDC_CP1, vidc->cp1 );
250 vidcvideo_write ( VIDC_CP2, vidc->cp2 );
251 vidcvideo_write ( VIDC_CP3, vidc->cp3 );
252 vidcvideo_write ( VIDC_HCR, vidc->hcr );
253 vidcvideo_write ( VIDC_HSWR, vidc->hswr );
254 vidcvideo_write ( VIDC_HBSR, vidc->hbsr );
255 vidcvideo_write ( VIDC_HDSR, vidc->hdsr );
256 vidcvideo_write ( VIDC_HDER, vidc->hder );
257 vidcvideo_write ( VIDC_HBER, vidc->hber );
258 vidcvideo_write ( VIDC_HCSR, vidc->hcsr );
259 vidcvideo_write ( VIDC_HIR, vidc->hir );
260 vidcvideo_write ( VIDC_VCR, vidc->vcr );
261 vidcvideo_write ( VIDC_VSWR, vidc->vswr );
262 vidcvideo_write ( VIDC_VBSR, vidc->vbsr );
263 vidcvideo_write ( VIDC_VDSR, vidc->vdsr );
264 vidcvideo_write ( VIDC_VDER, vidc->vder );
265 vidcvideo_write ( VIDC_VBER, vidc->vber );
266 vidcvideo_write ( VIDC_VCSR, vidc->vcsr );
267 vidcvideo_write ( VIDC_VCER, vidc->vcer );
268 /*
269 * Right, dunno what to set these to yet, but let's keep RiscOS's
270 * ones for now, until the time is right to finish this code
271 */
272
273 /* vidcvideo_write ( VIDC_EREG, vidc->ereg ); */
274 /* vidcvideo_write ( VIDC_FSYNREG, vidc->fsynreg ); */
275 /* vidcvideo_write ( VIDC_CONREG, vidc->conreg ); */
276 /* vidcvideo_write ( VIDC_DCTL, vidc->dctl ); */
277
278 vidcvideo_setpalette(vidc);
279 }
280
281
282 void
283 vidcvideo_getstate(vidc)
284 struct vidc_state *vidc;
285 {
286 *vidc = *vidc_current;
287 }
288
289
290 void
291 vidcvideo_getmode(mode)
292 struct vidc_mode *mode;
293 {
294 *mode = *vidc_currentmode;
295 }
296
297
298 static int
299 vidcvideo_coldinit(void)
300 {
301 int found;
302 int loop;
303
304 /* Blank out the cursor */
305
306 vidcvideo_write(VIDC_CP1, 0x0);
307 vidcvideo_write(VIDC_CP2, 0x0);
308 vidcvideo_write(VIDC_CP3, 0x0);
309
310 /* Try to determine the current mode */
311 vidc_initialmode.hder = bootconfig.width+1;
312 vidc_initialmode.vder = bootconfig.height+1;
313 vidc_initialmode.log2_bpp = bootconfig.log2_bpp;
314
315 dispbase = vmem_base = dispstart = videomemory.vidm_vbase;
316 phys_base = videomemory.vidm_pbase;
317
318 /* Nut - should be using videomemory.vidm_size - mark */
319 if (videomemory.vidm_type == VIDEOMEM_TYPE_DRAM) {
320 dispsize = videomemory.vidm_size;
321 transfersize = 16;
322 } else {
323 dispsize = bootconfig.vram[0].pages * PAGE_SIZE;
324 transfersize = dispsize >> 10;
325 };
326
327 ptov = dispbase - phys_base;
328
329 dispend = dispstart+dispsize;
330
331 /* try to find the current mode from the bootloader in my table */
332 vidc_currentmode = &vidcmodes[0];
333 loop = 0;
334 found = 0;
335 while (vidcmodes[loop].pixel_rate != 0) {
336 if (vidcmodes[loop].hder == (bootconfig.width + 1)
337 && vidcmodes[loop].vder == (bootconfig.height + 1)
338 && vidcmodes[loop].frame_rate == bootconfig.framerate) {
339 vidc_currentmode = &vidcmodes[loop];
340 found = 1;
341 }
342 ++loop;
343 }
344
345 /* if not found choose first mode but dont be picky on the framerate */
346 if (!found) {
347 vidc_currentmode = &vidcmodes[0];
348 loop = 0;
349 found = 0;
350
351 while (vidcmodes[loop].pixel_rate != 0) {
352 if (vidcmodes[loop].hder == (bootconfig.width + 1)
353 && vidcmodes[loop].vder == (bootconfig.height + 1)) {
354 vidc_currentmode = &vidcmodes[loop];
355 found = 1;
356 }
357 ++loop;
358 }
359 }
360
361 vidc_currentmode->log2_bpp = bootconfig.log2_bpp;
362
363 dispstart = dispbase;
364 dispend = dispstart+dispsize;
365
366 IOMD_WRITE_WORD(IOMD_VIDINIT, dispstart-ptov);
367 IOMD_WRITE_WORD(IOMD_VIDSTART, dispstart-ptov);
368 IOMD_WRITE_WORD(IOMD_VIDEND, (dispend-transfersize)-ptov);
369 return 0;
370 }
371
372
373 /* simple function to abstract vidc variables ; returns virt start address of screen */
374 /* XXX asumption that video memory is mapped in twice */
375 void *vidcvideo_hwscroll(int bytes) {
376 dispstart += bytes;
377 if (dispstart >= dispbase + dispsize) dispstart -= dispsize;
378 if (dispstart < dispbase) dispstart += dispsize;
379 dispend = dispstart+dispsize;
380
381 /* return the start of the bit map of the screen (left top) */
382 return (void *) dispstart;
383 }
384
385
386 /* reset the HW scroll to be at the start for the benefit of f.e. X */
387 void *vidcvideo_hwscroll_reset(void) {
388 void *cookie = (void *) dispstart;
389
390 dispstart = dispbase;
391 dispend = dispstart + dispsize;
392 return cookie;
393 }
394
395
396 /* put HW scroll back to where it was */
397 void *vidcvideo_hwscroll_back(void *cookie) {
398 dispstart = (int) cookie;
399 dispend = dispstart + dispsize;
400 return cookie;
401 }
402
403
404 /* this function is to be called perferably at vsync */
405 void vidcvideo_progr_scroll(void) {
406 IOMD_WRITE_WORD(IOMD_VIDINIT, dispstart-ptov);
407 IOMD_WRITE_WORD(IOMD_VIDSTART, dispstart-ptov);
408 IOMD_WRITE_WORD(IOMD_VIDEND, (dispend-transfersize)-ptov);
409 }
410
411
412 /*
413 * Select a new mode by reprogramming the VIDC chip
414 * XXX this part is known not to work for 32bpp
415 */
416
417 struct vidc_mode newmode;
418
419 static const int bpp_mask_table[] = {
420 0, /* 1bpp */
421 1, /* 2bpp */
422 2, /* 4bpp */
423 3, /* 8bpp */
424 4, /* 16bpp */
425 6 /* 32bpp */
426 };
427
428
429 void
430 vidcvideo_setmode(struct vidc_mode *mode)
431 {
432 register int acc;
433 int bpp_mask;
434 int ereg;
435 int best_r, best_v;
436 int least_error;
437 int r, v, f;
438
439 /*
440 * Find out what bit mask we need to or with the vidc20 control register
441 * in order to generate the desired number of bits per pixel.
442 * log_bpp is log base 2 of the number of bits per pixel.
443 */
444
445 bpp_mask = bpp_mask_table[mode->log2_bpp];
446
447 newmode = *mode;
448 vidc_currentmode = &newmode;
449
450 least_error = INT_MAX;
451 best_r = 0; best_v = 0;
452
453 for (v = 63; v > 0; v--) {
454 for (r = 63; r > 0; r--) {
455 f = ((v * vidc_fref) /1000) / r;
456 if (least_error >=
457 abs(f - vidc_currentmode->pixel_rate)) {
458 least_error =
459 abs(f - vidc_currentmode->pixel_rate);
460 best_r = r;
461 best_v = v;
462 }
463 }
464 }
465
466 if (best_r > 63) best_r=63;
467 if (best_v > 63) best_v=63;
468 if (best_r < 1) best_r= 1;
469 if (best_v < 1) best_v= 1;
470
471 vidcvideo_write(VIDC_FSYNREG, (best_v-1)<<8 | (best_r-1)<<0);
472
473 acc=0;
474 acc+=vidc_currentmode->hswr; vidcvideo_write(VIDC_HSWR, (acc - 8 ) & (~1));
475 acc+=vidc_currentmode->hbsr; vidcvideo_write(VIDC_HBSR, (acc - 12) & (~1));
476 acc+=vidc_currentmode->hdsr; vidcvideo_write(VIDC_HDSR, (acc - 18) & (~1));
477 acc+=vidc_currentmode->hder; vidcvideo_write(VIDC_HDER, (acc - 18) & (~1));
478 acc+=vidc_currentmode->hber; vidcvideo_write(VIDC_HBER, (acc - 12) & (~1));
479 acc+=vidc_currentmode->hcr; vidcvideo_write(VIDC_HCR, (acc - 8 ) & (~3));
480
481 acc=0;
482 acc+=vidc_currentmode->vswr; vidcvideo_write(VIDC_VSWR, (acc - 1));
483 acc+=vidc_currentmode->vbsr; vidcvideo_write(VIDC_VBSR, (acc - 1));
484 acc+=vidc_currentmode->vdsr; vidcvideo_write(VIDC_VDSR, (acc - 1));
485 acc+=vidc_currentmode->vder; vidcvideo_write(VIDC_VDER, (acc - 1));
486 acc+=vidc_currentmode->vber; vidcvideo_write(VIDC_VBER, (acc - 1));
487 acc+=vidc_currentmode->vcr; vidcvideo_write(VIDC_VCR, (acc - 1));
488
489 IOMD_WRITE_WORD(IOMD_FSIZE, vidc_currentmode->vcr
490 + vidc_currentmode->vswr
491 + vidc_currentmode->vber
492 + vidc_currentmode->vbsr - 1);
493
494 if (dispsize <= 1024*1024)
495 vidcvideo_write(VIDC_DCTL, vidc_currentmode->hder>>2 | 1<<16 | 1<<12);
496 else
497 vidcvideo_write(VIDC_DCTL, vidc_currentmode->hder>>2 | 3<<16 | 1<<12);
498
499 ereg = 1<<12;
500 if (vidc_currentmode->sync_pol & 0x01)
501 ereg |= 1<<16;
502 if (vidc_currentmode->sync_pol & 0x02)
503 ereg |= 1<<18;
504 vidcvideo_write(VIDC_EREG, ereg);
505 if (dispsize > 1024*1024) {
506 if (vidc_currentmode->hder >= 800)
507 vidcvideo_write(VIDC_CONREG, 7<<8 | bpp_mask<<5);
508 else
509 vidcvideo_write(VIDC_CONREG, 6<<8 | bpp_mask<<5);
510 } else {
511 vidcvideo_write(VIDC_CONREG, 7<<8 | bpp_mask<<5);
512 }
513 }
514
515
516 #if 0
517 /* not used for now */
518 void
519 vidcvideo_set_display_base(base)
520 u_int base;
521 {
522 dispstart = dispstart-dispbase + base;
523 dispbase = vmem_base = base;
524 dispend = base + dispsize;
525 ptov = dispbase - phys_base;
526 }
527 #endif
528
529
530 /*
531 * Main initialisation routine for now
532 */
533
534 static int cursor_init = 0;
535
536 int
537 vidcvideo_init(void)
538 {
539 vidcvideo_coldinit();
540 if (cold_init && (cursor_init == 0))
541 /* vidcvideo_flash_go() */;
542
543 /* setting a mode goes wrong in 32 bpp ... 8 and 16 seem OK */
544 vidcvideo_setmode(vidc_currentmode);
545 vidcvideo_blank(0); /* display on */
546
547 vidcvideo_stdpalette();
548
549 if (cold_init == 0) {
550 vidcvideo_write(VIDC_CP1, 0x0);
551 vidcvideo_write(VIDC_CP2, 0x0);
552 vidcvideo_write(VIDC_CP3, 0x0);
553 } else {
554 vidcvideo_cursor_init(CURSOR_MAX_WIDTH, CURSOR_MAX_HEIGHT);
555 };
556
557 cold_init=1;
558 return 0;
559 }
560
561
562 /* reinitialise the vidcvideo */
563 void
564 vidcvideo_reinit()
565 {
566 vidcvideo_coldinit();
567 vidcvideo_setmode(vidc_currentmode);
568 }
569
570
571 int
572 vidcvideo_cursor_init(int width, int height)
573 {
574 static char *cursor_data = NULL;
575 int counter;
576 int line;
577 paddr_t pa;
578
579 cursor_width = width;
580 cursor_height = height;
581
582 if (!cursor_data) {
583 /* Allocate cursor memory first time round */
584 cursor_data = (char *)uvm_km_zalloc(kernel_map, PAGE_SIZE);
585 if (!cursor_data)
586 panic("Cannot allocate memory for hardware cursor");
587 (void) pmap_extract(pmap_kernel(), (vaddr_t)cursor_data, &pa);
588 IOMD_WRITE_WORD(IOMD_CURSINIT, pa);
589 }
590
591 /* Blank the cursor while initialising it's sprite */
592
593 vidcvideo_write ( VIDC_CP1, 0x0 );
594 vidcvideo_write ( VIDC_CP2, 0x0 );
595 vidcvideo_write ( VIDC_CP3, 0x0 );
596
597 cursor_normal = cursor_data;
598 cursor_transparent = cursor_data + (height * width);
599
600 cursor_transparent += 32; /* ALIGN */
601 cursor_transparent = (char *)((int)cursor_transparent & (~31) );
602
603 for ( line = 0; line<height; ++ line )
604 {
605 for ( counter=0; counter<width/4;counter++ )
606 cursor_normal[line * width + counter]=0x55; /* why 0x55 ? */
607 for ( ; counter<8; counter++ )
608 cursor_normal[line * width + counter]=0;
609 }
610
611 for ( line = 0; line<height; ++ line )
612 {
613 for ( counter=0; counter<width/4;counter++ )
614 cursor_transparent[line * width + counter]=0x00;
615 for ( ; counter<8; counter++ )
616 cursor_transparent[line * width + counter]=0;
617 }
618
619
620 (void) pmap_extract(pmap_kernel(), (vaddr_t)cursor_normal,
621 (void *)&p_cursor_normal);
622 (void) pmap_extract(pmap_kernel(), (vaddr_t)cursor_transparent,
623 (void *)&p_cursor_transparent);
624
625 memset ( cursor_normal, 0x55, width*height ); /* white? */
626 memset ( cursor_transparent, 0x00, width*height ); /* to see the diffence */
627
628 /* Ok, now program the cursor; should be blank */
629 vidcvideo_enablecursor(0);
630
631 return 0;
632 }
633
634
635 void
636 vidcvideo_updatecursor(xcur, ycur)
637 int xcur, ycur;
638 {
639 int frontporch = vidc_currentmode->hswr + vidc_currentmode->hbsr + vidc_currentmode->hdsr;
640 int topporch = vidc_currentmode->vswr + vidc_currentmode->vbsr + vidc_currentmode->vdsr;
641
642 vidcvideo_write(VIDC_HCSR, frontporch -17 + xcur);
643 vidcvideo_write(VIDC_VCSR, topporch -2 + (ycur+1)-2 + 3 - cursor_height);
644 vidcvideo_write(VIDC_VCER, topporch -2 + (ycur+3)+2 + 3 );
645 return;
646 }
647
648
649 void
650 vidcvideo_enablecursor(on)
651 int on;
652 {
653 if (on) {
654 IOMD_WRITE_WORD(IOMD_CURSINIT,p_cursor_normal);
655 } else {
656 IOMD_WRITE_WORD(IOMD_CURSINIT,p_cursor_transparent);
657 };
658 vidcvideo_write ( VIDC_CP1, 0xffffff ); /* enable */
659
660 return;
661 }
662
663
664 void
665 vidcvideo_stdpalette()
666 {
667 int i;
668
669 switch (vidc_currentmode->log2_bpp) {
670 case 0: /* 1 bpp */
671 case 1: /* 2 bpp */
672 case 2: /* 4 bpp */
673 case 3: /* 8 bpp */
674 vidcvideo_write(VIDC_PALREG, 0x00000000);
675 vidcvideo_write(VIDC_PALETTE, VIDC_COL( 0, 0, 0));
676 vidcvideo_write(VIDC_PALETTE, VIDC_COL(255, 0, 0));
677 vidcvideo_write(VIDC_PALETTE, VIDC_COL( 0, 255, 0));
678 vidcvideo_write(VIDC_PALETTE, VIDC_COL(255, 255, 0));
679 vidcvideo_write(VIDC_PALETTE, VIDC_COL( 0, 0, 255));
680 vidcvideo_write(VIDC_PALETTE, VIDC_COL(255, 0, 255));
681 vidcvideo_write(VIDC_PALETTE, VIDC_COL( 0, 255, 255));
682 vidcvideo_write(VIDC_PALETTE, VIDC_COL(255, 255, 255));
683 vidcvideo_write(VIDC_PALETTE, VIDC_COL(128, 128, 128));
684 vidcvideo_write(VIDC_PALETTE, VIDC_COL(255, 128, 128));
685 vidcvideo_write(VIDC_PALETTE, VIDC_COL(128, 255, 128));
686 vidcvideo_write(VIDC_PALETTE, VIDC_COL(255, 255, 128));
687 vidcvideo_write(VIDC_PALETTE, VIDC_COL(128, 128, 255));
688 vidcvideo_write(VIDC_PALETTE, VIDC_COL(255, 128, 255));
689 vidcvideo_write(VIDC_PALETTE, VIDC_COL(255, 255, 255));
690 break;
691 case 4: /* 16 bpp */
692 /*
693 * The use of the palette in 16-bit modes is quite
694 * fun. Comments in linux/drivers/video/acornfb.c
695 * imply that it goes something like this:
696 *
697 * red = LUT[pixel[7:0]].red
698 * green = LUT[pixel[11:4]].green
699 * blue = LUT[pixel[15:8]].blue
700 *
701 * We use 6:5:5 R:G:B cos that's what Xarm32VIDC wants.
702 */
703 #define RBITS 6
704 #define GBITS 5
705 #define BBITS 5
706 vidcvideo_write(VIDC_PALREG, 0x00000000);
707 for (i = 0; i < 256; i++) {
708 int r, g, b;
709
710 r = i & ((1 << RBITS) - 1);
711 g = (i >> (RBITS - 4)) & ((1 << GBITS) - 1);
712 b = (i >> (RBITS + GBITS - 8)) & ((1 << BBITS) - 1);
713 vidcvideo_write(VIDC_PALETTE,
714 VIDC_COL(r << (8 - RBITS) | r >> (2 * RBITS - 8),
715 g << (8 - GBITS) | g >> (2 * GBITS - 8),
716 b << (8 - BBITS) | b >> (2 * BBITS - 8)));
717 }
718 break;
719 case 5: /* 32 bpp */
720 vidcvideo_write(VIDC_PALREG, 0x00000000);
721 for (i = 0; i < 256; i++)
722 vidcvideo_write(VIDC_PALETTE, VIDC_COL(i, i, i));
723 break;
724 }
725
726 }
727
728 int
729 vidcvideo_blank(video_off)
730 int video_off;
731 {
732 int ereg;
733
734 ereg = 1<<12;
735 if (vidc_currentmode->sync_pol & 0x01)
736 ereg |= 1<<16;
737 if (vidc_currentmode->sync_pol & 0x02)
738 ereg |= 1<<18;
739
740 if (!video_off) {
741 vidcvideo_write(VIDC_EREG, ereg);
742 } else {
743 vidcvideo_write(VIDC_EREG, 0);
744 };
745 return 0;
746 }
747
748 /* end of vidc20config.c */
749