1/*
2 *  linux/drivers/video/tgafb.c -- DEC 21030 TGA frame buffer device
3 *
4 *	Copyright (C) 1995 Jay Estabrook
5 *	Copyright (C) 1997 Geert Uytterhoeven
6 *	Copyright (C) 1999,2000 Martin Lucina, Tom Zerucha
7 *	Copyright (C) 2002 Richard Henderson
8 *	Copyright (C) 2006, 2007  Maciej W. Rozycki
9 *
10 *  This file is subject to the terms and conditions of the GNU General Public
11 *  License. See the file COPYING in the main directory of this archive for
12 *  more details.
13 */
14
15#include <linux/aperture.h>
16#include <linux/bitrev.h>
17#include <linux/compiler.h>
18#include <linux/delay.h>
19#include <linux/device.h>
20#include <linux/errno.h>
21#include <linux/fb.h>
22#include <linux/init.h>
23#include <linux/ioport.h>
24#include <linux/kernel.h>
25#include <linux/mm.h>
26#include <linux/module.h>
27#include <linux/pci.h>
28#include <linux/selection.h>
29#include <linux/string.h>
30#include <linux/tc.h>
31
32#include <asm/io.h>
33
34#include <video/tgafb.h>
35
36#ifdef CONFIG_TC
37#define TGA_BUS_TC(dev) (dev->bus == &tc_bus_type)
38#else
39#define TGA_BUS_TC(dev) 0
40#endif
41
42/*
43 * Local functions.
44 */
45
46static int tgafb_check_var(struct fb_var_screeninfo *, struct fb_info *);
47static int tgafb_set_par(struct fb_info *);
48static void tgafb_set_pll(struct tga_par *, int);
49static int tgafb_setcolreg(unsigned, unsigned, unsigned, unsigned,
50			   unsigned, struct fb_info *);
51static int tgafb_blank(int, struct fb_info *);
52static void tgafb_init_fix(struct fb_info *);
53
54static void tgafb_imageblit(struct fb_info *, const struct fb_image *);
55static void tgafb_fillrect(struct fb_info *, const struct fb_fillrect *);
56static void tgafb_copyarea(struct fb_info *, const struct fb_copyarea *);
57static int tgafb_pan_display(struct fb_var_screeninfo *var, struct fb_info *info);
58
59static int tgafb_register(struct device *dev);
60static void tgafb_unregister(struct device *dev);
61
62static const char *mode_option;
63static const char *mode_option_pci = "640x480@60";
64static const char *mode_option_tc = "1280x1024@72";
65
66
67static struct pci_driver tgafb_pci_driver;
68static struct tc_driver tgafb_tc_driver;
69
70/*
71 *  Frame buffer operations
72 */
73
74static const struct fb_ops tgafb_ops = {
75	.owner			= THIS_MODULE,
76	.fb_check_var		= tgafb_check_var,
77	.fb_set_par		= tgafb_set_par,
78	.fb_setcolreg		= tgafb_setcolreg,
79	.fb_blank		= tgafb_blank,
80	.fb_pan_display		= tgafb_pan_display,
81	.fb_fillrect		= tgafb_fillrect,
82	.fb_copyarea		= tgafb_copyarea,
83	.fb_imageblit		= tgafb_imageblit,
84};
85
86
87#ifdef CONFIG_PCI
88/*
89 *  PCI registration operations
90 */
91static int tgafb_pci_register(struct pci_dev *, const struct pci_device_id *);
92static void tgafb_pci_unregister(struct pci_dev *);
93
94static struct pci_device_id const tgafb_pci_table[] = {
95	{ PCI_DEVICE(PCI_VENDOR_ID_DEC, PCI_DEVICE_ID_DEC_TGA) },
96	{ }
97};
98MODULE_DEVICE_TABLE(pci, tgafb_pci_table);
99
100static struct pci_driver tgafb_pci_driver = {
101	.name			= "tgafb",
102	.id_table		= tgafb_pci_table,
103	.probe			= tgafb_pci_register,
104	.remove			= tgafb_pci_unregister,
105};
106
107static int tgafb_pci_register(struct pci_dev *pdev,
108			      const struct pci_device_id *ent)
109{
110	int ret;
111
112	ret = aperture_remove_conflicting_pci_devices(pdev, "tgafb");
113	if (ret)
114		return ret;
115
116	return tgafb_register(&pdev->dev);
117}
118
119static void tgafb_pci_unregister(struct pci_dev *pdev)
120{
121	tgafb_unregister(&pdev->dev);
122}
123#endif /* CONFIG_PCI */
124
125#ifdef CONFIG_TC
126/*
127 *  TC registration operations
128 */
129static int tgafb_tc_register(struct device *);
130static int tgafb_tc_unregister(struct device *);
131
132static struct tc_device_id const tgafb_tc_table[] = {
133	{ "DEC     ", "PMAGD-AA" },
134	{ "DEC     ", "PMAGD   " },
135	{ }
136};
137MODULE_DEVICE_TABLE(tc, tgafb_tc_table);
138
139static struct tc_driver tgafb_tc_driver = {
140	.id_table		= tgafb_tc_table,
141	.driver			= {
142		.name		= "tgafb",
143		.bus		= &tc_bus_type,
144		.probe		= tgafb_tc_register,
145		.remove		= tgafb_tc_unregister,
146	},
147};
148
149static int tgafb_tc_register(struct device *dev)
150{
151	int status = tgafb_register(dev);
152	if (!status)
153		get_device(dev);
154	return status;
155}
156
157static int tgafb_tc_unregister(struct device *dev)
158{
159	put_device(dev);
160	tgafb_unregister(dev);
161	return 0;
162}
163#endif /* CONFIG_TC */
164
165
166/**
167 *      tgafb_check_var - Optional function.  Validates a var passed in.
168 *      @var: frame buffer variable screen structure
169 *      @info: frame buffer structure that represents a single frame buffer
170 */
171static int
172tgafb_check_var(struct fb_var_screeninfo *var, struct fb_info *info)
173{
174	struct tga_par *par = (struct tga_par *)info->par;
175
176	if (!var->pixclock)
177		return -EINVAL;
178
179	if (par->tga_type == TGA_TYPE_8PLANE) {
180		if (var->bits_per_pixel != 8)
181			return -EINVAL;
182	} else {
183		if (var->bits_per_pixel != 32)
184			return -EINVAL;
185	}
186	var->red.length = var->green.length = var->blue.length = 8;
187	if (var->bits_per_pixel == 32) {
188		var->red.offset = 16;
189		var->green.offset = 8;
190		var->blue.offset = 0;
191	}
192
193	if (var->xres_virtual != var->xres || var->yres_virtual != var->yres)
194		return -EINVAL;
195	if (var->xres * var->yres * (var->bits_per_pixel >> 3) > info->fix.smem_len)
196		return -EINVAL;
197	if (var->nonstd)
198		return -EINVAL;
199	if (1000000000 / var->pixclock > TGA_PLL_MAX_FREQ)
200		return -EINVAL;
201	if ((var->vmode & FB_VMODE_MASK) != FB_VMODE_NONINTERLACED)
202		return -EINVAL;
203
204	/* Some of the acceleration routines assume the line width is
205	   a multiple of 8 bytes.  */
206	if (var->xres * (par->tga_type == TGA_TYPE_8PLANE ? 1 : 4) % 8)
207		return -EINVAL;
208
209	return 0;
210}
211
212/**
213 *      tgafb_set_par - Optional function.  Alters the hardware state.
214 *      @info: frame buffer structure that represents a single frame buffer
215 */
216static int
217tgafb_set_par(struct fb_info *info)
218{
219	static unsigned int const deep_presets[4] = {
220		0x00004000,
221		0x0000440d,
222		0xffffffff,
223		0x0000441d
224	};
225	static unsigned int const rasterop_presets[4] = {
226		0x00000003,
227		0x00000303,
228		0xffffffff,
229		0x00000303
230	};
231	static unsigned int const mode_presets[4] = {
232		0x00000000,
233		0x00000300,
234		0xffffffff,
235		0x00000300
236	};
237	static unsigned int const base_addr_presets[4] = {
238		0x00000000,
239		0x00000001,
240		0xffffffff,
241		0x00000001
242	};
243
244	struct tga_par *par = (struct tga_par *) info->par;
245	int tga_bus_pci = dev_is_pci(par->dev);
246	int tga_bus_tc = TGA_BUS_TC(par->dev);
247	u32 htimings, vtimings, pll_freq;
248	u8 tga_type;
249	int i;
250
251	/* Encode video timings.  */
252	htimings = (((info->var.xres/4) & TGA_HORIZ_ACT_LSB)
253		    | (((info->var.xres/4) & 0x600 << 19) & TGA_HORIZ_ACT_MSB));
254	vtimings = (info->var.yres & TGA_VERT_ACTIVE);
255	htimings |= ((info->var.right_margin/4) << 9) & TGA_HORIZ_FP;
256	vtimings |= (info->var.lower_margin << 11) & TGA_VERT_FP;
257	htimings |= ((info->var.hsync_len/4) << 14) & TGA_HORIZ_SYNC;
258	vtimings |= (info->var.vsync_len << 16) & TGA_VERT_SYNC;
259	htimings |= ((info->var.left_margin/4) << 21) & TGA_HORIZ_BP;
260	vtimings |= (info->var.upper_margin << 22) & TGA_VERT_BP;
261
262	if (info->var.sync & FB_SYNC_HOR_HIGH_ACT)
263		htimings |= TGA_HORIZ_POLARITY;
264	if (info->var.sync & FB_SYNC_VERT_HIGH_ACT)
265		vtimings |= TGA_VERT_POLARITY;
266
267	par->htimings = htimings;
268	par->vtimings = vtimings;
269
270	par->sync_on_green = !!(info->var.sync & FB_SYNC_ON_GREEN);
271
272	/* Store other useful values in par.  */
273	par->xres = info->var.xres;
274	par->yres = info->var.yres;
275	par->pll_freq = pll_freq = 1000000000 / info->var.pixclock;
276	par->bits_per_pixel = info->var.bits_per_pixel;
277	info->fix.line_length = par->xres * (par->bits_per_pixel >> 3);
278
279	tga_type = par->tga_type;
280
281	/* First, disable video.  */
282	TGA_WRITE_REG(par, TGA_VALID_VIDEO | TGA_VALID_BLANK, TGA_VALID_REG);
283
284	/* Write the DEEP register.  */
285	while (TGA_READ_REG(par, TGA_CMD_STAT_REG) & 1) /* wait for not busy */
286		continue;
287	mb();
288	TGA_WRITE_REG(par, deep_presets[tga_type] |
289			   (par->sync_on_green ? 0x0 : 0x00010000),
290		      TGA_DEEP_REG);
291	while (TGA_READ_REG(par, TGA_CMD_STAT_REG) & 1) /* wait for not busy */
292		continue;
293	mb();
294
295	/* Write some more registers.  */
296	TGA_WRITE_REG(par, rasterop_presets[tga_type], TGA_RASTEROP_REG);
297	TGA_WRITE_REG(par, mode_presets[tga_type], TGA_MODE_REG);
298	TGA_WRITE_REG(par, base_addr_presets[tga_type], TGA_BASE_ADDR_REG);
299
300	/* Calculate & write the PLL.  */
301	tgafb_set_pll(par, pll_freq);
302
303	/* Write some more registers.  */
304	TGA_WRITE_REG(par, 0xffffffff, TGA_PLANEMASK_REG);
305	TGA_WRITE_REG(par, 0xffffffff, TGA_PIXELMASK_REG);
306
307	/* Init video timing regs.  */
308	TGA_WRITE_REG(par, htimings, TGA_HORIZ_REG);
309	TGA_WRITE_REG(par, vtimings, TGA_VERT_REG);
310
311	/* Initialise RAMDAC. */
312	if (tga_type == TGA_TYPE_8PLANE && tga_bus_pci) {
313
314		/* Init BT485 RAMDAC registers.  */
315		BT485_WRITE(par, 0xa2 | (par->sync_on_green ? 0x8 : 0x0),
316			    BT485_CMD_0);
317		BT485_WRITE(par, 0x01, BT485_ADDR_PAL_WRITE);
318		BT485_WRITE(par, 0x14, BT485_CMD_3); /* cursor 64x64 */
319		BT485_WRITE(par, 0x40, BT485_CMD_1);
320		BT485_WRITE(par, 0x20, BT485_CMD_2); /* cursor off, for now */
321		BT485_WRITE(par, 0xff, BT485_PIXEL_MASK);
322
323		/* Fill palette registers.  */
324		BT485_WRITE(par, 0x00, BT485_ADDR_PAL_WRITE);
325		TGA_WRITE_REG(par, BT485_DATA_PAL, TGA_RAMDAC_SETUP_REG);
326
327		for (i = 0; i < 256 * 3; i += 4) {
328			TGA_WRITE_REG(par, 0x55 | (BT485_DATA_PAL << 8),
329				      TGA_RAMDAC_REG);
330			TGA_WRITE_REG(par, 0x00 | (BT485_DATA_PAL << 8),
331				      TGA_RAMDAC_REG);
332			TGA_WRITE_REG(par, 0x00 | (BT485_DATA_PAL << 8),
333				      TGA_RAMDAC_REG);
334			TGA_WRITE_REG(par, 0x00 | (BT485_DATA_PAL << 8),
335				      TGA_RAMDAC_REG);
336		}
337
338	} else if (tga_type == TGA_TYPE_8PLANE && tga_bus_tc) {
339
340		/* Init BT459 RAMDAC registers.  */
341		BT459_WRITE(par, BT459_REG_ACC, BT459_CMD_REG_0, 0x40);
342		BT459_WRITE(par, BT459_REG_ACC, BT459_CMD_REG_1, 0x00);
343		BT459_WRITE(par, BT459_REG_ACC, BT459_CMD_REG_2,
344			    (par->sync_on_green ? 0xc0 : 0x40));
345
346		BT459_WRITE(par, BT459_REG_ACC, BT459_CUR_CMD_REG, 0x00);
347
348		/* Fill the palette.  */
349		BT459_LOAD_ADDR(par, 0x0000);
350		TGA_WRITE_REG(par, BT459_PALETTE << 2, TGA_RAMDAC_SETUP_REG);
351
352		for (i = 0; i < 256 * 3; i += 4) {
353			TGA_WRITE_REG(par, 0x55, TGA_RAMDAC_REG);
354			TGA_WRITE_REG(par, 0x00, TGA_RAMDAC_REG);
355			TGA_WRITE_REG(par, 0x00, TGA_RAMDAC_REG);
356			TGA_WRITE_REG(par, 0x00, TGA_RAMDAC_REG);
357		}
358
359	} else { /* 24-plane or 24plusZ */
360
361		/* Init BT463 RAMDAC registers.  */
362		BT463_WRITE(par, BT463_REG_ACC, BT463_CMD_REG_0, 0x40);
363		BT463_WRITE(par, BT463_REG_ACC, BT463_CMD_REG_1, 0x08);
364		BT463_WRITE(par, BT463_REG_ACC, BT463_CMD_REG_2,
365			    (par->sync_on_green ? 0xc0 : 0x40));
366
367		BT463_WRITE(par, BT463_REG_ACC, BT463_READ_MASK_0, 0xff);
368		BT463_WRITE(par, BT463_REG_ACC, BT463_READ_MASK_1, 0xff);
369		BT463_WRITE(par, BT463_REG_ACC, BT463_READ_MASK_2, 0xff);
370		BT463_WRITE(par, BT463_REG_ACC, BT463_READ_MASK_3, 0x0f);
371
372		BT463_WRITE(par, BT463_REG_ACC, BT463_BLINK_MASK_0, 0x00);
373		BT463_WRITE(par, BT463_REG_ACC, BT463_BLINK_MASK_1, 0x00);
374		BT463_WRITE(par, BT463_REG_ACC, BT463_BLINK_MASK_2, 0x00);
375		BT463_WRITE(par, BT463_REG_ACC, BT463_BLINK_MASK_3, 0x00);
376
377		/* Fill the palette.  */
378		BT463_LOAD_ADDR(par, 0x0000);
379		TGA_WRITE_REG(par, BT463_PALETTE << 2, TGA_RAMDAC_SETUP_REG);
380
381#ifdef CONFIG_HW_CONSOLE
382		for (i = 0; i < 16; i++) {
383			int j = color_table[i];
384
385			TGA_WRITE_REG(par, default_red[j], TGA_RAMDAC_REG);
386			TGA_WRITE_REG(par, default_grn[j], TGA_RAMDAC_REG);
387			TGA_WRITE_REG(par, default_blu[j], TGA_RAMDAC_REG);
388		}
389		for (i = 0; i < 512 * 3; i += 4) {
390#else
391		for (i = 0; i < 528 * 3; i += 4) {
392#endif
393			TGA_WRITE_REG(par, 0x55, TGA_RAMDAC_REG);
394			TGA_WRITE_REG(par, 0x00, TGA_RAMDAC_REG);
395			TGA_WRITE_REG(par, 0x00, TGA_RAMDAC_REG);
396			TGA_WRITE_REG(par, 0x00, TGA_RAMDAC_REG);
397		}
398
399		/* Fill window type table after start of vertical retrace.  */
400		while (!(TGA_READ_REG(par, TGA_INTR_STAT_REG) & 0x01))
401			continue;
402		TGA_WRITE_REG(par, 0x01, TGA_INTR_STAT_REG);
403		mb();
404		while (!(TGA_READ_REG(par, TGA_INTR_STAT_REG) & 0x01))
405			continue;
406		TGA_WRITE_REG(par, 0x01, TGA_INTR_STAT_REG);
407
408		BT463_LOAD_ADDR(par, BT463_WINDOW_TYPE_BASE);
409		TGA_WRITE_REG(par, BT463_REG_ACC << 2, TGA_RAMDAC_SETUP_REG);
410
411		for (i = 0; i < 16; i++) {
412			TGA_WRITE_REG(par, 0x00, TGA_RAMDAC_REG);
413			TGA_WRITE_REG(par, 0x01, TGA_RAMDAC_REG);
414			TGA_WRITE_REG(par, 0x00, TGA_RAMDAC_REG);
415		}
416
417	}
418
419	/* Finally, enable video scan (and pray for the monitor... :-) */
420	TGA_WRITE_REG(par, TGA_VALID_VIDEO, TGA_VALID_REG);
421
422	return 0;
423}
424
425#define DIFFCHECK(X)							  \
426do {									  \
427	if (m <= 0x3f) {						  \
428		int delta = f - (TGA_PLL_BASE_FREQ * (X)) / (r << shift); \
429		if (delta < 0)						  \
430			delta = -delta;					  \
431		if (delta < min_diff)					  \
432			min_diff = delta, vm = m, va = a, vr = r;	  \
433	}								  \
434} while (0)
435
436static void
437tgafb_set_pll(struct tga_par *par, int f)
438{
439	int n, shift, base, min_diff, target;
440	int r,a,m,vm = 34, va = 1, vr = 30;
441
442	for (r = 0 ; r < 12 ; r++)
443		TGA_WRITE_REG(par, !r, TGA_CLOCK_REG);
444
445	if (f > TGA_PLL_MAX_FREQ)
446		f = TGA_PLL_MAX_FREQ;
447
448	if (f >= TGA_PLL_MAX_FREQ / 2)
449		shift = 0;
450	else if (f >= TGA_PLL_MAX_FREQ / 4)
451		shift = 1;
452	else
453		shift = 2;
454
455	TGA_WRITE_REG(par, shift & 1, TGA_CLOCK_REG);
456	TGA_WRITE_REG(par, shift >> 1, TGA_CLOCK_REG);
457
458	for (r = 0 ; r < 10 ; r++)
459		TGA_WRITE_REG(par, 0, TGA_CLOCK_REG);
460
461	if (f <= 120000) {
462		TGA_WRITE_REG(par, 0, TGA_CLOCK_REG);
463		TGA_WRITE_REG(par, 0, TGA_CLOCK_REG);
464	}
465	else if (f <= 200000) {
466		TGA_WRITE_REG(par, 1, TGA_CLOCK_REG);
467		TGA_WRITE_REG(par, 0, TGA_CLOCK_REG);
468	}
469	else {
470		TGA_WRITE_REG(par, 0, TGA_CLOCK_REG);
471		TGA_WRITE_REG(par, 1, TGA_CLOCK_REG);
472	}
473
474	TGA_WRITE_REG(par, 1, TGA_CLOCK_REG);
475	TGA_WRITE_REG(par, 0, TGA_CLOCK_REG);
476	TGA_WRITE_REG(par, 0, TGA_CLOCK_REG);
477	TGA_WRITE_REG(par, 1, TGA_CLOCK_REG);
478	TGA_WRITE_REG(par, 0, TGA_CLOCK_REG);
479	TGA_WRITE_REG(par, 1, TGA_CLOCK_REG);
480
481	target = (f << shift) / TGA_PLL_BASE_FREQ;
482	min_diff = TGA_PLL_MAX_FREQ;
483
484	r = 7 / target;
485	if (!r) r = 1;
486
487	base = target * r;
488	while (base < 449) {
489		for (n = base < 7 ? 7 : base; n < base + target && n < 449; n++) {
490			m = ((n + 3) / 7) - 1;
491			a = 0;
492			DIFFCHECK((m + 1) * 7);
493			m++;
494			DIFFCHECK((m + 1) * 7);
495			m = (n / 6) - 1;
496			if ((a = n % 6))
497				DIFFCHECK(n);
498		}
499		r++;
500		base += target;
501	}
502
503	vr--;
504
505	for (r = 0; r < 8; r++)
506		TGA_WRITE_REG(par, (vm >> r) & 1, TGA_CLOCK_REG);
507	for (r = 0; r < 8 ; r++)
508		TGA_WRITE_REG(par, (va >> r) & 1, TGA_CLOCK_REG);
509	for (r = 0; r < 7 ; r++)
510		TGA_WRITE_REG(par, (vr >> r) & 1, TGA_CLOCK_REG);
511	TGA_WRITE_REG(par, ((vr >> 7) & 1)|2, TGA_CLOCK_REG);
512}
513
514
515/**
516 *      tgafb_setcolreg - Optional function. Sets a color register.
517 *      @regno: boolean, 0 copy local, 1 get_user() function
518 *      @red: frame buffer colormap structure
519 *      @green: The green value which can be up to 16 bits wide
520 *      @blue:  The blue value which can be up to 16 bits wide.
521 *      @transp: If supported the alpha value which can be up to 16 bits wide.
522 *      @info: frame buffer info structure
523 */
524static int
525tgafb_setcolreg(unsigned regno, unsigned red, unsigned green, unsigned blue,
526		unsigned transp, struct fb_info *info)
527{
528	struct tga_par *par = (struct tga_par *) info->par;
529	int tga_bus_pci = dev_is_pci(par->dev);
530	int tga_bus_tc = TGA_BUS_TC(par->dev);
531
532	if (regno > 255)
533		return 1;
534	red >>= 8;
535	green >>= 8;
536	blue >>= 8;
537
538	if (par->tga_type == TGA_TYPE_8PLANE && tga_bus_pci) {
539		BT485_WRITE(par, regno, BT485_ADDR_PAL_WRITE);
540		TGA_WRITE_REG(par, BT485_DATA_PAL, TGA_RAMDAC_SETUP_REG);
541		TGA_WRITE_REG(par, red|(BT485_DATA_PAL<<8),TGA_RAMDAC_REG);
542		TGA_WRITE_REG(par, green|(BT485_DATA_PAL<<8),TGA_RAMDAC_REG);
543		TGA_WRITE_REG(par, blue|(BT485_DATA_PAL<<8),TGA_RAMDAC_REG);
544	} else if (par->tga_type == TGA_TYPE_8PLANE && tga_bus_tc) {
545		BT459_LOAD_ADDR(par, regno);
546		TGA_WRITE_REG(par, BT459_PALETTE << 2, TGA_RAMDAC_SETUP_REG);
547		TGA_WRITE_REG(par, red, TGA_RAMDAC_REG);
548		TGA_WRITE_REG(par, green, TGA_RAMDAC_REG);
549		TGA_WRITE_REG(par, blue, TGA_RAMDAC_REG);
550	} else {
551		if (regno < 16) {
552			u32 value = (regno << 16) | (regno << 8) | regno;
553			((u32 *)info->pseudo_palette)[regno] = value;
554		}
555		BT463_LOAD_ADDR(par, regno);
556		TGA_WRITE_REG(par, BT463_PALETTE << 2, TGA_RAMDAC_SETUP_REG);
557		TGA_WRITE_REG(par, red, TGA_RAMDAC_REG);
558		TGA_WRITE_REG(par, green, TGA_RAMDAC_REG);
559		TGA_WRITE_REG(par, blue, TGA_RAMDAC_REG);
560	}
561
562	return 0;
563}
564
565
566/**
567 *      tgafb_blank - Optional function.  Blanks the display.
568 *      @blank: the blank mode we want.
569 *      @info: frame buffer structure that represents a single frame buffer
570 */
571static int
572tgafb_blank(int blank, struct fb_info *info)
573{
574	struct tga_par *par = (struct tga_par *) info->par;
575	u32 vhcr, vvcr, vvvr;
576	unsigned long flags;
577
578	local_irq_save(flags);
579
580	vhcr = TGA_READ_REG(par, TGA_HORIZ_REG);
581	vvcr = TGA_READ_REG(par, TGA_VERT_REG);
582	vvvr = TGA_READ_REG(par, TGA_VALID_REG);
583	vvvr &= ~(TGA_VALID_VIDEO | TGA_VALID_BLANK);
584
585	switch (blank) {
586	case FB_BLANK_UNBLANK: /* Unblanking */
587		if (par->vesa_blanked) {
588			TGA_WRITE_REG(par, vhcr & 0xbfffffff, TGA_HORIZ_REG);
589			TGA_WRITE_REG(par, vvcr & 0xbfffffff, TGA_VERT_REG);
590			par->vesa_blanked = 0;
591		}
592		TGA_WRITE_REG(par, vvvr | TGA_VALID_VIDEO, TGA_VALID_REG);
593		break;
594
595	case FB_BLANK_NORMAL: /* Normal blanking */
596		TGA_WRITE_REG(par, vvvr | TGA_VALID_VIDEO | TGA_VALID_BLANK,
597			      TGA_VALID_REG);
598		break;
599
600	case FB_BLANK_VSYNC_SUSPEND: /* VESA blank (vsync off) */
601		TGA_WRITE_REG(par, vvcr | 0x40000000, TGA_VERT_REG);
602		TGA_WRITE_REG(par, vvvr | TGA_VALID_BLANK, TGA_VALID_REG);
603		par->vesa_blanked = 1;
604		break;
605
606	case FB_BLANK_HSYNC_SUSPEND: /* VESA blank (hsync off) */
607		TGA_WRITE_REG(par, vhcr | 0x40000000, TGA_HORIZ_REG);
608		TGA_WRITE_REG(par, vvvr | TGA_VALID_BLANK, TGA_VALID_REG);
609		par->vesa_blanked = 1;
610		break;
611
612	case FB_BLANK_POWERDOWN: /* Poweroff */
613		TGA_WRITE_REG(par, vhcr | 0x40000000, TGA_HORIZ_REG);
614		TGA_WRITE_REG(par, vvcr | 0x40000000, TGA_VERT_REG);
615		TGA_WRITE_REG(par, vvvr | TGA_VALID_BLANK, TGA_VALID_REG);
616		par->vesa_blanked = 1;
617		break;
618	}
619
620	local_irq_restore(flags);
621	return 0;
622}
623
624
625/*
626 *  Acceleration.
627 */
628
629static void
630tgafb_mono_imageblit(struct fb_info *info, const struct fb_image *image)
631{
632	struct tga_par *par = (struct tga_par *) info->par;
633	u32 fgcolor, bgcolor, dx, dy, width, height, vxres, vyres, pixelmask;
634	unsigned long rincr, line_length, shift, pos, is8bpp;
635	unsigned long i, j;
636	const unsigned char *data;
637	void __iomem *regs_base;
638	void __iomem *fb_base;
639
640	is8bpp = info->var.bits_per_pixel == 8;
641
642	dx = image->dx;
643	dy = image->dy;
644	width = image->width;
645	height = image->height;
646	vxres = info->var.xres_virtual;
647	vyres = info->var.yres_virtual;
648	line_length = info->fix.line_length;
649	rincr = (width + 7) / 8;
650
651	/* A shift below cannot cope with.  */
652	if (unlikely(width == 0))
653		return;
654	/* Crop the image to the screen.  */
655	if (dx > vxres || dy > vyres)
656		return;
657	if (dx + width > vxres)
658		width = vxres - dx;
659	if (dy + height > vyres)
660		height = vyres - dy;
661
662	regs_base = par->tga_regs_base;
663	fb_base = par->tga_fb_base;
664
665	/* Expand the color values to fill 32-bits.  */
666	/* ??? Would be nice to notice colour changes elsewhere, so
667	   that we can do this only when necessary.  */
668	fgcolor = image->fg_color;
669	bgcolor = image->bg_color;
670	if (is8bpp) {
671		fgcolor |= fgcolor << 8;
672		fgcolor |= fgcolor << 16;
673		bgcolor |= bgcolor << 8;
674		bgcolor |= bgcolor << 16;
675	} else {
676		if (fgcolor < 16)
677			fgcolor = ((u32 *)info->pseudo_palette)[fgcolor];
678		if (bgcolor < 16)
679			bgcolor = ((u32 *)info->pseudo_palette)[bgcolor];
680	}
681	__raw_writel(fgcolor, regs_base + TGA_FOREGROUND_REG);
682	__raw_writel(bgcolor, regs_base + TGA_BACKGROUND_REG);
683
684	/* Acquire proper alignment; set up the PIXELMASK register
685	   so that we only write the proper character cell.  */
686	pos = dy * line_length;
687	if (is8bpp) {
688		pos += dx;
689		shift = pos & 3;
690		pos &= -4;
691	} else {
692		pos += dx * 4;
693		shift = (pos & 7) >> 2;
694		pos &= -8;
695	}
696
697	data = (const unsigned char *) image->data;
698
699	/* Enable opaque stipple mode.  */
700	__raw_writel((is8bpp
701		      ? TGA_MODE_SBM_8BPP | TGA_MODE_OPAQUE_STIPPLE
702		      : TGA_MODE_SBM_24BPP | TGA_MODE_OPAQUE_STIPPLE),
703		     regs_base + TGA_MODE_REG);
704
705	if (width + shift <= 32) {
706		unsigned long bwidth;
707
708		/* Handle common case of imaging a single character, in
709		   a font less than or 32 pixels wide.  */
710
711		/* Avoid a shift by 32; width > 0 implied.  */
712		pixelmask = (2ul << (width - 1)) - 1;
713		pixelmask <<= shift;
714		__raw_writel(pixelmask, regs_base + TGA_PIXELMASK_REG);
715		wmb();
716
717		bwidth = (width + 7) / 8;
718
719		for (i = 0; i < height; ++i) {
720			u32 mask = 0;
721
722			/* The image data is bit big endian; we need
723			   little endian.  */
724			for (j = 0; j < bwidth; ++j)
725				mask |= bitrev8(data[j]) << (j * 8);
726
727			__raw_writel(mask << shift, fb_base + pos);
728
729			pos += line_length;
730			data += rincr;
731		}
732		wmb();
733		__raw_writel(0xffffffff, regs_base + TGA_PIXELMASK_REG);
734	} else if (shift == 0) {
735		unsigned long pos0 = pos;
736		const unsigned char *data0 = data;
737		unsigned long bincr = (is8bpp ? 8 : 8*4);
738		unsigned long bwidth;
739
740		/* Handle another common case in which accel_putcs
741		   generates a large bitmap, which happens to be aligned.
742		   Allow the tail to be misaligned.  This case is
743		   interesting because we've not got to hold partial
744		   bytes across the words being written.  */
745
746		wmb();
747
748		bwidth = (width / 8) & -4;
749		for (i = 0; i < height; ++i) {
750			for (j = 0; j < bwidth; j += 4) {
751				u32 mask = 0;
752				mask |= bitrev8(data[j+0]) << (0 * 8);
753				mask |= bitrev8(data[j+1]) << (1 * 8);
754				mask |= bitrev8(data[j+2]) << (2 * 8);
755				mask |= bitrev8(data[j+3]) << (3 * 8);
756				__raw_writel(mask, fb_base + pos + j*bincr);
757			}
758			pos += line_length;
759			data += rincr;
760		}
761		wmb();
762
763		pixelmask = (1ul << (width & 31)) - 1;
764		if (pixelmask) {
765			__raw_writel(pixelmask, regs_base + TGA_PIXELMASK_REG);
766			wmb();
767
768			pos = pos0 + bwidth*bincr;
769			data = data0 + bwidth;
770			bwidth = ((width & 31) + 7) / 8;
771
772			for (i = 0; i < height; ++i) {
773				u32 mask = 0;
774				for (j = 0; j < bwidth; ++j)
775					mask |= bitrev8(data[j]) << (j * 8);
776				__raw_writel(mask, fb_base + pos);
777				pos += line_length;
778				data += rincr;
779			}
780			wmb();
781			__raw_writel(0xffffffff, regs_base + TGA_PIXELMASK_REG);
782		}
783	} else {
784		unsigned long pos0 = pos;
785		const unsigned char *data0 = data;
786		unsigned long bincr = (is8bpp ? 8 : 8*4);
787		unsigned long bwidth;
788
789		/* Finally, handle the generic case of misaligned start.
790		   Here we split the write into 16-bit spans.  This allows
791		   us to use only one pixel mask, instead of four as would
792		   be required by writing 24-bit spans.  */
793
794		pixelmask = 0xffff << shift;
795		__raw_writel(pixelmask, regs_base + TGA_PIXELMASK_REG);
796		wmb();
797
798		bwidth = (width / 8) & -2;
799		for (i = 0; i < height; ++i) {
800			for (j = 0; j < bwidth; j += 2) {
801				u32 mask = 0;
802				mask |= bitrev8(data[j+0]) << (0 * 8);
803				mask |= bitrev8(data[j+1]) << (1 * 8);
804				mask <<= shift;
805				__raw_writel(mask, fb_base + pos + j*bincr);
806			}
807			pos += line_length;
808			data += rincr;
809		}
810		wmb();
811
812		pixelmask = ((1ul << (width & 15)) - 1) << shift;
813		if (pixelmask) {
814			__raw_writel(pixelmask, regs_base + TGA_PIXELMASK_REG);
815			wmb();
816
817			pos = pos0 + bwidth*bincr;
818			data = data0 + bwidth;
819			bwidth = (width & 15) > 8;
820
821			for (i = 0; i < height; ++i) {
822				u32 mask = bitrev8(data[0]);
823				if (bwidth)
824					mask |= bitrev8(data[1]) << 8;
825				mask <<= shift;
826				__raw_writel(mask, fb_base + pos);
827				pos += line_length;
828				data += rincr;
829			}
830			wmb();
831		}
832		__raw_writel(0xffffffff, regs_base + TGA_PIXELMASK_REG);
833	}
834
835	/* Disable opaque stipple mode.  */
836	__raw_writel((is8bpp
837		      ? TGA_MODE_SBM_8BPP | TGA_MODE_SIMPLE
838		      : TGA_MODE_SBM_24BPP | TGA_MODE_SIMPLE),
839		     regs_base + TGA_MODE_REG);
840}
841
842static void
843tgafb_clut_imageblit(struct fb_info *info, const struct fb_image *image)
844{
845	struct tga_par *par = (struct tga_par *) info->par;
846	u32 color, dx, dy, width, height, vxres, vyres;
847	u32 *palette = ((u32 *)info->pseudo_palette);
848	unsigned long pos, line_length, i, j;
849	const unsigned char *data;
850	void __iomem *fb_base;
851
852	dx = image->dx;
853	dy = image->dy;
854	width = image->width;
855	height = image->height;
856	vxres = info->var.xres_virtual;
857	vyres = info->var.yres_virtual;
858	line_length = info->fix.line_length;
859
860	/* Crop the image to the screen.  */
861	if (dx > vxres || dy > vyres)
862		return;
863	if (dx + width > vxres)
864		width = vxres - dx;
865	if (dy + height > vyres)
866		height = vyres - dy;
867
868	fb_base = par->tga_fb_base;
869
870	pos = dy * line_length + (dx * 4);
871	data = image->data;
872
873	/* Now copy the image, color_expanding via the palette. */
874	for (i = 0; i < height; i++) {
875		for (j = 0; j < width; j++) {
876			color = palette[*data++];
877			__raw_writel(color, fb_base + pos + j*4);
878		}
879		pos += line_length;
880	}
881}
882
883/**
884 *      tgafb_imageblit - REQUIRED function. Can use generic routines if
885 *                        non acclerated hardware and packed pixel based.
886 *                        Copies a image from system memory to the screen.
887 *
888 *      @info: frame buffer structure that represents a single frame buffer
889 *      @image: structure defining the image.
890 */
891static void
892tgafb_imageblit(struct fb_info *info, const struct fb_image *image)
893{
894	unsigned int is8bpp = info->var.bits_per_pixel == 8;
895
896	/* If a mono image, regardless of FB depth, go do it. */
897	if (image->depth == 1) {
898		tgafb_mono_imageblit(info, image);
899		return;
900	}
901
902	/* For copies that aren't pixel expansion, there's little we
903	   can do better than the generic code.  */
904	/* ??? There is a DMA write mode; I wonder if that could be
905	   made to pull the data from the image buffer...  */
906	if (image->depth == info->var.bits_per_pixel) {
907		cfb_imageblit(info, image);
908		return;
909	}
910
911	/* If 24-plane FB and the image is 8-plane with CLUT, we can do it. */
912	if (!is8bpp && image->depth == 8) {
913		tgafb_clut_imageblit(info, image);
914		return;
915	}
916
917	/* Silently return... */
918}
919
920/**
921 *      tgafb_fillrect - REQUIRED function. Can use generic routines if
922 *                       non acclerated hardware and packed pixel based.
923 *                       Draws a rectangle on the screen.
924 *
925 *      @info: frame buffer structure that represents a single frame buffer
926 *      @rect: structure defining the rectagle and operation.
927 */
928static void
929tgafb_fillrect(struct fb_info *info, const struct fb_fillrect *rect)
930{
931	struct tga_par *par = (struct tga_par *) info->par;
932	int is8bpp = info->var.bits_per_pixel == 8;
933	u32 dx, dy, width, height, vxres, vyres, color;
934	unsigned long pos, align, line_length, i, j;
935	void __iomem *regs_base;
936	void __iomem *fb_base;
937
938	dx = rect->dx;
939	dy = rect->dy;
940	width = rect->width;
941	height = rect->height;
942	vxres = info->var.xres_virtual;
943	vyres = info->var.yres_virtual;
944	line_length = info->fix.line_length;
945	regs_base = par->tga_regs_base;
946	fb_base = par->tga_fb_base;
947
948	/* Crop the rectangle to the screen.  */
949	if (dx > vxres || dy > vyres || !width || !height)
950		return;
951	if (dx + width > vxres)
952		width = vxres - dx;
953	if (dy + height > vyres)
954		height = vyres - dy;
955
956	pos = dy * line_length + dx * (is8bpp ? 1 : 4);
957
958	/* ??? We could implement ROP_XOR with opaque fill mode
959	   and a RasterOp setting of GXxor, but as far as I can
960	   tell, this mode is not actually used in the kernel.
961	   Thus I am ignoring it for now.  */
962	if (rect->rop != ROP_COPY) {
963		cfb_fillrect(info, rect);
964		return;
965	}
966
967	/* Expand the color value to fill 8 pixels.  */
968	color = rect->color;
969	if (is8bpp) {
970		color |= color << 8;
971		color |= color << 16;
972		__raw_writel(color, regs_base + TGA_BLOCK_COLOR0_REG);
973		__raw_writel(color, regs_base + TGA_BLOCK_COLOR1_REG);
974	} else {
975		if (color < 16)
976			color = ((u32 *)info->pseudo_palette)[color];
977		__raw_writel(color, regs_base + TGA_BLOCK_COLOR0_REG);
978		__raw_writel(color, regs_base + TGA_BLOCK_COLOR1_REG);
979		__raw_writel(color, regs_base + TGA_BLOCK_COLOR2_REG);
980		__raw_writel(color, regs_base + TGA_BLOCK_COLOR3_REG);
981		__raw_writel(color, regs_base + TGA_BLOCK_COLOR4_REG);
982		__raw_writel(color, regs_base + TGA_BLOCK_COLOR5_REG);
983		__raw_writel(color, regs_base + TGA_BLOCK_COLOR6_REG);
984		__raw_writel(color, regs_base + TGA_BLOCK_COLOR7_REG);
985	}
986
987	/* The DATA register holds the fill mask for block fill mode.
988	   Since we're not stippling, this is all ones.  */
989	__raw_writel(0xffffffff, regs_base + TGA_DATA_REG);
990
991	/* Enable block fill mode.  */
992	__raw_writel((is8bpp
993		      ? TGA_MODE_SBM_8BPP | TGA_MODE_BLOCK_FILL
994		      : TGA_MODE_SBM_24BPP | TGA_MODE_BLOCK_FILL),
995		     regs_base + TGA_MODE_REG);
996	wmb();
997
998	/* We can fill 2k pixels per operation.  Notice blocks that fit
999	   the width of the screen so that we can take advantage of this
1000	   and fill more than one line per write.  */
1001	if (width == line_length) {
1002		width *= height;
1003		height = 1;
1004	}
1005
1006	/* The write into the frame buffer must be aligned to 4 bytes,
1007	   but we are allowed to encode the offset within the word in
1008	   the data word written.  */
1009	align = (pos & 3) << 16;
1010	pos &= -4;
1011
1012	if (width <= 2048) {
1013		u32 data;
1014
1015		data = (width - 1) | align;
1016
1017		for (i = 0; i < height; ++i) {
1018			__raw_writel(data, fb_base + pos);
1019			pos += line_length;
1020		}
1021	} else {
1022		unsigned long Bpp = (is8bpp ? 1 : 4);
1023		unsigned long nwidth = width & -2048;
1024		u32 fdata, ldata;
1025
1026		fdata = (2048 - 1) | align;
1027		ldata = ((width & 2047) - 1) | align;
1028
1029		for (i = 0; i < height; ++i) {
1030			for (j = 0; j < nwidth; j += 2048)
1031				__raw_writel(fdata, fb_base + pos + j*Bpp);
1032			if (j < width)
1033				__raw_writel(ldata, fb_base + pos + j*Bpp);
1034			pos += line_length;
1035		}
1036	}
1037	wmb();
1038
1039	/* Disable block fill mode.  */
1040	__raw_writel((is8bpp
1041		      ? TGA_MODE_SBM_8BPP | TGA_MODE_SIMPLE
1042		      : TGA_MODE_SBM_24BPP | TGA_MODE_SIMPLE),
1043		     regs_base + TGA_MODE_REG);
1044}
1045
1046/*
1047 *      tgafb_copyarea - REQUIRED function. Can use generic routines if
1048 *                       non acclerated hardware and packed pixel based.
1049 *                       Copies on area of the screen to another area.
1050 *
1051 *      @info: frame buffer structure that represents a single frame buffer
1052 *      @area: structure defining the source and destination.
1053 */
1054
1055/* Handle the special case of copying entire lines, e.g. during scrolling.
1056   We can avoid a lot of needless computation in this case.  In the 8bpp
1057   case we need to use the COPY64 registers instead of mask writes into
1058   the frame buffer to achieve maximum performance.  */
1059
1060static inline void
1061copyarea_line_8bpp(struct fb_info *info, u32 dy, u32 sy,
1062		   u32 height, u32 width)
1063{
1064	struct tga_par *par = (struct tga_par *) info->par;
1065	void __iomem *tga_regs = par->tga_regs_base;
1066	unsigned long dpos, spos, i, n64;
1067
1068	/* Set up the MODE and PIXELSHIFT registers.  */
1069	__raw_writel(TGA_MODE_SBM_8BPP | TGA_MODE_COPY, tga_regs+TGA_MODE_REG);
1070	__raw_writel(0, tga_regs+TGA_PIXELSHIFT_REG);
1071	wmb();
1072
1073	n64 = (height * width) / 64;
1074
1075	if (sy < dy) {
1076		spos = (sy + height) * width;
1077		dpos = (dy + height) * width;
1078
1079		for (i = 0; i < n64; ++i) {
1080			spos -= 64;
1081			dpos -= 64;
1082			__raw_writel(spos, tga_regs+TGA_COPY64_SRC);
1083			wmb();
1084			__raw_writel(dpos, tga_regs+TGA_COPY64_DST);
1085			wmb();
1086		}
1087	} else {
1088		spos = sy * width;
1089		dpos = dy * width;
1090
1091		for (i = 0; i < n64; ++i) {
1092			__raw_writel(spos, tga_regs+TGA_COPY64_SRC);
1093			wmb();
1094			__raw_writel(dpos, tga_regs+TGA_COPY64_DST);
1095			wmb();
1096			spos += 64;
1097			dpos += 64;
1098		}
1099	}
1100
1101	/* Reset the MODE register to normal.  */
1102	__raw_writel(TGA_MODE_SBM_8BPP|TGA_MODE_SIMPLE, tga_regs+TGA_MODE_REG);
1103}
1104
1105static inline void
1106copyarea_line_32bpp(struct fb_info *info, u32 dy, u32 sy,
1107		    u32 height, u32 width)
1108{
1109	struct tga_par *par = (struct tga_par *) info->par;
1110	void __iomem *tga_regs = par->tga_regs_base;
1111	void __iomem *tga_fb = par->tga_fb_base;
1112	void __iomem *src;
1113	void __iomem *dst;
1114	unsigned long i, n16;
1115
1116	/* Set up the MODE and PIXELSHIFT registers.  */
1117	__raw_writel(TGA_MODE_SBM_24BPP | TGA_MODE_COPY, tga_regs+TGA_MODE_REG);
1118	__raw_writel(0, tga_regs+TGA_PIXELSHIFT_REG);
1119	wmb();
1120
1121	n16 = (height * width) / 16;
1122
1123	if (sy < dy) {
1124		src = tga_fb + (sy + height) * width * 4;
1125		dst = tga_fb + (dy + height) * width * 4;
1126
1127		for (i = 0; i < n16; ++i) {
1128			src -= 64;
1129			dst -= 64;
1130			__raw_writel(0xffff, src);
1131			wmb();
1132			__raw_writel(0xffff, dst);
1133			wmb();
1134		}
1135	} else {
1136		src = tga_fb + sy * width * 4;
1137		dst = tga_fb + dy * width * 4;
1138
1139		for (i = 0; i < n16; ++i) {
1140			__raw_writel(0xffff, src);
1141			wmb();
1142			__raw_writel(0xffff, dst);
1143			wmb();
1144			src += 64;
1145			dst += 64;
1146		}
1147	}
1148
1149	/* Reset the MODE register to normal.  */
1150	__raw_writel(TGA_MODE_SBM_24BPP|TGA_MODE_SIMPLE, tga_regs+TGA_MODE_REG);
1151}
1152
1153/* The (almost) general case of backward copy in 8bpp mode.  */
1154static inline void
1155copyarea_8bpp(struct fb_info *info, u32 dx, u32 dy, u32 sx, u32 sy,
1156	      u32 height, u32 width, u32 line_length,
1157	      const struct fb_copyarea *area)
1158{
1159	struct tga_par *par = (struct tga_par *) info->par;
1160	unsigned i, yincr;
1161	int depos, sepos, backward, last_step, step;
1162	u32 mask_last;
1163	unsigned n32;
1164	void __iomem *tga_regs;
1165	void __iomem *tga_fb;
1166
1167	/* Do acceleration only if we are aligned on 8 pixels */
1168	if ((dx | sx | width) & 7) {
1169		cfb_copyarea(info, area);
1170		return;
1171	}
1172
1173	yincr = line_length;
1174	if (dy > sy) {
1175		dy += height - 1;
1176		sy += height - 1;
1177		yincr = -yincr;
1178	}
1179	backward = dy == sy && dx > sx && dx < sx + width;
1180
1181	/* Compute the offsets and alignments in the frame buffer.
1182	   More than anything else, these control how we do copies.  */
1183	depos = dy * line_length + dx;
1184	sepos = sy * line_length + sx;
1185	if (backward) {
1186		depos += width;
1187		sepos += width;
1188	}
1189
1190	/* Next copy full words at a time.  */
1191	n32 = width / 32;
1192	last_step = width % 32;
1193
1194	/* Finally copy the unaligned head of the span.  */
1195	mask_last = (1ul << last_step) - 1;
1196
1197	if (!backward) {
1198		step = 32;
1199		last_step = 32;
1200	} else {
1201		step = -32;
1202		last_step = -last_step;
1203		sepos -= 32;
1204		depos -= 32;
1205	}
1206
1207	tga_regs = par->tga_regs_base;
1208	tga_fb = par->tga_fb_base;
1209
1210	/* Set up the MODE and PIXELSHIFT registers.  */
1211	__raw_writel(TGA_MODE_SBM_8BPP|TGA_MODE_COPY, tga_regs+TGA_MODE_REG);
1212	__raw_writel(0, tga_regs+TGA_PIXELSHIFT_REG);
1213	wmb();
1214
1215	for (i = 0; i < height; ++i) {
1216		unsigned long j;
1217		void __iomem *sfb;
1218		void __iomem *dfb;
1219
1220		sfb = tga_fb + sepos;
1221		dfb = tga_fb + depos;
1222
1223		for (j = 0; j < n32; j++) {
1224			if (j < 2 && j + 1 < n32 && !backward &&
1225			    !(((unsigned long)sfb | (unsigned long)dfb) & 63)) {
1226				do {
1227					__raw_writel(sfb - tga_fb, tga_regs+TGA_COPY64_SRC);
1228					wmb();
1229					__raw_writel(dfb - tga_fb, tga_regs+TGA_COPY64_DST);
1230					wmb();
1231					sfb += 64;
1232					dfb += 64;
1233					j += 2;
1234				} while (j + 1 < n32);
1235				j--;
1236				continue;
1237			}
1238			__raw_writel(0xffffffff, sfb);
1239			wmb();
1240			__raw_writel(0xffffffff, dfb);
1241			wmb();
1242			sfb += step;
1243			dfb += step;
1244		}
1245
1246		if (mask_last) {
1247			sfb += last_step - step;
1248			dfb += last_step - step;
1249			__raw_writel(mask_last, sfb);
1250			wmb();
1251			__raw_writel(mask_last, dfb);
1252			wmb();
1253		}
1254
1255		sepos += yincr;
1256		depos += yincr;
1257	}
1258
1259	/* Reset the MODE register to normal.  */
1260	__raw_writel(TGA_MODE_SBM_8BPP|TGA_MODE_SIMPLE, tga_regs+TGA_MODE_REG);
1261}
1262
1263static void
1264tgafb_copyarea(struct fb_info *info, const struct fb_copyarea *area)
1265{
1266	unsigned long dx, dy, width, height, sx, sy, vxres, vyres;
1267	unsigned long line_length, bpp;
1268
1269	dx = area->dx;
1270	dy = area->dy;
1271	width = area->width;
1272	height = area->height;
1273	sx = area->sx;
1274	sy = area->sy;
1275	vxres = info->var.xres_virtual;
1276	vyres = info->var.yres_virtual;
1277	line_length = info->fix.line_length;
1278
1279	/* The top left corners must be in the virtual screen.  */
1280	if (dx > vxres || sx > vxres || dy > vyres || sy > vyres)
1281		return;
1282
1283	/* Clip the destination.  */
1284	if (dx + width > vxres)
1285		width = vxres - dx;
1286	if (dy + height > vyres)
1287		height = vyres - dy;
1288
1289	/* The source must be completely inside the virtual screen.  */
1290	if (sx + width > vxres || sy + height > vyres)
1291		return;
1292
1293	bpp = info->var.bits_per_pixel;
1294
1295	/* Detect copies of the entire line.  */
1296	if (!(line_length & 63) && width * (bpp >> 3) == line_length) {
1297		if (bpp == 8)
1298			copyarea_line_8bpp(info, dy, sy, height, width);
1299		else
1300			copyarea_line_32bpp(info, dy, sy, height, width);
1301	}
1302
1303	/* ??? The documentation is unclear to me exactly how the pixelshift
1304	   register works in 32bpp mode.  Since I don't have hardware to test,
1305	   give up for now and fall back on the generic routines.  */
1306	else if (bpp == 32)
1307		cfb_copyarea(info, area);
1308
1309	else
1310		copyarea_8bpp(info, dx, dy, sx, sy, height,
1311			      width, line_length, area);
1312}
1313
1314
1315/*
1316 *  Initialisation
1317 */
1318
1319static void
1320tgafb_init_fix(struct fb_info *info)
1321{
1322	struct tga_par *par = (struct tga_par *)info->par;
1323	int tga_bus_pci = dev_is_pci(par->dev);
1324	int tga_bus_tc = TGA_BUS_TC(par->dev);
1325	u8 tga_type = par->tga_type;
1326	const char *tga_type_name = NULL;
1327	unsigned memory_size;
1328
1329	switch (tga_type) {
1330	case TGA_TYPE_8PLANE:
1331		if (tga_bus_pci)
1332			tga_type_name = "Digital ZLXp-E1";
1333		if (tga_bus_tc)
1334			tga_type_name = "Digital ZLX-E1";
1335		memory_size = 2097152;
1336		break;
1337	case TGA_TYPE_24PLANE:
1338		if (tga_bus_pci)
1339			tga_type_name = "Digital ZLXp-E2";
1340		if (tga_bus_tc)
1341			tga_type_name = "Digital ZLX-E2";
1342		memory_size = 8388608;
1343		break;
1344	case TGA_TYPE_24PLUSZ:
1345		if (tga_bus_pci)
1346			tga_type_name = "Digital ZLXp-E3";
1347		if (tga_bus_tc)
1348			tga_type_name = "Digital ZLX-E3";
1349		memory_size = 16777216;
1350		break;
1351	}
1352	if (!tga_type_name) {
1353		tga_type_name = "Unknown";
1354		memory_size = 16777216;
1355	}
1356
1357	strscpy(info->fix.id, tga_type_name, sizeof(info->fix.id));
1358
1359	info->fix.type = FB_TYPE_PACKED_PIXELS;
1360	info->fix.type_aux = 0;
1361	info->fix.visual = (tga_type == TGA_TYPE_8PLANE
1362			    ? FB_VISUAL_PSEUDOCOLOR
1363			    : FB_VISUAL_DIRECTCOLOR);
1364
1365	info->fix.smem_start = (size_t) par->tga_fb_base;
1366	info->fix.smem_len = memory_size;
1367	info->fix.mmio_start = (size_t) par->tga_regs_base;
1368	info->fix.mmio_len = 512;
1369
1370	info->fix.xpanstep = 0;
1371	info->fix.ypanstep = 0;
1372	info->fix.ywrapstep = 0;
1373
1374	info->fix.accel = FB_ACCEL_DEC_TGA;
1375
1376	/*
1377	 * These are needed by fb_set_logo_truepalette(), so we
1378	 * set them here for 24-plane cards.
1379	 */
1380	if (tga_type != TGA_TYPE_8PLANE) {
1381		info->var.red.length = 8;
1382		info->var.green.length = 8;
1383		info->var.blue.length = 8;
1384		info->var.red.offset = 16;
1385		info->var.green.offset = 8;
1386		info->var.blue.offset = 0;
1387	}
1388}
1389
1390static int tgafb_pan_display(struct fb_var_screeninfo *var, struct fb_info *info)
1391{
1392	/* We just use this to catch switches out of graphics mode. */
1393	tgafb_set_par(info); /* A bit of overkill for BASE_ADDR reset. */
1394	return 0;
1395}
1396
1397static int tgafb_register(struct device *dev)
1398{
1399	static const struct fb_videomode modedb_tc = {
1400		/* 1280x1024 @ 72 Hz, 76.8 kHz hsync */
1401		"1280x1024@72", 0, 1280, 1024, 7645, 224, 28, 33, 3, 160, 3,
1402		FB_SYNC_ON_GREEN, FB_VMODE_NONINTERLACED
1403	};
1404
1405	static unsigned int const fb_offset_presets[4] = {
1406		TGA_8PLANE_FB_OFFSET,
1407		TGA_24PLANE_FB_OFFSET,
1408		0xffffffff,
1409		TGA_24PLUSZ_FB_OFFSET
1410	};
1411
1412	const struct fb_videomode *modedb_tga = NULL;
1413	resource_size_t bar0_start = 0, bar0_len = 0;
1414	const char *mode_option_tga = NULL;
1415	int tga_bus_pci = dev_is_pci(dev);
1416	int tga_bus_tc = TGA_BUS_TC(dev);
1417	unsigned int modedbsize_tga = 0;
1418	void __iomem *mem_base;
1419	struct fb_info *info;
1420	struct tga_par *par;
1421	u8 tga_type;
1422	int ret = 0;
1423
1424	/* Enable device in PCI config.  */
1425	if (tga_bus_pci && pci_enable_device(to_pci_dev(dev))) {
1426		printk(KERN_ERR "tgafb: Cannot enable PCI device\n");
1427		return -ENODEV;
1428	}
1429
1430	/* Allocate the fb and par structures.  */
1431	info = framebuffer_alloc(sizeof(struct tga_par), dev);
1432	if (!info)
1433		return -ENOMEM;
1434
1435	par = info->par;
1436	dev_set_drvdata(dev, info);
1437
1438	/* Request the mem regions.  */
1439	ret = -ENODEV;
1440	if (tga_bus_pci) {
1441		bar0_start = pci_resource_start(to_pci_dev(dev), 0);
1442		bar0_len = pci_resource_len(to_pci_dev(dev), 0);
1443	}
1444	if (tga_bus_tc) {
1445		bar0_start = to_tc_dev(dev)->resource.start;
1446		bar0_len = to_tc_dev(dev)->resource.end - bar0_start + 1;
1447	}
1448	if (!request_mem_region (bar0_start, bar0_len, "tgafb")) {
1449		printk(KERN_ERR "tgafb: cannot reserve FB region\n");
1450		goto err0;
1451	}
1452
1453	/* Map the framebuffer.  */
1454	mem_base = ioremap(bar0_start, bar0_len);
1455	if (!mem_base) {
1456		printk(KERN_ERR "tgafb: Cannot map MMIO\n");
1457		goto err1;
1458	}
1459
1460	/* Grab info about the card.  */
1461	tga_type = (readl(mem_base) >> 12) & 0x0f;
1462	par->dev = dev;
1463	par->tga_mem_base = mem_base;
1464	par->tga_fb_base = mem_base + fb_offset_presets[tga_type];
1465	par->tga_regs_base = mem_base + TGA_REGS_OFFSET;
1466	par->tga_type = tga_type;
1467	if (tga_bus_pci)
1468		par->tga_chip_rev = (to_pci_dev(dev))->revision;
1469	if (tga_bus_tc)
1470		par->tga_chip_rev = TGA_READ_REG(par, TGA_START_REG) & 0xff;
1471
1472	/* Setup framebuffer.  */
1473	info->flags = FBINFO_HWACCEL_COPYAREA |
1474		      FBINFO_HWACCEL_IMAGEBLIT | FBINFO_HWACCEL_FILLRECT;
1475	info->fbops = &tgafb_ops;
1476	info->screen_base = par->tga_fb_base;
1477	info->pseudo_palette = par->palette;
1478
1479	/* This should give a reasonable default video mode.  */
1480	if (tga_bus_pci) {
1481		mode_option_tga = mode_option_pci;
1482	}
1483	if (tga_bus_tc) {
1484		mode_option_tga = mode_option_tc;
1485		modedb_tga = &modedb_tc;
1486		modedbsize_tga = 1;
1487	}
1488
1489	tgafb_init_fix(info);
1490
1491	ret = fb_find_mode(&info->var, info,
1492			   mode_option ? mode_option : mode_option_tga,
1493			   modedb_tga, modedbsize_tga, NULL,
1494			   tga_type == TGA_TYPE_8PLANE ? 8 : 32);
1495	if (ret == 0 || ret == 4) {
1496		printk(KERN_ERR "tgafb: Could not find valid video mode\n");
1497		ret = -EINVAL;
1498		goto err1;
1499	}
1500
1501	if (fb_alloc_cmap(&info->cmap, 256, 0)) {
1502		printk(KERN_ERR "tgafb: Could not allocate color map\n");
1503		ret = -ENOMEM;
1504		goto err1;
1505	}
1506
1507	tgafb_set_par(info);
1508
1509	if (register_framebuffer(info) < 0) {
1510		printk(KERN_ERR "tgafb: Could not register framebuffer\n");
1511		ret = -EINVAL;
1512		goto err2;
1513	}
1514
1515	if (tga_bus_pci) {
1516		pr_info("tgafb: DC21030 [TGA] detected, rev=0x%02x\n",
1517			par->tga_chip_rev);
1518		pr_info("tgafb: at PCI bus %d, device %d, function %d\n",
1519			to_pci_dev(dev)->bus->number,
1520			PCI_SLOT(to_pci_dev(dev)->devfn),
1521			PCI_FUNC(to_pci_dev(dev)->devfn));
1522	}
1523	if (tga_bus_tc)
1524		pr_info("tgafb: SFB+ detected, rev=0x%02x\n",
1525			par->tga_chip_rev);
1526	fb_info(info, "%s frame buffer device at 0x%lx\n",
1527		info->fix.id, (long)bar0_start);
1528
1529	return 0;
1530
1531 err2:
1532	fb_dealloc_cmap(&info->cmap);
1533 err1:
1534	if (mem_base)
1535		iounmap(mem_base);
1536	release_mem_region(bar0_start, bar0_len);
1537 err0:
1538	framebuffer_release(info);
1539	return ret;
1540}
1541
1542static void tgafb_unregister(struct device *dev)
1543{
1544	resource_size_t bar0_start = 0, bar0_len = 0;
1545	int tga_bus_pci = dev_is_pci(dev);
1546	int tga_bus_tc = TGA_BUS_TC(dev);
1547	struct fb_info *info = NULL;
1548	struct tga_par *par;
1549
1550	info = dev_get_drvdata(dev);
1551	if (!info)
1552		return;
1553
1554	par = info->par;
1555	unregister_framebuffer(info);
1556	fb_dealloc_cmap(&info->cmap);
1557	iounmap(par->tga_mem_base);
1558	if (tga_bus_pci) {
1559		bar0_start = pci_resource_start(to_pci_dev(dev), 0);
1560		bar0_len = pci_resource_len(to_pci_dev(dev), 0);
1561	}
1562	if (tga_bus_tc) {
1563		bar0_start = to_tc_dev(dev)->resource.start;
1564		bar0_len = to_tc_dev(dev)->resource.end - bar0_start + 1;
1565	}
1566	release_mem_region(bar0_start, bar0_len);
1567	framebuffer_release(info);
1568}
1569
1570static void tgafb_exit(void)
1571{
1572	tc_unregister_driver(&tgafb_tc_driver);
1573	pci_unregister_driver(&tgafb_pci_driver);
1574}
1575
1576#ifndef MODULE
1577static int tgafb_setup(char *arg)
1578{
1579	char *this_opt;
1580
1581	if (arg && *arg) {
1582		while ((this_opt = strsep(&arg, ","))) {
1583			if (!*this_opt)
1584				continue;
1585			if (!strncmp(this_opt, "mode:", 5))
1586				mode_option = this_opt+5;
1587			else
1588				printk(KERN_ERR
1589				       "tgafb: unknown parameter %s\n",
1590				       this_opt);
1591		}
1592	}
1593
1594	return 0;
1595}
1596#endif /* !MODULE */
1597
1598static int tgafb_init(void)
1599{
1600	int status;
1601#ifndef MODULE
1602	char *option = NULL;
1603#endif
1604
1605	if (fb_modesetting_disabled("tgafb"))
1606		return -ENODEV;
1607
1608#ifndef MODULE
1609	if (fb_get_options("tgafb", &option))
1610		return -ENODEV;
1611	tgafb_setup(option);
1612#endif
1613	status = pci_register_driver(&tgafb_pci_driver);
1614	if (!status)
1615		status = tc_register_driver(&tgafb_tc_driver);
1616	return status;
1617}
1618
1619/*
1620 *  Modularisation
1621 */
1622
1623module_init(tgafb_init);
1624module_exit(tgafb_exit);
1625
1626MODULE_DESCRIPTION("Framebuffer driver for TGA/SFB+ chipset");
1627MODULE_LICENSE("GPL");
1628