handle window focus to disable xsp
[drnoksnes] / platform / sdlv.cpp
index 3d1a29c..573378c 100644 (file)
@@ -2,10 +2,13 @@
 
 #include <X11/Xlib.h>
 #include <X11/Xutil.h>
-#include <X11/extensions/Xsp.h>
 #include <SDL.h>
 #include <SDL_syswm.h>
 
+#if CONF_XSP
+#      include <X11/extensions/Xsp.h>
+#endif
+
 #include "snes9x.h"
 #include "platform.h"
 #include "display.h"
                abort(); \
        } while (0);
 
-static SDL_Surface *screen;
+struct gui GUI;
+
+static SDL_Surface* screen;
 
 static SDL_Rect windowSize, screenSize;
 static bool gotWindowSize, gotScreenSize;
 
-/** Inside the surface, where are we drawing */
-static SDL_Rect renderArea;
-
-#ifdef MAEMO
-static void setDoubling(bool enable)
-{
-       SDL_SysWMinfo wminfo;
-       SDL_VERSION(&wminfo.version);
-       if ( SDL_GetWMInfo(&wminfo) ) {
-               Display *dpy = wminfo.info.x11.display;
-               XSPSetPixelDoubling(dpy, 0, enable ? 1 : 0);
-               XFlush(dpy);
-       }
-}
-#endif
+class Scaler;
+/** The current scaler object */
+static Scaler* scaler;
 
 static void centerRectangle(SDL_Rect& result, int areaW, int areaH, int w, int h)
 {
@@ -47,6 +40,521 @@ static void centerRectangle(SDL_Rect& result, int areaW, int areaH, int w, int h
        result.h = h;
 }
 
+class Scaler
+{
+public:
+       Scaler() { };
+       virtual ~Scaler() { };
+
+       virtual const char * getName() const = 0;
+
+       virtual uint8* getDrawBuffer() const = 0;
+       virtual unsigned int getDrawBufferPitch() const = 0;
+       virtual void getRenderedGUIArea(unsigned short & x, unsigned short & y,
+                                                                       unsigned short & w, unsigned short & h)
+                                                                       const = 0;
+       virtual int getRatio() const = 0;
+       virtual void prepare() = 0;
+       virtual void finish() = 0;
+       virtual void pause() = 0;
+       virtual void resume() = 0;
+};
+
+class ScalerFactory
+{
+public:
+       ScalerFactory() { };
+       virtual ~ScalerFactory() { };
+       virtual const char * getName() const = 0;
+       virtual bool canEnable(int bpp, int w, int h) const = 0;
+       virtual Scaler* instantiate(SDL_Surface* screen, int w, int h) const = 0;
+};
+
+class DummyScaler : public Scaler
+{
+       SDL_Surface * m_screen;
+       SDL_Rect m_area;
+
+       DummyScaler(SDL_Surface* screen, int w, int h)
+       : m_screen(screen)
+       {
+               centerRectangle(m_area, GUI.Width, GUI.Height, w, h);
+       }
+public:
+
+       ~DummyScaler()
+       {
+       };
+
+       class Factory : public ScalerFactory
+       {
+               const char * getName() const
+               {
+                       return "none";
+               }
+
+               bool canEnable(int bpp, int w, int h) const
+               {
+                       return true;
+               }
+
+               Scaler* instantiate(SDL_Surface* screen, int w, int h) const
+               {
+                       return new DummyScaler(screen, w, h);
+               }
+       };
+
+       static const Factory factory;
+
+       const char * getName() const
+       {
+               return "no scaling";
+       }
+
+       uint8* getDrawBuffer() const
+       {
+               const int Bpp = screen->format->BitsPerPixel / 8;
+               const int pitch = screen->pitch;
+               return ((uint8*) screen->pixels)
+                       + (m_area.x * Bpp)
+                       + (m_area.y * pitch);
+       };
+
+       unsigned int getDrawBufferPitch() const
+       {
+               return screen->pitch;
+       };
+
+       void getRenderedGUIArea(unsigned short & x, unsigned short & y,
+                                                       unsigned short & w, unsigned short & h) const
+       {
+               x = m_area.x; y = m_area.y; w = m_area.w; h = m_area.h;
+       };
+
+       int getRatio() const
+       {
+               return 1;
+       };
+
+       void prepare() { };
+
+       void finish()
+       {
+               SDL_UpdateRects(m_screen, 1, &m_area);
+       };
+
+       void pause() { };
+       void resume() { };
+};
+const DummyScaler::Factory DummyScaler::factory;
+
+#ifdef __arm__
+class ARMScaler : public Scaler
+{
+       SDL_Surface * m_screen;
+       SDL_Rect m_area;
+       uint8 * m_surface;
+       const int m_w, m_h, m_Bpp;
+
+       ARMScaler(SDL_Surface* screen, int w, int h)
+       : m_screen(screen), m_w(w), m_h(h),
+        m_Bpp(m_screen->format->BitsPerPixel / 8)
+       {
+               centerRectangle(m_area, GUI.Width, GUI.Height, w * 2, h * 2);
+               m_surface = reinterpret_cast<uint8*>(malloc(w * h * m_Bpp));
+       }
+public:
+       ~ARMScaler()
+       {
+               free(m_surface);
+       };
+
+       class Factory : public ScalerFactory
+       {
+               const char * getName() const
+               {
+                       return "2x";
+               }
+
+               bool canEnable(int bpp, int w, int h) const
+               {
+                       return bpp == 16 && w * 2 < GUI.Width && h * 2 < GUI.Height &&
+                               w % 16 == 0 /* asm assumes w div by 16 */;
+               }
+
+               Scaler* instantiate(SDL_Surface* screen, int w, int h) const
+               {
+                       return new ARMScaler(screen, w, h);
+               }
+       };
+
+       static const Factory factory;
+
+       const char * getName() const
+       {
+               return "software ARM 2x scaling";
+       }
+
+       uint8* getDrawBuffer() const
+       {
+               return m_surface;
+       };
+
+       unsigned int getDrawBufferPitch() const
+       {
+               return m_w * m_Bpp;
+       };
+
+       void getRenderedGUIArea(unsigned short & x, unsigned short & y,
+                                                       unsigned short & w, unsigned short & h) const
+       {
+               x = m_area.x; y = m_area.y; w = m_area.w; h = m_area.h;
+       };
+
+       int getRatio() const
+       {
+               return 2;
+       };
+
+       void prepare() { };
+
+       void finish()
+       {
+               uint16 * src = reinterpret_cast<uint16*>(m_surface);
+               uint16 * dst = reinterpret_cast<uint16*>(
+                       ((uint8*) m_screen->pixels)
+                       + (m_area.x * m_Bpp)
+                       + (m_area.y * m_screen->pitch));
+               const int src_pitch = m_w;
+               const int dst_pitch = m_screen->pitch / m_Bpp;
+               int y;
+
+               for (y = 0; y < m_h*2; y++) {
+                       asm volatile
+                       (
+                               "mov r0, %0; mov r1, %1; mov r2, %2;"
+                               "stmdb r13!,{r4,r5,r6,r7,r8,r9,r10,r11,r12,r14};"
+                               "1:     ldmia r1!,{r3,r4,r5,r6,r7,r8,r9,r10};"
+                               "mov r14,r5,lsr #16;"
+                               "mov r12,r5,lsl #16;"
+                               "orr r14,r14,r14,lsl #16;"
+                               "orr r12,r12,r12,lsr #16;"
+                               "mov r11,r4,lsr #16;"
+                               "mov r5,r4,lsl #16;"
+                               "orr r11,r11,r11,lsl #16;"
+                               "orr r5,r5,r5,lsr #16;"
+                               "mov r4,r3,lsr #16;"
+                               "mov r3,r3,lsl #16;"
+                               "orr r4,r4,r4,lsl #16;"
+                               "orr r3,r3,r3,lsr #16;"
+                               "stmia r0!,{r3,r4,r5,r11,r12,r14};"
+                               "mov r3,r6,lsl #16;"
+                               "mov r4,r6,lsr #16;"
+                               "orr r3,r3,r3,lsr #16;"
+                               "orr r4,r4,r4,lsl #16;"
+                               "mov r5,r7,lsl #16;"
+                               "mov r6,r7,lsr #16;"
+                               "orr r5,r5,r5,lsr #16;"
+                               "orr r6,r6,r6,lsl #16;"
+                               "mov r7,r8,lsl #16;"
+                               "mov r8,r8,lsr #16;"
+                               "orr r7,r7,r7,lsr #16;"
+                               "orr r8,r8,r8,lsl #16;"
+                               "mov r12,r10,lsr #16;"
+                               "mov r11,r10,lsl #16;"
+                               "orr r12,r12,r12,lsl #16;"
+                               "orr r11,r11,r11,lsr #16;"
+                               "mov r10,r9,lsr #16;"
+                               "mov r9,r9,lsl #16;"
+                               "orr r10,r10,r10,lsl #16;"
+                               "orr r9,r9,r9,lsr #16;"
+                               "stmia r0!,{r3,r4,r5,r6,r7,r8,r9,r10,r11,r12};"
+                               "subs r2,r2,#16;"
+                               "bhi 1b;"
+                               "ldmia r13!,{r4,r5,r6,r7,r8,r9,r10,r11,r12,r14};"
+                       :
+                       : "r" (dst), "r" (src), "r" (m_w)
+                       : "r0", "r1", "r2", "r3"
+                       );
+                       dst += dst_pitch;
+                       if (y&1) src += src_pitch;
+               }
+
+               SDL_UpdateRects(m_screen, 1, &m_area);
+       };
+
+       void pause() { };
+       void resume() { };
+};
+const ARMScaler::Factory ARMScaler::factory;
+#endif
+
+class SWScaler : public Scaler
+{
+       SDL_Surface * m_screen;
+       SDL_Rect m_area;
+       uint8 * m_surface;
+       const int m_w, m_h, m_Bpp;
+
+       SWScaler(SDL_Surface* screen, int w, int h)
+       : m_screen(screen), m_w(w), m_h(h),
+        m_Bpp(m_screen->format->BitsPerPixel / 8)
+       {
+               centerRectangle(m_area, GUI.Width, GUI.Height, w * 2, h * 2);
+               m_surface = reinterpret_cast<uint8*>(malloc(w * h * m_Bpp));
+       }
+public:
+       ~SWScaler()
+       {
+               free(m_surface);
+       };
+
+       class Factory : public ScalerFactory
+       {
+               const char * getName() const
+               {
+                       return "soft2x";
+               }
+
+               bool canEnable(int bpp, int w, int h) const
+               {
+                       return w * 2 < GUI.Width && h * 2 < GUI.Height;
+               }
+
+               Scaler* instantiate(SDL_Surface* screen, int w, int h) const
+               {
+                       return new SWScaler(screen, w, h);
+               }
+       };
+
+       static const Factory factory;
+
+       const char * getName() const
+       {
+               return "software 2x scaling";
+       }
+
+       uint8* getDrawBuffer() const
+       {
+               return m_surface;
+       };
+
+       unsigned int getDrawBufferPitch() const
+       {
+               return m_w * m_Bpp;
+       };
+
+       void getRenderedGUIArea(unsigned short & x, unsigned short & y,
+                                                       unsigned short & w, unsigned short & h) const
+       {
+               x = m_area.x; y = m_area.y; w = m_area.w; h = m_area.h;
+       };
+
+       int getRatio() const
+       {
+               return 2;
+       };
+
+       void prepare() { };
+
+       void finish()
+       {
+               uint16 * src = reinterpret_cast<uint16*>(m_surface);
+               uint16 * dst = reinterpret_cast<uint16*>(
+                       ((uint8*) m_screen->pixels)
+                       + (m_area.x * m_Bpp)
+                       + (m_area.y * m_screen->pitch));
+               const int src_pitch = m_w;
+               const int dst_pitch = m_screen->pitch / m_Bpp;
+               int x, y;
+
+               for (y = 0; y < m_h*2; y++) {
+                       for (x = 0; x < m_w*2; x+=2) {
+                               dst[x] = src[x/2];
+                               dst[x + 1] = src[x/2];
+                       }
+                       dst += dst_pitch;
+                       if (y&1) src += src_pitch;
+               }
+
+               SDL_UpdateRects(m_screen, 1, &m_area);
+       };
+
+       void pause() { };
+       void resume() { };
+};
+const SWScaler::Factory SWScaler::factory;
+
+#if CONF_XSP
+class XSPScaler : public Scaler
+{
+       SDL_Surface* m_screen;
+       SDL_Rect m_area;
+       SDL_Rect m_real_area;
+       bool m_should_enable, m_enabled; // Try to avoid flicker.
+
+       static void setDoubling(bool enable)
+       {
+               SDL_SysWMinfo wminfo;
+               SDL_VERSION(&wminfo.version);
+               if ( SDL_GetWMInfo(&wminfo) ) {
+                       Display *dpy = wminfo.info.x11.display;
+                       XSPSetPixelDoubling(dpy, 0, enable ? 1 : 0);
+                       XFlush(dpy);
+               }
+       }
+
+       XSPScaler(SDL_Surface* screen, int w, int h)
+       : m_screen(screen), m_should_enable(true), m_enabled(false)
+       {
+               centerRectangle(m_area, GUI.Width, GUI.Height,
+                       w * 2, h * 2);
+
+               m_real_area.x = m_area.x;
+               m_real_area.y = m_area.y;
+               m_real_area.w = m_area.w / 2;
+               m_real_area.h = m_area.h / 2;
+       };
+public:
+       ~XSPScaler()
+       {
+               if (m_enabled) setDoubling(false);
+       };
+
+       class Factory : public ScalerFactory
+       {
+               const char * getName() const
+               {
+                       return "xsp";
+               }
+
+               bool canEnable(int bpp, int w, int h) const
+               {
+                       return w * 2 < GUI.Width && h * 2 < GUI.Height;
+               };
+
+               Scaler* instantiate(SDL_Surface* screen, int w, int h) const
+               {
+                       return new XSPScaler(screen, w, h);
+               }
+       };
+
+       static const Factory factory;
+
+       const char * getName() const
+       {
+               return "XSP pixel doubling";
+       }
+
+       uint8* getDrawBuffer() const
+       {
+               const int Bpp = screen->format->BitsPerPixel / 8;
+               const int pitch = screen->pitch;
+               return ((uint8*) screen->pixels)
+                       + (m_area.x * Bpp)
+                       + (m_area.y * pitch);
+       };
+
+       unsigned int getDrawBufferPitch() const
+       {
+               return screen->pitch;
+       };
+
+       void getRenderedGUIArea(unsigned short & x, unsigned short & y,
+                                                       unsigned short & w, unsigned short & h) const
+       {
+               x = m_area.x; y = m_area.y; w = m_area.w; h = m_area.h;
+       };
+
+       int getRatio() const
+       {
+               return 2;
+       };
+
+       void prepare() 
+       {
+               if (m_should_enable && !m_enabled) {
+                       setDoubling(true);
+                       m_enabled = true;
+               }
+       };
+
+       void finish()
+       {
+               SDL_UpdateRects(m_screen, 1, &m_real_area);
+       };
+
+       void pause()
+       {
+               m_should_enable = false;
+               if (m_enabled) {
+                       setDoubling(false);
+                       m_enabled = false;
+               }
+       };
+
+       void resume()
+       {
+               m_should_enable = true; // Will enable later
+       };
+};
+const XSPScaler::Factory XSPScaler::factory;
+#endif
+
+static const ScalerFactory* scalers[] = {
+#if CONF_XSP
+       &XSPScaler::factory,
+#endif
+#ifdef __arm__
+       &ARMScaler::factory,
+#endif
+       &SWScaler::factory,
+       &DummyScaler::factory
+};
+
+static const ScalerFactory* searchForScaler(int bpp, int w, int h)
+{
+       const int n = sizeof(scalers) / sizeof(ScalerFactory*);
+       int i;
+
+       if (Config.scaler && strcasecmp(Config.scaler, "help") == 0 ) {
+               // List scalers
+               printf("Scalers list:\n");
+               for (i = 0; i < n; i++) {
+                       printf(" %s\n", scalers[i]->getName());
+               }
+               DIE("End of scalers list");
+       } else if (Config.scaler && strcasecmp(Config.scaler, "auto") != 0 ) {
+               // We prefer a specific scaler
+               for (i = 0; i < n; i++) {
+                       if (strcasecmp(scalers[i]->getName(), Config.scaler) == 0) {
+                               if (scalers[i]->canEnable(bpp, w, h)) {
+                                       // Found the scaler selected by the user, and we can use it.
+                                       return scalers[i];
+                               } else {
+                                       fprintf(stderr,
+                                               "Selected scaler '%s' cannot be enabled in this mode\n",
+                                               Config.scaler);
+                                       break; // Fallback to another scaler.
+                               }
+                       }
+               }
+               if (i == n) {
+                       fprintf(stderr, "Selected scaler '%s' does not exist\n",
+                               Config.scaler);
+               }
+       }
+
+       // Just try them all now, in a buildtime set priority.
+       for (i = 0; i < n; i++) {
+               if (scalers[i]->canEnable(bpp, w, h)) {
+                       return scalers[i];
+               }
+       }
+
+       DIE("Can't use any scaler; this shouldn't happen.");
+}
+
 static void calculateScreenSize()
 {
        SDL_SysWMinfo wminfo;
@@ -96,19 +604,19 @@ static void freeVideoSurface()
 {
        screen = 0; // There's no need to free the screen surface.
        GFX.Screen = 0;
-       
+
        free(GFX.SubScreen); GFX.SubScreen = 0;
        free(GFX.ZBuffer); GFX.ZBuffer = 0;
        free(GFX.SubZBuffer); GFX.SubZBuffer = 0;
+
+       delete scaler; scaler = 0;
 }
 
 static void setupVideoSurface()
 {
        // Real surface area.
-       unsigned gameWidth = IMAGE_WIDTH;
-       unsigned gameHeight = IMAGE_HEIGHT;
-       // SDL Window/Surface size (bigger, so we can get mouse events there).
-       unsigned winWidth, winHeight;
+       const unsigned gameWidth = IMAGE_WIDTH;
+       const unsigned gameHeight = IMAGE_HEIGHT;
 
 #ifdef MAEMO
        if ((Config.fullscreen && !gotScreenSize) ||
@@ -121,30 +629,25 @@ static void setupVideoSurface()
                calculateScreenSize();
        }
        if (Config.fullscreen) {
-               winWidth = screenSize.w;
-               winHeight = screenSize.h;
+               GUI.Width = screenSize.w;
+               GUI.Height = screenSize.h;
        } else {
-               winWidth = windowSize.w;
-               winHeight = windowSize.h;
-       }
-       
-       // So, can we enable Xsp?
-       if (gameWidth * 2 < winWidth && gameHeight * 2 < winHeight) {
-               Config.xsp = true;
-       } else  {
-               Config.xsp = false;
-               setDoubling(false); // Before switching video modes; avoids flicker.
+               GUI.Width = windowSize.w;
+               GUI.Height = windowSize.h;
        }
 #else
-       winWidth = gameWidth;
-       winHeight = gameHeight;
+       GUI.Width = gameWidth;
+       GUI.Height = gameHeight;
 #endif
 
        // Safeguard
-       if (gameHeight > winHeight || gameWidth > winWidth)
+       if (gameHeight > GUI.Height || gameWidth > GUI.Width)
                DIE("Video is larger than window size!");
 
-       screen = SDL_SetVideoMode(winWidth, winHeight,
+       const ScalerFactory* sFactory =
+               searchForScaler(Settings.SixteenBit ? 16 : 8, gameWidth, gameHeight);
+
+       screen = SDL_SetVideoMode(GUI.Width, GUI.Height,
                                                                Settings.SixteenBit ? 16 : 8,
                                                                SDL_SWSURFACE |
                                                                (Config.fullscreen ? SDL_FULLSCREEN : 0));
@@ -153,29 +656,14 @@ static void setupVideoSurface()
        
        SDL_ShowCursor(SDL_DISABLE);
 
+       scaler = sFactory->instantiate(screen, gameWidth, gameHeight);
+
        // We get pitch surface values from SDL
-       GFX.RealPitch = GFX.Pitch = screen->pitch;
+       GFX.RealPitch = GFX.Pitch = scaler->getDrawBufferPitch();
        GFX.ZPitch = GFX.Pitch / 2; // gfx & tile.cpp depend on this, unfortunately.
        GFX.PixSize = screen->format->BitsPerPixel / 8;
-
-       // Ok, calculate renderArea
-#ifdef MAEMO
-       if (Config.xsp) {
-               setDoubling(true);
-               centerRectangle(renderArea, winWidth, winHeight,
-                       gameWidth * 2, gameHeight * 2);
-               renderArea.w /= 2;
-               renderArea.h /= 2;
-       } else {
-               centerRectangle(renderArea, winWidth, winHeight, gameWidth, gameHeight);
-       }
-#else
-       centerRectangle(renderArea, winWidth, winHeight, gameWidth, gameHeight);
-#endif
        
-       GFX.Screen = ((uint8*) screen->pixels)
-               + (renderArea.x * GFX.PixSize)
-               + (renderArea.y * GFX.Pitch);
+       GFX.Screen = scaler->getDrawBuffer();
        GFX.SubScreen = (uint8 *) malloc(GFX.Pitch * IMAGE_HEIGHT);
        GFX.ZBuffer =  (uint8 *) malloc(GFX.ZPitch * IMAGE_HEIGHT);
        GFX.SubZBuffer = (uint8 *) malloc(GFX.ZPitch * IMAGE_HEIGHT);
@@ -184,11 +672,29 @@ static void setupVideoSurface()
        GFX.PPL = GFX.Pitch >> 1;
        GFX.PPLx2 = GFX.Pitch;
 
-       printf("Video: %dx%d (%dx%d output), %hu bits per pixel, %s %s\n",
+       scaler->getRenderedGUIArea(GUI.RenderX, GUI.RenderY, GUI.RenderW, GUI.RenderH);
+       GUI.Scale = scaler->getRatio();
+
+       printf("Video: %dx%d (%dx%d output), %hu bits per pixel, %s, %s\n",
                gameWidth, gameHeight,
                screen->w, screen->h, screen->format->BitsPerPixel,
                Config.fullscreen ? "fullscreen" : "windowed",
-               Config.xsp ? "with pixel doubling" : "");
+               scaler->getName());
+}
+
+static void drawOnscreenControls()
+{
+       if (Config.touchscreenInput) {
+               S9xInputScreenChanged();
+               if (Config.touchscreenShow) {
+                       scaler->pause();
+                       SDL_FillRect(screen, NULL, 0);
+                       S9xInputScreenDraw(Settings.SixteenBit ? 2 : 1,
+                                                               screen->pixels, screen->pitch);
+                       SDL_Flip(screen);
+                       scaler->resume();
+               }
+       }
 }
 
 void S9xInitDisplay(int argc, const char ** argv)
@@ -197,6 +703,7 @@ void S9xInitDisplay(int argc, const char ** argv)
                DIE("SDL_InitSubSystem(VIDEO): %s", SDL_GetError());
 
        setupVideoSurface();
+       drawOnscreenControls();
 }
 
 void S9xDeinitDisplay()
@@ -210,13 +717,20 @@ void S9xVideoToggleFullscreen()
        Config.fullscreen = !Config.fullscreen;
        freeVideoSurface();
        setupVideoSurface();
+       drawOnscreenControls();
 }
 
 void S9xVideoOutputFocus(bool hasFocus)
 {
-       if (Config.xsp) {
-               setDoubling(hasFocus);
-       } 
+#if MAEMO
+       if (scaler) {
+               if (hasFocus) {
+                       scaler->resume();
+               } else {
+                       scaler->pause();
+               }
+       }
+#endif
 }
 
 // This is here for completeness, but palette mode is useless on N8x0
@@ -238,21 +752,14 @@ void S9xSetPalette ()
 
 bool8_32 S9xInitUpdate ()
 {
-       if(SDL_MUSTLOCK(screen)) 
-       {
-               if(SDL_LockSurface(screen) < 0) {
-                       DIE("Failed to lock SDL surface: %s", SDL_GetError());
-               }
-       }
+       scaler->prepare();
 
        return TRUE;
 }
 
 bool8_32 S9xDeinitUpdate (int width, int height, bool8_32 sixteenBit)
 {
-       if(SDL_MUSTLOCK(screen)) SDL_UnlockSurface(screen);
-
-       SDL_UpdateRects(screen, 1, &renderArea);
+       scaler->finish();
 
        return TRUE;
 }