1 /*
2  * Permedia2 framebuffer driver.
3  *
4  * 2.5/2.6 driver:
5  * Copyright (c) 2003 Jim Hague (jim.hague@acm.org)
6  *
7  * based on 2.4 driver:
8  * Copyright (c) 1998-2000 Ilario Nardinocchi (nardinoc@CS.UniBO.IT)
9  * Copyright (c) 1999 Jakub Jelinek (jakub@redhat.com)
10  *
11  * and additional input from James Simmon's port of Hannu Mallat's tdfx
12  * driver.
13  *
14  * I have a Creative Graphics Blaster Exxtreme card - pm2fb on x86. I
15  * have no access to other pm2fb implementations. Sparc (and thus
16  * hopefully other big-endian) devices now work, thanks to a lot of
17  * testing work by Ron Murray. I have no access to CVision hardware,
18  * and therefore for now I am omitting the CVision code.
19  *
20  * Multiple boards support has been on the TODO list for ages.
21  * Don't expect this to change.
22  *
23  * This file is subject to the terms and conditions of the GNU General Public
24  * License. See the file COPYING in the main directory of this archive for
25  * more details.
26  *
27  *
28  */
29 
30 #include <linux/module.h>
31 #include <linux/moduleparam.h>
32 #include <linux/kernel.h>
33 #include <linux/errno.h>
34 #include <linux/string.h>
35 #include <linux/mm.h>
36 #include <linux/slab.h>
37 #include <linux/delay.h>
38 #include <linux/fb.h>
39 #include <linux/init.h>
40 #include <linux/pci.h>
41 #ifdef CONFIG_MTRR
42 #include <asm/mtrr.h>
43 #endif
44 
45 #include <video/permedia2.h>
46 #include <video/cvisionppc.h>
47 
48 #if !defined(__LITTLE_ENDIAN) && !defined(__BIG_ENDIAN)
49 #error	"The endianness of the target host has not been defined."
50 #endif
51 
52 #if !defined(CONFIG_PCI)
53 #error "Only generic PCI cards supported."
54 #endif
55 
56 #undef PM2FB_MASTER_DEBUG
57 #ifdef PM2FB_MASTER_DEBUG
58 #define DPRINTK(a, b...)	\
59 	printk(KERN_DEBUG "pm2fb: %s: " a, __func__ , ## b)
60 #else
61 #define DPRINTK(a, b...)
62 #endif
63 
64 #define PM2_PIXMAP_SIZE	(1600 * 4)
65 
66 /*
67  * Driver data
68  */
69 static int hwcursor = 1;
70 static char *mode_option __devinitdata;
71 
72 /*
73  * The XFree GLINT driver will (I think to implement hardware cursor
74  * support on TVP4010 and similar where there is no RAMDAC - see
75  * comment in set_video) always request +ve sync regardless of what
76  * the mode requires. This screws me because I have a Sun
77  * fixed-frequency monitor which absolutely has to have -ve sync. So
78  * these flags allow the user to specify that requests for +ve sync
79  * should be silently turned in -ve sync.
80  */
81 static int lowhsync;
82 static int lowvsync;
83 static int noaccel __devinitdata;
84 /* mtrr option */
85 #ifdef CONFIG_MTRR
86 static int nomtrr __devinitdata;
87 #endif
88 
89 /*
90  * The hardware state of the graphics card that isn't part of the
91  * screeninfo.
92  */
93 struct pm2fb_par
94 {
95 	pm2type_t	type;		/* Board type */
96 	unsigned char	__iomem *v_regs;/* virtual address of p_regs */
97 	u32		memclock;	/* memclock */
98 	u32		video;		/* video flags before blanking */
99 	u32		mem_config;	/* MemConfig reg at probe */
100 	u32		mem_control;	/* MemControl reg at probe */
101 	u32		boot_address;	/* BootAddress reg at probe */
102 	u32		palette[16];
103 	int		mtrr_handle;
104 };
105 
106 /*
107  * Here we define the default structs fb_fix_screeninfo and fb_var_screeninfo
108  * if we don't use modedb.
109  */
110 static struct fb_fix_screeninfo pm2fb_fix __devinitdata = {
111 	.id =		"",
112 	.type =		FB_TYPE_PACKED_PIXELS,
113 	.visual =	FB_VISUAL_PSEUDOCOLOR,
114 	.xpanstep =	1,
115 	.ypanstep =	1,
116 	.ywrapstep =	0,
117 	.accel =	FB_ACCEL_3DLABS_PERMEDIA2,
118 };
119 
120 /*
121  * Default video mode. In case the modedb doesn't work.
122  */
123 static struct fb_var_screeninfo pm2fb_var __devinitdata = {
124 	/* "640x480, 8 bpp @ 60 Hz */
125 	.xres =			640,
126 	.yres =			480,
127 	.xres_virtual =		640,
128 	.yres_virtual =		480,
129 	.bits_per_pixel =	8,
130 	.red =			{0, 8, 0},
131 	.blue =			{0, 8, 0},
132 	.green =		{0, 8, 0},
133 	.activate =		FB_ACTIVATE_NOW,
134 	.height =		-1,
135 	.width =		-1,
136 	.accel_flags =		0,
137 	.pixclock =		39721,
138 	.left_margin =		40,
139 	.right_margin =		24,
140 	.upper_margin =		32,
141 	.lower_margin =		11,
142 	.hsync_len =		96,
143 	.vsync_len =		2,
144 	.vmode =		FB_VMODE_NONINTERLACED
145 };
146 
147 /*
148  * Utility functions
149  */
150 
pm2_RD(struct pm2fb_par * p,s32 off)151 static inline u32 pm2_RD(struct pm2fb_par *p, s32 off)
152 {
153 	return fb_readl(p->v_regs + off);
154 }
155 
pm2_WR(struct pm2fb_par * p,s32 off,u32 v)156 static inline void pm2_WR(struct pm2fb_par *p, s32 off, u32 v)
157 {
158 	fb_writel(v, p->v_regs + off);
159 }
160 
pm2_RDAC_RD(struct pm2fb_par * p,s32 idx)161 static inline u32 pm2_RDAC_RD(struct pm2fb_par *p, s32 idx)
162 {
163 	pm2_WR(p, PM2R_RD_PALETTE_WRITE_ADDRESS, idx);
164 	mb();
165 	return pm2_RD(p, PM2R_RD_INDEXED_DATA);
166 }
167 
pm2v_RDAC_RD(struct pm2fb_par * p,s32 idx)168 static inline u32 pm2v_RDAC_RD(struct pm2fb_par *p, s32 idx)
169 {
170 	pm2_WR(p, PM2VR_RD_INDEX_LOW, idx & 0xff);
171 	mb();
172 	return pm2_RD(p,  PM2VR_RD_INDEXED_DATA);
173 }
174 
pm2_RDAC_WR(struct pm2fb_par * p,s32 idx,u32 v)175 static inline void pm2_RDAC_WR(struct pm2fb_par *p, s32 idx, u32 v)
176 {
177 	pm2_WR(p, PM2R_RD_PALETTE_WRITE_ADDRESS, idx);
178 	wmb();
179 	pm2_WR(p, PM2R_RD_INDEXED_DATA, v);
180 	wmb();
181 }
182 
pm2v_RDAC_WR(struct pm2fb_par * p,s32 idx,u32 v)183 static inline void pm2v_RDAC_WR(struct pm2fb_par *p, s32 idx, u32 v)
184 {
185 	pm2_WR(p, PM2VR_RD_INDEX_LOW, idx & 0xff);
186 	wmb();
187 	pm2_WR(p, PM2VR_RD_INDEXED_DATA, v);
188 	wmb();
189 }
190 
191 #ifdef CONFIG_FB_PM2_FIFO_DISCONNECT
192 #define WAIT_FIFO(p, a)
193 #else
WAIT_FIFO(struct pm2fb_par * p,u32 a)194 static inline void WAIT_FIFO(struct pm2fb_par *p, u32 a)
195 {
196 	while (pm2_RD(p, PM2R_IN_FIFO_SPACE) < a)
197 		cpu_relax();
198 }
199 #endif
200 
201 /*
202  * partial products for the supported horizontal resolutions.
203  */
204 #define PACKPP(p0, p1, p2)	(((p2) << 6) | ((p1) << 3) | (p0))
205 static const struct {
206 	u16 width;
207 	u16 pp;
208 } pp_table[] = {
209 	{ 32,	PACKPP(1, 0, 0) }, { 64,	PACKPP(1, 1, 0) },
210 	{ 96,	PACKPP(1, 1, 1) }, { 128,	PACKPP(2, 1, 1) },
211 	{ 160,	PACKPP(2, 2, 1) }, { 192,	PACKPP(2, 2, 2) },
212 	{ 224,	PACKPP(3, 2, 1) }, { 256,	PACKPP(3, 2, 2) },
213 	{ 288,	PACKPP(3, 3, 1) }, { 320,	PACKPP(3, 3, 2) },
214 	{ 384,	PACKPP(3, 3, 3) }, { 416,	PACKPP(4, 3, 1) },
215 	{ 448,	PACKPP(4, 3, 2) }, { 512,	PACKPP(4, 3, 3) },
216 	{ 544,	PACKPP(4, 4, 1) }, { 576,	PACKPP(4, 4, 2) },
217 	{ 640,	PACKPP(4, 4, 3) }, { 768,	PACKPP(4, 4, 4) },
218 	{ 800,	PACKPP(5, 4, 1) }, { 832,	PACKPP(5, 4, 2) },
219 	{ 896,	PACKPP(5, 4, 3) }, { 1024,	PACKPP(5, 4, 4) },
220 	{ 1056,	PACKPP(5, 5, 1) }, { 1088,	PACKPP(5, 5, 2) },
221 	{ 1152,	PACKPP(5, 5, 3) }, { 1280,	PACKPP(5, 5, 4) },
222 	{ 1536,	PACKPP(5, 5, 5) }, { 1568,	PACKPP(6, 5, 1) },
223 	{ 1600,	PACKPP(6, 5, 2) }, { 1664,	PACKPP(6, 5, 3) },
224 	{ 1792,	PACKPP(6, 5, 4) }, { 2048,	PACKPP(6, 5, 5) },
225 	{ 0,	0 } };
226 
partprod(u32 xres)227 static u32 partprod(u32 xres)
228 {
229 	int i;
230 
231 	for (i = 0; pp_table[i].width && pp_table[i].width != xres; i++)
232 		;
233 	if (pp_table[i].width == 0)
234 		DPRINTK("invalid width %u\n", xres);
235 	return pp_table[i].pp;
236 }
237 
to3264(u32 timing,int bpp,int is64)238 static u32 to3264(u32 timing, int bpp, int is64)
239 {
240 	switch (bpp) {
241 	case 24:
242 		timing *= 3;
243 	case 8:
244 		timing >>= 1;
245 	case 16:
246 		timing >>= 1;
247 	case 32:
248 		break;
249 	}
250 	if (is64)
251 		timing >>= 1;
252 	return timing;
253 }
254 
pm2_mnp(u32 clk,unsigned char * mm,unsigned char * nn,unsigned char * pp)255 static void pm2_mnp(u32 clk, unsigned char *mm, unsigned char *nn,
256 		    unsigned char *pp)
257 {
258 	unsigned char m;
259 	unsigned char n;
260 	unsigned char p;
261 	u32 f;
262 	s32 curr;
263 	s32 delta = 100000;
264 
265 	*mm = *nn = *pp = 0;
266 	for (n = 2; n < 15; n++) {
267 		for (m = 2; m; m++) {
268 			f = PM2_REFERENCE_CLOCK * m / n;
269 			if (f >= 150000 && f <= 300000) {
270 				for (p = 0; p < 5; p++, f >>= 1) {
271 					curr = (clk > f) ? clk - f : f - clk;
272 					if (curr < delta) {
273 						delta = curr;
274 						*mm = m;
275 						*nn = n;
276 						*pp = p;
277 					}
278 				}
279 			}
280 		}
281 	}
282 }
283 
pm2v_mnp(u32 clk,unsigned char * mm,unsigned char * nn,unsigned char * pp)284 static void pm2v_mnp(u32 clk, unsigned char *mm, unsigned char *nn,
285 		     unsigned char *pp)
286 {
287 	unsigned char m;
288 	unsigned char n;
289 	unsigned char p;
290 	u32 f;
291 	s32 delta = 1000;
292 
293 	*mm = *nn = *pp = 0;
294 	for (m = 1; m < 128; m++) {
295 		for (n = 2 * m + 1; n; n++) {
296 			for (p = 0; p < 2; p++) {
297 				f = (PM2_REFERENCE_CLOCK >> (p + 1)) * n / m;
298 				if (clk > f - delta && clk < f + delta) {
299 					delta = (clk > f) ? clk - f : f - clk;
300 					*mm = m;
301 					*nn = n;
302 					*pp = p;
303 				}
304 			}
305 		}
306 	}
307 }
308 
clear_palette(struct pm2fb_par * p)309 static void clear_palette(struct pm2fb_par *p)
310 {
311 	int i = 256;
312 
313 	WAIT_FIFO(p, 1);
314 	pm2_WR(p, PM2R_RD_PALETTE_WRITE_ADDRESS, 0);
315 	wmb();
316 	while (i--) {
317 		WAIT_FIFO(p, 3);
318 		pm2_WR(p, PM2R_RD_PALETTE_DATA, 0);
319 		pm2_WR(p, PM2R_RD_PALETTE_DATA, 0);
320 		pm2_WR(p, PM2R_RD_PALETTE_DATA, 0);
321 	}
322 }
323 
reset_card(struct pm2fb_par * p)324 static void reset_card(struct pm2fb_par *p)
325 {
326 	if (p->type == PM2_TYPE_PERMEDIA2V)
327 		pm2_WR(p, PM2VR_RD_INDEX_HIGH, 0);
328 	pm2_WR(p, PM2R_RESET_STATUS, 0);
329 	mb();
330 	while (pm2_RD(p, PM2R_RESET_STATUS) & PM2F_BEING_RESET)
331 		cpu_relax();
332 	mb();
333 #ifdef CONFIG_FB_PM2_FIFO_DISCONNECT
334 	DPRINTK("FIFO disconnect enabled\n");
335 	pm2_WR(p, PM2R_FIFO_DISCON, 1);
336 	mb();
337 #endif
338 
339 	/* Restore stashed memory config information from probe */
340 	WAIT_FIFO(p, 3);
341 	pm2_WR(p, PM2R_MEM_CONTROL, p->mem_control);
342 	pm2_WR(p, PM2R_BOOT_ADDRESS, p->boot_address);
343 	wmb();
344 	pm2_WR(p, PM2R_MEM_CONFIG, p->mem_config);
345 }
346 
reset_config(struct pm2fb_par * p)347 static void reset_config(struct pm2fb_par *p)
348 {
349 	WAIT_FIFO(p, 53);
350 	pm2_WR(p, PM2R_CHIP_CONFIG, pm2_RD(p, PM2R_CHIP_CONFIG) &
351 			~(PM2F_VGA_ENABLE | PM2F_VGA_FIXED));
352 	pm2_WR(p, PM2R_BYPASS_WRITE_MASK, ~(0L));
353 	pm2_WR(p, PM2R_FRAMEBUFFER_WRITE_MASK, ~(0L));
354 	pm2_WR(p, PM2R_FIFO_CONTROL, 0);
355 	pm2_WR(p, PM2R_APERTURE_ONE, 0);
356 	pm2_WR(p, PM2R_APERTURE_TWO, 0);
357 	pm2_WR(p, PM2R_RASTERIZER_MODE, 0);
358 	pm2_WR(p, PM2R_DELTA_MODE, PM2F_DELTA_ORDER_RGB);
359 	pm2_WR(p, PM2R_LB_READ_FORMAT, 0);
360 	pm2_WR(p, PM2R_LB_WRITE_FORMAT, 0);
361 	pm2_WR(p, PM2R_LB_READ_MODE, 0);
362 	pm2_WR(p, PM2R_LB_SOURCE_OFFSET, 0);
363 	pm2_WR(p, PM2R_FB_SOURCE_OFFSET, 0);
364 	pm2_WR(p, PM2R_FB_PIXEL_OFFSET, 0);
365 	pm2_WR(p, PM2R_FB_WINDOW_BASE, 0);
366 	pm2_WR(p, PM2R_LB_WINDOW_BASE, 0);
367 	pm2_WR(p, PM2R_FB_SOFT_WRITE_MASK, ~(0L));
368 	pm2_WR(p, PM2R_FB_HARD_WRITE_MASK, ~(0L));
369 	pm2_WR(p, PM2R_FB_READ_PIXEL, 0);
370 	pm2_WR(p, PM2R_DITHER_MODE, 0);
371 	pm2_WR(p, PM2R_AREA_STIPPLE_MODE, 0);
372 	pm2_WR(p, PM2R_DEPTH_MODE, 0);
373 	pm2_WR(p, PM2R_STENCIL_MODE, 0);
374 	pm2_WR(p, PM2R_TEXTURE_ADDRESS_MODE, 0);
375 	pm2_WR(p, PM2R_TEXTURE_READ_MODE, 0);
376 	pm2_WR(p, PM2R_TEXEL_LUT_MODE, 0);
377 	pm2_WR(p, PM2R_YUV_MODE, 0);
378 	pm2_WR(p, PM2R_COLOR_DDA_MODE, 0);
379 	pm2_WR(p, PM2R_TEXTURE_COLOR_MODE, 0);
380 	pm2_WR(p, PM2R_FOG_MODE, 0);
381 	pm2_WR(p, PM2R_ALPHA_BLEND_MODE, 0);
382 	pm2_WR(p, PM2R_LOGICAL_OP_MODE, 0);
383 	pm2_WR(p, PM2R_STATISTICS_MODE, 0);
384 	pm2_WR(p, PM2R_SCISSOR_MODE, 0);
385 	pm2_WR(p, PM2R_FILTER_MODE, PM2F_SYNCHRONIZATION);
386 	pm2_WR(p, PM2R_RD_PIXEL_MASK, 0xff);
387 	switch (p->type) {
388 	case PM2_TYPE_PERMEDIA2:
389 		pm2_RDAC_WR(p, PM2I_RD_MODE_CONTROL, 0); /* no overlay */
390 		pm2_RDAC_WR(p, PM2I_RD_CURSOR_CONTROL, 0);
391 		pm2_RDAC_WR(p, PM2I_RD_MISC_CONTROL, PM2F_RD_PALETTE_WIDTH_8);
392 		pm2_RDAC_WR(p, PM2I_RD_COLOR_KEY_CONTROL, 0);
393 		pm2_RDAC_WR(p, PM2I_RD_OVERLAY_KEY, 0);
394 		pm2_RDAC_WR(p, PM2I_RD_RED_KEY, 0);
395 		pm2_RDAC_WR(p, PM2I_RD_GREEN_KEY, 0);
396 		pm2_RDAC_WR(p, PM2I_RD_BLUE_KEY, 0);
397 		break;
398 	case PM2_TYPE_PERMEDIA2V:
399 		pm2v_RDAC_WR(p, PM2VI_RD_MISC_CONTROL, 1); /* 8bit */
400 		break;
401 	}
402 }
403 
set_aperture(struct pm2fb_par * p,u32 depth)404 static void set_aperture(struct pm2fb_par *p, u32 depth)
405 {
406 	/*
407 	 * The hardware is little-endian. When used in big-endian
408 	 * hosts, the on-chip aperture settings are used where
409 	 * possible to translate from host to card byte order.
410 	 */
411 	WAIT_FIFO(p, 2);
412 #ifdef __LITTLE_ENDIAN
413 	pm2_WR(p, PM2R_APERTURE_ONE, PM2F_APERTURE_STANDARD);
414 #else
415 	switch (depth) {
416 	case 24:	/* RGB->BGR */
417 		/*
418 		 * We can't use the aperture to translate host to
419 		 * card byte order here, so we switch to BGR mode
420 		 * in pm2fb_set_par().
421 		 */
422 	case 8:		/* B->B */
423 		pm2_WR(p, PM2R_APERTURE_ONE, PM2F_APERTURE_STANDARD);
424 		break;
425 	case 16:	/* HL->LH */
426 		pm2_WR(p, PM2R_APERTURE_ONE, PM2F_APERTURE_HALFWORDSWAP);
427 		break;
428 	case 32:	/* RGBA->ABGR */
429 		pm2_WR(p, PM2R_APERTURE_ONE, PM2F_APERTURE_BYTESWAP);
430 		break;
431 	}
432 #endif
433 
434 	/* We don't use aperture two, so this may be superflous */
435 	pm2_WR(p, PM2R_APERTURE_TWO, PM2F_APERTURE_STANDARD);
436 }
437 
set_color(struct pm2fb_par * p,unsigned char regno,unsigned char r,unsigned char g,unsigned char b)438 static void set_color(struct pm2fb_par *p, unsigned char regno,
439 		      unsigned char r, unsigned char g, unsigned char b)
440 {
441 	WAIT_FIFO(p, 4);
442 	pm2_WR(p, PM2R_RD_PALETTE_WRITE_ADDRESS, regno);
443 	wmb();
444 	pm2_WR(p, PM2R_RD_PALETTE_DATA, r);
445 	wmb();
446 	pm2_WR(p, PM2R_RD_PALETTE_DATA, g);
447 	wmb();
448 	pm2_WR(p, PM2R_RD_PALETTE_DATA, b);
449 }
450 
set_memclock(struct pm2fb_par * par,u32 clk)451 static void set_memclock(struct pm2fb_par *par, u32 clk)
452 {
453 	int i;
454 	unsigned char m, n, p;
455 
456 	switch (par->type) {
457 	case PM2_TYPE_PERMEDIA2V:
458 		pm2v_mnp(clk/2, &m, &n, &p);
459 		WAIT_FIFO(par, 12);
460 		pm2_WR(par, PM2VR_RD_INDEX_HIGH, PM2VI_RD_MCLK_CONTROL >> 8);
461 		pm2v_RDAC_WR(par, PM2VI_RD_MCLK_CONTROL, 0);
462 		pm2v_RDAC_WR(par, PM2VI_RD_MCLK_PRESCALE, m);
463 		pm2v_RDAC_WR(par, PM2VI_RD_MCLK_FEEDBACK, n);
464 		pm2v_RDAC_WR(par, PM2VI_RD_MCLK_POSTSCALE, p);
465 		pm2v_RDAC_WR(par, PM2VI_RD_MCLK_CONTROL, 1);
466 		rmb();
467 		for (i = 256; i; i--)
468 			if (pm2v_RDAC_RD(par, PM2VI_RD_MCLK_CONTROL) & 2)
469 				break;
470 		pm2_WR(par, PM2VR_RD_INDEX_HIGH, 0);
471 		break;
472 	case PM2_TYPE_PERMEDIA2:
473 		pm2_mnp(clk, &m, &n, &p);
474 		WAIT_FIFO(par, 10);
475 		pm2_RDAC_WR(par, PM2I_RD_MEMORY_CLOCK_3, 6);
476 		pm2_RDAC_WR(par, PM2I_RD_MEMORY_CLOCK_1, m);
477 		pm2_RDAC_WR(par, PM2I_RD_MEMORY_CLOCK_2, n);
478 		pm2_RDAC_WR(par, PM2I_RD_MEMORY_CLOCK_3, 8|p);
479 		pm2_RDAC_RD(par, PM2I_RD_MEMORY_CLOCK_STATUS);
480 		rmb();
481 		for (i = 256; i; i--)
482 			if (pm2_RD(par, PM2R_RD_INDEXED_DATA) & PM2F_PLL_LOCKED)
483 				break;
484 		break;
485 	}
486 }
487 
set_pixclock(struct pm2fb_par * par,u32 clk)488 static void set_pixclock(struct pm2fb_par *par, u32 clk)
489 {
490 	int i;
491 	unsigned char m, n, p;
492 
493 	switch (par->type) {
494 	case PM2_TYPE_PERMEDIA2:
495 		pm2_mnp(clk, &m, &n, &p);
496 		WAIT_FIFO(par, 10);
497 		pm2_RDAC_WR(par, PM2I_RD_PIXEL_CLOCK_A3, 0);
498 		pm2_RDAC_WR(par, PM2I_RD_PIXEL_CLOCK_A1, m);
499 		pm2_RDAC_WR(par, PM2I_RD_PIXEL_CLOCK_A2, n);
500 		pm2_RDAC_WR(par, PM2I_RD_PIXEL_CLOCK_A3, 8|p);
501 		pm2_RDAC_RD(par, PM2I_RD_PIXEL_CLOCK_STATUS);
502 		rmb();
503 		for (i = 256; i; i--)
504 			if (pm2_RD(par, PM2R_RD_INDEXED_DATA) & PM2F_PLL_LOCKED)
505 				break;
506 		break;
507 	case PM2_TYPE_PERMEDIA2V:
508 		pm2v_mnp(clk/2, &m, &n, &p);
509 		WAIT_FIFO(par, 8);
510 		pm2_WR(par, PM2VR_RD_INDEX_HIGH, PM2VI_RD_CLK0_PRESCALE >> 8);
511 		pm2v_RDAC_WR(par, PM2VI_RD_CLK0_PRESCALE, m);
512 		pm2v_RDAC_WR(par, PM2VI_RD_CLK0_FEEDBACK, n);
513 		pm2v_RDAC_WR(par, PM2VI_RD_CLK0_POSTSCALE, p);
514 		pm2_WR(par, PM2VR_RD_INDEX_HIGH, 0);
515 		break;
516 	}
517 }
518 
set_video(struct pm2fb_par * p,u32 video)519 static void set_video(struct pm2fb_par *p, u32 video)
520 {
521 	u32 tmp;
522 	u32 vsync = video;
523 
524 	DPRINTK("video = 0x%x\n", video);
525 
526 	/*
527 	 * The hardware cursor needs +vsync to recognise vert retrace.
528 	 * We may not be using the hardware cursor, but the X Glint
529 	 * driver may well. So always set +hsync/+vsync and then set
530 	 * the RAMDAC to invert the sync if necessary.
531 	 */
532 	vsync &= ~(PM2F_HSYNC_MASK | PM2F_VSYNC_MASK);
533 	vsync |= PM2F_HSYNC_ACT_HIGH | PM2F_VSYNC_ACT_HIGH;
534 
535 	WAIT_FIFO(p, 3);
536 	pm2_WR(p, PM2R_VIDEO_CONTROL, vsync);
537 
538 	switch (p->type) {
539 	case PM2_TYPE_PERMEDIA2:
540 		tmp = PM2F_RD_PALETTE_WIDTH_8;
541 		if ((video & PM2F_HSYNC_MASK) == PM2F_HSYNC_ACT_LOW)
542 			tmp |= 4; /* invert hsync */
543 		if ((video & PM2F_VSYNC_MASK) == PM2F_VSYNC_ACT_LOW)
544 			tmp |= 8; /* invert vsync */
545 		pm2_RDAC_WR(p, PM2I_RD_MISC_CONTROL, tmp);
546 		break;
547 	case PM2_TYPE_PERMEDIA2V:
548 		tmp = 0;
549 		if ((video & PM2F_HSYNC_MASK) == PM2F_HSYNC_ACT_LOW)
550 			tmp |= 1; /* invert hsync */
551 		if ((video & PM2F_VSYNC_MASK) == PM2F_VSYNC_ACT_LOW)
552 			tmp |= 4; /* invert vsync */
553 		pm2v_RDAC_WR(p, PM2VI_RD_SYNC_CONTROL, tmp);
554 		break;
555 	}
556 }
557 
558 /*
559  *	pm2fb_check_var - Optional function. Validates a var passed in.
560  *	@var: frame buffer variable screen structure
561  *	@info: frame buffer structure that represents a single frame buffer
562  *
563  *	Checks to see if the hardware supports the state requested by
564  *	var passed in.
565  *
566  *	Returns negative errno on error, or zero on success.
567  */
pm2fb_check_var(struct fb_var_screeninfo * var,struct fb_info * info)568 static int pm2fb_check_var(struct fb_var_screeninfo *var, struct fb_info *info)
569 {
570 	u32 lpitch;
571 
572 	if (var->bits_per_pixel != 8  && var->bits_per_pixel != 16 &&
573 	    var->bits_per_pixel != 24 && var->bits_per_pixel != 32) {
574 		DPRINTK("depth not supported: %u\n", var->bits_per_pixel);
575 		return -EINVAL;
576 	}
577 
578 	if (var->xres != var->xres_virtual) {
579 		DPRINTK("virtual x resolution != "
580 			"physical x resolution not supported\n");
581 		return -EINVAL;
582 	}
583 
584 	if (var->yres > var->yres_virtual) {
585 		DPRINTK("virtual y resolution < "
586 			"physical y resolution not possible\n");
587 		return -EINVAL;
588 	}
589 
590 	/* permedia cannot blit over 2048 */
591 	if (var->yres_virtual > 2047) {
592 		var->yres_virtual = 2047;
593 	}
594 
595 	if (var->xoffset) {
596 		DPRINTK("xoffset not supported\n");
597 		return -EINVAL;
598 	}
599 
600 	if ((var->vmode & FB_VMODE_MASK) == FB_VMODE_INTERLACED) {
601 		DPRINTK("interlace not supported\n");
602 		return -EINVAL;
603 	}
604 
605 	var->xres = (var->xres + 15) & ~15; /* could sometimes be 8 */
606 	lpitch = var->xres * ((var->bits_per_pixel + 7) >> 3);
607 
608 	if (var->xres < 320 || var->xres > 1600) {
609 		DPRINTK("width not supported: %u\n", var->xres);
610 		return -EINVAL;
611 	}
612 
613 	if (var->yres < 200 || var->yres > 1200) {
614 		DPRINTK("height not supported: %u\n", var->yres);
615 		return -EINVAL;
616 	}
617 
618 	if (lpitch * var->yres_virtual > info->fix.smem_len) {
619 		DPRINTK("no memory for screen (%ux%ux%u)\n",
620 			var->xres, var->yres_virtual, var->bits_per_pixel);
621 		return -EINVAL;
622 	}
623 
624 	if (PICOS2KHZ(var->pixclock) > PM2_MAX_PIXCLOCK) {
625 		DPRINTK("pixclock too high (%ldKHz)\n",
626 			PICOS2KHZ(var->pixclock));
627 		return -EINVAL;
628 	}
629 
630 	var->transp.offset = 0;
631 	var->transp.length = 0;
632 	switch (var->bits_per_pixel) {
633 	case 8:
634 		var->red.length = 8;
635 		var->green.length = 8;
636 		var->blue.length = 8;
637 		break;
638 	case 16:
639 		var->red.offset   = 11;
640 		var->red.length   = 5;
641 		var->green.offset = 5;
642 		var->green.length = 6;
643 		var->blue.offset  = 0;
644 		var->blue.length  = 5;
645 		break;
646 	case 32:
647 		var->transp.offset = 24;
648 		var->transp.length = 8;
649 		var->red.offset	  = 16;
650 		var->green.offset = 8;
651 		var->blue.offset  = 0;
652 		var->red.length = 8;
653 		var->green.length = 8;
654 		var->blue.length = 8;
655 		break;
656 	case 24:
657 #ifdef __BIG_ENDIAN
658 		var->red.offset   = 0;
659 		var->blue.offset  = 16;
660 #else
661 		var->red.offset   = 16;
662 		var->blue.offset  = 0;
663 #endif
664 		var->green.offset = 8;
665 		var->red.length = 8;
666 		var->green.length = 8;
667 		var->blue.length = 8;
668 		break;
669 	}
670 	var->height = -1;
671 	var->width = -1;
672 
673 	var->accel_flags = 0;	/* Can't mmap if this is on */
674 
675 	DPRINTK("Checking graphics mode at %dx%d depth %d\n",
676 		var->xres, var->yres, var->bits_per_pixel);
677 	return 0;
678 }
679 
680 /**
681  *	pm2fb_set_par - Alters the hardware state.
682  *	@info: frame buffer structure that represents a single frame buffer
683  *
684  *	Using the fb_var_screeninfo in fb_info we set the resolution of the
685  *	this particular framebuffer.
686  */
pm2fb_set_par(struct fb_info * info)687 static int pm2fb_set_par(struct fb_info *info)
688 {
689 	struct pm2fb_par *par = info->par;
690 	u32 pixclock;
691 	u32 width = (info->var.xres_virtual + 7) & ~7;
692 	u32 height = info->var.yres_virtual;
693 	u32 depth = (info->var.bits_per_pixel + 7) & ~7;
694 	u32 hsstart, hsend, hbend, htotal;
695 	u32 vsstart, vsend, vbend, vtotal;
696 	u32 stride;
697 	u32 base;
698 	u32 video = 0;
699 	u32 clrmode = PM2F_RD_COLOR_MODE_RGB | PM2F_RD_GUI_ACTIVE;
700 	u32 txtmap = 0;
701 	u32 pixsize = 0;
702 	u32 clrformat = 0;
703 	u32 misc = 1; /* 8-bit DAC */
704 	u32 xres = (info->var.xres + 31) & ~31;
705 	int data64;
706 
707 	reset_card(par);
708 	reset_config(par);
709 	clear_palette(par);
710 	if (par->memclock)
711 		set_memclock(par, par->memclock);
712 
713 	depth = (depth > 32) ? 32 : depth;
714 	data64 = depth > 8 || par->type == PM2_TYPE_PERMEDIA2V;
715 
716 	pixclock = PICOS2KHZ(info->var.pixclock);
717 	if (pixclock > PM2_MAX_PIXCLOCK) {
718 		DPRINTK("pixclock too high (%uKHz)\n", pixclock);
719 		return -EINVAL;
720 	}
721 
722 	hsstart = to3264(info->var.right_margin, depth, data64);
723 	hsend = hsstart + to3264(info->var.hsync_len, depth, data64);
724 	hbend = hsend + to3264(info->var.left_margin, depth, data64);
725 	htotal = to3264(xres, depth, data64) + hbend - 1;
726 	vsstart = (info->var.lower_margin)
727 		? info->var.lower_margin - 1
728 		: 0;	/* FIXME! */
729 	vsend = info->var.lower_margin + info->var.vsync_len - 1;
730 	vbend = info->var.lower_margin + info->var.vsync_len +
731 		info->var.upper_margin;
732 	vtotal = info->var.yres + vbend - 1;
733 	stride = to3264(width, depth, 1);
734 	base = to3264(info->var.yoffset * xres + info->var.xoffset, depth, 1);
735 	if (data64)
736 		video |= PM2F_DATA_64_ENABLE;
737 
738 	if (info->var.sync & FB_SYNC_HOR_HIGH_ACT) {
739 		if (lowhsync) {
740 			DPRINTK("ignoring +hsync, using -hsync.\n");
741 			video |= PM2F_HSYNC_ACT_LOW;
742 		} else
743 			video |= PM2F_HSYNC_ACT_HIGH;
744 	} else
745 		video |= PM2F_HSYNC_ACT_LOW;
746 
747 	if (info->var.sync & FB_SYNC_VERT_HIGH_ACT) {
748 		if (lowvsync) {
749 			DPRINTK("ignoring +vsync, using -vsync.\n");
750 			video |= PM2F_VSYNC_ACT_LOW;
751 		} else
752 			video |= PM2F_VSYNC_ACT_HIGH;
753 	} else
754 		video |= PM2F_VSYNC_ACT_LOW;
755 
756 	if ((info->var.vmode & FB_VMODE_MASK) == FB_VMODE_INTERLACED) {
757 		DPRINTK("interlaced not supported\n");
758 		return -EINVAL;
759 	}
760 	if ((info->var.vmode & FB_VMODE_MASK) == FB_VMODE_DOUBLE)
761 		video |= PM2F_LINE_DOUBLE;
762 	if ((info->var.activate & FB_ACTIVATE_MASK) == FB_ACTIVATE_NOW)
763 		video |= PM2F_VIDEO_ENABLE;
764 	par->video = video;
765 
766 	info->fix.visual =
767 		(depth == 8) ? FB_VISUAL_PSEUDOCOLOR : FB_VISUAL_TRUECOLOR;
768 	info->fix.line_length = info->var.xres * depth / 8;
769 	info->cmap.len = 256;
770 
771 	/*
772 	 * Settings calculated. Now write them out.
773 	 */
774 	if (par->type == PM2_TYPE_PERMEDIA2V) {
775 		WAIT_FIFO(par, 1);
776 		pm2_WR(par, PM2VR_RD_INDEX_HIGH, 0);
777 	}
778 
779 	set_aperture(par, depth);
780 
781 	mb();
782 	WAIT_FIFO(par, 19);
783 	switch (depth) {
784 	case 8:
785 		pm2_WR(par, PM2R_FB_READ_PIXEL, 0);
786 		clrformat = 0x2e;
787 		break;
788 	case 16:
789 		pm2_WR(par, PM2R_FB_READ_PIXEL, 1);
790 		clrmode |= PM2F_RD_TRUECOLOR | PM2F_RD_PIXELFORMAT_RGB565;
791 		txtmap = PM2F_TEXTEL_SIZE_16;
792 		pixsize = 1;
793 		clrformat = 0x70;
794 		misc |= 8;
795 		break;
796 	case 32:
797 		pm2_WR(par, PM2R_FB_READ_PIXEL, 2);
798 		clrmode |= PM2F_RD_TRUECOLOR | PM2F_RD_PIXELFORMAT_RGBA8888;
799 		txtmap = PM2F_TEXTEL_SIZE_32;
800 		pixsize = 2;
801 		clrformat = 0x20;
802 		misc |= 8;
803 		break;
804 	case 24:
805 		pm2_WR(par, PM2R_FB_READ_PIXEL, 4);
806 		clrmode |= PM2F_RD_TRUECOLOR | PM2F_RD_PIXELFORMAT_RGB888;
807 		txtmap = PM2F_TEXTEL_SIZE_24;
808 		pixsize = 4;
809 		clrformat = 0x20;
810 		misc |= 8;
811 		break;
812 	}
813 	pm2_WR(par, PM2R_FB_WRITE_MODE, PM2F_FB_WRITE_ENABLE);
814 	pm2_WR(par, PM2R_FB_READ_MODE, partprod(xres));
815 	pm2_WR(par, PM2R_LB_READ_MODE, partprod(xres));
816 	pm2_WR(par, PM2R_TEXTURE_MAP_FORMAT, txtmap | partprod(xres));
817 	pm2_WR(par, PM2R_H_TOTAL, htotal);
818 	pm2_WR(par, PM2R_HS_START, hsstart);
819 	pm2_WR(par, PM2R_HS_END, hsend);
820 	pm2_WR(par, PM2R_HG_END, hbend);
821 	pm2_WR(par, PM2R_HB_END, hbend);
822 	pm2_WR(par, PM2R_V_TOTAL, vtotal);
823 	pm2_WR(par, PM2R_VS_START, vsstart);
824 	pm2_WR(par, PM2R_VS_END, vsend);
825 	pm2_WR(par, PM2R_VB_END, vbend);
826 	pm2_WR(par, PM2R_SCREEN_STRIDE, stride);
827 	wmb();
828 	pm2_WR(par, PM2R_WINDOW_ORIGIN, 0);
829 	pm2_WR(par, PM2R_SCREEN_SIZE, (height << 16) | width);
830 	pm2_WR(par, PM2R_SCISSOR_MODE, PM2F_SCREEN_SCISSOR_ENABLE);
831 	wmb();
832 	pm2_WR(par, PM2R_SCREEN_BASE, base);
833 	wmb();
834 	set_video(par, video);
835 	WAIT_FIFO(par, 10);
836 	switch (par->type) {
837 	case PM2_TYPE_PERMEDIA2:
838 		pm2_RDAC_WR(par, PM2I_RD_COLOR_MODE, clrmode);
839 		pm2_RDAC_WR(par, PM2I_RD_COLOR_KEY_CONTROL,
840 				(depth == 8) ? 0 : PM2F_COLOR_KEY_TEST_OFF);
841 		break;
842 	case PM2_TYPE_PERMEDIA2V:
843 		pm2v_RDAC_WR(par, PM2VI_RD_DAC_CONTROL, 0);
844 		pm2v_RDAC_WR(par, PM2VI_RD_PIXEL_SIZE, pixsize);
845 		pm2v_RDAC_WR(par, PM2VI_RD_COLOR_FORMAT, clrformat);
846 		pm2v_RDAC_WR(par, PM2VI_RD_MISC_CONTROL, misc);
847 		pm2v_RDAC_WR(par, PM2VI_RD_OVERLAY_KEY, 0);
848 		break;
849 	}
850 	set_pixclock(par, pixclock);
851 	DPRINTK("Setting graphics mode at %dx%d depth %d\n",
852 		info->var.xres, info->var.yres, info->var.bits_per_pixel);
853 	return 0;
854 }
855 
856 /**
857  *	pm2fb_setcolreg - Sets a color register.
858  *	@regno: boolean, 0 copy local, 1 get_user() function
859  *	@red: frame buffer colormap structure
860  *	@green: The green value which can be up to 16 bits wide
861  *	@blue:  The blue value which can be up to 16 bits wide.
862  *	@transp: If supported the alpha value which can be up to 16 bits wide.
863  *	@info: frame buffer info structure
864  *
865  *	Set a single color register. The values supplied have a 16 bit
866  *	magnitude which needs to be scaled in this function for the hardware.
867  *	Pretty much a direct lift from tdfxfb.c.
868  *
869  *	Returns negative errno on error, or zero on success.
870  */
pm2fb_setcolreg(unsigned regno,unsigned red,unsigned green,unsigned blue,unsigned transp,struct fb_info * info)871 static int pm2fb_setcolreg(unsigned regno, unsigned red, unsigned green,
872 			   unsigned blue, unsigned transp,
873 			   struct fb_info *info)
874 {
875 	struct pm2fb_par *par = info->par;
876 
877 	if (regno >= info->cmap.len)  /* no. of hw registers */
878 		return -EINVAL;
879 	/*
880 	 * Program hardware... do anything you want with transp
881 	 */
882 
883 	/* grayscale works only partially under directcolor */
884 	/* grayscale = 0.30*R + 0.59*G + 0.11*B */
885 	if (info->var.grayscale)
886 		red = green = blue = (red * 77 + green * 151 + blue * 28) >> 8;
887 
888 	/* Directcolor:
889 	 *   var->{color}.offset contains start of bitfield
890 	 *   var->{color}.length contains length of bitfield
891 	 *   {hardwarespecific} contains width of DAC
892 	 *   cmap[X] is programmed to
893 	 *   (X << red.offset) | (X << green.offset) | (X << blue.offset)
894 	 *   RAMDAC[X] is programmed to (red, green, blue)
895 	 *
896 	 * Pseudocolor:
897 	 *    uses offset = 0 && length = DAC register width.
898 	 *    var->{color}.offset is 0
899 	 *    var->{color}.length contains width of DAC
900 	 *    cmap is not used
901 	 *    DAC[X] is programmed to (red, green, blue)
902 	 * Truecolor:
903 	 *    does not use RAMDAC (usually has 3 of them).
904 	 *    var->{color}.offset contains start of bitfield
905 	 *    var->{color}.length contains length of bitfield
906 	 *    cmap is programmed to
907 	 *    (red << red.offset) | (green << green.offset) |
908 	 *    (blue << blue.offset) | (transp << transp.offset)
909 	 *    RAMDAC does not exist
910 	 */
911 #define CNVT_TOHW(val, width) ((((val) << (width)) + 0x7FFF -(val)) >> 16)
912 	switch (info->fix.visual) {
913 	case FB_VISUAL_TRUECOLOR:
914 	case FB_VISUAL_PSEUDOCOLOR:
915 		red = CNVT_TOHW(red, info->var.red.length);
916 		green = CNVT_TOHW(green, info->var.green.length);
917 		blue = CNVT_TOHW(blue, info->var.blue.length);
918 		transp = CNVT_TOHW(transp, info->var.transp.length);
919 		break;
920 	case FB_VISUAL_DIRECTCOLOR:
921 		/* example here assumes 8 bit DAC. Might be different
922 		 * for your hardware */
923 		red = CNVT_TOHW(red, 8);
924 		green = CNVT_TOHW(green, 8);
925 		blue = CNVT_TOHW(blue, 8);
926 		/* hey, there is bug in transp handling... */
927 		transp = CNVT_TOHW(transp, 8);
928 		break;
929 	}
930 #undef CNVT_TOHW
931 	/* Truecolor has hardware independent palette */
932 	if (info->fix.visual == FB_VISUAL_TRUECOLOR) {
933 		u32 v;
934 
935 		if (regno >= 16)
936 			return -EINVAL;
937 
938 		v = (red << info->var.red.offset) |
939 			(green << info->var.green.offset) |
940 			(blue << info->var.blue.offset) |
941 			(transp << info->var.transp.offset);
942 
943 		switch (info->var.bits_per_pixel) {
944 		case 8:
945 			break;
946 		case 16:
947 		case 24:
948 		case 32:
949 			par->palette[regno] = v;
950 			break;
951 		}
952 		return 0;
953 	} else if (info->fix.visual == FB_VISUAL_PSEUDOCOLOR)
954 		set_color(par, regno, red, green, blue);
955 
956 	return 0;
957 }
958 
959 /**
960  *	pm2fb_pan_display - Pans the display.
961  *	@var: frame buffer variable screen structure
962  *	@info: frame buffer structure that represents a single frame buffer
963  *
964  *	Pan (or wrap, depending on the `vmode' field) the display using the
965  *	`xoffset' and `yoffset' fields of the `var' structure.
966  *	If the values don't fit, return -EINVAL.
967  *
968  *	Returns negative errno on error, or zero on success.
969  *
970  */
pm2fb_pan_display(struct fb_var_screeninfo * var,struct fb_info * info)971 static int pm2fb_pan_display(struct fb_var_screeninfo *var,
972 			     struct fb_info *info)
973 {
974 	struct pm2fb_par *p = info->par;
975 	u32 base;
976 	u32 depth = (var->bits_per_pixel + 7) & ~7;
977 	u32 xres = (var->xres + 31) & ~31;
978 
979 	depth = (depth > 32) ? 32 : depth;
980 	base = to3264(var->yoffset * xres + var->xoffset, depth, 1);
981 	WAIT_FIFO(p, 1);
982 	pm2_WR(p, PM2R_SCREEN_BASE, base);
983 	return 0;
984 }
985 
986 /**
987  *	pm2fb_blank - Blanks the display.
988  *	@blank_mode: the blank mode we want.
989  *	@info: frame buffer structure that represents a single frame buffer
990  *
991  *	Blank the screen if blank_mode != 0, else unblank. Return 0 if
992  *	blanking succeeded, != 0 if un-/blanking failed due to e.g. a
993  *	video mode which doesn't support it. Implements VESA suspend
994  *	and powerdown modes on hardware that supports disabling hsync/vsync:
995  *	blank_mode == 2: suspend vsync
996  *	blank_mode == 3: suspend hsync
997  *	blank_mode == 4: powerdown
998  *
999  *	Returns negative errno on error, or zero on success.
1000  *
1001  */
pm2fb_blank(int blank_mode,struct fb_info * info)1002 static int pm2fb_blank(int blank_mode, struct fb_info *info)
1003 {
1004 	struct pm2fb_par *par = info->par;
1005 	u32 video = par->video;
1006 
1007 	DPRINTK("blank_mode %d\n", blank_mode);
1008 
1009 	switch (blank_mode) {
1010 	case FB_BLANK_UNBLANK:
1011 		/* Screen: On */
1012 		video |= PM2F_VIDEO_ENABLE;
1013 		break;
1014 	case FB_BLANK_NORMAL:
1015 		/* Screen: Off */
1016 		video &= ~PM2F_VIDEO_ENABLE;
1017 		break;
1018 	case FB_BLANK_VSYNC_SUSPEND:
1019 		/* VSync: Off */
1020 		video &= ~(PM2F_VSYNC_MASK | PM2F_BLANK_LOW);
1021 		break;
1022 	case FB_BLANK_HSYNC_SUSPEND:
1023 		/* HSync: Off */
1024 		video &= ~(PM2F_HSYNC_MASK | PM2F_BLANK_LOW);
1025 		break;
1026 	case FB_BLANK_POWERDOWN:
1027 		/* HSync: Off, VSync: Off */
1028 		video &= ~(PM2F_VSYNC_MASK | PM2F_HSYNC_MASK | PM2F_BLANK_LOW);
1029 		break;
1030 	}
1031 	set_video(par, video);
1032 	return 0;
1033 }
1034 
pm2fb_sync(struct fb_info * info)1035 static int pm2fb_sync(struct fb_info *info)
1036 {
1037 	struct pm2fb_par *par = info->par;
1038 
1039 	WAIT_FIFO(par, 1);
1040 	pm2_WR(par, PM2R_SYNC, 0);
1041 	mb();
1042 	do {
1043 		while (pm2_RD(par, PM2R_OUT_FIFO_WORDS) == 0)
1044 			cpu_relax();
1045 	} while (pm2_RD(par, PM2R_OUT_FIFO) != PM2TAG(PM2R_SYNC));
1046 
1047 	return 0;
1048 }
1049 
pm2fb_fillrect(struct fb_info * info,const struct fb_fillrect * region)1050 static void pm2fb_fillrect(struct fb_info *info,
1051 				const struct fb_fillrect *region)
1052 {
1053 	struct pm2fb_par *par = info->par;
1054 	struct fb_fillrect modded;
1055 	int vxres, vyres;
1056 	u32 color = (info->fix.visual == FB_VISUAL_TRUECOLOR) ?
1057 		((u32 *)info->pseudo_palette)[region->color] : region->color;
1058 
1059 	if (info->state != FBINFO_STATE_RUNNING)
1060 		return;
1061 	if ((info->flags & FBINFO_HWACCEL_DISABLED) ||
1062 		region->rop != ROP_COPY ) {
1063 		cfb_fillrect(info, region);
1064 		return;
1065 	}
1066 
1067 	vxres = info->var.xres_virtual;
1068 	vyres = info->var.yres_virtual;
1069 
1070 	memcpy(&modded, region, sizeof(struct fb_fillrect));
1071 
1072 	if (!modded.width || !modded.height ||
1073 	    modded.dx >= vxres || modded.dy >= vyres)
1074 		return;
1075 
1076 	if (modded.dx + modded.width  > vxres)
1077 		modded.width  = vxres - modded.dx;
1078 	if (modded.dy + modded.height > vyres)
1079 		modded.height = vyres - modded.dy;
1080 
1081 	if (info->var.bits_per_pixel == 8)
1082 		color |= color << 8;
1083 	if (info->var.bits_per_pixel <= 16)
1084 		color |= color << 16;
1085 
1086 	WAIT_FIFO(par, 3);
1087 	pm2_WR(par, PM2R_CONFIG, PM2F_CONFIG_FB_WRITE_ENABLE);
1088 	pm2_WR(par, PM2R_RECTANGLE_ORIGIN, (modded.dy << 16) | modded.dx);
1089 	pm2_WR(par, PM2R_RECTANGLE_SIZE, (modded.height << 16) | modded.width);
1090 	if (info->var.bits_per_pixel != 24) {
1091 		WAIT_FIFO(par, 2);
1092 		pm2_WR(par, PM2R_FB_BLOCK_COLOR, color);
1093 		wmb();
1094 		pm2_WR(par, PM2R_RENDER,
1095 				PM2F_RENDER_RECTANGLE | PM2F_RENDER_FASTFILL);
1096 	} else {
1097 		WAIT_FIFO(par, 4);
1098 		pm2_WR(par, PM2R_COLOR_DDA_MODE, 1);
1099 		pm2_WR(par, PM2R_CONSTANT_COLOR, color);
1100 		wmb();
1101 		pm2_WR(par, PM2R_RENDER,
1102 				PM2F_RENDER_RECTANGLE |
1103 				PM2F_INCREASE_X | PM2F_INCREASE_Y );
1104 		pm2_WR(par, PM2R_COLOR_DDA_MODE, 0);
1105 	}
1106 }
1107 
pm2fb_copyarea(struct fb_info * info,const struct fb_copyarea * area)1108 static void pm2fb_copyarea(struct fb_info *info,
1109 				const struct fb_copyarea *area)
1110 {
1111 	struct pm2fb_par *par = info->par;
1112 	struct fb_copyarea modded;
1113 	u32 vxres, vyres;
1114 
1115 	if (info->state != FBINFO_STATE_RUNNING)
1116 		return;
1117 	if (info->flags & FBINFO_HWACCEL_DISABLED) {
1118 		cfb_copyarea(info, area);
1119 		return;
1120 	}
1121 
1122 	memcpy(&modded, area, sizeof(struct fb_copyarea));
1123 
1124 	vxres = info->var.xres_virtual;
1125 	vyres = info->var.yres_virtual;
1126 
1127 	if (!modded.width || !modded.height ||
1128 	    modded.sx >= vxres || modded.sy >= vyres ||
1129 	    modded.dx >= vxres || modded.dy >= vyres)
1130 		return;
1131 
1132 	if (modded.sx + modded.width > vxres)
1133 		modded.width = vxres - modded.sx;
1134 	if (modded.dx + modded.width > vxres)
1135 		modded.width = vxres - modded.dx;
1136 	if (modded.sy + modded.height > vyres)
1137 		modded.height = vyres - modded.sy;
1138 	if (modded.dy + modded.height > vyres)
1139 		modded.height = vyres - modded.dy;
1140 
1141 	WAIT_FIFO(par, 5);
1142 	pm2_WR(par, PM2R_CONFIG, PM2F_CONFIG_FB_WRITE_ENABLE |
1143 		PM2F_CONFIG_FB_READ_SOURCE_ENABLE);
1144 	pm2_WR(par, PM2R_FB_SOURCE_DELTA,
1145 			((modded.sy - modded.dy) & 0xfff) << 16 |
1146 			((modded.sx - modded.dx) & 0xfff));
1147 	pm2_WR(par, PM2R_RECTANGLE_ORIGIN, (modded.dy << 16) | modded.dx);
1148 	pm2_WR(par, PM2R_RECTANGLE_SIZE, (modded.height << 16) | modded.width);
1149 	wmb();
1150 	pm2_WR(par, PM2R_RENDER, PM2F_RENDER_RECTANGLE |
1151 				(modded.dx < modded.sx ? PM2F_INCREASE_X : 0) |
1152 				(modded.dy < modded.sy ? PM2F_INCREASE_Y : 0));
1153 }
1154 
pm2fb_imageblit(struct fb_info * info,const struct fb_image * image)1155 static void pm2fb_imageblit(struct fb_info *info, const struct fb_image *image)
1156 {
1157 	struct pm2fb_par *par = info->par;
1158 	u32 height = image->height;
1159 	u32 fgx, bgx;
1160 	const u32 *src = (const u32 *)image->data;
1161 	u32 xres = (info->var.xres + 31) & ~31;
1162 	int raster_mode = 1; /* invert bits */
1163 
1164 #ifdef __LITTLE_ENDIAN
1165 	raster_mode |= 3 << 7; /* reverse byte order */
1166 #endif
1167 
1168 	if (info->state != FBINFO_STATE_RUNNING)
1169 		return;
1170 	if (info->flags & FBINFO_HWACCEL_DISABLED || image->depth != 1) {
1171 		cfb_imageblit(info, image);
1172 		return;
1173 	}
1174 	switch (info->fix.visual) {
1175 	case FB_VISUAL_PSEUDOCOLOR:
1176 		fgx = image->fg_color;
1177 		bgx = image->bg_color;
1178 		break;
1179 	case FB_VISUAL_TRUECOLOR:
1180 	default:
1181 		fgx = par->palette[image->fg_color];
1182 		bgx = par->palette[image->bg_color];
1183 		break;
1184 	}
1185 	if (info->var.bits_per_pixel == 8) {
1186 		fgx |= fgx << 8;
1187 		bgx |= bgx << 8;
1188 	}
1189 	if (info->var.bits_per_pixel <= 16) {
1190 		fgx |= fgx << 16;
1191 		bgx |= bgx << 16;
1192 	}
1193 
1194 	WAIT_FIFO(par, 13);
1195 	pm2_WR(par, PM2R_FB_READ_MODE, partprod(xres));
1196 	pm2_WR(par, PM2R_SCISSOR_MIN_XY,
1197 			((image->dy & 0xfff) << 16) | (image->dx & 0x0fff));
1198 	pm2_WR(par, PM2R_SCISSOR_MAX_XY,
1199 			(((image->dy + image->height) & 0x0fff) << 16) |
1200 			((image->dx + image->width) & 0x0fff));
1201 	pm2_WR(par, PM2R_SCISSOR_MODE, 1);
1202 	/* GXcopy & UNIT_ENABLE */
1203 	pm2_WR(par, PM2R_LOGICAL_OP_MODE, (0x3 << 1) | 1);
1204 	pm2_WR(par, PM2R_RECTANGLE_ORIGIN,
1205 			((image->dy & 0xfff) << 16) | (image->dx & 0x0fff));
1206 	pm2_WR(par, PM2R_RECTANGLE_SIZE,
1207 			((image->height & 0x0fff) << 16) |
1208 			((image->width) & 0x0fff));
1209 	if (info->var.bits_per_pixel == 24) {
1210 		pm2_WR(par, PM2R_COLOR_DDA_MODE, 1);
1211 		/* clear area */
1212 		pm2_WR(par, PM2R_CONSTANT_COLOR, bgx);
1213 		pm2_WR(par, PM2R_RENDER,
1214 			PM2F_RENDER_RECTANGLE |
1215 			PM2F_INCREASE_X | PM2F_INCREASE_Y);
1216 		/* BitMapPackEachScanline */
1217 		pm2_WR(par, PM2R_RASTERIZER_MODE, raster_mode | (1 << 9));
1218 		pm2_WR(par, PM2R_CONSTANT_COLOR, fgx);
1219 		pm2_WR(par, PM2R_RENDER,
1220 			PM2F_RENDER_RECTANGLE |
1221 			PM2F_INCREASE_X | PM2F_INCREASE_Y |
1222 			PM2F_RENDER_SYNC_ON_BIT_MASK);
1223 	} else {
1224 		pm2_WR(par, PM2R_COLOR_DDA_MODE, 0);
1225 		/* clear area */
1226 		pm2_WR(par, PM2R_FB_BLOCK_COLOR, bgx);
1227 		pm2_WR(par, PM2R_RENDER,
1228 			PM2F_RENDER_RECTANGLE |
1229 			PM2F_RENDER_FASTFILL |
1230 			PM2F_INCREASE_X | PM2F_INCREASE_Y);
1231 		pm2_WR(par, PM2R_RASTERIZER_MODE, raster_mode);
1232 		pm2_WR(par, PM2R_FB_BLOCK_COLOR, fgx);
1233 		pm2_WR(par, PM2R_RENDER,
1234 			PM2F_RENDER_RECTANGLE |
1235 			PM2F_INCREASE_X | PM2F_INCREASE_Y |
1236 			PM2F_RENDER_FASTFILL |
1237 			PM2F_RENDER_SYNC_ON_BIT_MASK);
1238 	}
1239 
1240 	while (height--) {
1241 		int width = ((image->width + 7) >> 3)
1242 				+ info->pixmap.scan_align - 1;
1243 		width >>= 2;
1244 		WAIT_FIFO(par, width);
1245 		while (width--) {
1246 			pm2_WR(par, PM2R_BIT_MASK_PATTERN, *src);
1247 			src++;
1248 		}
1249 	}
1250 	WAIT_FIFO(par, 3);
1251 	pm2_WR(par, PM2R_RASTERIZER_MODE, 0);
1252 	pm2_WR(par, PM2R_COLOR_DDA_MODE, 0);
1253 	pm2_WR(par, PM2R_SCISSOR_MODE, 0);
1254 }
1255 
1256 /*
1257  *	Hardware cursor support.
1258  */
1259 static const u8 cursor_bits_lookup[16] = {
1260 	0x00, 0x40, 0x10, 0x50, 0x04, 0x44, 0x14, 0x54,
1261 	0x01, 0x41, 0x11, 0x51, 0x05, 0x45, 0x15, 0x55
1262 };
1263 
pm2vfb_cursor(struct fb_info * info,struct fb_cursor * cursor)1264 static int pm2vfb_cursor(struct fb_info *info, struct fb_cursor *cursor)
1265 {
1266 	struct pm2fb_par *par = info->par;
1267 	u8 mode = PM2F_CURSORMODE_TYPE_X;
1268 	int x = cursor->image.dx - info->var.xoffset;
1269 	int y = cursor->image.dy - info->var.yoffset;
1270 
1271 	if (cursor->enable)
1272 		mode |= PM2F_CURSORMODE_CURSOR_ENABLE;
1273 
1274 	pm2v_RDAC_WR(par, PM2VI_RD_CURSOR_MODE, mode);
1275 
1276 	if (!cursor->enable)
1277 		x = 2047;	/* push it outside display */
1278 	pm2v_RDAC_WR(par, PM2VI_RD_CURSOR_X_LOW, x & 0xff);
1279 	pm2v_RDAC_WR(par, PM2VI_RD_CURSOR_X_HIGH, (x >> 8) & 0xf);
1280 	pm2v_RDAC_WR(par, PM2VI_RD_CURSOR_Y_LOW, y & 0xff);
1281 	pm2v_RDAC_WR(par, PM2VI_RD_CURSOR_Y_HIGH, (y >> 8) & 0xf);
1282 
1283 	/*
1284 	 * If the cursor is not be changed this means either we want the
1285 	 * current cursor state (if enable is set) or we want to query what
1286 	 * we can do with the cursor (if enable is not set)
1287 	 */
1288 	if (!cursor->set)
1289 		return 0;
1290 
1291 	if (cursor->set & FB_CUR_SETHOT) {
1292 		pm2v_RDAC_WR(par, PM2VI_RD_CURSOR_X_HOT,
1293 			     cursor->hot.x & 0x3f);
1294 		pm2v_RDAC_WR(par, PM2VI_RD_CURSOR_Y_HOT,
1295 			     cursor->hot.y & 0x3f);
1296 	}
1297 
1298 	if (cursor->set & FB_CUR_SETCMAP) {
1299 		u32 fg_idx = cursor->image.fg_color;
1300 		u32 bg_idx = cursor->image.bg_color;
1301 		struct fb_cmap cmap = info->cmap;
1302 
1303 		/* the X11 driver says one should use these color registers */
1304 		pm2_WR(par, PM2VR_RD_INDEX_HIGH, PM2VI_RD_CURSOR_PALETTE >> 8);
1305 		pm2v_RDAC_WR(par, PM2VI_RD_CURSOR_PALETTE + 0,
1306 			     cmap.red[bg_idx] >> 8 );
1307 		pm2v_RDAC_WR(par, PM2VI_RD_CURSOR_PALETTE + 1,
1308 			     cmap.green[bg_idx] >> 8 );
1309 		pm2v_RDAC_WR(par, PM2VI_RD_CURSOR_PALETTE + 2,
1310 			     cmap.blue[bg_idx] >> 8 );
1311 
1312 		pm2v_RDAC_WR(par, PM2VI_RD_CURSOR_PALETTE + 3,
1313 			     cmap.red[fg_idx] >> 8 );
1314 		pm2v_RDAC_WR(par, PM2VI_RD_CURSOR_PALETTE + 4,
1315 			     cmap.green[fg_idx] >> 8 );
1316 		pm2v_RDAC_WR(par, PM2VI_RD_CURSOR_PALETTE + 5,
1317 			     cmap.blue[fg_idx] >> 8 );
1318 		pm2_WR(par, PM2VR_RD_INDEX_HIGH, 0);
1319 	}
1320 
1321 	if (cursor->set & (FB_CUR_SETSHAPE | FB_CUR_SETIMAGE)) {
1322 		u8 *bitmap = (u8 *)cursor->image.data;
1323 		u8 *mask = (u8 *)cursor->mask;
1324 		int i;
1325 		int pos = PM2VI_RD_CURSOR_PATTERN;
1326 
1327 		for (i = 0; i < cursor->image.height; i++) {
1328 			int j = (cursor->image.width + 7) >> 3;
1329 			int k = 8 - j;
1330 
1331 			pm2_WR(par, PM2VR_RD_INDEX_HIGH, pos >> 8);
1332 
1333 			for (; j > 0; j--) {
1334 				u8 data = *bitmap ^ *mask;
1335 
1336 				if (cursor->rop == ROP_COPY)
1337 					data = *mask & *bitmap;
1338 				/* Upper 4 bits of bitmap data */
1339 				pm2v_RDAC_WR(par, pos++,
1340 					cursor_bits_lookup[data >> 4] |
1341 					(cursor_bits_lookup[*mask >> 4] << 1));
1342 				/* Lower 4 bits of bitmap */
1343 				pm2v_RDAC_WR(par, pos++,
1344 					cursor_bits_lookup[data & 0xf] |
1345 					(cursor_bits_lookup[*mask & 0xf] << 1));
1346 				bitmap++;
1347 				mask++;
1348 			}
1349 			for (; k > 0; k--) {
1350 				pm2v_RDAC_WR(par, pos++, 0);
1351 				pm2v_RDAC_WR(par, pos++, 0);
1352 			}
1353 		}
1354 
1355 		while (pos < (1024 + PM2VI_RD_CURSOR_PATTERN)) {
1356 			pm2_WR(par, PM2VR_RD_INDEX_HIGH, pos >> 8);
1357 			pm2v_RDAC_WR(par, pos++, 0);
1358 		}
1359 
1360 		pm2_WR(par, PM2VR_RD_INDEX_HIGH, 0);
1361 	}
1362 	return 0;
1363 }
1364 
pm2fb_cursor(struct fb_info * info,struct fb_cursor * cursor)1365 static int pm2fb_cursor(struct fb_info *info, struct fb_cursor *cursor)
1366 {
1367 	struct pm2fb_par *par = info->par;
1368 	u8 mode;
1369 
1370 	if (!hwcursor)
1371 		return -EINVAL;	/* just to force soft_cursor() call */
1372 
1373 	/* Too large of a cursor or wrong bpp :-( */
1374 	if (cursor->image.width > 64 ||
1375 	    cursor->image.height > 64 ||
1376 	    cursor->image.depth > 1)
1377 		return -EINVAL;
1378 
1379 	if (par->type == PM2_TYPE_PERMEDIA2V)
1380 		return pm2vfb_cursor(info, cursor);
1381 
1382 	mode = 0x40;
1383 	if (cursor->enable)
1384 		 mode = 0x43;
1385 
1386 	pm2_RDAC_WR(par, PM2I_RD_CURSOR_CONTROL, mode);
1387 
1388 	/*
1389 	 * If the cursor is not be changed this means either we want the
1390 	 * current cursor state (if enable is set) or we want to query what
1391 	 * we can do with the cursor (if enable is not set)
1392 	 */
1393 	if (!cursor->set)
1394 		return 0;
1395 
1396 	if (cursor->set & FB_CUR_SETPOS) {
1397 		int x = cursor->image.dx - info->var.xoffset + 63;
1398 		int y = cursor->image.dy - info->var.yoffset + 63;
1399 
1400 		WAIT_FIFO(par, 4);
1401 		pm2_WR(par, PM2R_RD_CURSOR_X_LSB, x & 0xff);
1402 		pm2_WR(par, PM2R_RD_CURSOR_X_MSB, (x >> 8) & 0x7);
1403 		pm2_WR(par, PM2R_RD_CURSOR_Y_LSB, y & 0xff);
1404 		pm2_WR(par, PM2R_RD_CURSOR_Y_MSB, (y >> 8) & 0x7);
1405 	}
1406 
1407 	if (cursor->set & FB_CUR_SETCMAP) {
1408 		u32 fg_idx = cursor->image.fg_color;
1409 		u32 bg_idx = cursor->image.bg_color;
1410 
1411 		WAIT_FIFO(par, 7);
1412 		pm2_WR(par, PM2R_RD_CURSOR_COLOR_ADDRESS, 1);
1413 		pm2_WR(par, PM2R_RD_CURSOR_COLOR_DATA,
1414 			info->cmap.red[bg_idx] >> 8);
1415 		pm2_WR(par, PM2R_RD_CURSOR_COLOR_DATA,
1416 			info->cmap.green[bg_idx] >> 8);
1417 		pm2_WR(par, PM2R_RD_CURSOR_COLOR_DATA,
1418 			info->cmap.blue[bg_idx] >> 8);
1419 
1420 		pm2_WR(par, PM2R_RD_CURSOR_COLOR_DATA,
1421 			info->cmap.red[fg_idx] >> 8);
1422 		pm2_WR(par, PM2R_RD_CURSOR_COLOR_DATA,
1423 			info->cmap.green[fg_idx] >> 8);
1424 		pm2_WR(par, PM2R_RD_CURSOR_COLOR_DATA,
1425 			info->cmap.blue[fg_idx] >> 8);
1426 	}
1427 
1428 	if (cursor->set & (FB_CUR_SETSHAPE | FB_CUR_SETIMAGE)) {
1429 		u8 *bitmap = (u8 *)cursor->image.data;
1430 		u8 *mask = (u8 *)cursor->mask;
1431 		int i;
1432 
1433 		WAIT_FIFO(par, 1);
1434 		pm2_WR(par, PM2R_RD_PALETTE_WRITE_ADDRESS, 0);
1435 
1436 		for (i = 0; i < cursor->image.height; i++) {
1437 			int j = (cursor->image.width + 7) >> 3;
1438 			int k = 8 - j;
1439 
1440 			WAIT_FIFO(par, 8);
1441 			for (; j > 0; j--) {
1442 				u8 data = *bitmap ^ *mask;
1443 
1444 				if (cursor->rop == ROP_COPY)
1445 					data = *mask & *bitmap;
1446 				/* bitmap data */
1447 				pm2_WR(par, PM2R_RD_CURSOR_DATA, data);
1448 				bitmap++;
1449 				mask++;
1450 			}
1451 			for (; k > 0; k--)
1452 				pm2_WR(par, PM2R_RD_CURSOR_DATA, 0);
1453 		}
1454 		for (; i < 64; i++) {
1455 			int j = 8;
1456 			WAIT_FIFO(par, 8);
1457 			while (j-- > 0)
1458 				pm2_WR(par, PM2R_RD_CURSOR_DATA, 0);
1459 		}
1460 
1461 		mask = (u8 *)cursor->mask;
1462 		for (i = 0; i < cursor->image.height; i++) {
1463 			int j = (cursor->image.width + 7) >> 3;
1464 			int k = 8 - j;
1465 
1466 			WAIT_FIFO(par, 8);
1467 			for (; j > 0; j--) {
1468 				/* mask */
1469 				pm2_WR(par, PM2R_RD_CURSOR_DATA, *mask);
1470 				mask++;
1471 			}
1472 			for (; k > 0; k--)
1473 				pm2_WR(par, PM2R_RD_CURSOR_DATA, 0);
1474 		}
1475 		for (; i < 64; i++) {
1476 			int j = 8;
1477 			WAIT_FIFO(par, 8);
1478 			while (j-- > 0)
1479 				pm2_WR(par, PM2R_RD_CURSOR_DATA, 0);
1480 		}
1481 	}
1482 	return 0;
1483 }
1484 
1485 /* ------------ Hardware Independent Functions ------------ */
1486 
1487 /*
1488  *  Frame buffer operations
1489  */
1490 
1491 static struct fb_ops pm2fb_ops = {
1492 	.owner		= THIS_MODULE,
1493 	.fb_check_var	= pm2fb_check_var,
1494 	.fb_set_par	= pm2fb_set_par,
1495 	.fb_setcolreg	= pm2fb_setcolreg,
1496 	.fb_blank	= pm2fb_blank,
1497 	.fb_pan_display	= pm2fb_pan_display,
1498 	.fb_fillrect	= pm2fb_fillrect,
1499 	.fb_copyarea	= pm2fb_copyarea,
1500 	.fb_imageblit	= pm2fb_imageblit,
1501 	.fb_sync	= pm2fb_sync,
1502 	.fb_cursor	= pm2fb_cursor,
1503 };
1504 
1505 /*
1506  * PCI stuff
1507  */
1508 
1509 
1510 /**
1511  * Device initialisation
1512  *
1513  * Initialise and allocate resource for PCI device.
1514  *
1515  * @param	pdev	PCI device.
1516  * @param	id	PCI device ID.
1517  */
pm2fb_probe(struct pci_dev * pdev,const struct pci_device_id * id)1518 static int __devinit pm2fb_probe(struct pci_dev *pdev,
1519 				 const struct pci_device_id *id)
1520 {
1521 	struct pm2fb_par *default_par;
1522 	struct fb_info *info;
1523 	int err;
1524 	int retval = -ENXIO;
1525 
1526 	err = pci_enable_device(pdev);
1527 	if (err) {
1528 		printk(KERN_WARNING "pm2fb: Can't enable pdev: %d\n", err);
1529 		return err;
1530 	}
1531 
1532 	info = framebuffer_alloc(sizeof(struct pm2fb_par), &pdev->dev);
1533 	if (!info)
1534 		return -ENOMEM;
1535 	default_par = info->par;
1536 
1537 	switch (pdev->device) {
1538 	case  PCI_DEVICE_ID_TI_TVP4020:
1539 		strcpy(pm2fb_fix.id, "TVP4020");
1540 		default_par->type = PM2_TYPE_PERMEDIA2;
1541 		break;
1542 	case  PCI_DEVICE_ID_3DLABS_PERMEDIA2:
1543 		strcpy(pm2fb_fix.id, "Permedia2");
1544 		default_par->type = PM2_TYPE_PERMEDIA2;
1545 		break;
1546 	case  PCI_DEVICE_ID_3DLABS_PERMEDIA2V:
1547 		strcpy(pm2fb_fix.id, "Permedia2v");
1548 		default_par->type = PM2_TYPE_PERMEDIA2V;
1549 		break;
1550 	}
1551 
1552 	pm2fb_fix.mmio_start = pci_resource_start(pdev, 0);
1553 	pm2fb_fix.mmio_len = PM2_REGS_SIZE;
1554 
1555 #if defined(__BIG_ENDIAN)
1556 	/*
1557 	 * PM2 has a 64k register file, mapped twice in 128k. Lower
1558 	 * map is little-endian, upper map is big-endian.
1559 	 */
1560 	pm2fb_fix.mmio_start += PM2_REGS_SIZE;
1561 	DPRINTK("Adjusting register base for big-endian.\n");
1562 #endif
1563 	DPRINTK("Register base at 0x%lx\n", pm2fb_fix.mmio_start);
1564 
1565 	/* Registers - request region and map it. */
1566 	if (!request_mem_region(pm2fb_fix.mmio_start, pm2fb_fix.mmio_len,
1567 				"pm2fb regbase")) {
1568 		printk(KERN_WARNING "pm2fb: Can't reserve regbase.\n");
1569 		goto err_exit_neither;
1570 	}
1571 	default_par->v_regs =
1572 		ioremap_nocache(pm2fb_fix.mmio_start, pm2fb_fix.mmio_len);
1573 	if (!default_par->v_regs) {
1574 		printk(KERN_WARNING "pm2fb: Can't remap %s register area.\n",
1575 		       pm2fb_fix.id);
1576 		release_mem_region(pm2fb_fix.mmio_start, pm2fb_fix.mmio_len);
1577 		goto err_exit_neither;
1578 	}
1579 
1580 	/* Stash away memory register info for use when we reset the board */
1581 	default_par->mem_control = pm2_RD(default_par, PM2R_MEM_CONTROL);
1582 	default_par->boot_address = pm2_RD(default_par, PM2R_BOOT_ADDRESS);
1583 	default_par->mem_config = pm2_RD(default_par, PM2R_MEM_CONFIG);
1584 	DPRINTK("MemControl 0x%x BootAddress 0x%x MemConfig 0x%x\n",
1585 		default_par->mem_control, default_par->boot_address,
1586 		default_par->mem_config);
1587 
1588 	if (default_par->mem_control == 0 &&
1589 		default_par->boot_address == 0x31 &&
1590 		default_par->mem_config == 0x259fffff) {
1591 		default_par->memclock = CVPPC_MEMCLOCK;
1592 		default_par->mem_control = 0;
1593 		default_par->boot_address = 0x20;
1594 		default_par->mem_config = 0xe6002021;
1595 		if (pdev->subsystem_vendor == 0x1048 &&
1596 			pdev->subsystem_device == 0x0a31) {
1597 			DPRINTK("subsystem_vendor: %04x, "
1598 				"subsystem_device: %04x\n",
1599 				pdev->subsystem_vendor, pdev->subsystem_device);
1600 			DPRINTK("We have not been initialized by VGA BIOS and "
1601 				"are running on an Elsa Winner 2000 Office\n");
1602 			DPRINTK("Initializing card timings manually...\n");
1603 			default_par->memclock = 100000;
1604 		}
1605 		if (pdev->subsystem_vendor == 0x3d3d &&
1606 			pdev->subsystem_device == 0x0100) {
1607 			DPRINTK("subsystem_vendor: %04x, "
1608 				"subsystem_device: %04x\n",
1609 				pdev->subsystem_vendor, pdev->subsystem_device);
1610 			DPRINTK("We have not been initialized by VGA BIOS and "
1611 				"are running on an 3dlabs reference board\n");
1612 			DPRINTK("Initializing card timings manually...\n");
1613 			default_par->memclock = 74894;
1614 		}
1615 	}
1616 
1617 	/* Now work out how big lfb is going to be. */
1618 	switch (default_par->mem_config & PM2F_MEM_CONFIG_RAM_MASK) {
1619 	case PM2F_MEM_BANKS_1:
1620 		pm2fb_fix.smem_len = 0x200000;
1621 		break;
1622 	case PM2F_MEM_BANKS_2:
1623 		pm2fb_fix.smem_len = 0x400000;
1624 		break;
1625 	case PM2F_MEM_BANKS_3:
1626 		pm2fb_fix.smem_len = 0x600000;
1627 		break;
1628 	case PM2F_MEM_BANKS_4:
1629 		pm2fb_fix.smem_len = 0x800000;
1630 		break;
1631 	}
1632 	pm2fb_fix.smem_start = pci_resource_start(pdev, 1);
1633 
1634 	/* Linear frame buffer - request region and map it. */
1635 	if (!request_mem_region(pm2fb_fix.smem_start, pm2fb_fix.smem_len,
1636 				"pm2fb smem")) {
1637 		printk(KERN_WARNING "pm2fb: Can't reserve smem.\n");
1638 		goto err_exit_mmio;
1639 	}
1640 	info->screen_base =
1641 		ioremap_nocache(pm2fb_fix.smem_start, pm2fb_fix.smem_len);
1642 	if (!info->screen_base) {
1643 		printk(KERN_WARNING "pm2fb: Can't ioremap smem area.\n");
1644 		release_mem_region(pm2fb_fix.smem_start, pm2fb_fix.smem_len);
1645 		goto err_exit_mmio;
1646 	}
1647 
1648 #ifdef CONFIG_MTRR
1649 	default_par->mtrr_handle = -1;
1650 	if (!nomtrr)
1651 		default_par->mtrr_handle =
1652 			mtrr_add(pm2fb_fix.smem_start,
1653 				 pm2fb_fix.smem_len,
1654 				 MTRR_TYPE_WRCOMB, 1);
1655 #endif
1656 
1657 	info->fbops		= &pm2fb_ops;
1658 	info->fix		= pm2fb_fix;
1659 	info->pseudo_palette	= default_par->palette;
1660 	info->flags		= FBINFO_DEFAULT |
1661 				  FBINFO_HWACCEL_YPAN |
1662 				  FBINFO_HWACCEL_COPYAREA |
1663 				  FBINFO_HWACCEL_IMAGEBLIT |
1664 				  FBINFO_HWACCEL_FILLRECT;
1665 
1666 	info->pixmap.addr = kmalloc(PM2_PIXMAP_SIZE, GFP_KERNEL);
1667 	if (!info->pixmap.addr) {
1668 		retval = -ENOMEM;
1669 		goto err_exit_pixmap;
1670 	}
1671 	info->pixmap.size = PM2_PIXMAP_SIZE;
1672 	info->pixmap.buf_align = 4;
1673 	info->pixmap.scan_align = 4;
1674 	info->pixmap.access_align = 32;
1675 	info->pixmap.flags = FB_PIXMAP_SYSTEM;
1676 
1677 	if (noaccel) {
1678 		printk(KERN_DEBUG "disabling acceleration\n");
1679 		info->flags |= FBINFO_HWACCEL_DISABLED;
1680 		info->pixmap.scan_align = 1;
1681 	}
1682 
1683 	if (!mode_option)
1684 		mode_option = "640x480@60";
1685 
1686 	err = fb_find_mode(&info->var, info, mode_option, NULL, 0, NULL, 8);
1687 	if (!err || err == 4)
1688 		info->var = pm2fb_var;
1689 
1690 	retval = fb_alloc_cmap(&info->cmap, 256, 0);
1691 	if (retval < 0)
1692 		goto err_exit_both;
1693 
1694 	retval = register_framebuffer(info);
1695 	if (retval < 0)
1696 		goto err_exit_all;
1697 
1698 	printk(KERN_INFO "fb%d: %s frame buffer device, memory = %dK.\n",
1699 	       info->node, info->fix.id, pm2fb_fix.smem_len / 1024);
1700 
1701 	/*
1702 	 * Our driver data
1703 	 */
1704 	pci_set_drvdata(pdev, info);
1705 
1706 	return 0;
1707 
1708  err_exit_all:
1709 	fb_dealloc_cmap(&info->cmap);
1710  err_exit_both:
1711 	kfree(info->pixmap.addr);
1712  err_exit_pixmap:
1713 	iounmap(info->screen_base);
1714 	release_mem_region(pm2fb_fix.smem_start, pm2fb_fix.smem_len);
1715  err_exit_mmio:
1716 	iounmap(default_par->v_regs);
1717 	release_mem_region(pm2fb_fix.mmio_start, pm2fb_fix.mmio_len);
1718  err_exit_neither:
1719 	framebuffer_release(info);
1720 	return retval;
1721 }
1722 
1723 /**
1724  * Device removal.
1725  *
1726  * Release all device resources.
1727  *
1728  * @param	pdev	PCI device to clean up.
1729  */
pm2fb_remove(struct pci_dev * pdev)1730 static void __devexit pm2fb_remove(struct pci_dev *pdev)
1731 {
1732 	struct fb_info *info = pci_get_drvdata(pdev);
1733 	struct fb_fix_screeninfo *fix = &info->fix;
1734 	struct pm2fb_par *par = info->par;
1735 
1736 	unregister_framebuffer(info);
1737 
1738 #ifdef CONFIG_MTRR
1739 	if (par->mtrr_handle >= 0)
1740 		mtrr_del(par->mtrr_handle, info->fix.smem_start,
1741 			 info->fix.smem_len);
1742 #endif /* CONFIG_MTRR */
1743 	iounmap(info->screen_base);
1744 	release_mem_region(fix->smem_start, fix->smem_len);
1745 	iounmap(par->v_regs);
1746 	release_mem_region(fix->mmio_start, fix->mmio_len);
1747 
1748 	pci_set_drvdata(pdev, NULL);
1749 	fb_dealloc_cmap(&info->cmap);
1750 	kfree(info->pixmap.addr);
1751 	framebuffer_release(info);
1752 }
1753 
1754 static struct pci_device_id pm2fb_id_table[] = {
1755 	{ PCI_VENDOR_ID_TI, PCI_DEVICE_ID_TI_TVP4020,
1756 	  PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0 },
1757 	{ PCI_VENDOR_ID_3DLABS, PCI_DEVICE_ID_3DLABS_PERMEDIA2,
1758 	  PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0 },
1759 	{ PCI_VENDOR_ID_3DLABS, PCI_DEVICE_ID_3DLABS_PERMEDIA2V,
1760 	  PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0 },
1761 	{ 0, }
1762 };
1763 
1764 static struct pci_driver pm2fb_driver = {
1765 	.name		= "pm2fb",
1766 	.id_table	= pm2fb_id_table,
1767 	.probe		= pm2fb_probe,
1768 	.remove		= __devexit_p(pm2fb_remove),
1769 };
1770 
1771 MODULE_DEVICE_TABLE(pci, pm2fb_id_table);
1772 
1773 
1774 #ifndef MODULE
1775 /**
1776  * Parse user speficied options.
1777  *
1778  * This is, comma-separated options following `video=pm2fb:'.
1779  */
pm2fb_setup(char * options)1780 static int __init pm2fb_setup(char *options)
1781 {
1782 	char *this_opt;
1783 
1784 	if (!options || !*options)
1785 		return 0;
1786 
1787 	while ((this_opt = strsep(&options, ",")) != NULL) {
1788 		if (!*this_opt)
1789 			continue;
1790 		if (!strcmp(this_opt, "lowhsync"))
1791 			lowhsync = 1;
1792 		else if (!strcmp(this_opt, "lowvsync"))
1793 			lowvsync = 1;
1794 		else if (!strncmp(this_opt, "hwcursor=", 9))
1795 			hwcursor = simple_strtoul(this_opt + 9, NULL, 0);
1796 #ifdef CONFIG_MTRR
1797 		else if (!strncmp(this_opt, "nomtrr", 6))
1798 			nomtrr = 1;
1799 #endif
1800 		else if (!strncmp(this_opt, "noaccel", 7))
1801 			noaccel = 1;
1802 		else
1803 			mode_option = this_opt;
1804 	}
1805 	return 0;
1806 }
1807 #endif
1808 
1809 
pm2fb_init(void)1810 static int __init pm2fb_init(void)
1811 {
1812 #ifndef MODULE
1813 	char *option = NULL;
1814 
1815 	if (fb_get_options("pm2fb", &option))
1816 		return -ENODEV;
1817 	pm2fb_setup(option);
1818 #endif
1819 
1820 	return pci_register_driver(&pm2fb_driver);
1821 }
1822 
1823 module_init(pm2fb_init);
1824 
1825 #ifdef MODULE
1826 /*
1827  *  Cleanup
1828  */
1829 
pm2fb_exit(void)1830 static void __exit pm2fb_exit(void)
1831 {
1832 	pci_unregister_driver(&pm2fb_driver);
1833 }
1834 #endif
1835 
1836 #ifdef MODULE
1837 module_exit(pm2fb_exit);
1838 
1839 module_param(mode_option, charp, 0);
1840 MODULE_PARM_DESC(mode_option, "Initial video mode e.g. '648x480-8@60'");
1841 module_param_named(mode, mode_option, charp, 0);
1842 MODULE_PARM_DESC(mode, "Initial video mode e.g. '648x480-8@60' (deprecated)");
1843 module_param(lowhsync, bool, 0);
1844 MODULE_PARM_DESC(lowhsync, "Force horizontal sync low regardless of mode");
1845 module_param(lowvsync, bool, 0);
1846 MODULE_PARM_DESC(lowvsync, "Force vertical sync low regardless of mode");
1847 module_param(noaccel, bool, 0);
1848 MODULE_PARM_DESC(noaccel, "Disable acceleration");
1849 module_param(hwcursor, int, 0644);
1850 MODULE_PARM_DESC(hwcursor, "Enable hardware cursor "
1851 			"(1=enable, 0=disable, default=1)");
1852 #ifdef CONFIG_MTRR
1853 module_param(nomtrr, bool, 0);
1854 MODULE_PARM_DESC(nomtrr, "Disable MTRR support (0 or 1=disabled) (default=0)");
1855 #endif
1856 
1857 MODULE_AUTHOR("Jim Hague <jim.hague@acm.org>");
1858 MODULE_DESCRIPTION("Permedia2 framebuffer device driver");
1859 MODULE_LICENSE("GPL");
1860 #endif
1861