support app icon by reusing x11 sdl code
[sdl_omap.git] / src / video / omapdss / sdlif.c
index dc97a0a..b5cadbe 100644 (file)
@@ -1,24 +1,22 @@
 /*
- * (C) Gražvydas "notaz" Ignotas, 2010
+ * (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 <X11/XF86keysym.h>
 
 #include "../SDL_sysvideo.h"
 #include "../SDL_pixels_c.h"
 #include "../../events/SDL_events_c.h"
-#include "linux/fbdev.h"
-#include "linux/oshide.h"
-#include "omapsdl.h"
 
+#include "SDL_x11reuse.h"
+#include "linux/xenv.h"
+#include "osdl.h"
 
-struct SDL_PrivateVideoData {
-       struct vout_fbdev *fbdev;
-//     void *fbmem;
-};
 
 static int omap_available(void) 
 {
@@ -34,13 +32,32 @@ static void omap_free(SDL_VideoDevice *device)
 
 static int omap_VideoInit(SDL_VideoDevice *this, SDL_PixelFormat *vformat)
 {
+       struct SDL_PrivateVideoData *pdata = this->hidden;
+       const char *tmp;
+       int w, h, ret;
+
        trace();
 
        // default to 16bpp
        vformat->BitsPerPixel = 16;
 
        omapsdl_input_init();
-       omapsdl_config();
+       omapsdl_config(pdata);
+
+       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(pdata) == 0) {
+               this->info.current_w = pdata->phys_w;
+               this->info.current_h = pdata->phys_h;
+       }
+
+       this->handles_any_size = 1;
+       this->info.hw_available = 1;
+
+       pdata->x11reuse_context = x11reuse_init();
 
        return 0;
 }
@@ -49,37 +66,21 @@ static void omap_VideoQuit(SDL_VideoDevice *this)
 {
        trace();
 
-       if (this->hidden->fbdev != NULL) {
-               vout_fbdev_finish(this->hidden->fbdev);
-               this->hidden->fbdev = NULL;
-
-               oshide_finish();
-       }
+       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_list[] = {
-               // XXX: we are not really restricted to fixed modes
-               // FIXME: should really check the display for max supported
-               { 0, 0, 800, 480 },
-               { 0, 0, 720, 480 },
-               { 0, 0, 640, 480 },
-               { 0, 0, 640, 400 },
-               { 0, 0, 512, 384 },
-               { 0, 0, 320, 240 },
-               { 0, 0, 320, 200 },
+       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
+       /* broken API needs this stupidity */
        static SDL_Rect *omap_modes[] = {
-               &omap_mode_list[0],
-               &omap_mode_list[1],
-               &omap_mode_list[2],
-               &omap_mode_list[3],
-               &omap_mode_list[4],
-               &omap_mode_list[5],
-               &omap_mode_list[6],
+               &omap_mode_max,
                NULL
        };
 
@@ -95,41 +96,113 @@ static SDL_Rect **omap_ListModes(SDL_VideoDevice *this, SDL_PixelFormat *format,
 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);
 
-       if (this->hidden->fbdev == NULL) {
-               this->hidden->fbdev = vout_fbdev_init("/dev/fb0", &width, &height, 0);
-               if (this->hidden->fbdev == NULL)
-                       return NULL;
+       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;
 
-               oshide_init();
+       if (!(flags & SDL_DOUBLEBUF) && pdata->cfg_force_doublebuf) {
+               log("forcing SDL_DOUBLEBUF");
+               flags |= SDL_DOUBLEBUF;
        }
-       else {
-               if (vout_fbdev_resize(this->hidden->fbdev, width, height, 0, 0, 0, 0, 0) < 0)
-                       return NULL;
+
+       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;
+               }
        }
 
-       if (!SDL_ReallocFormat(current, 16, 0xf800, 0x07e0, 0x001f, 0))
+       /* always use doublebuf, when SDL_DOUBLEBUF is not set,
+        * we'll have to blit manually on UpdateRects() */
+       doublebuf = 1;
+
+       fbmem = osdl_video_set_mode(pdata,
+               pdata->border_l, pdata->border_r, pdata->border_t, pdata->border_b,
+               width, height, bpp, &doublebuf, this->wm_title);
+       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;
+       }
+       pdata->front_buffer = osdl_video_get_active_buffer(pdata);
+       if (pdata->front_buffer == NULL) {
+               err("osdl_video_get_active_buffer failed\n");
                return NULL;
+       }
 
-       current->flags = SDL_FULLSCREEN | SDL_DOUBLEBUF | SDL_HWSURFACE;
+       if (!doublebuf) {
+               if (flags & SDL_DOUBLEBUF) {
+                       log("doublebuffering could not be set\n");
+                       flags &= ~SDL_DOUBLEBUF;
+               }
+               /* XXX: could just malloc a back buffer here instead */
+               pdata->cfg_force_directbuf = 1;
+       }
+
+       if (!(flags & SDL_DOUBLEBUF) && pdata->cfg_force_directbuf)
+               fbmem = pdata->front_buffer;
+
+       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;
+       }
 
-       current->pixels = vout_fbdev_flip(this->hidden->fbdev);
+       if (pdata->delayed_icon != NULL) {
+               this->SetIcon(this, pdata->delayed_icon,
+                       pdata->delayed_icon_mask);
+               SDL_FreeSurface(pdata->delayed_icon);
+               pdata->delayed_icon = NULL;
+               if (pdata->delayed_icon_mask) {
+                       free(pdata->delayed_icon_mask);
+                       pdata->delayed_icon_mask = NULL;
+               }
+       }
 
        return current;
 }
 
-static void *flip_it(struct vout_fbdev *fbdev)
-{
-       if (gcfg_force_vsync)
-               vout_fbdev_wait_vsync(fbdev);
-
-       return vout_fbdev_flip(fbdev);
-}
-
 static int omap_LockHWSurface(SDL_VideoDevice *this, SDL_Surface *surface)
 {
        trace("%p", surface);
@@ -144,13 +217,45 @@ static void omap_UnlockHWSurface(SDL_VideoDevice *this, SDL_Surface *surface)
 
 static int omap_FlipHWSurface(SDL_VideoDevice *this, SDL_Surface *surface)
 {
+       struct SDL_PrivateVideoData *pdata = this->hidden;
+       static int warned;
+
        trace("%p", surface);
 
-       surface->pixels = flip_it(this->hidden->fbdev);
+       if (surface != this->screen) {
+               if (!warned) {
+                       err("flip surface %p which is not screen %p?\n",
+                               surface, this->screen);
+                       warned = 1;
+               }
+               return;
+       }
+
+       if (surface->flags & SDL_DOUBLEBUF)
+               surface->pixels = osdl_video_flip(pdata);
+       else {
+               if (surface->pixels != pdata->front_buffer)
+                       memcpy(surface->pixels, pdata->front_buffer,
+                               surface->pitch * surface->h);
+       }
+
+       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);
@@ -159,19 +264,55 @@ static int omap_SetColors(SDL_VideoDevice *this, int firstcolor, int ncolors, SD
 
 static void omap_UpdateRects(SDL_VideoDevice *this, int nrects, SDL_Rect *rects)
 {
+       struct SDL_PrivateVideoData *pdata = this->hidden;
+       SDL_Surface *screen = this->screen;
+       int fullscreen_blit = 0;
+       int i, Bpp, x, y, w, h;
+       char *src, *dst;
+
        trace("%d, %p", nrects, rects);
 
-       if (nrects != 1 || rects->x != 0 || rects->y != 0 ||
-                       rects->w != this->screen->w || rects->h != this->screen->h) {
-               static int warned = 0;
-               if (!warned) {
-                       not_supported();
-                       warned = 1;
-               }
+       fullscreen_blit =
+               nrects == 1 && rects->x == 0 && rects->y == 0
+                   && (rects->w == screen->w || rects->w == 0)
+                   && (rects->h == screen->h || rects->h == 0);
+
+       if (screen->flags & SDL_DOUBLEBUF) {
+               if (fullscreen_blit && !pdata->app_uses_flip)
+                       screen->pixels = osdl_video_flip(pdata);
+               return;
+       }
+
+       src = screen->pixels;
+       dst = pdata->front_buffer;
+       if (src == dst)
+               return;
+
+       if (fullscreen_blit) {
+               memcpy(dst, src, screen->pitch * screen->h);
+               return;
        }
 
-       if (this->hidden->fbdev)
-               this->screen->pixels = flip_it(this->hidden->fbdev);
+       for (i = 0, Bpp = screen->format->BytesPerPixel; i < nrects; i++) {
+               /* this supposedly has no clipping, but we'll do it anyway */
+               x = rects[i].x, y = rects[i].y, w = rects[i].w, h = rects[i].h;
+               if (x < 0)
+                       w += x, x = 0;
+               else if (x + w > screen->w)
+                       w = screen->w - x;
+               if (w <= 0)
+                       continue;
+
+               if (y < 0)
+                       h += y, y = 0;
+               else if (y + h > screen->h)
+                       h = screen->h - y;
+
+               for (; h > 0; y++, h--)
+                       memcpy(dst + y * screen->pitch + x * Bpp,
+                              src + y * screen->pitch + x * Bpp,
+                              w * Bpp);
+       }
 }
 
 static void omap_InitOSKeymap(SDL_VideoDevice *this)
@@ -179,19 +320,189 @@ static void omap_InitOSKeymap(SDL_VideoDevice *this)
        trace();
 }
 
-static int event_cb(void *cb_arg, int sdl_kc, int is_pressed)
+static int key_event_cb(void *cb_arg, int sdl_kc, int sdl_sc, int is_pressed)
 {
        SDL_keysym keysym = { 0, };
+       int shift = 0;
+       SDLMod mod;
+       int ret;
 
        keysym.sym = sdl_kc;
+       keysym.scancode = sdl_sc;
+
+       /* 0xff if pandora's Fn, so we exclude it too.. */
+       if (is_pressed && sdl_kc < 0xff && SDL_TranslateUNICODE) {
+               mod = SDL_GetModState();
+               if (!(mod & KMOD_CTRL) && (!!(mod & KMOD_SHIFT) ^ !!(mod & KMOD_CAPS)))
+                       shift = 1;
+
+               /* prefer X mapping, if that doesn't work use hardcoded one */
+               ret = xenv_keycode_to_keysym(sdl_sc, shift);
+               if (ret >= 0) {
+                       keysym.unicode = ret;
+                       if ((mod & KMOD_CTRL)
+                           && 0x60 <= keysym.unicode && keysym.unicode <= 0x7f)
+                       {
+                               keysym.unicode -= 0x60;
+                       }
+                       /* hmh.. */
+                       if ((keysym.unicode & 0xff00) == 0xff00)
+                               keysym.unicode &= ~0xff00;
+               }
+               else {
+                       keysym.unicode = sdl_kc;
+                       if ((mod & KMOD_CTRL) && 0x60 <= sdl_kc && sdl_kc <= 0x7f)
+                       {
+                               keysym.unicode = sdl_kc - 0x60;
+                       }
+                       else if (shift && 'a' <= sdl_kc && sdl_kc <= 'z')
+                       {
+                               keysym.unicode = sdl_kc - 'a' + 'A';
+                       }
+               }
+       }
+
        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 void translate_mouse(SDL_VideoDevice *this, int *x, int *y)
+{
+       struct SDL_PrivateVideoData *pdata = this->hidden;
+
+       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);
+       }
+}
+
+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;
+
+       translate_mouse(this, &x, &y);
+
+       pressure = !!pressure;
+       if (pressure != was_pressed) {
+               SDL_PrivateMouseButton(pressure ? SDL_PRESSED : SDL_RELEASED, 1, x, y);
+               was_pressed = pressure;
+       }
+       else
+               SDL_PrivateMouseMotion(0, 0, x, y);
+}
+
+static int xmouseb_event_cb(void *cb_arg, int x, int y, int button, int is_pressed)
+{
+       SDL_VideoDevice *this = cb_arg;
+       struct SDL_PrivateVideoData *pdata = this->hidden;
+
+       translate_mouse(this, &x, &y);
+       SDL_PrivateMouseButton(is_pressed ? SDL_PRESSED : SDL_RELEASED, button, x, y);
+}
+
+static int xmousem_event_cb(void *cb_arg, int x, int y)
+{
+       SDL_VideoDevice *this = cb_arg;
+       struct SDL_PrivateVideoData *pdata = this->hidden;
+
+       translate_mouse(this, &x, &y);
+       SDL_PrivateMouseMotion(0, 0, x, y);
+}
+
+static int xkey_cb(void *cb_arg, int kc, int is_pressed)
+{
+       SDL_VideoDevice *this = cb_arg;
+       struct SDL_PrivateVideoData *pdata = this->hidden;
+       int ret;
+
+       if (kc == XF86XK_MenuKB && is_pressed) {
+               ret = osdl_video_pause(pdata, 1);
+               if (ret == 0) {
+                       xenv_minimize();
+                       osdl_video_pause(pdata, 0);
+                       omapsdl_input_get_events(0, NULL, NULL, NULL);
+               }
+       }
+}
+
 static void omap_PumpEvents(SDL_VideoDevice *this) 
 {
+       struct SDL_PrivateVideoData *pdata = this->hidden;
+       int read_tslib = 1;
+
        trace();
 
-       omapsdl_input_get_events(0, event_cb, NULL);
+       if (pdata->xenv_up) {
+               if (!pdata->cfg_ts_force_tslib) {
+                       xenv_update(xkey_cb, xmouseb_event_cb, xmousem_event_cb, this);
+                       if (pdata->xenv_mouse)
+                               read_tslib = 0;
+               }
+               else {
+                       /* just flush X event queue */
+                       xenv_update(NULL, NULL, NULL, NULL);
+               }
+       }
+
+       omapsdl_input_get_events(0, key_event_cb,
+               read_tslib ? ts_event_cb : NULL, this);
+}
+
+static void omap_SetCaption(SDL_VideoDevice *this, const char *title, const char *icon)
+{
+       void *display = NULL, *window = NULL;
+       int screen = 0;
+       int ret;
+
+       ret = osdl_video_get_window(&display, &screen, &window);
+       if (ret == 0) {
+               x11reuse_SetCaption(this->hidden->x11reuse_context,
+                       display, screen, window, title, icon);
+       }
+}
+
+static void omap_SetIcon(SDL_VideoDevice *this, SDL_Surface *icon, Uint8 *mask)
+{
+       struct SDL_PrivateVideoData *pdata = this->hidden;
+       void *display = NULL, *window = NULL;
+       int screen = 0;
+       int ret;
+
+       ret = osdl_video_get_window(&display, &screen, &window);
+       if (ret == 0) {
+               x11reuse_SetIcon(pdata->x11reuse_context,
+                       display, screen, window, icon, mask);
+       }
+       else {
+               SDL_Surface *old_icon = pdata->delayed_icon;
+               void *old_icon_mask = pdata->delayed_icon_mask;
+               int mask_size = ((icon->w + 7) / 8) * icon->h;
+
+               pdata->delayed_icon = SDL_ConvertSurface(icon,
+                                       icon->format, icon->flags);
+               if (pdata->delayed_icon != NULL) {
+                       memcpy(pdata->delayed_icon->pixels, icon->pixels,
+                               icon->pitch * icon->h);
+               }
+               if (mask != NULL) {
+                       pdata->delayed_icon_mask = malloc(mask_size);
+                       if (pdata->delayed_icon_mask)
+                               memcpy(pdata->delayed_icon_mask, mask, mask_size);
+               }
+
+               if (old_icon != NULL)
+                       SDL_FreeSurface(old_icon);
+               if (old_icon_mask)
+                       free(old_icon_mask);
+       }
 }
 
 static SDL_VideoDevice *omap_create(int devindex)
@@ -210,11 +521,15 @@ static SDL_VideoDevice *omap_create(int devindex)
        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->SetCaption = omap_SetCaption;
+       this->SetIcon = omap_SetIcon;
        this->free = omap_free;
 
        return this;