use offscreen blitting when SDL_DOUBLEBUF is not set
[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;
254 Uint16 *src, *dst;
255 int i, x, y, w, h;
9225e894 256
9a8e84f8 257 trace("%d, %p", nrects, rects);
258
5cc6dcb7 259 if (screen->flags & SDL_DOUBLEBUF) {
260 if (nrects == 1 && rects->x == 0 && rects->y == 0
261 && (rects->w == screen->w || rects->w == 0)
262 && (rects->h == screen->h || rects->h == 0)
263 && !pdata->app_uses_flip)
264 {
265 screen->pixels = osdl_video_flip(pdata);
266 }
267 return;
268 }
269
270 src = screen->pixels;
271 dst = pdata->front_buffer;
272 if (src == dst)
273 return;
274
275 for (i = 0; i < nrects; i++) {
276 /* this supposedly has no clipping, but we'll do it anyway */
277 x = rects[i].x, y = rects[i].y, w = rects[i].w, h = rects[i].h;
278 if (x < 0)
279 w += x, x = 0;
280 else if (x + w > screen->w)
281 w = screen->w - x;
282 if (w <= 0)
283 continue;
284
285 if (y < 0)
286 h += y, y = 0;
287 else if (y + h > screen->h)
288 h = screen->h - y;
289
290 for (; h > 0; y++, h--)
291 memcpy(dst + y * screen->pitch / 2 + x,
292 src + y * screen->pitch / 2 + x,
293 w * 2);
9a8e84f8 294 }
9a8e84f8 295}
296
297static void omap_InitOSKeymap(SDL_VideoDevice *this)
298{
299 trace();
300}
301
b260fb56 302static int key_event_cb(void *cb_arg, int sdl_kc, int sdl_sc, int is_pressed)
9a8e84f8 303{
304 SDL_keysym keysym = { 0, };
89df2746 305 int shift = 0;
306 SDLMod mod;
307 int ret;
9a8e84f8 308
309 keysym.sym = sdl_kc;
b260fb56 310 keysym.scancode = sdl_sc;
89df2746 311
312 /* 0xff if pandora's Fn, so we exclude it too.. */
313 if (is_pressed && sdl_kc < 0xff && SDL_TranslateUNICODE) {
314 mod = SDL_GetModState();
315 if (!(mod & KMOD_CTRL) && (!!(mod & KMOD_SHIFT) ^ !!(mod & KMOD_CAPS)))
316 shift = 1;
317
318 /* prefer X mapping, if that doesn't work use hardcoded one */
319 ret = xenv_keycode_to_keysym(sdl_sc, shift);
320 if (ret >= 0) {
321 keysym.unicode = ret;
322 if ((mod & KMOD_CTRL)
323 && 0x60 <= keysym.unicode && keysym.unicode <= 0x7f)
324 {
325 keysym.unicode -= 0x60;
326 }
327 /* hmh.. */
328 if ((keysym.unicode & 0xff00) == 0xff00)
329 keysym.unicode &= ~0xff00;
330 }
331 else {
332 keysym.unicode = sdl_kc;
333 if ((mod & KMOD_CTRL) && 0x60 <= sdl_kc && sdl_kc <= 0x7f)
334 {
335 keysym.unicode = sdl_kc - 0x60;
336 }
337 else if (shift && 'a' <= sdl_kc && sdl_kc <= 'z')
338 {
339 keysym.unicode = sdl_kc - 'a' + 'A';
340 }
341 }
342 }
343
9a8e84f8 344 SDL_PrivateKeyboard(is_pressed, &keysym);
345}
346
5f4b1fd3 347/* clamp x to min..max-1 */
348#define clamp(x, min, max) \
349 if (x < (min)) x = min; \
350 if (x >= (max)) x = max
351
e1837b2c 352static void translate_mouse(SDL_VideoDevice *this, int *x, int *y)
17e19802 353{
5f4b1fd3 354 struct SDL_PrivateVideoData *pdata = this->hidden;
5f4b1fd3 355
356 if (!pdata->cfg_no_ts_translate && pdata->layer_w != 0 && pdata->layer_h != 0) {
e1837b2c 357 *x = pdata->border_l + ((*x - pdata->layer_x) * pdata->ts_xmul >> 16);
358 *y = pdata->border_t + ((*y - pdata->layer_y) * pdata->ts_ymul >> 16);
359 clamp(*x, 0, this->screen->w);
360 clamp(*y, 0, this->screen->h);
5f4b1fd3 361 }
e1837b2c 362}
17e19802 363
e1837b2c 364static int ts_event_cb(void *cb_arg, int x, int y, unsigned int pressure)
365{
366 static int was_pressed;
367 SDL_VideoDevice *this = cb_arg;
368 struct SDL_PrivateVideoData *pdata = this->hidden;
369
370 translate_mouse(this, &x, &y);
17e19802 371
372 pressure = !!pressure;
373 if (pressure != was_pressed) {
e1837b2c 374 SDL_PrivateMouseButton(pressure ? SDL_PRESSED : SDL_RELEASED, 1, x, y);
17e19802 375 was_pressed = pressure;
376 }
e1837b2c 377 else
378 SDL_PrivateMouseMotion(0, 0, x, y);
379}
380
090bcb85 381static int xmouseb_event_cb(void *cb_arg, int x, int y, int button, int is_pressed)
e1837b2c 382{
383 SDL_VideoDevice *this = cb_arg;
384 struct SDL_PrivateVideoData *pdata = this->hidden;
385
386 translate_mouse(this, &x, &y);
387 SDL_PrivateMouseButton(is_pressed ? SDL_PRESSED : SDL_RELEASED, button, x, y);
388}
389
090bcb85 390static int xmousem_event_cb(void *cb_arg, int x, int y)
e1837b2c 391{
392 SDL_VideoDevice *this = cb_arg;
393 struct SDL_PrivateVideoData *pdata = this->hidden;
394
395 translate_mouse(this, &x, &y);
396 SDL_PrivateMouseMotion(0, 0, x, y);
17e19802 397}
398
090bcb85 399static int xkey_cb(void *cb_arg, int kc, int is_pressed)
400{
401 SDL_VideoDevice *this = cb_arg;
402 struct SDL_PrivateVideoData *pdata = this->hidden;
403 int ret;
404
405 if (kc == XF86XK_MenuKB && is_pressed) {
406 ret = osdl_video_pause(pdata, 1);
407 if (ret == 0) {
408 xenv_minimize();
409 osdl_video_pause(pdata, 0);
410 omapsdl_input_get_events(0, NULL, NULL, NULL);
411 }
412 }
413}
414
9a8e84f8 415static void omap_PumpEvents(SDL_VideoDevice *this)
416{
f9b3f440 417 struct SDL_PrivateVideoData *pdata = this->hidden;
e1837b2c 418 int read_tslib = 1;
f9b3f440 419
9a8e84f8 420 trace();
421
e1837b2c 422 if (pdata->xenv_up) {
423 if (!pdata->cfg_ts_force_tslib) {
090bcb85 424 xenv_update(xkey_cb, xmouseb_event_cb, xmousem_event_cb, this);
e1837b2c 425 if (pdata->xenv_mouse)
426 read_tslib = 0;
427 }
428 else {
429 /* just flush X event queue */
430 xenv_update(NULL, NULL, NULL, NULL);
431 }
432 }
f9b3f440 433
e1837b2c 434 omapsdl_input_get_events(0, key_event_cb,
435 read_tslib ? ts_event_cb : NULL, this);
9a8e84f8 436}
437
438static SDL_VideoDevice *omap_create(int devindex)
439{
440 SDL_VideoDevice *this;
441
442 this = calloc(1, sizeof(*this) + sizeof(*this->hidden));
443 if (this == NULL) {
444 SDL_OutOfMemory();
445 return 0;
446 }
447 this->hidden = (void *)(this + 1);
448 this->VideoInit = omap_VideoInit;
449 this->ListModes = omap_ListModes;
450 this->SetVideoMode = omap_SetVideoMode;
451 this->LockHWSurface = omap_LockHWSurface;
452 this->UnlockHWSurface = omap_UnlockHWSurface;
453 this->FlipHWSurface = omap_FlipHWSurface;
37299201 454 this->AllocHWSurface = omap_AllocHWSurface;
455 this->FreeHWSurface = omap_FreeHWSurface;
9a8e84f8 456 this->SetColors = omap_SetColors;
457 this->UpdateRects = omap_UpdateRects;
458 this->VideoQuit = omap_VideoQuit;
459 this->InitOSKeymap = omap_InitOSKeymap;
460 this->PumpEvents = omap_PumpEvents;
461 this->free = omap_free;
462
463 return this;
464}
465
466VideoBootStrap omapdss_bootstrap = {
467 "omapdss", "OMAP DSS2 Framebuffer Driver",
468 omap_available, omap_create
469};
470