blob: da8004e5d03de657c2918d4cd486583ecfa1a88c [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*
2 * Frame buffer driver for Trident Blade and Image series
3 *
4 * Copyright 2001,2002 - Jani Monoses <jani@iv.ro>
5 *
6 *
7 * CREDITS:(in order of appearance)
8 * skeletonfb.c by Geert Uytterhoeven and other fb code in drivers/video
9 * Special thanks ;) to Mattia Crivellini <tia@mclink.it>
10 * much inspired by the XFree86 4.x Trident driver sources by Alan Hourihane
11 * the FreeVGA project
12 * Francesco Salvestrini <salvestrini@users.sf.net> XP support,code,suggestions
13 * TODO:
14 * timing value tweaking so it looks good on every monitor in every mode
15 * TGUI acceleration
16 */
17
18#include <linux/config.h>
19#include <linux/module.h>
20#include <linux/fb.h>
21#include <linux/init.h>
22#include <linux/pci.h>
23
24#include <linux/delay.h>
25#include <video/trident.h>
26
27#define VERSION "0.7.8-NEWAPI"
28
29struct tridentfb_par {
30 int vclk; //in MHz
31 void __iomem * io_virt; //iospace virtual memory address
32};
33
34static unsigned char eng_oper; //engine operation...
35static struct fb_ops tridentfb_ops;
36
37static struct tridentfb_par default_par;
38
39/* FIXME:kmalloc these 3 instead */
40static struct fb_info fb_info;
41static u32 pseudo_pal[16];
42
43
44static struct fb_var_screeninfo default_var;
45
46static struct fb_fix_screeninfo tridentfb_fix = {
47 .id = "Trident",
48 .type = FB_TYPE_PACKED_PIXELS,
49 .ypanstep = 1,
50 .visual = FB_VISUAL_PSEUDOCOLOR,
51 .accel = FB_ACCEL_NONE,
52};
53
54static int chip_id;
55
56static int defaultaccel;
57static int displaytype;
58
59
60/* defaults which are normally overriden by user values */
61
62/* video mode */
63static char * mode = "640x480";
64static int bpp = 8;
65
66static int noaccel;
67
68static int center;
69static int stretch;
70
71static int fp;
72static int crt;
73
74static int memsize;
75static int memdiff;
76static int nativex;
77
78
79module_param(mode, charp, 0);
80module_param(bpp, int, 0);
81module_param(center, int, 0);
82module_param(stretch, int, 0);
83module_param(noaccel, int, 0);
84module_param(memsize, int, 0);
85module_param(memdiff, int, 0);
86module_param(nativex, int, 0);
87module_param(fp, int, 0);
88module_param(crt, int, 0);
89
90
91static int chip3D;
92static int chipcyber;
93
94static int is3Dchip(int id)
95{
96 return ((id == BLADE3D) || (id == CYBERBLADEE4) ||
97 (id == CYBERBLADEi7) || (id == CYBERBLADEi7D) ||
98 (id == CYBER9397) || (id == CYBER9397DVD) ||
99 (id == CYBER9520) || (id == CYBER9525DVD) ||
100 (id == IMAGE975) || (id == IMAGE985) ||
101 (id == CYBERBLADEi1) || (id == CYBERBLADEi1D) ||
102 (id == CYBERBLADEAi1) || (id == CYBERBLADEAi1D) ||
103 (id == CYBERBLADEXPm8) || (id == CYBERBLADEXPm16) ||
104 (id == CYBERBLADEXPAi1));
105}
106
107static int iscyber(int id)
108{
109 switch (id) {
110 case CYBER9388:
111 case CYBER9382:
112 case CYBER9385:
113 case CYBER9397:
114 case CYBER9397DVD:
115 case CYBER9520:
116 case CYBER9525DVD:
117 case CYBERBLADEE4:
118 case CYBERBLADEi7D:
119 case CYBERBLADEi1:
120 case CYBERBLADEi1D:
121 case CYBERBLADEAi1:
122 case CYBERBLADEAi1D:
123 case CYBERBLADEXPAi1:
124 return 1;
125
126 case CYBER9320:
127 case TGUI9660:
128 case IMAGE975:
129 case IMAGE985:
130 case BLADE3D:
131 case CYBERBLADEi7: /* VIA MPV4 integrated version */
132
133 default:
134 /* case CYBERBLDAEXPm8: Strange */
135 /* case CYBERBLDAEXPm16: Strange */
136 return 0;
137 }
138}
139
140#define CRT 0x3D0 //CRTC registers offset for color display
141
142#ifndef TRIDENT_MMIO
143 #define TRIDENT_MMIO 1
144#endif
145
146#if TRIDENT_MMIO
147 #define t_outb(val,reg) writeb(val,((struct tridentfb_par *)(fb_info.par))->io_virt + reg)
148 #define t_inb(reg) readb(((struct tridentfb_par*)(fb_info.par))->io_virt + reg)
149#else
150 #define t_outb(val,reg) outb(val,reg)
151 #define t_inb(reg) inb(reg)
152#endif
153
154
155static struct accel_switch {
156 void (*init_accel)(int,int);
157 void (*wait_engine)(void);
158 void (*fill_rect)(__u32,__u32,__u32,__u32,__u32,__u32);
159 void (*copy_rect)(__u32,__u32,__u32,__u32,__u32,__u32);
160} *acc;
161
162#define writemmr(r,v) writel(v, ((struct tridentfb_par *)fb_info.par)->io_virt + r)
163#define readmmr(r) readl(((struct tridentfb_par *)fb_info.par)->io_virt + r)
164
165
166
167/*
168 * Blade specific acceleration.
169 */
170
171#define point(x,y) ((y)<<16|(x))
172#define STA 0x2120
173#define CMD 0x2144
174#define ROP 0x2148
175#define CLR 0x2160
176#define SR1 0x2100
177#define SR2 0x2104
178#define DR1 0x2108
179#define DR2 0x210C
180
181#define ROP_S 0xCC
182
183static void blade_init_accel(int pitch,int bpp)
184{
185 int v1 = (pitch>>3)<<20;
186 int tmp = 0,v2;
187 switch (bpp) {
188 case 8:tmp = 0;break;
189 case 15:tmp = 5;break;
190 case 16:tmp = 1;break;
191 case 24:
192 case 32:tmp = 2;break;
193 }
194 v2 = v1 | (tmp<<29);
195 writemmr(0x21C0,v2);
196 writemmr(0x21C4,v2);
197 writemmr(0x21B8,v2);
198 writemmr(0x21BC,v2);
199 writemmr(0x21D0,v1);
200 writemmr(0x21D4,v1);
201 writemmr(0x21C8,v1);
202 writemmr(0x21CC,v1);
203 writemmr(0x216C,0);
204}
205
206static void blade_wait_engine(void)
207{
208 while(readmmr(STA) & 0xFA800000);
209}
210
211static void blade_fill_rect(__u32 x,__u32 y,__u32 w,__u32 h,__u32 c,__u32 rop)
212{
213 writemmr(CLR,c);
214 writemmr(ROP,rop ? 0x66:ROP_S);
215 writemmr(CMD,0x20000000|1<<19|1<<4|2<<2);
216
217 writemmr(DR1,point(x,y));
218 writemmr(DR2,point(x+w-1,y+h-1));
219}
220
221static void blade_copy_rect(__u32 x1,__u32 y1,__u32 x2,__u32 y2,__u32 w,__u32 h)
222{
223 __u32 s1,s2,d1,d2;
224 int direction = 2;
225 s1 = point(x1,y1);
226 s2 = point(x1+w-1,y1+h-1);
227 d1 = point(x2,y2);
228 d2 = point(x2+w-1,y2+h-1);
229
230 if ((y1 > y2) || ((y1 == y2) && (x1 > x2)))
231 direction = 0;
232
233
234 writemmr(ROP,ROP_S);
235 writemmr(CMD,0xE0000000|1<<19|1<<4|1<<2|direction);
236
237 writemmr(SR1,direction?s2:s1);
238 writemmr(SR2,direction?s1:s2);
239 writemmr(DR1,direction?d2:d1);
240 writemmr(DR2,direction?d1:d2);
241}
242
243static struct accel_switch accel_blade = {
244 blade_init_accel,
245 blade_wait_engine,
246 blade_fill_rect,
247 blade_copy_rect,
248};
249
250
251/*
252 * BladeXP specific acceleration functions
253 */
254
255#define ROP_P 0xF0
256#define masked_point(x,y) ((y & 0xffff)<<16|(x & 0xffff))
257
258static void xp_init_accel(int pitch,int bpp)
259{
260 int tmp = 0,v1;
261 unsigned char x = 0;
262
263 switch (bpp) {
264 case 8: x = 0; break;
265 case 16: x = 1; break;
266 case 24: x = 3; break;
267 case 32: x = 2; break;
268 }
269
270 switch (pitch << (bpp >> 3)) {
271 case 8192:
272 case 512: x |= 0x00; break;
273 case 1024: x |= 0x04; break;
274 case 2048: x |= 0x08; break;
275 case 4096: x |= 0x0C; break;
276 }
277
278 t_outb(x,0x2125);
279
280 eng_oper = x | 0x40;
281
282 switch (bpp) {
283 case 8: tmp = 18; break;
284 case 15:
285 case 16: tmp = 19; break;
286 case 24:
287 case 32: tmp = 20; break;
288 }
289
290 v1 = pitch << tmp;
291
292 writemmr(0x2154,v1);
293 writemmr(0x2150,v1);
294 t_outb(3,0x2126);
295}
296
297static void xp_wait_engine(void)
298{
299 int busy;
300 int count, timeout;
301
302 count = 0;
303 timeout = 0;
304 for (;;) {
305 busy = t_inb(STA) & 0x80;
306 if (busy != 0x80)
307 return;
308 count++;
309 if (count == 10000000) {
310 /* Timeout */
311 count = 9990000;
312 timeout++;
313 if (timeout == 8) {
314 /* Reset engine */
315 t_outb(0x00, 0x2120);
316 return;
317 }
318 }
319 }
320}
321
322static void xp_fill_rect(__u32 x,__u32 y,__u32 w,__u32 h,__u32 c,__u32 rop)
323{
324 writemmr(0x2127,ROP_P);
325 writemmr(0x2158,c);
326 writemmr(0x2128,0x4000);
327 writemmr(0x2140,masked_point(h,w));
328 writemmr(0x2138,masked_point(y,x));
329 t_outb(0x01,0x2124);
330 t_outb(eng_oper,0x2125);
331}
332
333static void xp_copy_rect(__u32 x1,__u32 y1,__u32 x2,__u32 y2,__u32 w,__u32 h)
334{
335 int direction;
336 __u32 x1_tmp, x2_tmp, y1_tmp, y2_tmp;
337
338 direction = 0x0004;
339
340 if ((x1 < x2) && (y1 == y2)) {
341 direction |= 0x0200;
342 x1_tmp = x1 + w - 1;
343 x2_tmp = x2 + w - 1;
344 } else {
345 x1_tmp = x1;
346 x2_tmp = x2;
347 }
348
349 if (y1 < y2) {
350 direction |= 0x0100;
351 y1_tmp = y1 + h - 1;
352 y2_tmp = y2 + h - 1;
353 } else {
354 y1_tmp = y1;
355 y2_tmp = y2;
356 }
357
358 writemmr(0x2128,direction);
359 t_outb(ROP_S,0x2127);
360 writemmr(0x213C,masked_point(y1_tmp,x1_tmp));
361 writemmr(0x2138,masked_point(y2_tmp,x2_tmp));
362 writemmr(0x2140,masked_point(h,w));
363 t_outb(0x01,0x2124);
364}
365
366static struct accel_switch accel_xp = {
367 xp_init_accel,
368 xp_wait_engine,
369 xp_fill_rect,
370 xp_copy_rect,
371};
372
373
374/*
375 * Image specific acceleration functions
376 */
377static void image_init_accel(int pitch,int bpp)
378{
379 int tmp = 0;
380 switch (bpp) {
381 case 8:tmp = 0;break;
382 case 15:tmp = 5;break;
383 case 16:tmp = 1;break;
384 case 24:
385 case 32:tmp = 2;break;
386 }
387 writemmr(0x2120, 0xF0000000);
388 writemmr(0x2120, 0x40000000|tmp);
389 writemmr(0x2120, 0x80000000);
390 writemmr(0x2144, 0x00000000);
391 writemmr(0x2148, 0x00000000);
392 writemmr(0x2150, 0x00000000);
393 writemmr(0x2154, 0x00000000);
394 writemmr(0x2120, 0x60000000|(pitch<<16) |pitch);
395 writemmr(0x216C, 0x00000000);
396 writemmr(0x2170, 0x00000000);
397 writemmr(0x217C, 0x00000000);
398 writemmr(0x2120, 0x10000000);
399 writemmr(0x2130, (2047 << 16) | 2047);
400}
401
402static void image_wait_engine(void)
403{
404 while(readmmr(0x2164) & 0xF0000000);
405}
406
407static void image_fill_rect(__u32 x, __u32 y, __u32 w, __u32 h, __u32 c, __u32 rop)
408{
409 writemmr(0x2120,0x80000000);
410 writemmr(0x2120,0x90000000|ROP_S);
411
412 writemmr(0x2144,c);
413
414 writemmr(DR1,point(x,y));
415 writemmr(DR2,point(x+w-1,y+h-1));
416
417 writemmr(0x2124,0x80000000|3<<22|1<<10|1<<9);
418}
419
420static void image_copy_rect(__u32 x1,__u32 y1,__u32 x2,__u32 y2,__u32 w,__u32 h)
421{
422 __u32 s1,s2,d1,d2;
423 int direction = 2;
424 s1 = point(x1,y1);
425 s2 = point(x1+w-1,y1+h-1);
426 d1 = point(x2,y2);
427 d2 = point(x2+w-1,y2+h-1);
428
429 if ((y1 > y2) || ((y1 == y2) && (x1 >x2)))
430 direction = 0;
431
432 writemmr(0x2120,0x80000000);
433 writemmr(0x2120,0x90000000|ROP_S);
434
435 writemmr(SR1,direction?s2:s1);
436 writemmr(SR2,direction?s1:s2);
437 writemmr(DR1,direction?d2:d1);
438 writemmr(DR2,direction?d1:d2);
439 writemmr(0x2124,0x80000000|1<<22|1<<10|1<<7|direction);
440}
441
442
443static struct accel_switch accel_image = {
444 image_init_accel,
445 image_wait_engine,
446 image_fill_rect,
447 image_copy_rect,
448};
449
450/*
451 * Accel functions called by the upper layers
452 */
453#ifdef CONFIG_FB_TRIDENT_ACCEL
454static void tridentfb_fillrect(struct fb_info * info, const struct fb_fillrect *fr)
455{
456 int bpp = info->var.bits_per_pixel;
457 int col;
458
459 switch (bpp) {
460 default:
461 case 8: col = fr->color;
462 break;
463 case 16: col = ((u32 *)(info->pseudo_palette))[fr->color];
464 break;
465 case 32: col = ((u32 *)(info->pseudo_palette))[fr->color];
466 break;
467 }
468
469 acc->fill_rect(fr->dx, fr->dy, fr->width, fr->height, col, fr->rop);
470 acc->wait_engine();
471}
472static void tridentfb_copyarea(struct fb_info *info, const struct fb_copyarea *ca)
473{
474 acc->copy_rect(ca->sx,ca->sy,ca->dx,ca->dy,ca->width,ca->height);
475 acc->wait_engine();
476}
477#else /* !CONFIG_FB_TRIDENT_ACCEL */
478#define tridentfb_fillrect cfb_fillrect
479#define tridentfb_copyarea cfb_copyarea
480#endif /* CONFIG_FB_TRIDENT_ACCEL */
481
482
483/*
484 * Hardware access functions
485 */
486
487static inline unsigned char read3X4(int reg)
488{
489 struct tridentfb_par * par = (struct tridentfb_par *)fb_info.par;
490 writeb(reg, par->io_virt + CRT + 4);
491 return readb( par->io_virt + CRT + 5);
492}
493
494static inline void write3X4(int reg, unsigned char val)
495{
496 struct tridentfb_par * par = (struct tridentfb_par *)fb_info.par;
497 writeb(reg, par->io_virt + CRT + 4);
498 writeb(val, par->io_virt + CRT + 5);
499}
500
501static inline unsigned char read3C4(int reg)
502{
503 t_outb(reg, 0x3C4);
504 return t_inb(0x3C5);
505}
506
507static inline void write3C4(int reg, unsigned char val)
508{
509 t_outb(reg, 0x3C4);
510 t_outb(val, 0x3C5);
511}
512
513static inline unsigned char read3CE(int reg)
514{
515 t_outb(reg, 0x3CE);
516 return t_inb(0x3CF);
517}
518
519static inline void writeAttr(int reg, unsigned char val)
520{
521 readb(((struct tridentfb_par *)fb_info.par)->io_virt + CRT + 0x0A); //flip-flop to index
522 t_outb(reg, 0x3C0);
523 t_outb(val, 0x3C0);
524}
525
526static inline void write3CE(int reg, unsigned char val)
527{
528 t_outb(reg, 0x3CE);
529 t_outb(val, 0x3CF);
530}
531
532static inline void enable_mmio(void)
533{
534 /* Goto New Mode */
535 outb(0x0B, 0x3C4);
536 inb(0x3C5);
537
538 /* Unprotect registers */
539 outb(NewMode1, 0x3C4);
540 outb(0x80, 0x3C5);
541
542 /* Enable MMIO */
543 outb(PCIReg, 0x3D4);
544 outb(inb(0x3D5) | 0x01, 0x3D5);
545}
546
547
548#define crtc_unlock() write3X4(CRTVSyncEnd, read3X4(CRTVSyncEnd) & 0x7F)
549
550/* Return flat panel's maximum x resolution */
551static int __init get_nativex(void)
552{
553 int x,y,tmp;
554
555 if (nativex)
556 return nativex;
557
558 tmp = (read3CE(VertStretch) >> 4) & 3;
559
560 switch (tmp) {
561 case 0: x = 1280; y = 1024; break;
562 case 2: x = 1024; y = 768; break;
563 case 3: x = 800; y = 600; break;
564 case 4: x = 1400; y = 1050; break;
565 case 1:
566 default:x = 640; y = 480; break;
567 }
568
569 output("%dx%d flat panel found\n", x, y);
570 return x;
571}
572
573/* Set pitch */
574static void set_lwidth(int width)
575{
576 write3X4(Offset, width & 0xFF);
577 write3X4(AddColReg, (read3X4(AddColReg) & 0xCF) | ((width & 0x300) >>4));
578}
579
580/* For resolutions smaller than FP resolution stretch */
581static void screen_stretch(void)
582{
583 if (chip_id != CYBERBLADEXPAi1)
584 write3CE(BiosReg,0);
585 else
586 write3CE(BiosReg,8);
587 write3CE(VertStretch,(read3CE(VertStretch) & 0x7C) | 1);
588 write3CE(HorStretch,(read3CE(HorStretch) & 0x7C) | 1);
589}
590
591/* For resolutions smaller than FP resolution center */
592static void screen_center(void)
593{
594 write3CE(VertStretch,(read3CE(VertStretch) & 0x7C) | 0x80);
595 write3CE(HorStretch,(read3CE(HorStretch) & 0x7C) | 0x80);
596}
597
598/* Address of first shown pixel in display memory */
599static void set_screen_start(int base)
600{
601 write3X4(StartAddrLow, base & 0xFF);
602 write3X4(StartAddrHigh, (base & 0xFF00) >> 8);
603 write3X4(CRTCModuleTest, (read3X4(CRTCModuleTest) & 0xDF) | ((base & 0x10000) >> 11));
604 write3X4(CRTHiOrd, (read3X4(CRTHiOrd) & 0xF8) | ((base & 0xE0000) >> 17));
605}
606
607/* Use 20.12 fixed-point for NTSC value and frequency calculation */
608#define calc_freq(n,m,k) ( ((unsigned long)0xE517 * (n+8) / ((m+2)*(1<<k))) >> 12 )
609
610/* Set dotclock frequency */
611static void set_vclk(int freq)
612{
613 int m,n,k;
614 int f,fi,d,di;
615 unsigned char lo=0,hi=0;
616
617 d = 20;
618 for(k = 2;k>=0;k--)
619 for(m = 0;m<63;m++)
620 for(n = 0;n<128;n++) {
621 fi = calc_freq(n,m,k);
622 if ((di = abs(fi - freq)) < d) {
623 d = di;
624 f = fi;
625 lo = n;
626 hi = (k<<6) | m;
627 }
628 }
629 if (chip3D) {
630 write3C4(ClockHigh,hi);
631 write3C4(ClockLow,lo);
632 } else {
633 outb(lo,0x43C8);
634 outb(hi,0x43C9);
635 }
636 debug("VCLK = %X %X\n",hi,lo);
637}
638
639/* Set number of lines for flat panels*/
640static void set_number_of_lines(int lines)
641{
642 int tmp = read3CE(CyberEnhance) & 0x8F;
643 if (lines > 1024)
644 tmp |= 0x50;
645 else if (lines > 768)
646 tmp |= 0x30;
647 else if (lines > 600)
648 tmp |= 0x20;
649 else if (lines > 480)
650 tmp |= 0x10;
651 write3CE(CyberEnhance, tmp);
652}
653
654/*
655 * If we see that FP is active we assume we have one.
656 * Otherwise we have a CRT display.User can override.
657 */
658static unsigned int __init get_displaytype(void)
659{
660 if (fp)
661 return DISPLAY_FP;
662 if (crt || !chipcyber)
663 return DISPLAY_CRT;
664 return (read3CE(FPConfig) & 0x10)?DISPLAY_FP:DISPLAY_CRT;
665}
666
667/* Try detecting the video memory size */
668static unsigned int __init get_memsize(void)
669{
670 unsigned char tmp, tmp2;
671 unsigned int k;
672
673 /* If memory size provided by user */
674 if (memsize)
675 k = memsize * Kb;
676 else
677 switch (chip_id) {
678 case CYBER9525DVD: k = 2560 * Kb; break;
679 default:
680 tmp = read3X4(SPR) & 0x0F;
681 switch (tmp) {
682
683 case 0x01: k = 512; break;
684 case 0x02: k = 6 * Mb; break; /* XP */
685 case 0x03: k = 1 * Mb; break;
686 case 0x04: k = 8 * Mb; break;
687 case 0x06: k = 10 * Mb; break; /* XP */
688 case 0x07: k = 2 * Mb; break;
689 case 0x08: k = 12 * Mb; break; /* XP */
690 case 0x0A: k = 14 * Mb; break; /* XP */
691 case 0x0C: k = 16 * Mb; break; /* XP */
692 case 0x0E: /* XP */
693
694 tmp2 = read3C4(0xC1);
695 switch (tmp2) {
696 case 0x00: k = 20 * Mb; break;
697 case 0x01: k = 24 * Mb; break;
698 case 0x10: k = 28 * Mb; break;
699 case 0x11: k = 32 * Mb; break;
700 default: k = 1 * Mb; break;
701 }
702 break;
703
704 case 0x0F: k = 4 * Mb; break;
705 default: k = 1 * Mb;
706 }
707 }
708
709 k -= memdiff * Kb;
710 output("framebuffer size = %d Kb\n", k/Kb);
711 return k;
712}
713
714/* See if we can handle the video mode described in var */
715static int tridentfb_check_var(struct fb_var_screeninfo *var, struct fb_info *info)
716{
717 int bpp = var->bits_per_pixel;
718 debug("enter\n");
719
720 /* check color depth */
721 if (bpp == 24 )
722 bpp = var->bits_per_pixel = 32;
723 /* check whether resolution fits on panel and in memory*/
724 if (flatpanel && nativex && var->xres > nativex)
725 return -EINVAL;
726 if (var->xres * var->yres_virtual * bpp/8 > info->fix.smem_len)
727 return -EINVAL;
728
729 switch (bpp) {
730 case 8:
731 var->red.offset = 0;
732 var->green.offset = 0;
733 var->blue.offset = 0;
734 var->red.length = 6;
735 var->green.length = 6;
736 var->blue.length = 6;
737 break;
738 case 16:
739 var->red.offset = 11;
740 var->green.offset = 5;
741 var->blue.offset = 0;
742 var->red.length = 5;
743 var->green.length = 6;
744 var->blue.length = 5;
745 break;
746 case 32:
747 var->red.offset = 16;
748 var->green.offset = 8;
749 var->blue.offset = 0;
750 var->red.length = 8;
751 var->green.length = 8;
752 var->blue.length = 8;
753 break;
754 default:
755 return -EINVAL;
756 }
757 debug("exit\n");
758
759 return 0;
760
761}
762/* Pan the display */
763static int tridentfb_pan_display(struct fb_var_screeninfo *var,
764 struct fb_info *info)
765{
766 unsigned int offset;
767
768 debug("enter\n");
769 offset = (var->xoffset + (var->yoffset * var->xres))
770 * var->bits_per_pixel/32;
771 info->var.xoffset = var->xoffset;
772 info->var.yoffset = var->yoffset;
773 set_screen_start(offset);
774 debug("exit\n");
775 return 0;
776}
777
778#define shadowmode_on() write3CE(CyberControl,read3CE(CyberControl) | 0x81)
779#define shadowmode_off() write3CE(CyberControl,read3CE(CyberControl) & 0x7E)
780
781/* Set the hardware to the requested video mode */
782static int tridentfb_set_par(struct fb_info *info)
783{
784 struct tridentfb_par * par = (struct tridentfb_par *)(info->par);
785 u32 htotal,hdispend,hsyncstart,hsyncend,hblankstart,hblankend,
786 vtotal,vdispend,vsyncstart,vsyncend,vblankstart,vblankend;
787 struct fb_var_screeninfo *var = &info->var;
788 int bpp = var->bits_per_pixel;
789 unsigned char tmp;
790 debug("enter\n");
791 htotal = (var->xres + var->left_margin + var->right_margin + var->hsync_len)/8 - 10;
792 hdispend = var->xres/8 - 1;
793 hsyncstart = (var->xres + var->right_margin)/8;
794 hsyncend = var->hsync_len/8;
795 hblankstart = hdispend + 1;
796 hblankend = htotal + 5;
797
798 vtotal = var->yres + var->upper_margin + var->lower_margin + var->vsync_len - 2;
799 vdispend = var->yres - 1;
800 vsyncstart = var->yres + var->lower_margin;
801 vsyncend = var->vsync_len;
802 vblankstart = var->yres;
803 vblankend = vtotal + 2;
804
805 enable_mmio();
806 crtc_unlock();
807 write3CE(CyberControl,8);
808
809 if (flatpanel && var->xres < nativex) {
810 /*
811 * on flat panels with native size larger
812 * than requested resolution decide whether
813 * we stretch or center
814 */
815 t_outb(0xEB,0x3C2);
816
817 shadowmode_on();
818
819 if (center)
820 screen_center();
821 else if (stretch)
822 screen_stretch();
823
824 } else {
825 t_outb(0x2B,0x3C2);
826 write3CE(CyberControl,8);
827 }
828
829 /* vertical timing values */
830 write3X4(CRTVTotal, vtotal & 0xFF);
831 write3X4(CRTVDispEnd, vdispend & 0xFF);
832 write3X4(CRTVSyncStart, vsyncstart & 0xFF);
833 write3X4(CRTVSyncEnd, (vsyncend & 0x0F));
834 write3X4(CRTVBlankStart, vblankstart & 0xFF);
835 write3X4(CRTVBlankEnd, 0/*p->vblankend & 0xFF*/);
836
837 /* horizontal timing values */
838 write3X4(CRTHTotal, htotal & 0xFF);
839 write3X4(CRTHDispEnd, hdispend & 0xFF);
840 write3X4(CRTHSyncStart, hsyncstart & 0xFF);
841 write3X4(CRTHSyncEnd, (hsyncend & 0x1F) | ((hblankend & 0x20)<<2));
842 write3X4(CRTHBlankStart, hblankstart & 0xFF);
843 write3X4(CRTHBlankEnd, 0/*(p->hblankend & 0x1F)*/);
844
845 /* higher bits of vertical timing values */
846 tmp = 0x10;
847 if (vtotal & 0x100) tmp |= 0x01;
848 if (vdispend & 0x100) tmp |= 0x02;
849 if (vsyncstart & 0x100) tmp |= 0x04;
850 if (vblankstart & 0x100) tmp |= 0x08;
851
852 if (vtotal & 0x200) tmp |= 0x20;
853 if (vdispend & 0x200) tmp |= 0x40;
854 if (vsyncstart & 0x200) tmp |= 0x80;
855 write3X4(CRTOverflow, tmp);
856
857 tmp = read3X4(CRTHiOrd) | 0x08; //line compare bit 10
858 if (vtotal & 0x400) tmp |= 0x80;
859 if (vblankstart & 0x400) tmp |= 0x40;
860 if (vsyncstart & 0x400) tmp |= 0x20;
861 if (vdispend & 0x400) tmp |= 0x10;
862 write3X4(CRTHiOrd, tmp);
863
864 tmp = 0;
865 if (htotal & 0x800) tmp |= 0x800 >> 11;
866 if (hblankstart & 0x800) tmp |= 0x800 >> 7;
867 write3X4(HorizOverflow, tmp);
868
869 tmp = 0x40;
870 if (vblankstart & 0x200) tmp |= 0x20;
871//FIXME if (info->var.vmode & FB_VMODE_DOUBLE) tmp |= 0x80; //double scan for 200 line modes
872 write3X4(CRTMaxScanLine, tmp);
873
874 write3X4(CRTLineCompare,0xFF);
875 write3X4(CRTPRowScan,0);
876 write3X4(CRTModeControl,0xC3);
877
878 write3X4(LinearAddReg,0x20); //enable linear addressing
879
880 tmp = (info->var.vmode & FB_VMODE_INTERLACED) ? 0x84:0x80;
881 write3X4(CRTCModuleTest,tmp); //enable access extended memory
882
883 write3X4(GraphEngReg, 0x80); //enable GE for text acceleration
884
885// if (info->var.accel_flags & FB_ACCELF_TEXT)
886//FIXME acc->init_accel(info->var.xres,bpp);
887
888 switch (bpp) {
889 case 8: tmp = 0x00; break;
890 case 16: tmp = 0x05; break;
891 case 24: tmp = 0x29; break;
892 case 32: tmp = 0x09;
893 }
894
895 write3X4(PixelBusReg, tmp);
896
897 tmp = 0x10;
898 if (chipcyber)
899 tmp |= 0x20;
900 write3X4(DRAMControl, tmp); //both IO,linear enable
901
902 write3X4(InterfaceSel, read3X4(InterfaceSel) | 0x40);
903 write3X4(Performance,0x20);
904 write3X4(PCIReg,0x07); //MMIO & PCI read and write burst enable
905
906 /* convert from picoseconds to MHz */
907 par->vclk = 1000000/info->var.pixclock;
908 if (bpp == 32)
909 par->vclk *=2;
910 set_vclk(par->vclk);
911
912 write3C4(0,3);
913 write3C4(1,1); //set char clock 8 dots wide
914 write3C4(2,0x0F); //enable 4 maps because needed in chain4 mode
915 write3C4(3,0);
916 write3C4(4,0x0E); //memory mode enable bitmaps ??
917
918 write3CE(MiscExtFunc,(bpp==32)?0x1A:0x12); //divide clock by 2 if 32bpp
919 //chain4 mode display and CPU path
920 write3CE(0x5,0x40); //no CGA compat,allow 256 col
921 write3CE(0x6,0x05); //graphics mode
922 write3CE(0x7,0x0F); //planes?
923
924 if (chip_id == CYBERBLADEXPAi1) {
925 /* This fixes snow-effect in 32 bpp */
926 write3X4(CRTHSyncStart,0x84);
927 }
928
929 writeAttr(0x10,0x41); //graphics mode and support 256 color modes
930 writeAttr(0x12,0x0F); //planes
931 writeAttr(0x13,0); //horizontal pel panning
932
933 //colors
934 for(tmp = 0;tmp < 0x10;tmp++)
935 writeAttr(tmp,tmp);
936 readb(par->io_virt + CRT + 0x0A); //flip-flop to index
937 t_outb(0x20, 0x3C0); //enable attr
938
939 switch (bpp) {
940 case 8: tmp = 0;break; //256 colors
941 case 15: tmp = 0x10;break;
942 case 16: tmp = 0x30;break; //hicolor
943 case 24: //truecolor
944 case 32: tmp = 0xD0;break;
945 }
946
947 t_inb(0x3C8);
948 t_inb(0x3C6);
949 t_inb(0x3C6);
950 t_inb(0x3C6);
951 t_inb(0x3C6);
952 t_outb(tmp,0x3C6);
953 t_inb(0x3C8);
954
955 if (flatpanel)
956 set_number_of_lines(info->var.yres);
957 set_lwidth(info->var.xres * bpp/(4*16));
958 info->fix.visual = (bpp == 8) ? FB_VISUAL_PSEUDOCOLOR : FB_VISUAL_TRUECOLOR;
959 info->fix.line_length = info->var.xres * (bpp >> 3);
960 info->cmap.len = (bpp == 8) ? 256: 16;
961 debug("exit\n");
962 return 0;
963}
964
965/* Set one color register */
966static int tridentfb_setcolreg(unsigned regno, unsigned red, unsigned green,
967 unsigned blue, unsigned transp,
968 struct fb_info *info)
969{
970 int bpp = info->var.bits_per_pixel;
971
972 if (regno >= info->cmap.len)
973 return 1;
974
975
976 if (bpp==8) {
977 t_outb(0xFF,0x3C6);
978 t_outb(regno,0x3C8);
979
980 t_outb(red>>10,0x3C9);
981 t_outb(green>>10,0x3C9);
982 t_outb(blue>>10,0x3C9);
983
984 } else
985 if (bpp == 16) /* RGB 565 */
986 ((u32*)info->pseudo_palette)[regno] = (red & 0xF800) |
987 ((green & 0xFC00) >> 5) | ((blue & 0xF800) >> 11);
988 else
989 if (bpp == 32) /* ARGB 8888 */
990 ((u32*)info->pseudo_palette)[regno] =
991 ((transp & 0xFF00) <<16) |
992 ((red & 0xFF00) << 8) |
993 ((green & 0xFF00)) |
994 ((blue & 0xFF00)>>8);
995
996// debug("exit\n");
997 return 0;
998}
999
1000/* Try blanking the screen.For flat panels it does nothing */
1001static int tridentfb_blank(int blank_mode, struct fb_info *info)
1002{
1003 unsigned char PMCont,DPMSCont;
1004
1005 debug("enter\n");
1006 if (flatpanel)
1007 return 0;
1008 t_outb(0x04,0x83C8); /* Read DPMS Control */
1009 PMCont = t_inb(0x83C6) & 0xFC;
1010 DPMSCont = read3CE(PowerStatus) & 0xFC;
1011 switch (blank_mode)
1012 {
1013 case FB_BLANK_UNBLANK:
1014 /* Screen: On, HSync: On, VSync: On */
1015 case FB_BLANK_NORMAL:
1016 /* Screen: Off, HSync: On, VSync: On */
1017 PMCont |= 0x03;
1018 DPMSCont |= 0x00;
1019 break;
1020 case FB_BLANK_HSYNC_SUSPEND:
1021 /* Screen: Off, HSync: Off, VSync: On */
1022 PMCont |= 0x02;
1023 DPMSCont |= 0x01;
1024 break;
1025 case FB_BLANK_VSYNC_SUSPEND:
1026 /* Screen: Off, HSync: On, VSync: Off */
1027 PMCont |= 0x02;
1028 DPMSCont |= 0x02;
1029 break;
1030 case FB_BLANK_POWERDOWN:
1031 /* Screen: Off, HSync: Off, VSync: Off */
1032 PMCont |= 0x00;
1033 DPMSCont |= 0x03;
1034 break;
1035 }
1036
1037 write3CE(PowerStatus,DPMSCont);
1038 t_outb(4,0x83C8);
1039 t_outb(PMCont,0x83C6);
1040
1041 debug("exit\n");
1042
1043 /* let fbcon do a softblank for us */
1044 return (blank_mode == FB_BLANK_NORMAL) ? 1 : 0;
1045}
1046
1047static int __devinit trident_pci_probe(struct pci_dev * dev, const struct pci_device_id * id)
1048{
1049 int err;
1050 unsigned char revision;
1051
1052 err = pci_enable_device(dev);
1053 if (err)
1054 return err;
1055
1056 chip_id = id->device;
1057
1058 /* If PCI id is 0x9660 then further detect chip type */
1059
1060 if (chip_id == TGUI9660) {
1061 outb(RevisionID,0x3C4);
1062 revision = inb(0x3C5);
1063
1064 switch (revision) {
1065 case 0x22:
1066 case 0x23: chip_id = CYBER9397;break;
1067 case 0x2A: chip_id = CYBER9397DVD;break;
1068 case 0x30:
1069 case 0x33:
1070 case 0x34:
1071 case 0x35:
1072 case 0x38:
1073 case 0x3A:
1074 case 0xB3: chip_id = CYBER9385;break;
1075 case 0x40 ... 0x43: chip_id = CYBER9382;break;
1076 case 0x4A: chip_id = CYBER9388;break;
1077 default:break;
1078 }
1079 }
1080
1081 chip3D = is3Dchip(chip_id);
1082 chipcyber = iscyber(chip_id);
1083
1084 if (is_xp(chip_id)) {
1085 acc = &accel_xp;
1086 } else
1087 if (is_blade(chip_id)) {
1088 acc = &accel_blade;
1089 } else {
1090 acc = &accel_image;
1091 }
1092
1093 /* acceleration is on by default for 3D chips */
1094 defaultaccel = chip3D && !noaccel;
1095
1096 fb_info.par = &default_par;
1097
1098 /* setup MMIO region */
1099 tridentfb_fix.mmio_start = pci_resource_start(dev,1);
1100 tridentfb_fix.mmio_len = chip3D ? 0x20000:0x10000;
1101
1102 if (!request_mem_region(tridentfb_fix.mmio_start, tridentfb_fix.mmio_len, "tridentfb")) {
1103 debug("request_region failed!\n");
1104 return -1;
1105 }
1106
1107 default_par.io_virt = ioremap_nocache(tridentfb_fix.mmio_start, tridentfb_fix.mmio_len);
1108
1109 if (!default_par.io_virt) {
1110 release_region(tridentfb_fix.mmio_start, tridentfb_fix.mmio_len);
1111 debug("ioremap failed\n");
1112 return -1;
1113 }
1114
1115 enable_mmio();
1116
1117 /* setup framebuffer memory */
1118 tridentfb_fix.smem_start = pci_resource_start(dev,0);
1119 tridentfb_fix.smem_len = get_memsize();
1120
1121 if (!request_mem_region(tridentfb_fix.smem_start, tridentfb_fix.smem_len, "tridentfb")) {
1122 debug("request_mem_region failed!\n");
1123 return -1;
1124 }
1125
1126 fb_info.screen_base = ioremap_nocache(tridentfb_fix.smem_start,
1127 tridentfb_fix.smem_len);
1128
1129 if (!fb_info.screen_base) {
1130 release_mem_region(tridentfb_fix.smem_start, tridentfb_fix.smem_len);
1131 debug("ioremap failed\n");
1132 return -1;
1133 }
1134
1135 output("%s board found\n", pci_name(dev));
1136#if 0
1137 output("Trident board found : mem = %X,io = %X, mem_v = %X, io_v = %X\n",
1138 tridentfb_fix.smem_start, tridentfb_fix.mmio_start, fb_info.screen_base, default_par.io_virt);
1139#endif
1140 displaytype = get_displaytype();
1141
1142 if(flatpanel)
1143 nativex = get_nativex();
1144
1145 fb_info.fix = tridentfb_fix;
1146 fb_info.fbops = &tridentfb_ops;
1147
1148
1149 fb_info.flags = FBINFO_DEFAULT | FBINFO_HWACCEL_YPAN;
1150#ifdef CONFIG_FB_TRIDENT_ACCEL
1151 fb_info.flags |= FBINFO_HWACCEL_COPYAREA | FBINFO_HWACCEL_FILLRECT;
1152#endif
1153 fb_info.pseudo_palette = pseudo_pal;
1154
1155 if (!fb_find_mode(&default_var,&fb_info,mode,NULL,0,NULL,bpp))
1156 return -EINVAL;
1157 fb_alloc_cmap(&fb_info.cmap,256,0);
1158 if (defaultaccel && acc)
1159 default_var.accel_flags |= FB_ACCELF_TEXT;
1160 else
1161 default_var.accel_flags &= ~FB_ACCELF_TEXT;
1162 default_var.activate |= FB_ACTIVATE_NOW;
1163 fb_info.var = default_var;
1164 fb_info.device = &dev->dev;
1165 if (register_framebuffer(&fb_info) < 0) {
1166 printk(KERN_ERR "tridentfb: could not register Trident framebuffer\n");
1167 return -EINVAL;
1168 }
1169 output("fb%d: %s frame buffer device %dx%d-%dbpp\n",
1170 fb_info.node, fb_info.fix.id,default_var.xres,
1171 default_var.yres,default_var.bits_per_pixel);
1172 return 0;
1173}
1174
1175static void __devexit trident_pci_remove(struct pci_dev * dev)
1176{
1177 struct tridentfb_par *par = (struct tridentfb_par*)fb_info.par;
1178 unregister_framebuffer(&fb_info);
1179 iounmap(par->io_virt);
1180 iounmap(fb_info.screen_base);
1181 release_mem_region(tridentfb_fix.smem_start, tridentfb_fix.smem_len);
1182 release_region(tridentfb_fix.mmio_start, tridentfb_fix.mmio_len);
1183}
1184
1185/* List of boards that we are trying to support */
1186static struct pci_device_id trident_devices[] = {
1187 {PCI_VENDOR_ID_TRIDENT, BLADE3D, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1188 {PCI_VENDOR_ID_TRIDENT, CYBERBLADEi7, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1189 {PCI_VENDOR_ID_TRIDENT, CYBERBLADEi7D, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1190 {PCI_VENDOR_ID_TRIDENT, CYBERBLADEi1, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1191 {PCI_VENDOR_ID_TRIDENT, CYBERBLADEi1D, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1192 {PCI_VENDOR_ID_TRIDENT, CYBERBLADEAi1, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1193 {PCI_VENDOR_ID_TRIDENT, CYBERBLADEAi1D, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1194 {PCI_VENDOR_ID_TRIDENT, CYBERBLADEE4, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1195 {PCI_VENDOR_ID_TRIDENT, TGUI9660, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1196 {PCI_VENDOR_ID_TRIDENT, IMAGE975, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1197 {PCI_VENDOR_ID_TRIDENT, IMAGE985, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1198 {PCI_VENDOR_ID_TRIDENT, CYBER9320, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1199 {PCI_VENDOR_ID_TRIDENT, CYBER9388, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1200 {PCI_VENDOR_ID_TRIDENT, CYBER9520, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1201 {PCI_VENDOR_ID_TRIDENT, CYBER9525DVD, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1202 {PCI_VENDOR_ID_TRIDENT, CYBER9397, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1203 {PCI_VENDOR_ID_TRIDENT, CYBER9397DVD, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1204 {PCI_VENDOR_ID_TRIDENT, CYBERBLADEXPAi1, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1205 {PCI_VENDOR_ID_TRIDENT, CYBERBLADEXPm8, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1206 {PCI_VENDOR_ID_TRIDENT, CYBERBLADEXPm16, PCI_ANY_ID,PCI_ANY_ID,0,0,0},
1207 {0,}
1208};
1209
1210MODULE_DEVICE_TABLE(pci,trident_devices);
1211
1212static struct pci_driver tridentfb_pci_driver = {
1213 .name = "tridentfb",
1214 .id_table = trident_devices,
1215 .probe = trident_pci_probe,
1216 .remove = __devexit_p(trident_pci_remove)
1217};
1218
1219/*
1220 * Parse user specified options (`video=trident:')
1221 * example:
1222 * video=trident:800x600,bpp=16,noaccel
1223 */
1224#ifndef MODULE
1225static int tridentfb_setup(char *options)
1226{
1227 char * opt;
1228 if (!options || !*options)
1229 return 0;
1230 while((opt = strsep(&options,",")) != NULL ) {
1231 if (!*opt) continue;
1232 if (!strncmp(opt,"noaccel",7))
1233 noaccel = 1;
1234 else if (!strncmp(opt,"fp",2))
1235 displaytype = DISPLAY_FP;
1236 else if (!strncmp(opt,"crt",3))
1237 displaytype = DISPLAY_CRT;
1238 else if (!strncmp(opt,"bpp=",4))
1239 bpp = simple_strtoul(opt+4,NULL,0);
1240 else if (!strncmp(opt,"center",6))
1241 center = 1;
1242 else if (!strncmp(opt,"stretch",7))
1243 stretch = 1;
1244 else if (!strncmp(opt,"memsize=",8))
1245 memsize = simple_strtoul(opt+8,NULL,0);
1246 else if (!strncmp(opt,"memdiff=",8))
1247 memdiff = simple_strtoul(opt+8,NULL,0);
1248 else if (!strncmp(opt,"nativex=",8))
1249 nativex = simple_strtoul(opt+8,NULL,0);
1250 else
1251 mode = opt;
1252 }
1253 return 0;
1254}
1255#endif
1256
1257static int __init tridentfb_init(void)
1258{
1259#ifndef MODULE
1260 char *option = NULL;
1261
1262 if (fb_get_options("tridentfb", &option))
1263 return -ENODEV;
1264 tridentfb_setup(option);
1265#endif
1266 output("Trident framebuffer %s initializing\n", VERSION);
1267 return pci_register_driver(&tridentfb_pci_driver);
1268}
1269
1270static void __exit tridentfb_exit(void)
1271{
1272 pci_unregister_driver(&tridentfb_pci_driver);
1273}
1274
1275static struct fb_ops tridentfb_ops = {
1276 .owner = THIS_MODULE,
1277 .fb_setcolreg = tridentfb_setcolreg,
1278 .fb_pan_display = tridentfb_pan_display,
1279 .fb_blank = tridentfb_blank,
1280 .fb_check_var = tridentfb_check_var,
1281 .fb_set_par = tridentfb_set_par,
1282 .fb_fillrect = tridentfb_fillrect,
1283 .fb_copyarea= tridentfb_copyarea,
1284 .fb_imageblit = cfb_imageblit,
1285 .fb_cursor = soft_cursor,
1286};
1287
1288module_init(tridentfb_init);
1289module_exit(tridentfb_exit);
1290
1291MODULE_AUTHOR("Jani Monoses <jani@iv.ro>");
1292MODULE_DESCRIPTION("Framebuffer driver for Trident cards");
1293MODULE_LICENSE("GPL");
1294