xref: /openbmc/linux/drivers/video/fbdev/sunxvr500.c (revision a2cce7a9)
1 /* sunxvr500.c: Sun 3DLABS XVR-500 Expert3D driver for sparc64 systems
2  *
3  * Copyright (C) 2007 David S. Miller (davem@davemloft.net)
4  */
5 
6 #include <linux/module.h>
7 #include <linux/kernel.h>
8 #include <linux/fb.h>
9 #include <linux/pci.h>
10 #include <linux/init.h>
11 #include <linux/of_device.h>
12 
13 #include <asm/io.h>
14 
15 /* XXX This device has a 'dev-comm' property which apparently is
16  * XXX a pointer into the openfirmware's address space which is
17  * XXX a shared area the kernel driver can use to keep OBP
18  * XXX informed about the current resolution setting.  The idea
19  * XXX is that the kernel can change resolutions, and as long
20  * XXX as the values in the 'dev-comm' area are accurate then
21  * XXX OBP can still render text properly to the console.
22  * XXX
23  * XXX I'm still working out the layout of this and whether there
24  * XXX are any signatures we need to look for etc.
25  */
26 struct e3d_info {
27 	struct fb_info		*info;
28 	struct pci_dev		*pdev;
29 
30 	spinlock_t		lock;
31 
32 	char __iomem		*fb_base;
33 	unsigned long		fb_base_phys;
34 
35 	unsigned long		fb8_buf_diff;
36 	unsigned long		regs_base_phys;
37 
38 	void __iomem		*ramdac;
39 
40 	struct device_node	*of_node;
41 
42 	unsigned int		width;
43 	unsigned int		height;
44 	unsigned int		depth;
45 	unsigned int		fb_size;
46 
47 	u32			fb_base_reg;
48 	u32			fb8_0_off;
49 	u32			fb8_1_off;
50 
51 	u32			pseudo_palette[16];
52 };
53 
54 static int e3d_get_props(struct e3d_info *ep)
55 {
56 	ep->width = of_getintprop_default(ep->of_node, "width", 0);
57 	ep->height = of_getintprop_default(ep->of_node, "height", 0);
58 	ep->depth = of_getintprop_default(ep->of_node, "depth", 8);
59 
60 	if (!ep->width || !ep->height) {
61 		printk(KERN_ERR "e3d: Critical properties missing for %s\n",
62 		       pci_name(ep->pdev));
63 		return -EINVAL;
64 	}
65 
66 	return 0;
67 }
68 
69 /* My XVR-500 comes up, at 1280x768 and a FB base register value of
70  * 0x04000000, the following video layout register values:
71  *
72  * RAMDAC_VID_WH	0x03ff04ff
73  * RAMDAC_VID_CFG	0x1a0b0088
74  * RAMDAC_VID_32FB_0	0x04000000
75  * RAMDAC_VID_32FB_1	0x04800000
76  * RAMDAC_VID_8FB_0	0x05000000
77  * RAMDAC_VID_8FB_1	0x05200000
78  * RAMDAC_VID_XXXFB	0x05400000
79  * RAMDAC_VID_YYYFB	0x05c00000
80  * RAMDAC_VID_ZZZFB	0x05e00000
81  */
82 /* Video layout registers */
83 #define RAMDAC_VID_WH		0x00000070UL /* (height-1)<<16 | (width-1) */
84 #define RAMDAC_VID_CFG		0x00000074UL /* 0x1a000088|(linesz_log2<<16) */
85 #define RAMDAC_VID_32FB_0	0x00000078UL /* PCI base 32bpp FB buffer 0 */
86 #define RAMDAC_VID_32FB_1	0x0000007cUL /* PCI base 32bpp FB buffer 1 */
87 #define RAMDAC_VID_8FB_0	0x00000080UL /* PCI base 8bpp FB buffer 0 */
88 #define RAMDAC_VID_8FB_1	0x00000084UL /* PCI base 8bpp FB buffer 1 */
89 #define RAMDAC_VID_XXXFB	0x00000088UL /* PCI base of XXX FB */
90 #define RAMDAC_VID_YYYFB	0x0000008cUL /* PCI base of YYY FB */
91 #define RAMDAC_VID_ZZZFB	0x00000090UL /* PCI base of ZZZ FB */
92 
93 /* CLUT registers */
94 #define RAMDAC_INDEX		0x000000bcUL
95 #define RAMDAC_DATA		0x000000c0UL
96 
97 static void e3d_clut_write(struct e3d_info *ep, int index, u32 val)
98 {
99 	void __iomem *ramdac = ep->ramdac;
100 	unsigned long flags;
101 
102 	spin_lock_irqsave(&ep->lock, flags);
103 
104 	writel(index, ramdac + RAMDAC_INDEX);
105 	writel(val, ramdac + RAMDAC_DATA);
106 
107 	spin_unlock_irqrestore(&ep->lock, flags);
108 }
109 
110 static int e3d_setcolreg(unsigned regno,
111 			 unsigned red, unsigned green, unsigned blue,
112 			 unsigned transp, struct fb_info *info)
113 {
114 	struct e3d_info *ep = info->par;
115 	u32 red_8, green_8, blue_8;
116 	u32 red_10, green_10, blue_10;
117 	u32 value;
118 
119 	if (regno >= 256)
120 		return 1;
121 
122 	red_8 = red >> 8;
123 	green_8 = green >> 8;
124 	blue_8 = blue >> 8;
125 
126 	value = (blue_8 << 24) | (green_8 << 16) | (red_8 << 8);
127 
128 	if (info->fix.visual == FB_VISUAL_TRUECOLOR && regno < 16)
129 		((u32 *)info->pseudo_palette)[regno] = value;
130 
131 
132 	red_10 = red >> 6;
133 	green_10 = green >> 6;
134 	blue_10 = blue >> 6;
135 
136 	value = (blue_10 << 20) | (green_10 << 10) | (red_10 << 0);
137 	e3d_clut_write(ep, regno, value);
138 
139 	return 0;
140 }
141 
142 /* XXX This is a bit of a hack.  I can't figure out exactly how the
143  * XXX two 8bpp areas of the framebuffer work.  I imagine there is
144  * XXX a WID attribute somewhere else in the framebuffer which tells
145  * XXX the ramdac which of the two 8bpp framebuffer regions to take
146  * XXX the pixel from.  So, for now, render into both regions to make
147  * XXX sure the pixel shows up.
148  */
149 static void e3d_imageblit(struct fb_info *info, const struct fb_image *image)
150 {
151 	struct e3d_info *ep = info->par;
152 	unsigned long flags;
153 
154 	spin_lock_irqsave(&ep->lock, flags);
155 	cfb_imageblit(info, image);
156 	info->screen_base += ep->fb8_buf_diff;
157 	cfb_imageblit(info, image);
158 	info->screen_base -= ep->fb8_buf_diff;
159 	spin_unlock_irqrestore(&ep->lock, flags);
160 }
161 
162 static void e3d_fillrect(struct fb_info *info, const struct fb_fillrect *rect)
163 {
164 	struct e3d_info *ep = info->par;
165 	unsigned long flags;
166 
167 	spin_lock_irqsave(&ep->lock, flags);
168 	cfb_fillrect(info, rect);
169 	info->screen_base += ep->fb8_buf_diff;
170 	cfb_fillrect(info, rect);
171 	info->screen_base -= ep->fb8_buf_diff;
172 	spin_unlock_irqrestore(&ep->lock, flags);
173 }
174 
175 static void e3d_copyarea(struct fb_info *info, const struct fb_copyarea *area)
176 {
177 	struct e3d_info *ep = info->par;
178 	unsigned long flags;
179 
180 	spin_lock_irqsave(&ep->lock, flags);
181 	cfb_copyarea(info, area);
182 	info->screen_base += ep->fb8_buf_diff;
183 	cfb_copyarea(info, area);
184 	info->screen_base -= ep->fb8_buf_diff;
185 	spin_unlock_irqrestore(&ep->lock, flags);
186 }
187 
188 static struct fb_ops e3d_ops = {
189 	.owner			= THIS_MODULE,
190 	.fb_setcolreg		= e3d_setcolreg,
191 	.fb_fillrect		= e3d_fillrect,
192 	.fb_copyarea		= e3d_copyarea,
193 	.fb_imageblit		= e3d_imageblit,
194 };
195 
196 static int e3d_set_fbinfo(struct e3d_info *ep)
197 {
198 	struct fb_info *info = ep->info;
199 	struct fb_var_screeninfo *var = &info->var;
200 
201 	info->flags = FBINFO_DEFAULT;
202 	info->fbops = &e3d_ops;
203 	info->screen_base = ep->fb_base;
204 	info->screen_size = ep->fb_size;
205 
206 	info->pseudo_palette = ep->pseudo_palette;
207 
208 	/* Fill fix common fields */
209 	strlcpy(info->fix.id, "e3d", sizeof(info->fix.id));
210         info->fix.smem_start = ep->fb_base_phys;
211         info->fix.smem_len = ep->fb_size;
212         info->fix.type = FB_TYPE_PACKED_PIXELS;
213 	if (ep->depth == 32 || ep->depth == 24)
214 		info->fix.visual = FB_VISUAL_TRUECOLOR;
215 	else
216 		info->fix.visual = FB_VISUAL_PSEUDOCOLOR;
217 
218 	var->xres = ep->width;
219 	var->yres = ep->height;
220 	var->xres_virtual = var->xres;
221 	var->yres_virtual = var->yres;
222 	var->bits_per_pixel = ep->depth;
223 
224 	var->red.offset = 8;
225 	var->red.length = 8;
226 	var->green.offset = 16;
227 	var->green.length = 8;
228 	var->blue.offset = 24;
229 	var->blue.length = 8;
230 	var->transp.offset = 0;
231 	var->transp.length = 0;
232 
233 	if (fb_alloc_cmap(&info->cmap, 256, 0)) {
234 		printk(KERN_ERR "e3d: Cannot allocate color map.\n");
235 		return -ENOMEM;
236 	}
237 
238         return 0;
239 }
240 
241 static int e3d_pci_register(struct pci_dev *pdev,
242 			    const struct pci_device_id *ent)
243 {
244 	struct device_node *of_node;
245 	const char *device_type;
246 	struct fb_info *info;
247 	struct e3d_info *ep;
248 	unsigned int line_length;
249 	int err;
250 
251 	of_node = pci_device_to_OF_node(pdev);
252 	if (!of_node) {
253 		printk(KERN_ERR "e3d: Cannot find OF node of %s\n",
254 		       pci_name(pdev));
255 		return -ENODEV;
256 	}
257 
258 	device_type = of_get_property(of_node, "device_type", NULL);
259 	if (!device_type) {
260 		printk(KERN_INFO "e3d: Ignoring secondary output device "
261 		       "at %s\n", pci_name(pdev));
262 		return -ENODEV;
263 	}
264 
265 	err = pci_enable_device(pdev);
266 	if (err < 0) {
267 		printk(KERN_ERR "e3d: Cannot enable PCI device %s\n",
268 		       pci_name(pdev));
269 		goto err_out;
270 	}
271 
272 	info = framebuffer_alloc(sizeof(struct e3d_info), &pdev->dev);
273 	if (!info) {
274 		printk(KERN_ERR "e3d: Cannot allocate fb_info\n");
275 		err = -ENOMEM;
276 		goto err_disable;
277 	}
278 
279 	ep = info->par;
280 	ep->info = info;
281 	ep->pdev = pdev;
282 	spin_lock_init(&ep->lock);
283 	ep->of_node = of_node;
284 
285 	/* Read the PCI base register of the frame buffer, which we
286 	 * need in order to interpret the RAMDAC_VID_*FB* values in
287 	 * the ramdac correctly.
288 	 */
289 	pci_read_config_dword(pdev, PCI_BASE_ADDRESS_0,
290 			      &ep->fb_base_reg);
291 	ep->fb_base_reg &= PCI_BASE_ADDRESS_MEM_MASK;
292 
293 	ep->regs_base_phys = pci_resource_start (pdev, 1);
294 	err = pci_request_region(pdev, 1, "e3d regs");
295 	if (err < 0) {
296 		printk("e3d: Cannot request region 1 for %s\n",
297 		       pci_name(pdev));
298 		goto err_release_fb;
299 	}
300 	ep->ramdac = ioremap(ep->regs_base_phys + 0x8000, 0x1000);
301 	if (!ep->ramdac) {
302 		err = -ENOMEM;
303 		goto err_release_pci1;
304 	}
305 
306 	ep->fb8_0_off = readl(ep->ramdac + RAMDAC_VID_8FB_0);
307 	ep->fb8_0_off -= ep->fb_base_reg;
308 
309 	ep->fb8_1_off = readl(ep->ramdac + RAMDAC_VID_8FB_1);
310 	ep->fb8_1_off -= ep->fb_base_reg;
311 
312 	ep->fb8_buf_diff = ep->fb8_1_off - ep->fb8_0_off;
313 
314 	ep->fb_base_phys = pci_resource_start (pdev, 0);
315 	ep->fb_base_phys += ep->fb8_0_off;
316 
317 	err = pci_request_region(pdev, 0, "e3d framebuffer");
318 	if (err < 0) {
319 		printk("e3d: Cannot request region 0 for %s\n",
320 		       pci_name(pdev));
321 		goto err_unmap_ramdac;
322 	}
323 
324 	err = e3d_get_props(ep);
325 	if (err)
326 		goto err_release_pci0;
327 
328 	line_length = (readl(ep->ramdac + RAMDAC_VID_CFG) >> 16) & 0xff;
329 	line_length = 1 << line_length;
330 
331 	switch (ep->depth) {
332 	case 8:
333 		info->fix.line_length = line_length;
334 		break;
335 	case 16:
336 		info->fix.line_length = line_length * 2;
337 		break;
338 	case 24:
339 		info->fix.line_length = line_length * 3;
340 		break;
341 	case 32:
342 		info->fix.line_length = line_length * 4;
343 		break;
344 	}
345 	ep->fb_size = info->fix.line_length * ep->height;
346 
347 	ep->fb_base = ioremap(ep->fb_base_phys, ep->fb_size);
348 	if (!ep->fb_base) {
349 		err = -ENOMEM;
350 		goto err_release_pci0;
351 	}
352 
353 	err = e3d_set_fbinfo(ep);
354 	if (err)
355 		goto err_unmap_fb;
356 
357 	pci_set_drvdata(pdev, info);
358 
359 	printk("e3d: Found device at %s\n", pci_name(pdev));
360 
361 	err = register_framebuffer(info);
362 	if (err < 0) {
363 		printk(KERN_ERR "e3d: Could not register framebuffer %s\n",
364 		       pci_name(pdev));
365 		goto err_free_cmap;
366 	}
367 
368 	return 0;
369 
370 err_free_cmap:
371 	fb_dealloc_cmap(&info->cmap);
372 
373 err_unmap_fb:
374 	iounmap(ep->fb_base);
375 
376 err_release_pci0:
377 	pci_release_region(pdev, 0);
378 
379 err_unmap_ramdac:
380 	iounmap(ep->ramdac);
381 
382 err_release_pci1:
383 	pci_release_region(pdev, 1);
384 
385 err_release_fb:
386         framebuffer_release(info);
387 
388 err_disable:
389 	pci_disable_device(pdev);
390 
391 err_out:
392 	return err;
393 }
394 
395 static void e3d_pci_unregister(struct pci_dev *pdev)
396 {
397 	struct fb_info *info = pci_get_drvdata(pdev);
398 	struct e3d_info *ep = info->par;
399 
400 	unregister_framebuffer(info);
401 
402 	iounmap(ep->ramdac);
403 	iounmap(ep->fb_base);
404 
405 	pci_release_region(pdev, 0);
406 	pci_release_region(pdev, 1);
407 
408 	fb_dealloc_cmap(&info->cmap);
409         framebuffer_release(info);
410 
411 	pci_disable_device(pdev);
412 }
413 
414 static struct pci_device_id e3d_pci_table[] = {
415 	{	PCI_DEVICE(PCI_VENDOR_ID_3DLABS, 0x7a0),	},
416 	{	PCI_DEVICE(0x1091, 0x7a0),			},
417 	{	PCI_DEVICE(PCI_VENDOR_ID_3DLABS, 0x7a2),	},
418 	{	.vendor = PCI_VENDOR_ID_3DLABS,
419 		.device = PCI_ANY_ID,
420 		.subvendor = PCI_VENDOR_ID_3DLABS,
421 		.subdevice = 0x0108,
422 	},
423 	{	.vendor = PCI_VENDOR_ID_3DLABS,
424 		.device = PCI_ANY_ID,
425 		.subvendor = PCI_VENDOR_ID_3DLABS,
426 		.subdevice = 0x0140,
427 	},
428 	{	.vendor = PCI_VENDOR_ID_3DLABS,
429 		.device = PCI_ANY_ID,
430 		.subvendor = PCI_VENDOR_ID_3DLABS,
431 		.subdevice = 0x1024,
432 	},
433 	{ 0, }
434 };
435 
436 static struct pci_driver e3d_driver = {
437 	.name		= "e3d",
438 	.id_table	= e3d_pci_table,
439 	.probe		= e3d_pci_register,
440 	.remove		= e3d_pci_unregister,
441 };
442 
443 static int __init e3d_init(void)
444 {
445 	if (fb_get_options("e3d", NULL))
446 		return -ENODEV;
447 
448 	return pci_register_driver(&e3d_driver);
449 }
450 
451 static void __exit e3d_exit(void)
452 {
453 	pci_unregister_driver(&e3d_driver);
454 }
455 
456 module_init(e3d_init);
457 module_exit(e3d_exit);
458 
459 MODULE_DESCRIPTION("framebuffer driver for Sun XVR-500 graphics");
460 MODULE_AUTHOR("David S. Miller <davem@davemloft.net>");
461 MODULE_VERSION("1.0");
462 MODULE_LICENSE("GPL");
463