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