Home | History | Annotate | Line # | Download | only in lib
vbe.c revision 1.2.4.4
      1  1.2.4.4  yamt /* $NetBSD: vbe.c,v 1.2.4.4 2010/03/11 15:02:31 yamt Exp $ */
      2  1.2.4.2  yamt 
      3  1.2.4.2  yamt /*-
      4  1.2.4.2  yamt  * Copyright (c) 2009 Jared D. McNeill <jmcneill (at) invisible.ca>
      5  1.2.4.2  yamt  * All rights reserved.
      6  1.2.4.2  yamt  *
      7  1.2.4.2  yamt  * Redistribution and use in source and binary forms, with or without
      8  1.2.4.2  yamt  * modification, are permitted provided that the following conditions
      9  1.2.4.2  yamt  * are met:
     10  1.2.4.2  yamt  * 1. Redistributions of source code must retain the above copyright
     11  1.2.4.2  yamt  *    notice, this list of conditions and the following disclaimer.
     12  1.2.4.2  yamt  * 2. Redistributions in binary form must reproduce the above copyright
     13  1.2.4.2  yamt  *    notice, this list of conditions and the following disclaimer in the
     14  1.2.4.2  yamt  *    documentation and/or other materials provided with the distribution.
     15  1.2.4.2  yamt  *
     16  1.2.4.2  yamt  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     17  1.2.4.2  yamt  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     18  1.2.4.2  yamt  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     19  1.2.4.2  yamt  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     20  1.2.4.2  yamt  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     21  1.2.4.2  yamt  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     22  1.2.4.2  yamt  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     23  1.2.4.2  yamt  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     24  1.2.4.2  yamt  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     25  1.2.4.2  yamt  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     26  1.2.4.2  yamt  * POSSIBILITY OF SUCH DAMAGE.
     27  1.2.4.2  yamt  */
     28  1.2.4.2  yamt 
     29  1.2.4.2  yamt /*
     30  1.2.4.2  yamt  * VESA BIOS Extensions routines
     31  1.2.4.2  yamt  */
     32  1.2.4.2  yamt 
     33  1.2.4.2  yamt #include <lib/libsa/stand.h>
     34  1.2.4.2  yamt #include <lib/libkern/libkern.h>
     35  1.2.4.2  yamt #include <machine/bootinfo.h>
     36  1.2.4.2  yamt #include "libi386.h"
     37  1.2.4.2  yamt #include "vbe.h"
     38  1.2.4.2  yamt 
     39  1.2.4.2  yamt extern const uint8_t rasops_cmap[];
     40  1.2.4.2  yamt 
     41  1.2.4.2  yamt static struct _vbestate {
     42  1.2.4.2  yamt 	int		available;
     43  1.2.4.3  yamt 	int		modenum;
     44  1.2.4.2  yamt } vbestate;
     45  1.2.4.2  yamt 
     46  1.2.4.2  yamt static int
     47  1.2.4.2  yamt vbe_mode_is_supported(struct modeinfoblock *mi)
     48  1.2.4.2  yamt {
     49  1.2.4.2  yamt 	if ((mi->ModeAttributes & 0x01) == 0)
     50  1.2.4.2  yamt 		return 0;	/* mode not supported by hardware */
     51  1.2.4.2  yamt 	if ((mi->ModeAttributes & 0x08) == 0)
     52  1.2.4.2  yamt 		return 0;	/* linear fb not available */
     53  1.2.4.2  yamt 	if ((mi->ModeAttributes & 0x10) == 0)
     54  1.2.4.2  yamt 		return 0;	/* text mode */
     55  1.2.4.2  yamt 	if (mi->NumberOfPlanes != 1)
     56  1.2.4.2  yamt 		return 0;	/* planar mode not supported */
     57  1.2.4.2  yamt 	if (mi->MemoryModel != 0x04 /* Packed pixel */ &&
     58  1.2.4.2  yamt 	    mi->MemoryModel != 0x06 /* Direct Color */)
     59  1.2.4.2  yamt 		return 0;	/* unsupported pixel format */
     60  1.2.4.2  yamt 	return 1;
     61  1.2.4.2  yamt }
     62  1.2.4.2  yamt 
     63  1.2.4.4  yamt static bool
     64  1.2.4.4  yamt vbe_check(void)
     65  1.2.4.4  yamt {
     66  1.2.4.4  yamt 	if (!vbestate.available) {
     67  1.2.4.4  yamt 		printf("VBE not available\n");
     68  1.2.4.4  yamt 		return false;
     69  1.2.4.4  yamt 	}
     70  1.2.4.4  yamt 	return true;
     71  1.2.4.4  yamt }
     72  1.2.4.4  yamt 
     73  1.2.4.2  yamt void
     74  1.2.4.2  yamt vbe_init(void)
     75  1.2.4.2  yamt {
     76  1.2.4.2  yamt 	struct vbeinfoblock vbe;
     77  1.2.4.2  yamt 
     78  1.2.4.2  yamt 	memset(&vbe, 0, sizeof(vbe));
     79  1.2.4.2  yamt 	memcpy(vbe.VbeSignature, "VBE2", 4);
     80  1.2.4.2  yamt 	if (biosvbe_info(&vbe) != 0x004f)
     81  1.2.4.2  yamt 		return;
     82  1.2.4.4  yamt 	if (memcmp(vbe.VbeSignature, "VESA", 4) != 0)
     83  1.2.4.2  yamt 		return;
     84  1.2.4.2  yamt 
     85  1.2.4.2  yamt 	vbestate.available = 1;
     86  1.2.4.3  yamt 	vbestate.modenum = 0;
     87  1.2.4.2  yamt }
     88  1.2.4.2  yamt 
     89  1.2.4.2  yamt int
     90  1.2.4.2  yamt vbe_available(void)
     91  1.2.4.2  yamt {
     92  1.2.4.2  yamt 	return vbestate.available;
     93  1.2.4.2  yamt }
     94  1.2.4.2  yamt 
     95  1.2.4.2  yamt int
     96  1.2.4.2  yamt vbe_set_palette(const uint8_t *cmap, int slot)
     97  1.2.4.2  yamt {
     98  1.2.4.2  yamt 	struct paletteentry pe;
     99  1.2.4.2  yamt 	int ret;
    100  1.2.4.2  yamt 
    101  1.2.4.4  yamt 	if (!vbe_check())
    102  1.2.4.2  yamt 		return 1;
    103  1.2.4.2  yamt 
    104  1.2.4.2  yamt 	pe.Blue = cmap[2] >> 2;
    105  1.2.4.2  yamt 	pe.Green = cmap[1] >> 2;
    106  1.2.4.2  yamt 	pe.Red = cmap[0] >> 2;
    107  1.2.4.2  yamt 	pe.Alignment = 0;
    108  1.2.4.2  yamt 
    109  1.2.4.2  yamt 	ret = biosvbe_palette_data(0x0600, slot, &pe);
    110  1.2.4.2  yamt 
    111  1.2.4.2  yamt 	return ret == 0x004f ? 0 : 1;
    112  1.2.4.2  yamt }
    113  1.2.4.2  yamt 
    114  1.2.4.2  yamt int
    115  1.2.4.2  yamt vbe_set_mode(int modenum)
    116  1.2.4.2  yamt {
    117  1.2.4.2  yamt 	struct modeinfoblock mi;
    118  1.2.4.2  yamt 	struct btinfo_framebuffer fb;
    119  1.2.4.2  yamt 	int ret, i;
    120  1.2.4.2  yamt 
    121  1.2.4.4  yamt 	if (!vbe_check())
    122  1.2.4.2  yamt 		return 1;
    123  1.2.4.2  yamt 
    124  1.2.4.2  yamt 	ret = biosvbe_get_mode_info(modenum, &mi);
    125  1.2.4.2  yamt 	if (ret != 0x004f) {
    126  1.2.4.4  yamt 		printf("mode 0x%x invalid\n", modenum);
    127  1.2.4.2  yamt 		return 1;
    128  1.2.4.2  yamt 	}
    129  1.2.4.2  yamt 
    130  1.2.4.2  yamt 	if (!vbe_mode_is_supported(&mi)) {
    131  1.2.4.4  yamt 		printf("mode 0x%x not supported\n", modenum);
    132  1.2.4.2  yamt 		return 1;
    133  1.2.4.2  yamt 	}
    134  1.2.4.2  yamt 
    135  1.2.4.2  yamt 	ret = biosvbe_set_mode(modenum);
    136  1.2.4.2  yamt 	if (ret != 0x004f) {
    137  1.2.4.4  yamt 		printf("mode 0x%x could not be set\n", modenum);
    138  1.2.4.2  yamt 		return 1;
    139  1.2.4.2  yamt 	}
    140  1.2.4.2  yamt 
    141  1.2.4.2  yamt 	/* Setup palette for packed pixel mode */
    142  1.2.4.2  yamt 	if (mi.MemoryModel == 0x04)
    143  1.2.4.2  yamt 		for (i = 0; i < 256; i++)
    144  1.2.4.2  yamt 			vbe_set_palette(&rasops_cmap[i * 3], i);
    145  1.2.4.2  yamt 
    146  1.2.4.2  yamt 	fb.physaddr = (uint64_t)mi.PhysBasePtr & 0xffffffff;
    147  1.2.4.2  yamt 	fb.width = mi.XResolution;
    148  1.2.4.2  yamt 	fb.height = mi.YResolution;
    149  1.2.4.2  yamt 	fb.stride = mi.BytesPerScanLine;
    150  1.2.4.2  yamt 	fb.depth = mi.BitsPerPixel;
    151  1.2.4.2  yamt 	fb.flags = 0;
    152  1.2.4.2  yamt 	fb.rnum = mi.RedMaskSize;
    153  1.2.4.2  yamt 	fb.rpos = mi.RedFieldPosition;
    154  1.2.4.2  yamt 	fb.gnum = mi.GreenMaskSize;
    155  1.2.4.2  yamt 	fb.gpos = mi.GreenFieldPosition;
    156  1.2.4.2  yamt 	fb.bnum = mi.BlueMaskSize;
    157  1.2.4.2  yamt 	fb.bpos = mi.BlueFieldPosition;
    158  1.2.4.3  yamt 	fb.vbemode = modenum;
    159  1.2.4.2  yamt 
    160  1.2.4.2  yamt 	framebuffer_configure(&fb);
    161  1.2.4.2  yamt 
    162  1.2.4.2  yamt 	return 0;
    163  1.2.4.2  yamt }
    164  1.2.4.2  yamt 
    165  1.2.4.3  yamt int
    166  1.2.4.3  yamt vbe_commit(void)
    167  1.2.4.3  yamt {
    168  1.2.4.3  yamt 	int ret = 1;
    169  1.2.4.3  yamt 
    170  1.2.4.3  yamt 	if (vbestate.modenum > 0) {
    171  1.2.4.3  yamt 		ret = vbe_set_mode(vbestate.modenum);
    172  1.2.4.3  yamt 		if (ret) {
    173  1.2.4.4  yamt 			printf("WARNING: failed to set VBE mode 0x%x\n",
    174  1.2.4.3  yamt 			    vbestate.modenum);
    175  1.2.4.3  yamt 			delay(5000000);
    176  1.2.4.3  yamt 		}
    177  1.2.4.3  yamt 	}
    178  1.2.4.3  yamt 	return ret;
    179  1.2.4.3  yamt }
    180  1.2.4.3  yamt 
    181  1.2.4.2  yamt static void *
    182  1.2.4.2  yamt vbe_farptr(uint32_t farptr)
    183  1.2.4.2  yamt {
    184  1.2.4.2  yamt 	return VBEPHYPTR((((farptr & 0xffff0000) >> 12) + (farptr & 0xffff)));
    185  1.2.4.2  yamt }
    186  1.2.4.2  yamt 
    187  1.2.4.2  yamt static int
    188  1.2.4.2  yamt vbe_parse_mode_str(char *str, int *x, int *y, int *bpp)
    189  1.2.4.2  yamt {
    190  1.2.4.2  yamt 	char *p;
    191  1.2.4.2  yamt 
    192  1.2.4.2  yamt 	p = str;
    193  1.2.4.2  yamt 	*x = strtoul(p, NULL, 0);
    194  1.2.4.2  yamt 	if (*x == 0)
    195  1.2.4.2  yamt 		return 0;
    196  1.2.4.2  yamt 	p = strchr(p, 'x');
    197  1.2.4.2  yamt 	if (!p)
    198  1.2.4.2  yamt 		return 0;
    199  1.2.4.2  yamt 	++p;
    200  1.2.4.2  yamt 	*y = strtoul(p, NULL, 0);
    201  1.2.4.2  yamt 	if (*y == 0)
    202  1.2.4.2  yamt 		return 0;
    203  1.2.4.2  yamt 	p = strchr(p, 'x');
    204  1.2.4.2  yamt 	if (!p)
    205  1.2.4.2  yamt 		*bpp = 8;
    206  1.2.4.2  yamt 	else {
    207  1.2.4.2  yamt 		++p;
    208  1.2.4.2  yamt 		*bpp = strtoul(p, NULL, 0);
    209  1.2.4.2  yamt 		if (*bpp == 0)
    210  1.2.4.2  yamt 			return 0;
    211  1.2.4.2  yamt 	}
    212  1.2.4.2  yamt 
    213  1.2.4.2  yamt 	return 1;
    214  1.2.4.2  yamt }
    215  1.2.4.2  yamt 
    216  1.2.4.2  yamt static int
    217  1.2.4.2  yamt vbe_find_mode(char *str)
    218  1.2.4.2  yamt {
    219  1.2.4.2  yamt 	struct vbeinfoblock vbe;
    220  1.2.4.2  yamt 	struct modeinfoblock mi;
    221  1.2.4.2  yamt 	uint32_t farptr;
    222  1.2.4.2  yamt 	uint16_t mode;
    223  1.2.4.2  yamt 	int x, y, bpp;
    224  1.2.4.2  yamt 	int safety = 0;
    225  1.2.4.2  yamt 
    226  1.2.4.2  yamt 	if (!vbe_parse_mode_str(str, &x, &y, &bpp))
    227  1.2.4.2  yamt 		return 0;
    228  1.2.4.2  yamt 
    229  1.2.4.2  yamt 	memset(&vbe, 0, sizeof(vbe));
    230  1.2.4.2  yamt 	memcpy(vbe.VbeSignature, "VBE2", 4);
    231  1.2.4.2  yamt 	if (biosvbe_info(&vbe) != 0x004f)
    232  1.2.4.2  yamt 		return 0;
    233  1.2.4.2  yamt 	if (memcmp(vbe.VbeSignature, "VESA", 4) != 0)
    234  1.2.4.2  yamt 		return 0;
    235  1.2.4.2  yamt 	farptr = vbe.VideoModePtr;
    236  1.2.4.2  yamt 	if (farptr == 0)
    237  1.2.4.2  yamt 		return 0;
    238  1.2.4.2  yamt 
    239  1.2.4.2  yamt 	while ((mode = *(uint16_t *)vbe_farptr(farptr)) != 0xffff) {
    240  1.2.4.2  yamt 		safety++;
    241  1.2.4.2  yamt 		farptr += 2;
    242  1.2.4.2  yamt 		if (safety == 100)
    243  1.2.4.2  yamt 			return 0;
    244  1.2.4.2  yamt 		if (biosvbe_get_mode_info(mode, &mi) != 0x004f)
    245  1.2.4.2  yamt 			continue;
    246  1.2.4.2  yamt 		/* we only care about linear modes here */
    247  1.2.4.2  yamt 		if (vbe_mode_is_supported(&mi) == 0)
    248  1.2.4.2  yamt 			continue;
    249  1.2.4.2  yamt 		safety = 0;
    250  1.2.4.2  yamt 		if (mi.XResolution == x &&
    251  1.2.4.2  yamt 		    mi.YResolution == y &&
    252  1.2.4.2  yamt 		    mi.BitsPerPixel == bpp)
    253  1.2.4.2  yamt 			return mode;
    254  1.2.4.2  yamt 	}
    255  1.2.4.2  yamt 
    256  1.2.4.2  yamt 	return 0;
    257  1.2.4.2  yamt }
    258  1.2.4.2  yamt 
    259  1.2.4.2  yamt static void
    260  1.2.4.2  yamt vbe_dump_mode(int modenum, struct modeinfoblock *mi)
    261  1.2.4.2  yamt {
    262  1.2.4.2  yamt 	printf("0x%x=%dx%dx%d", modenum,
    263  1.2.4.2  yamt 	    mi->XResolution, mi->YResolution, mi->BitsPerPixel);
    264  1.2.4.2  yamt }
    265  1.2.4.2  yamt 
    266  1.2.4.2  yamt void
    267  1.2.4.2  yamt vbe_modelist(void)
    268  1.2.4.2  yamt {
    269  1.2.4.2  yamt 	struct vbeinfoblock vbe;
    270  1.2.4.2  yamt 	struct modeinfoblock mi;
    271  1.2.4.2  yamt 	uint32_t farptr;
    272  1.2.4.2  yamt 	uint16_t mode;
    273  1.2.4.2  yamt 	int nmodes = 0, safety = 0;
    274  1.2.4.2  yamt 
    275  1.2.4.4  yamt 	if (!vbe_check())
    276  1.2.4.2  yamt 		return;
    277  1.2.4.2  yamt 
    278  1.2.4.2  yamt 	printf("Modes: ");
    279  1.2.4.2  yamt 	memset(&vbe, 0, sizeof(vbe));
    280  1.2.4.2  yamt 	memcpy(vbe.VbeSignature, "VBE2", 4);
    281  1.2.4.2  yamt 	if (biosvbe_info(&vbe) != 0x004f)
    282  1.2.4.2  yamt 		goto done;
    283  1.2.4.2  yamt 	if (memcmp(vbe.VbeSignature, "VESA", 4) != 0)
    284  1.2.4.2  yamt 		goto done;
    285  1.2.4.2  yamt 	farptr = vbe.VideoModePtr;
    286  1.2.4.2  yamt 	if (farptr == 0)
    287  1.2.4.2  yamt 		goto done;
    288  1.2.4.2  yamt 
    289  1.2.4.2  yamt 	while ((mode = *(uint16_t *)vbe_farptr(farptr)) != 0xffff) {
    290  1.2.4.2  yamt 		safety++;
    291  1.2.4.2  yamt 		farptr += 2;
    292  1.2.4.2  yamt 		if (safety == 100) {
    293  1.2.4.4  yamt 			printf("[?] ");
    294  1.2.4.2  yamt 			break;
    295  1.2.4.2  yamt 		}
    296  1.2.4.2  yamt 		if (biosvbe_get_mode_info(mode, &mi) != 0x004f)
    297  1.2.4.2  yamt 			continue;
    298  1.2.4.2  yamt 		/* we only care about linear modes here */
    299  1.2.4.2  yamt 		if (vbe_mode_is_supported(&mi) == 0)
    300  1.2.4.2  yamt 			continue;
    301  1.2.4.2  yamt 		safety = 0;
    302  1.2.4.2  yamt 		if (nmodes % 4 == 0)
    303  1.2.4.2  yamt 			printf("\n");
    304  1.2.4.2  yamt 		else
    305  1.2.4.2  yamt 			printf("  ");
    306  1.2.4.2  yamt 		vbe_dump_mode(mode, &mi);
    307  1.2.4.2  yamt 		nmodes++;
    308  1.2.4.2  yamt 	}
    309  1.2.4.2  yamt 
    310  1.2.4.2  yamt done:
    311  1.2.4.2  yamt 	if (nmodes == 0)
    312  1.2.4.2  yamt 		printf("none found");
    313  1.2.4.2  yamt 	printf("\n");
    314  1.2.4.2  yamt }
    315  1.2.4.2  yamt 
    316  1.2.4.2  yamt void
    317  1.2.4.2  yamt command_vesa(char *cmd)
    318  1.2.4.2  yamt {
    319  1.2.4.2  yamt 	char arg[20];
    320  1.2.4.2  yamt 	int modenum;
    321  1.2.4.2  yamt 
    322  1.2.4.4  yamt 	if (!vbe_check())
    323  1.2.4.2  yamt 		return;
    324  1.2.4.2  yamt 
    325  1.2.4.2  yamt 	strlcpy(arg, cmd, sizeof(arg));
    326  1.2.4.2  yamt 
    327  1.2.4.2  yamt 	if (strcmp(arg, "list") == 0) {
    328  1.2.4.2  yamt 		vbe_modelist();
    329  1.2.4.2  yamt 		return;
    330  1.2.4.2  yamt 	}
    331  1.2.4.2  yamt 
    332  1.2.4.2  yamt 	if (strcmp(arg, "disabled") == 0 || strcmp(arg, "off") == 0) {
    333  1.2.4.3  yamt 		vbestate.modenum = 0;
    334  1.2.4.2  yamt 		return;
    335  1.2.4.2  yamt 	}
    336  1.2.4.2  yamt 
    337  1.2.4.2  yamt 	if (strcmp(arg, "enabled") == 0 || strcmp(arg, "on") == 0)
    338  1.2.4.2  yamt 		modenum = VBE_DEFAULT_MODE;
    339  1.2.4.2  yamt 	else if (strncmp(arg, "0x", 2) == 0)
    340  1.2.4.2  yamt 		modenum = strtoul(arg, NULL, 0);
    341  1.2.4.2  yamt 	else if (strchr(arg, 'x') != NULL) {
    342  1.2.4.2  yamt 		modenum = vbe_find_mode(arg);
    343  1.2.4.3  yamt 		if (modenum == 0) {
    344  1.2.4.3  yamt 			printf("mode %s not supported by firmware\n", arg);
    345  1.2.4.2  yamt 			return;
    346  1.2.4.3  yamt 		}
    347  1.2.4.2  yamt 	} else
    348  1.2.4.2  yamt 		modenum = 0;
    349  1.2.4.2  yamt 
    350  1.2.4.2  yamt 	if (modenum >= 0x100) {
    351  1.2.4.3  yamt 		vbestate.modenum = modenum;
    352  1.2.4.2  yamt 		return;
    353  1.2.4.2  yamt 	}
    354  1.2.4.2  yamt 
    355  1.2.4.4  yamt 	printf("invalid flag, must be 'on', 'off', "
    356  1.2.4.4  yamt 	    "a display mode, or a VBE mode number\n");
    357  1.2.4.2  yamt }
    358