[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 "../SDL_sysvideo.h"
#include "../SDL_pixels_c.h"
#include "../../events/SDL_events_c.h"

#include "linux/xenv.h"
#include "omapsdl.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)
{
	const char *tmp;
	int w, h, ret;

	trace();

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

	omapsdl_input_init();
	omapsdl_config(this->hidden);

	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(this->hidden) == 0) {
		this->info.current_w = this->hidden->phys_w;
		this->info.current_h = this->hidden->phys_h;
	}

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

	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;
		}
	}

	doublebuf = (flags & SDL_DOUBLEBUF) ? 1 : 0;
	fbmem = osdl_video_set_mode(pdata,
		pdata->border_l, pdata->border_r, pdata->border_t, pdata->border_b,
		width, height, bpp, &doublebuf);
	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;
	}
	if ((flags & SDL_DOUBLEBUF) && !doublebuf) {
		log("doublebuffering could not be set\n");
		flags &= ~SDL_DOUBLEBUF;
	}

	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;
	}

	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;

	trace("%p", surface);

	surface->pixels = osdl_video_flip(pdata);
	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;

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

	/* for doublebuf forcing on apps */
	if (nrects == 1 && rects->x == 0 && rects->y == 0
	    && !pdata->app_uses_flip && (this->screen->flags & SDL_DOUBLEBUF)
	    && rects->w == this->screen->w && rects->h == this->screen->h)
	{
		this->screen->pixels = osdl_video_flip(pdata);
	}
}

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

static int key_event_cb(void *cb_arg, int sdl_kc, int is_pressed)
{
	SDL_keysym keysym = { 0, };

	keysym.sym = sdl_kc;
	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 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;
	int xoffs;

	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);
	}

	SDL_PrivateMouseMotion(0, 0, x, y);

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

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

	trace();

	omapsdl_input_get_events(0, key_event_cb, ts_event_cb, this);

	// XXX: we might want to process some X events too
	if (pdata->xenv_up)
		xenv_update(&dummy);
}

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->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>
	10
	11	#include "../SDL_sysvideo.h"
	12	#include "../SDL_pixels_c.h"
	13	#include "../../events/SDL_events_c.h"
f9b3f440	14
f9b3f440	15	#include "linux/xenv.h"
9a8e84f8	16	#include "omapsdl.h"
	17
	18
9a8e84f8	19	static int omap_available(void)
	20	{
	21	trace();
	22	return 1;
	23	}
	24
	25	static void omap_free(SDL_VideoDevice *device)
	26	{
	27	trace();
	28	free(device);
	29	}
	30
	31	static int omap_VideoInit(SDL_VideoDevice this, SDL_PixelFormat vformat)
	32	{
b9a19b44	33	const char *tmp;
	34	int w, h, ret;
	35
9a8e84f8	36	trace();
	37
	38	// default to 16bpp
	39	vformat->BitsPerPixel = 16;
	40
	41	omapsdl_input_init();
5f4b1fd3	42	omapsdl_config(this->hidden);
9a8e84f8	43
b9a19b44	44	tmp = getenv("SDL_OMAP_DEFAULT_MODE");
	45	if (tmp != NULL && sscanf(tmp, "%dx%d", &w, &h) == 2) {
	46	this->info.current_w = w;
	47	this->info.current_h = h;
	48	}
	49	else if (osdl_video_detect_screen(this->hidden) == 0) {
5f4b1fd3	50	this->info.current_w = this->hidden->phys_w;
5f4b1fd3	51	this->info.current_h = this->hidden->phys_h;
b9a19b44	52	}
b9a19b44	53
5d957fa5	54	this->handles_any_size = 1;
b9a19b44	55	this->info.hw_available = 1;
b9a19b44	56
9a8e84f8	57	return 0;
	58	}
	59
	60	static void omap_VideoQuit(SDL_VideoDevice *this)
	61	{
	62	trace();
	63
f641fccb	64	osdl_video_finish(this->hidden);
9a8e84f8	65	this->screen->pixels = NULL;
17e19802	66	omapsdl_input_finish();
9a8e84f8	67	}
	68
	69	static SDL_Rect *omap_ListModes(SDL_VideoDevice this, SDL_PixelFormat *format, Uint32 flags)
	70	{
5d957fa5	71	static SDL_Rect omap_mode_max = {
	72	/* with handles_any_size, should accept anything up to this
	73	* XXX: possibly set this dynamically based on free vram? */
	74	0, 0, 1600, 1200
9a8e84f8	75	};
b9a19b44	76	/* broken API needs this stupidity */
9a8e84f8	77	static SDL_Rect *omap_modes[] = {
5d957fa5	78	&omap_mode_max,
9a8e84f8	79	NULL
	80	};
	81
	82	trace();
	83
	84	if (format->BitsPerPixel <= 8)
	85	// not (yet?) supported
	86	return NULL;
	87
	88	return omap_modes;
	89	}
	90
	91	static SDL_Surface omap_SetVideoMode(SDL_VideoDevice this, SDL_Surface *current, int width,
	92	int height, int bpp, Uint32 flags)
	93	{
5f4b1fd3	94	struct SDL_PrivateVideoData *pdata = this->hidden;
3576a5ac	95	SDL_PixelFormat *format;
0bb19c41	96	Uint32 unhandled_flags;
0c7caf2b	97	int doublebuf;
455c8c43	98	void *fbmem;
3576a5ac	99
9a8e84f8	100	trace("%d, %d, %d, %08x", width, height, bpp, flags);
9a8e84f8	101
5f4b1fd3	102	omapsdl_config_from_env(pdata);
0bb19c41	103
3576a5ac	104	switch (bpp) {
	105	case 16:
	106	format = SDL_ReallocFormat(current, 16, 0xf800, 0x07e0, 0x001f, 0);
	107	break;
	108	case 24:
	109	format = SDL_ReallocFormat(current, 24, 0xff0000, 0xff00, 0xff, 0);
	110	break;
	111	case 32:
5848b0cd	112	format = SDL_ReallocFormat(current, 32, 0xff0000, 0xff00, 0xff, 0);
3576a5ac	113	break;
3576a5ac	114	default:
0bb19c41	115	err("SetVideoMode: bpp %d not supported", bpp);
3576a5ac	116	return NULL;
	117	}
	118	if (format == NULL)
f641fccb	119	return NULL;
9a8e84f8	120
5f4b1fd3	121	if (!(flags & SDL_DOUBLEBUF) && pdata->cfg_force_doublebuf) {
0bb19c41	122	log("forcing SDL_DOUBLEBUF");
	123	flags \|= SDL_DOUBLEBUF;
	124	}
	125
455c8c43	126	if (pdata->border_l \| pdata->border_r \| pdata->border_t \| pdata->border_b) {
	127	if (pdata->border_l + pdata->border_r >= width
	128	\|\| pdata->border_t + pdata->border_b >= height)
	129	{
	130	err("specified border too large, ignoring");
	131	pdata->border_l = pdata->border_r = pdata->border_t = pdata->border_b = 0;
	132	}
	133	}
	134
0c7caf2b	135	doublebuf = (flags & SDL_DOUBLEBUF) ? 1 : 0;
455c8c43	136	fbmem = osdl_video_set_mode(pdata,
455c8c43	137	pdata->border_l, pdata->border_r, pdata->border_t, pdata->border_b,
0c7caf2b	138	width, height, bpp, &doublebuf);
455c8c43	139	if (fbmem == NULL) {
0c7caf2b	140	err("failing on mode %dx%d@%d, doublebuf %s, border %d,%d,%d,%d",
	141	width, height, bpp, (flags & SDL_DOUBLEBUF) ? "on" : "off",
	142	pdata->border_l, pdata->border_r, pdata->border_t, pdata->border_b);
9a8e84f8	143	return NULL;
455c8c43	144	}
0c7caf2b	145	if ((flags & SDL_DOUBLEBUF) && !doublebuf) {
	146	log("doublebuffering could not be set\n");
	147	flags &= ~SDL_DOUBLEBUF;
	148	}
9a8e84f8	149
0bb19c41	150	flags \|= SDL_FULLSCREEN \| SDL_HWSURFACE;
	151	unhandled_flags = flags & ~(SDL_FULLSCREEN \| SDL_HWSURFACE \| SDL_DOUBLEBUF);
	152	if (unhandled_flags != 0) {
	153	log("dropping unhandled flags: %08x", unhandled_flags);
	154	flags &= ~unhandled_flags;
	155	}
	156
	157	current->flags = flags;
9a8e84f8	158	current->w = width;
	159	current->h = height;
	160	current->pitch = SDL_CalculatePitch(current);
455c8c43	161	current->pixels = fbmem;
9225e894	162	pdata->app_uses_flip = 0;
9a8e84f8	163
5f4b1fd3	164	if (pdata->layer_w != 0 && pdata->layer_h != 0) {
455c8c43	165	int v_width = width - (pdata->border_l + pdata->border_r);
	166	int v_height = height - (pdata->border_t + pdata->border_b);
	167	pdata->ts_xmul = (v_width << 16) / pdata->layer_w;
	168	pdata->ts_ymul = (v_height << 16) / pdata->layer_h;
5f4b1fd3	169	}
5f4b1fd3	170
9a8e84f8	171	return current;
	172	}
	173
9a8e84f8	174	static int omap_LockHWSurface(SDL_VideoDevice this, SDL_Surface surface)
	175	{
	176	trace("%p", surface);
	177
	178	return 0;
	179	}
	180
	181	static void omap_UnlockHWSurface(SDL_VideoDevice this, SDL_Surface surface)
	182	{
	183	trace("%p", surface);
	184	}
	185
	186	static int omap_FlipHWSurface(SDL_VideoDevice this, SDL_Surface surface)
	187	{
9225e894	188	struct SDL_PrivateVideoData *pdata = this->hidden;
9225e894	189
9a8e84f8	190	trace("%p", surface);
9a8e84f8	191
9225e894	192	surface->pixels = osdl_video_flip(pdata);
9225e894	193	pdata->app_uses_flip = 1;
9a8e84f8	194
	195	return 0;
	196	}
	197
37299201	198	/* we can't do hw surfaces (besides screen one) yet */
	199	static int omap_AllocHWSurface(SDL_VideoDevice this, SDL_Surface surface)
	200	{
	201	trace("%p", surface);
	202	return -1;
	203	}
	204
	205	static void omap_FreeHWSurface(SDL_VideoDevice this, SDL_Surface surface)
	206	{
	207	trace("%p", surface);
	208	}
	209
9a8e84f8	210	static int omap_SetColors(SDL_VideoDevice this, int firstcolor, int ncolors, SDL_Color colors)
	211	{
	212	trace("%d, %d, %p", firstcolor, ncolors, colors);
	213	return 0;
	214	}
	215
	216	static void omap_UpdateRects(SDL_VideoDevice this, int nrects, SDL_Rect rects)
	217	{
9225e894	218	struct SDL_PrivateVideoData *pdata = this->hidden;
9225e894	219
9a8e84f8	220	trace("%d, %p", nrects, rects);
9a8e84f8	221
9225e894	222	/* for doublebuf forcing on apps */
	223	if (nrects == 1 && rects->x == 0 && rects->y == 0
	224	&& !pdata->app_uses_flip && (this->screen->flags & SDL_DOUBLEBUF)
	225	&& rects->w == this->screen->w && rects->h == this->screen->h)
0bb19c41	226	{
9225e894	227	this->screen->pixels = osdl_video_flip(pdata);
9a8e84f8	228	}
9a8e84f8	229	}
	230
	231	static void omap_InitOSKeymap(SDL_VideoDevice *this)
	232	{
	233	trace();
	234	}
	235
17e19802	236	static int key_event_cb(void *cb_arg, int sdl_kc, int is_pressed)
9a8e84f8	237	{
	238	SDL_keysym keysym = { 0, };
	239
	240	keysym.sym = sdl_kc;
	241	SDL_PrivateKeyboard(is_pressed, &keysym);
	242	}
	243
5f4b1fd3	244	/* clamp x to min..max-1 */
	245	#define clamp(x, min, max) \
	246	if (x < (min)) x = min; \
	247	if (x >= (max)) x = max
	248
17e19802	249	static int ts_event_cb(void *cb_arg, int x, int y, unsigned int pressure)
	250	{
	251	static int was_pressed;
5f4b1fd3	252	SDL_VideoDevice *this = cb_arg;
	253	struct SDL_PrivateVideoData *pdata = this->hidden;
	254	int xoffs;
	255
	256	if (!pdata->cfg_no_ts_translate && pdata->layer_w != 0 && pdata->layer_h != 0) {
455c8c43	257	x = pdata->border_l + ((x - pdata->layer_x) * pdata->ts_xmul >> 16);
455c8c43	258	y = pdata->border_t + ((y - pdata->layer_y) * pdata->ts_ymul >> 16);
5f4b1fd3	259	clamp(x, 0, this->screen->w);
	260	clamp(y, 0, this->screen->h);
	261	}
17e19802	262
	263	SDL_PrivateMouseMotion(0, 0, x, y);
	264
	265	pressure = !!pressure;
	266	if (pressure != was_pressed) {
	267	SDL_PrivateMouseButton(pressure ? SDL_PRESSED : SDL_RELEASED, 1, 0, 0);
	268	was_pressed = pressure;
	269	}
	270	}
	271
9a8e84f8	272	static void omap_PumpEvents(SDL_VideoDevice *this)
9a8e84f8	273	{
f9b3f440	274	struct SDL_PrivateVideoData *pdata = this->hidden;
	275	int dummy;
	276
9a8e84f8	277	trace();
9a8e84f8	278
5f4b1fd3	279	omapsdl_input_get_events(0, key_event_cb, ts_event_cb, this);
f9b3f440	280
	281	// XXX: we might want to process some X events too
	282	if (pdata->xenv_up)
	283	xenv_update(&dummy);
9a8e84f8	284	}
	285
	286	static SDL_VideoDevice *omap_create(int devindex)
	287	{
	288	SDL_VideoDevice *this;
	289
	290	this = calloc(1, sizeof(this) + sizeof(this->hidden));
	291	if (this == NULL) {
	292	SDL_OutOfMemory();
	293	return 0;
	294	}
	295	this->hidden = (void *)(this + 1);
	296	this->VideoInit = omap_VideoInit;
	297	this->ListModes = omap_ListModes;
	298	this->SetVideoMode = omap_SetVideoMode;
	299	this->LockHWSurface = omap_LockHWSurface;
	300	this->UnlockHWSurface = omap_UnlockHWSurface;
	301	this->FlipHWSurface = omap_FlipHWSurface;
37299201	302	this->AllocHWSurface = omap_AllocHWSurface;
37299201	303	this->FreeHWSurface = omap_FreeHWSurface;
9a8e84f8	304	this->SetColors = omap_SetColors;
	305	this->UpdateRects = omap_UpdateRects;
	306	this->VideoQuit = omap_VideoQuit;
	307	this->InitOSKeymap = omap_InitOSKeymap;
	308	this->PumpEvents = omap_PumpEvents;
	309	this->free = omap_free;
	310
	311	return this;
	312	}
	313
	314	VideoBootStrap omapdss_bootstrap = {
	315	"omapdss", "OMAP DSS2 Framebuffer Driver",
	316	omap_available, omap_create
	317	};
	318