[mirror_ubuntu-bionic-kernel.git] / drivers / video / vesafb.c

/*
 * framebuffer driver for VBE 2.0 compliant graphic boards
 *
 * switching to graphics mode happens at boot time (while
 * running in real mode, see arch/i386/boot/video.S).
 *
 * (c) 1998 Gerd Knorr <kraxel@goldbach.in-berlin.de>
 *
 */

#include <linux/module.h>
#include <linux/kernel.h>
#include <linux/errno.h>
#include <linux/string.h>
#include <linux/mm.h>
#include <linux/tty.h>
#include <linux/slab.h>
#include <linux/delay.h>
#include <linux/fb.h>
#include <linux/ioport.h>
#include <linux/init.h>
#include <linux/platform_device.h>

#include <video/vga.h>
#include <asm/io.h>
#include <asm/mtrr.h>

#define dac_reg	(0x3c8)
#define dac_val	(0x3c9)

/* --------------------------------------------------------------------- */

static struct fb_var_screeninfo vesafb_defined __initdata = {
	.activate	= FB_ACTIVATE_NOW,
	.height		= -1,
	.width		= -1,
	.right_margin	= 32,
	.upper_margin	= 16,
	.lower_margin	= 4,
	.vsync_len	= 4,
	.vmode		= FB_VMODE_NONINTERLACED,
};

static struct fb_fix_screeninfo vesafb_fix __initdata = {
	.id	= "VESA VGA",
	.type	= FB_TYPE_PACKED_PIXELS,
	.accel	= FB_ACCEL_NONE,
};

static int             inverse   = 0;
static int             mtrr      = 0; /* disable mtrr */
static int	       vram_remap __initdata = 0; /* Set amount of memory to be used */
static int	       vram_total __initdata = 0; /* Set total amount of memory */
static int             pmi_setpal = 0;	/* pmi for palette changes ??? */
static int             ypan       = 0;  /* 0..nothing, 1..ypan, 2..ywrap */
static unsigned short  *pmi_base  = NULL;
static void            (*pmi_start)(void);
static void            (*pmi_pal)(void);
static int             depth;
static int             vga_compat;

/* --------------------------------------------------------------------- */

static int vesafb_pan_display(struct fb_var_screeninfo *var,
                              struct fb_info *info)
{
#ifdef __i386__
	int offset;

	if (!ypan)
		return -EINVAL;
	if (var->xoffset)
		return -EINVAL;
	if (var->yoffset > var->yres_virtual)
		return -EINVAL;
	if ((ypan==1) && var->yoffset+var->yres > var->yres_virtual)
		return -EINVAL;

	offset = (var->yoffset * info->fix.line_length + var->xoffset) / 4;

        __asm__ __volatile__(
                "call *(%%edi)"
                : /* no return value */
                : "a" (0x4f07),         /* EAX */
                  "b" (0),              /* EBX */
                  "c" (offset),         /* ECX */
                  "d" (offset >> 16),   /* EDX */
                  "D" (&pmi_start));    /* EDI */
#endif
	return 0;
}

static int vesafb_blank(int blank, struct fb_info *info)
{
	int err = 1;

	if (vga_compat) {
		int loop = 10000;
		u8 seq = 0, crtc17 = 0;

		if (blank == FB_BLANK_POWERDOWN) {
			seq = 0x20;
			crtc17 = 0x00;
			err = 0;
		} else {
			seq = 0x00;
			crtc17 = 0x80;
			err = (blank == FB_BLANK_UNBLANK) ? 0 : -EINVAL;
		}

		vga_wseq(NULL, 0x00, 0x01);
		seq |= vga_rseq(NULL, 0x01) & ~0x20;
		vga_wseq(NULL, 0x00, seq);

		crtc17 |= vga_rcrt(NULL, 0x17) & ~0x80;
		while (loop--);
		vga_wcrt(NULL, 0x17, crtc17);
		vga_wseq(NULL, 0x00, 0x03);
	}

	return err;
}

static void vesa_setpalette(int regno, unsigned red, unsigned green,
			    unsigned blue)
{
#ifdef __i386__
	struct { u_char blue, green, red, pad; } entry;
	int shift = 16 - depth;

	if (pmi_setpal) {
		entry.red   = red   >> shift;
		entry.green = green >> shift;
		entry.blue  = blue  >> shift;
		entry.pad   = 0;
	        __asm__ __volatile__(
                "call *(%%esi)"
                : /* no return value */
                : "a" (0x4f09),         /* EAX */
                  "b" (0),              /* EBX */
                  "c" (1),              /* ECX */
                  "d" (regno),          /* EDX */
                  "D" (&entry),         /* EDI */
                  "S" (&pmi_pal));      /* ESI */
	} else {
		/* without protected mode interface, try VGA registers... */
		outb_p(regno,       dac_reg);
		outb_p(red   >> shift, dac_val);
		outb_p(green >> shift, dac_val);
		outb_p(blue  >> shift, dac_val);
	}
#endif
}

static int vesafb_setcolreg(unsigned regno, unsigned red, unsigned green,
			    unsigned blue, unsigned transp,
			    struct fb_info *info)
{
	/*
	 *  Set a single color register. The values supplied are
	 *  already rounded down to the hardware's capabilities
	 *  (according to the entries in the `var' structure). Return
	 *  != 0 for invalid regno.
	 */
	
	if (regno >= info->cmap.len)
		return 1;

	if (info->var.bits_per_pixel == 8)
		vesa_setpalette(regno,red,green,blue);
	else if (regno < 16) {
		switch (info->var.bits_per_pixel) {
		case 16:
			if (info->var.red.offset == 10) {
				/* 1:5:5:5 */
				((u32*) (info->pseudo_palette))[regno] =
					((red   & 0xf800) >>  1) |
					((green & 0xf800) >>  6) |
					((blue  & 0xf800) >> 11);
			} else {
				/* 0:5:6:5 */
				((u32*) (info->pseudo_palette))[regno] =
					((red   & 0xf800)      ) |
					((green & 0xfc00) >>  5) |
					((blue  & 0xf800) >> 11);
			}
			break;
		case 24:
		case 32:
			red   >>= 8;
			green >>= 8;
			blue  >>= 8;
			((u32 *)(info->pseudo_palette))[regno] =
				(red   << info->var.red.offset)   |
				(green << info->var.green.offset) |
				(blue  << info->var.blue.offset);
			break;
		}
	}

	return 0;
}

static struct fb_ops vesafb_ops = {
	.owner		= THIS_MODULE,
	.fb_setcolreg	= vesafb_setcolreg,
	.fb_pan_display	= vesafb_pan_display,
	.fb_blank       = vesafb_blank,
	.fb_fillrect	= cfb_fillrect,
	.fb_copyarea	= cfb_copyarea,
	.fb_imageblit	= cfb_imageblit,
};

static int __init vesafb_setup(char *options)
{
	char *this_opt;
	
	if (!options || !*options)
		return 0;
	
	while ((this_opt = strsep(&options, ",")) != NULL) {
		if (!*this_opt) continue;
		
		if (! strcmp(this_opt, "inverse"))
			inverse=1;
		else if (! strcmp(this_opt, "redraw"))
			ypan=0;
		else if (! strcmp(this_opt, "ypan"))
			ypan=1;
		else if (! strcmp(this_opt, "ywrap"))
			ypan=2;
		else if (! strcmp(this_opt, "vgapal"))
			pmi_setpal=0;
		else if (! strcmp(this_opt, "pmipal"))
			pmi_setpal=1;
		else if (! strncmp(this_opt, "mtrr:", 5))
			mtrr = simple_strtoul(this_opt+5, NULL, 0);
		else if (! strcmp(this_opt, "nomtrr"))
			mtrr=0;
		else if (! strncmp(this_opt, "vtotal:", 7))
			vram_total = simple_strtoul(this_opt+7, NULL, 0);
		else if (! strncmp(this_opt, "vremap:", 7))
			vram_remap = simple_strtoul(this_opt+7, NULL, 0);
	}
	return 0;
}

static int __init vesafb_probe(struct device *device)
{
	struct platform_device *dev = to_platform_device(device);
	struct fb_info *info;
	int i, err;
	unsigned int size_vmode;
	unsigned int size_remap;
	unsigned int size_total;

	if (screen_info.orig_video_isVGA != VIDEO_TYPE_VLFB)
		return -ENODEV;

	vesafb_fix.smem_start = screen_info.lfb_base;
	vesafb_defined.bits_per_pixel = screen_info.lfb_depth;
	if (15 == vesafb_defined.bits_per_pixel)
		vesafb_defined.bits_per_pixel = 16;
	vesafb_defined.xres = screen_info.lfb_width;
	vesafb_defined.yres = screen_info.lfb_height;
	vesafb_fix.line_length = screen_info.lfb_linelength;
	vesafb_fix.visual   = (vesafb_defined.bits_per_pixel == 8) ?
		FB_VISUAL_PSEUDOCOLOR : FB_VISUAL_TRUECOLOR;

	/*   size_vmode -- that is the amount of memory needed for the
	 *                 used video mode, i.e. the minimum amount of
	 *                 memory we need. */
	size_vmode = vesafb_defined.yres * vesafb_fix.line_length;

	/*   size_total -- all video memory we have. Used for mtrr
	 *                 entries, ressource allocation and bounds
	 *                 checking. */
	size_total = screen_info.lfb_size * 65536;
	if (vram_total)
		size_total = vram_total * 1024 * 1024;
	if (size_total < size_vmode)
		size_total = size_vmode;

	/*   size_remap -- the amount of video memory we are going to
	 *                 use for vesafb.  With modern cards it is no
	 *                 option to simply use size_total as that
	 *                 wastes plenty of kernel address space. */
	size_remap  = size_vmode * 2;
	if (vram_remap)
		size_remap = vram_remap * 1024 * 1024;
	if (size_remap < size_vmode)
		size_remap = size_vmode;
	if (size_remap > size_total)
		size_remap = size_total;
	vesafb_fix.smem_len = size_remap;

#ifndef __i386__
	screen_info.vesapm_seg = 0;
#endif

	if (!request_mem_region(vesafb_fix.smem_start, size_total, "vesafb")) {
		printk(KERN_WARNING
		       "vesafb: cannot reserve video memory at 0x%lx\n",
			vesafb_fix.smem_start);
		/* We cannot make this fatal. Sometimes this comes from magic
		   spaces our resource handlers simply don't know about */
	}

	info = framebuffer_alloc(sizeof(u32) * 256, &dev->dev);
	if (!info) {
		release_mem_region(vesafb_fix.smem_start, size_total);
		return -ENOMEM;
	}
	info->pseudo_palette = info->par;
	info->par = NULL;

	info->screen_base = ioremap(vesafb_fix.smem_start, vesafb_fix.smem_len);
	if (!info->screen_base) {
		printk(KERN_ERR
		       "vesafb: abort, cannot ioremap video memory 0x%x @ 0x%lx\n",
			vesafb_fix.smem_len, vesafb_fix.smem_start);
		err = -EIO;
		goto err;
	}

	printk(KERN_INFO "vesafb: framebuffer at 0x%lx, mapped to 0x%p, "
	       "using %dk, total %dk\n",
	       vesafb_fix.smem_start, info->screen_base,
	       size_remap/1024, size_total/1024);
	printk(KERN_INFO "vesafb: mode is %dx%dx%d, linelength=%d, pages=%d\n",
	       vesafb_defined.xres, vesafb_defined.yres, vesafb_defined.bits_per_pixel, vesafb_fix.line_length, screen_info.pages);

	if (screen_info.vesapm_seg) {
		printk(KERN_INFO "vesafb: protected mode interface info at %04x:%04x\n",
		       screen_info.vesapm_seg,screen_info.vesapm_off);
	}

	if (screen_info.vesapm_seg < 0xc000)
		ypan = pmi_setpal = 0; /* not available or some DOS TSR ... */

	if (ypan || pmi_setpal) {
		pmi_base  = (unsigned short*)phys_to_virt(((unsigned long)screen_info.vesapm_seg << 4) + screen_info.vesapm_off);
		pmi_start = (void*)((char*)pmi_base + pmi_base[1]);
		pmi_pal   = (void*)((char*)pmi_base + pmi_base[2]);
		printk(KERN_INFO "vesafb: pmi: set display start = %p, set palette = %p\n",pmi_start,pmi_pal);
		if (pmi_base[3]) {
			printk(KERN_INFO "vesafb: pmi: ports = ");
				for (i = pmi_base[3]/2; pmi_base[i] != 0xffff; i++)
					printk("%x ",pmi_base[i]);
			printk("\n");
			if (pmi_base[i] != 0xffff) {
				/*
				 * memory areas not supported (yet?)
				 *
				 * Rules are: we have to set up a descriptor for the requested
				 * memory area and pass it in the ES register to the BIOS function.
				 */
				printk(KERN_INFO "vesafb: can't handle memory requests, pmi disabled\n");
				ypan = pmi_setpal = 0;
			}
		}
	}

	vesafb_defined.xres_virtual = vesafb_defined.xres;
	vesafb_defined.yres_virtual = vesafb_fix.smem_len / vesafb_fix.line_length;
	if (ypan && vesafb_defined.yres_virtual > vesafb_defined.yres) {
		printk(KERN_INFO "vesafb: scrolling: %s using protected mode interface, yres_virtual=%d\n",
		       (ypan > 1) ? "ywrap" : "ypan",vesafb_defined.yres_virtual);
	} else {
		printk(KERN_INFO "vesafb: scrolling: redraw\n");
		vesafb_defined.yres_virtual = vesafb_defined.yres;
		ypan = 0;
	}

	/* some dummy values for timing to make fbset happy */
	vesafb_defined.pixclock     = 10000000 / vesafb_defined.xres * 1000 / vesafb_defined.yres;
	vesafb_defined.left_margin  = (vesafb_defined.xres / 8) & 0xf8;
	vesafb_defined.hsync_len    = (vesafb_defined.xres / 8) & 0xf8;
	
	vesafb_defined.red.offset    = screen_info.red_pos;
	vesafb_defined.red.length    = screen_info.red_size;
	vesafb_defined.green.offset  = screen_info.green_pos;
	vesafb_defined.green.length  = screen_info.green_size;
	vesafb_defined.blue.offset   = screen_info.blue_pos;
	vesafb_defined.blue.length   = screen_info.blue_size;
	vesafb_defined.transp.offset = screen_info.rsvd_pos;
	vesafb_defined.transp.length = screen_info.rsvd_size;

	if (vesafb_defined.bits_per_pixel <= 8) {
		depth = vesafb_defined.green.length;
		vesafb_defined.red.length =
		vesafb_defined.green.length =
		vesafb_defined.blue.length =
		vesafb_defined.bits_per_pixel;
	}

	printk(KERN_INFO "vesafb: %s: "
	       "size=%d:%d:%d:%d, shift=%d:%d:%d:%d\n",
	       (vesafb_defined.bits_per_pixel > 8) ?
	       "Truecolor" : "Pseudocolor",
	       screen_info.rsvd_size,
	       screen_info.red_size,
	       screen_info.green_size,
	       screen_info.blue_size,
	       screen_info.rsvd_pos,
	       screen_info.red_pos,
	       screen_info.green_pos,
	       screen_info.blue_pos);

	vesafb_fix.ypanstep  = ypan     ? 1 : 0;
	vesafb_fix.ywrapstep = (ypan>1) ? 1 : 0;

	/* request failure does not faze us, as vgacon probably has this
	 * region already (FIXME) */
	request_region(0x3c0, 32, "vesafb");

	if (mtrr) {
		unsigned int temp_size = size_total;
		unsigned int type = 0;

		switch (mtrr) {
		case 1:
			type = MTRR_TYPE_UNCACHABLE;
			break;
		case 2:
			type = MTRR_TYPE_WRBACK;
			break;
		case 3:
			type = MTRR_TYPE_WRCOMB;
			break;
		case 4:
			type = MTRR_TYPE_WRTHROUGH;
			break;
		default:
			type = 0;
			break;
		}

		if (type) {
			int rc;

			/* Find the largest power-of-two */
			while (temp_size & (temp_size - 1))
				temp_size &= (temp_size - 1);

			/* Try and find a power of two to add */
			do {
				rc = mtrr_add(vesafb_fix.smem_start, temp_size,
					      type, 1);
				temp_size >>= 1;
			} while (temp_size >= PAGE_SIZE && rc == -EINVAL);
		}
	}
	
	info->fbops = &vesafb_ops;
	info->var = vesafb_defined;
	info->fix = vesafb_fix;
	info->flags = FBINFO_FLAG_DEFAULT |
		(ypan) ? FBINFO_HWACCEL_YPAN : 0;

	vga_compat = (screen_info.capabilities & 2) ? 0 : 1;
	printk("vesafb: Mode is %sVGA compatible\n",
	       (vga_compat) ? "" : "not ");

	if (fb_alloc_cmap(&info->cmap, 256, 0) < 0) {
		err = -ENOMEM;
		goto err;
	}
	if (register_framebuffer(info)<0) {
		err = -EINVAL;
		fb_dealloc_cmap(&info->cmap);
		goto err;
	}
	printk(KERN_INFO "fb%d: %s frame buffer device\n",
	       info->node, info->fix.id);
	return 0;
err:
	framebuffer_release(info);
	release_mem_region(vesafb_fix.smem_start, size_total);
	return err;
}

static struct device_driver vesafb_driver = {
	.name	= "vesafb",
	.bus	= &platform_bus_type,
	.probe	= vesafb_probe,
};

static struct platform_device vesafb_device = {
	.name	= "vesafb",
};

static int __init vesafb_init(void)
{
	int ret;
	char *option = NULL;

	/* ignore error return of fb_get_options */
	fb_get_options("vesafb", &option);
	vesafb_setup(option);
	ret = driver_register(&vesafb_driver);

	if (!ret) {
		ret = platform_device_register(&vesafb_device);
		if (ret)
			driver_unregister(&vesafb_driver);
	}
	return ret;
}
module_init(vesafb_init);

MODULE_LICENSE("GPL");
Commit	Line	Data
1da177e4 LT	1	/*
	2	* framebuffer driver for VBE 2.0 compliant graphic boards
	3	*
	4	* switching to graphics mode happens at boot time (while
	5	* running in real mode, see arch/i386/boot/video.S).
	6	*
	7	* (c) 1998 Gerd Knorr <kraxel@goldbach.in-berlin.de>
	8	*
	9	*/
	10
	11	#include <linux/module.h>
	12	#include <linux/kernel.h>
	13	#include <linux/errno.h>
	14	#include <linux/string.h>
	15	#include <linux/mm.h>
	16	#include <linux/tty.h>
	17	#include <linux/slab.h>
	18	#include <linux/delay.h>
	19	#include <linux/fb.h>
	20	#include <linux/ioport.h>
	21	#include <linux/init.h>
d052d1be RK	22	#include <linux/platform_device.h>
d052d1be RK	23
d2d58384	24	#include <video/vga.h>
1da177e4 LT	25	#include <asm/io.h>
	26	#include <asm/mtrr.h>
	27
	28	#define dac_reg (0x3c8)
	29	#define dac_val (0x3c9)
	30
	31	/* --------------------------------------------------------------------- */
	32
	33	static struct fb_var_screeninfo vesafb_defined __initdata = {
	34	.activate = FB_ACTIVATE_NOW,
	35	.height = -1,
	36	.width = -1,
	37	.right_margin = 32,
	38	.upper_margin = 16,
	39	.lower_margin = 4,
	40	.vsync_len = 4,
	41	.vmode = FB_VMODE_NONINTERLACED,
	42	};
	43
	44	static struct fb_fix_screeninfo vesafb_fix __initdata = {
	45	.id = "VESA VGA",
	46	.type = FB_TYPE_PACKED_PIXELS,
	47	.accel = FB_ACCEL_NONE,
	48	};
	49
	50	static int inverse = 0;
8a0934f2	51	static int mtrr = 0; /* disable mtrr */
1da177e4 LT	52	static int vram_remap __initdata = 0; /* Set amount of memory to be used */
	53	static int vram_total __initdata = 0; /* Set total amount of memory */
	54	static int pmi_setpal = 0; /* pmi for palette changes ??? */
	55	static int ypan = 0; /* 0..nothing, 1..ypan, 2..ywrap */
	56	static unsigned short *pmi_base = NULL;
	57	static void (*pmi_start)(void);
	58	static void (*pmi_pal)(void);
	59	static int depth;
d2d58384	60	static int vga_compat;
1da177e4 LT	61
	62	/* --------------------------------------------------------------------- */
	63
	64	static int vesafb_pan_display(struct fb_var_screeninfo *var,
	65	struct fb_info *info)
	66	{
	67	#ifdef __i386__
	68	int offset;
	69
	70	if (!ypan)
	71	return -EINVAL;
	72	if (var->xoffset)
	73	return -EINVAL;
	74	if (var->yoffset > var->yres_virtual)
	75	return -EINVAL;
	76	if ((ypan==1) && var->yoffset+var->yres > var->yres_virtual)
	77	return -EINVAL;
	78
	79	offset = (var->yoffset * info->fix.line_length + var->xoffset) / 4;
	80
	81	__asm__ __volatile__(
	82	"call *(%%edi)"
	83	: /* no return value */
	84	: "a" (0x4f07), /* EAX */
	85	"b" (0), /* EBX */
	86	"c" (offset), /* ECX */
	87	"d" (offset >> 16), /* EDX */
	88	"D" (&pmi_start)); /* EDI */
	89	#endif
	90	return 0;
	91	}
	92
d2d58384 AD	93	static int vesafb_blank(int blank, struct fb_info *info)
	94	{
	95	int err = 1;
	96
	97	if (vga_compat) {
	98	int loop = 10000;
	99	u8 seq = 0, crtc17 = 0;
	100
bb7e257e	101	if (blank == FB_BLANK_POWERDOWN) {
d2d58384 AD	102	seq = 0x20;
d2d58384 AD	103	crtc17 = 0x00;
bb7e257e	104	err = 0;
d2d58384 AD	105	} else {
	106	seq = 0x00;
	107	crtc17 = 0x80;
bb7e257e	108	err = (blank == FB_BLANK_UNBLANK) ? 0 : -EINVAL;
d2d58384 AD	109	}
	110
	111	vga_wseq(NULL, 0x00, 0x01);
	112	seq \|= vga_rseq(NULL, 0x01) & ~0x20;
	113	vga_wseq(NULL, 0x00, seq);
	114
	115	crtc17 \|= vga_rcrt(NULL, 0x17) & ~0x80;
	116	while (loop--);
	117	vga_wcrt(NULL, 0x17, crtc17);
	118	vga_wseq(NULL, 0x00, 0x03);
	119	}
	120
	121	return err;
	122	}
	123
1da177e4 LT	124	static void vesa_setpalette(int regno, unsigned red, unsigned green,
	125	unsigned blue)
	126	{
	127	#ifdef __i386__
	128	struct { u_char blue, green, red, pad; } entry;
	129	int shift = 16 - depth;
	130
	131	if (pmi_setpal) {
	132	entry.red = red >> shift;
	133	entry.green = green >> shift;
	134	entry.blue = blue >> shift;
	135	entry.pad = 0;
	136	__asm__ __volatile__(
	137	"call *(%%esi)"
	138	: /* no return value */
	139	: "a" (0x4f09), /* EAX */
	140	"b" (0), /* EBX */
	141	"c" (1), /* ECX */
	142	"d" (regno), /* EDX */
	143	"D" (&entry), /* EDI */
	144	"S" (&pmi_pal)); /* ESI */
	145	} else {
	146	/* without protected mode interface, try VGA registers... */
	147	outb_p(regno, dac_reg);
	148	outb_p(red >> shift, dac_val);
	149	outb_p(green >> shift, dac_val);
	150	outb_p(blue >> shift, dac_val);
	151	}
	152	#endif
	153	}
	154
	155	static int vesafb_setcolreg(unsigned regno, unsigned red, unsigned green,
	156	unsigned blue, unsigned transp,
	157	struct fb_info *info)
	158	{
	159	/*
	160	* Set a single color register. The values supplied are
	161	* already rounded down to the hardware's capabilities
	162	* (according to the entries in the `var' structure). Return
	163	* != 0 for invalid regno.
	164	*/
	165
	166	if (regno >= info->cmap.len)
	167	return 1;
	168
eba50850	169	if (info->var.bits_per_pixel == 8)
1da177e4	170	vesa_setpalette(regno,red,green,blue);
eba50850 AD	171	else if (regno < 16) {
	172	switch (info->var.bits_per_pixel) {
	173	case 16:
	174	if (info->var.red.offset == 10) {
	175	/* 1:5:5:5 */
	176	((u32*) (info->pseudo_palette))[regno] =
1da177e4 LT	177	((red & 0xf800) >> 1) \|
	178	((green & 0xf800) >> 6) \|
	179	((blue & 0xf800) >> 11);
eba50850 AD	180	} else {
	181	/* 0:5:6:5 */
	182	((u32*) (info->pseudo_palette))[regno] =
1da177e4 LT	183	((red & 0xf800) ) \|
	184	((green & 0xfc00) >> 5) \|
	185	((blue & 0xf800) >> 11);
eba50850 AD	186	}
	187	break;
	188	case 24:
	189	case 32:
	190	red >>= 8;
	191	green >>= 8;
	192	blue >>= 8;
	193	((u32 *)(info->pseudo_palette))[regno] =
	194	(red << info->var.red.offset) \|
	195	(green << info->var.green.offset) \|
	196	(blue << info->var.blue.offset);
	197	break;
1da177e4	198	}
eba50850 AD	199	}
	200
	201	return 0;
1da177e4 LT	202	}
	203
	204	static struct fb_ops vesafb_ops = {
	205	.owner = THIS_MODULE,
	206	.fb_setcolreg = vesafb_setcolreg,
	207	.fb_pan_display = vesafb_pan_display,
d2d58384	208	.fb_blank = vesafb_blank,
1da177e4 LT	209	.fb_fillrect = cfb_fillrect,
	210	.fb_copyarea = cfb_copyarea,
	211	.fb_imageblit = cfb_imageblit,
1da177e4 LT	212	};
	213
	214	static int __init vesafb_setup(char *options)
	215	{
	216	char *this_opt;
	217
	218	if (!options \|\| !*options)
	219	return 0;
	220
	221	while ((this_opt = strsep(&options, ",")) != NULL) {
	222	if (!*this_opt) continue;
	223
	224	if (! strcmp(this_opt, "inverse"))
	225	inverse=1;
	226	else if (! strcmp(this_opt, "redraw"))
	227	ypan=0;
	228	else if (! strcmp(this_opt, "ypan"))
	229	ypan=1;
	230	else if (! strcmp(this_opt, "ywrap"))
	231	ypan=2;
	232	else if (! strcmp(this_opt, "vgapal"))
	233	pmi_setpal=0;
	234	else if (! strcmp(this_opt, "pmipal"))
	235	pmi_setpal=1;
80625942 AD	236	else if (! strncmp(this_opt, "mtrr:", 5))
80625942 AD	237	mtrr = simple_strtoul(this_opt+5, NULL, 0);
1da177e4 LT	238	else if (! strcmp(this_opt, "nomtrr"))
	239	mtrr=0;
	240	else if (! strncmp(this_opt, "vtotal:", 7))
	241	vram_total = simple_strtoul(this_opt+7, NULL, 0);
	242	else if (! strncmp(this_opt, "vremap:", 7))
	243	vram_remap = simple_strtoul(this_opt+7, NULL, 0);
	244	}
	245	return 0;
	246	}
	247
	248	static int __init vesafb_probe(struct device *device)
	249	{
	250	struct platform_device *dev = to_platform_device(device);
	251	struct fb_info *info;
	252	int i, err;
	253	unsigned int size_vmode;
	254	unsigned int size_remap;
	255	unsigned int size_total;
	256
	257	if (screen_info.orig_video_isVGA != VIDEO_TYPE_VLFB)
	258	return -ENODEV;
	259
	260	vesafb_fix.smem_start = screen_info.lfb_base;
	261	vesafb_defined.bits_per_pixel = screen_info.lfb_depth;
	262	if (15 == vesafb_defined.bits_per_pixel)
	263	vesafb_defined.bits_per_pixel = 16;
	264	vesafb_defined.xres = screen_info.lfb_width;
	265	vesafb_defined.yres = screen_info.lfb_height;
	266	vesafb_fix.line_length = screen_info.lfb_linelength;
	267	vesafb_fix.visual = (vesafb_defined.bits_per_pixel == 8) ?
	268	FB_VISUAL_PSEUDOCOLOR : FB_VISUAL_TRUECOLOR;
	269
	270	/* size_vmode -- that is the amount of memory needed for the
	271	* used video mode, i.e. the minimum amount of
	272	* memory we need. */
	273	size_vmode = vesafb_defined.yres * vesafb_fix.line_length;
	274
	275	/* size_total -- all video memory we have. Used for mtrr
	276	* entries, ressource allocation and bounds
	277	* checking. */
	278	size_total = screen_info.lfb_size * 65536;
	279	if (vram_total)
	280	size_total = vram_total * 1024 * 1024;
	281	if (size_total < size_vmode)
	282	size_total = size_vmode;
	283
	284	/* size_remap -- the amount of video memory we are going to
	285	* use for vesafb. With modern cards it is no
	286	* option to simply use size_total as that
	287	* wastes plenty of kernel address space. */
	288	size_remap = size_vmode * 2;
	289	if (vram_remap)
	290	size_remap = vram_remap * 1024 * 1024;
	291	if (size_remap < size_vmode)
	292	size_remap = size_vmode;
	293	if (size_remap > size_total)
	294	size_remap = size_total;
	295	vesafb_fix.smem_len = size_remap;
	296
	297	#ifndef __i386__
	298	screen_info.vesapm_seg = 0;
	299	#endif
	300
	301	if (!request_mem_region(vesafb_fix.smem_start, size_total, "vesafb")) {
302	printk(KERN_WARNING
78c03717	303	"vesafb: cannot reserve video memory at 0x%lx\n",
1da177e4 LT	304	vesafb_fix.smem_start);
	305	/* We cannot make this fatal. Sometimes this comes from magic
	306	spaces our resource handlers simply don't know about */
	307	}
	308
	309	info = framebuffer_alloc(sizeof(u32) * 256, &dev->dev);
	310	if (!info) {
78c03717	311	release_mem_region(vesafb_fix.smem_start, size_total);
1da177e4 LT	312	return -ENOMEM;
	313	}
	314	info->pseudo_palette = info->par;
	315	info->par = NULL;
	316
78c03717	317	info->screen_base = ioremap(vesafb_fix.smem_start, vesafb_fix.smem_len);
1da177e4 LT	318	if (!info->screen_base) {
	319	printk(KERN_ERR
	320	"vesafb: abort, cannot ioremap video memory 0x%x @ 0x%lx\n",
	321	vesafb_fix.smem_len, vesafb_fix.smem_start);
	322	err = -EIO;
	323	goto err;
	324	}
	325
	326	printk(KERN_INFO "vesafb: framebuffer at 0x%lx, mapped to 0x%p, "
	327	"using %dk, total %dk\n",
	328	vesafb_fix.smem_start, info->screen_base,
	329	size_remap/1024, size_total/1024);
	330	printk(KERN_INFO "vesafb: mode is %dx%dx%d, linelength=%d, pages=%d\n",
	331	vesafb_defined.xres, vesafb_defined.yres, vesafb_defined.bits_per_pixel, vesafb_fix.line_length, screen_info.pages);
	332
	333	if (screen_info.vesapm_seg) {
	334	printk(KERN_INFO "vesafb: protected mode interface info at %04x:%04x\n",
	335	screen_info.vesapm_seg,screen_info.vesapm_off);
	336	}
	337
	338	if (screen_info.vesapm_seg < 0xc000)
	339	ypan = pmi_setpal = 0; /* not available or some DOS TSR ... */
	340
	341	if (ypan \|\| pmi_setpal) {
	342	pmi_base = (unsigned short*)phys_to_virt(((unsigned long)screen_info.vesapm_seg << 4) + screen_info.vesapm_off);
	343	pmi_start = (void)((char)pmi_base + pmi_base[1]);
	344	pmi_pal = (void)((char)pmi_base + pmi_base[2]);
	345	printk(KERN_INFO "vesafb: pmi: set display start = %p, set palette = %p\n",pmi_start,pmi_pal);
	346	if (pmi_base[3]) {
	347	printk(KERN_INFO "vesafb: pmi: ports = ");
	348	for (i = pmi_base[3]/2; pmi_base[i] != 0xffff; i++)
	349	printk("%x ",pmi_base[i]);
	350	printk("\n");
	351	if (pmi_base[i] != 0xffff) {
	352	/*
	353	* memory areas not supported (yet?)
	354	*
	355	* Rules are: we have to set up a descriptor for the requested
	356	* memory area and pass it in the ES register to the BIOS function.
	357	*/
	358	printk(KERN_INFO "vesafb: can't handle memory requests, pmi disabled\n");
	359	ypan = pmi_setpal = 0;
	360	}
	361	}
	362	}
	363
	364	vesafb_defined.xres_virtual = vesafb_defined.xres;
	365	vesafb_defined.yres_virtual = vesafb_fix.smem_len / vesafb_fix.line_length;
	366	if (ypan && vesafb_defined.yres_virtual > vesafb_defined.yres) {
	367	printk(KERN_INFO "vesafb: scrolling: %s using protected mode interface, yres_virtual=%d\n",
	368	(ypan > 1) ? "ywrap" : "ypan",vesafb_defined.yres_virtual);
	369	} else {
	370	printk(KERN_INFO "vesafb: scrolling: redraw\n");
	371	vesafb_defined.yres_virtual = vesafb_defined.yres;
	372	ypan = 0;
	373	}
	374
	375	/* some dummy values for timing to make fbset happy */
	376	vesafb_defined.pixclock = 10000000 / vesafb_defined.xres * 1000 / vesafb_defined.yres;
	377	vesafb_defined.left_margin = (vesafb_defined.xres / 8) & 0xf8;
	378	vesafb_defined.hsync_len = (vesafb_defined.xres / 8) & 0xf8;
	379
	380	vesafb_defined.red.offset = screen_info.red_pos;
	381	vesafb_defined.red.length = screen_info.red_size;
382	vesafb_defined.green.offset = screen_info.green_pos;
383	vesafb_defined.green.length = screen_info.green_size;
384	vesafb_defined.blue.offset = screen_info.blue_pos;
385	vesafb_defined.blue.length = screen_info.blue_size;
386	vesafb_defined.transp.offset = screen_info.rsvd_pos;
387	vesafb_defined.transp.length = screen_info.rsvd_size;
388
389	if (vesafb_defined.bits_per_pixel <= 8) {
390	depth = vesafb_defined.green.length;
391	vesafb_defined.red.length =
392	vesafb_defined.green.length =
393	vesafb_defined.blue.length =
394	vesafb_defined.bits_per_pixel;
395	}
396
397	printk(KERN_INFO "vesafb: %s: "
398	"size=%d:%d:%d:%d, shift=%d:%d:%d:%d\n",
399	(vesafb_defined.bits_per_pixel > 8) ?
400	"Truecolor" : "Pseudocolor",
401	screen_info.rsvd_size,
402	screen_info.red_size,
403	screen_info.green_size,
404	screen_info.blue_size,
405	screen_info.rsvd_pos,
406	screen_info.red_pos,
407	screen_info.green_pos,
408	screen_info.blue_pos);
409
410	vesafb_fix.ypanstep = ypan ? 1 : 0;
411	vesafb_fix.ywrapstep = (ypan>1) ? 1 : 0;
412
413	/* request failure does not faze us, as vgacon probably has this
414	* region already (FIXME) */
415	request_region(0x3c0, 32, "vesafb");
416
417	if (mtrr) {
78c03717	418	unsigned int temp_size = size_total;
80625942 AD	419	unsigned int type = 0;
	420
	421	switch (mtrr) {
	422	case 1:
	423	type = MTRR_TYPE_UNCACHABLE;
	424	break;
	425	case 2:
	426	type = MTRR_TYPE_WRBACK;
	427	break;
	428	case 3:
	429	type = MTRR_TYPE_WRCOMB;
	430	break;
	431	case 4:
	432	type = MTRR_TYPE_WRTHROUGH;
	433	break;
	434	default:
	435	type = 0;
	436	break;
	437	}
	438
	439	if (type) {
	440	int rc;
	441
	442	/* Find the largest power-of-two */
	443	while (temp_size & (temp_size - 1))
	444	temp_size &= (temp_size - 1);
	445
	446	/* Try and find a power of two to add */
	447	do {
	448	rc = mtrr_add(vesafb_fix.smem_start, temp_size,
	449	type, 1);
	450	temp_size >>= 1;
	451	} while (temp_size >= PAGE_SIZE && rc == -EINVAL);
1da177e4 LT	452	}
	453	}
	454
	455	info->fbops = &vesafb_ops;
	456	info->var = vesafb_defined;
	457	info->fix = vesafb_fix;
	458	info->flags = FBINFO_FLAG_DEFAULT \|
	459	(ypan) ? FBINFO_HWACCEL_YPAN : 0;
	460
d2d58384 AD	461	vga_compat = (screen_info.capabilities & 2) ? 0 : 1;
	462	printk("vesafb: Mode is %sVGA compatible\n",
	463	(vga_compat) ? "" : "not ");
	464
1da177e4 LT	465	if (fb_alloc_cmap(&info->cmap, 256, 0) < 0) {
	466	err = -ENOMEM;
	467	goto err;
	468	}
	469	if (register_framebuffer(info)<0) {
	470	err = -EINVAL;
	471	fb_dealloc_cmap(&info->cmap);
	472	goto err;
	473	}
	474	printk(KERN_INFO "fb%d: %s frame buffer device\n",
	475	info->node, info->fix.id);
	476	return 0;
	477	err:
	478	framebuffer_release(info);
	479	release_mem_region(vesafb_fix.smem_start, size_total);
	480	return err;
	481	}
	482
	483	static struct device_driver vesafb_driver = {
	484	.name = "vesafb",
	485	.bus = &platform_bus_type,
	486	.probe = vesafb_probe,
	487	};
	488
	489	static struct platform_device vesafb_device = {
	490	.name = "vesafb",
	491	};
	492
	493	static int __init vesafb_init(void)
	494	{
	495	int ret;
	496	char *option = NULL;
	497
	498	/* ignore error return of fb_get_options */
	499	fb_get_options("vesafb", &option);
	500	vesafb_setup(option);
	501	ret = driver_register(&vesafb_driver);
	502
	503	if (!ret) {
	504	ret = platform_device_register(&vesafb_device);
	505	if (ret)
	506	driver_unregister(&vesafb_driver);
	507	}
	508	return ret;
	509	}
	510	module_init(vesafb_init);
	511
	512	MODULE_LICENSE("GPL");