support .unicode of returned events
[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
0c7caf2b 136 doublebuf = (flags & SDL_DOUBLEBUF) ? 1 : 0;
455c8c43 137 fbmem = osdl_video_set_mode(pdata,
138 pdata->border_l, pdata->border_r, pdata->border_t, pdata->border_b,
090bcb85 139 width, height, bpp, &doublebuf, this->wm_title);
455c8c43 140 if (fbmem == NULL) {
0c7caf2b 141 err("failing on mode %dx%d@%d, doublebuf %s, border %d,%d,%d,%d",
142 width, height, bpp, (flags & SDL_DOUBLEBUF) ? "on" : "off",
143 pdata->border_l, pdata->border_r, pdata->border_t, pdata->border_b);
9a8e84f8 144 return NULL;
455c8c43 145 }
0c7caf2b 146 if ((flags & SDL_DOUBLEBUF) && !doublebuf) {
147 log("doublebuffering could not be set\n");
148 flags &= ~SDL_DOUBLEBUF;
149 }
9a8e84f8 150
0bb19c41 151 flags |= SDL_FULLSCREEN | SDL_HWSURFACE;
152 unhandled_flags = flags & ~(SDL_FULLSCREEN | SDL_HWSURFACE | SDL_DOUBLEBUF);
153 if (unhandled_flags != 0) {
154 log("dropping unhandled flags: %08x", unhandled_flags);
155 flags &= ~unhandled_flags;
156 }
157
158 current->flags = flags;
9a8e84f8 159 current->w = width;
160 current->h = height;
161 current->pitch = SDL_CalculatePitch(current);
455c8c43 162 current->pixels = fbmem;
9225e894 163 pdata->app_uses_flip = 0;
9a8e84f8 164
5f4b1fd3 165 if (pdata->layer_w != 0 && pdata->layer_h != 0) {
455c8c43 166 int v_width = width - (pdata->border_l + pdata->border_r);
167 int v_height = height - (pdata->border_t + pdata->border_b);
168 pdata->ts_xmul = (v_width << 16) / pdata->layer_w;
169 pdata->ts_ymul = (v_height << 16) / pdata->layer_h;
5f4b1fd3 170 }
171
9a8e84f8 172 return current;
173}
174
9a8e84f8 175static int omap_LockHWSurface(SDL_VideoDevice *this, SDL_Surface *surface)
176{
177 trace("%p", surface);
178
179 return 0;
180}
181
182static void omap_UnlockHWSurface(SDL_VideoDevice *this, SDL_Surface *surface)
183{
184 trace("%p", surface);
185}
186
187static int omap_FlipHWSurface(SDL_VideoDevice *this, SDL_Surface *surface)
188{
9225e894 189 struct SDL_PrivateVideoData *pdata = this->hidden;
190
9a8e84f8 191 trace("%p", surface);
192
9225e894 193 surface->pixels = osdl_video_flip(pdata);
194 pdata->app_uses_flip = 1;
9a8e84f8 195
196 return 0;
197}
198
37299201 199/* we can't do hw surfaces (besides screen one) yet */
200static int omap_AllocHWSurface(SDL_VideoDevice *this, SDL_Surface *surface)
201{
202 trace("%p", surface);
203 return -1;
204}
205
206static void omap_FreeHWSurface(SDL_VideoDevice *this, SDL_Surface *surface)
207{
208 trace("%p", surface);
209}
210
9a8e84f8 211static int omap_SetColors(SDL_VideoDevice *this, int firstcolor, int ncolors, SDL_Color *colors)
212{
213 trace("%d, %d, %p", firstcolor, ncolors, colors);
214 return 0;
215}
216
217static void omap_UpdateRects(SDL_VideoDevice *this, int nrects, SDL_Rect *rects)
218{
9225e894 219 struct SDL_PrivateVideoData *pdata = this->hidden;
220
9a8e84f8 221 trace("%d, %p", nrects, rects);
222
9225e894 223 /* for doublebuf forcing on apps */
224 if (nrects == 1 && rects->x == 0 && rects->y == 0
225 && !pdata->app_uses_flip && (this->screen->flags & SDL_DOUBLEBUF)
226 && rects->w == this->screen->w && rects->h == this->screen->h)
0bb19c41 227 {
9225e894 228 this->screen->pixels = osdl_video_flip(pdata);
9a8e84f8 229 }
9a8e84f8 230}
231
232static void omap_InitOSKeymap(SDL_VideoDevice *this)
233{
234 trace();
235}
236
b260fb56 237static int key_event_cb(void *cb_arg, int sdl_kc, int sdl_sc, int is_pressed)
9a8e84f8 238{
239 SDL_keysym keysym = { 0, };
89df2746 240 int shift = 0;
241 SDLMod mod;
242 int ret;
9a8e84f8 243
244 keysym.sym = sdl_kc;
b260fb56 245 keysym.scancode = sdl_sc;
89df2746 246
247 /* 0xff if pandora's Fn, so we exclude it too.. */
248 if (is_pressed && sdl_kc < 0xff && SDL_TranslateUNICODE) {
249 mod = SDL_GetModState();
250 if (!(mod & KMOD_CTRL) && (!!(mod & KMOD_SHIFT) ^ !!(mod & KMOD_CAPS)))
251 shift = 1;
252
253 /* prefer X mapping, if that doesn't work use hardcoded one */
254 ret = xenv_keycode_to_keysym(sdl_sc, shift);
255 if (ret >= 0) {
256 keysym.unicode = ret;
257 if ((mod & KMOD_CTRL)
258 && 0x60 <= keysym.unicode && keysym.unicode <= 0x7f)
259 {
260 keysym.unicode -= 0x60;
261 }
262 /* hmh.. */
263 if ((keysym.unicode & 0xff00) == 0xff00)
264 keysym.unicode &= ~0xff00;
265 }
266 else {
267 keysym.unicode = sdl_kc;
268 if ((mod & KMOD_CTRL) && 0x60 <= sdl_kc && sdl_kc <= 0x7f)
269 {
270 keysym.unicode = sdl_kc - 0x60;
271 }
272 else if (shift && 'a' <= sdl_kc && sdl_kc <= 'z')
273 {
274 keysym.unicode = sdl_kc - 'a' + 'A';
275 }
276 }
277 }
278
9a8e84f8 279 SDL_PrivateKeyboard(is_pressed, &keysym);
280}
281
5f4b1fd3 282/* clamp x to min..max-1 */
283#define clamp(x, min, max) \
284 if (x < (min)) x = min; \
285 if (x >= (max)) x = max
286
e1837b2c 287static void translate_mouse(SDL_VideoDevice *this, int *x, int *y)
17e19802 288{
5f4b1fd3 289 struct SDL_PrivateVideoData *pdata = this->hidden;
5f4b1fd3 290
291 if (!pdata->cfg_no_ts_translate && pdata->layer_w != 0 && pdata->layer_h != 0) {
e1837b2c 292 *x = pdata->border_l + ((*x - pdata->layer_x) * pdata->ts_xmul >> 16);
293 *y = pdata->border_t + ((*y - pdata->layer_y) * pdata->ts_ymul >> 16);
294 clamp(*x, 0, this->screen->w);
295 clamp(*y, 0, this->screen->h);
5f4b1fd3 296 }
e1837b2c 297}
17e19802 298
e1837b2c 299static int ts_event_cb(void *cb_arg, int x, int y, unsigned int pressure)
300{
301 static int was_pressed;
302 SDL_VideoDevice *this = cb_arg;
303 struct SDL_PrivateVideoData *pdata = this->hidden;
304
305 translate_mouse(this, &x, &y);
17e19802 306
307 pressure = !!pressure;
308 if (pressure != was_pressed) {
e1837b2c 309 SDL_PrivateMouseButton(pressure ? SDL_PRESSED : SDL_RELEASED, 1, x, y);
17e19802 310 was_pressed = pressure;
311 }
e1837b2c 312 else
313 SDL_PrivateMouseMotion(0, 0, x, y);
314}
315
090bcb85 316static int xmouseb_event_cb(void *cb_arg, int x, int y, int button, int is_pressed)
e1837b2c 317{
318 SDL_VideoDevice *this = cb_arg;
319 struct SDL_PrivateVideoData *pdata = this->hidden;
320
321 translate_mouse(this, &x, &y);
322 SDL_PrivateMouseButton(is_pressed ? SDL_PRESSED : SDL_RELEASED, button, x, y);
323}
324
090bcb85 325static int xmousem_event_cb(void *cb_arg, int x, int y)
e1837b2c 326{
327 SDL_VideoDevice *this = cb_arg;
328 struct SDL_PrivateVideoData *pdata = this->hidden;
329
330 translate_mouse(this, &x, &y);
331 SDL_PrivateMouseMotion(0, 0, x, y);
17e19802 332}
333
090bcb85 334static int xkey_cb(void *cb_arg, int kc, int is_pressed)
335{
336 SDL_VideoDevice *this = cb_arg;
337 struct SDL_PrivateVideoData *pdata = this->hidden;
338 int ret;
339
340 if (kc == XF86XK_MenuKB && is_pressed) {
341 ret = osdl_video_pause(pdata, 1);
342 if (ret == 0) {
343 xenv_minimize();
344 osdl_video_pause(pdata, 0);
345 omapsdl_input_get_events(0, NULL, NULL, NULL);
346 }
347 }
348}
349
9a8e84f8 350static void omap_PumpEvents(SDL_VideoDevice *this)
351{
f9b3f440 352 struct SDL_PrivateVideoData *pdata = this->hidden;
e1837b2c 353 int read_tslib = 1;
f9b3f440 354
9a8e84f8 355 trace();
356
e1837b2c 357 if (pdata->xenv_up) {
358 if (!pdata->cfg_ts_force_tslib) {
090bcb85 359 xenv_update(xkey_cb, xmouseb_event_cb, xmousem_event_cb, this);
e1837b2c 360 if (pdata->xenv_mouse)
361 read_tslib = 0;
362 }
363 else {
364 /* just flush X event queue */
365 xenv_update(NULL, NULL, NULL, NULL);
366 }
367 }
f9b3f440 368
e1837b2c 369 omapsdl_input_get_events(0, key_event_cb,
370 read_tslib ? ts_event_cb : NULL, this);
9a8e84f8 371}
372
373static SDL_VideoDevice *omap_create(int devindex)
374{
375 SDL_VideoDevice *this;
376
377 this = calloc(1, sizeof(*this) + sizeof(*this->hidden));
378 if (this == NULL) {
379 SDL_OutOfMemory();
380 return 0;
381 }
382 this->hidden = (void *)(this + 1);
383 this->VideoInit = omap_VideoInit;
384 this->ListModes = omap_ListModes;
385 this->SetVideoMode = omap_SetVideoMode;
386 this->LockHWSurface = omap_LockHWSurface;
387 this->UnlockHWSurface = omap_UnlockHWSurface;
388 this->FlipHWSurface = omap_FlipHWSurface;
37299201 389 this->AllocHWSurface = omap_AllocHWSurface;
390 this->FreeHWSurface = omap_FreeHWSurface;
9a8e84f8 391 this->SetColors = omap_SetColors;
392 this->UpdateRects = omap_UpdateRects;
393 this->VideoQuit = omap_VideoQuit;
394 this->InitOSKeymap = omap_InitOSKeymap;
395 this->PumpEvents = omap_PumpEvents;
396 this->free = omap_free;
397
398 return this;
399}
400
401VideoBootStrap omapdss_bootstrap = {
402 "omapdss", "OMAP DSS2 Framebuffer Driver",
403 omap_available, omap_create
404};
405