src/plugins/old/sdl-windows.c

   1 // SDL interface that is compatible with Windows.slate
   2
   3 #include <SDL.h>
   4 typedef SDL_Surface Window;
   5 #include "slate-windows.h"
   6
   7 #ifdef WIN32
   8 #  define EXPORT __declspec(dllexport)
   9 #else
  10 #  define EXPORT
  11 #endif
  12
  13 SDL_Surface *surface; // Ick! SDL only supports 1 window
  14 SDL_Event event;
  15 slate_int_t eventValid = 0;
  16
  17 EXPORT void init()
  18 {
  19     SDL_Init(SDL_INIT_VIDEO);
  20     printf("enable unicode!!!!!!\n");
  21     SDL_EnableUNICODE(1);
  22 }
  23
  24 EXPORT void shutdown()
  25 {
  26     SDL_Quit();
  27 }
  28
  29 EXPORT SDL_Surface *createWindow(slate_int_t width, slate_int_t height)
  30 {
  31     return surface = SDL_SetVideoMode(width, height, 32, SDL_HWSURFACE | SDL_RESIZABLE);
  32 }
  33
  34 EXPORT slate_int_t haveEvent()
  35 {
  36     if(eventValid)
  37         return 1;
  38     else if(SDL_PollEvent(&event))
  39     {
  40         eventValid = 1;
  41         return 1;
  42     }
  43     else
  44         return 0;
  45 }
  46
  47 // Returns 1 if there is a message. Returns 0 if error
  48 EXPORT slate_int_t waitForEvent()
  49 {
  50     if(haveEvent())
  51         return 1;
  52     else if(SDL_WaitEvent(&event))
  53     {
  54         eventValid = 1;
  55         return 1;
  56     }
  57     else
  58         return 0;
  59 }
  60
  61 EXPORT void popEvent()
  62 {
  63     eventValid = 0;
  64 }
  65
  66 EXPORT slate_int_t getEventType()
  67 {
  68     switch(event.type)
  69     {
  70         case SDL_KEYDOWN:
  71             return keyDownMessageType;
  72
  73         case SDL_KEYUP:
  74             return keyUpMessageType;
  75
  76         case SDL_MOUSEMOTION:
  77             return mouseMoveMessageType;
  78
  79         case SDL_MOUSEBUTTONDOWN:
  80             switch(event.button.button)
  81             {
  82                 case SDL_BUTTON_LEFT:
  83                     return leftDownMessageType;
  84                 case SDL_BUTTON_MIDDLE:
  85                     return middleDownMessageType;
  86                 case SDL_BUTTON_RIGHT:
  87                     return rightDownMessageType;
  88                 default:
  89                     return 0;
  90             }
  91
  92         case SDL_MOUSEBUTTONUP:
  93             switch(event.button.button)
  94             {
  95                 case SDL_BUTTON_LEFT:
  96                     return leftUpMessageType;
  97                 case SDL_BUTTON_MIDDLE:
  98                     return middleUpMessageType;
  99                 case SDL_BUTTON_RIGHT:
 100                     return rightUpMessageType;
 101                 default:
 102                     return 0;
 103             }
 104
 105         case SDL_QUIT:
 106             return closeWindowMessageType;
 107
 108         case SDL_VIDEORESIZE:
 109             return positionWindowMessageType;
 110
 111         case SDL_VIDEOEXPOSE:
 112             return repaintWindowMessageType;
 113
 114         default:
 115             return 0;
 116     } // switch(event.type)
 117 }
 118
 119 EXPORT SDL_Surface *getEventWindow()
 120 {
 121     return surface; // Ick! SDL only supports 1 window
 122 }
 123
 124 EXPORT slate_int_t getEventMouseMotionX()
 125 {
 126     return event.motion.x;
 127 }
 128
 129 EXPORT slate_int_t getEventMouseMotionY()
 130 {
 131     return event.motion.y;
 132 }
 133
 134 EXPORT slate_int_t getEventMouseButtonX()
 135 {
 136     return event.button.x;
 137 }
 138
 139 EXPORT slate_int_t getEventMouseButtonY()
 140 {
 141     return event.button.y;
 142 }
 143
 144 EXPORT slate_int_t getKeyboardKey()
 145 {
 146   return event.key.keysym.unicode; /*unicode must be enabled for this to work*/
 147 }
 148
 149 EXPORT slate_int_t getKeyboardMod()
 150 {
 151     return event.key.keysym.mod;
 152 }
 153
 154
 155 EXPORT void blit(
 156     SDL_Surface *dest, slate_int_t destX, slate_int_t destY, slate_int_t destWidth, slate_int_t destHeight,
 157     void *src, slate_int_t srcX, slate_int_t srcY, slate_int_t srcWidth, slate_int_t srcHeight, slate_int_t srcStride)
 158 {
 159     SDL_Rect destRect = {destX, destY, destWidth, destHeight};
 160     SDL_Rect srcRect = {srcX, srcY, srcWidth, srcHeight};
 161     SDL_Surface *srcSurf = SDL_CreateRGBSurfaceFrom(
 162         src, srcWidth, srcHeight, 32, srcStride, 0x00FF0000, 0x0000FF00, 0x000000FF, 0xFF000000);
 163     if(!srcSurf)
 164         return;
 165
 166     SDL_SetAlpha(dest, 0, 0);
 167     SDL_SetAlpha(srcSurf, 0, 0);
 168     SDL_BlitSurface(srcSurf, &srcRect, dest, &destRect);
 169     SDL_UpdateRect(dest, destX, destY, destWidth, destHeight);
 170     SDL_FreeSurface(srcSurf);
 171 }