1841 lines · 43.9 KB · C
RawDownload
// SPDX-License-Identifier: GPL-2.0-only/* * Frame buffer driver for Trident TGUI, Blade and Image series * * Copyright 2001, 2002 - Jani Monoses   <jani@iv.ro> * Copyright 2009 Krzysztof Helt <krzysztof.h1@wp.pl> * * CREDITS:(in order of appearance) *	skeletonfb.c by Geert Uytterhoeven and other fb code in drivers/video *	Special thanks ;) to Mattia Crivellini <tia@mclink.it> *	much inspired by the XFree86 4.x Trident driver sources *	by Alan Hourihane the FreeVGA project *	Francesco Salvestrini <salvestrini@users.sf.net> XP support, *	code, suggestions * TODO: *	timing value tweaking so it looks good on every monitor in every mode */ #include <linux/aperture.h>#include <linux/module.h>#include <linux/fb.h>#include <linux/init.h>#include <linux/pci.h>#include <linux/slab.h> #include <linux/delay.h>#include <video/vga.h>#include <video/trident.h> #include <linux/i2c.h>#include <linux/i2c-algo-bit.h> struct tridentfb_par {	void __iomem *io_virt;	/* iospace virtual memory address */	u32 pseudo_pal[16];	int chip_id;	int flatpanel;	void (*init_accel) (struct tridentfb_par *, int, int);	void (*wait_engine) (struct tridentfb_par *);	void (*fill_rect)		(struct tridentfb_par *par, u32, u32, u32, u32, u32, u32);	void (*copy_rect)		(struct tridentfb_par *par, u32, u32, u32, u32, u32, u32);	void (*image_blit)		(struct tridentfb_par *par, const char*,		 u32, u32, u32, u32, u32, u32);	unsigned char eng_oper;	/* engine operation... */	bool ddc_registered;	struct i2c_adapter ddc_adapter;	struct i2c_algo_bit_data ddc_algo;}; static struct fb_fix_screeninfo tridentfb_fix = {	.id = "Trident",	.type = FB_TYPE_PACKED_PIXELS,	.ypanstep = 1,	.visual = FB_VISUAL_PSEUDOCOLOR,	.accel = FB_ACCEL_NONE,}; /* defaults which are normally overriden by user values */ /* video mode */static char *mode_option;static int bpp = 8; static int noaccel; static int center;static int stretch; static int fp;static int crt; static int memsize;static int memdiff;static int nativex; module_param(mode_option, charp, 0);MODULE_PARM_DESC(mode_option, "Initial video mode e.g. '648x480-8@60'");module_param_named(mode, mode_option, charp, 0);MODULE_PARM_DESC(mode, "Initial video mode e.g. '648x480-8@60' (deprecated)");module_param(bpp, int, 0);module_param(center, int, 0);module_param(stretch, int, 0);module_param(noaccel, int, 0);module_param(memsize, int, 0);module_param(memdiff, int, 0);module_param(nativex, int, 0);module_param(fp, int, 0);MODULE_PARM_DESC(fp, "Define if flatpanel is connected");module_param(crt, int, 0);MODULE_PARM_DESC(crt, "Define if CRT is connected"); static inline int is_oldclock(int id){	return	(id == TGUI9440) ||		(id == TGUI9660) ||		(id == CYBER9320);} static inline int is_oldprotect(int id){	return	is_oldclock(id) ||		(id == PROVIDIA9685) ||		(id == CYBER9382) ||		(id == CYBER9385);} static inline int is_blade(int id){	return	(id == BLADE3D) ||		(id == CYBERBLADEE4) ||		(id == CYBERBLADEi7) ||		(id == CYBERBLADEi7D) ||		(id == CYBERBLADEi1) ||		(id == CYBERBLADEi1D) ||		(id == CYBERBLADEAi1) ||		(id == CYBERBLADEAi1D);} static inline int is_xp(int id){	return	(id == CYBERBLADEXPAi1) ||		(id == CYBERBLADEXPm8) ||		(id == CYBERBLADEXPm16);} static inline int is3Dchip(int id){	return	is_blade(id) || is_xp(id) ||		(id == CYBER9397) || (id == CYBER9397DVD) ||		(id == CYBER9520) || (id == CYBER9525DVD) ||		(id == IMAGE975) || (id == IMAGE985);} static inline int iscyber(int id){	switch (id) {	case CYBER9388:	case CYBER9382:	case CYBER9385:	case CYBER9397:	case CYBER9397DVD:	case CYBER9520:	case CYBER9525DVD:	case CYBERBLADEE4:	case CYBERBLADEi7D:	case CYBERBLADEi1:	case CYBERBLADEi1D:	case CYBERBLADEAi1:	case CYBERBLADEAi1D:	case CYBERBLADEXPAi1:		return 1; 	case CYBER9320:	case CYBERBLADEi7:	/* VIA MPV4 integrated version */	default:		/* case CYBERBLDAEXPm8:  Strange */		/* case CYBERBLDAEXPm16: Strange */		return 0;	}} static inline void t_outb(struct tridentfb_par *p, u8 val, u16 reg){	fb_writeb(val, p->io_virt + reg);} static inline u8 t_inb(struct tridentfb_par *p, u16 reg){	return fb_readb(p->io_virt + reg);} static inline void writemmr(struct tridentfb_par *par, u16 r, u32 v){	fb_writel(v, par->io_virt + r);} static inline u32 readmmr(struct tridentfb_par *par, u16 r){	return fb_readl(par->io_virt + r);} #define DDC_SDA_TGUI		BIT(0)#define DDC_SCL_TGUI		BIT(1)#define DDC_SCL_DRIVE_TGUI	BIT(2)#define DDC_SDA_DRIVE_TGUI	BIT(3)#define DDC_MASK_TGUI		(DDC_SCL_DRIVE_TGUI | DDC_SDA_DRIVE_TGUI) static void tridentfb_ddc_setscl_tgui(void *data, int val){	struct tridentfb_par *par = data;	u8 reg = vga_mm_rcrt(par->io_virt, I2C) & DDC_MASK_TGUI; 	if (val)		reg &= ~DDC_SCL_DRIVE_TGUI; /* disable drive - don't drive hi */	else		reg |= DDC_SCL_DRIVE_TGUI; /* drive low */ 	vga_mm_wcrt(par->io_virt, I2C, reg);} static void tridentfb_ddc_setsda_tgui(void *data, int val){	struct tridentfb_par *par = data;	u8 reg = vga_mm_rcrt(par->io_virt, I2C) & DDC_MASK_TGUI; 	if (val)		reg &= ~DDC_SDA_DRIVE_TGUI; /* disable drive - don't drive hi */	else		reg |= DDC_SDA_DRIVE_TGUI; /* drive low */ 	vga_mm_wcrt(par->io_virt, I2C, reg);} static int tridentfb_ddc_getsda_tgui(void *data){	struct tridentfb_par *par = data; 	return !!(vga_mm_rcrt(par->io_virt, I2C) & DDC_SDA_TGUI);} #define DDC_SDA_IN	BIT(0)#define DDC_SCL_OUT	BIT(1)#define DDC_SDA_OUT	BIT(3)#define DDC_SCL_IN	BIT(6)#define DDC_MASK	(DDC_SCL_OUT | DDC_SDA_OUT) static void tridentfb_ddc_setscl(void *data, int val){	struct tridentfb_par *par = data;	unsigned char reg; 	reg = vga_mm_rcrt(par->io_virt, I2C) & DDC_MASK;	if (val)		reg |= DDC_SCL_OUT;	else		reg &= ~DDC_SCL_OUT;	vga_mm_wcrt(par->io_virt, I2C, reg);} static void tridentfb_ddc_setsda(void *data, int val){	struct tridentfb_par *par = data;	unsigned char reg; 	reg = vga_mm_rcrt(par->io_virt, I2C) & DDC_MASK;	if (!val)		reg |= DDC_SDA_OUT;	else		reg &= ~DDC_SDA_OUT;	vga_mm_wcrt(par->io_virt, I2C, reg);} static int tridentfb_ddc_getscl(void *data){	struct tridentfb_par *par = data; 	return !!(vga_mm_rcrt(par->io_virt, I2C) & DDC_SCL_IN);} static int tridentfb_ddc_getsda(void *data){	struct tridentfb_par *par = data; 	return !!(vga_mm_rcrt(par->io_virt, I2C) & DDC_SDA_IN);} static int tridentfb_setup_ddc_bus(struct fb_info *info){	struct tridentfb_par *par = info->par; 	strscpy(par->ddc_adapter.name, info->fix.id,		sizeof(par->ddc_adapter.name));	par->ddc_adapter.owner		= THIS_MODULE;	par->ddc_adapter.algo_data	= &par->ddc_algo;	par->ddc_adapter.dev.parent	= info->device;	if (is_oldclock(par->chip_id)) { /* not sure if this check is OK */		par->ddc_algo.setsda	= tridentfb_ddc_setsda_tgui;		par->ddc_algo.setscl	= tridentfb_ddc_setscl_tgui;		par->ddc_algo.getsda	= tridentfb_ddc_getsda_tgui;		/* no getscl */	} else {		par->ddc_algo.setsda	= tridentfb_ddc_setsda;		par->ddc_algo.setscl	= tridentfb_ddc_setscl;		par->ddc_algo.getsda	= tridentfb_ddc_getsda;		par->ddc_algo.getscl	= tridentfb_ddc_getscl;	}	par->ddc_algo.udelay		= 10;	par->ddc_algo.timeout		= 20;	par->ddc_algo.data		= par; 	i2c_set_adapdata(&par->ddc_adapter, par); 	return i2c_bit_add_bus(&par->ddc_adapter);} /* * Blade specific acceleration. */ #define point(x, y) ((y) << 16 | (x)) static void blade_init_accel(struct tridentfb_par *par, int pitch, int bpp){	int v1 = (pitch >> 3) << 20;	int tmp = bpp == 24 ? 2 : (bpp >> 4);	int v2 = v1 | (tmp << 29); 	writemmr(par, 0x21C0, v2);	writemmr(par, 0x21C4, v2);	writemmr(par, 0x21B8, v2);	writemmr(par, 0x21BC, v2);	writemmr(par, 0x21D0, v1);	writemmr(par, 0x21D4, v1);	writemmr(par, 0x21C8, v1);	writemmr(par, 0x21CC, v1);	writemmr(par, 0x216C, 0);} static void blade_wait_engine(struct tridentfb_par *par){	while (readmmr(par, STATUS) & 0xFA800000)		cpu_relax();} static void blade_fill_rect(struct tridentfb_par *par,			    u32 x, u32 y, u32 w, u32 h, u32 c, u32 rop){	writemmr(par, COLOR, c);	writemmr(par, ROP, rop ? ROP_X : ROP_S);	writemmr(par, CMD, 0x20000000 | 1 << 19 | 1 << 4 | 2 << 2); 	writemmr(par, DST1, point(x, y));	writemmr(par, DST2, point(x + w - 1, y + h - 1));} static void blade_image_blit(struct tridentfb_par *par, const char *data,			     u32 x, u32 y, u32 w, u32 h, u32 c, u32 b){	unsigned size = ((w + 31) >> 5) * h; 	writemmr(par, COLOR, c);	writemmr(par, BGCOLOR, b);	writemmr(par, CMD, 0xa0000000 | 3 << 19); 	writemmr(par, DST1, point(x, y));	writemmr(par, DST2, point(x + w - 1, y + h - 1)); 	iowrite32_rep(par->io_virt + 0x10000, data, size);} static void blade_copy_rect(struct tridentfb_par *par,			    u32 x1, u32 y1, u32 x2, u32 y2, u32 w, u32 h){	int direction = 2;	u32 s1 = point(x1, y1);	u32 s2 = point(x1 + w - 1, y1 + h - 1);	u32 d1 = point(x2, y2);	u32 d2 = point(x2 + w - 1, y2 + h - 1); 	if ((y1 > y2) || ((y1 == y2) && (x1 > x2)))		direction = 0; 	writemmr(par, ROP, ROP_S);	writemmr(par, CMD, 0xE0000000 | 1 << 19 | 1 << 4 | 1 << 2 | direction); 	writemmr(par, SRC1, direction ? s2 : s1);	writemmr(par, SRC2, direction ? s1 : s2);	writemmr(par, DST1, direction ? d2 : d1);	writemmr(par, DST2, direction ? d1 : d2);} /* * BladeXP specific acceleration functions */ static void xp_init_accel(struct tridentfb_par *par, int pitch, int bpp){	unsigned char x = bpp == 24 ? 3 : (bpp >> 4);	int v1 = pitch << (bpp == 24 ? 20 : (18 + x)); 	switch (pitch << (bpp >> 3)) {	case 8192:	case 512:		x |= 0x00;		break;	case 1024:		x |= 0x04;		break;	case 2048:		x |= 0x08;		break;	case 4096:		x |= 0x0C;		break;	} 	t_outb(par, x, 0x2125); 	par->eng_oper = x | 0x40; 	writemmr(par, 0x2154, v1);	writemmr(par, 0x2150, v1);	t_outb(par, 3, 0x2126);} static void xp_wait_engine(struct tridentfb_par *par){	int count = 0;	int timeout = 0; 	while (t_inb(par, STATUS) & 0x80) {		count++;		if (count == 10000000) {			/* Timeout */			count = 9990000;			timeout++;			if (timeout == 8) {				/* Reset engine */				t_outb(par, 0x00, STATUS);				return;			}		}		cpu_relax();	}} static void xp_fill_rect(struct tridentfb_par *par,			 u32 x, u32 y, u32 w, u32 h, u32 c, u32 rop){	writemmr(par, 0x2127, ROP_P);	writemmr(par, 0x2158, c);	writemmr(par, DRAWFL, 0x4000);	writemmr(par, OLDDIM, point(h, w));	writemmr(par, OLDDST, point(y, x));	t_outb(par, 0x01, OLDCMD);	t_outb(par, par->eng_oper, 0x2125);} static void xp_copy_rect(struct tridentfb_par *par,			 u32 x1, u32 y1, u32 x2, u32 y2, u32 w, u32 h){	u32 x1_tmp, x2_tmp, y1_tmp, y2_tmp;	int direction = 0x0004; 	if ((x1 < x2) && (y1 == y2)) {		direction |= 0x0200;		x1_tmp = x1 + w - 1;		x2_tmp = x2 + w - 1;	} else {		x1_tmp = x1;		x2_tmp = x2;	} 	if (y1 < y2) {		direction |= 0x0100;		y1_tmp = y1 + h - 1;		y2_tmp = y2 + h - 1;	} else {		y1_tmp = y1;		y2_tmp = y2;	} 	writemmr(par, DRAWFL, direction);	t_outb(par, ROP_S, 0x2127);	writemmr(par, OLDSRC, point(y1_tmp, x1_tmp));	writemmr(par, OLDDST, point(y2_tmp, x2_tmp));	writemmr(par, OLDDIM, point(h, w));	t_outb(par, 0x01, OLDCMD);} /* * Image specific acceleration functions */static void image_init_accel(struct tridentfb_par *par, int pitch, int bpp){	int tmp = bpp == 24 ? 2: (bpp >> 4); 	writemmr(par, 0x2120, 0xF0000000);	writemmr(par, 0x2120, 0x40000000 | tmp);	writemmr(par, 0x2120, 0x80000000);	writemmr(par, 0x2144, 0x00000000);	writemmr(par, 0x2148, 0x00000000);	writemmr(par, 0x2150, 0x00000000);	writemmr(par, 0x2154, 0x00000000);	writemmr(par, 0x2120, 0x60000000 | (pitch << 16) | pitch);	writemmr(par, 0x216C, 0x00000000);	writemmr(par, 0x2170, 0x00000000);	writemmr(par, 0x217C, 0x00000000);	writemmr(par, 0x2120, 0x10000000);	writemmr(par, 0x2130, (2047 << 16) | 2047);} static void image_wait_engine(struct tridentfb_par *par){	while (readmmr(par, 0x2164) & 0xF0000000)		cpu_relax();}

Lines 1–500 of 1841.