• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 /*
2  * Frame buffer driver for Trident TGUI, 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
11  *	by Alan Hourihane the FreeVGA project
12  *	Francesco Salvestrini <salvestrini@users.sf.net> XP support,
13  *	code, suggestions
14  * TODO:
15  *	timing value tweaking so it looks good on every monitor in every mode
16  */
17 
18 #include <linux/module.h>
19 #include <linux/fb.h>
20 #include <linux/init.h>
21 #include <linux/pci.h>
22 
23 #include <linux/delay.h>
24 #include <video/vga.h>
25 #include <video/trident.h>
26 
27 struct tridentfb_par {
28 	void __iomem *io_virt;	/* iospace virtual memory address */
29 	u32 pseudo_pal[16];
30 	int chip_id;
31 	int flatpanel;
32 	void (*init_accel) (struct tridentfb_par *, int, int);
33 	void (*wait_engine) (struct tridentfb_par *);
34 	void (*fill_rect)
35 		(struct tridentfb_par *par, u32, u32, u32, u32, u32, u32);
36 	void (*copy_rect)
37 		(struct tridentfb_par *par, u32, u32, u32, u32, u32, u32);
38 	void (*image_blit)
39 		(struct tridentfb_par *par, const char*,
40 		 u32, u32, u32, u32, u32, u32);
41 	unsigned char eng_oper;	/* engine operation... */
42 };
43 
44 static struct fb_fix_screeninfo tridentfb_fix = {
45 	.id = "Trident",
46 	.type = FB_TYPE_PACKED_PIXELS,
47 	.ypanstep = 1,
48 	.visual = FB_VISUAL_PSEUDOCOLOR,
49 	.accel = FB_ACCEL_NONE,
50 };
51 
52 /* defaults which are normally overriden by user values */
53 
54 /* video mode */
55 static char *mode_option __devinitdata = "640x480-8@60";
56 static int bpp __devinitdata = 8;
57 
58 static int noaccel __devinitdata;
59 
60 static int center;
61 static int stretch;
62 
63 static int fp __devinitdata;
64 static int crt __devinitdata;
65 
66 static int memsize __devinitdata;
67 static int memdiff __devinitdata;
68 static int nativex;
69 
70 module_param(mode_option, charp, 0);
71 MODULE_PARM_DESC(mode_option, "Initial video mode e.g. '648x480-8@60'");
72 module_param_named(mode, mode_option, charp, 0);
73 MODULE_PARM_DESC(mode, "Initial video mode e.g. '648x480-8@60' (deprecated)");
74 module_param(bpp, int, 0);
75 module_param(center, int, 0);
76 module_param(stretch, int, 0);
77 module_param(noaccel, int, 0);
78 module_param(memsize, int, 0);
79 module_param(memdiff, int, 0);
80 module_param(nativex, int, 0);
81 module_param(fp, int, 0);
82 MODULE_PARM_DESC(fp, "Define if flatpanel is connected");
83 module_param(crt, int, 0);
84 MODULE_PARM_DESC(crt, "Define if CRT is connected");
85 
is_oldclock(int id)86 static inline int is_oldclock(int id)
87 {
88 	return	(id == TGUI9440) ||
89 		(id == TGUI9660) ||
90 		(id == CYBER9320);
91 }
92 
is_oldprotect(int id)93 static inline int is_oldprotect(int id)
94 {
95 	return	is_oldclock(id) ||
96 		(id == PROVIDIA9685) ||
97 		(id == CYBER9382) ||
98 		(id == CYBER9385);
99 }
100 
is_blade(int id)101 static inline int is_blade(int id)
102 {
103 	return	(id == BLADE3D) ||
104 		(id == CYBERBLADEE4) ||
105 		(id == CYBERBLADEi7) ||
106 		(id == CYBERBLADEi7D) ||
107 		(id == CYBERBLADEi1) ||
108 		(id == CYBERBLADEi1D) ||
109 		(id == CYBERBLADEAi1) ||
110 		(id == CYBERBLADEAi1D);
111 }
112 
is_xp(int id)113 static inline int is_xp(int id)
114 {
115 	return	(id == CYBERBLADEXPAi1) ||
116 		(id == CYBERBLADEXPm8) ||
117 		(id == CYBERBLADEXPm16);
118 }
119 
is3Dchip(int id)120 static inline int is3Dchip(int id)
121 {
122 	return	is_blade(id) || is_xp(id) ||
123 		(id == CYBER9397) || (id == CYBER9397DVD) ||
124 		(id == CYBER9520) || (id == CYBER9525DVD) ||
125 		(id == IMAGE975) || (id == IMAGE985);
126 }
127 
iscyber(int id)128 static inline int iscyber(int id)
129 {
130 	switch (id) {
131 	case CYBER9388:
132 	case CYBER9382:
133 	case CYBER9385:
134 	case CYBER9397:
135 	case CYBER9397DVD:
136 	case CYBER9520:
137 	case CYBER9525DVD:
138 	case CYBERBLADEE4:
139 	case CYBERBLADEi7D:
140 	case CYBERBLADEi1:
141 	case CYBERBLADEi1D:
142 	case CYBERBLADEAi1:
143 	case CYBERBLADEAi1D:
144 	case CYBERBLADEXPAi1:
145 		return 1;
146 
147 	case CYBER9320:
148 	case CYBERBLADEi7:	/* VIA MPV4 integrated version */
149 	default:
150 		/* case CYBERBLDAEXPm8:  Strange */
151 		/* case CYBERBLDAEXPm16: Strange */
152 		return 0;
153 	}
154 }
155 
t_outb(struct tridentfb_par * p,u8 val,u16 reg)156 static inline void t_outb(struct tridentfb_par *p, u8 val, u16 reg)
157 {
158 	fb_writeb(val, p->io_virt + reg);
159 }
160 
t_inb(struct tridentfb_par * p,u16 reg)161 static inline u8 t_inb(struct tridentfb_par *p, u16 reg)
162 {
163 	return fb_readb(p->io_virt + reg);
164 }
165 
writemmr(struct tridentfb_par * par,u16 r,u32 v)166 static inline void writemmr(struct tridentfb_par *par, u16 r, u32 v)
167 {
168 	fb_writel(v, par->io_virt + r);
169 }
170 
readmmr(struct tridentfb_par * par,u16 r)171 static inline u32 readmmr(struct tridentfb_par *par, u16 r)
172 {
173 	return fb_readl(par->io_virt + r);
174 }
175 
176 /*
177  * Blade specific acceleration.
178  */
179 
180 #define point(x, y) ((y) << 16 | (x))
181 
blade_init_accel(struct tridentfb_par * par,int pitch,int bpp)182 static void blade_init_accel(struct tridentfb_par *par, int pitch, int bpp)
183 {
184 	int v1 = (pitch >> 3) << 20;
185 	int tmp = bpp == 24 ? 2 : (bpp >> 4);
186 	int v2 = v1 | (tmp << 29);
187 
188 	writemmr(par, 0x21C0, v2);
189 	writemmr(par, 0x21C4, v2);
190 	writemmr(par, 0x21B8, v2);
191 	writemmr(par, 0x21BC, v2);
192 	writemmr(par, 0x21D0, v1);
193 	writemmr(par, 0x21D4, v1);
194 	writemmr(par, 0x21C8, v1);
195 	writemmr(par, 0x21CC, v1);
196 	writemmr(par, 0x216C, 0);
197 }
198 
blade_wait_engine(struct tridentfb_par * par)199 static void blade_wait_engine(struct tridentfb_par *par)
200 {
201 	while (readmmr(par, STATUS) & 0xFA800000)
202 		cpu_relax();
203 }
204 
blade_fill_rect(struct tridentfb_par * par,u32 x,u32 y,u32 w,u32 h,u32 c,u32 rop)205 static void blade_fill_rect(struct tridentfb_par *par,
206 			    u32 x, u32 y, u32 w, u32 h, u32 c, u32 rop)
207 {
208 	writemmr(par, COLOR, c);
209 	writemmr(par, ROP, rop ? ROP_X : ROP_S);
210 	writemmr(par, CMD, 0x20000000 | 1 << 19 | 1 << 4 | 2 << 2);
211 
212 	writemmr(par, DST1, point(x, y));
213 	writemmr(par, DST2, point(x + w - 1, y + h - 1));
214 }
215 
blade_image_blit(struct tridentfb_par * par,const char * data,u32 x,u32 y,u32 w,u32 h,u32 c,u32 b)216 static void blade_image_blit(struct tridentfb_par *par, const char *data,
217 			     u32 x, u32 y, u32 w, u32 h, u32 c, u32 b)
218 {
219 	unsigned size = ((w + 31) >> 5) * h;
220 
221 	writemmr(par, COLOR, c);
222 	writemmr(par, BGCOLOR, b);
223 	writemmr(par, CMD, 0xa0000000 | 3 << 19);
224 
225 	writemmr(par, DST1, point(x, y));
226 	writemmr(par, DST2, point(x + w - 1, y + h - 1));
227 
228 	memcpy(par->io_virt + 0x10000, data, 4 * size);
229 }
230 
blade_copy_rect(struct tridentfb_par * par,u32 x1,u32 y1,u32 x2,u32 y2,u32 w,u32 h)231 static void blade_copy_rect(struct tridentfb_par *par,
232 			    u32 x1, u32 y1, u32 x2, u32 y2, u32 w, u32 h)
233 {
234 	int direction = 2;
235 	u32 s1 = point(x1, y1);
236 	u32 s2 = point(x1 + w - 1, y1 + h - 1);
237 	u32 d1 = point(x2, y2);
238 	u32 d2 = point(x2 + w - 1, y2 + h - 1);
239 
240 	if ((y1 > y2) || ((y1 == y2) && (x1 > x2)))
241 		direction = 0;
242 
243 	writemmr(par, ROP, ROP_S);
244 	writemmr(par, CMD, 0xE0000000 | 1 << 19 | 1 << 4 | 1 << 2 | direction);
245 
246 	writemmr(par, SRC1, direction ? s2 : s1);
247 	writemmr(par, SRC2, direction ? s1 : s2);
248 	writemmr(par, DST1, direction ? d2 : d1);
249 	writemmr(par, DST2, direction ? d1 : d2);
250 }
251 
252 /*
253  * BladeXP specific acceleration functions
254  */
255 
xp_init_accel(struct tridentfb_par * par,int pitch,int bpp)256 static void xp_init_accel(struct tridentfb_par *par, int pitch, int bpp)
257 {
258 	unsigned char x = bpp == 24 ? 3 : (bpp >> 4);
259 	int v1 = pitch << (bpp == 24 ? 20 : (18 + x));
260 
261 	switch (pitch << (bpp >> 3)) {
262 	case 8192:
263 	case 512:
264 		x |= 0x00;
265 		break;
266 	case 1024:
267 		x |= 0x04;
268 		break;
269 	case 2048:
270 		x |= 0x08;
271 		break;
272 	case 4096:
273 		x |= 0x0C;
274 		break;
275 	}
276 
277 	t_outb(par, x, 0x2125);
278 
279 	par->eng_oper = x | 0x40;
280 
281 	writemmr(par, 0x2154, v1);
282 	writemmr(par, 0x2150, v1);
283 	t_outb(par, 3, 0x2126);
284 }
285 
xp_wait_engine(struct tridentfb_par * par)286 static void xp_wait_engine(struct tridentfb_par *par)
287 {
288 	int count = 0;
289 	int timeout = 0;
290 
291 	while (t_inb(par, STATUS) & 0x80) {
292 		count++;
293 		if (count == 10000000) {
294 			/* Timeout */
295 			count = 9990000;
296 			timeout++;
297 			if (timeout == 8) {
298 				/* Reset engine */
299 				t_outb(par, 0x00, STATUS);
300 				return;
301 			}
302 		}
303 		cpu_relax();
304 	}
305 }
306 
xp_fill_rect(struct tridentfb_par * par,u32 x,u32 y,u32 w,u32 h,u32 c,u32 rop)307 static void xp_fill_rect(struct tridentfb_par *par,
308 			 u32 x, u32 y, u32 w, u32 h, u32 c, u32 rop)
309 {
310 	writemmr(par, 0x2127, ROP_P);
311 	writemmr(par, 0x2158, c);
312 	writemmr(par, DRAWFL, 0x4000);
313 	writemmr(par, OLDDIM, point(h, w));
314 	writemmr(par, OLDDST, point(y, x));
315 	t_outb(par, 0x01, OLDCMD);
316 	t_outb(par, par->eng_oper, 0x2125);
317 }
318 
xp_copy_rect(struct tridentfb_par * par,u32 x1,u32 y1,u32 x2,u32 y2,u32 w,u32 h)319 static void xp_copy_rect(struct tridentfb_par *par,
320 			 u32 x1, u32 y1, u32 x2, u32 y2, u32 w, u32 h)
321 {
322 	u32 x1_tmp, x2_tmp, y1_tmp, y2_tmp;
323 	int direction = 0x0004;
324 
325 	if ((x1 < x2) && (y1 == y2)) {
326 		direction |= 0x0200;
327 		x1_tmp = x1 + w - 1;
328 		x2_tmp = x2 + w - 1;
329 	} else {
330 		x1_tmp = x1;
331 		x2_tmp = x2;
332 	}
333 
334 	if (y1 < y2) {
335 		direction |= 0x0100;
336 		y1_tmp = y1 + h - 1;
337 		y2_tmp = y2 + h - 1;
338 	} else {
339 		y1_tmp = y1;
340 		y2_tmp = y2;
341 	}
342 
343 	writemmr(par, DRAWFL, direction);
344 	t_outb(par, ROP_S, 0x2127);
345 	writemmr(par, OLDSRC, point(y1_tmp, x1_tmp));
346 	writemmr(par, OLDDST, point(y2_tmp, x2_tmp));
347 	writemmr(par, OLDDIM, point(h, w));
348 	t_outb(par, 0x01, OLDCMD);
349 }
350 
351 /*
352  * Image specific acceleration functions
353  */
image_init_accel(struct tridentfb_par * par,int pitch,int bpp)354 static void image_init_accel(struct tridentfb_par *par, int pitch, int bpp)
355 {
356 	int tmp = bpp == 24 ? 2: (bpp >> 4);
357 
358 	writemmr(par, 0x2120, 0xF0000000);
359 	writemmr(par, 0x2120, 0x40000000 | tmp);
360 	writemmr(par, 0x2120, 0x80000000);
361 	writemmr(par, 0x2144, 0x00000000);
362 	writemmr(par, 0x2148, 0x00000000);
363 	writemmr(par, 0x2150, 0x00000000);
364 	writemmr(par, 0x2154, 0x00000000);
365 	writemmr(par, 0x2120, 0x60000000 | (pitch << 16) | pitch);
366 	writemmr(par, 0x216C, 0x00000000);
367 	writemmr(par, 0x2170, 0x00000000);
368 	writemmr(par, 0x217C, 0x00000000);
369 	writemmr(par, 0x2120, 0x10000000);
370 	writemmr(par, 0x2130, (2047 << 16) | 2047);
371 }
372 
image_wait_engine(struct tridentfb_par * par)373 static void image_wait_engine(struct tridentfb_par *par)
374 {
375 	while (readmmr(par, 0x2164) & 0xF0000000)
376 		cpu_relax();
377 }
378 
image_fill_rect(struct tridentfb_par * par,u32 x,u32 y,u32 w,u32 h,u32 c,u32 rop)379 static void image_fill_rect(struct tridentfb_par *par,
380 			    u32 x, u32 y, u32 w, u32 h, u32 c, u32 rop)
381 {
382 	writemmr(par, 0x2120, 0x80000000);
383 	writemmr(par, 0x2120, 0x90000000 | ROP_S);
384 
385 	writemmr(par, 0x2144, c);
386 
387 	writemmr(par, DST1, point(x, y));
388 	writemmr(par, DST2, point(x + w - 1, y + h - 1));
389 
390 	writemmr(par, 0x2124, 0x80000000 | 3 << 22 | 1 << 10 | 1 << 9);
391 }
392 
image_copy_rect(struct tridentfb_par * par,u32 x1,u32 y1,u32 x2,u32 y2,u32 w,u32 h)393 static void image_copy_rect(struct tridentfb_par *par,
394 			    u32 x1, u32 y1, u32 x2, u32 y2, u32 w, u32 h)
395 {
396 	int direction = 0x4;
397 	u32 s1 = point(x1, y1);
398 	u32 s2 = point(x1 + w - 1, y1 + h - 1);
399 	u32 d1 = point(x2, y2);
400 	u32 d2 = point(x2 + w - 1, y2 + h - 1);
401 
402 	if ((y1 > y2) || ((y1 == y2) && (x1 > x2)))
403 		direction = 0;
404 
405 	writemmr(par, 0x2120, 0x80000000);
406 	writemmr(par, 0x2120, 0x90000000 | ROP_S);
407 
408 	writemmr(par, SRC1, direction ? s2 : s1);
409 	writemmr(par, SRC2, direction ? s1 : s2);
410 	writemmr(par, DST1, direction ? d2 : d1);
411 	writemmr(par, DST2, direction ? d1 : d2);
412 	writemmr(par, 0x2124,
413 		 0x80000000 | 1 << 22 | 1 << 10 | 1 << 7 | direction);
414 }
415 
416 /*
417  * TGUI 9440/96XX acceleration
418  */
419 
tgui_init_accel(struct tridentfb_par * par,int pitch,int bpp)420 static void tgui_init_accel(struct tridentfb_par *par, int pitch, int bpp)
421 {
422 	unsigned char x = bpp == 24 ? 3 : (bpp >> 4);
423 
424 	/* disable clipping */
425 	writemmr(par, 0x2148, 0);
426 	writemmr(par, 0x214C, point(4095, 2047));
427 
428 	switch ((pitch * bpp) / 8) {
429 	case 8192:
430 	case 512:
431 		x |= 0x00;
432 		break;
433 	case 1024:
434 		x |= 0x04;
435 		break;
436 	case 2048:
437 		x |= 0x08;
438 		break;
439 	case 4096:
440 		x |= 0x0C;
441 		break;
442 	}
443 
444 	fb_writew(x, par->io_virt + 0x2122);
445 }
446 
tgui_fill_rect(struct tridentfb_par * par,u32 x,u32 y,u32 w,u32 h,u32 c,u32 rop)447 static void tgui_fill_rect(struct tridentfb_par *par,
448 			   u32 x, u32 y, u32 w, u32 h, u32 c, u32 rop)
449 {
450 	t_outb(par, ROP_P, 0x2127);
451 	writemmr(par, OLDCLR, c);
452 	writemmr(par, DRAWFL, 0x4020);
453 	writemmr(par, OLDDIM, point(w - 1, h - 1));
454 	writemmr(par, OLDDST, point(x, y));
455 	t_outb(par, 1, OLDCMD);
456 }
457 
tgui_copy_rect(struct tridentfb_par * par,u32 x1,u32 y1,u32 x2,u32 y2,u32 w,u32 h)458 static void tgui_copy_rect(struct tridentfb_par *par,
459 			   u32 x1, u32 y1, u32 x2, u32 y2, u32 w, u32 h)
460 {
461 	int flags = 0;
462 	u16 x1_tmp, x2_tmp, y1_tmp, y2_tmp;
463 
464 	if ((x1 < x2) && (y1 == y2)) {
465 		flags |= 0x0200;
466 		x1_tmp = x1 + w - 1;
467 		x2_tmp = x2 + w - 1;
468 	} else {
469 		x1_tmp = x1;
470 		x2_tmp = x2;
471 	}
472 
473 	if (y1 < y2) {
474 		flags |= 0x0100;
475 		y1_tmp = y1 + h - 1;
476 		y2_tmp = y2 + h - 1;
477 	} else {
478 		y1_tmp = y1;
479 		y2_tmp = y2;
480 	}
481 
482 	writemmr(par, DRAWFL, 0x4 | flags);
483 	t_outb(par, ROP_S, 0x2127);
484 	writemmr(par, OLDSRC, point(x1_tmp, y1_tmp));
485 	writemmr(par, OLDDST, point(x2_tmp, y2_tmp));
486 	writemmr(par, OLDDIM, point(w - 1, h - 1));
487 	t_outb(par, 1, OLDCMD);
488 }
489 
490 /*
491  * Accel functions called by the upper layers
492  */
493 #ifdef CONFIG_FB_TRIDENT_ACCEL
tridentfb_fillrect(struct fb_info * info,const struct fb_fillrect * fr)494 static void tridentfb_fillrect(struct fb_info *info,
495 			       const struct fb_fillrect *fr)
496 {
497 	struct tridentfb_par *par = info->par;
498 	int col;
499 
500 	if (info->flags & FBINFO_HWACCEL_DISABLED) {
501 		cfb_fillrect(info, fr);
502 		return;
503 	}
504 	if (info->var.bits_per_pixel == 8) {
505 		col = fr->color;
506 		col |= col << 8;
507 		col |= col << 16;
508 	} else
509 		col = ((u32 *)(info->pseudo_palette))[fr->color];
510 
511 	par->wait_engine(par);
512 	par->fill_rect(par, fr->dx, fr->dy, fr->width,
513 		       fr->height, col, fr->rop);
514 }
515 
tridentfb_imageblit(struct fb_info * info,const struct fb_image * img)516 static void tridentfb_imageblit(struct fb_info *info,
517 				const struct fb_image *img)
518 {
519 	struct tridentfb_par *par = info->par;
520 	int col, bgcol;
521 
522 	if ((info->flags & FBINFO_HWACCEL_DISABLED) || img->depth != 1) {
523 		cfb_imageblit(info, img);
524 		return;
525 	}
526 	if (info->var.bits_per_pixel == 8) {
527 		col = img->fg_color;
528 		col |= col << 8;
529 		col |= col << 16;
530 		bgcol = img->bg_color;
531 		bgcol |= bgcol << 8;
532 		bgcol |= bgcol << 16;
533 	} else {
534 		col = ((u32 *)(info->pseudo_palette))[img->fg_color];
535 		bgcol = ((u32 *)(info->pseudo_palette))[img->bg_color];
536 	}
537 
538 	par->wait_engine(par);
539 	if (par->image_blit)
540 		par->image_blit(par, img->data, img->dx, img->dy,
541 				img->width, img->height, col, bgcol);
542 	else
543 		cfb_imageblit(info, img);
544 }
545 
tridentfb_copyarea(struct fb_info * info,const struct fb_copyarea * ca)546 static void tridentfb_copyarea(struct fb_info *info,
547 			       const struct fb_copyarea *ca)
548 {
549 	struct tridentfb_par *par = info->par;
550 
551 	if (info->flags & FBINFO_HWACCEL_DISABLED) {
552 		cfb_copyarea(info, ca);
553 		return;
554 	}
555 	par->wait_engine(par);
556 	par->copy_rect(par, ca->sx, ca->sy, ca->dx, ca->dy,
557 		       ca->width, ca->height);
558 }
559 
tridentfb_sync(struct fb_info * info)560 static int tridentfb_sync(struct fb_info *info)
561 {
562 	struct tridentfb_par *par = info->par;
563 
564 	if (!(info->flags & FBINFO_HWACCEL_DISABLED))
565 		par->wait_engine(par);
566 	return 0;
567 }
568 #else
569 #define tridentfb_fillrect cfb_fillrect
570 #define tridentfb_copyarea cfb_copyarea
571 #define tridentfb_imageblit cfb_imageblit
572 #endif /* CONFIG_FB_TRIDENT_ACCEL */
573 
574 /*
575  * Hardware access functions
576  */
577 
read3X4(struct tridentfb_par * par,int reg)578 static inline unsigned char read3X4(struct tridentfb_par *par, int reg)
579 {
580 	return vga_mm_rcrt(par->io_virt, reg);
581 }
582 
write3X4(struct tridentfb_par * par,int reg,unsigned char val)583 static inline void write3X4(struct tridentfb_par *par, int reg,
584 			    unsigned char val)
585 {
586 	vga_mm_wcrt(par->io_virt, reg, val);
587 }
588 
read3CE(struct tridentfb_par * par,unsigned char reg)589 static inline unsigned char read3CE(struct tridentfb_par *par,
590 				    unsigned char reg)
591 {
592 	return vga_mm_rgfx(par->io_virt, reg);
593 }
594 
writeAttr(struct tridentfb_par * par,int reg,unsigned char val)595 static inline void writeAttr(struct tridentfb_par *par, int reg,
596 			     unsigned char val)
597 {
598 	fb_readb(par->io_virt + VGA_IS1_RC);	/* flip-flop to index */
599 	vga_mm_wattr(par->io_virt, reg, val);
600 }
601 
write3CE(struct tridentfb_par * par,int reg,unsigned char val)602 static inline void write3CE(struct tridentfb_par *par, int reg,
603 			    unsigned char val)
604 {
605 	vga_mm_wgfx(par->io_virt, reg, val);
606 }
607 
enable_mmio(struct tridentfb_par * par)608 static void enable_mmio(struct tridentfb_par *par)
609 {
610 	/* Goto New Mode */
611 	vga_io_rseq(0x0B);
612 
613 	/* Unprotect registers */
614 	vga_io_wseq(NewMode1, 0x80);
615 	if (!is_oldprotect(par->chip_id))
616 		vga_io_wseq(Protection, 0x92);
617 
618 	/* Enable MMIO */
619 	outb(PCIReg, 0x3D4);
620 	outb(inb(0x3D5) | 0x01, 0x3D5);
621 }
622 
disable_mmio(struct tridentfb_par * par)623 static void disable_mmio(struct tridentfb_par *par)
624 {
625 	/* Goto New Mode */
626 	vga_mm_rseq(par->io_virt, 0x0B);
627 
628 	/* Unprotect registers */
629 	vga_mm_wseq(par->io_virt, NewMode1, 0x80);
630 	if (!is_oldprotect(par->chip_id))
631 		vga_mm_wseq(par->io_virt, Protection, 0x92);
632 
633 	/* Disable MMIO */
634 	t_outb(par, PCIReg, 0x3D4);
635 	t_outb(par, t_inb(par, 0x3D5) & ~0x01, 0x3D5);
636 }
637 
crtc_unlock(struct tridentfb_par * par)638 static inline void crtc_unlock(struct tridentfb_par *par)
639 {
640 	write3X4(par, VGA_CRTC_V_SYNC_END,
641 		 read3X4(par, VGA_CRTC_V_SYNC_END) & 0x7F);
642 }
643 
644 /*  Return flat panel's maximum x resolution */
get_nativex(struct tridentfb_par * par)645 static int __devinit get_nativex(struct tridentfb_par *par)
646 {
647 	int x, y, tmp;
648 
649 	if (nativex)
650 		return nativex;
651 
652 	tmp = (read3CE(par, VertStretch) >> 4) & 3;
653 
654 	switch (tmp) {
655 	case 0:
656 		x = 1280; y = 1024;
657 		break;
658 	case 2:
659 		x = 1024; y = 768;
660 		break;
661 	case 3:
662 		x = 800; y = 600;
663 		break;
664 	case 4:
665 		x = 1400; y = 1050;
666 		break;
667 	case 1:
668 	default:
669 		x = 640;  y = 480;
670 		break;
671 	}
672 
673 	output("%dx%d flat panel found\n", x, y);
674 	return x;
675 }
676 
677 /* Set pitch */
set_lwidth(struct tridentfb_par * par,int width)678 static inline void set_lwidth(struct tridentfb_par *par, int width)
679 {
680 	write3X4(par, VGA_CRTC_OFFSET, width & 0xFF);
681 	write3X4(par, AddColReg,
682 		 (read3X4(par, AddColReg) & 0xCF) | ((width & 0x300) >> 4));
683 }
684 
685 /* For resolutions smaller than FP resolution stretch */
screen_stretch(struct tridentfb_par * par)686 static void screen_stretch(struct tridentfb_par *par)
687 {
688 	if (par->chip_id != CYBERBLADEXPAi1)
689 		write3CE(par, BiosReg, 0);
690 	else
691 		write3CE(par, BiosReg, 8);
692 	write3CE(par, VertStretch, (read3CE(par, VertStretch) & 0x7C) | 1);
693 	write3CE(par, HorStretch, (read3CE(par, HorStretch) & 0x7C) | 1);
694 }
695 
696 /* For resolutions smaller than FP resolution center */
screen_center(struct tridentfb_par * par)697 static inline void screen_center(struct tridentfb_par *par)
698 {
699 	write3CE(par, VertStretch, (read3CE(par, VertStretch) & 0x7C) | 0x80);
700 	write3CE(par, HorStretch, (read3CE(par, HorStretch) & 0x7C) | 0x80);
701 }
702 
703 /* Address of first shown pixel in display memory */
set_screen_start(struct tridentfb_par * par,int base)704 static void set_screen_start(struct tridentfb_par *par, int base)
705 {
706 	u8 tmp;
707 	write3X4(par, VGA_CRTC_START_LO, base & 0xFF);
708 	write3X4(par, VGA_CRTC_START_HI, (base & 0xFF00) >> 8);
709 	tmp = read3X4(par, CRTCModuleTest) & 0xDF;
710 	write3X4(par, CRTCModuleTest, tmp | ((base & 0x10000) >> 11));
711 	tmp = read3X4(par, CRTHiOrd) & 0xF8;
712 	write3X4(par, CRTHiOrd, tmp | ((base & 0xE0000) >> 17));
713 }
714 
715 /* Set dotclock frequency */
set_vclk(struct tridentfb_par * par,unsigned long freq)716 static void set_vclk(struct tridentfb_par *par, unsigned long freq)
717 {
718 	int m, n, k;
719 	unsigned long fi, d, di;
720 	unsigned char best_m = 0, best_n = 0, best_k = 0;
721 	unsigned char hi, lo;
722 	unsigned char shift = !is_oldclock(par->chip_id) ? 2 : 1;
723 
724 	d = 20000;
725 	for (k = shift; k >= 0; k--)
726 		for (m = 1; m < 32; m++) {
727 			n = ((m + 2) << shift) - 8;
728 			for (n = (n < 0 ? 0 : n); n < 122; n++) {
729 				fi = ((14318l * (n + 8)) / (m + 2)) >> k;
730 				di = abs(fi - freq);
731 				if (di < d || (di == d && k == best_k)) {
732 					d = di;
733 					best_n = n;
734 					best_m = m;
735 					best_k = k;
736 				}
737 				if (fi > freq)
738 					break;
739 			}
740 		}
741 
742 	if (is_oldclock(par->chip_id)) {
743 		lo = best_n | (best_m << 7);
744 		hi = (best_m >> 1) | (best_k << 4);
745 	} else {
746 		lo = best_n;
747 		hi = best_m | (best_k << 6);
748 	}
749 
750 	if (is3Dchip(par->chip_id)) {
751 		vga_mm_wseq(par->io_virt, ClockHigh, hi);
752 		vga_mm_wseq(par->io_virt, ClockLow, lo);
753 	} else {
754 		t_outb(par, lo, 0x43C8);
755 		t_outb(par, hi, 0x43C9);
756 	}
757 	debug("VCLK = %X %X\n", hi, lo);
758 }
759 
760 /* Set number of lines for flat panels*/
set_number_of_lines(struct tridentfb_par * par,int lines)761 static void set_number_of_lines(struct tridentfb_par *par, int lines)
762 {
763 	int tmp = read3CE(par, CyberEnhance) & 0x8F;
764 	if (lines > 1024)
765 		tmp |= 0x50;
766 	else if (lines > 768)
767 		tmp |= 0x30;
768 	else if (lines > 600)
769 		tmp |= 0x20;
770 	else if (lines > 480)
771 		tmp |= 0x10;
772 	write3CE(par, CyberEnhance, tmp);
773 }
774 
775 /*
776  * If we see that FP is active we assume we have one.
777  * Otherwise we have a CRT display. User can override.
778  */
is_flatpanel(struct tridentfb_par * par)779 static int __devinit is_flatpanel(struct tridentfb_par *par)
780 {
781 	if (fp)
782 		return 1;
783 	if (crt || !iscyber(par->chip_id))
784 		return 0;
785 	return (read3CE(par, FPConfig) & 0x10) ? 1 : 0;
786 }
787 
788 /* Try detecting the video memory size */
get_memsize(struct tridentfb_par * par)789 static unsigned int __devinit get_memsize(struct tridentfb_par *par)
790 {
791 	unsigned char tmp, tmp2;
792 	unsigned int k;
793 
794 	/* If memory size provided by user */
795 	if (memsize)
796 		k = memsize * Kb;
797 	else
798 		switch (par->chip_id) {
799 		case CYBER9525DVD:
800 			k = 2560 * Kb;
801 			break;
802 		default:
803 			tmp = read3X4(par, SPR) & 0x0F;
804 			switch (tmp) {
805 
806 			case 0x01:
807 				k = 512 * Kb;
808 				break;
809 			case 0x02:
810 				k = 6 * Mb;	/* XP */
811 				break;
812 			case 0x03:
813 				k = 1 * Mb;
814 				break;
815 			case 0x04:
816 				k = 8 * Mb;
817 				break;
818 			case 0x06:
819 				k = 10 * Mb;	/* XP */
820 				break;
821 			case 0x07:
822 				k = 2 * Mb;
823 				break;
824 			case 0x08:
825 				k = 12 * Mb;	/* XP */
826 				break;
827 			case 0x0A:
828 				k = 14 * Mb;	/* XP */
829 				break;
830 			case 0x0C:
831 				k = 16 * Mb;	/* XP */
832 				break;
833 			case 0x0E:		/* XP */
834 
835 				tmp2 = vga_mm_rseq(par->io_virt, 0xC1);
836 				switch (tmp2) {
837 				case 0x00:
838 					k = 20 * Mb;
839 					break;
840 				case 0x01:
841 					k = 24 * Mb;
842 					break;
843 				case 0x10:
844 					k = 28 * Mb;
845 					break;
846 				case 0x11:
847 					k = 32 * Mb;
848 					break;
849 				default:
850 					k = 1 * Mb;
851 					break;
852 				}
853 				break;
854 
855 			case 0x0F:
856 				k = 4 * Mb;
857 				break;
858 			default:
859 				k = 1 * Mb;
860 				break;
861 			}
862 		}
863 
864 	k -= memdiff * Kb;
865 	output("framebuffer size = %d Kb\n", k / Kb);
866 	return k;
867 }
868 
869 /* See if we can handle the video mode described in var */
tridentfb_check_var(struct fb_var_screeninfo * var,struct fb_info * info)870 static int tridentfb_check_var(struct fb_var_screeninfo *var,
871 			       struct fb_info *info)
872 {
873 	struct tridentfb_par *par = info->par;
874 	int bpp = var->bits_per_pixel;
875 	int line_length;
876 	int ramdac = 230000; /* 230MHz for most 3D chips */
877 	debug("enter\n");
878 
879 	/* check color depth */
880 	if (bpp == 24)
881 		bpp = var->bits_per_pixel = 32;
882 	if (bpp != 8 && bpp != 16 && bpp != 32)
883 		return -EINVAL;
884 	if (par->chip_id == TGUI9440 && bpp == 32)
885 		return -EINVAL;
886 	/* check whether resolution fits on panel and in memory */
887 	if (par->flatpanel && nativex && var->xres > nativex)
888 		return -EINVAL;
889 	/* various resolution checks */
890 	var->xres = (var->xres + 7) & ~0x7;
891 	if (var->xres > var->xres_virtual)
892 		var->xres_virtual = var->xres;
893 	if (var->yres > var->yres_virtual)
894 		var->yres_virtual = var->yres;
895 	if (var->xres_virtual > 4095 || var->yres > 2048)
896 		return -EINVAL;
897 	/* prevent from position overflow for acceleration */
898 	if (var->yres_virtual > 0xffff)
899 		return -EINVAL;
900 	line_length = var->xres_virtual * bpp / 8;
901 
902 	if (!is3Dchip(par->chip_id) &&
903 	    !(info->flags & FBINFO_HWACCEL_DISABLED)) {
904 		/* acceleration requires line length to be power of 2 */
905 		if (line_length <= 512)
906 			var->xres_virtual = 512 * 8 / bpp;
907 		else if (line_length <= 1024)
908 			var->xres_virtual = 1024 * 8 / bpp;
909 		else if (line_length <= 2048)
910 			var->xres_virtual = 2048 * 8 / bpp;
911 		else if (line_length <= 4096)
912 			var->xres_virtual = 4096 * 8 / bpp;
913 		else if (line_length <= 8192)
914 			var->xres_virtual = 8192 * 8 / bpp;
915 		else
916 			return -EINVAL;
917 
918 		line_length = var->xres_virtual * bpp / 8;
919 	}
920 
921 	/* datasheet specifies how to set panning only up to 4 MB */
922 	if (line_length * (var->yres_virtual - var->yres) > (4 << 20))
923 		var->yres_virtual = ((4 << 20) / line_length) + var->yres;
924 
925 	if (line_length * var->yres_virtual > info->fix.smem_len)
926 		return -EINVAL;
927 
928 	switch (bpp) {
929 	case 8:
930 		var->red.offset = 0;
931 		var->red.length = 8;
932 		var->green = var->red;
933 		var->blue = var->red;
934 		break;
935 	case 16:
936 		var->red.offset = 11;
937 		var->green.offset = 5;
938 		var->blue.offset = 0;
939 		var->red.length = 5;
940 		var->green.length = 6;
941 		var->blue.length = 5;
942 		break;
943 	case 32:
944 		var->red.offset = 16;
945 		var->green.offset = 8;
946 		var->blue.offset = 0;
947 		var->red.length = 8;
948 		var->green.length = 8;
949 		var->blue.length = 8;
950 		break;
951 	default:
952 		return -EINVAL;
953 	}
954 
955 	if (is_xp(par->chip_id))
956 		ramdac = 350000;
957 
958 	switch (par->chip_id) {
959 	case TGUI9440:
960 		ramdac = (bpp >= 16) ? 45000 : 90000;
961 		break;
962 	case CYBER9320:
963 	case TGUI9660:
964 		ramdac = 135000;
965 		break;
966 	case PROVIDIA9685:
967 	case CYBER9388:
968 	case CYBER9382:
969 	case CYBER9385:
970 		ramdac = 170000;
971 		break;
972 	}
973 
974 	/* The clock is doubled for 32 bpp */
975 	if (bpp == 32)
976 		ramdac /= 2;
977 
978 	if (PICOS2KHZ(var->pixclock) > ramdac)
979 		return -EINVAL;
980 
981 	debug("exit\n");
982 
983 	return 0;
984 
985 }
986 
987 /* Pan the display */
tridentfb_pan_display(struct fb_var_screeninfo * var,struct fb_info * info)988 static int tridentfb_pan_display(struct fb_var_screeninfo *var,
989 				 struct fb_info *info)
990 {
991 	struct tridentfb_par *par = info->par;
992 	unsigned int offset;
993 
994 	debug("enter\n");
995 	offset = (var->xoffset + (var->yoffset * var->xres_virtual))
996 		* var->bits_per_pixel / 32;
997 	set_screen_start(par, offset);
998 	debug("exit\n");
999 	return 0;
1000 }
1001 
shadowmode_on(struct tridentfb_par * par)1002 static inline void shadowmode_on(struct tridentfb_par *par)
1003 {
1004 	write3CE(par, CyberControl, read3CE(par, CyberControl) | 0x81);
1005 }
1006 
shadowmode_off(struct tridentfb_par * par)1007 static inline void shadowmode_off(struct tridentfb_par *par)
1008 {
1009 	write3CE(par, CyberControl, read3CE(par, CyberControl) & 0x7E);
1010 }
1011 
1012 /* Set the hardware to the requested video mode */
tridentfb_set_par(struct fb_info * info)1013 static int tridentfb_set_par(struct fb_info *info)
1014 {
1015 	struct tridentfb_par *par = info->par;
1016 	u32 htotal, hdispend, hsyncstart, hsyncend, hblankstart, hblankend;
1017 	u32 vtotal, vdispend, vsyncstart, vsyncend, vblankstart, vblankend;
1018 	struct fb_var_screeninfo *var = &info->var;
1019 	int bpp = var->bits_per_pixel;
1020 	unsigned char tmp;
1021 	unsigned long vclk;
1022 
1023 	debug("enter\n");
1024 	hdispend = var->xres / 8 - 1;
1025 	hsyncstart = (var->xres + var->right_margin) / 8;
1026 	hsyncend = (var->xres + var->right_margin + var->hsync_len) / 8;
1027 	htotal = (var->xres + var->left_margin + var->right_margin +
1028 		  var->hsync_len) / 8 - 5;
1029 	hblankstart = hdispend + 1;
1030 	hblankend = htotal + 3;
1031 
1032 	vdispend = var->yres - 1;
1033 	vsyncstart = var->yres + var->lower_margin;
1034 	vsyncend = vsyncstart + var->vsync_len;
1035 	vtotal = var->upper_margin + vsyncend - 2;
1036 	vblankstart = vdispend + 1;
1037 	vblankend = vtotal;
1038 
1039 	if (info->var.vmode & FB_VMODE_INTERLACED) {
1040 		vtotal /= 2;
1041 		vdispend /= 2;
1042 		vsyncstart /= 2;
1043 		vsyncend /= 2;
1044 		vblankstart /= 2;
1045 		vblankend /= 2;
1046 	}
1047 
1048 	enable_mmio(par);
1049 	crtc_unlock(par);
1050 	write3CE(par, CyberControl, 8);
1051 	tmp = 0xEB;
1052 	if (var->sync & FB_SYNC_HOR_HIGH_ACT)
1053 		tmp &= ~0x40;
1054 	if (var->sync & FB_SYNC_VERT_HIGH_ACT)
1055 		tmp &= ~0x80;
1056 
1057 	if (par->flatpanel && var->xres < nativex) {
1058 		/*
1059 		 * on flat panels with native size larger
1060 		 * than requested resolution decide whether
1061 		 * we stretch or center
1062 		 */
1063 		t_outb(par, tmp | 0xC0, VGA_MIS_W);
1064 
1065 		shadowmode_on(par);
1066 
1067 		if (center)
1068 			screen_center(par);
1069 		else if (stretch)
1070 			screen_stretch(par);
1071 
1072 	} else {
1073 		t_outb(par, tmp, VGA_MIS_W);
1074 		write3CE(par, CyberControl, 8);
1075 	}
1076 
1077 	/* vertical timing values */
1078 	write3X4(par, VGA_CRTC_V_TOTAL, vtotal & 0xFF);
1079 	write3X4(par, VGA_CRTC_V_DISP_END, vdispend & 0xFF);
1080 	write3X4(par, VGA_CRTC_V_SYNC_START, vsyncstart & 0xFF);
1081 	write3X4(par, VGA_CRTC_V_SYNC_END, (vsyncend & 0x0F));
1082 	write3X4(par, VGA_CRTC_V_BLANK_START, vblankstart & 0xFF);
1083 	write3X4(par, VGA_CRTC_V_BLANK_END, vblankend & 0xFF);
1084 
1085 	/* horizontal timing values */
1086 	write3X4(par, VGA_CRTC_H_TOTAL, htotal & 0xFF);
1087 	write3X4(par, VGA_CRTC_H_DISP, hdispend & 0xFF);
1088 	write3X4(par, VGA_CRTC_H_SYNC_START, hsyncstart & 0xFF);
1089 	write3X4(par, VGA_CRTC_H_SYNC_END,
1090 		 (hsyncend & 0x1F) | ((hblankend & 0x20) << 2));
1091 	write3X4(par, VGA_CRTC_H_BLANK_START, hblankstart & 0xFF);
1092 	write3X4(par, VGA_CRTC_H_BLANK_END, hblankend & 0x1F);
1093 
1094 	/* higher bits of vertical timing values */
1095 	tmp = 0x10;
1096 	if (vtotal & 0x100) tmp |= 0x01;
1097 	if (vdispend & 0x100) tmp |= 0x02;
1098 	if (vsyncstart & 0x100) tmp |= 0x04;
1099 	if (vblankstart & 0x100) tmp |= 0x08;
1100 
1101 	if (vtotal & 0x200) tmp |= 0x20;
1102 	if (vdispend & 0x200) tmp |= 0x40;
1103 	if (vsyncstart & 0x200) tmp |= 0x80;
1104 	write3X4(par, VGA_CRTC_OVERFLOW, tmp);
1105 
1106 	tmp = read3X4(par, CRTHiOrd) & 0x07;
1107 	tmp |= 0x08;	/* line compare bit 10 */
1108 	if (vtotal & 0x400) tmp |= 0x80;
1109 	if (vblankstart & 0x400) tmp |= 0x40;
1110 	if (vsyncstart & 0x400) tmp |= 0x20;
1111 	if (vdispend & 0x400) tmp |= 0x10;
1112 	write3X4(par, CRTHiOrd, tmp);
1113 
1114 	tmp = (htotal >> 8) & 0x01;
1115 	tmp |= (hdispend >> 7) & 0x02;
1116 	tmp |= (hsyncstart >> 5) & 0x08;
1117 	tmp |= (hblankstart >> 4) & 0x10;
1118 	write3X4(par, HorizOverflow, tmp);
1119 
1120 	tmp = 0x40;
1121 	if (vblankstart & 0x200) tmp |= 0x20;
1122 //FIXME	if (info->var.vmode & FB_VMODE_DOUBLE) tmp |= 0x80;  /* double scan for 200 line modes */
1123 	write3X4(par, VGA_CRTC_MAX_SCAN, tmp);
1124 
1125 	write3X4(par, VGA_CRTC_LINE_COMPARE, 0xFF);
1126 	write3X4(par, VGA_CRTC_PRESET_ROW, 0);
1127 	write3X4(par, VGA_CRTC_MODE, 0xC3);
1128 
1129 	write3X4(par, LinearAddReg, 0x20);	/* enable linear addressing */
1130 
1131 	tmp = (info->var.vmode & FB_VMODE_INTERLACED) ? 0x84 : 0x80;
1132 	/* enable access extended memory */
1133 	write3X4(par, CRTCModuleTest, tmp);
1134 	tmp = read3CE(par, MiscIntContReg) & ~0x4;
1135 	if (info->var.vmode & FB_VMODE_INTERLACED)
1136 		tmp |= 0x4;
1137 	write3CE(par, MiscIntContReg, tmp);
1138 
1139 	/* enable GE for text acceleration */
1140 	write3X4(par, GraphEngReg, 0x80);
1141 
1142 	switch (bpp) {
1143 	case 8:
1144 		tmp = 0x00;
1145 		break;
1146 	case 16:
1147 		tmp = 0x05;
1148 		break;
1149 	case 24:
1150 		tmp = 0x29;
1151 		break;
1152 	case 32:
1153 		tmp = 0x09;
1154 		break;
1155 	}
1156 
1157 	write3X4(par, PixelBusReg, tmp);
1158 
1159 	tmp = read3X4(par, DRAMControl);
1160 	if (!is_oldprotect(par->chip_id))
1161 		tmp |= 0x10;
1162 	if (iscyber(par->chip_id))
1163 		tmp |= 0x20;
1164 	write3X4(par, DRAMControl, tmp);	/* both IO, linear enable */
1165 
1166 	write3X4(par, InterfaceSel, read3X4(par, InterfaceSel) | 0x40);
1167 	if (!is_xp(par->chip_id))
1168 		write3X4(par, Performance, read3X4(par, Performance) | 0x10);
1169 	/* MMIO & PCI read and write burst enable */
1170 	if (par->chip_id != TGUI9440 && par->chip_id != IMAGE975)
1171 		write3X4(par, PCIReg, read3X4(par, PCIReg) | 0x06);
1172 
1173 	vga_mm_wseq(par->io_virt, 0, 3);
1174 	vga_mm_wseq(par->io_virt, 1, 1); /* set char clock 8 dots wide */
1175 	/* enable 4 maps because needed in chain4 mode */
1176 	vga_mm_wseq(par->io_virt, 2, 0x0F);
1177 	vga_mm_wseq(par->io_virt, 3, 0);
1178 	vga_mm_wseq(par->io_virt, 4, 0x0E); /* memory mode enable bitmaps ?? */
1179 
1180 	/* convert from picoseconds to kHz */
1181 	vclk = PICOS2KHZ(info->var.pixclock);
1182 
1183 	/* divide clock by 2 if 32bpp chain4 mode display and CPU path */
1184 	tmp = read3CE(par, MiscExtFunc) & 0xF0;
1185 	if (bpp == 32 || (par->chip_id == TGUI9440 && bpp == 16)) {
1186 		tmp |= 8;
1187 		vclk *= 2;
1188 	}
1189 	set_vclk(par, vclk);
1190 	write3CE(par, MiscExtFunc, tmp | 0x12);
1191 	write3CE(par, 0x5, 0x40);	/* no CGA compat, allow 256 col */
1192 	write3CE(par, 0x6, 0x05);	/* graphics mode */
1193 	write3CE(par, 0x7, 0x0F);	/* planes? */
1194 
1195 	/* graphics mode and support 256 color modes */
1196 	writeAttr(par, 0x10, 0x41);
1197 	writeAttr(par, 0x12, 0x0F);	/* planes */
1198 	writeAttr(par, 0x13, 0);	/* horizontal pel panning */
1199 
1200 	/* colors */
1201 	for (tmp = 0; tmp < 0x10; tmp++)
1202 		writeAttr(par, tmp, tmp);
1203 	fb_readb(par->io_virt + VGA_IS1_RC);	/* flip-flop to index */
1204 	t_outb(par, 0x20, VGA_ATT_W);		/* enable attr */
1205 
1206 	switch (bpp) {
1207 	case 8:
1208 		tmp = 0;
1209 		break;
1210 	case 16:
1211 		tmp = 0x30;
1212 		break;
1213 	case 24:
1214 	case 32:
1215 		tmp = 0xD0;
1216 		break;
1217 	}
1218 
1219 	t_inb(par, VGA_PEL_IW);
1220 	t_inb(par, VGA_PEL_MSK);
1221 	t_inb(par, VGA_PEL_MSK);
1222 	t_inb(par, VGA_PEL_MSK);
1223 	t_inb(par, VGA_PEL_MSK);
1224 	t_outb(par, tmp, VGA_PEL_MSK);
1225 	t_inb(par, VGA_PEL_IW);
1226 
1227 	if (par->flatpanel)
1228 		set_number_of_lines(par, info->var.yres);
1229 	info->fix.line_length = info->var.xres_virtual * bpp / 8;
1230 	set_lwidth(par, info->fix.line_length / 8);
1231 
1232 	if (!(info->flags & FBINFO_HWACCEL_DISABLED))
1233 		par->init_accel(par, info->var.xres_virtual, bpp);
1234 
1235 	info->fix.visual = (bpp == 8) ? FB_VISUAL_PSEUDOCOLOR : FB_VISUAL_TRUECOLOR;
1236 	info->cmap.len = (bpp == 8) ? 256 : 16;
1237 	debug("exit\n");
1238 	return 0;
1239 }
1240 
1241 /* Set one color register */
tridentfb_setcolreg(unsigned regno,unsigned red,unsigned green,unsigned blue,unsigned transp,struct fb_info * info)1242 static int tridentfb_setcolreg(unsigned regno, unsigned red, unsigned green,
1243 			       unsigned blue, unsigned transp,
1244 			       struct fb_info *info)
1245 {
1246 	int bpp = info->var.bits_per_pixel;
1247 	struct tridentfb_par *par = info->par;
1248 
1249 	if (regno >= info->cmap.len)
1250 		return 1;
1251 
1252 	if (bpp == 8) {
1253 		t_outb(par, 0xFF, VGA_PEL_MSK);
1254 		t_outb(par, regno, VGA_PEL_IW);
1255 
1256 		t_outb(par, red >> 10, VGA_PEL_D);
1257 		t_outb(par, green >> 10, VGA_PEL_D);
1258 		t_outb(par, blue >> 10, VGA_PEL_D);
1259 
1260 	} else if (regno < 16) {
1261 		if (bpp == 16) {	/* RGB 565 */
1262 			u32 col;
1263 
1264 			col = (red & 0xF800) | ((green & 0xFC00) >> 5) |
1265 				((blue & 0xF800) >> 11);
1266 			col |= col << 16;
1267 			((u32 *)(info->pseudo_palette))[regno] = col;
1268 		} else if (bpp == 32)		/* ARGB 8888 */
1269 			((u32 *)info->pseudo_palette)[regno] =
1270 				((transp & 0xFF00) << 16)	|
1271 				((red & 0xFF00) << 8)		|
1272 				((green & 0xFF00))		|
1273 				((blue & 0xFF00) >> 8);
1274 	}
1275 
1276 	return 0;
1277 }
1278 
1279 /* Try blanking the screen. For flat panels it does nothing */
tridentfb_blank(int blank_mode,struct fb_info * info)1280 static int tridentfb_blank(int blank_mode, struct fb_info *info)
1281 {
1282 	unsigned char PMCont, DPMSCont;
1283 	struct tridentfb_par *par = info->par;
1284 
1285 	debug("enter\n");
1286 	if (par->flatpanel)
1287 		return 0;
1288 	t_outb(par, 0x04, 0x83C8); /* Read DPMS Control */
1289 	PMCont = t_inb(par, 0x83C6) & 0xFC;
1290 	DPMSCont = read3CE(par, PowerStatus) & 0xFC;
1291 	switch (blank_mode) {
1292 	case FB_BLANK_UNBLANK:
1293 		/* Screen: On, HSync: On, VSync: On */
1294 	case FB_BLANK_NORMAL:
1295 		/* Screen: Off, HSync: On, VSync: On */
1296 		PMCont |= 0x03;
1297 		DPMSCont |= 0x00;
1298 		break;
1299 	case FB_BLANK_HSYNC_SUSPEND:
1300 		/* Screen: Off, HSync: Off, VSync: On */
1301 		PMCont |= 0x02;
1302 		DPMSCont |= 0x01;
1303 		break;
1304 	case FB_BLANK_VSYNC_SUSPEND:
1305 		/* Screen: Off, HSync: On, VSync: Off */
1306 		PMCont |= 0x02;
1307 		DPMSCont |= 0x02;
1308 		break;
1309 	case FB_BLANK_POWERDOWN:
1310 		/* Screen: Off, HSync: Off, VSync: Off */
1311 		PMCont |= 0x00;
1312 		DPMSCont |= 0x03;
1313 		break;
1314 	}
1315 
1316 	write3CE(par, PowerStatus, DPMSCont);
1317 	t_outb(par, 4, 0x83C8);
1318 	t_outb(par, PMCont, 0x83C6);
1319 
1320 	debug("exit\n");
1321 
1322 	/* let fbcon do a softblank for us */
1323 	return (blank_mode == FB_BLANK_NORMAL) ? 1 : 0;
1324 }
1325 
1326 static struct fb_ops tridentfb_ops = {
1327 	.owner = THIS_MODULE,
1328 	.fb_setcolreg = tridentfb_setcolreg,
1329 	.fb_pan_display = tridentfb_pan_display,
1330 	.fb_blank = tridentfb_blank,
1331 	.fb_check_var = tridentfb_check_var,
1332 	.fb_set_par = tridentfb_set_par,
1333 	.fb_fillrect = tridentfb_fillrect,
1334 	.fb_copyarea = tridentfb_copyarea,
1335 	.fb_imageblit = tridentfb_imageblit,
1336 #ifdef CONFIG_FB_TRIDENT_ACCEL
1337 	.fb_sync = tridentfb_sync,
1338 #endif
1339 };
1340 
trident_pci_probe(struct pci_dev * dev,const struct pci_device_id * id)1341 static int __devinit trident_pci_probe(struct pci_dev *dev,
1342 				       const struct pci_device_id *id)
1343 {
1344 	int err;
1345 	unsigned char revision;
1346 	struct fb_info *info;
1347 	struct tridentfb_par *default_par;
1348 	int chip3D;
1349 	int chip_id;
1350 
1351 	err = pci_enable_device(dev);
1352 	if (err)
1353 		return err;
1354 
1355 	info = framebuffer_alloc(sizeof(struct tridentfb_par), &dev->dev);
1356 	if (!info)
1357 		return -ENOMEM;
1358 	default_par = info->par;
1359 
1360 	chip_id = id->device;
1361 
1362 #ifndef CONFIG_FB_TRIDENT_ACCEL
1363 	noaccel = 1;
1364 #endif
1365 
1366 	/* If PCI id is 0x9660 then further detect chip type */
1367 
1368 	if (chip_id == TGUI9660) {
1369 		revision = vga_io_rseq(RevisionID);
1370 
1371 		switch (revision) {
1372 		case 0x21:
1373 			chip_id = PROVIDIA9685;
1374 			break;
1375 		case 0x22:
1376 		case 0x23:
1377 			chip_id = CYBER9397;
1378 			break;
1379 		case 0x2A:
1380 			chip_id = CYBER9397DVD;
1381 			break;
1382 		case 0x30:
1383 		case 0x33:
1384 		case 0x34:
1385 		case 0x35:
1386 		case 0x38:
1387 		case 0x3A:
1388 		case 0xB3:
1389 			chip_id = CYBER9385;
1390 			break;
1391 		case 0x40 ... 0x43:
1392 			chip_id = CYBER9382;
1393 			break;
1394 		case 0x4A:
1395 			chip_id = CYBER9388;
1396 			break;
1397 		default:
1398 			break;
1399 		}
1400 	}
1401 
1402 	chip3D = is3Dchip(chip_id);
1403 
1404 	if (is_xp(chip_id)) {
1405 		default_par->init_accel = xp_init_accel;
1406 		default_par->wait_engine = xp_wait_engine;
1407 		default_par->fill_rect = xp_fill_rect;
1408 		default_par->copy_rect = xp_copy_rect;
1409 		tridentfb_fix.accel = FB_ACCEL_TRIDENT_BLADEXP;
1410 	} else if (is_blade(chip_id)) {
1411 		default_par->init_accel = blade_init_accel;
1412 		default_par->wait_engine = blade_wait_engine;
1413 		default_par->fill_rect = blade_fill_rect;
1414 		default_par->copy_rect = blade_copy_rect;
1415 		default_par->image_blit = blade_image_blit;
1416 		tridentfb_fix.accel = FB_ACCEL_TRIDENT_BLADE3D;
1417 	} else if (chip3D) {			/* 3DImage family left */
1418 		default_par->init_accel = image_init_accel;
1419 		default_par->wait_engine = image_wait_engine;
1420 		default_par->fill_rect = image_fill_rect;
1421 		default_par->copy_rect = image_copy_rect;
1422 		tridentfb_fix.accel = FB_ACCEL_TRIDENT_3DIMAGE;
1423 	} else { 				/* TGUI 9440/96XX family */
1424 		default_par->init_accel = tgui_init_accel;
1425 		default_par->wait_engine = xp_wait_engine;
1426 		default_par->fill_rect = tgui_fill_rect;
1427 		default_par->copy_rect = tgui_copy_rect;
1428 		tridentfb_fix.accel = FB_ACCEL_TRIDENT_TGUI;
1429 	}
1430 
1431 	default_par->chip_id = chip_id;
1432 
1433 	/* setup MMIO region */
1434 	tridentfb_fix.mmio_start = pci_resource_start(dev, 1);
1435 	tridentfb_fix.mmio_len = pci_resource_len(dev, 1);
1436 
1437 	if (!request_mem_region(tridentfb_fix.mmio_start,
1438 				tridentfb_fix.mmio_len, "tridentfb")) {
1439 		debug("request_region failed!\n");
1440 		framebuffer_release(info);
1441 		return -1;
1442 	}
1443 
1444 	default_par->io_virt = ioremap_nocache(tridentfb_fix.mmio_start,
1445 					       tridentfb_fix.mmio_len);
1446 
1447 	if (!default_par->io_virt) {
1448 		debug("ioremap failed\n");
1449 		err = -1;
1450 		goto out_unmap1;
1451 	}
1452 
1453 	enable_mmio(default_par);
1454 
1455 	/* setup framebuffer memory */
1456 	tridentfb_fix.smem_start = pci_resource_start(dev, 0);
1457 	tridentfb_fix.smem_len = get_memsize(default_par);
1458 
1459 	if (!request_mem_region(tridentfb_fix.smem_start,
1460 				tridentfb_fix.smem_len, "tridentfb")) {
1461 		debug("request_mem_region failed!\n");
1462 		disable_mmio(info->par);
1463 		err = -1;
1464 		goto out_unmap1;
1465 	}
1466 
1467 	info->screen_base = ioremap_nocache(tridentfb_fix.smem_start,
1468 					    tridentfb_fix.smem_len);
1469 
1470 	if (!info->screen_base) {
1471 		debug("ioremap failed\n");
1472 		err = -1;
1473 		goto out_unmap2;
1474 	}
1475 
1476 	default_par->flatpanel = is_flatpanel(default_par);
1477 
1478 	if (default_par->flatpanel)
1479 		nativex = get_nativex(default_par);
1480 
1481 	info->fix = tridentfb_fix;
1482 	info->fbops = &tridentfb_ops;
1483 	info->pseudo_palette = default_par->pseudo_pal;
1484 
1485 	info->flags = FBINFO_DEFAULT | FBINFO_HWACCEL_YPAN;
1486 	if (!noaccel && default_par->init_accel) {
1487 		info->flags &= ~FBINFO_HWACCEL_DISABLED;
1488 		info->flags |= FBINFO_HWACCEL_COPYAREA;
1489 		info->flags |= FBINFO_HWACCEL_FILLRECT;
1490 	} else
1491 		info->flags |= FBINFO_HWACCEL_DISABLED;
1492 
1493 	info->pixmap.addr = kmalloc(4096, GFP_KERNEL);
1494 	if (!info->pixmap.addr) {
1495 		err = -ENOMEM;
1496 		goto out_unmap2;
1497 	}
1498 
1499 	info->pixmap.size = 4096;
1500 	info->pixmap.buf_align = 4;
1501 	info->pixmap.scan_align = 1;
1502 	info->pixmap.access_align = 32;
1503 	info->pixmap.flags = FB_PIXMAP_SYSTEM;
1504 
1505 	if (default_par->image_blit) {
1506 		info->flags |= FBINFO_HWACCEL_IMAGEBLIT;
1507 		info->pixmap.scan_align = 4;
1508 	}
1509 
1510 	if (noaccel) {
1511 		printk(KERN_DEBUG "disabling acceleration\n");
1512 		info->flags |= FBINFO_HWACCEL_DISABLED;
1513 		info->pixmap.scan_align = 1;
1514 	}
1515 
1516 	if (!fb_find_mode(&info->var, info,
1517 			  mode_option, NULL, 0, NULL, bpp)) {
1518 		err = -EINVAL;
1519 		goto out_unmap2;
1520 	}
1521 	err = fb_alloc_cmap(&info->cmap, 256, 0);
1522 	if (err < 0)
1523 		goto out_unmap2;
1524 
1525 	info->var.activate |= FB_ACTIVATE_NOW;
1526 	info->device = &dev->dev;
1527 	if (register_framebuffer(info) < 0) {
1528 		printk(KERN_ERR "tridentfb: could not register framebuffer\n");
1529 		fb_dealloc_cmap(&info->cmap);
1530 		err = -EINVAL;
1531 		goto out_unmap2;
1532 	}
1533 	output("fb%d: %s frame buffer device %dx%d-%dbpp\n",
1534 	   info->node, info->fix.id, info->var.xres,
1535 	   info->var.yres, info->var.bits_per_pixel);
1536 
1537 	pci_set_drvdata(dev, info);
1538 	return 0;
1539 
1540 out_unmap2:
1541 	kfree(info->pixmap.addr);
1542 	if (info->screen_base)
1543 		iounmap(info->screen_base);
1544 	release_mem_region(tridentfb_fix.smem_start, tridentfb_fix.smem_len);
1545 	disable_mmio(info->par);
1546 out_unmap1:
1547 	if (default_par->io_virt)
1548 		iounmap(default_par->io_virt);
1549 	release_mem_region(tridentfb_fix.mmio_start, tridentfb_fix.mmio_len);
1550 	framebuffer_release(info);
1551 	return err;
1552 }
1553 
trident_pci_remove(struct pci_dev * dev)1554 static void __devexit trident_pci_remove(struct pci_dev *dev)
1555 {
1556 	struct fb_info *info = pci_get_drvdata(dev);
1557 	struct tridentfb_par *par = info->par;
1558 
1559 	unregister_framebuffer(info);
1560 	iounmap(par->io_virt);
1561 	iounmap(info->screen_base);
1562 	release_mem_region(tridentfb_fix.smem_start, tridentfb_fix.smem_len);
1563 	release_mem_region(tridentfb_fix.mmio_start, tridentfb_fix.mmio_len);
1564 	pci_set_drvdata(dev, NULL);
1565 	kfree(info->pixmap.addr);
1566 	framebuffer_release(info);
1567 }
1568 
1569 /* List of boards that we are trying to support */
1570 static struct pci_device_id trident_devices[] = {
1571 	{PCI_VENDOR_ID_TRIDENT,	BLADE3D, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1572 	{PCI_VENDOR_ID_TRIDENT,	CYBERBLADEi7, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1573 	{PCI_VENDOR_ID_TRIDENT,	CYBERBLADEi7D, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1574 	{PCI_VENDOR_ID_TRIDENT,	CYBERBLADEi1, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1575 	{PCI_VENDOR_ID_TRIDENT,	CYBERBLADEi1D, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1576 	{PCI_VENDOR_ID_TRIDENT,	CYBERBLADEAi1, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1577 	{PCI_VENDOR_ID_TRIDENT,	CYBERBLADEAi1D, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1578 	{PCI_VENDOR_ID_TRIDENT,	CYBERBLADEE4, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1579 	{PCI_VENDOR_ID_TRIDENT,	TGUI9440, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1580 	{PCI_VENDOR_ID_TRIDENT,	TGUI9660, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1581 	{PCI_VENDOR_ID_TRIDENT,	IMAGE975, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1582 	{PCI_VENDOR_ID_TRIDENT,	IMAGE985, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1583 	{PCI_VENDOR_ID_TRIDENT,	CYBER9320, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1584 	{PCI_VENDOR_ID_TRIDENT,	CYBER9388, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1585 	{PCI_VENDOR_ID_TRIDENT,	CYBER9520, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1586 	{PCI_VENDOR_ID_TRIDENT,	CYBER9525DVD, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1587 	{PCI_VENDOR_ID_TRIDENT,	CYBER9397, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1588 	{PCI_VENDOR_ID_TRIDENT,	CYBER9397DVD, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1589 	{PCI_VENDOR_ID_TRIDENT,	CYBERBLADEXPAi1, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1590 	{PCI_VENDOR_ID_TRIDENT,	CYBERBLADEXPm8, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1591 	{PCI_VENDOR_ID_TRIDENT,	CYBERBLADEXPm16, PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
1592 	{0,}
1593 };
1594 
1595 MODULE_DEVICE_TABLE(pci, trident_devices);
1596 
1597 static struct pci_driver tridentfb_pci_driver = {
1598 	.name = "tridentfb",
1599 	.id_table = trident_devices,
1600 	.probe = trident_pci_probe,
1601 	.remove = __devexit_p(trident_pci_remove)
1602 };
1603 
1604 /*
1605  * Parse user specified options (`video=trident:')
1606  * example:
1607  *	video=trident:800x600,bpp=16,noaccel
1608  */
1609 #ifndef MODULE
tridentfb_setup(char * options)1610 static int __init tridentfb_setup(char *options)
1611 {
1612 	char *opt;
1613 	if (!options || !*options)
1614 		return 0;
1615 	while ((opt = strsep(&options, ",")) != NULL) {
1616 		if (!*opt)
1617 			continue;
1618 		if (!strncmp(opt, "noaccel", 7))
1619 			noaccel = 1;
1620 		else if (!strncmp(opt, "fp", 2))
1621 			fp = 1;
1622 		else if (!strncmp(opt, "crt", 3))
1623 			fp = 0;
1624 		else if (!strncmp(opt, "bpp=", 4))
1625 			bpp = simple_strtoul(opt + 4, NULL, 0);
1626 		else if (!strncmp(opt, "center", 6))
1627 			center = 1;
1628 		else if (!strncmp(opt, "stretch", 7))
1629 			stretch = 1;
1630 		else if (!strncmp(opt, "memsize=", 8))
1631 			memsize = simple_strtoul(opt + 8, NULL, 0);
1632 		else if (!strncmp(opt, "memdiff=", 8))
1633 			memdiff = simple_strtoul(opt + 8, NULL, 0);
1634 		else if (!strncmp(opt, "nativex=", 8))
1635 			nativex = simple_strtoul(opt + 8, NULL, 0);
1636 		else
1637 			mode_option = opt;
1638 	}
1639 	return 0;
1640 }
1641 #endif
1642 
tridentfb_init(void)1643 static int __init tridentfb_init(void)
1644 {
1645 #ifndef MODULE
1646 	char *option = NULL;
1647 
1648 	if (fb_get_options("tridentfb", &option))
1649 		return -ENODEV;
1650 	tridentfb_setup(option);
1651 #endif
1652 	return pci_register_driver(&tridentfb_pci_driver);
1653 }
1654 
tridentfb_exit(void)1655 static void __exit tridentfb_exit(void)
1656 {
1657 	pci_unregister_driver(&tridentfb_pci_driver);
1658 }
1659 
1660 module_init(tridentfb_init);
1661 module_exit(tridentfb_exit);
1662 
1663 MODULE_AUTHOR("Jani Monoses <jani@iv.ro>");
1664 MODULE_DESCRIPTION("Framebuffer driver for Trident cards");
1665 MODULE_LICENSE("GPL");
1666 
1667