1 /*
2  * Geode GX framebuffer driver.
3  *
4  *   Copyright (C) 2006 Arcom Control Systems Ltd.
5  *
6  *   This program is free software; you can redistribute it and/or modify it
7  *   under the terms of the GNU General Public License as published by the
8  *   Free Software Foundation; either version 2 of the License, or (at your
9  *   option) any later version.
10  *
11  *
12  * This driver assumes that the BIOS has created a virtual PCI device header
13  * for the video device. The PCI header is assumed to contain the following
14  * BARs:
15  *
16  *    BAR0 - framebuffer memory
17  *    BAR1 - graphics processor registers
18  *    BAR2 - display controller registers
19  *    BAR3 - video processor and flat panel control registers.
20  *
21  * 16 MiB of framebuffer memory is assumed to be available.
22  */
23 #include <linux/module.h>
24 #include <linux/kernel.h>
25 #include <linux/errno.h>
26 #include <linux/string.h>
27 #include <linux/mm.h>
28 #include <linux/delay.h>
29 #include <linux/fb.h>
30 #include <linux/console.h>
31 #include <linux/suspend.h>
32 #include <linux/init.h>
33 #include <linux/pci.h>
34 #include <linux/cs5535.h>
35 
36 #include "gxfb.h"
37 
38 static char *mode_option;
39 static int vram;
40 static int vt_switch;
41 
42 /* Modes relevant to the GX (taken from modedb.c) */
43 static struct fb_videomode gx_modedb[] = {
44 	/* 640x480-60 VESA */
45 	{ NULL, 60, 640, 480, 39682,  48, 16, 33, 10, 96, 2,
46 	  0, FB_VMODE_NONINTERLACED, FB_MODE_IS_VESA },
47 	/* 640x480-75 VESA */
48 	{ NULL, 75, 640, 480, 31746, 120, 16, 16, 01, 64, 3,
49 	  0, FB_VMODE_NONINTERLACED, FB_MODE_IS_VESA },
50 	/* 640x480-85 VESA */
51 	{ NULL, 85, 640, 480, 27777, 80, 56, 25, 01, 56, 3,
52 	  0, FB_VMODE_NONINTERLACED, FB_MODE_IS_VESA },
53 	/* 800x600-60 VESA */
54 	{ NULL, 60, 800, 600, 25000, 88, 40, 23, 01, 128, 4,
55 	  FB_SYNC_HOR_HIGH_ACT | FB_SYNC_VERT_HIGH_ACT,
56 	  FB_VMODE_NONINTERLACED, FB_MODE_IS_VESA },
57 	/* 800x600-75 VESA */
58 	{ NULL, 75, 800, 600, 20202, 160, 16, 21, 01, 80, 3,
59 	  FB_SYNC_HOR_HIGH_ACT | FB_SYNC_VERT_HIGH_ACT,
60 	  FB_VMODE_NONINTERLACED, FB_MODE_IS_VESA },
61 	/* 800x600-85 VESA */
62 	{ NULL, 85, 800, 600, 17761, 152, 32, 27, 01, 64, 3,
63 	  FB_SYNC_HOR_HIGH_ACT | FB_SYNC_VERT_HIGH_ACT,
64 	  FB_VMODE_NONINTERLACED, FB_MODE_IS_VESA },
65 	/* 1024x768-60 VESA */
66 	{ NULL, 60, 1024, 768, 15384, 160, 24, 29, 3, 136, 6,
67 	  0, FB_VMODE_NONINTERLACED, FB_MODE_IS_VESA },
68 	/* 1024x768-75 VESA */
69 	{ NULL, 75, 1024, 768, 12690, 176, 16, 28, 1, 96, 3,
70 	  FB_SYNC_HOR_HIGH_ACT | FB_SYNC_VERT_HIGH_ACT,
71 	  FB_VMODE_NONINTERLACED, FB_MODE_IS_VESA },
72 	/* 1024x768-85 VESA */
73 	{ NULL, 85, 1024, 768, 10582, 208, 48, 36, 1, 96, 3,
74 	  FB_SYNC_HOR_HIGH_ACT | FB_SYNC_VERT_HIGH_ACT,
75 	  FB_VMODE_NONINTERLACED, FB_MODE_IS_VESA },
76 	/* 1280x960-60 VESA */
77 	{ NULL, 60, 1280, 960, 9259, 312, 96, 36, 1, 112, 3,
78 	  FB_SYNC_HOR_HIGH_ACT | FB_SYNC_VERT_HIGH_ACT,
79 	  FB_VMODE_NONINTERLACED, FB_MODE_IS_VESA },
80 	/* 1280x960-85 VESA */
81 	{ NULL, 85, 1280, 960, 6734, 224, 64, 47, 1, 160, 3,
82 	  FB_SYNC_HOR_HIGH_ACT | FB_SYNC_VERT_HIGH_ACT,
83 	  FB_VMODE_NONINTERLACED, FB_MODE_IS_VESA },
84 	/* 1280x1024-60 VESA */
85 	{ NULL, 60, 1280, 1024, 9259, 248, 48, 38, 1, 112, 3,
86 	  FB_SYNC_HOR_HIGH_ACT | FB_SYNC_VERT_HIGH_ACT,
87 	  FB_VMODE_NONINTERLACED, FB_MODE_IS_VESA },
88 	/* 1280x1024-75 VESA */
89 	{ NULL, 75, 1280, 1024, 7407, 248, 16, 38, 1, 144, 3,
90 	  FB_SYNC_HOR_HIGH_ACT | FB_SYNC_VERT_HIGH_ACT,
91 	  FB_VMODE_NONINTERLACED, FB_MODE_IS_VESA },
92 	/* 1280x1024-85 VESA */
93 	{ NULL, 85, 1280, 1024, 6349, 224, 64, 44, 1, 160, 3,
94 	  FB_SYNC_HOR_HIGH_ACT | FB_SYNC_VERT_HIGH_ACT,
95 	  FB_VMODE_NONINTERLACED, FB_MODE_IS_VESA },
96 	/* 1600x1200-60 VESA */
97 	{ NULL, 60, 1600, 1200, 6172, 304, 64, 46, 1, 192, 3,
98 	  FB_SYNC_HOR_HIGH_ACT | FB_SYNC_VERT_HIGH_ACT,
99 	  FB_VMODE_NONINTERLACED, FB_MODE_IS_VESA },
100 	/* 1600x1200-75 VESA */
101 	{ NULL, 75, 1600, 1200, 4938, 304, 64, 46, 1, 192, 3,
102 	  FB_SYNC_HOR_HIGH_ACT | FB_SYNC_VERT_HIGH_ACT,
103 	  FB_VMODE_NONINTERLACED, FB_MODE_IS_VESA },
104 	/* 1600x1200-85 VESA */
105 	{ NULL, 85, 1600, 1200, 4357, 304, 64, 46, 1, 192, 3,
106 	  FB_SYNC_HOR_HIGH_ACT | FB_SYNC_VERT_HIGH_ACT,
107 	  FB_VMODE_NONINTERLACED, FB_MODE_IS_VESA },
108 };
109 
110 #ifdef CONFIG_OLPC
111 #include <asm/olpc.h>
112 
113 static struct fb_videomode gx_dcon_modedb[] = {
114 	/* The only mode the DCON has is 1200x900 */
115 	{ NULL, 50, 1200, 900, 17460, 24, 8, 4, 5, 8, 3,
116 	  FB_SYNC_HOR_HIGH_ACT | FB_SYNC_VERT_HIGH_ACT,
117 	  FB_VMODE_NONINTERLACED, 0 }
118 };
119 
120 static void get_modedb(struct fb_videomode **modedb, unsigned int *size)
121 {
122 	if (olpc_has_dcon()) {
123 		*modedb = (struct fb_videomode *) gx_dcon_modedb;
124 		*size = ARRAY_SIZE(gx_dcon_modedb);
125 	} else {
126 		*modedb = (struct fb_videomode *) gx_modedb;
127 		*size = ARRAY_SIZE(gx_modedb);
128 	}
129 }
130 
131 #else
132 static void get_modedb(struct fb_videomode **modedb, unsigned int *size)
133 {
134 	*modedb = (struct fb_videomode *) gx_modedb;
135 	*size = ARRAY_SIZE(gx_modedb);
136 }
137 #endif
138 
139 static int gxfb_check_var(struct fb_var_screeninfo *var, struct fb_info *info)
140 {
141 	if (var->xres > 1600 || var->yres > 1200)
142 		return -EINVAL;
143 	if ((var->xres > 1280 || var->yres > 1024) && var->bits_per_pixel > 16)
144 		return -EINVAL;
145 
146 	if (var->bits_per_pixel == 32) {
147 		var->red.offset   = 16; var->red.length   = 8;
148 		var->green.offset =  8; var->green.length = 8;
149 		var->blue.offset  =  0; var->blue.length  = 8;
150 	} else if (var->bits_per_pixel == 16) {
151 		var->red.offset   = 11; var->red.length   = 5;
152 		var->green.offset =  5; var->green.length = 6;
153 		var->blue.offset  =  0; var->blue.length  = 5;
154 	} else if (var->bits_per_pixel == 8) {
155 		var->red.offset   = 0; var->red.length   = 8;
156 		var->green.offset = 0; var->green.length = 8;
157 		var->blue.offset  = 0; var->blue.length  = 8;
158 	} else
159 		return -EINVAL;
160 	var->transp.offset = 0; var->transp.length = 0;
161 
162 	/* Enough video memory? */
163 	if (gx_line_delta(var->xres, var->bits_per_pixel) * var->yres > info->fix.smem_len)
164 		return -EINVAL;
165 
166 	/* FIXME: Check timing parameters here? */
167 
168 	return 0;
169 }
170 
171 static int gxfb_set_par(struct fb_info *info)
172 {
173 	if (info->var.bits_per_pixel > 8)
174 		info->fix.visual = FB_VISUAL_TRUECOLOR;
175 	else
176 		info->fix.visual = FB_VISUAL_PSEUDOCOLOR;
177 
178 	info->fix.line_length = gx_line_delta(info->var.xres, info->var.bits_per_pixel);
179 
180 	gx_set_mode(info);
181 
182 	return 0;
183 }
184 
185 static inline u_int chan_to_field(u_int chan, struct fb_bitfield *bf)
186 {
187 	chan &= 0xffff;
188 	chan >>= 16 - bf->length;
189 	return chan << bf->offset;
190 }
191 
192 static int gxfb_setcolreg(unsigned regno, unsigned red, unsigned green,
193 			   unsigned blue, unsigned transp,
194 			   struct fb_info *info)
195 {
196 	if (info->var.grayscale) {
197 		/* grayscale = 0.30*R + 0.59*G + 0.11*B */
198 		red = green = blue = (red * 77 + green * 151 + blue * 28) >> 8;
199 	}
200 
201 	/* Truecolor has hardware independent palette */
202 	if (info->fix.visual == FB_VISUAL_TRUECOLOR) {
203 		u32 *pal = info->pseudo_palette;
204 		u32 v;
205 
206 		if (regno >= 16)
207 			return -EINVAL;
208 
209 		v  = chan_to_field(red, &info->var.red);
210 		v |= chan_to_field(green, &info->var.green);
211 		v |= chan_to_field(blue, &info->var.blue);
212 
213 		pal[regno] = v;
214 	} else {
215 		if (regno >= 256)
216 			return -EINVAL;
217 
218 		gx_set_hw_palette_reg(info, regno, red, green, blue);
219 	}
220 
221 	return 0;
222 }
223 
224 static int gxfb_blank(int blank_mode, struct fb_info *info)
225 {
226 	return gx_blank_display(info, blank_mode);
227 }
228 
229 static int gxfb_map_video_memory(struct fb_info *info, struct pci_dev *dev)
230 {
231 	struct gxfb_par *par = info->par;
232 	int ret;
233 
234 	ret = pci_enable_device(dev);
235 	if (ret < 0)
236 		return ret;
237 
238 	ret = pci_request_region(dev, 3, "gxfb (video processor)");
239 	if (ret < 0)
240 		return ret;
241 	par->vid_regs = pci_ioremap_bar(dev, 3);
242 	if (!par->vid_regs)
243 		return -ENOMEM;
244 
245 	ret = pci_request_region(dev, 2, "gxfb (display controller)");
246 	if (ret < 0)
247 		return ret;
248 	par->dc_regs = pci_ioremap_bar(dev, 2);
249 	if (!par->dc_regs)
250 		return -ENOMEM;
251 
252 	ret = pci_request_region(dev, 1, "gxfb (graphics processor)");
253 	if (ret < 0)
254 		return ret;
255 	par->gp_regs = pci_ioremap_bar(dev, 1);
256 
257 	if (!par->gp_regs)
258 		return -ENOMEM;
259 
260 	ret = pci_request_region(dev, 0, "gxfb (framebuffer)");
261 	if (ret < 0)
262 		return ret;
263 
264 	info->fix.smem_start = pci_resource_start(dev, 0);
265 	info->fix.smem_len = vram ? vram : gx_frame_buffer_size();
266 	info->screen_base = ioremap(info->fix.smem_start, info->fix.smem_len);
267 	if (!info->screen_base)
268 		return -ENOMEM;
269 
270 	/* Set the 16MiB aligned base address of the graphics memory region
271 	 * in the display controller */
272 
273 	write_dc(par, DC_GLIU0_MEM_OFFSET, info->fix.smem_start & 0xFF000000);
274 
275 	dev_info(&dev->dev, "%d KiB of video memory at 0x%lx\n",
276 		 info->fix.smem_len / 1024, info->fix.smem_start);
277 
278 	return 0;
279 }
280 
281 static struct fb_ops gxfb_ops = {
282 	.owner		= THIS_MODULE,
283 	.fb_check_var	= gxfb_check_var,
284 	.fb_set_par	= gxfb_set_par,
285 	.fb_setcolreg	= gxfb_setcolreg,
286 	.fb_blank       = gxfb_blank,
287 	/* No HW acceleration for now. */
288 	.fb_fillrect	= cfb_fillrect,
289 	.fb_copyarea	= cfb_copyarea,
290 	.fb_imageblit	= cfb_imageblit,
291 };
292 
293 static struct fb_info *gxfb_init_fbinfo(struct device *dev)
294 {
295 	struct gxfb_par *par;
296 	struct fb_info *info;
297 
298 	/* Alloc enough space for the pseudo palette. */
299 	info = framebuffer_alloc(sizeof(struct gxfb_par) + sizeof(u32) * 16,
300 			dev);
301 	if (!info)
302 		return NULL;
303 
304 	par = info->par;
305 
306 	strcpy(info->fix.id, "Geode GX");
307 
308 	info->fix.type		= FB_TYPE_PACKED_PIXELS;
309 	info->fix.type_aux	= 0;
310 	info->fix.xpanstep	= 0;
311 	info->fix.ypanstep	= 0;
312 	info->fix.ywrapstep	= 0;
313 	info->fix.accel		= FB_ACCEL_NONE;
314 
315 	info->var.nonstd	= 0;
316 	info->var.activate	= FB_ACTIVATE_NOW;
317 	info->var.height	= -1;
318 	info->var.width	= -1;
319 	info->var.accel_flags = 0;
320 	info->var.vmode	= FB_VMODE_NONINTERLACED;
321 
322 	info->fbops		= &gxfb_ops;
323 	info->flags		= FBINFO_DEFAULT;
324 	info->node		= -1;
325 
326 	info->pseudo_palette	= (void *)par + sizeof(struct gxfb_par);
327 
328 	info->var.grayscale	= 0;
329 
330 	if (fb_alloc_cmap(&info->cmap, 256, 0) < 0) {
331 		framebuffer_release(info);
332 		return NULL;
333 	}
334 
335 	return info;
336 }
337 
338 #ifdef CONFIG_PM
339 static int gxfb_suspend(struct pci_dev *pdev, pm_message_t state)
340 {
341 	struct fb_info *info = pci_get_drvdata(pdev);
342 
343 	if (state.event == PM_EVENT_SUSPEND) {
344 		console_lock();
345 		gx_powerdown(info);
346 		fb_set_suspend(info, 1);
347 		console_unlock();
348 	}
349 
350 	/* there's no point in setting PCI states; we emulate PCI, so
351 	 * we don't end up getting power savings anyways */
352 
353 	return 0;
354 }
355 
356 static int gxfb_resume(struct pci_dev *pdev)
357 {
358 	struct fb_info *info = pci_get_drvdata(pdev);
359 	int ret;
360 
361 	console_lock();
362 	ret = gx_powerup(info);
363 	if (ret) {
364 		printk(KERN_ERR "gxfb:  power up failed!\n");
365 		return ret;
366 	}
367 
368 	fb_set_suspend(info, 0);
369 	console_unlock();
370 	return 0;
371 }
372 #endif
373 
374 static int gxfb_probe(struct pci_dev *pdev, const struct pci_device_id *id)
375 {
376 	struct gxfb_par *par;
377 	struct fb_info *info;
378 	int ret;
379 	unsigned long val;
380 
381 	struct fb_videomode *modedb_ptr;
382 	unsigned int modedb_size;
383 
384 	info = gxfb_init_fbinfo(&pdev->dev);
385 	if (!info)
386 		return -ENOMEM;
387 	par = info->par;
388 
389 	if ((ret = gxfb_map_video_memory(info, pdev)) < 0) {
390 		dev_err(&pdev->dev, "failed to map frame buffer or controller registers\n");
391 		goto err;
392 	}
393 
394 	/* Figure out if this is a TFT or CRT part */
395 
396 	rdmsrl(MSR_GX_GLD_MSR_CONFIG, val);
397 
398 	if ((val & MSR_GX_GLD_MSR_CONFIG_FP) == MSR_GX_GLD_MSR_CONFIG_FP)
399 		par->enable_crt = 0;
400 	else
401 		par->enable_crt = 1;
402 
403 	get_modedb(&modedb_ptr, &modedb_size);
404 	ret = fb_find_mode(&info->var, info, mode_option,
405 			   modedb_ptr, modedb_size, NULL, 16);
406 	if (ret == 0 || ret == 4) {
407 		dev_err(&pdev->dev, "could not find valid video mode\n");
408 		ret = -EINVAL;
409 		goto err;
410 	}
411 
412 
413 	/* Clear the frame buffer of garbage. */
414         memset_io(info->screen_base, 0, info->fix.smem_len);
415 
416 	gxfb_check_var(&info->var, info);
417 	gxfb_set_par(info);
418 
419 	pm_set_vt_switch(vt_switch);
420 
421 	if (register_framebuffer(info) < 0) {
422 		ret = -EINVAL;
423 		goto err;
424 	}
425 	pci_set_drvdata(pdev, info);
426 	fb_info(info, "%s frame buffer device\n", info->fix.id);
427 	return 0;
428 
429   err:
430 	if (info->screen_base) {
431 		iounmap(info->screen_base);
432 		pci_release_region(pdev, 0);
433 	}
434 	if (par->vid_regs) {
435 		iounmap(par->vid_regs);
436 		pci_release_region(pdev, 3);
437 	}
438 	if (par->dc_regs) {
439 		iounmap(par->dc_regs);
440 		pci_release_region(pdev, 2);
441 	}
442 	if (par->gp_regs) {
443 		iounmap(par->gp_regs);
444 		pci_release_region(pdev, 1);
445 	}
446 
447 	if (info) {
448 		fb_dealloc_cmap(&info->cmap);
449 		framebuffer_release(info);
450 	}
451 	return ret;
452 }
453 
454 static void gxfb_remove(struct pci_dev *pdev)
455 {
456 	struct fb_info *info = pci_get_drvdata(pdev);
457 	struct gxfb_par *par = info->par;
458 
459 	unregister_framebuffer(info);
460 
461 	iounmap((void __iomem *)info->screen_base);
462 	pci_release_region(pdev, 0);
463 
464 	iounmap(par->vid_regs);
465 	pci_release_region(pdev, 3);
466 
467 	iounmap(par->dc_regs);
468 	pci_release_region(pdev, 2);
469 
470 	iounmap(par->gp_regs);
471 	pci_release_region(pdev, 1);
472 
473 	fb_dealloc_cmap(&info->cmap);
474 
475 	framebuffer_release(info);
476 }
477 
478 static struct pci_device_id gxfb_id_table[] = {
479 	{ PCI_DEVICE(PCI_VENDOR_ID_NS, PCI_DEVICE_ID_NS_GX_VIDEO) },
480 	{ 0, }
481 };
482 
483 MODULE_DEVICE_TABLE(pci, gxfb_id_table);
484 
485 static struct pci_driver gxfb_driver = {
486 	.name		= "gxfb",
487 	.id_table	= gxfb_id_table,
488 	.probe		= gxfb_probe,
489 	.remove		= gxfb_remove,
490 #ifdef CONFIG_PM
491 	.suspend	= gxfb_suspend,
492 	.resume		= gxfb_resume,
493 #endif
494 };
495 
496 #ifndef MODULE
497 static int __init gxfb_setup(char *options)
498 {
499 
500 	char *opt;
501 
502 	if (!options || !*options)
503 		return 0;
504 
505 	while ((opt = strsep(&options, ",")) != NULL) {
506 		if (!*opt)
507 			continue;
508 
509 		mode_option = opt;
510 	}
511 
512 	return 0;
513 }
514 #endif
515 
516 static int __init gxfb_init(void)
517 {
518 #ifndef MODULE
519 	char *option = NULL;
520 
521 	if (fb_get_options("gxfb", &option))
522 		return -ENODEV;
523 
524 	gxfb_setup(option);
525 #endif
526 	return pci_register_driver(&gxfb_driver);
527 }
528 
529 static void __exit gxfb_cleanup(void)
530 {
531 	pci_unregister_driver(&gxfb_driver);
532 }
533 
534 module_init(gxfb_init);
535 module_exit(gxfb_cleanup);
536 
537 module_param(mode_option, charp, 0);
538 MODULE_PARM_DESC(mode_option, "video mode (<x>x<y>[-<bpp>][@<refr>])");
539 
540 module_param(vram, int, 0);
541 MODULE_PARM_DESC(vram, "video memory size");
542 
543 module_param(vt_switch, int, 0);
544 MODULE_PARM_DESC(vt_switch, "enable VT switch during suspend/resume");
545 
546 MODULE_DESCRIPTION("Framebuffer driver for the AMD Geode GX");
547 MODULE_LICENSE("GPL");
548