Home | History | Annotate | Download | only in svga
      1 /*
      2     SDL - Simple DirectMedia Layer
      3     Copyright (C) 1997-2012 Sam Lantinga
      4 
      5     This library is free software; you can redistribute it and/or
      6     modify it under the terms of the GNU Lesser General Public
      7     License as published by the Free Software Foundation; either
      8     version 2.1 of the License, or (at your option) any later version.
      9 
     10     This library is distributed in the hope that it will be useful,
     11     but WITHOUT ANY WARRANTY; without even the implied warranty of
     12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
     13     Lesser General Public License for more details.
     14 
     15     You should have received a copy of the GNU Lesser General Public
     16     License along with this library; if not, write to the Free Software
     17     Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
     18 
     19     Sam Lantinga
     20     slouken (at) libsdl.org
     21 */
     22 #include "SDL_config.h"
     23 
     24 /* SVGAlib based SDL video driver implementation.
     25 */
     26 
     27 #include <unistd.h>
     28 #include <sys/stat.h>
     29 #include <sys/types.h>
     30 #include <sys/ioctl.h>
     31 #include <fcntl.h>
     32 
     33 #if defined(__LINUX__)
     34 #include <linux/vt.h>
     35 #elif defined(__FREEBSD__)
     36 #include <sys/consio.h>
     37 #else
     38 #error You must choose your operating system here
     39 #endif
     40 #include <vga.h>
     41 #include <vgamouse.h>
     42 #include <vgakeyboard.h>
     43 
     44 #include "SDL_video.h"
     45 #include "SDL_mouse.h"
     46 #include "../SDL_sysvideo.h"
     47 #include "../SDL_pixels_c.h"
     48 #include "../../events/SDL_events_c.h"
     49 #include "SDL_svgavideo.h"
     50 #include "SDL_svgaevents_c.h"
     51 #include "SDL_svgamouse_c.h"
     52 
     53 /* Initialization/Query functions */
     54 static int SVGA_VideoInit(_THIS, SDL_PixelFormat *vformat);
     55 static SDL_Rect **SVGA_ListModes(_THIS, SDL_PixelFormat *format, Uint32 flags);
     56 static SDL_Surface *SVGA_SetVideoMode(_THIS, SDL_Surface *current, int width, int height, int bpp, Uint32 flags);
     57 static int SVGA_SetColors(_THIS, int firstcolor, int ncolors,
     58 			  SDL_Color *colors);
     59 static void SVGA_VideoQuit(_THIS);
     60 
     61 /* Hardware surface functions */
     62 static int SVGA_AllocHWSurface(_THIS, SDL_Surface *surface);
     63 static int SVGA_LockHWSurface(_THIS, SDL_Surface *surface);
     64 static int SVGA_FlipHWSurface(_THIS, SDL_Surface *surface);
     65 static void SVGA_UnlockHWSurface(_THIS, SDL_Surface *surface);
     66 static void SVGA_FreeHWSurface(_THIS, SDL_Surface *surface);
     67 
     68 /* SVGAlib driver bootstrap functions */
     69 
     70 static int SVGA_Available(void)
     71 {
     72 	/* Check to see if we are root and stdin is a virtual console */
     73 	int console;
     74 
     75 	/* SVGALib 1.9.x+ doesn't require root (via /dev/svga) */
     76 	int svgalib2 = -1;
     77 
     78 	/* See if we are connected to a virtual terminal */
     79 	console = STDIN_FILENO;
     80 #if 0 /* This is no longer needed, SVGAlib can switch consoles for us */
     81 	if ( console >= 0 ) {
     82 		struct stat sb;
     83 		struct vt_mode dummy;
     84 
     85 		if ( (fstat(console, &sb) < 0) ||
     86 		     (ioctl(console, VT_GETMODE, &dummy) < 0) ) {
     87 			console = -1;
     88 		}
     89 	}
     90 #endif /* 0 */
     91 
     92 	/* See if SVGAlib 2.0 is available */
     93 	svgalib2 = open("/dev/svga", O_RDONLY);
     94 	if (svgalib2 != -1) {
     95 		close(svgalib2);
     96 	}
     97 
     98 	return(((svgalib2 != -1) || (geteuid() == 0)) && (console >= 0));
     99 }
    100 
    101 static void SVGA_DeleteDevice(SDL_VideoDevice *device)
    102 {
    103 	SDL_free(device->hidden);
    104 	SDL_free(device);
    105 }
    106 
    107 static SDL_VideoDevice *SVGA_CreateDevice(int devindex)
    108 {
    109 	SDL_VideoDevice *device;
    110 
    111 	/* Initialize all variables that we clean on shutdown */
    112 	device = (SDL_VideoDevice *)SDL_malloc(sizeof(SDL_VideoDevice));
    113 	if ( device ) {
    114 		SDL_memset(device, 0, (sizeof *device));
    115 		device->hidden = (struct SDL_PrivateVideoData *)
    116 				SDL_malloc((sizeof *device->hidden));
    117 	}
    118 	if ( (device == NULL) || (device->hidden == NULL) ) {
    119 		SDL_OutOfMemory();
    120 		if ( device ) {
    121 			SDL_free(device);
    122 		}
    123 		return(0);
    124 	}
    125 	SDL_memset(device->hidden, 0, (sizeof *device->hidden));
    126 
    127 	/* Set the function pointers */
    128 	device->VideoInit = SVGA_VideoInit;
    129 	device->ListModes = SVGA_ListModes;
    130 	device->SetVideoMode = SVGA_SetVideoMode;
    131 	device->SetColors = SVGA_SetColors;
    132 	device->UpdateRects = NULL;
    133 	device->VideoQuit = SVGA_VideoQuit;
    134 	device->AllocHWSurface = SVGA_AllocHWSurface;
    135 	device->CheckHWBlit = NULL;
    136 	device->FillHWRect = NULL;
    137 	device->SetHWColorKey = NULL;
    138 	device->SetHWAlpha = NULL;
    139 	device->LockHWSurface = SVGA_LockHWSurface;
    140 	device->UnlockHWSurface = SVGA_UnlockHWSurface;
    141 	device->FlipHWSurface = SVGA_FlipHWSurface;
    142 	device->FreeHWSurface = SVGA_FreeHWSurface;
    143 	device->SetCaption = NULL;
    144 	device->SetIcon = NULL;
    145 	device->IconifyWindow = NULL;
    146 	device->GrabInput = NULL;
    147 	device->GetWMInfo = NULL;
    148 	device->InitOSKeymap = SVGA_InitOSKeymap;
    149 	device->PumpEvents = SVGA_PumpEvents;
    150 
    151 	device->free = SVGA_DeleteDevice;
    152 
    153 	return device;
    154 }
    155 
    156 VideoBootStrap SVGALIB_bootstrap = {
    157 	"svgalib", "SVGAlib",
    158 	SVGA_Available, SVGA_CreateDevice
    159 };
    160 
    161 static int SVGA_AddMode(_THIS, int mode, int actually_add)
    162 {
    163 	int i, j;
    164 	vga_modeinfo *modeinfo;
    165 
    166 	modeinfo = vga_getmodeinfo(mode);
    167 
    168 	i = modeinfo->bytesperpixel-1;
    169 	if ( i < 0 ) {
    170 		return 0;
    171 	}
    172 	if ( actually_add ) {
    173 		SDL_Rect saved_rect[2];
    174 		int      saved_mode[2];
    175 		int b;
    176 
    177 		/* Add the mode, sorted largest to smallest */
    178 		b = 0;
    179 		j = 0;
    180 		while ( (SDL_modelist[i][j]->w > modeinfo->width) ||
    181 			(SDL_modelist[i][j]->h > modeinfo->height) ) {
    182 			++j;
    183 		}
    184 		/* Skip modes that are already in our list */
    185 		if ( (SDL_modelist[i][j]->w == modeinfo->width) &&
    186 		     (SDL_modelist[i][j]->h == modeinfo->height) ) {
    187 			return(0);
    188 		}
    189 		/* Insert the new mode */
    190 		saved_rect[b] = *SDL_modelist[i][j];
    191 		saved_mode[b] = SDL_vgamode[i][j];
    192 		SDL_modelist[i][j]->w = modeinfo->width;
    193 		SDL_modelist[i][j]->h = modeinfo->height;
    194 		SDL_vgamode[i][j] = mode;
    195 		/* Everybody scoot down! */
    196 		if ( saved_rect[b].w && saved_rect[b].h ) {
    197 		    for ( ++j; SDL_modelist[i][j]->w; ++j ) {
    198 			saved_rect[!b] = *SDL_modelist[i][j];
    199 			saved_mode[!b] = SDL_vgamode[i][j];
    200 			*SDL_modelist[i][j] = saved_rect[b];
    201 			SDL_vgamode[i][j] = saved_mode[b];
    202 			b = !b;
    203 		    }
    204 		    *SDL_modelist[i][j] = saved_rect[b];
    205 		    SDL_vgamode[i][j] = saved_mode[b];
    206 		}
    207 	} else {
    208 		++SDL_nummodes[i];
    209 	}
    210 	return(1);
    211 }
    212 
    213 static void SVGA_UpdateVideoInfo(_THIS)
    214 {
    215 	vga_modeinfo *modeinfo;
    216 
    217 	this->info.wm_available = 0;
    218 	this->info.hw_available = (banked ? 0 : 1);
    219 	modeinfo = vga_getmodeinfo(vga_getcurrentmode());
    220 	this->info.video_mem = modeinfo->memory;
    221 	/* FIXME: Add hardware accelerated blit information */
    222 #ifdef SVGALIB_DEBUG
    223 	printf("Hardware accelerated blit: %savailable\n", modeinfo->haveblit ? "" : "not ");
    224 #endif
    225 }
    226 
    227 int SVGA_VideoInit(_THIS, SDL_PixelFormat *vformat)
    228 {
    229 	int keyboard;
    230 	int i, j;
    231 	int mode, total_modes;
    232 
    233 	/* Initialize all variables that we clean on shutdown */
    234 	for ( i=0; i<NUM_MODELISTS; ++i ) {
    235 		SDL_nummodes[i] = 0;
    236 		SDL_modelist[i] = NULL;
    237 		SDL_vgamode[i] = NULL;
    238 	}
    239 
    240 	/* Initialize the library */
    241 	vga_disabledriverreport();
    242 	if ( vga_init() < 0 ) {
    243 		SDL_SetError("Unable to initialize SVGAlib");
    244 		return(-1);
    245 	}
    246 	vga_setmode(TEXT);
    247 
    248 	/* Enable mouse and keyboard support */
    249 	vga_setmousesupport(1);
    250 	keyboard = keyboard_init_return_fd();
    251 	if ( keyboard < 0 ) {
    252 		SDL_SetError("Unable to initialize keyboard");
    253 		return(-1);
    254 	}
    255 	if ( SVGA_initkeymaps(keyboard) < 0 ) {
    256 		return(-1);
    257 	}
    258 	keyboard_seteventhandler(SVGA_keyboardcallback);
    259 
    260 	/* Determine the current screen size */
    261 	this->info.current_w = 0;
    262 	this->info.current_h = 0;
    263 
    264 	/* Determine the screen depth (use default 8-bit depth) */
    265 	vformat->BitsPerPixel = 8;
    266 
    267 	/* Enumerate the available fullscreen modes */
    268 	total_modes = 0;
    269 	for ( mode=vga_lastmodenumber(); mode; --mode ) {
    270 		if ( vga_hasmode(mode) ) {
    271 			if ( SVGA_AddMode(this, mode, 0) ) {
    272 				++total_modes;
    273 			}
    274 		}
    275 	}
    276 	if ( SVGA_AddMode(this, G320x200x256, 0) ) ++total_modes;
    277 	if ( total_modes == 0 ) {
    278 		SDL_SetError("No linear video modes available");
    279 		return(-1);
    280 	}
    281 	for ( i=0; i<NUM_MODELISTS; ++i ) {
    282 		SDL_vgamode[i] = (int *)SDL_malloc(SDL_nummodes[i]*sizeof(int));
    283 		if ( SDL_vgamode[i] == NULL ) {
    284 			SDL_OutOfMemory();
    285 			return(-1);
    286 		}
    287 		SDL_modelist[i] = (SDL_Rect **)
    288 				SDL_malloc((SDL_nummodes[i]+1)*sizeof(SDL_Rect *));
    289 		if ( SDL_modelist[i] == NULL ) {
    290 			SDL_OutOfMemory();
    291 			return(-1);
    292 		}
    293 		for ( j=0; j<SDL_nummodes[i]; ++j ) {
    294 			SDL_modelist[i][j]=(SDL_Rect *)SDL_malloc(sizeof(SDL_Rect));
    295 			if ( SDL_modelist[i][j] == NULL ) {
    296 				SDL_OutOfMemory();
    297 				return(-1);
    298 			}
    299 			SDL_memset(SDL_modelist[i][j], 0, sizeof(SDL_Rect));
    300 		}
    301 		SDL_modelist[i][j] = NULL;
    302 	}
    303 	for ( mode=vga_lastmodenumber(); mode; --mode ) {
    304 		if ( vga_hasmode(mode) ) {
    305 			SVGA_AddMode(this, mode, 1);
    306 		}
    307 	}
    308 	SVGA_AddMode(this, G320x200x256, 1);
    309 
    310 	/* Free extra (duplicated) modes */
    311 	for ( i=0; i<NUM_MODELISTS; ++i ) {
    312 		j = 0;
    313 		while ( SDL_modelist[i][j] && SDL_modelist[i][j]->w ) {
    314 			j++;
    315 		}
    316 		while ( SDL_modelist[i][j] ) {
    317 			SDL_free(SDL_modelist[i][j]);
    318 			SDL_modelist[i][j] = NULL;
    319 			j++;
    320 		}
    321 	}
    322 
    323 	/* Fill in our hardware acceleration capabilities */
    324 	SVGA_UpdateVideoInfo(this);
    325 
    326 	/* We're done! */
    327 	return(0);
    328 }
    329 
    330 SDL_Rect **SVGA_ListModes(_THIS, SDL_PixelFormat *format, Uint32 flags)
    331 {
    332 	return(SDL_modelist[((format->BitsPerPixel+7)/8)-1]);
    333 }
    334 
    335 /* Various screen update functions available */
    336 static void SVGA_DirectUpdate(_THIS, int numrects, SDL_Rect *rects);
    337 static void SVGA_BankedUpdate(_THIS, int numrects, SDL_Rect *rects);
    338 
    339 SDL_Surface *SVGA_SetVideoMode(_THIS, SDL_Surface *current,
    340 				int width, int height, int bpp, Uint32 flags)
    341 {
    342 	int mode;
    343 	int vgamode;
    344 	vga_modeinfo *modeinfo;
    345 	int screenpage_len;
    346 
    347 	/* Free old pixels if we were in banked mode */
    348 	if ( banked && current->pixels ) {
    349 		free(current->pixels);
    350 		current->pixels = NULL;
    351 	}
    352 
    353 	/* Try to set the requested linear video mode */
    354 	bpp = (bpp+7)/8-1;
    355 	for ( mode=0; SDL_modelist[bpp][mode]; ++mode ) {
    356 		if ( (SDL_modelist[bpp][mode]->w == width) &&
    357 		     (SDL_modelist[bpp][mode]->h == height) ) {
    358 			break;
    359 		}
    360 	}
    361 	if ( SDL_modelist[bpp][mode] == NULL ) {
    362 		SDL_SetError("Couldn't find requested mode in list");
    363 		return(NULL);
    364 	}
    365 	vgamode = SDL_vgamode[bpp][mode];
    366 	vga_setmode(vgamode);
    367 	vga_setpage(0);
    368 
    369 	if ( (vga_setlinearaddressing() < 0) && (vgamode != G320x200x256) ) {
    370 		banked = 1;
    371 	} else {
    372 		banked = 0;
    373 	}
    374 
    375 	modeinfo = vga_getmodeinfo(SDL_vgamode[bpp][mode]);
    376 
    377 	/* Update hardware acceleration info */
    378 	SVGA_UpdateVideoInfo(this);
    379 
    380 	/* Allocate the new pixel format for the screen */
    381 	bpp = (bpp+1)*8;
    382 	if ( (bpp == 16) && (modeinfo->colors == 32768) ) {
    383 		bpp = 15;
    384 	}
    385 	if ( ! SDL_ReallocFormat(current, bpp, 0, 0, 0, 0) ) {
    386 		return(NULL);
    387 	}
    388 
    389 	/* Set up the new mode framebuffer */
    390 	current->flags = SDL_FULLSCREEN;
    391 	if ( !banked ) {
    392 		current->flags |= SDL_HWSURFACE;
    393 	}
    394 	if ( bpp == 8 ) {
    395 		/* FIXME: What about DirectColor? */
    396 		current->flags |= SDL_HWPALETTE;
    397 	}
    398 	current->w = width;
    399 	current->h = height;
    400 	current->pitch = modeinfo->linewidth;
    401 	if ( banked ) {
    402 		current->pixels = SDL_malloc(current->h * current->pitch);
    403 		if ( !current->pixels ) {
    404 			SDL_OutOfMemory();
    405 			return(NULL);
    406 		}
    407 	} else {
    408 		current->pixels = vga_getgraphmem();
    409 	}
    410 
    411 	/* set double-buffering */
    412 	if ( (flags & SDL_DOUBLEBUF) && !banked )
    413 	{
    414 	    /* length of one screen page in bytes */
    415 	    screenpage_len=current->h*modeinfo->linewidth;
    416 
    417 	    /* if start address should be aligned */
    418 	    if ( modeinfo->linewidth_unit )
    419 	    {
    420 		if ( screenpage_len % modeinfo->linewidth_unit )
    421 		{
    422 		    screenpage_len += modeinfo->linewidth_unit - ( screenpage_len % modeinfo->linewidth_unit );
    423 		}
    424 	    }
    425 
    426 	    /* if we heve enough videomemory =  ak je dost videopamete  */
    427 	    if ( modeinfo->memory > ( screenpage_len * 2 / 1024 ) )
    428 	    {
    429 		current->flags |= SDL_DOUBLEBUF;
    430 		flip_page = 0;
    431 		flip_offset[0] = 0;
    432 		flip_offset[1] = screenpage_len;
    433 		flip_address[0] = vga_getgraphmem();
    434 		flip_address[1] = flip_address[0]+screenpage_len;
    435 		SVGA_FlipHWSurface(this,current);
    436 	    }
    437 	}
    438 
    439 	/* Set the blit function */
    440 	if ( banked ) {
    441 		this->UpdateRects = SVGA_BankedUpdate;
    442 	} else {
    443 		this->UpdateRects = SVGA_DirectUpdate;
    444 	}
    445 
    446 	/* Set up the mouse handler again (buggy SVGAlib 1.40) */
    447 	mouse_seteventhandler(SVGA_mousecallback);
    448 
    449 	/* We're done */
    450 	return(current);
    451 }
    452 
    453 /* We don't actually allow hardware surfaces other than the main one */
    454 static int SVGA_AllocHWSurface(_THIS, SDL_Surface *surface)
    455 {
    456 	return(-1);
    457 }
    458 static void SVGA_FreeHWSurface(_THIS, SDL_Surface *surface)
    459 {
    460 	return;
    461 }
    462 
    463 /* We need to wait for vertical retrace on page flipped displays */
    464 static int SVGA_LockHWSurface(_THIS, SDL_Surface *surface)
    465 {
    466 	/* The waiting is done in SVGA_FlipHWSurface() */
    467 	return(0);
    468 }
    469 static void SVGA_UnlockHWSurface(_THIS, SDL_Surface *surface)
    470 {
    471 	return;
    472 }
    473 
    474 static int SVGA_FlipHWSurface(_THIS, SDL_Surface *surface)
    475 {
    476 	if ( !banked ) {
    477 		vga_setdisplaystart(flip_offset[flip_page]);
    478 		flip_page=!flip_page;
    479 		surface->pixels=flip_address[flip_page];
    480 		vga_waitretrace();
    481 	}
    482 	return(0);
    483 }
    484 
    485 static void SVGA_DirectUpdate(_THIS, int numrects, SDL_Rect *rects)
    486 {
    487 	return;
    488 }
    489 
    490 static void SVGA_BankedUpdate(_THIS, int numrects, SDL_Rect *rects)
    491 {
    492 	int i, j;
    493 	SDL_Rect *rect;
    494 	int page, vp;
    495 	int x, y, w, h;
    496 	unsigned char *src;
    497 	unsigned char *dst;
    498 	int bpp = this->screen->format->BytesPerPixel;
    499 	int pitch = this->screen->pitch;
    500 
    501 	dst = vga_getgraphmem();
    502 	for ( i=0; i < numrects; ++i ) {
    503 		rect = &rects[i];
    504 		x = rect->x;
    505 		y = rect->y;
    506 		w = rect->w * bpp;
    507 		h = rect->h;
    508 
    509 		vp = y * pitch + x * bpp;
    510 		src = (unsigned char *)this->screen->pixels + vp;
    511 		page = vp >> 16;
    512 		vp &= 0xffff;
    513 		vga_setpage(page);
    514 		for (j = 0; j < h; j++) {
    515 			if (vp + w > 0x10000) {
    516 				if (vp >= 0x10000) {
    517 					page++;
    518 					vga_setpage(page);
    519 					vp &= 0xffff;
    520 				} else {
    521 					SDL_memcpy(dst + vp, src, 0x10000 - vp);
    522 					page++;
    523 					vga_setpage(page);
    524 					SDL_memcpy(dst, src + 0x10000 - vp,
    525 						 (vp + w) & 0xffff);
    526 					vp = (vp + pitch) & 0xffff;
    527 					src += pitch;
    528 					continue;
    529 				}
    530 			}
    531 			SDL_memcpy(dst + vp, src, w);
    532 			src += pitch;
    533 			vp += pitch;
    534 		}
    535 	}
    536 }
    537 
    538 int SVGA_SetColors(_THIS, int firstcolor, int ncolors, SDL_Color *colors)
    539 {
    540         int i;
    541 
    542 	for(i = 0; i < ncolors; i++) {
    543 	        vga_setpalette(firstcolor + i,
    544 			       colors[i].r>>2,
    545 			       colors[i].g>>2,
    546 			       colors[i].b>>2);
    547 	}
    548 	return(1);
    549 }
    550 
    551 /* Note:  If we are terminated, this could be called in the middle of
    552    another SDL video routine -- notably UpdateRects.
    553 */
    554 void SVGA_VideoQuit(_THIS)
    555 {
    556 	int i, j;
    557 
    558 	/* Reset the console video mode */
    559 	if ( this->screen && (this->screen->w && this->screen->h) ) {
    560 		vga_setmode(TEXT);
    561 	}
    562 	keyboard_close();
    563 
    564 	/* Free video mode lists */
    565 	for ( i=0; i<NUM_MODELISTS; ++i ) {
    566 		if ( SDL_modelist[i] != NULL ) {
    567 			for ( j=0; SDL_modelist[i][j]; ++j )
    568 				SDL_free(SDL_modelist[i][j]);
    569 			SDL_free(SDL_modelist[i]);
    570 			SDL_modelist[i] = NULL;
    571 		}
    572 		if ( SDL_vgamode[i] != NULL ) {
    573 			SDL_free(SDL_vgamode[i]);
    574 			SDL_vgamode[i] = NULL;
    575 		}
    576 	}
    577 	if ( this->screen ) {
    578 		if ( banked && this->screen->pixels ) {
    579 			SDL_free(this->screen->pixels);
    580 		}
    581 		this->screen->pixels = NULL;
    582 	}
    583 }
    584 
    585