[sdl_omap.git] / src / video / omapdss / sdlif.c

/*
 * (C) Gražvydas "notaz" Ignotas, 2010-2012
 *
 * This work is licensed under the terms of the GNU LGPL, version 2.1 or later.
 * See the COPYING file in the top-level directory.
 */

#include <stdio.h>
#include <stdlib.h>
#include <X11/XF86keysym.h>

#include "../SDL_sysvideo.h"
#include "../SDL_pixels_c.h"
#include "../../events/SDL_events_c.h"

#include "SDL_x11reuse.h"
#include "linux/xenv.h"
#include "osdl.h"


static int omap_available(void) 
{
	trace();
	return 1;
}

static void omap_free(SDL_VideoDevice *device)
{
	trace();
	free(device);
}

static int omap_VideoInit(SDL_VideoDevice *this, SDL_PixelFormat *vformat)
{
	struct SDL_PrivateVideoData *pdata = this->hidden;
	const char *tmp;
	int w, h, ret;

	trace();

	// default to 16bpp
	vformat->BitsPerPixel = 16;

	omapsdl_input_init();
	omapsdl_config(pdata);

	tmp = getenv("SDL_OMAP_DEFAULT_MODE");
	if (tmp != NULL && sscanf(tmp, "%dx%d", &w, &h) == 2) {
		this->info.current_w = w;
		this->info.current_h = h;
	}
	else if (osdl_video_detect_screen(pdata) == 0) {
		this->info.current_w = pdata->phys_w;
		this->info.current_h = pdata->phys_h;
	}

	this->handles_any_size = 1;
	this->info.hw_available = 1;

	pdata->x11reuse_context = x11reuse_init();

	return 0;
}

static void omap_VideoQuit(SDL_VideoDevice *this)
{
	trace();

	osdl_video_finish(this->hidden);
	this->screen->pixels = NULL;
	omapsdl_input_finish();
}

static SDL_Rect **omap_ListModes(SDL_VideoDevice *this, SDL_PixelFormat *format, Uint32 flags)
{
	static SDL_Rect omap_mode_max = {
		/* with handles_any_size, should accept anything up to this
		 * XXX: possibly set this dynamically based on free vram? */
		0, 0, 1600, 1200
	};
	/* broken API needs this stupidity */
	static SDL_Rect *omap_modes[] = {
		&omap_mode_max,
		NULL
	};

	trace();

	if (format->BitsPerPixel <= 8)
		// not (yet?) supported
		return NULL;

	return omap_modes;
}

static SDL_Surface *omap_SetVideoMode(SDL_VideoDevice *this, SDL_Surface *current, int width,
					int height, int bpp, Uint32 flags)
{
	struct SDL_PrivateVideoData *pdata = this->hidden;
	SDL_PixelFormat *format;
	Uint32 unhandled_flags;
	int doublebuf;
	void *fbmem;

	trace("%d, %d, %d, %08x", width, height, bpp, flags);

	omapsdl_config_from_env(pdata);

	switch (bpp) {
	case 16:
		format = SDL_ReallocFormat(current, 16, 0xf800, 0x07e0, 0x001f, 0);
		break;
	case 24:
		format = SDL_ReallocFormat(current, 24, 0xff0000, 0xff00, 0xff, 0);
		break;
	case 32:
		format = SDL_ReallocFormat(current, 32, 0xff0000, 0xff00, 0xff, 0);
		break;
	default:
		err("SetVideoMode: bpp %d not supported", bpp);
		return NULL;
	}
	if (format == NULL)
		return NULL;

	if (!(flags & SDL_DOUBLEBUF) && pdata->cfg_force_doublebuf) {
		log("forcing SDL_DOUBLEBUF");
		flags |= SDL_DOUBLEBUF;
	}

	if (pdata->border_l | pdata->border_r | pdata->border_t | pdata->border_b) {
		if (pdata->border_l + pdata->border_r >= width
		    || pdata->border_t + pdata->border_b >= height)
		{
			err("specified border too large, ignoring");
			pdata->border_l = pdata->border_r = pdata->border_t = pdata->border_b = 0;
		}
	}

	/* always use doublebuf, when SDL_DOUBLEBUF is not set,
	 * we'll have to blit manually on UpdateRects() */
	doublebuf = 1;

	fbmem = osdl_video_set_mode(pdata,
		pdata->border_l, pdata->border_r, pdata->border_t, pdata->border_b,
		width, height, bpp, &doublebuf, this->wm_title);
	if (fbmem == NULL) {
		err("failing on mode %dx%d@%d, doublebuf %s, border %d,%d,%d,%d",
		    width, height, bpp, (flags & SDL_DOUBLEBUF) ? "on" : "off",
		    pdata->border_l, pdata->border_r, pdata->border_t, pdata->border_b);
		return NULL;
	}
	pdata->front_buffer = osdl_video_get_active_buffer(pdata);
	if (pdata->front_buffer == NULL) {
		err("osdl_video_get_active_buffer failed\n");
		return NULL;
	}

	if (!doublebuf) {
		if (flags & SDL_DOUBLEBUF) {
			log("doublebuffering could not be set\n");
			flags &= ~SDL_DOUBLEBUF;
		}
		/* XXX: could just malloc a back buffer here instead */
		pdata->cfg_force_directbuf = 1;
	}

	if (!(flags & SDL_DOUBLEBUF) && pdata->cfg_force_directbuf)
		fbmem = pdata->front_buffer;

	flags |= SDL_FULLSCREEN | SDL_HWSURFACE;
	unhandled_flags = flags & ~(SDL_FULLSCREEN | SDL_HWSURFACE | SDL_DOUBLEBUF);
	if (unhandled_flags != 0) {
		log("dropping unhandled flags: %08x", unhandled_flags);
		flags &= ~unhandled_flags;
	}

	current->flags = flags;
	current->w = width;
	current->h = height;
	current->pitch = SDL_CalculatePitch(current);
	current->pixels = fbmem;
	pdata->app_uses_flip = 0;

	if (pdata->layer_w != 0 && pdata->layer_h != 0) {
		int v_width  = width  - (pdata->border_l + pdata->border_r);
		int v_height = height - (pdata->border_t + pdata->border_b);
		pdata->ts_xmul = (v_width  << 16) / pdata->layer_w;
		pdata->ts_ymul = (v_height << 16) / pdata->layer_h;
	}

	if (pdata->delayed_icon != NULL) {
		this->SetIcon(this, pdata->delayed_icon,
			pdata->delayed_icon_mask);
		SDL_FreeSurface(pdata->delayed_icon);
		pdata->delayed_icon = NULL;
		if (pdata->delayed_icon_mask) {
			free(pdata->delayed_icon_mask);
			pdata->delayed_icon_mask = NULL;
		}
	}

	return current;
}

static int omap_LockHWSurface(SDL_VideoDevice *this, SDL_Surface *surface)
{
	trace("%p", surface);

	return 0;
}

static void omap_UnlockHWSurface(SDL_VideoDevice *this, SDL_Surface *surface)
{
	trace("%p", surface);
}

static int omap_FlipHWSurface(SDL_VideoDevice *this, SDL_Surface *surface)
{
	struct SDL_PrivateVideoData *pdata = this->hidden;
	static int warned;

	trace("%p", surface);

	if (surface != this->screen) {
		if (!warned) {
			err("flip surface %p which is not screen %p?\n",
				surface, this->screen);
			warned = 1;
		}
		return;
	}

	if (surface->flags & SDL_DOUBLEBUF)
		surface->pixels = osdl_video_flip(pdata);
	else {
		if (surface->pixels != pdata->front_buffer)
			memcpy(surface->pixels, pdata->front_buffer,
				surface->pitch * surface->h);
	}

	pdata->app_uses_flip = 1;

	return 0;
}

/* we can't do hw surfaces (besides screen one) yet */
static int omap_AllocHWSurface(SDL_VideoDevice *this, SDL_Surface *surface)
{
	trace("%p", surface);
	return -1;
}

static void omap_FreeHWSurface(SDL_VideoDevice *this, SDL_Surface *surface)
{
	trace("%p", surface);
}

static int omap_SetColors(SDL_VideoDevice *this, int firstcolor, int ncolors, SDL_Color *colors)
{
	trace("%d, %d, %p", firstcolor, ncolors, colors);
	return 0;
}

static void omap_UpdateRects(SDL_VideoDevice *this, int nrects, SDL_Rect *rects)
{
	struct SDL_PrivateVideoData *pdata = this->hidden;
	SDL_Surface *screen = this->screen;
	int fullscreen_blit = 0;
	int i, Bpp, x, y, w, h;
	char *src, *dst;

	trace("%d, %p", nrects, rects);

	fullscreen_blit =
		nrects == 1 && rects->x == 0 && rects->y == 0
		    && (rects->w == screen->w || rects->w == 0)
		    && (rects->h == screen->h || rects->h == 0);

	if (screen->flags & SDL_DOUBLEBUF) {
		if (fullscreen_blit && !pdata->app_uses_flip)
			screen->pixels = osdl_video_flip(pdata);
		return;
	}

	src = screen->pixels;
	dst = pdata->front_buffer;
	if (src == dst)
		return;

	if (fullscreen_blit) {
		memcpy(dst, src, screen->pitch * screen->h);
		return;
	}

	for (i = 0, Bpp = screen->format->BytesPerPixel; i < nrects; i++) {
		/* this supposedly has no clipping, but we'll do it anyway */
		x = rects[i].x, y = rects[i].y, w = rects[i].w, h = rects[i].h;
		if (x < 0)
			w += x, x = 0;
		else if (x + w > screen->w)
			w = screen->w - x;
		if (w <= 0)
			continue;

		if (y < 0)
			h += y, y = 0;
		else if (y + h > screen->h)
			h = screen->h - y;

		for (; h > 0; y++, h--)
			memcpy(dst + y * screen->pitch + x * Bpp,
			       src + y * screen->pitch + x * Bpp,
			       w * Bpp);
	}
}

static void omap_InitOSKeymap(SDL_VideoDevice *this)
{
	trace();
}

static int key_event_cb(void *cb_arg, int sdl_kc, int sdl_sc, int is_pressed)
{
	SDL_keysym keysym = { 0, };
	int shift = 0;
	SDLMod mod;
	int ret;

	keysym.sym = sdl_kc;
	keysym.scancode = sdl_sc;

	/* 0xff if pandora's Fn, so we exclude it too.. */
	if (is_pressed && sdl_kc < 0xff && SDL_TranslateUNICODE) {
		mod = SDL_GetModState();
		if (!(mod & KMOD_CTRL) && (!!(mod & KMOD_SHIFT) ^ !!(mod & KMOD_CAPS)))
			shift = 1;

		/* prefer X mapping, if that doesn't work use hardcoded one */
		ret = xenv_keycode_to_keysym(sdl_sc, shift);
		if (ret >= 0) {
			keysym.unicode = ret;
			if ((mod & KMOD_CTRL)
			    && 0x60 <= keysym.unicode && keysym.unicode <= 0x7f)
			{
				keysym.unicode -= 0x60;
			}
			/* hmh.. */
			if ((keysym.unicode & 0xff00) == 0xff00)
				keysym.unicode &= ~0xff00;
		}
		else {
			keysym.unicode = sdl_kc;
			if ((mod & KMOD_CTRL) && 0x60 <= sdl_kc && sdl_kc <= 0x7f)
			{
				keysym.unicode = sdl_kc - 0x60;
			}
			else if (shift && 'a' <= sdl_kc && sdl_kc <= 'z')
			{
				keysym.unicode = sdl_kc - 'a' + 'A';
			}
		}
	}

	SDL_PrivateKeyboard(is_pressed, &keysym);
}

/* clamp x to min..max-1 */
#define clamp(x, min, max) \
	if (x < (min)) x = min; \
	if (x >= (max)) x = max

static void translate_mouse(SDL_VideoDevice *this, int *x, int *y)
{
	struct SDL_PrivateVideoData *pdata = this->hidden;

	if (!pdata->cfg_no_ts_translate && pdata->layer_w != 0 && pdata->layer_h != 0) {
		*x = pdata->border_l + ((*x - pdata->layer_x) * pdata->ts_xmul >> 16);
		*y = pdata->border_t + ((*y - pdata->layer_y) * pdata->ts_ymul >> 16);
		clamp(*x, 0, this->screen->w);
		clamp(*y, 0, this->screen->h);
	}
}

static int ts_event_cb(void *cb_arg, int x, int y, unsigned int pressure)
{
	static int was_pressed;
	SDL_VideoDevice *this = cb_arg;
	struct SDL_PrivateVideoData *pdata = this->hidden;

	translate_mouse(this, &x, &y);

	pressure = !!pressure;
	if (pressure != was_pressed) {
		SDL_PrivateMouseButton(pressure ? SDL_PRESSED : SDL_RELEASED, 1, x, y);
		was_pressed = pressure;
	}
	else
		SDL_PrivateMouseMotion(0, 0, x, y);
}

static int xmouseb_event_cb(void *cb_arg, int x, int y, int button, int is_pressed)
{
	SDL_VideoDevice *this = cb_arg;
	struct SDL_PrivateVideoData *pdata = this->hidden;

	translate_mouse(this, &x, &y);
	SDL_PrivateMouseButton(is_pressed ? SDL_PRESSED : SDL_RELEASED, button, x, y);
}

static int xmousem_event_cb(void *cb_arg, int x, int y)
{
	SDL_VideoDevice *this = cb_arg;
	struct SDL_PrivateVideoData *pdata = this->hidden;

	translate_mouse(this, &x, &y);
	SDL_PrivateMouseMotion(0, 0, x, y);
}

static int xkey_cb(void *cb_arg, int kc, int is_pressed)
{
	SDL_VideoDevice *this = cb_arg;
	struct SDL_PrivateVideoData *pdata = this->hidden;
	int ret;

	if (kc == XF86XK_MenuKB && is_pressed) {
		ret = osdl_video_pause(pdata, 1);
		if (ret == 0) {
			xenv_minimize();
			osdl_video_pause(pdata, 0);
			omapsdl_input_get_events(0, NULL, NULL, NULL);
		}
	}
}

static void omap_PumpEvents(SDL_VideoDevice *this) 
{
	struct SDL_PrivateVideoData *pdata = this->hidden;
	int read_tslib = 1;

	trace();

	if (pdata->xenv_up) {
		if (!pdata->cfg_ts_force_tslib) {
			xenv_update(xkey_cb, xmouseb_event_cb, xmousem_event_cb, this);
			if (pdata->xenv_mouse)
				read_tslib = 0;
		}
		else {
			/* just flush X event queue */
			xenv_update(NULL, NULL, NULL, NULL);
		}
	}

	omapsdl_input_get_events(0, key_event_cb,
		read_tslib ? ts_event_cb : NULL, this);
}

static void omap_SetCaption(SDL_VideoDevice *this, const char *title, const char *icon)
{
	void *display = NULL, *window = NULL;
	int screen = 0;
	int ret;

	ret = osdl_video_get_window(&display, &screen, &window);
	if (ret == 0) {
		x11reuse_SetCaption(this->hidden->x11reuse_context,
			display, screen, window, title, icon);
	}
}

static void omap_SetIcon(SDL_VideoDevice *this, SDL_Surface *icon, Uint8 *mask)
{
	struct SDL_PrivateVideoData *pdata = this->hidden;
	void *display = NULL, *window = NULL;
	int screen = 0;
	int ret;

	ret = osdl_video_get_window(&display, &screen, &window);
	if (ret == 0) {
		x11reuse_SetIcon(pdata->x11reuse_context,
			display, screen, window, icon, mask);
	}
	else {
		SDL_Surface *old_icon = pdata->delayed_icon;
		void *old_icon_mask = pdata->delayed_icon_mask;
		int mask_size = ((icon->w + 7) / 8) * icon->h;

		pdata->delayed_icon = SDL_ConvertSurface(icon,
					icon->format, icon->flags);
		if (pdata->delayed_icon != NULL) {
			memcpy(pdata->delayed_icon->pixels, icon->pixels,
				icon->pitch * icon->h);
		}
		if (mask != NULL) {
			pdata->delayed_icon_mask = malloc(mask_size);
			if (pdata->delayed_icon_mask)
				memcpy(pdata->delayed_icon_mask, mask, mask_size);
		}

		if (old_icon != NULL)
			SDL_FreeSurface(old_icon);
		if (old_icon_mask)
			free(old_icon_mask);
	}
}

static SDL_VideoDevice *omap_create(int devindex)
{
	SDL_VideoDevice *this;

	this = calloc(1, sizeof(*this) + sizeof(*this->hidden));
	if (this == NULL) {
		SDL_OutOfMemory();
		return 0;
	}
	this->hidden = (void *)(this + 1);
	this->VideoInit = omap_VideoInit;
	this->ListModes = omap_ListModes;
	this->SetVideoMode = omap_SetVideoMode;
	this->LockHWSurface = omap_LockHWSurface;
	this->UnlockHWSurface = omap_UnlockHWSurface;
	this->FlipHWSurface = omap_FlipHWSurface;
	this->AllocHWSurface = omap_AllocHWSurface;
	this->FreeHWSurface = omap_FreeHWSurface;
	this->SetColors = omap_SetColors;
	this->UpdateRects = omap_UpdateRects;
	this->VideoQuit = omap_VideoQuit;
	this->InitOSKeymap = omap_InitOSKeymap;
	this->PumpEvents = omap_PumpEvents;
	this->SetCaption = omap_SetCaption;
	this->SetIcon = omap_SetIcon;
	this->free = omap_free;

	return this;
}

VideoBootStrap omapdss_bootstrap = {
	"omapdss", "OMAP DSS2 Framebuffer Driver",
	omap_available, omap_create
};
Commit	Line	Data
9a8e84f8	1	/*
0c7caf2b	2	* (C) Gražvydas "notaz" Ignotas, 2010-2012
9a8e84f8	3	*
	4	* This work is licensed under the terms of the GNU LGPL, version 2.1 or later.
	5	* See the COPYING file in the top-level directory.
	6	*/
	7
b9a19b44	8	#include <stdio.h>
9a8e84f8	9	#include <stdlib.h>
090bcb85	10	#include <X11/XF86keysym.h>
9a8e84f8	11
	12	#include "../SDL_sysvideo.h"
	13	#include "../SDL_pixels_c.h"
	14	#include "../../events/SDL_events_c.h"
f9b3f440	15
ee7e6b2d	16	#include "SDL_x11reuse.h"
f9b3f440	17	#include "linux/xenv.h"
9ab462cd	18	#include "osdl.h"
9a8e84f8	19
9a8e84f8	20
9a8e84f8	21	static int omap_available(void)
	22	{
	23	trace();
	24	return 1;
	25	}
	26
	27	static void omap_free(SDL_VideoDevice *device)
	28	{
	29	trace();
	30	free(device);
	31	}
	32
	33	static int omap_VideoInit(SDL_VideoDevice this, SDL_PixelFormat vformat)
	34	{
ee7e6b2d	35	struct SDL_PrivateVideoData *pdata = this->hidden;
b9a19b44	36	const char *tmp;
	37	int w, h, ret;
	38
9a8e84f8	39	trace();
	40
	41	// default to 16bpp
	42	vformat->BitsPerPixel = 16;
	43
	44	omapsdl_input_init();
ee7e6b2d	45	omapsdl_config(pdata);
9a8e84f8	46
b9a19b44	47	tmp = getenv("SDL_OMAP_DEFAULT_MODE");
	48	if (tmp != NULL && sscanf(tmp, "%dx%d", &w, &h) == 2) {
	49	this->info.current_w = w;
	50	this->info.current_h = h;
	51	}
ee7e6b2d	52	else if (osdl_video_detect_screen(pdata) == 0) {
	53	this->info.current_w = pdata->phys_w;
	54	this->info.current_h = pdata->phys_h;
b9a19b44	55	}
b9a19b44	56
5d957fa5	57	this->handles_any_size = 1;
b9a19b44	58	this->info.hw_available = 1;
b9a19b44	59
ee7e6b2d	60	pdata->x11reuse_context = x11reuse_init();
ee7e6b2d	61
9a8e84f8	62	return 0;
	63	}
	64
	65	static void omap_VideoQuit(SDL_VideoDevice *this)
	66	{
	67	trace();
	68
f641fccb	69	osdl_video_finish(this->hidden);
9a8e84f8	70	this->screen->pixels = NULL;
17e19802	71	omapsdl_input_finish();
9a8e84f8	72	}
	73
	74	static SDL_Rect *omap_ListModes(SDL_VideoDevice this, SDL_PixelFormat *format, Uint32 flags)
	75	{
5d957fa5	76	static SDL_Rect omap_mode_max = {
	77	/* with handles_any_size, should accept anything up to this
	78	* XXX: possibly set this dynamically based on free vram? */
	79	0, 0, 1600, 1200
9a8e84f8	80	};
b9a19b44	81	/* broken API needs this stupidity */
9a8e84f8	82	static SDL_Rect *omap_modes[] = {
5d957fa5	83	&omap_mode_max,
9a8e84f8	84	NULL
	85	};
	86
	87	trace();
	88
	89	if (format->BitsPerPixel <= 8)
	90	// not (yet?) supported
	91	return NULL;
	92
	93	return omap_modes;
	94	}
	95
	96	static SDL_Surface omap_SetVideoMode(SDL_VideoDevice this, SDL_Surface *current, int width,
	97	int height, int bpp, Uint32 flags)
	98	{
5f4b1fd3	99	struct SDL_PrivateVideoData *pdata = this->hidden;
3576a5ac	100	SDL_PixelFormat *format;
0bb19c41	101	Uint32 unhandled_flags;
0c7caf2b	102	int doublebuf;
455c8c43	103	void *fbmem;
3576a5ac	104
9a8e84f8	105	trace("%d, %d, %d, %08x", width, height, bpp, flags);
9a8e84f8	106
5f4b1fd3	107	omapsdl_config_from_env(pdata);
0bb19c41	108
3576a5ac	109	switch (bpp) {
	110	case 16:
	111	format = SDL_ReallocFormat(current, 16, 0xf800, 0x07e0, 0x001f, 0);
	112	break;
	113	case 24:
	114	format = SDL_ReallocFormat(current, 24, 0xff0000, 0xff00, 0xff, 0);
	115	break;
	116	case 32:
5848b0cd	117	format = SDL_ReallocFormat(current, 32, 0xff0000, 0xff00, 0xff, 0);
3576a5ac	118	break;
3576a5ac	119	default:
0bb19c41	120	err("SetVideoMode: bpp %d not supported", bpp);
3576a5ac	121	return NULL;
	122	}
	123	if (format == NULL)
f641fccb	124	return NULL;
9a8e84f8	125
5f4b1fd3	126	if (!(flags & SDL_DOUBLEBUF) && pdata->cfg_force_doublebuf) {
0bb19c41	127	log("forcing SDL_DOUBLEBUF");
	128	flags \|= SDL_DOUBLEBUF;
	129	}
	130
455c8c43	131	if (pdata->border_l \| pdata->border_r \| pdata->border_t \| pdata->border_b) {
	132	if (pdata->border_l + pdata->border_r >= width
	133	\|\| pdata->border_t + pdata->border_b >= height)
	134	{
	135	err("specified border too large, ignoring");
	136	pdata->border_l = pdata->border_r = pdata->border_t = pdata->border_b = 0;
	137	}
	138	}
	139
5cc6dcb7	140	/* always use doublebuf, when SDL_DOUBLEBUF is not set,
	141	* we'll have to blit manually on UpdateRects() */
	142	doublebuf = 1;
	143
455c8c43	144	fbmem = osdl_video_set_mode(pdata,
455c8c43	145	pdata->border_l, pdata->border_r, pdata->border_t, pdata->border_b,
090bcb85	146	width, height, bpp, &doublebuf, this->wm_title);
455c8c43	147	if (fbmem == NULL) {
0c7caf2b	148	err("failing on mode %dx%d@%d, doublebuf %s, border %d,%d,%d,%d",
	149	width, height, bpp, (flags & SDL_DOUBLEBUF) ? "on" : "off",
	150	pdata->border_l, pdata->border_r, pdata->border_t, pdata->border_b);
9a8e84f8	151	return NULL;
455c8c43	152	}
5cc6dcb7	153	pdata->front_buffer = osdl_video_get_active_buffer(pdata);
	154	if (pdata->front_buffer == NULL) {
	155	err("osdl_video_get_active_buffer failed\n");
	156	return NULL;
	157	}
	158
	159	if (!doublebuf) {
	160	if (flags & SDL_DOUBLEBUF) {
	161	log("doublebuffering could not be set\n");
	162	flags &= ~SDL_DOUBLEBUF;
	163	}
	164	/* XXX: could just malloc a back buffer here instead */
	165	pdata->cfg_force_directbuf = 1;
0c7caf2b	166	}
9a8e84f8	167
5cc6dcb7	168	if (!(flags & SDL_DOUBLEBUF) && pdata->cfg_force_directbuf)
	169	fbmem = pdata->front_buffer;
	170
0bb19c41	171	flags \|= SDL_FULLSCREEN \| SDL_HWSURFACE;
	172	unhandled_flags = flags & ~(SDL_FULLSCREEN \| SDL_HWSURFACE \| SDL_DOUBLEBUF);
	173	if (unhandled_flags != 0) {
	174	log("dropping unhandled flags: %08x", unhandled_flags);
	175	flags &= ~unhandled_flags;
	176	}
	177
	178	current->flags = flags;
9a8e84f8	179	current->w = width;
	180	current->h = height;
	181	current->pitch = SDL_CalculatePitch(current);
455c8c43	182	current->pixels = fbmem;
9225e894	183	pdata->app_uses_flip = 0;
9a8e84f8	184
5f4b1fd3	185	if (pdata->layer_w != 0 && pdata->layer_h != 0) {
455c8c43	186	int v_width = width - (pdata->border_l + pdata->border_r);
	187	int v_height = height - (pdata->border_t + pdata->border_b);
	188	pdata->ts_xmul = (v_width << 16) / pdata->layer_w;
	189	pdata->ts_ymul = (v_height << 16) / pdata->layer_h;
5f4b1fd3	190	}
5f4b1fd3	191
ee7e6b2d	192	if (pdata->delayed_icon != NULL) {
	193	this->SetIcon(this, pdata->delayed_icon,
	194	pdata->delayed_icon_mask);
	195	SDL_FreeSurface(pdata->delayed_icon);
	196	pdata->delayed_icon = NULL;
	197	if (pdata->delayed_icon_mask) {
	198	free(pdata->delayed_icon_mask);
	199	pdata->delayed_icon_mask = NULL;
	200	}
	201	}
	202
9a8e84f8	203	return current;
	204	}
	205
9a8e84f8	206	static int omap_LockHWSurface(SDL_VideoDevice this, SDL_Surface surface)
	207	{
	208	trace("%p", surface);
	209
	210	return 0;
	211	}
	212
	213	static void omap_UnlockHWSurface(SDL_VideoDevice this, SDL_Surface surface)
	214	{
	215	trace("%p", surface);
	216	}
	217
	218	static int omap_FlipHWSurface(SDL_VideoDevice this, SDL_Surface surface)
	219	{
9225e894	220	struct SDL_PrivateVideoData *pdata = this->hidden;
5cc6dcb7	221	static int warned;
9225e894	222
9a8e84f8	223	trace("%p", surface);
9a8e84f8	224
5cc6dcb7	225	if (surface != this->screen) {
	226	if (!warned) {
	227	err("flip surface %p which is not screen %p?\n",
	228	surface, this->screen);
	229	warned = 1;
	230	}
	231	return;
	232	}
	233
	234	if (surface->flags & SDL_DOUBLEBUF)
	235	surface->pixels = osdl_video_flip(pdata);
	236	else {
	237	if (surface->pixels != pdata->front_buffer)
	238	memcpy(surface->pixels, pdata->front_buffer,
	239	surface->pitch * surface->h);
	240	}
	241
9225e894	242	pdata->app_uses_flip = 1;
9a8e84f8	243
	244	return 0;
	245	}
	246
37299201	247	/* we can't do hw surfaces (besides screen one) yet */
	248	static int omap_AllocHWSurface(SDL_VideoDevice this, SDL_Surface surface)
	249	{
	250	trace("%p", surface);
	251	return -1;
	252	}
	253
	254	static void omap_FreeHWSurface(SDL_VideoDevice this, SDL_Surface surface)
	255	{
	256	trace("%p", surface);
	257	}
	258
9a8e84f8	259	static int omap_SetColors(SDL_VideoDevice this, int firstcolor, int ncolors, SDL_Color colors)
	260	{
	261	trace("%d, %d, %p", firstcolor, ncolors, colors);
	262	return 0;
	263	}
	264
	265	static void omap_UpdateRects(SDL_VideoDevice this, int nrects, SDL_Rect rects)
	266	{
9225e894	267	struct SDL_PrivateVideoData *pdata = this->hidden;
5cc6dcb7	268	SDL_Surface *screen = this->screen;
830411e0	269	int fullscreen_blit = 0;
	270	int i, Bpp, x, y, w, h;
	271	char src, dst;
9225e894	272
9a8e84f8	273	trace("%d, %p", nrects, rects);
9a8e84f8	274
830411e0	275	fullscreen_blit =
830411e0	276	nrects == 1 && rects->x == 0 && rects->y == 0
5cc6dcb7	277	&& (rects->w == screen->w \|\| rects->w == 0)
830411e0	278	&& (rects->h == screen->h \|\| rects->h == 0);
	279
	280	if (screen->flags & SDL_DOUBLEBUF) {
	281	if (fullscreen_blit && !pdata->app_uses_flip)
5cc6dcb7	282	screen->pixels = osdl_video_flip(pdata);
5cc6dcb7	283	return;
	284	}
	285
	286	src = screen->pixels;
	287	dst = pdata->front_buffer;
	288	if (src == dst)
	289	return;
	290
830411e0	291	if (fullscreen_blit) {
	292	memcpy(dst, src, screen->pitch * screen->h);
	293	return;
	294	}
	295
	296	for (i = 0, Bpp = screen->format->BytesPerPixel; i < nrects; i++) {
5cc6dcb7	297	/* this supposedly has no clipping, but we'll do it anyway */
	298	x = rects[i].x, y = rects[i].y, w = rects[i].w, h = rects[i].h;
	299	if (x < 0)
	300	w += x, x = 0;
	301	else if (x + w > screen->w)
	302	w = screen->w - x;
	303	if (w <= 0)
	304	continue;
	305
	306	if (y < 0)
	307	h += y, y = 0;
	308	else if (y + h > screen->h)
	309	h = screen->h - y;
	310
	311	for (; h > 0; y++, h--)
830411e0	312	memcpy(dst + y * screen->pitch + x * Bpp,
	313	src + y * screen->pitch + x * Bpp,
	314	w * Bpp);
9a8e84f8	315	}
9a8e84f8	316	}
	317
	318	static void omap_InitOSKeymap(SDL_VideoDevice *this)
	319	{
	320	trace();
	321	}
	322
b260fb56	323	static int key_event_cb(void *cb_arg, int sdl_kc, int sdl_sc, int is_pressed)
9a8e84f8	324	{
9a8e84f8	325	SDL_keysym keysym = { 0, };
89df2746	326	int shift = 0;
	327	SDLMod mod;
	328	int ret;
9a8e84f8	329
9a8e84f8	330	keysym.sym = sdl_kc;
b260fb56	331	keysym.scancode = sdl_sc;
89df2746	332
	333	/* 0xff if pandora's Fn, so we exclude it too.. */
	334	if (is_pressed && sdl_kc < 0xff && SDL_TranslateUNICODE) {
	335	mod = SDL_GetModState();
	336	if (!(mod & KMOD_CTRL) && (!!(mod & KMOD_SHIFT) ^ !!(mod & KMOD_CAPS)))
	337	shift = 1;
	338
	339	/* prefer X mapping, if that doesn't work use hardcoded one */
	340	ret = xenv_keycode_to_keysym(sdl_sc, shift);
	341	if (ret >= 0) {
	342	keysym.unicode = ret;
	343	if ((mod & KMOD_CTRL)
	344	&& 0x60 <= keysym.unicode && keysym.unicode <= 0x7f)
	345	{
	346	keysym.unicode -= 0x60;
	347	}
	348	/* hmh.. */
	349	if ((keysym.unicode & 0xff00) == 0xff00)
	350	keysym.unicode &= ~0xff00;
	351	}
	352	else {
	353	keysym.unicode = sdl_kc;
	354	if ((mod & KMOD_CTRL) && 0x60 <= sdl_kc && sdl_kc <= 0x7f)
	355	{
	356	keysym.unicode = sdl_kc - 0x60;
	357	}
	358	else if (shift && 'a' <= sdl_kc && sdl_kc <= 'z')
	359	{
	360	keysym.unicode = sdl_kc - 'a' + 'A';
	361	}
	362	}
	363	}
	364
9a8e84f8	365	SDL_PrivateKeyboard(is_pressed, &keysym);
	366	}
	367
5f4b1fd3	368	/* clamp x to min..max-1 */
	369	#define clamp(x, min, max) \
	370	if (x < (min)) x = min; \
	371	if (x >= (max)) x = max
	372
e1837b2c	373	static void translate_mouse(SDL_VideoDevice this, int x, int *y)
17e19802	374	{
5f4b1fd3	375	struct SDL_PrivateVideoData *pdata = this->hidden;
5f4b1fd3	376
5f4b1fd3	377	if (!pdata->cfg_no_ts_translate && pdata->layer_w != 0 && pdata->layer_h != 0) {
e1837b2c	378	x = pdata->border_l + ((x - pdata->layer_x) * pdata->ts_xmul >> 16);
	379	y = pdata->border_t + ((y - pdata->layer_y) * pdata->ts_ymul >> 16);
	380	clamp(*x, 0, this->screen->w);
	381	clamp(*y, 0, this->screen->h);
5f4b1fd3	382	}
e1837b2c	383	}
17e19802	384
e1837b2c	385	static int ts_event_cb(void *cb_arg, int x, int y, unsigned int pressure)
	386	{
	387	static int was_pressed;
	388	SDL_VideoDevice *this = cb_arg;
	389	struct SDL_PrivateVideoData *pdata = this->hidden;
	390
	391	translate_mouse(this, &x, &y);
17e19802	392
	393	pressure = !!pressure;
	394	if (pressure != was_pressed) {
e1837b2c	395	SDL_PrivateMouseButton(pressure ? SDL_PRESSED : SDL_RELEASED, 1, x, y);
17e19802	396	was_pressed = pressure;
17e19802	397	}
e1837b2c	398	else
	399	SDL_PrivateMouseMotion(0, 0, x, y);
	400	}
	401
090bcb85	402	static int xmouseb_event_cb(void *cb_arg, int x, int y, int button, int is_pressed)
e1837b2c	403	{
	404	SDL_VideoDevice *this = cb_arg;
	405	struct SDL_PrivateVideoData *pdata = this->hidden;
	406
	407	translate_mouse(this, &x, &y);
	408	SDL_PrivateMouseButton(is_pressed ? SDL_PRESSED : SDL_RELEASED, button, x, y);
	409	}
	410
090bcb85	411	static int xmousem_event_cb(void *cb_arg, int x, int y)
e1837b2c	412	{
	413	SDL_VideoDevice *this = cb_arg;
	414	struct SDL_PrivateVideoData *pdata = this->hidden;
	415
	416	translate_mouse(this, &x, &y);
	417	SDL_PrivateMouseMotion(0, 0, x, y);
17e19802	418	}
17e19802	419
090bcb85	420	static int xkey_cb(void *cb_arg, int kc, int is_pressed)
	421	{
	422	SDL_VideoDevice *this = cb_arg;
	423	struct SDL_PrivateVideoData *pdata = this->hidden;
	424	int ret;
	425
	426	if (kc == XF86XK_MenuKB && is_pressed) {
	427	ret = osdl_video_pause(pdata, 1);
	428	if (ret == 0) {
	429	xenv_minimize();
	430	osdl_video_pause(pdata, 0);
	431	omapsdl_input_get_events(0, NULL, NULL, NULL);
	432	}
	433	}
	434	}
	435
9a8e84f8	436	static void omap_PumpEvents(SDL_VideoDevice *this)
9a8e84f8	437	{
f9b3f440	438	struct SDL_PrivateVideoData *pdata = this->hidden;
e1837b2c	439	int read_tslib = 1;
f9b3f440	440
9a8e84f8	441	trace();
9a8e84f8	442
e1837b2c	443	if (pdata->xenv_up) {
e1837b2c	444	if (!pdata->cfg_ts_force_tslib) {
090bcb85	445	xenv_update(xkey_cb, xmouseb_event_cb, xmousem_event_cb, this);
e1837b2c	446	if (pdata->xenv_mouse)
	447	read_tslib = 0;
	448	}
	449	else {
	450	/* just flush X event queue */
	451	xenv_update(NULL, NULL, NULL, NULL);
	452	}
	453	}
f9b3f440	454
e1837b2c	455	omapsdl_input_get_events(0, key_event_cb,
e1837b2c	456	read_tslib ? ts_event_cb : NULL, this);
9a8e84f8	457	}
9a8e84f8	458
ee7e6b2d	459	static void omap_SetCaption(SDL_VideoDevice this, const char title, const char *icon)
	460	{
	461	void display = NULL, window = NULL;
	462	int screen = 0;
	463	int ret;
	464
	465	ret = osdl_video_get_window(&display, &screen, &window);
	466	if (ret == 0) {
	467	x11reuse_SetCaption(this->hidden->x11reuse_context,
	468	display, screen, window, title, icon);
	469	}
	470	}
	471
	472	static void omap_SetIcon(SDL_VideoDevice this, SDL_Surface icon, Uint8 *mask)
	473	{
	474	struct SDL_PrivateVideoData *pdata = this->hidden;
	475	void display = NULL, window = NULL;
	476	int screen = 0;
	477	int ret;
	478
	479	ret = osdl_video_get_window(&display, &screen, &window);
	480	if (ret == 0) {
	481	x11reuse_SetIcon(pdata->x11reuse_context,
	482	display, screen, window, icon, mask);
	483	}
	484	else {
	485	SDL_Surface *old_icon = pdata->delayed_icon;
	486	void *old_icon_mask = pdata->delayed_icon_mask;
	487	int mask_size = ((icon->w + 7) / 8) * icon->h;
	488
	489	pdata->delayed_icon = SDL_ConvertSurface(icon,
	490	icon->format, icon->flags);
	491	if (pdata->delayed_icon != NULL) {
	492	memcpy(pdata->delayed_icon->pixels, icon->pixels,
	493	icon->pitch * icon->h);
	494	}
	495	if (mask != NULL) {
	496	pdata->delayed_icon_mask = malloc(mask_size);
	497	if (pdata->delayed_icon_mask)
	498	memcpy(pdata->delayed_icon_mask, mask, mask_size);
	499	}
	500
	501	if (old_icon != NULL)
	502	SDL_FreeSurface(old_icon);
	503	if (old_icon_mask)
	504	free(old_icon_mask);
	505	}
	506	}
	507
9a8e84f8	508	static SDL_VideoDevice *omap_create(int devindex)
	509	{
	510	SDL_VideoDevice *this;
	511
	512	this = calloc(1, sizeof(this) + sizeof(this->hidden));
	513	if (this == NULL) {
	514	SDL_OutOfMemory();
	515	return 0;
	516	}
	517	this->hidden = (void *)(this + 1);
	518	this->VideoInit = omap_VideoInit;
	519	this->ListModes = omap_ListModes;
	520	this->SetVideoMode = omap_SetVideoMode;
	521	this->LockHWSurface = omap_LockHWSurface;
	522	this->UnlockHWSurface = omap_UnlockHWSurface;
	523	this->FlipHWSurface = omap_FlipHWSurface;
37299201	524	this->AllocHWSurface = omap_AllocHWSurface;
37299201	525	this->FreeHWSurface = omap_FreeHWSurface;
9a8e84f8	526	this->SetColors = omap_SetColors;
	527	this->UpdateRects = omap_UpdateRects;
	528	this->VideoQuit = omap_VideoQuit;
	529	this->InitOSKeymap = omap_InitOSKeymap;
	530	this->PumpEvents = omap_PumpEvents;
ee7e6b2d	531	this->SetCaption = omap_SetCaption;
ee7e6b2d	532	this->SetIcon = omap_SetIcon;
9a8e84f8	533	this->free = omap_free;
	534
	535	return this;
	536	}
	537
	538	VideoBootStrap omapdss_bootstrap = {
	539	"omapdss", "OMAP DSS2 Framebuffer Driver",
	540	omap_available, omap_create
	541	};
	542