use offscreen blitting when SDL_DOUBLEBUF is not set
[sdl_omap.git] / src / video / omapdss / sdlif.c
... / ...
CommitLineData
1/*
2 * (C) GraÅžvydas "notaz" Ignotas, 2010-2012
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
8#include <stdio.h>
9#include <stdlib.h>
10#include <X11/XF86keysym.h>
11
12#include "../SDL_sysvideo.h"
13#include "../SDL_pixels_c.h"
14#include "../../events/SDL_events_c.h"
15
16#include "linux/xenv.h"
17#include "osdl.h"
18
19
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{
34 const char *tmp;
35 int w, h, ret;
36
37 trace();
38
39 // default to 16bpp
40 vformat->BitsPerPixel = 16;
41
42 omapsdl_input_init();
43 omapsdl_config(this->hidden);
44
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) {
51 this->info.current_w = this->hidden->phys_w;
52 this->info.current_h = this->hidden->phys_h;
53 }
54
55 this->handles_any_size = 1;
56 this->info.hw_available = 1;
57
58 return 0;
59}
60
61static void omap_VideoQuit(SDL_VideoDevice *this)
62{
63 trace();
64
65 osdl_video_finish(this->hidden);
66 this->screen->pixels = NULL;
67 omapsdl_input_finish();
68}
69
70static SDL_Rect **omap_ListModes(SDL_VideoDevice *this, SDL_PixelFormat *format, Uint32 flags)
71{
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
76 };
77 /* broken API needs this stupidity */
78 static SDL_Rect *omap_modes[] = {
79 &omap_mode_max,
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{
95 struct SDL_PrivateVideoData *pdata = this->hidden;
96 SDL_PixelFormat *format;
97 Uint32 unhandled_flags;
98 int doublebuf;
99 void *fbmem;
100
101 trace("%d, %d, %d, %08x", width, height, bpp, flags);
102
103 omapsdl_config_from_env(pdata);
104
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:
113 format = SDL_ReallocFormat(current, 32, 0xff0000, 0xff00, 0xff, 0);
114 break;
115 default:
116 err("SetVideoMode: bpp %d not supported", bpp);
117 return NULL;
118 }
119 if (format == NULL)
120 return NULL;
121
122 if (!(flags & SDL_DOUBLEBUF) && pdata->cfg_force_doublebuf) {
123 log("forcing SDL_DOUBLEBUF");
124 flags |= SDL_DOUBLEBUF;
125 }
126
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
136 /* always use doublebuf, when SDL_DOUBLEBUF is not set,
137 * we'll have to blit manually on UpdateRects() */
138 doublebuf = 1;
139
140 fbmem = osdl_video_set_mode(pdata,
141 pdata->border_l, pdata->border_r, pdata->border_t, pdata->border_b,
142 width, height, bpp, &doublebuf, this->wm_title);
143 if (fbmem == NULL) {
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);
147 return NULL;
148 }
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;
162 }
163
164 if (!(flags & SDL_DOUBLEBUF) && pdata->cfg_force_directbuf)
165 fbmem = pdata->front_buffer;
166
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;
175 current->w = width;
176 current->h = height;
177 current->pitch = SDL_CalculatePitch(current);
178 current->pixels = fbmem;
179 pdata->app_uses_flip = 0;
180
181 if (pdata->layer_w != 0 && pdata->layer_h != 0) {
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;
186 }
187
188 return current;
189}
190
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{
205 struct SDL_PrivateVideoData *pdata = this->hidden;
206 static int warned;
207
208 trace("%p", surface);
209
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
227 pdata->app_uses_flip = 1;
228
229 return 0;
230}
231
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
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{
252 struct SDL_PrivateVideoData *pdata = this->hidden;
253 SDL_Surface *screen = this->screen;
254 Uint16 *src, *dst;
255 int i, x, y, w, h;
256
257 trace("%d, %p", nrects, rects);
258
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);
294 }
295}
296
297static void omap_InitOSKeymap(SDL_VideoDevice *this)
298{
299 trace();
300}
301
302static int key_event_cb(void *cb_arg, int sdl_kc, int sdl_sc, int is_pressed)
303{
304 SDL_keysym keysym = { 0, };
305 int shift = 0;
306 SDLMod mod;
307 int ret;
308
309 keysym.sym = sdl_kc;
310 keysym.scancode = sdl_sc;
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
344 SDL_PrivateKeyboard(is_pressed, &keysym);
345}
346
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
352static void translate_mouse(SDL_VideoDevice *this, int *x, int *y)
353{
354 struct SDL_PrivateVideoData *pdata = this->hidden;
355
356 if (!pdata->cfg_no_ts_translate && pdata->layer_w != 0 && pdata->layer_h != 0) {
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);
361 }
362}
363
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);
371
372 pressure = !!pressure;
373 if (pressure != was_pressed) {
374 SDL_PrivateMouseButton(pressure ? SDL_PRESSED : SDL_RELEASED, 1, x, y);
375 was_pressed = pressure;
376 }
377 else
378 SDL_PrivateMouseMotion(0, 0, x, y);
379}
380
381static int xmouseb_event_cb(void *cb_arg, int x, int y, int button, int is_pressed)
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
390static int xmousem_event_cb(void *cb_arg, int x, int y)
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);
397}
398
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
415static void omap_PumpEvents(SDL_VideoDevice *this)
416{
417 struct SDL_PrivateVideoData *pdata = this->hidden;
418 int read_tslib = 1;
419
420 trace();
421
422 if (pdata->xenv_up) {
423 if (!pdata->cfg_ts_force_tslib) {
424 xenv_update(xkey_cb, xmouseb_event_cb, xmousem_event_cb, this);
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 }
433
434 omapsdl_input_get_events(0, key_event_cb,
435 read_tslib ? ts_event_cb : NULL, this);
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;
454 this->AllocHWSurface = omap_AllocHWSurface;
455 this->FreeHWSurface = omap_FreeHWSurface;
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