src/SDL12_compat.c
author Ryan C. Gordon <icculus@icculus.org>
Tue, 02 Apr 2019 14:15:06 -0400
changeset 117 9b264590d276
parent 116 911a1e7bf8b7
child 118 80c6b5470095
permissions -rw-r--r--
Fixed SDL_GetVideoInfo()

Now vfmt is binary compatible with SDL 1.2, and this is now calculated earlier
during init.
icculus@9
     1
/*
icculus@9
     2
  Simple DirectMedia Layer
icculus@46
     3
  Copyright (C) 1997-2019 Sam Lantinga <slouken@libsdl.org>
icculus@9
     4
icculus@9
     5
  This software is provided 'as-is', without any express or implied
icculus@9
     6
  warranty.  In no event will the authors be held liable for any damages
icculus@9
     7
  arising from the use of this software.
icculus@9
     8
icculus@9
     9
  Permission is granted to anyone to use this software for any purpose,
icculus@9
    10
  including commercial applications, and to alter it and redistribute it
icculus@9
    11
  freely, subject to the following restrictions:
icculus@9
    12
icculus@9
    13
  1. The origin of this software must not be misrepresented; you must not
icculus@9
    14
     claim that you wrote the original software. If you use this software
icculus@9
    15
     in a product, an acknowledgment in the product documentation would be
icculus@9
    16
     appreciated but is not required.
icculus@9
    17
  2. Altered source versions must be plainly marked as such, and must not be
icculus@9
    18
     misrepresented as being the original software.
icculus@9
    19
  3. This notice may not be removed or altered from any source distribution.
icculus@9
    20
*/
icculus@9
    21
icculus@9
    22
/* This file contains functions for backwards compatibility with SDL 1.2 */
icculus@9
    23
icculus@49
    24
// !!! FIXME: clean up code conventions
icculus@54
    25
// !!! FIXME: grep for VideoWindow20 places that might care if it's NULL
icculus@49
    26
icculus@31
    27
#include "SDL20_include_wrapper.h"
icculus@9
    28
icculus@9
    29
#if !SDL_VERSION_ATLEAST(2,0,0)
icculus@9
    30
#error You need to compile against SDL 2.0 headers.
icculus@9
    31
#endif
icculus@9
    32
icculus@33
    33
/*
icculus@33
    34
 * We report the library version as 1.2.$(SDL12_COMPAT_VERSION). This number
icculus@33
    35
 *  should be way ahead of what SDL-1.2 Classic would report, so apps can
icculus@33
    36
 *  decide if they're running under the compat layer, if they really care.
icculus@33
    37
 */
icculus@33
    38
#define SDL12_COMPAT_VERSION 50
icculus@33
    39
icculus@11
    40
#include <stdarg.h>
icculus@11
    41
icculus@49
    42
// !!! IMPLEMENT_ME SDL_CDClose
icculus@49
    43
// !!! IMPLEMENT_ME SDL_CDEject
icculus@49
    44
// !!! IMPLEMENT_ME SDL_CDName
icculus@49
    45
// !!! IMPLEMENT_ME SDL_CDNumDrives
icculus@49
    46
// !!! IMPLEMENT_ME SDL_CDOpen
icculus@49
    47
// !!! IMPLEMENT_ME SDL_CDPause
icculus@49
    48
// !!! IMPLEMENT_ME SDL_CDPlay
icculus@49
    49
// !!! IMPLEMENT_ME SDL_CDPlayTracks
icculus@49
    50
// !!! IMPLEMENT_ME SDL_CDResume
icculus@49
    51
// !!! IMPLEMENT_ME SDL_CDStatus
icculus@49
    52
// !!! IMPLEMENT_ME SDL_CDStop
icculus@49
    53
// !!! IMPLEMENT_ME SDL_CreateYUVOverlay
icculus@49
    54
icculus@49
    55
// !!! IMPLEMENT_ME SDL_DisplayFormatAlpha
icculus@49
    56
// !!! IMPLEMENT_ME SDL_DisplayYUVOverlay
icculus@49
    57
// !!! IMPLEMENT_ME SDL_EnableKeyRepeat
icculus@49
    58
// !!! IMPLEMENT_ME SDL_EnableUNICODE
icculus@49
    59
// !!! IMPLEMENT_ME SDL_FreeYUVOverlay
icculus@49
    60
icculus@49
    61
// !!! IMPLEMENT_ME SDL_GL_Lock
icculus@49
    62
// !!! IMPLEMENT_ME SDL_GL_Unlock
icculus@49
    63
// !!! IMPLEMENT_ME SDL_GL_UpdateRects
icculus@49
    64
icculus@9
    65
// !!! IMPLEMENT_ME SDL_GetKeyName
icculus@9
    66
// !!! IMPLEMENT_ME SDL_GetKeyState
icculus@9
    67
// !!! IMPLEMENT_ME SDL_GetModState
icculus@9
    68
// !!! IMPLEMENT_ME SDL_GetRelativeMouseState
icculus@49
    69
icculus@49
    70
// !!! IMPLEMENT_ME SDL_GetVideoSurface
icculus@49
    71
// !!! IMPLEMENT_ME SDL_GetWMInfo
icculus@49
    72
icculus@9
    73
// !!! IMPLEMENT_ME SDL_LockSurface
icculus@49
    74
// !!! IMPLEMENT_ME SDL_LockYUVOverlay
icculus@9
    75
// !!! IMPLEMENT_ME SDL_LowerBlit
icculus@49
    76
icculus@49
    77
// !!! IMPLEMENT_ME SDL_SetAlpha
icculus@9
    78
// !!! IMPLEMENT_ME SDL_SetColorKey
icculus@49
    79
// !!! IMPLEMENT_ME SDL_SetColors
icculus@49
    80
icculus@9
    81
// !!! IMPLEMENT_ME SDL_SetModState
icculus@49
    82
// !!! IMPLEMENT_ME SDL_SetPalette
icculus@49
    83
// !!! IMPLEMENT_ME SDL_SetVideoMode
icculus@9
    84
// !!! IMPLEMENT_ME SDL_SoftStretch
icculus@9
    85
// !!! IMPLEMENT_ME SDL_UnlockSurface
icculus@49
    86
// !!! IMPLEMENT_ME SDL_UnlockYUVOverlay
icculus@49
    87
// !!! IMPLEMENT_ME SDL_UpdateRects
icculus@9
    88
// !!! IMPLEMENT_ME SDL_UpperBlit
icculus@49
    89
icculus@49
    90
// !!! FIXME: should SDL_VideoInit really be a passthrough?
icculus@49
    91
// !!! FIXME: should SDL_VideoQuit really be a passthrough?
icculus@49
    92
icculus@49
    93
// !!! IMPLEMENT_ME SDL_WM_SetIcon
icculus@49
    94
// !!! IMPLEMENT_ME SDL_WM_ToggleFullScreen
icculus@49
    95
icculus@9
    96
// !!! IMPLEMENT_ME X11_KeyToUnicode
icculus@9
    97
icculus@64
    98
#define SDL_BlitSurface SDL_UpperBlit
icculus@64
    99
icculus@54
   100
#if 0
icculus@54
   101
#define FIXME(x) do {} while (0)
icculus@54
   102
#else
icculus@54
   103
#define FIXME(x) \
icculus@54
   104
    do { \
icculus@54
   105
        static SDL_bool seen = SDL_FALSE; \
icculus@54
   106
        if (!seen) { \
icculus@97
   107
            fprintf(stderr, "FIXME: %s (%s, %s:%d)\n", x, __FUNCTION__, __FILE__, __LINE__); \
icculus@54
   108
            seen = SDL_TRUE; \
icculus@54
   109
        } \
icculus@54
   110
    } while (0)
icculus@54
   111
#endif
icculus@54
   112
icculus@9
   113
#define SDL20_SYM(rc,fn,params,args,ret) \
icculus@35
   114
    typedef rc (SDLCALL *SDL20_##fn##_t) params; \
icculus@9
   115
    static SDL20_##fn##_t SDL20_##fn = NULL;
icculus@9
   116
#include "SDL20_syms.h"
icculus@48
   117
icculus@34
   118
/* Things that _should_ be binary compatible pass right through... */
icculus@34
   119
#define SDL20_SYM_PASSTHROUGH(rc,fn,params,args,ret) \
icculus@35
   120
    DECLSPEC rc SDLCALL SDL_##fn params { ret SDL20_##fn args; }
icculus@34
   121
#include "SDL20_syms.h"
icculus@34
   122
icculus@34
   123
icculus@34
   124
/* these are macros (etc) in the SDL headers, so make our own. */
icculus@34
   125
#define SDL20_OutOfMemory() SDL20_Error(SDL_ENOMEM)
icculus@34
   126
#define SDL20_Unsupported() SDL20_Error(SDL_UNSUPPORTED)
icculus@34
   127
#define SDL20_InvalidParamError(param) SDL20_SetError("Parameter '%s' is invalid", (param))
icculus@34
   128
#define SDL20_zero(x) SDL20_memset(&(x), 0, sizeof((x)))
icculus@34
   129
#define SDL20_zerop(x) SDL20_memset((x), 0, sizeof(*(x)))
icculus@34
   130
#define SDL_ReportAssertion SDL20_ReportAssertion
icculus@34
   131
icculus@34
   132
#define SDL12_DEFAULT_REPEAT_DELAY 500
icculus@34
   133
#define SDL12_DEFAULT_REPEAT_INTERVAL 30
icculus@9
   134
icculus@9
   135
#define SDL12_INIT_TIMER       0x00000001
icculus@9
   136
#define SDL12_INIT_AUDIO       0x00000010
icculus@9
   137
#define SDL12_INIT_VIDEO       0x00000020
icculus@9
   138
#define SDL12_INIT_CDROM       0x00000100
icculus@9
   139
#define SDL12_INIT_JOYSTICK    0x00000200
icculus@9
   140
#define SDL12_INIT_NOPARACHUTE 0x00100000
icculus@9
   141
#define SDL12_INIT_EVENTTHREAD 0x01000000
icculus@9
   142
#define SDL12_INIT_EVERYTHING  0x0000FFFF
icculus@9
   143
icculus@100
   144
#define SDL12_LOGPAL 1
icculus@100
   145
#define SDL12_PHYSPAL 2
icculus@100
   146
icculus@104
   147
// this will be in SDL 2.0.10, but here it is in case your headers are missing it.
icculus@104
   148
#ifndef SDL_SIMD_ALIGNED
icculus@104
   149
#define SDL_SIMD_ALIGNED    0x00000008
icculus@104
   150
#endif
icculus@104
   151
icculus@73
   152
typedef struct SDL12_Rect
icculus@73
   153
{
icculus@73
   154
    Sint16 x;
icculus@73
   155
    Sint16 y;
icculus@73
   156
    Uint16 w;
icculus@73
   157
    Uint16 h;
icculus@73
   158
} SDL12_Rect;
icculus@73
   159
icculus@15
   160
typedef struct SDL12_Palette
icculus@15
   161
{
icculus@15
   162
    int       ncolors;
icculus@15
   163
    SDL_Color *colors;
icculus@15
   164
} SDL12_Palette;
icculus@15
   165
icculus@15
   166
typedef struct SDL12_PixelFormat
icculus@15
   167
{
icculus@15
   168
    SDL12_Palette *palette;
icculus@15
   169
    Uint8 BitsPerPixel;
icculus@15
   170
    Uint8 BytesPerPixel;
icculus@15
   171
    Uint8 Rloss;
icculus@15
   172
    Uint8 Gloss;
icculus@15
   173
    Uint8 Bloss;
icculus@15
   174
    Uint8 Aloss;
icculus@15
   175
    Uint8 Rshift;
icculus@15
   176
    Uint8 Gshift;
icculus@15
   177
    Uint8 Bshift;
icculus@15
   178
    Uint8 Ashift;
icculus@15
   179
    Uint32 Rmask;
icculus@15
   180
    Uint32 Gmask;
icculus@15
   181
    Uint32 Bmask;
icculus@15
   182
    Uint32 Amask;
icculus@15
   183
    Uint32 colorkey;
icculus@15
   184
    Uint8 alpha;
icculus@15
   185
} SDL12_PixelFormat;
icculus@15
   186
icculus@18
   187
typedef struct SDL12_Surface
icculus@18
   188
{
icculus@18
   189
    Uint32 flags;
icculus@18
   190
    SDL12_PixelFormat *format;
icculus@18
   191
    int w;
icculus@18
   192
    int h;
icculus@18
   193
    Uint16 pitch;
icculus@18
   194
    void *pixels;
icculus@18
   195
    int offset;
icculus@34
   196
    SDL_Surface *surface20; /* the real SDL 1.2 has an opaque pointer to a platform-specific thing here named "hwdata". */
icculus@73
   197
    SDL12_Rect clip_rect;
icculus@18
   198
    Uint32 unused1;
icculus@18
   199
    Uint32 locked;
icculus@18
   200
    void *blitmap;
icculus@18
   201
    unsigned int format_version;
icculus@18
   202
    int refcount;
icculus@18
   203
} SDL12_Surface;
icculus@18
   204
icculus@57
   205
typedef struct SDL12_Overlay
icculus@57
   206
{
icculus@57
   207
    Uint32 format;
icculus@57
   208
    int w;
icculus@57
   209
    int h;
icculus@57
   210
    int planes;
icculus@57
   211
    Uint16 *pitches;
icculus@57
   212
    Uint8 **pixels;
icculus@57
   213
    void *hwfuncs;
icculus@57
   214
    void *hwdata;
icculus@57
   215
    Uint32 hw_overlay :1;
icculus@57
   216
    Uint32 UnusedBits :31;
icculus@57
   217
} SDL12_Overlay;
icculus@57
   218
icculus@9
   219
typedef struct
icculus@9
   220
{
icculus@15
   221
    Uint32 hw_available :1;
icculus@15
   222
    Uint32 wm_available :1;
icculus@15
   223
    Uint32 UnusedBits1  :6;
icculus@15
   224
    Uint32 UnusedBits2  :1;
icculus@15
   225
    Uint32 blit_hw      :1;
icculus@15
   226
    Uint32 blit_hw_CC   :1;
icculus@15
   227
    Uint32 blit_hw_A    :1;
icculus@15
   228
    Uint32 blit_sw      :1;
icculus@15
   229
    Uint32 blit_sw_CC   :1;
icculus@15
   230
    Uint32 blit_sw_A    :1;
icculus@15
   231
    Uint32 blit_fill    :1;
icculus@15
   232
    Uint32 UnusedBits3  :16;
icculus@15
   233
    Uint32 video_mem;
icculus@117
   234
    SDL12_PixelFormat *vfmt;
icculus@15
   235
    int current_w;
icculus@15
   236
    int current_h;
icculus@9
   237
} SDL12_VideoInfo;
icculus@9
   238
icculus@9
   239
icculus@15
   240
#define SDL12_HWSURFACE 0x00000001
icculus@15
   241
#define SDL12_ASYNCBLIT 0x00000004
icculus@15
   242
#define SDL12_ANYFORMAT 0x10000000
icculus@15
   243
#define SDL12_HWPALETTE 0x20000000
icculus@15
   244
#define SDL12_DOUBLEBUF 0x40000000
icculus@15
   245
#define SDL12_FULLSCREEN 0x80000000
icculus@15
   246
#define SDL12_OPENGL 0x00000002
icculus@15
   247
#define SDL12_OPENGLBLIT 0x0000000A
icculus@15
   248
#define SDL12_RESIZABLE 0x00000010
icculus@15
   249
#define SDL12_NOFRAME 0x00000020
icculus@15
   250
#define SDL12_HWACCEL 0x00000100
icculus@15
   251
#define SDL12_SRCCOLORKEY 0x00001000
icculus@15
   252
#define SDL12_RLEACCELOK 0x00002000
icculus@15
   253
#define SDL12_RLEACCEL 0x00004000
icculus@15
   254
#define SDL12_SRCALPHA 0x00010000
icculus@15
   255
#define SDL12_PREALLOC 0x01000000
icculus@9
   256
icculus@18
   257
typedef enum
icculus@18
   258
{
icculus@77
   259
    SDLK12_UNKNOWN = 0,
icculus@77
   260
    SDLK12_FIRST = 0,
icculus@77
   261
    SDLK12_BACKSPACE = 8,
icculus@77
   262
    SDLK12_TAB = 9,
icculus@77
   263
    SDLK12_CLEAR = 12,
icculus@77
   264
    SDLK12_RETURN = 13,
icculus@77
   265
    SDLK12_PAUSE = 19,
icculus@77
   266
    SDLK12_ESCAPE = 27,
icculus@77
   267
    SDLK12_SPACE = 32,
icculus@77
   268
    SDLK12_EXCLAIM = 33,
icculus@77
   269
    SDLK12_QUOTEDBL = 34,
icculus@77
   270
    SDLK12_HASH = 35,
icculus@77
   271
    SDLK12_DOLLAR = 36,
icculus@77
   272
    SDLK12_AMPERSAND = 38,
icculus@77
   273
    SDLK12_QUOTE = 39,
icculus@77
   274
    SDLK12_LEFTPAREN = 40,
icculus@77
   275
    SDLK12_RIGHTPAREN = 41,
icculus@77
   276
    SDLK12_ASTERISK = 42,
icculus@77
   277
    SDLK12_PLUS = 43,
icculus@77
   278
    SDLK12_COMMA = 44,
icculus@77
   279
    SDLK12_MINUS = 45,
icculus@77
   280
    SDLK12_PERIOD = 46,
icculus@77
   281
    SDLK12_SLASH = 47,
icculus@77
   282
    SDLK12_0 = 48,
icculus@77
   283
    SDLK12_1 = 49,
icculus@77
   284
    SDLK12_2 = 50,
icculus@77
   285
    SDLK12_3 = 51,
icculus@77
   286
    SDLK12_4 = 52,
icculus@77
   287
    SDLK12_5 = 53,
icculus@77
   288
    SDLK12_6 = 54,
icculus@77
   289
    SDLK12_7 = 55,
icculus@77
   290
    SDLK12_8 = 56,
icculus@77
   291
    SDLK12_9 = 57,
icculus@77
   292
    SDLK12_COLON = 58,
icculus@77
   293
    SDLK12_SEMICOLON = 59,
icculus@77
   294
    SDLK12_LESS = 60,
icculus@77
   295
    SDLK12_EQUALS = 61,
icculus@77
   296
    SDLK12_GREATER = 62,
icculus@77
   297
    SDLK12_QUESTION = 63,
icculus@77
   298
    SDLK12_AT = 64,
icculus@77
   299
    SDLK12_LEFTBRACKET = 91,
icculus@77
   300
    SDLK12_BACKSLASH = 92,
icculus@77
   301
    SDLK12_RIGHTBRACKET = 93,
icculus@77
   302
    SDLK12_CARET = 94,
icculus@77
   303
    SDLK12_UNDERSCORE = 95,
icculus@77
   304
    SDLK12_BACKQUOTE = 96,
icculus@77
   305
    SDLK12_a = 97,
icculus@77
   306
    SDLK12_b = 98,
icculus@77
   307
    SDLK12_c = 99,
icculus@77
   308
    SDLK12_d = 100,
icculus@77
   309
    SDLK12_e = 101,
icculus@77
   310
    SDLK12_f = 102,
icculus@77
   311
    SDLK12_g = 103,
icculus@77
   312
    SDLK12_h = 104,
icculus@77
   313
    SDLK12_i = 105,
icculus@77
   314
    SDLK12_j = 106,
icculus@77
   315
    SDLK12_k = 107,
icculus@77
   316
    SDLK12_l = 108,
icculus@77
   317
    SDLK12_m = 109,
icculus@77
   318
    SDLK12_n = 110,
icculus@77
   319
    SDLK12_o = 111,
icculus@77
   320
    SDLK12_p = 112,
icculus@77
   321
    SDLK12_q = 113,
icculus@77
   322
    SDLK12_r = 114,
icculus@77
   323
    SDLK12_s = 115,
icculus@77
   324
    SDLK12_t = 116,
icculus@77
   325
    SDLK12_u = 117,
icculus@77
   326
    SDLK12_v = 118,
icculus@77
   327
    SDLK12_w = 119,
icculus@77
   328
    SDLK12_x = 120,
icculus@77
   329
    SDLK12_y = 121,
icculus@77
   330
    SDLK12_z = 122,
icculus@77
   331
    SDLK12_DELETE = 127,
icculus@77
   332
    SDLK12_WORLD_0 = 160,
icculus@77
   333
    SDLK12_WORLD_1 = 161,
icculus@77
   334
    SDLK12_WORLD_2 = 162,
icculus@77
   335
    SDLK12_WORLD_3 = 163,
icculus@77
   336
    SDLK12_WORLD_4 = 164,
icculus@77
   337
    SDLK12_WORLD_5 = 165,
icculus@77
   338
    SDLK12_WORLD_6 = 166,
icculus@77
   339
    SDLK12_WORLD_7 = 167,
icculus@77
   340
    SDLK12_WORLD_8 = 168,
icculus@77
   341
    SDLK12_WORLD_9 = 169,
icculus@77
   342
    SDLK12_WORLD_10 = 170,
icculus@77
   343
    SDLK12_WORLD_11 = 171,
icculus@77
   344
    SDLK12_WORLD_12 = 172,
icculus@77
   345
    SDLK12_WORLD_13 = 173,
icculus@77
   346
    SDLK12_WORLD_14 = 174,
icculus@77
   347
    SDLK12_WORLD_15 = 175,
icculus@77
   348
    SDLK12_WORLD_16 = 176,
icculus@77
   349
    SDLK12_WORLD_17 = 177,
icculus@77
   350
    SDLK12_WORLD_18 = 178,
icculus@77
   351
    SDLK12_WORLD_19 = 179,
icculus@77
   352
    SDLK12_WORLD_20 = 180,
icculus@77
   353
    SDLK12_WORLD_21 = 181,
icculus@77
   354
    SDLK12_WORLD_22 = 182,
icculus@77
   355
    SDLK12_WORLD_23 = 183,
icculus@77
   356
    SDLK12_WORLD_24 = 184,
icculus@77
   357
    SDLK12_WORLD_25 = 185,
icculus@77
   358
    SDLK12_WORLD_26 = 186,
icculus@77
   359
    SDLK12_WORLD_27 = 187,
icculus@77
   360
    SDLK12_WORLD_28 = 188,
icculus@77
   361
    SDLK12_WORLD_29 = 189,
icculus@77
   362
    SDLK12_WORLD_30 = 190,
icculus@77
   363
    SDLK12_WORLD_31 = 191,
icculus@77
   364
    SDLK12_WORLD_32 = 192,
icculus@77
   365
    SDLK12_WORLD_33 = 193,
icculus@77
   366
    SDLK12_WORLD_34 = 194,
icculus@77
   367
    SDLK12_WORLD_35 = 195,
icculus@77
   368
    SDLK12_WORLD_36 = 196,
icculus@77
   369
    SDLK12_WORLD_37 = 197,
icculus@77
   370
    SDLK12_WORLD_38 = 198,
icculus@77
   371
    SDLK12_WORLD_39 = 199,
icculus@77
   372
    SDLK12_WORLD_40 = 200,
icculus@77
   373
    SDLK12_WORLD_41 = 201,
icculus@77
   374
    SDLK12_WORLD_42 = 202,
icculus@77
   375
    SDLK12_WORLD_43 = 203,
icculus@77
   376
    SDLK12_WORLD_44 = 204,
icculus@77
   377
    SDLK12_WORLD_45 = 205,
icculus@77
   378
    SDLK12_WORLD_46 = 206,
icculus@77
   379
    SDLK12_WORLD_47 = 207,
icculus@77
   380
    SDLK12_WORLD_48 = 208,
icculus@77
   381
    SDLK12_WORLD_49 = 209,
icculus@77
   382
    SDLK12_WORLD_50 = 210,
icculus@77
   383
    SDLK12_WORLD_51 = 211,
icculus@77
   384
    SDLK12_WORLD_52 = 212,
icculus@77
   385
    SDLK12_WORLD_53 = 213,
icculus@77
   386
    SDLK12_WORLD_54 = 214,
icculus@77
   387
    SDLK12_WORLD_55 = 215,
icculus@77
   388
    SDLK12_WORLD_56 = 216,
icculus@77
   389
    SDLK12_WORLD_57 = 217,
icculus@77
   390
    SDLK12_WORLD_58 = 218,
icculus@77
   391
    SDLK12_WORLD_59 = 219,
icculus@77
   392
    SDLK12_WORLD_60 = 220,
icculus@77
   393
    SDLK12_WORLD_61 = 221,
icculus@77
   394
    SDLK12_WORLD_62 = 222,
icculus@77
   395
    SDLK12_WORLD_63 = 223,
icculus@77
   396
    SDLK12_WORLD_64 = 224,
icculus@77
   397
    SDLK12_WORLD_65 = 225,
icculus@77
   398
    SDLK12_WORLD_66 = 226,
icculus@77
   399
    SDLK12_WORLD_67 = 227,
icculus@77
   400
    SDLK12_WORLD_68 = 228,
icculus@77
   401
    SDLK12_WORLD_69 = 229,
icculus@77
   402
    SDLK12_WORLD_70 = 230,
icculus@77
   403
    SDLK12_WORLD_71 = 231,
icculus@77
   404
    SDLK12_WORLD_72 = 232,
icculus@77
   405
    SDLK12_WORLD_73 = 233,
icculus@77
   406
    SDLK12_WORLD_74 = 234,
icculus@77
   407
    SDLK12_WORLD_75 = 235,
icculus@77
   408
    SDLK12_WORLD_76 = 236,
icculus@77
   409
    SDLK12_WORLD_77 = 237,
icculus@77
   410
    SDLK12_WORLD_78 = 238,
icculus@77
   411
    SDLK12_WORLD_79 = 239,
icculus@77
   412
    SDLK12_WORLD_80 = 240,
icculus@77
   413
    SDLK12_WORLD_81 = 241,
icculus@77
   414
    SDLK12_WORLD_82 = 242,
icculus@77
   415
    SDLK12_WORLD_83 = 243,
icculus@77
   416
    SDLK12_WORLD_84 = 244,
icculus@77
   417
    SDLK12_WORLD_85 = 245,
icculus@77
   418
    SDLK12_WORLD_86 = 246,
icculus@77
   419
    SDLK12_WORLD_87 = 247,
icculus@77
   420
    SDLK12_WORLD_88 = 248,
icculus@77
   421
    SDLK12_WORLD_89 = 249,
icculus@77
   422
    SDLK12_WORLD_90 = 250,
icculus@77
   423
    SDLK12_WORLD_91 = 251,
icculus@77
   424
    SDLK12_WORLD_92 = 252,
icculus@77
   425
    SDLK12_WORLD_93 = 253,
icculus@77
   426
    SDLK12_WORLD_94 = 254,
icculus@77
   427
    SDLK12_WORLD_95 = 255,
icculus@77
   428
    SDLK12_KP0 = 256,
icculus@77
   429
    SDLK12_KP1 = 257,
icculus@77
   430
    SDLK12_KP2 = 258,
icculus@77
   431
    SDLK12_KP3 = 259,
icculus@77
   432
    SDLK12_KP4 = 260,
icculus@77
   433
    SDLK12_KP5 = 261,
icculus@77
   434
    SDLK12_KP6 = 262,
icculus@77
   435
    SDLK12_KP7 = 263,
icculus@77
   436
    SDLK12_KP8 = 264,
icculus@77
   437
    SDLK12_KP9 = 265,
icculus@77
   438
    SDLK12_KP_PERIOD = 266,
icculus@77
   439
    SDLK12_KP_DIVIDE = 267,
icculus@77
   440
    SDLK12_KP_MULTIPLY = 268,
icculus@77
   441
    SDLK12_KP_MINUS = 269,
icculus@77
   442
    SDLK12_KP_PLUS = 270,
icculus@77
   443
    SDLK12_KP_ENTER = 271,
icculus@77
   444
    SDLK12_KP_EQUALS = 272,
icculus@77
   445
    SDLK12_UP = 273,
icculus@77
   446
    SDLK12_DOWN = 274,
icculus@77
   447
    SDLK12_RIGHT = 275,
icculus@77
   448
    SDLK12_LEFT = 276,
icculus@77
   449
    SDLK12_INSERT = 277,
icculus@77
   450
    SDLK12_HOME = 278,
icculus@77
   451
    SDLK12_END = 279,
icculus@77
   452
    SDLK12_PAGEUP = 280,
icculus@77
   453
    SDLK12_PAGEDOWN = 281,
icculus@77
   454
    SDLK12_F1 = 282,
icculus@77
   455
    SDLK12_F2 = 283,
icculus@77
   456
    SDLK12_F3 = 284,
icculus@77
   457
    SDLK12_F4 = 285,
icculus@77
   458
    SDLK12_F5 = 286,
icculus@77
   459
    SDLK12_F6 = 287,
icculus@77
   460
    SDLK12_F7 = 288,
icculus@77
   461
    SDLK12_F8 = 289,
icculus@77
   462
    SDLK12_F9 = 290,
icculus@77
   463
    SDLK12_F10 = 291,
icculus@77
   464
    SDLK12_F11 = 292,
icculus@77
   465
    SDLK12_F12 = 293,
icculus@77
   466
    SDLK12_F13 = 294,
icculus@77
   467
    SDLK12_F14 = 295,
icculus@77
   468
    SDLK12_F15 = 296,
icculus@77
   469
    SDLK12_NUMLOCK = 300,
icculus@77
   470
    SDLK12_CAPSLOCK = 301,
icculus@77
   471
    SDLK12_SCROLLOCK = 302,
icculus@77
   472
    SDLK12_RSHIFT = 303,
icculus@77
   473
    SDLK12_LSHIFT = 304,
icculus@77
   474
    SDLK12_RCTRL = 305,
icculus@77
   475
    SDLK12_LCTRL = 306,
icculus@77
   476
    SDLK12_RALT = 307,
icculus@77
   477
    SDLK12_LALT = 308,
icculus@77
   478
    SDLK12_RMETA = 309,
icculus@77
   479
    SDLK12_LMETA = 310,
icculus@77
   480
    SDLK12_LSUPER = 311,
icculus@77
   481
    SDLK12_RSUPER = 312,
icculus@77
   482
    SDLK12_MODE = 313,
icculus@77
   483
    SDLK12_COMPOSE = 314,
icculus@77
   484
    SDLK12_HELP = 315,
icculus@77
   485
    SDLK12_PRINT = 316,
icculus@77
   486
    SDLK12_SYSREQ = 317,
icculus@77
   487
    SDLK12_BREAK = 318,
icculus@77
   488
    SDLK12_MENU = 319,
icculus@77
   489
    SDLK12_POWER = 320,
icculus@77
   490
    SDLK12_EURO = 321,
icculus@77
   491
    SDLK12_UNDO = 322,
icculus@77
   492
    SDLK12_LAST
icculus@77
   493
} SDL12Key;
icculus@77
   494
icculus@77
   495
typedef enum
icculus@77
   496
{
icculus@77
   497
    KMOD12_NONE  = 0x0000,
icculus@77
   498
    KMOD12_LSHIFT = 0x0001,
icculus@77
   499
    KMOD12_RSHIFT = 0x0002,
icculus@77
   500
    KMOD12_LCTRL = 0x0040,
icculus@77
   501
    KMOD12_RCTRL = 0x0080,
icculus@77
   502
    KMOD12_LALT = 0x0100,
icculus@77
   503
    KMOD12_RALT = 0x0200,
icculus@77
   504
    KMOD12_LMETA = 0x0400,
icculus@77
   505
    KMOD12_RMETA = 0x0800,
icculus@77
   506
    KMOD12_NUM = 0x1000,
icculus@77
   507
    KMOD12_CAPS = 0x2000,
icculus@77
   508
    KMOD12_MODE = 0x4000,
icculus@77
   509
    KMOD12_RESERVED = 0x8000
icculus@77
   510
} SDL12Mod;
icculus@77
   511
icculus@77
   512
typedef struct SDL12_keysym
icculus@77
   513
{
icculus@77
   514
    Uint8 scancode;
icculus@77
   515
    SDL12Key sym;
icculus@77
   516
    SDL12Mod mod;
icculus@77
   517
    Uint16 unicode;
icculus@77
   518
} SDL12_keysym;
icculus@77
   519
icculus@77
   520
typedef enum
icculus@77
   521
{
icculus@18
   522
    SDL12_NOEVENT = 0,
icculus@18
   523
    SDL12_ACTIVEEVENT,
icculus@18
   524
    SDL12_KEYDOWN,
icculus@18
   525
    SDL12_KEYUP,
icculus@18
   526
    SDL12_MOUSEMOTION,
icculus@18
   527
    SDL12_MOUSEBUTTONDOWN,
icculus@18
   528
    SDL12_MOUSEBUTTONUP,
icculus@18
   529
    SDL12_JOYAXISMOTION,
icculus@18
   530
    SDL12_JOYBALLMOTION,
icculus@18
   531
    SDL12_JOYHATMOTION,
icculus@18
   532
    SDL12_JOYBUTTONDOWN,
icculus@18
   533
    SDL12_JOYBUTTONUP,
icculus@18
   534
    SDL12_QUIT,
icculus@18
   535
    SDL12_SYSWMEVENT,
icculus@18
   536
    SDL12_EVENT_RESERVEDA,
icculus@18
   537
    SDL12_EVENT_RESERVEDB,
icculus@18
   538
    SDL12_VIDEORESIZE,
icculus@18
   539
    SDL12_VIDEOEXPOSE,
icculus@18
   540
    SDL12_USEREVENT = 24,
icculus@18
   541
    SDL12_NUMEVENTS = 32
icculus@18
   542
} SDL12_EventType;
icculus@18
   543
icculus@31
   544
icculus@31
   545
#define SDL12_APPMOUSEFOCUS (1<<0)
icculus@31
   546
#define SDL12_APPINPUTFOCUS (1<<1)
icculus@31
   547
#define SDL12_APPACTIVE     (1<<2)
icculus@31
   548
icculus@18
   549
typedef struct
icculus@18
   550
{
icculus@18
   551
    Uint8 type;
icculus@18
   552
    Uint8 gain;
icculus@18
   553
    Uint8 state;
icculus@18
   554
} SDL12_ActiveEvent;
icculus@18
   555
icculus@18
   556
typedef struct
icculus@18
   557
{
icculus@18
   558
    Uint8 type;
icculus@18
   559
    Uint8 which;
icculus@18
   560
    Uint8 state;
icculus@77
   561
    SDL12_keysym keysym;
icculus@18
   562
} SDL12_KeyboardEvent;
icculus@18
   563
icculus@18
   564
typedef struct
icculus@18
   565
{
icculus@18
   566
    Uint8 type;
icculus@18
   567
    Uint8 which;
icculus@18
   568
    Uint8 state;
icculus@18
   569
    Uint16 x, y;
icculus@18
   570
    Sint16 xrel;
icculus@18
   571
    Sint16 yrel;
icculus@18
   572
} SDL12_MouseMotionEvent;
icculus@18
   573
icculus@18
   574
typedef struct
icculus@18
   575
{
icculus@18
   576
    Uint8 type;
icculus@18
   577
    Uint8 which;
icculus@18
   578
    Uint8 button;
icculus@18
   579
    Uint8 state;
icculus@18
   580
    Uint16 x, y;
icculus@18
   581
} SDL12_MouseButtonEvent;
icculus@18
   582
icculus@18
   583
typedef struct
icculus@18
   584
{
icculus@18
   585
    Uint8 type;
icculus@18
   586
    Uint8 which;
icculus@18
   587
    Uint8 axis;
icculus@18
   588
    Sint16 value;
icculus@18
   589
} SDL12_JoyAxisEvent;
icculus@18
   590
icculus@18
   591
typedef struct
icculus@18
   592
{
icculus@18
   593
    Uint8 type;
icculus@18
   594
    Uint8 which;
icculus@18
   595
    Uint8 ball;
icculus@18
   596
    Sint16 xrel;
icculus@18
   597
    Sint16 yrel;
icculus@18
   598
} SDL12_JoyBallEvent;
icculus@18
   599
icculus@18
   600
typedef struct
icculus@18
   601
{
icculus@18
   602
    Uint8 type;
icculus@18
   603
    Uint8 which;
icculus@18
   604
    Uint8 hat;
icculus@18
   605
    Uint8 value;
icculus@18
   606
} SDL12_JoyHatEvent;
icculus@18
   607
icculus@18
   608
typedef struct
icculus@18
   609
{
icculus@18
   610
    Uint8 type;
icculus@18
   611
    Uint8 which;
icculus@18
   612
    Uint8 button;
icculus@18
   613
    Uint8 state;
icculus@18
   614
} SDL12_JoyButtonEvent;
icculus@18
   615
icculus@18
   616
typedef struct
icculus@18
   617
{
icculus@18
   618
    Uint8 type;
icculus@18
   619
    int w;
icculus@18
   620
    int h;
icculus@18
   621
} SDL12_ResizeEvent;
icculus@18
   622
icculus@18
   623
typedef struct
icculus@18
   624
{
icculus@18
   625
    Uint8 type;
icculus@18
   626
} SDL12_ExposeEvent;
icculus@18
   627
icculus@18
   628
typedef struct
icculus@18
   629
{
icculus@18
   630
    Uint8 type;
icculus@18
   631
} SDL12_QuitEvent;
icculus@18
   632
icculus@18
   633
typedef struct
icculus@18
   634
{
icculus@18
   635
    Uint8 type;
icculus@18
   636
    int code;
icculus@18
   637
    void *data1;
icculus@18
   638
    void *data2;
icculus@18
   639
} SDL12_UserEvent;
icculus@18
   640
icculus@18
   641
typedef struct
icculus@18
   642
{
icculus@18
   643
    Uint8 type;
icculus@18
   644
    void *msg;
icculus@18
   645
} SDL12_SysWMEvent;
icculus@18
   646
icculus@18
   647
typedef union
icculus@18
   648
{
icculus@18
   649
    Uint8 type;
icculus@18
   650
    SDL12_ActiveEvent active;
icculus@18
   651
    SDL12_KeyboardEvent key;
icculus@18
   652
    SDL12_MouseMotionEvent motion;
icculus@18
   653
    SDL12_MouseButtonEvent button;
icculus@18
   654
    SDL12_JoyAxisEvent jaxis;
icculus@18
   655
    SDL12_JoyBallEvent jball;
icculus@18
   656
    SDL12_JoyHatEvent jhat;
icculus@18
   657
    SDL12_JoyButtonEvent jbutton;
icculus@18
   658
    SDL12_ResizeEvent resize;
icculus@18
   659
    SDL12_ExposeEvent expose;
icculus@18
   660
    SDL12_QuitEvent quit;
icculus@18
   661
    SDL12_UserEvent user;
icculus@18
   662
    SDL12_SysWMEvent syswm;
icculus@18
   663
} SDL12_Event;
icculus@9
   664
icculus@31
   665
typedef int (SDLCALL *SDL12_EventFilter)(const SDL12_Event *event12);
icculus@31
   666
static int EventFilter20to12(void *data, SDL_Event *event20);
icculus@31
   667
icculus@31
   668
typedef Uint32 (SDLCALL *SDL12_TimerCallback)(Uint32 interval);
icculus@31
   669
typedef SDL_TimerCallback SDL12_NewTimerCallback;
icculus@31
   670
icculus@23
   671
typedef struct
icculus@31
   672
{
icculus@73
   673
    SDL12_Rect area;
icculus@23
   674
    Sint16 hot_x;
icculus@23
   675
    Sint16 hot_y;
icculus@23
   676
    Uint8 *data;
icculus@23
   677
    Uint8 *mask;
icculus@23
   678
    Uint8 *save[2];
icculus@23
   679
    SDL_Cursor *wm_cursor;  /* the real SDL 1.2 has an opaque pointer to a platform-specific cursor here. */
icculus@23
   680
} SDL12_Cursor;
icculus@23
   681
icculus@30
   682
typedef enum
icculus@30
   683
{
icculus@30
   684
    SDL12_GL_RED_SIZE,
icculus@30
   685
    SDL12_GL_GREEN_SIZE,
icculus@30
   686
    SDL12_GL_BLUE_SIZE,
icculus@30
   687
    SDL12_GL_ALPHA_SIZE,
icculus@30
   688
    SDL12_GL_BUFFER_SIZE,
icculus@30
   689
    SDL12_GL_DOUBLEBUFFER,
icculus@30
   690
    SDL12_GL_DEPTH_SIZE,
icculus@30
   691
    SDL12_GL_STENCIL_SIZE,
icculus@30
   692
    SDL12_GL_ACCUM_RED_SIZE,
icculus@30
   693
    SDL12_GL_ACCUM_GREEN_SIZE,
icculus@30
   694
    SDL12_GL_ACCUM_BLUE_SIZE,
icculus@30
   695
    SDL12_GL_ACCUM_ALPHA_SIZE,
icculus@30
   696
    SDL12_GL_STEREO,
icculus@30
   697
    SDL12_GL_MULTISAMPLEBUFFERS,
icculus@30
   698
    SDL12_GL_MULTISAMPLESAMPLES,
icculus@30
   699
    SDL12_GL_ACCELERATED_VISUAL,
icculus@30
   700
    SDL12_GL_SWAP_CONTROL,
icculus@30
   701
    SDL12_GL_MAX_ATTRIBUTE
icculus@30
   702
} SDL12_GLattr;
icculus@23
   703
icculus@39
   704
icculus@39
   705
typedef struct
icculus@39
   706
{
icculus@39
   707
    Uint32 format;
icculus@73
   708
    SDL12_Rect *modeslist12;
icculus@73
   709
    SDL12_Rect **modes12;  /* ptrs to each item in modeslist, for SDL_ListModes() */
icculus@39
   710
} VideoModeList;
icculus@39
   711
icculus@82
   712
typedef struct
icculus@82
   713
{
icculus@82
   714
    int device_index;
icculus@82
   715
    SDL_Joystick *joystick;
icculus@82
   716
} JoystickOpenedItem;
icculus@82
   717
icculus@54
   718
// !!! FIXME: go through all of these.
icculus@39
   719
static VideoModeList *VideoModes = NULL;
icculus@39
   720
static int VideoModesCount = 0;
icculus@56
   721
static SDL12_VideoInfo VideoInfo12;
icculus@117
   722
static SDL12_Palette VideoInfoPalette12;
icculus@117
   723
static SDL12_PixelFormat VideoInfoVfmt12;
icculus@117
   724
static SDL_PixelFormat *VideoInfoVfmt20 = NULL;
icculus@106
   725
static SDL_bool VideoWindowGrabbed = SDL_FALSE;
icculus@106
   726
static SDL_bool VideoCursorHidden = SDL_FALSE;
icculus@19
   727
static SDL_Window *VideoWindow20 = NULL;
icculus@56
   728
static SDL_Renderer *VideoRenderer20 = NULL;
icculus@56
   729
static SDL_Texture *VideoTexture20 = NULL;
icculus@56
   730
static SDL12_Surface *VideoSurface12 = NULL;
icculus@103
   731
static Uint32 VideoSurfacePresentTicks = 0;
icculus@103
   732
static Uint32 VideoSurfaceLastPresentTicks = 0;
icculus@56
   733
static SDL_Surface *VideoConvertSurface20 = NULL;
icculus@56
   734
static SDL_GLContext *VideoGLContext20 = NULL;
icculus@16
   735
static char *WindowTitle = NULL;
icculus@16
   736
static char *WindowIconTitle = NULL;
icculus@105
   737
static SDL_Surface *VideoIcon20 = NULL;
icculus@16
   738
static int EnabledUnicode = 0;
icculus@16
   739
static int VideoDisplayIndex = 0;
icculus@16
   740
static int CDRomInit = 0;
icculus@18
   741
static SDL12_EventFilter EventFilter12 = NULL;
icculus@56
   742
static SDL12_Cursor *CurrentCursor12 = NULL;
icculus@27
   743
static Uint8 EventStates[SDL12_NUMEVENTS];
icculus@30
   744
static int SwapInterval = 0;
icculus@82
   745
static JoystickOpenedItem JoystickOpenList[16];
icculus@111
   746
static Uint8 KeyState[SDLK12_LAST];
icculus@18
   747
icculus@18
   748
// !!! FIXME: need a mutex for the event queue.
icculus@18
   749
#define SDL12_MAXEVENTS 128
icculus@20
   750
typedef struct EventQueueType
icculus@20
   751
{
icculus@20
   752
    SDL12_Event event12;
icculus@20
   753
    struct EventQueueType *next;
icculus@20
   754
} EventQueueType;
icculus@20
   755
icculus@20
   756
static EventQueueType EventQueuePool[SDL12_MAXEVENTS];
icculus@20
   757
static EventQueueType *EventQueueHead = NULL;
icculus@20
   758
static EventQueueType *EventQueueTail = NULL;
icculus@20
   759
static EventQueueType *EventQueueAvailable = NULL;
icculus@9
   760
icculus@33
   761
icculus@9
   762
/* Obviously we can't use SDL_LoadObject() to load SDL2.  :)  */
icculus@9
   763
#if defined(_WINDOWS)
icculus@19
   764
    #define WIN32_LEAN_AND_MEAN 1
icculus@19
   765
    #include <windows.h>
icculus@9
   766
    #define SDL20_LIBNAME "SDL2.dll"
icculus@9
   767
    static HANDLE Loaded_SDL20 = NULL;
icculus@9
   768
    #define LoadSDL20Library() ((Loaded_SDL20 = LoadLibraryA(SDL20_LIBNAME)) != NULL)
icculus@9
   769
    #define LookupSDL20Sym(sym) GetProcAddress(Loaded_SDL20, sym)
icculus@9
   770
    #define CloseSDL20Library() { { if (Loaded_SDL20) { FreeLibrary(Loaded_SDL20); Loaded_SDL20 = NULL; } }
icculus@19
   771
#elif defined(unix) || defined(__APPLE__)
icculus@19
   772
    #include <dlfcn.h>
icculus@9
   773
    #ifdef __APPLE__
icculus@112
   774
    #define SDL20_LIBNAME "libSDL2-2.0.0.dylib"
icculus@9
   775
    #else
icculus@9
   776
    #define SDL20_LIBNAME "libSDL2-2.0.so.0"
icculus@9
   777
    #endif
icculus@9
   778
    static void *Loaded_SDL20 = NULL;
icculus@85
   779
    #define LoadSDL20Library() ((Loaded_SDL20 = dlopen(SDL20_LIBNAME, RTLD_LOCAL|RTLD_NOW)) != NULL)
icculus@9
   780
    #define LookupSDL20Sym(sym) dlsym(Loaded_SDL20, sym)
icculus@9
   781
    #define CloseSDL20Library() { if (Loaded_SDL20) { dlclose(Loaded_SDL20); Loaded_SDL20 = NULL; } }
icculus@9
   782
#else
icculus@9
   783
    #error Please define your platform.
icculus@9
   784
#endif
icculus@9
   785
icculus@9
   786
static void *
icculus@9
   787
LoadSDL20Symbol(const char *fn, int *okay)
icculus@9
   788
{
icculus@9
   789
    void *retval = NULL;
icculus@84
   790
    if (*okay) { /* only bother trying if we haven't previously failed. */
icculus@9
   791
        retval = LookupSDL20Sym(fn);
icculus@84
   792
        if (retval == NULL) {
icculus@84
   793
            /* Flip to 1 to warn but maybe work if nothing calls that function, flip to zero to fail out. */
icculus@84
   794
            #if 0
icculus@84
   795
            fprintf(stderr, "WARNING: LOAD FAILED: %s\n", fn);
icculus@84
   796
            #else
icculus@84
   797
            *okay = 0;
icculus@84
   798
            #endif
icculus@84
   799
        }
icculus@9
   800
    }
icculus@9
   801
    return retval;
icculus@9
   802
}
icculus@9
   803
icculus@9
   804
static void
icculus@9
   805
UnloadSDL20(void)
icculus@9
   806
{
icculus@9
   807
    #define SDL20_SYM(rc,fn,params,args,ret) SDL20_##fn = NULL;
icculus@9
   808
    #include "SDL20_syms.h"
icculus@9
   809
    CloseSDL20Library();
icculus@9
   810
}
icculus@9
   811
icculus@9
   812
static int
icculus@9
   813
LoadSDL20(void)
icculus@9
   814
{
icculus@9
   815
    int okay = 1;
icculus@9
   816
    if (!Loaded_SDL20)
icculus@9
   817
    {
icculus@9
   818
        okay = LoadSDL20Library();
icculus@9
   819
        #define SDL20_SYM(rc,fn,params,args,ret) SDL20_##fn = (SDL20_##fn##_t) LoadSDL20Symbol("SDL_" #fn, &okay);
icculus@9
   820
        #include "SDL20_syms.h"
icculus@9
   821
        if (!okay)
icculus@9
   822
            UnloadSDL20();
icculus@9
   823
    }
icculus@9
   824
    return okay;
icculus@9
   825
}
icculus@9
   826
icculus@107
   827
static void dllinit(void) __attribute__((constructor));
icculus@107
   828
static void dllinit(void)
icculus@107
   829
{
icculus@107
   830
    if (!LoadSDL20()) {
icculus@107
   831
        fprintf(stderr, "ERROR: sdl12-compat failed to load SDL 2.0! Aborting!\n");
icculus@107
   832
        fflush(stderr);
icculus@107
   833
        abort();
icculus@107
   834
    }
icculus@107
   835
}
icculus@107
   836
icculus@107
   837
static void dllquit(void) __attribute__((destructor));
icculus@107
   838
static void dllquit(void)
icculus@107
   839
{
icculus@107
   840
    UnloadSDL20();
icculus@107
   841
}
icculus@107
   842
icculus@35
   843
DECLSPEC const SDL_version * SDLCALL
icculus@35
   844
SDL_Linked_Version(void)
icculus@35
   845
{
icculus@35
   846
    static const SDL_version version = { 1, 2, SDL12_COMPAT_VERSION };
icculus@35
   847
    return &version;
icculus@35
   848
}
icculus@9
   849
icculus@60
   850
DECLSPEC int SDLCALL
icculus@60
   851
SDL_sscanf(const char *text, const char *fmt, ...)
icculus@60
   852
{
icculus@60
   853
    int retval;
icculus@60
   854
    va_list ap;
icculus@60
   855
    va_start(ap, fmt);
icculus@60
   856
    retval = (int) SDL20_sscanf(text, fmt, ap);
icculus@60
   857
    va_end(ap);
icculus@60
   858
    return retval;
icculus@60
   859
}
icculus@60
   860
icculus@60
   861
DECLSPEC int SDLCALL
icculus@60
   862
SDL_snprintf(char *text, size_t maxlen, const char *fmt, ...)
icculus@60
   863
{
icculus@60
   864
    int retval;
icculus@60
   865
    va_list ap;
icculus@60
   866
    va_start(ap, fmt);
icculus@60
   867
    retval = (int) SDL20_vsnprintf(text, maxlen, fmt, ap);
icculus@60
   868
    va_end(ap);
icculus@60
   869
    return retval;
icculus@60
   870
}
icculus@60
   871
icculus@83
   872
DECLSPEC void * SDLCALL
icculus@83
   873
SDL_revcpy(void *dst, const void *src, size_t len)
icculus@83
   874
{
icculus@83
   875
    /* this doesn't reverse the data...I think this was just a memcpy that
icculus@83
   876
       was meant to be CPU-cache friendly if you knew you were working with
icculus@83
   877
       data going backwards in memory, instead of jumping over pages to copy
icculus@83
   878
       from the start...? Whatever, just do a memcpy here. */
icculus@83
   879
    return SDL_memcpy(dst, src, len);
icculus@83
   880
}
icculus@83
   881
icculus@83
   882
icculus@60
   883
DECLSPEC SDL_bool SDLCALL
icculus@60
   884
SDL_HasMMXExt(void)
icculus@60
   885
{
icculus@60
   886
    /* this isn't accurate, but SDL2 doesn't have this for some reason.
icculus@60
   887
        MMXExt is available in all SSE1 machines, except early Athlon chips,
icculus@60
   888
        so we'll just say it's available if they have SSE1. Oh well. */
icculus@60
   889
    return SDL20_HasSSE();
icculus@60
   890
}
icculus@60
   891
icculus@60
   892
DECLSPEC SDL_bool SDLCALL
icculus@60
   893
SDL_Has3DNowExt(void)
icculus@60
   894
{
icculus@60
   895
    FIXME("check this");
icculus@60
   896
    return SDL20_HasSSE();
icculus@60
   897
}
icculus@60
   898
icculus@82
   899
DECLSPEC SDL_Joystick * SDLCALL
icculus@82
   900
SDL_JoystickOpen(int device_index)
icculus@82
   901
{
icculus@82
   902
    int i;
icculus@82
   903
    SDL20_LockJoysticks();
icculus@82
   904
    for (i = 0; i < SDL_arraysize(JoystickOpenList); i++) {
icculus@82
   905
        if (JoystickOpenList[i].joystick == NULL) {
icculus@82
   906
            break;
icculus@82
   907
        }
icculus@82
   908
    }
icculus@82
   909
icculus@82
   910
    if (i == SDL_arraysize(JoystickOpenList)) {
icculus@82
   911
        SDL20_UnlockJoysticks();
icculus@82
   912
        SDL20_SetError("Too many open joysticks");
icculus@82
   913
        return NULL;
icculus@82
   914
    }
icculus@82
   915
icculus@82
   916
    JoystickOpenList[i].joystick = SDL20_JoystickOpen(device_index);
icculus@82
   917
    if (JoystickOpenList[i].joystick) {
icculus@82
   918
        JoystickOpenList[i].device_index = device_index;
icculus@82
   919
    }
icculus@82
   920
icculus@82
   921
    SDL20_UnlockJoysticks();
icculus@82
   922
    return JoystickOpenList[i].joystick;
icculus@82
   923
}
icculus@82
   924
icculus@82
   925
DECLSPEC void SDLCALL
icculus@82
   926
SDL_JoystickClose(SDL_Joystick *joystick)
icculus@82
   927
{
icculus@82
   928
    int i;
icculus@82
   929
    SDL20_LockJoysticks();
icculus@82
   930
    for (i = 0; i < SDL_arraysize(JoystickOpenList); i++) {
icculus@82
   931
        if (JoystickOpenList[i].joystick == joystick) {
icculus@82
   932
            break;
icculus@82
   933
        }
icculus@82
   934
    }
icculus@82
   935
icculus@82
   936
    if (i < SDL_arraysize(JoystickOpenList)) {
icculus@82
   937
        JoystickOpenList[i].joystick = NULL;
icculus@82
   938
    }
icculus@82
   939
icculus@82
   940
    SDL20_UnlockJoysticks();
icculus@82
   941
icculus@82
   942
    SDL20_JoystickClose(joystick);
icculus@82
   943
}
icculus@82
   944
icculus@82
   945
DECLSPEC const char * SDLCALL
icculus@82
   946
SDL_JoystickName(int device_index)
icculus@82
   947
{
icculus@82
   948
    return SDL20_JoystickNameForIndex(device_index);
icculus@82
   949
}
icculus@82
   950
icculus@82
   951
DECLSPEC int SDLCALL
icculus@82
   952
SDL_JoystickIndex(SDL_Joystick *joystick)
icculus@82
   953
{
icculus@82
   954
    int i;
icculus@82
   955
icculus@82
   956
    SDL20_LockJoysticks(); {
icculus@82
   957
        for (i = 0; i < SDL_arraysize(JoystickOpenList); i++) {
icculus@82
   958
            if (JoystickOpenList[i].joystick == joystick) {
icculus@82
   959
                break;
icculus@82
   960
            }
icculus@82
   961
        }
icculus@82
   962
icculus@82
   963
        if (i < SDL_arraysize(JoystickOpenList)) {
icculus@82
   964
            SDL20_UnlockJoysticks();
icculus@82
   965
            return JoystickOpenList[i].device_index;
icculus@82
   966
        }
icculus@82
   967
icculus@82
   968
    }
icculus@82
   969
    SDL20_UnlockJoysticks();
icculus@82
   970
    return SDL20_SetError("Can't find joystick");
icculus@82
   971
}
icculus@82
   972
icculus@91
   973
DECLSPEC int SDLCALL
icculus@91
   974
SDL_JoystickOpened(int device_index)
icculus@60
   975
{
icculus@82
   976
    int retval = 0;
icculus@82
   977
    int i;
icculus@82
   978
    SDL20_LockJoysticks();
icculus@82
   979
    for (i = 0; i < SDL_arraysize(JoystickOpenList); i++) {
icculus@82
   980
        if ((JoystickOpenList[i].joystick) && (JoystickOpenList[i].device_index == device_index)) {
icculus@82
   981
            retval = 1;
icculus@82
   982
            break;
icculus@82
   983
        }
icculus@82
   984
    }
icculus@82
   985
    SDL20_UnlockJoysticks();
icculus@82
   986
    return retval;
icculus@60
   987
}
icculus@60
   988
icculus@117
   989
static SDL_PixelFormat *
icculus@117
   990
PixelFormat12to20(SDL_PixelFormat *format20, SDL_Palette *palette20, const SDL12_PixelFormat *format12)
icculus@117
   991
{
icculus@117
   992
    if (format12->palette) {
icculus@117
   993
        palette20->ncolors = format12->palette->ncolors;
icculus@117
   994
        palette20->colors = format12->palette->colors;
icculus@117
   995
        palette20->version = 1;
icculus@117
   996
        palette20->refcount = 1;
icculus@117
   997
        format20->palette = palette20;
icculus@117
   998
    } else {
icculus@117
   999
        format20->palette = NULL;
icculus@117
  1000
    }
icculus@117
  1001
icculus@117
  1002
    format20->format = SDL20_MasksToPixelFormatEnum(format12->BitsPerPixel, format12->Rmask, format12->Gmask, format12->Bmask, format12->Amask);
icculus@117
  1003
    format20->BitsPerPixel = format12->BitsPerPixel;
icculus@117
  1004
    format20->BytesPerPixel = format12->BytesPerPixel;
icculus@117
  1005
    format20->Rmask = format12->Rmask;
icculus@117
  1006
    format20->Gmask = format12->Gmask;
icculus@117
  1007
    format20->Bmask = format12->Bmask;
icculus@117
  1008
    format20->Amask = format12->Amask;
icculus@117
  1009
    format20->Rloss = format12->Rloss;
icculus@117
  1010
    format20->Gloss = format12->Gloss;
icculus@117
  1011
    format20->Bloss = format12->Bloss;
icculus@117
  1012
    format20->Aloss = format12->Aloss;
icculus@117
  1013
    format20->Rshift = format12->Rshift;
icculus@117
  1014
    format20->Gshift = format12->Gshift;
icculus@117
  1015
    format20->Bshift = format12->Bshift;
icculus@117
  1016
    format20->Ashift = format12->Ashift;
icculus@117
  1017
    format20->refcount = 1;
icculus@117
  1018
    format20->next = NULL;
icculus@117
  1019
    return format20;
icculus@117
  1020
}
icculus@117
  1021
icculus@117
  1022
static SDL12_PixelFormat *
icculus@117
  1023
PixelFormat20to12(SDL12_PixelFormat *format12, SDL12_Palette *palette12, const SDL_PixelFormat *format20)
icculus@117
  1024
{
icculus@117
  1025
    if (format20->palette) {
icculus@117
  1026
        palette12->ncolors = format20->palette->ncolors;
icculus@117
  1027
        palette12->colors = format20->palette->colors;
icculus@117
  1028
        format12->palette = palette12;
icculus@117
  1029
    } else {
icculus@117
  1030
        format12->palette = NULL;
icculus@117
  1031
    }
icculus@117
  1032
icculus@117
  1033
    format12->BitsPerPixel = format20->BitsPerPixel;
icculus@117
  1034
    format12->BytesPerPixel = format20->BytesPerPixel;
icculus@117
  1035
    format12->Rloss = format20->Rloss;
icculus@117
  1036
    format12->Gloss = format20->Gloss;
icculus@117
  1037
    format12->Bloss = format20->Bloss;
icculus@117
  1038
    format12->Aloss = format20->Aloss;
icculus@117
  1039
    format12->Rshift = format20->Rshift;
icculus@117
  1040
    format12->Gshift = format20->Gshift;
icculus@117
  1041
    format12->Bshift = format20->Bshift;
icculus@117
  1042
    format12->Ashift = format20->Ashift;
icculus@117
  1043
    format12->Rmask = format20->Rmask;
icculus@117
  1044
    format12->Gmask = format20->Gmask;
icculus@117
  1045
    format12->Bmask = format20->Bmask;
icculus@117
  1046
    format12->Amask = format20->Amask;
icculus@117
  1047
    format12->colorkey = 0;  // this is a surface, not pixelformat, properties in SDL2.
icculus@117
  1048
    format12->alpha = 255;  // this is a surface, not pixelformat, properties in SDL2.
icculus@117
  1049
    return format12;
icculus@117
  1050
}
icculus@117
  1051
icculus@9
  1052
static int
icculus@9
  1053
GetVideoDisplay()
icculus@9
  1054
{
icculus@58
  1055
    FIXME("cache this value during SDL_Init() so it doesn't change.");
icculus@58
  1056
    const char *variable = SDL20_getenv("SDL_VIDEO_FULLSCREEN_DISPLAY");
icculus@9
  1057
    if ( !variable ) {
icculus@58
  1058
        variable = SDL20_getenv("SDL_VIDEO_FULLSCREEN_HEAD");
icculus@9
  1059
    }
icculus@9
  1060
    if ( variable ) {
icculus@34
  1061
        return SDL20_atoi(variable);
icculus@9
  1062
    } else {
icculus@9
  1063
        return 0;
icculus@9
  1064
    }
icculus@9
  1065
}
icculus@9
  1066
icculus@39
  1067
/* This sets up VideoModes and VideoModesCount. You end up with arrays by pixel
icculus@39
  1068
    format, each with a value that 1.2's SDL_ListModes() can return. */
icculus@39
  1069
static int
icculus@39
  1070
Init12VidModes(void)
icculus@39
  1071
{
icculus@39
  1072
    const int total = SDL20_GetNumDisplayModes(VideoDisplayIndex);
icculus@39
  1073
    VideoModeList *vmode = NULL;
icculus@39
  1074
    int num_modes = 0;
icculus@39
  1075
    void *ptr = NULL;
icculus@39
  1076
    int i, j;
icculus@39
  1077
icculus@86
  1078
    if (VideoModesCount > 0) {
icculus@86
  1079
        return 0;  // already did this.
icculus@86
  1080
    }
icculus@86
  1081
icculus@39
  1082
    SDL_assert(VideoModes == NULL);
icculus@39
  1083
icculus@39
  1084
    for (i = 0; i < total; ++i) {
icculus@39
  1085
        SDL_DisplayMode mode;
icculus@39
  1086
icculus@39
  1087
        if (SDL20_GetDisplayMode(VideoDisplayIndex, i, &mode) == -1) {
icculus@39
  1088
            continue;
icculus@39
  1089
        } else if (!mode.w || !mode.h) {
icculus@39
  1090
            SDL_assert(0 && "Can this actually happen?");
icculus@39
  1091
            continue;
icculus@39
  1092
        }
icculus@39
  1093
icculus@39
  1094
        if (!vmode || (mode.format != vmode->format)) {  // SDL20_GetDisplayMode() sorts on bpp first. We know when to change arrays.
icculus@39
  1095
            if (VideoModesCount > 0) {
icculus@73
  1096
                VideoModes[VideoModesCount-1].modes12[num_modes] = NULL;
icculus@39
  1097
            }
icculus@39
  1098
            ptr = (VideoModeList *) SDL20_realloc(VideoModes, sizeof (VideoModeList) * (VideoModesCount+1));
icculus@39
  1099
            if (!ptr) {
icculus@39
  1100
                return SDL20_OutOfMemory();
icculus@39
  1101
            }
icculus@39
  1102
            VideoModes = (VideoModeList *) ptr;
icculus@39
  1103
            vmode = &VideoModes[VideoModesCount];
icculus@39
  1104
            vmode->format = mode.format;
icculus@73
  1105
            vmode->modeslist12 = NULL;
icculus@73
  1106
            vmode->modes12 = NULL;
icculus@39
  1107
            VideoModesCount++;
icculus@39
  1108
            num_modes = 0;
icculus@39
  1109
        }
icculus@39
  1110
icculus@39
  1111
        /* make sure we don't have this one already (with a different refresh rate, etc). */
icculus@39
  1112
        for (j = 0; j < num_modes; j++) {
icculus@73
  1113
            if ((vmode->modeslist12[j].w == mode.w) && (vmode->modeslist12[j].h == mode.h)) {
icculus@39
  1114
                break;
icculus@39
  1115
            }
icculus@39
  1116
        }
icculus@39
  1117
icculus@39
  1118
        if (j < num_modes) {
icculus@39
  1119
            continue;  /* already have this one. */
icculus@39
  1120
        }
icculus@39
  1121
icculus@73
  1122
        FIXME("Make sure mode dimensions fit in 16-bits for SDL12_Rect");
icculus@73
  1123
icculus@73
  1124
        ptr = SDL20_realloc(vmode->modes12, sizeof (SDL12_Rect *) * (num_modes + 2));
icculus@39
  1125
        if (ptr == NULL) {
icculus@39
  1126
            return SDL20_OutOfMemory();
icculus@39
  1127
        }
icculus@73
  1128
        vmode->modes12 = (SDL12_Rect **) ptr;
icculus@73
  1129
icculus@73
  1130
        ptr = SDL20_realloc(vmode->modeslist12, sizeof (SDL12_Rect) * (num_modes + 1));
icculus@39
  1131
        if (ptr == NULL) {
icculus@39
  1132
            return SDL20_OutOfMemory();
icculus@39
  1133
        }
icculus@73
  1134
        vmode->modeslist12 = (SDL12_Rect *) ptr;
icculus@73
  1135
icculus@73
  1136
        vmode->modeslist12[num_modes].x = 0;
icculus@73
  1137
        vmode->modeslist12[num_modes].y = 0;
icculus@73
  1138
        vmode->modeslist12[num_modes].w = mode.w;
icculus@73
  1139
        vmode->modeslist12[num_modes].h = mode.h;
icculus@73
  1140
icculus@73
  1141
        vmode->modes12[num_modes] = &vmode->modeslist12[num_modes];
icculus@39
  1142
icculus@39
  1143
        num_modes++;
icculus@39
  1144
    }
icculus@39
  1145
icculus@39
  1146
    if (VideoModesCount > 0) {
icculus@73
  1147
        VideoModes[VideoModesCount-1].modes12[num_modes] = NULL;
icculus@39
  1148
    }
icculus@39
  1149
icculus@39
  1150
    return 0;
icculus@39
  1151
}
icculus@39
  1152
icculus@39
  1153
static int
icculus@39
  1154
Init12Video(void)
icculus@39
  1155
{
icculus@39
  1156
    int i;
icculus@39
  1157
icculus@39
  1158
    for (i = 0; i < SDL12_MAXEVENTS-1; i++)
icculus@39
  1159
        EventQueuePool[i].next = &EventQueuePool[i+1];
icculus@39
  1160
    EventQueuePool[SDL12_MAXEVENTS-1].next = NULL;
icculus@39
  1161
icculus@39
  1162
    EventQueueHead = EventQueueTail = NULL;
icculus@39
  1163
    EventQueueAvailable = EventQueuePool;
icculus@39
  1164
icculus@39
  1165
    SDL_memset(EventStates, SDL_ENABLE, sizeof (EventStates)); /* on by default */
icculus@39
  1166
    EventStates[SDL12_SYSWMEVENT] = SDL_IGNORE;  /* off by default. */
icculus@39
  1167
icculus@39
  1168
    SDL20_SetEventFilter(EventFilter20to12, NULL);
icculus@39
  1169
icculus@39
  1170
    VideoDisplayIndex = GetVideoDisplay();
icculus@39
  1171
    SwapInterval = 0;
icculus@39
  1172
icculus@106
  1173
    VideoWindowGrabbed = SDL_FALSE;
icculus@106
  1174
    VideoCursorHidden = SDL_FALSE;
icculus@106
  1175
    SDL20_ShowCursor(1);
icculus@106
  1176
icculus@39
  1177
    if (Init12VidModes() == -1) {
icculus@39
  1178
        return -1;
icculus@39
  1179
    }
icculus@39
  1180
icculus@113
  1181
    SDL20_StopTextInput();
icculus@113
  1182
icculus@117
  1183
    SDL_DisplayMode mode;
icculus@117
  1184
    if (SDL20_GetDesktopDisplayMode(VideoDisplayIndex, &mode) == 0) {
icculus@117
  1185
        VideoInfoVfmt20 = SDL20_AllocFormat(mode.format);
icculus@117
  1186
        VideoInfo12.vfmt = PixelFormat20to12(&VideoInfoVfmt12, &VideoInfoPalette12, VideoInfoVfmt20);
icculus@117
  1187
        VideoInfo12.current_w = mode.w;
icculus@117
  1188
        VideoInfo12.current_h = mode.h;
icculus@117
  1189
        VideoInfo12.wm_available = 1;  FIXME("not sure if we can determine this in SDL2...?");
icculus@117
  1190
        VideoInfo12.video_mem = 1024 * 256;  /* good enough. */
icculus@117
  1191
    }
icculus@117
  1192
icculus@39
  1193
    return 0;
icculus@39
  1194
}
icculus@39
  1195
icculus@37
  1196
DECLSPEC int SDLCALL
icculus@37
  1197
SDL_InitSubSystem(Uint32 sdl12flags)
icculus@9
  1198
{
icculus@54
  1199
    FIXME("there is never a parachute in SDL2, should we catch segfaults ourselves?");
icculus@40
  1200
icculus@54
  1201
    FIXME("support event thread where it makes sense to do so?");
icculus@54
  1202
icculus@75
  1203
    if ( (sdl12flags & SDL12_INIT_EVENTTHREAD) == SDL12_INIT_EVENTTHREAD ) {
icculus@75
  1204
        return SDL20_SetError("OS doesn't support threaded events");
icculus@75
  1205
    }
icculus@40
  1206
icculus@9
  1207
    Uint32 sdl20flags = 0;
icculus@9
  1208
    int rc;
icculus@9
  1209
icculus@62
  1210
#ifdef __MACOSX__
icculus@62
  1211
    extern void sdl12_compat_macos_init(void);
icculus@62
  1212
    sdl12_compat_macos_init();
icculus@62
  1213
#endif
icculus@62
  1214
icculus@19
  1215
    #define SETFLAG(flag) if (sdl12flags & SDL12_INIT_##flag) sdl20flags |= SDL_INIT_##flag
icculus@9
  1216
    SETFLAG(TIMER);
icculus@9
  1217
    SETFLAG(AUDIO);
icculus@9
  1218
    SETFLAG(VIDEO);
icculus@9
  1219
    SETFLAG(JOYSTICK);
icculus@9
  1220
    SETFLAG(NOPARACHUTE);
icculus@11
  1221
    #undef SETFLAG
icculus@11
  1222
icculus@11
  1223
    // There's no CDROM in 2.0, but we'll just pretend it succeeded.
icculus@11
  1224
    if (sdl12flags & SDL12_INIT_CDROM)
icculus@16
  1225
        CDRomInit = 1;
icculus@11
  1226
icculus@54
  1227
    FIXME("do something about SDL12_INIT_EVENTTHREAD");
icculus@11
  1228
icculus@37
  1229
    rc = SDL20_Init(sdl20flags);
icculus@39
  1230
    if ((rc == 0) && (sdl20flags & SDL_INIT_VIDEO)) {
icculus@39
  1231
        if (Init12Video() == -1) {
icculus@54
  1232
            FIXME("should we deinit other subsystems?");
icculus@54
  1233
            return -1;
icculus@39
  1234
        }
icculus@18
  1235
    }
icculus@18
  1236
icculus@11
  1237
    return rc;
icculus@11
  1238
}
icculus@11
  1239
icculus@35
  1240
DECLSPEC int SDLCALL
icculus@11
  1241
SDL_Init(Uint32 sdl12flags)
icculus@11
  1242
{
icculus@54
  1243
    FIXME("what was different in 1.2?");
icculus@41
  1244
    return SDL_InitSubSystem(sdl12flags);   /* there's no difference betwee Init and InitSubSystem in SDL2. */
icculus@11
  1245
}
icculus@11
  1246
icculus@38
  1247
icculus@38
  1248
static void
icculus@38
  1249
InitFlags12To20(const Uint32 flags12, Uint32 *_flags20, Uint32 *_extraflags)
icculus@11
  1250
{
icculus@38
  1251
    Uint32 flags20 = 0;
icculus@11
  1252
    Uint32 extraflags = 0;
icculus@11
  1253
icculus@38
  1254
    #define SETFLAG(flag) if (flags12 & SDL12_INIT_##flag) flags20 |= SDL_INIT_##flag
icculus@11
  1255
    SETFLAG(TIMER);
icculus@11
  1256
    SETFLAG(AUDIO);
icculus@11
  1257
    SETFLAG(VIDEO);
icculus@11
  1258
    SETFLAG(JOYSTICK);
icculus@11
  1259
    SETFLAG(NOPARACHUTE);
icculus@11
  1260
    #undef SETFLAG
icculus@11
  1261
icculus@38
  1262
    if ((flags12 & SDL12_INIT_CDROM) && (CDRomInit)) {
icculus@11
  1263
        extraflags |= SDL12_INIT_CDROM;
icculus@38
  1264
    }
icculus@11
  1265
icculus@54
  1266
    FIXME("do something about SDL12_INIT_EVENTTHREAD");
icculus@11
  1267
icculus@38
  1268
    *_flags20 = flags20;
icculus@38
  1269
    *_extraflags = extraflags;
icculus@11
  1270
}
icculus@11
  1271
icculus@38
  1272
static Uint32
icculus@38
  1273
InitFlags20to12(const Uint32 flags20)
icculus@11
  1274
{
icculus@38
  1275
    Uint32 flags12 = 0;
icculus@38
  1276
icculus@38
  1277
    #define SETFLAG(flag) if (flags20 & SDL_INIT_##flag) flags12 |= SDL12_INIT_##flag
icculus@11
  1278
    SETFLAG(TIMER);
icculus@11
  1279
    SETFLAG(AUDIO);
icculus@11
  1280
    SETFLAG(VIDEO);
icculus@11
  1281
    SETFLAG(JOYSTICK);
icculus@11
  1282
    SETFLAG(NOPARACHUTE);
icculus@9
  1283
    #undef SETFLAG
icculus@9
  1284
icculus@38
  1285
    return flags12;
icculus@38
  1286
}
icculus@38
  1287
icculus@38
  1288
icculus@38
  1289
DECLSPEC Uint32 SDLCALL
icculus@38
  1290
SDL_WasInit(Uint32 sdl12flags)
icculus@38
  1291
{
icculus@38
  1292
    Uint32 sdl20flags, extraflags;
icculus@38
  1293
    InitFlags12To20(sdl12flags, &sdl20flags, &extraflags);
icculus@38
  1294
icculus@38
  1295
    return InitFlags20to12(SDL20_WasInit(sdl20flags)) | extraflags;
icculus@38
  1296
}
icculus@38
  1297
icculus@39
  1298
static void
icculus@39
  1299
Quit12Video(void)
icculus@39
  1300
{
icculus@39
  1301
    int i;
icculus@39
  1302
icculus@105
  1303
    SDL20_FreeSurface(VideoIcon20);
icculus@105
  1304
    VideoIcon20 = NULL;
icculus@105
  1305
icculus@39
  1306
    for (i = 0; i < VideoModesCount; i++) {
icculus@73
  1307
        SDL20_free(VideoModes[i].modeslist12);
icculus@73
  1308
        SDL20_free(VideoModes[i].modes12);
icculus@39
  1309
    }
icculus@39
  1310
    SDL20_free(VideoModes);
icculus@39
  1311
icculus@117
  1312
    SDL20_FreeFormat(VideoInfoVfmt20);
icculus@56
  1313
    SDL20_zero(VideoInfo12);
icculus@39
  1314
icculus@117
  1315
    VideoInfoVfmt20 = NULL;
icculus@39
  1316
    EventFilter12 = NULL;
icculus@39
  1317
    EventQueueAvailable = EventQueueHead = EventQueueTail = NULL;
icculus@56
  1318
    CurrentCursor12 = NULL;
icculus@39
  1319
    VideoModes = NULL;
icculus@39
  1320
    VideoModesCount = 0;
icculus@39
  1321
}
icculus@39
  1322
icculus@38
  1323
DECLSPEC void SDLCALL
icculus@38
  1324
SDL_QuitSubSystem(Uint32 sdl12flags)
icculus@38
  1325
{
icculus@38
  1326
    Uint32 sdl20flags, extraflags;
icculus@38
  1327
    InitFlags12To20(sdl12flags, &sdl20flags, &extraflags);
icculus@38
  1328
icculus@38
  1329
    if (extraflags & SDL12_INIT_CDROM) {
icculus@16
  1330
        CDRomInit = 0;
icculus@38
  1331
    }
icculus@16
  1332
icculus@54
  1333
    FIXME("reset a bunch of other global variables too.");
icculus@17
  1334
    if (sdl12flags & SDL12_INIT_VIDEO) {
icculus@39
  1335
        Quit12Video();
icculus@17
  1336
    }
icculus@17
  1337
icculus@54
  1338
    FIXME("do something about SDL12_INIT_EVENTTHREAD");
icculus@11
  1339
    SDL20_QuitSubSystem(sdl20flags);
icculus@9
  1340
icculus@42
  1341
    if ((SDL20_WasInit(0) == 0) && (!CDRomInit)) {
icculus@42
  1342
        SDL20_Quit();
icculus@42
  1343
    }
icculus@9
  1344
}
icculus@9
  1345
icculus@35
  1346
DECLSPEC void SDLCALL
icculus@9
  1347
SDL_Quit(void)
icculus@9
  1348
{
icculus@42
  1349
    SDL_QuitSubSystem(SDL_WasInit(0) | SDL12_INIT_CDROM);
icculus@9
  1350
}
icculus@9
  1351
icculus@35
  1352
DECLSPEC void SDLCALL
icculus@11
  1353
SDL_SetError(const char *fmt, ...)
icculus@11
  1354
{
icculus@34
  1355
    char ch;
icculus@12
  1356
    char *str = NULL;
icculus@34
  1357
    size_t len = 0;
icculus@12
  1358
    va_list ap;
icculus@81
  1359
icculus@12
  1360
    va_start(ap, fmt);
icculus@34
  1361
    len = SDL20_vsnprintf(&ch, 1, fmt, ap);
icculus@12
  1362
    va_end(ap);
icculus@34
  1363
icculus@34
  1364
    str = (char *) SDL20_malloc(len + 1);
icculus@12
  1365
    if (!str)
icculus@12
  1366
        SDL20_OutOfMemory();
icculus@12
  1367
    else
icculus@12
  1368
    {
icculus@34
  1369
        va_start(ap, fmt);
icculus@34
  1370
        SDL20_vsnprintf(str, len + 1, fmt, ap);
icculus@34
  1371
        va_end(ap);
icculus@12
  1372
        SDL20_SetError("%s", str);
icculus@34
  1373
        SDL20_free(str);
icculus@12
  1374
    }
icculus@11
  1375
}
icculus@9
  1376
icculus@35
  1377
DECLSPEC const char * SDLCALL
icculus@9
  1378
SDL_GetError(void)
icculus@9
  1379
{
icculus@60
  1380
    if (SDL20_GetError == NULL)
icculus@9
  1381
    {
icculus@60
  1382
        static const char noload_errstr[] = "The SDL 2.0 library that the 1.2 compatibility layer needs isn't loaded";
icculus@9
  1383
        return noload_errstr;
icculus@9
  1384
    }
icculus@9
  1385
    return SDL20_GetError();
icculus@9
  1386
}
icculus@9
  1387
icculus@9
  1388
icculus@9
  1389
static const char *
icculus@9
  1390
GetDriverName(const char *name, char *namebuf, int maxlen)
icculus@9
  1391
{
icculus@9
  1392
    if (name) {
icculus@9
  1393
        if (namebuf) {
icculus@9
  1394
            SDL20_strlcpy(namebuf, name, maxlen);
icculus@9
  1395
            return namebuf;
icculus@9
  1396
        } else {
icculus@9
  1397
            return name;
icculus@9
  1398
        }
icculus@9
  1399
    }
icculus@9
  1400
    return NULL;
icculus@9
  1401
}
icculus@9
  1402
icculus@35
  1403
DECLSPEC const char * SDLCALL
icculus@9
  1404
SDL_AudioDriverName(char *namebuf, int maxlen)
icculus@9
  1405
{
icculus@9
  1406
    return GetDriverName(SDL20_GetCurrentAudioDriver(), namebuf, maxlen);
icculus@9
  1407
}
icculus@9
  1408
icculus@35
  1409
DECLSPEC const char * SDLCALL
icculus@9
  1410
SDL_VideoDriverName(char *namebuf, int maxlen)
icculus@9
  1411
{
icculus@9
  1412
    return GetDriverName(SDL20_GetCurrentVideoDriver(), namebuf, maxlen);
icculus@9
  1413
}
icculus@9
  1414
icculus@101
  1415
icculus@35
  1416
DECLSPEC int SDLCALL
icculus@31
  1417
SDL_PollEvent(SDL12_Event *event12)
icculus@31
  1418
{
icculus@31
  1419
    EventQueueType *next;
icculus@31
  1420
icculus@96
  1421
    SDL_PumpEvents();  /* this will run our filter and build our 1.2 queue. */
icculus@31
  1422
icculus@99
  1423
    if (EventQueueHead == NULL) {
icculus@31
  1424
        return 0;  /* no events at the moment. */
icculus@99
  1425
    }
icculus@31
  1426
icculus@31
  1427
    SDL_memcpy(event12, &EventQueueHead->event12, sizeof (SDL12_Event));
icculus@31
  1428
    next = EventQueueHead->next;
icculus@31
  1429
    EventQueueHead->next = EventQueueAvailable;
icculus@31
  1430
    EventQueueAvailable = EventQueueHead;
icculus@31
  1431
    EventQueueHead = next;
icculus@78
  1432
    if (!next) {
icculus@78
  1433
        EventQueueTail = NULL;
icculus@78
  1434
    }
icculus@75
  1435
icculus@31
  1436
    return 1;
icculus@31
  1437
}
icculus@31
  1438
icculus@35
  1439
DECLSPEC int SDLCALL
icculus@31
  1440
SDL_PushEvent(SDL12_Event *event12)
icculus@31
  1441
{
icculus@31
  1442
    EventQueueType *item = EventQueueAvailable;
icculus@99
  1443
    if (item == NULL) {
icculus@31
  1444
        return -1;  /* no space available at the moment. */
icculus@99
  1445
    }
icculus@31
  1446
icculus@31
  1447
    EventQueueAvailable = item->next;
icculus@99
  1448
    if (EventQueueTail) {
icculus@31
  1449
        EventQueueTail->next = item;
icculus@99
  1450
        EventQueueTail = item;
icculus@99
  1451
    } else {
icculus@31
  1452
        EventQueueHead = EventQueueTail = item;
icculus@99
  1453
    }
icculus@31
  1454
    item->next = NULL;
icculus@31
  1455
icculus@31
  1456
    SDL_memcpy(&item->event12, event12, sizeof (SDL12_Event));
icculus@99
  1457
icculus@31
  1458
    return 0;
icculus@31
  1459
}
icculus@31
  1460
icculus@35
  1461
DECLSPEC int SDLCALL
icculus@31
  1462
SDL_PeepEvents(SDL12_Event *events12, int numevents, SDL_eventaction action, Uint32 mask)
icculus@31
  1463
{
icculus@31
  1464
    if (action == SDL_ADDEVENT)
icculus@31
  1465
    {
icculus@31
  1466
        int i;
icculus@31
  1467
        for (i = 0; i < numevents; i++)
icculus@31
  1468
        {
icculus@31
  1469
            if (SDL_PushEvent(&events12[i]) == -1)
icculus@31
  1470
                break;  /* out of space for more events. */
icculus@31
  1471
        }
icculus@31
  1472
        return i;
icculus@31
  1473
    }
icculus@31
  1474
    else if ((action == SDL_PEEKEVENT) || (action == SDL_GETEVENT))
icculus@31
  1475
    {
icculus@31
  1476
        const SDL_bool isGet = (action == SDL_GETEVENT);
icculus@31
  1477
        EventQueueType *prev = NULL;
icculus@31
  1478
        EventQueueType *item = EventQueueHead;
icculus@31
  1479
        EventQueueType *next = NULL;
icculus@31
  1480
        int chosen = 0;
icculus@31
  1481
        while (chosen < numevents)
icculus@31
  1482
        {
icculus@31
  1483
            EventQueueType *nextPrev = item;
icculus@31
  1484
            if (!item)
icculus@31
  1485
                break;  /* no more events at the moment. */
icculus@31
  1486
icculus@31
  1487
            next = item->next;  /* copy, since we might overwrite item->next */
icculus@31
  1488
icculus@31
  1489
            if (mask & (1<<item->event12.type))
icculus@31
  1490
            {
icculus@31
  1491
                SDL_memcpy(&events12[chosen++], &item->event12, sizeof (SDL12_Event));
icculus@31
  1492
                if (isGet)  /* remove from list? */
icculus@31
  1493
                {
icculus@31
  1494
                    if (prev != NULL)
icculus@31
  1495
                        prev->next = next;
icculus@31
  1496
                    if (item == EventQueueHead)
icculus@31
  1497
                        EventQueueHead = next;
icculus@31
  1498
                    if (item == EventQueueTail)
icculus@31
  1499
                        EventQueueTail = prev;
icculus@31
  1500
icculus@31
  1501
                    /* put it back in the free pool. */
icculus@31
  1502
                    item->next = EventQueueAvailable;
icculus@31
  1503
                    EventQueueAvailable = item;
icculus@31
  1504
                    nextPrev = prev;  /* previous item doesn't change. */
icculus@31
  1505
                }
icculus@31
  1506
            }
icculus@31
  1507
icculus@31
  1508
            item = next;
icculus@31
  1509
            prev = nextPrev;
icculus@31
  1510
        }
icculus@31
  1511
        return chosen;
icculus@31
  1512
    }
icculus@31
  1513
icculus@31
  1514
    return 0;
icculus@31
  1515
}
icculus@31
  1516
icculus@35
  1517
DECLSPEC int SDLCALL
icculus@31
  1518
SDL_WaitEvent(SDL12_Event *event12)
icculus@31
  1519
{
icculus@54
  1520
    FIXME("In 1.2, this only fails (-1) if you haven't SDL_Init()'d.");
icculus@31
  1521
    while (!SDL_PollEvent(event12))
icculus@51
  1522
        SDL20_Delay(10);
icculus@31
  1523
    return 1;
icculus@31
  1524
}
icculus@31
  1525
icculus@32
  1526
static SDL_bool
icculus@32
  1527
PushEventIfNotFiltered(SDL12_Event *event12)
icculus@32
  1528
{
icculus@32
  1529
    if (event12->type != SDL12_NOEVENT)
icculus@32
  1530
    {
icculus@32
  1531
        if (EventStates[event12->type] != SDL_IGNORE)
icculus@32
  1532
        {
icculus@32
  1533
            if ((!EventFilter12) || (EventFilter12(event12)))
icculus@32
  1534
                return (SDL_PushEvent(event12) == 0);
icculus@32
  1535
        }
icculus@32
  1536
    }
icculus@32
  1537
    return SDL_FALSE;
icculus@32
  1538
}
icculus@32
  1539
icculus@35
  1540
DECLSPEC Uint8 SDLCALL
icculus@31
  1541
SDL_EventState(Uint8 type, int state)
icculus@31
  1542
{
icculus@31
  1543
    /* the values of "state" match between 1.2 and 2.0 */
icculus@31
  1544
    const Uint8 retval = EventStates[type];
icculus@31
  1545
    SDL12_Event e;
icculus@31
  1546
icculus@31
  1547
    if (state != SDL_QUERY)
icculus@31
  1548
        EventStates[type] = state;
icculus@31
  1549
    if (state == SDL_IGNORE)  /* drop existing events of this type. */
icculus@31
  1550
        while (SDL_PeepEvents(&e, 1, SDL_GETEVENT, (1<<type))) {}
icculus@31
  1551
icculus@31
  1552
    return retval;
icculus@31
  1553
}
icculus@31
  1554
icculus@108
  1555
static Uint8 MouseButtonState20to12(const Uint32 state20)
icculus@108
  1556
{
icculus@108
  1557
    Uint8 retval = (state20 & 0x7);  /* left, right, and middle will match. */
icculus@108
  1558
icculus@108
  1559
    /* the X[12] buttons are different in 1.2; mousewheel was in the way. */
icculus@108
  1560
    if (state20 & SDL_BUTTON(SDL_BUTTON_X1)) {
icculus@108
  1561
        retval |= (1<<5);
icculus@108
  1562
    }
icculus@108
  1563
    if (state20 & SDL_BUTTON(SDL_BUTTON_X2)) {
icculus@108
  1564
        retval |= (1<<6);
icculus@108
  1565
    }
icculus@108
  1566
icculus@108
  1567
    return retval;
icculus@108
  1568
}
icculus@108
  1569
icculus@35
  1570
DECLSPEC Uint8 SDLCALL
icculus@35
  1571
SDL_GetMouseState(int *x, int *y)
icculus@35
  1572
{
icculus@108
  1573
    return MouseButtonState20to12(SDL20_GetMouseState(x, y));
icculus@108
  1574
}
icculus@108
  1575
icculus@108
  1576
DECLSPEC Uint8 SDLCALL
icculus@108
  1577
SDL_GetRelativeMouseState(int *x, int *y)
icculus@108
  1578
{
icculus@108
  1579
    return MouseButtonState20to12(SDL20_GetRelativeMouseState(x, y));
icculus@35
  1580
}
icculus@35
  1581
icculus@77
  1582
DECLSPEC char * SDLCALL
icculus@77
  1583
SDL_GetKeyName(SDL12Key key)
icculus@77
  1584
{
icculus@77
  1585
    switch (key) {
icculus@77
  1586
        #define CASESDLK12TONAME(k, n) case k: return (char *) n
icculus@77
  1587
	    CASESDLK12TONAME(SDLK12_BACKSPACE, "backspace");
icculus@77
  1588
	    CASESDLK12TONAME(SDLK12_TAB, "tab");
icculus@77
  1589
	    CASESDLK12TONAME(SDLK12_CLEAR, "clear");
icculus@77
  1590
	    CASESDLK12TONAME(SDLK12_RETURN, "return");
icculus@77
  1591
	    CASESDLK12TONAME(SDLK12_PAUSE, "pause");
icculus@77
  1592
	    CASESDLK12TONAME(SDLK12_ESCAPE, "escape");
icculus@77
  1593
	    CASESDLK12TONAME(SDLK12_SPACE, "space");
icculus@77
  1594
	    CASESDLK12TONAME(SDLK12_EXCLAIM, "!");
icculus@77
  1595
	    CASESDLK12TONAME(SDLK12_QUOTEDBL, "\"");
icculus@77
  1596
	    CASESDLK12TONAME(SDLK12_HASH, "#");
icculus@77
  1597
	    CASESDLK12TONAME(SDLK12_DOLLAR, "$");
icculus@77
  1598
	    CASESDLK12TONAME(SDLK12_AMPERSAND, "&");
icculus@77
  1599
	    CASESDLK12TONAME(SDLK12_QUOTE, "'");
icculus@77
  1600
	    CASESDLK12TONAME(SDLK12_LEFTPAREN, "(");
icculus@77
  1601
	    CASESDLK12TONAME(SDLK12_RIGHTPAREN, ")");
icculus@77
  1602
	    CASESDLK12TONAME(SDLK12_ASTERISK, "*");
icculus@77
  1603
	    CASESDLK12TONAME(SDLK12_PLUS, "+");
icculus@77
  1604
	    CASESDLK12TONAME(SDLK12_COMMA, ",");
icculus@77
  1605
	    CASESDLK12TONAME(SDLK12_MINUS, "-");
icculus@77
  1606
	    CASESDLK12TONAME(SDLK12_PERIOD, ".");
icculus@77
  1607
	    CASESDLK12TONAME(SDLK12_SLASH, "/");
icculus@77
  1608
	    CASESDLK12TONAME(SDLK12_0, "0");
icculus@77
  1609
	    CASESDLK12TONAME(SDLK12_1, "1");
icculus@77
  1610
	    CASESDLK12TONAME(SDLK12_2, "2");
icculus@77
  1611
	    CASESDLK12TONAME(SDLK12_3, "3");
icculus@77
  1612
	    CASESDLK12TONAME(SDLK12_4, "4");
icculus@77
  1613
	    CASESDLK12TONAME(SDLK12_5, "5");
icculus@77
  1614
	    CASESDLK12TONAME(SDLK12_6, "6");
icculus@77
  1615
	    CASESDLK12TONAME(SDLK12_7, "7");
icculus@77
  1616
	    CASESDLK12TONAME(SDLK12_8, "8");
icculus@77
  1617
	    CASESDLK12TONAME(SDLK12_9, "9");
icculus@77
  1618
	    CASESDLK12TONAME(SDLK12_COLON, ":");
icculus@77
  1619
	    CASESDLK12TONAME(SDLK12_SEMICOLON, ");");
icculus@77
  1620
	    CASESDLK12TONAME(SDLK12_LESS, "<");
icculus@77
  1621
	    CASESDLK12TONAME(SDLK12_EQUALS, "=");
icculus@77
  1622
	    CASESDLK12TONAME(SDLK12_GREATER, ">");
icculus@77
  1623
	    CASESDLK12TONAME(SDLK12_QUESTION, "?");
icculus@77
  1624
	    CASESDLK12TONAME(SDLK12_AT, "@");
icculus@77
  1625
	    CASESDLK12TONAME(SDLK12_LEFTBRACKET, "[");
icculus@77
  1626
	    CASESDLK12TONAME(SDLK12_BACKSLASH, "\\");
icculus@77
  1627
	    CASESDLK12TONAME(SDLK12_RIGHTBRACKET, "]");
icculus@77
  1628
	    CASESDLK12TONAME(SDLK12_CARET, "^");
icculus@77
  1629
	    CASESDLK12TONAME(SDLK12_UNDERSCORE, "_");
icculus@77
  1630
	    CASESDLK12TONAME(SDLK12_BACKQUOTE, "`");
icculus@77
  1631
	    CASESDLK12TONAME(SDLK12_a, "a");
icculus@77
  1632
	    CASESDLK12TONAME(SDLK12_b, "b");
icculus@77
  1633
	    CASESDLK12TONAME(SDLK12_c, "c");
icculus@77
  1634
	    CASESDLK12TONAME(SDLK12_d, "d");
icculus@77
  1635
	    CASESDLK12TONAME(SDLK12_e, "e");
icculus@77
  1636
	    CASESDLK12TONAME(SDLK12_f, "f");
icculus@77
  1637
	    CASESDLK12TONAME(SDLK12_g, "g");
icculus@77
  1638
	    CASESDLK12TONAME(SDLK12_h, "h");
icculus@77
  1639
	    CASESDLK12TONAME(SDLK12_i, "i");
icculus@77
  1640
	    CASESDLK12TONAME(SDLK12_j, "j");
icculus@77
  1641
	    CASESDLK12TONAME(SDLK12_k, "k");
icculus@77
  1642
	    CASESDLK12TONAME(SDLK12_l, "l");
icculus@77
  1643
	    CASESDLK12TONAME(SDLK12_m, "m");
icculus@77
  1644
	    CASESDLK12TONAME(SDLK12_n, "n");
icculus@77
  1645
	    CASESDLK12TONAME(SDLK12_o, "o");
icculus@77
  1646
	    CASESDLK12TONAME(SDLK12_p, "p");
icculus@77
  1647
	    CASESDLK12TONAME(SDLK12_q, "q");
icculus@77
  1648
	    CASESDLK12TONAME(SDLK12_r, "r");
icculus@77
  1649
	    CASESDLK12TONAME(SDLK12_s, "s");
icculus@77
  1650
	    CASESDLK12TONAME(SDLK12_t, "t");
icculus@77
  1651
	    CASESDLK12TONAME(SDLK12_u, "u");
icculus@77
  1652
	    CASESDLK12TONAME(SDLK12_v, "v");
icculus@77
  1653
	    CASESDLK12TONAME(SDLK12_w, "w");
icculus@77
  1654
	    CASESDLK12TONAME(SDLK12_x, "x");
icculus@77
  1655
	    CASESDLK12TONAME(SDLK12_y, "y");
icculus@77
  1656
	    CASESDLK12TONAME(SDLK12_z, "z");
icculus@77
  1657
	    CASESDLK12TONAME(SDLK12_DELETE, "delete");
icculus@77
  1658
icculus@77
  1659
	    CASESDLK12TONAME(SDLK12_WORLD_0, "world 0");
icculus@77
  1660
	    CASESDLK12TONAME(SDLK12_WORLD_1, "world 1");
icculus@77
  1661
	    CASESDLK12TONAME(SDLK12_WORLD_2, "world 2");
icculus@77
  1662
	    CASESDLK12TONAME(SDLK12_WORLD_3, "world 3");
icculus@77
  1663
	    CASESDLK12TONAME(SDLK12_WORLD_4, "world 4");
icculus@77
  1664
	    CASESDLK12TONAME(SDLK12_WORLD_5, "world 5");
icculus@77
  1665
	    CASESDLK12TONAME(SDLK12_WORLD_6, "world 6");
icculus@77
  1666
	    CASESDLK12TONAME(SDLK12_WORLD_7, "world 7");
icculus@77
  1667
	    CASESDLK12TONAME(SDLK12_WORLD_8, "world 8");
icculus@77
  1668
	    CASESDLK12TONAME(SDLK12_WORLD_9, "world 9");
icculus@77
  1669
	    CASESDLK12TONAME(SDLK12_WORLD_10, "world 10");
icculus@77
  1670
	    CASESDLK12TONAME(SDLK12_WORLD_11, "world 11");
icculus@77
  1671
	    CASESDLK12TONAME(SDLK12_WORLD_12, "world 12");
icculus@77
  1672
	    CASESDLK12TONAME(SDLK12_WORLD_13, "world 13");
icculus@77
  1673
	    CASESDLK12TONAME(SDLK12_WORLD_14, "world 14");
icculus@77
  1674
	    CASESDLK12TONAME(SDLK12_WORLD_15, "world 15");
icculus@77
  1675
	    CASESDLK12TONAME(SDLK12_WORLD_16, "world 16");
icculus@77
  1676
	    CASESDLK12TONAME(SDLK12_WORLD_17, "world 17");
icculus@77
  1677
	    CASESDLK12TONAME(SDLK12_WORLD_18, "world 18");
icculus@77
  1678
	    CASESDLK12TONAME(SDLK12_WORLD_19, "world 19");
icculus@77
  1679
	    CASESDLK12TONAME(SDLK12_WORLD_20, "world 20");
icculus@77
  1680
	    CASESDLK12TONAME(SDLK12_WORLD_21, "world 21");
icculus@77
  1681
	    CASESDLK12TONAME(SDLK12_WORLD_22, "world 22");
icculus@77
  1682
	    CASESDLK12TONAME(SDLK12_WORLD_23, "world 23");
icculus@77
  1683
	    CASESDLK12TONAME(SDLK12_WORLD_24, "world 24");
icculus@77
  1684
	    CASESDLK12TONAME(SDLK12_WORLD_25, "world 25");
icculus@77
  1685
	    CASESDLK12TONAME(SDLK12_WORLD_26, "world 26");
icculus@77
  1686
	    CASESDLK12TONAME(SDLK12_WORLD_27, "world 27");
icculus@77
  1687
	    CASESDLK12TONAME(SDLK12_WORLD_28, "world 28");
icculus@77
  1688
	    CASESDLK12TONAME(SDLK12_WORLD_29, "world 29");
icculus@77
  1689
	    CASESDLK12TONAME(SDLK12_WORLD_30, "world 30");
icculus@77
  1690
	    CASESDLK12TONAME(SDLK12_WORLD_31, "world 31");
icculus@77
  1691
	    CASESDLK12TONAME(SDLK12_WORLD_32, "world 32");
icculus@77
  1692
	    CASESDLK12TONAME(SDLK12_WORLD_33, "world 33");
icculus@77
  1693
	    CASESDLK12TONAME(SDLK12_WORLD_34, "world 34");
icculus@77
  1694
	    CASESDLK12TONAME(SDLK12_WORLD_35, "world 35");
icculus@77
  1695
	    CASESDLK12TONAME(SDLK12_WORLD_36, "world 36");
icculus@77
  1696
	    CASESDLK12TONAME(SDLK12_WORLD_37, "world 37");
icculus@77
  1697
	    CASESDLK12TONAME(SDLK12_WORLD_38, "world 38");
icculus@77
  1698
	    CASESDLK12TONAME(SDLK12_WORLD_39, "world 39");
icculus@77
  1699
	    CASESDLK12TONAME(SDLK12_WORLD_40, "world 40");
icculus@77
  1700
	    CASESDLK12TONAME(SDLK12_WORLD_41, "world 41");
icculus@77
  1701
	    CASESDLK12TONAME(SDLK12_WORLD_42, "world 42");
icculus@77
  1702
	    CASESDLK12TONAME(SDLK12_WORLD_43, "world 43");
icculus@77
  1703
	    CASESDLK12TONAME(SDLK12_WORLD_44, "world 44");
icculus@77
  1704
	    CASESDLK12TONAME(SDLK12_WORLD_45, "world 45");
icculus@77
  1705
	    CASESDLK12TONAME(SDLK12_WORLD_46, "world 46");
icculus@77
  1706
	    CASESDLK12TONAME(SDLK12_WORLD_47, "world 47");
icculus@77
  1707
	    CASESDLK12TONAME(SDLK12_WORLD_48, "world 48");
icculus@77
  1708
	    CASESDLK12TONAME(SDLK12_WORLD_49, "world 49");
icculus@77
  1709
	    CASESDLK12TONAME(SDLK12_WORLD_50, "world 50");
icculus@77
  1710
	    CASESDLK12TONAME(SDLK12_WORLD_51, "world 51");
icculus@77
  1711
	    CASESDLK12TONAME(SDLK12_WORLD_52, "world 52");
icculus@77
  1712
	    CASESDLK12TONAME(SDLK12_WORLD_53, "world 53");
icculus@77
  1713
	    CASESDLK12TONAME(SDLK12_WORLD_54, "world 54");
icculus@77
  1714
	    CASESDLK12TONAME(SDLK12_WORLD_55, "world 55");
icculus@77
  1715
	    CASESDLK12TONAME(SDLK12_WORLD_56, "world 56");
icculus@77
  1716
	    CASESDLK12TONAME(SDLK12_WORLD_57, "world 57");
icculus@77
  1717
	    CASESDLK12TONAME(SDLK12_WORLD_58, "world 58");
icculus@77
  1718
	    CASESDLK12TONAME(SDLK12_WORLD_59, "world 59");
icculus@77
  1719
	    CASESDLK12TONAME(SDLK12_WORLD_60, "world 60");
icculus@77
  1720
	    CASESDLK12TONAME(SDLK12_WORLD_61, "world 61");
icculus@77
  1721
	    CASESDLK12TONAME(SDLK12_WORLD_62, "world 62");
icculus@77
  1722
	    CASESDLK12TONAME(SDLK12_WORLD_63, "world 63");
icculus@77
  1723
	    CASESDLK12TONAME(SDLK12_WORLD_64, "world 64");
icculus@77
  1724
	    CASESDLK12TONAME(SDLK12_WORLD_65, "world 65");
icculus@77
  1725
	    CASESDLK12TONAME(SDLK12_WORLD_66, "world 66");
icculus@77
  1726
	    CASESDLK12TONAME(SDLK12_WORLD_67, "world 67");
icculus@77
  1727
	    CASESDLK12TONAME(SDLK12_WORLD_68, "world 68");
icculus@77
  1728
	    CASESDLK12TONAME(SDLK12_WORLD_69, "world 69");
icculus@77
  1729
	    CASESDLK12TONAME(SDLK12_WORLD_70, "world 70");
icculus@77
  1730
	    CASESDLK12TONAME(SDLK12_WORLD_71, "world 71");
icculus@77
  1731
	    CASESDLK12TONAME(SDLK12_WORLD_72, "world 72");
icculus@77
  1732
	    CASESDLK12TONAME(SDLK12_WORLD_73, "world 73");
icculus@77
  1733
	    CASESDLK12TONAME(SDLK12_WORLD_74, "world 74");
icculus@77
  1734
	    CASESDLK12TONAME(SDLK12_WORLD_75, "world 75");
icculus@77
  1735
	    CASESDLK12TONAME(SDLK12_WORLD_76, "world 76");
icculus@77
  1736
	    CASESDLK12TONAME(SDLK12_WORLD_77, "world 77");
icculus@77
  1737
	    CASESDLK12TONAME(SDLK12_WORLD_78, "world 78");
icculus@77
  1738
	    CASESDLK12TONAME(SDLK12_WORLD_79, "world 79");
icculus@77
  1739
	    CASESDLK12TONAME(SDLK12_WORLD_80, "world 80");
icculus@77
  1740
	    CASESDLK12TONAME(SDLK12_WORLD_81, "world 81");
icculus@77
  1741
	    CASESDLK12TONAME(SDLK12_WORLD_82, "world 82");
icculus@77
  1742
	    CASESDLK12TONAME(SDLK12_WORLD_83, "world 83");
icculus@77
  1743
	    CASESDLK12TONAME(SDLK12_WORLD_84, "world 84");
icculus@77
  1744
	    CASESDLK12TONAME(SDLK12_WORLD_85, "world 85");
icculus@77
  1745
	    CASESDLK12TONAME(SDLK12_WORLD_86, "world 86");
icculus@77
  1746
	    CASESDLK12TONAME(SDLK12_WORLD_87, "world 87");
icculus@77
  1747
	    CASESDLK12TONAME(SDLK12_WORLD_88, "world 88");
icculus@77
  1748
	    CASESDLK12TONAME(SDLK12_WORLD_89, "world 89");
icculus@77
  1749
	    CASESDLK12TONAME(SDLK12_WORLD_90, "world 90");
icculus@77
  1750
	    CASESDLK12TONAME(SDLK12_WORLD_91, "world 91");
icculus@77
  1751
	    CASESDLK12TONAME(SDLK12_WORLD_92, "world 92");
icculus@77
  1752
	    CASESDLK12TONAME(SDLK12_WORLD_93, "world 93");
icculus@77
  1753
	    CASESDLK12TONAME(SDLK12_WORLD_94, "world 94");
icculus@77
  1754
	    CASESDLK12TONAME(SDLK12_WORLD_95, "world 95");
icculus@77
  1755
icculus@77
  1756
	    CASESDLK12TONAME(SDLK12_KP0, "[0]");
icculus@77
  1757
	    CASESDLK12TONAME(SDLK12_KP1, "[1]");
icculus@77
  1758
	    CASESDLK12TONAME(SDLK12_KP2, "[2]");
icculus@77
  1759
	    CASESDLK12TONAME(SDLK12_KP3, "[3]");
icculus@77
  1760
	    CASESDLK12TONAME(SDLK12_KP4, "[4]");
icculus@77
  1761
	    CASESDLK12TONAME(SDLK12_KP5, "[5]");
icculus@77
  1762
	    CASESDLK12TONAME(SDLK12_KP6, "[6]");
icculus@77
  1763
	    CASESDLK12TONAME(SDLK12_KP7, "[7]");
icculus@77
  1764
	    CASESDLK12TONAME(SDLK12_KP8, "[8]");
icculus@77
  1765
	    CASESDLK12TONAME(SDLK12_KP9, "[9]");
icculus@77
  1766
	    CASESDLK12TONAME(SDLK12_KP_PERIOD, "[.]");
icculus@77
  1767
	    CASESDLK12TONAME(SDLK12_KP_DIVIDE, "[/]");
icculus@77
  1768
	    CASESDLK12TONAME(SDLK12_KP_MULTIPLY, "[*]");
icculus@77
  1769
	    CASESDLK12TONAME(SDLK12_KP_MINUS, "[-]");
icculus@77
  1770
	    CASESDLK12TONAME(SDLK12_KP_PLUS, "[+]");
icculus@77
  1771
	    CASESDLK12TONAME(SDLK12_KP_ENTER, "enter");
icculus@77
  1772
	    CASESDLK12TONAME(SDLK12_KP_EQUALS, "equals");
icculus@77
  1773
icculus@77
  1774
	    CASESDLK12TONAME(SDLK12_UP, "up");
icculus@77
  1775
	    CASESDLK12TONAME(SDLK12_DOWN, "down");
icculus@77
  1776
	    CASESDLK12TONAME(SDLK12_RIGHT, "right");
icculus@77
  1777
	    CASESDLK12TONAME(SDLK12_LEFT, "left");
icculus@77
  1778
	    CASESDLK12TONAME(SDLK12_INSERT, "insert");
icculus@77
  1779
	    CASESDLK12TONAME(SDLK12_HOME, "home");
icculus@77
  1780
	    CASESDLK12TONAME(SDLK12_END, "end");
icculus@77
  1781
	    CASESDLK12TONAME(SDLK12_PAGEUP, "page up");
icculus@77
  1782
	    CASESDLK12TONAME(SDLK12_PAGEDOWN, "page down");
icculus@77
  1783
icculus@77
  1784
	    CASESDLK12TONAME(SDLK12_F1, "f1");
icculus@77
  1785
	    CASESDLK12TONAME(SDLK12_F2, "f2");
icculus@77
  1786
	    CASESDLK12TONAME(SDLK12_F3, "f3");
icculus@77
  1787
	    CASESDLK12TONAME(SDLK12_F4, "f4");
icculus@77
  1788
	    CASESDLK12TONAME(SDLK12_F5, "f5");
icculus@77
  1789
	    CASESDLK12TONAME(SDLK12_F6, "f6");
icculus@77
  1790
	    CASESDLK12TONAME(SDLK12_F7, "f7");
icculus@77
  1791
	    CASESDLK12TONAME(SDLK12_F8, "f8");
icculus@77
  1792
	    CASESDLK12TONAME(SDLK12_F9, "f9");
icculus@77
  1793
	    CASESDLK12TONAME(SDLK12_F10, "f10");
icculus@77
  1794
	    CASESDLK12TONAME(SDLK12_F11, "f11");
icculus@77
  1795
	    CASESDLK12TONAME(SDLK12_F12, "f12");
icculus@77
  1796
	    CASESDLK12TONAME(SDLK12_F13, "f13");
icculus@77
  1797
	    CASESDLK12TONAME(SDLK12_F14, "f14");
icculus@77
  1798
	    CASESDLK12TONAME(SDLK12_F15, "f15");
icculus@77
  1799
icculus@77
  1800
	    CASESDLK12TONAME(SDLK12_NUMLOCK, "numlock");
icculus@77
  1801
	    CASESDLK12TONAME(SDLK12_CAPSLOCK, "caps lock");
icculus@77
  1802
	    CASESDLK12TONAME(SDLK12_SCROLLOCK, "scroll lock");
icculus@77
  1803
	    CASESDLK12TONAME(SDLK12_RSHIFT, "right shift");
icculus@77
  1804
	    CASESDLK12TONAME(SDLK12_LSHIFT, "left shift");
icculus@77
  1805
	    CASESDLK12TONAME(SDLK12_RCTRL, "right ctrl");
icculus@77
  1806
	    CASESDLK12TONAME(SDLK12_LCTRL, "left ctrl");
icculus@77
  1807
	    CASESDLK12TONAME(SDLK12_RALT, "right alt");
icculus@77
  1808
	    CASESDLK12TONAME(SDLK12_LALT, "left alt");
icculus@77
  1809
	    CASESDLK12TONAME(SDLK12_RMETA, "right meta");
icculus@77
  1810
	    CASESDLK12TONAME(SDLK12_LMETA, "left meta");
icculus@77
  1811
	    CASESDLK12TONAME(SDLK12_LSUPER, "left super");	/* "Windows" keys */
icculus@77
  1812
	    CASESDLK12TONAME(SDLK12_RSUPER, "right super");	
icculus@77
  1813
	    CASESDLK12TONAME(SDLK12_MODE, "alt gr");
icculus@77
  1814
	    CASESDLK12TONAME(SDLK12_COMPOSE, "compose");
icculus@77
  1815
icculus@77
  1816
	    CASESDLK12TONAME(SDLK12_HELP, "help");
icculus@77
  1817
	    CASESDLK12TONAME(SDLK12_PRINT, "print screen");
icculus@77
  1818
	    CASESDLK12TONAME(SDLK12_SYSREQ, "sys req");
icculus@77
  1819
	    CASESDLK12TONAME(SDLK12_BREAK, "break");
icculus@77
  1820
	    CASESDLK12TONAME(SDLK12_MENU, "menu");
icculus@77
  1821
	    CASESDLK12TONAME(SDLK12_POWER, "power");
icculus@77
  1822
	    CASESDLK12TONAME(SDLK12_EURO, "euro");
icculus@77
  1823
	    CASESDLK12TONAME(SDLK12_UNDO, "undo");
icculus@77
  1824
        #undef CASESDLK12TONAME
icculus@77
  1825
        default: break;
icculus@77
  1826
    }
icculus@77
  1827
icculus@77
  1828
    return (char *) "unknown key";
icculus@77
  1829
}
icculus@77
  1830
icculus@77
  1831
static SDL12Key
icculus@77
  1832
Keysym20to12(const SDL_Keycode keysym20)
icculus@77
  1833
{
icculus@77
  1834
    if ( ((int) keysym20) < 127 ) {  /* (most of) low-ASCII maps directly */
icculus@77
  1835
        if (keysym20 == SDLK_PAUSE) {
icculus@77
  1836
            return SDLK12_PAUSE;
icculus@77
  1837
        } else if (keysym20 == SDLK_CLEAR) {
icculus@77
  1838
            return SDLK12_CLEAR;
icculus@77
  1839
        }
icculus@77
  1840
        return (SDL12Key) keysym20;
icculus@77
  1841
    }
icculus@77
  1842
icculus@77
  1843
    switch (keysym20) {
icculus@77
  1844
        #define CASEKEYSYM20TO12(k20, k12) case SDLK_##k20: return SDLK12_##k12
icculus@77
  1845
        CASEKEYSYM20TO12(KP_0, KP0);
icculus@77
  1846
        CASEKEYSYM20TO12(KP_1, KP1);
icculus@77
  1847
        CASEKEYSYM20TO12(KP_2, KP2);
icculus@77
  1848
        CASEKEYSYM20TO12(KP_3, KP3);
icculus@77
  1849
        CASEKEYSYM20TO12(KP_4, KP4);
icculus@77
  1850
        CASEKEYSYM20TO12(KP_5, KP5);
icculus@77
  1851
        CASEKEYSYM20TO12(KP_6, KP6);
icculus@77
  1852
        CASEKEYSYM20TO12(KP_7, KP7);
icculus@77
  1853
        CASEKEYSYM20TO12(KP_8, KP8);
icculus@77
  1854
        CASEKEYSYM20TO12(KP_9, KP9);
icculus@77
  1855
        CASEKEYSYM20TO12(NUMLOCKCLEAR, NUMLOCK);
icculus@77
  1856
        CASEKEYSYM20TO12(SCROLLLOCK, SCROLLOCK);
icculus@77
  1857
        CASEKEYSYM20TO12(RGUI, RMETA);
icculus@77
  1858
        CASEKEYSYM20TO12(LGUI, LMETA);
icculus@77
  1859
        CASEKEYSYM20TO12(PRINTSCREEN, PRINT);
icculus@77
  1860
        #undef CASEKEYSYM20TO12
icculus@77
  1861
icculus@77
  1862
        #define CASEKEYSYM20TO12(k) case SDLK_##k: return SDLK12_##k
icculus@77
  1863
        CASEKEYSYM20TO12(CLEAR);
icculus@77
  1864
        CASEKEYSYM20TO12(PAUSE);
icculus@77
  1865
        CASEKEYSYM20TO12(KP_PERIOD);
icculus@77
  1866
        CASEKEYSYM20TO12(KP_DIVIDE);
icculus@77
  1867
        CASEKEYSYM20TO12(KP_MULTIPLY);
icculus@77
  1868
        CASEKEYSYM20TO12(KP_MINUS);
icculus@77
  1869
        CASEKEYSYM20TO12(KP_PLUS);
icculus@77
  1870
        CASEKEYSYM20TO12(KP_ENTER);
icculus@77
  1871
        CASEKEYSYM20TO12(KP_EQUALS);
icculus@77
  1872
        CASEKEYSYM20TO12(UP);
icculus@77
  1873
        CASEKEYSYM20TO12(DOWN);
icculus@77
  1874
        CASEKEYSYM20TO12(RIGHT);
icculus@77
  1875
        CASEKEYSYM20TO12(LEFT);
icculus@77
  1876
        CASEKEYSYM20TO12(INSERT);
icculus@77
  1877
        CASEKEYSYM20TO12(HOME);
icculus@77
  1878
        CASEKEYSYM20TO12(END);
icculus@77
  1879
        CASEKEYSYM20TO12(PAGEUP);
icculus@77
  1880
        CASEKEYSYM20TO12(PAGEDOWN);
icculus@77
  1881
        CASEKEYSYM20TO12(F1);
icculus@77
  1882
        CASEKEYSYM20TO12(F2);
icculus@77
  1883
        CASEKEYSYM20TO12(F3);
icculus@77
  1884
        CASEKEYSYM20TO12(F4);
icculus@77
  1885
        CASEKEYSYM20TO12(F5);
icculus@77
  1886
        CASEKEYSYM20TO12(F6);
icculus@77
  1887
        CASEKEYSYM20TO12(F7);
icculus@77
  1888
        CASEKEYSYM20TO12(F8);
icculus@77
  1889
        CASEKEYSYM20TO12(F9);
icculus@77
  1890
        CASEKEYSYM20TO12(F10);
icculus@77
  1891
        CASEKEYSYM20TO12(F11);
icculus@77
  1892
        CASEKEYSYM20TO12(F12);
icculus@77
  1893
        CASEKEYSYM20TO12(F13);
icculus@77
  1894
        CASEKEYSYM20TO12(F14);
icculus@77
  1895
        CASEKEYSYM20TO12(F15);
icculus@77
  1896
        CASEKEYSYM20TO12(CAPSLOCK);
icculus@77
  1897
        CASEKEYSYM20TO12(RSHIFT);
icculus@77
  1898
        CASEKEYSYM20TO12(LSHIFT);
icculus@77
  1899
        CASEKEYSYM20TO12(RCTRL);
icculus@77
  1900
        CASEKEYSYM20TO12(LCTRL);
icculus@77
  1901
        CASEKEYSYM20TO12(RALT);
icculus@77
  1902
        CASEKEYSYM20TO12(LALT);
icculus@77
  1903
        CASEKEYSYM20TO12(MODE);
icculus@77
  1904
        CASEKEYSYM20TO12(HELP);
icculus@77
  1905
        CASEKEYSYM20TO12(SYSREQ);;
icculus@77
  1906
        CASEKEYSYM20TO12(MENU);
icculus@77
  1907
        CASEKEYSYM20TO12(POWER);
icculus@77
  1908
        CASEKEYSYM20TO12(UNDO);
icculus@77
  1909
        #undef CASEKEYSYM20TO12
icculus@77
  1910
        default: break;
icculus@77
  1911
    }
icculus@77
  1912
icculus@77
  1913
    FIXME("nothing maps to SDLK12_COMPOSE, SDLK12_BREAK, or SDLK12_EURO ...?");
icculus@77
  1914
    FIXME("map some of the SDLK12_WORLD keys");
icculus@77
  1915
    return SDLK12_UNKNOWN;
icculus@77
  1916
}
icculus@77
  1917
icculus@111
  1918
DECLSPEC Uint8 * SDLCALL
icculus@111
  1919
SDL_GetKeyState(int *numkeys)
icculus@111
  1920
{
icculus@111
  1921
    if (numkeys) {
icculus@111
  1922
        *numkeys = (int) SDL_arraysize(KeyState);
icculus@111
  1923
    }
icculus@111
  1924
    return KeyState;
icculus@111
  1925
}
icculus@111
  1926
icculus@111
  1927
icculus@18
  1928
static int
icculus@18
  1929
EventFilter20to12(void *data, SDL_Event *event20)
icculus@15
  1930
{
icculus@43
  1931
    //const int maxUserEvents12 = SDL12_NUMEVENTS - SDL12_USEREVENT;
icculus@18
  1932
    SDL12_Event event12;
icculus@32
  1933
    int x, y;
icculus@18
  1934
icculus@18
  1935
    SDL_assert(data == NULL);  /* currently unused. */
icculus@18
  1936
icculus@34
  1937
    SDL20_zero(event12);
icculus@18
  1938
icculus@18
  1939
    switch (event20->type)
icculus@18
  1940
    {
icculus@18
  1941
        case SDL_QUIT:
icculus@31
  1942
            event12.type = SDL12_QUIT;
icculus@18
  1943
            break;
icculus@18
  1944
icculus@18
  1945
        case SDL_WINDOWEVENT:
icculus@18
  1946
            switch (event20->window.event)
icculus@18
  1947
            {
icculus@18
  1948
                case SDL_WINDOWEVENT_CLOSE:
icculus@31
  1949
                    event12.type = SDL12_QUIT;
icculus@18
  1950
                    break;
icculus@18
  1951
icculus@18
  1952
                case SDL_WINDOWEVENT_SHOWN:
icculus@18
  1953
                case SDL_WINDOWEVENT_EXPOSED:
icculus@31
  1954
                    event12.type = SDL12_VIDEOEXPOSE;
icculus@18
  1955
                    break;
icculus@18
  1956
icculus@18
  1957
                case SDL_WINDOWEVENT_RESIZED:
icculus@54
  1958
                case SDL_WINDOWEVENT_SIZE_CHANGED:
icculus@54
  1959
                    FIXME("what's the difference between RESIZED and SIZE_CHANGED?");
icculus@31
  1960
                    event12.type = SDL12_VIDEORESIZE;
icculus@31
  1961
                    event12.resize.w = event20->window.data1;
icculus@31
  1962
                    event12.resize.h = event20->window.data2;
icculus@18
  1963
                    break;
icculus@18
  1964
icculus@18
  1965
                case SDL_WINDOWEVENT_MINIMIZED:
icculus@31
  1966
                    event12.type = SDL12_ACTIVEEVENT;
icculus@31
  1967
                    event12.active.gain = 0;
icculus@31
  1968
                    event12.active.state = SDL12_APPACTIVE;
icculus@18
  1969
                    break;
icculus@18
  1970
icculus@18
  1971
                case SDL_WINDOWEVENT_RESTORED:
icculus@31
  1972
                    event12.type = SDL12_ACTIVEEVENT;
icculus@31
  1973
                    event12.active.gain = 1;
icculus@31
  1974
                    event12.active.state = SDL12_APPACTIVE;
icculus@18
  1975
                    break;
icculus@18
  1976
icculus@18
  1977
                case SDL_WINDOWEVENT_ENTER:
icculus@31
  1978
                    event12.type = SDL12_ACTIVEEVENT;
icculus@31
  1979
                    event12.active.gain = 1;
icculus@31
  1980
                    event12.active.state = SDL12_APPMOUSEFOCUS;
icculus@18
  1981
                    break;
icculus@18
  1982
icculus@18
  1983
                case SDL_WINDOWEVENT_LEAVE:
icculus@31
  1984
                    event12.type = SDL12_ACTIVEEVENT;
icculus@31
  1985
                    event12.active.gain = 0;
icculus@31
  1986
                    event12.active.state = SDL12_APPMOUSEFOCUS;
icculus@18
  1987
                    break;
icculus@18
  1988
icculus@18
  1989
                case SDL_WINDOWEVENT_FOCUS_GAINED:
icculus@31
  1990
                    event12.type = SDL12_ACTIVEEVENT;
icculus@31
  1991
                    event12.active.gain = 1;
icculus@31
  1992
                    event12.active.state = SDL12_APPINPUTFOCUS;
icculus@18
  1993
                    break;
icculus@18
  1994
icculus@18
  1995
                case SDL_WINDOWEVENT_FOCUS_LOST:
icculus@31
  1996
                    event12.type = SDL12_ACTIVEEVENT;
icculus@31
  1997
                    event12.active.gain = 0;
icculus@31
  1998
                    event12.active.state = SDL12_APPINPUTFOCUS;
icculus@18
  1999
                    break;
icculus@18
  2000
            }
icculus@18
  2001
            break;
icculus@18
  2002
icculus@18
  2003
        // !!! FIXME: this is sort of a mess to convert.
icculus@77
  2004
        case SDL_SYSWMEVENT: FIXME("write me"); return 0;
icculus@77
  2005
icculus@77
  2006
        case SDL_KEYUP:
icculus@77
  2007
        case SDL_KEYDOWN:
icculus@77
  2008
            if (event20->key.repeat) {
icculus@77
  2009
                return 0;  /* ignore 2.0-style key repeat events */
icculus@77
  2010
            }
icculus@77
  2011
            event12.key.keysym.sym = Keysym20to12(event20->key.keysym.sym);
icculus@77
  2012
            if (event12.key.keysym.sym == SDLK12_UNKNOWN) {
icculus@77
  2013
                return 0;  /* drop it if we can't map it */
icculus@77
  2014
            }
icculus@111
  2015
icculus@111
  2016
            KeyState[event12.key.keysym.sym] = event20->key.state;
icculus@111
  2017
icculus@77
  2018
            event12.type = (event20->type == SDL_KEYDOWN) ? SDL12_KEYDOWN : SDL12_KEYUP;
icculus@77
  2019
            event12.key.which = 0;
icculus@77
  2020
            event12.key.state = event20->key.state;
icculus@77
  2021
            event12.key.keysym.scancode = (event20->key.keysym.scancode < 256) ? (Uint8) event20->key.keysym.scancode : 0;
icculus@77
  2022
            event12.key.keysym.mod = event20->key.keysym.mod;  /* these match up between 1.2 and 2.0! */
icculus@77
  2023
            event12.key.keysym.unicode = 0;  FIXME("unicode");
icculus@77
  2024
            break;
icculus@18
  2025
icculus@54
  2026
        case SDL_TEXTEDITING: FIXME("write me"); return 0;
icculus@54
  2027
        case SDL_TEXTINPUT: FIXME("write me"); return 0;
icculus@18
  2028
icculus@18
  2029
        case SDL_MOUSEMOTION:
icculus@31
  2030
        	event12.type = SDL12_MOUSEMOTION;
icculus@31
  2031
            event12.motion.which = (Uint8) event20->motion.which;
icculus@31
  2032
            event12.motion.state = event20->motion.state;
icculus@31
  2033
            event12.motion.x = (Uint16) event20->motion.x;
icculus@31
  2034
            event12.motion.y = (Uint16) event20->motion.y;
icculus@31
  2035
            event12.motion.xrel = (Sint16) event20->motion.xrel;
icculus@31
  2036
            event12.motion.yrel = (Sint16) event20->motion.yrel;
icculus@18
  2037
            break;
icculus@18
  2038
icculus@18
  2039
        case SDL_MOUSEBUTTONDOWN:
icculus@31
  2040
        	event12.type = SDL12_MOUSEBUTTONDOWN;
icculus@31
  2041
            event12.button.which = (Uint8) event20->button.which;
icculus@31
  2042
            event12.button.button = event20->button.button;
icculus@31
  2043
            event12.button.state = event20->button.state;
icculus@31
  2044
            event12.button.x = (Uint16) event20->button.x;
icculus@31
  2045
            event12.button.y = (Uint16) event20->button.y;
icculus@18
  2046
            break;
icculus@18
  2047
icculus@18
  2048
        case SDL_MOUSEBUTTONUP:
icculus@31
  2049
        	event12.type = SDL12_MOUSEBUTTONUP;
icculus@31
  2050
            event12.button.which = (Uint8) event20->button.which;
icculus@31
  2051
            event12.button.button = event20->button.button;
icculus@31
  2052
            event12.button.state = event20->button.state;
icculus@31
  2053
            event12.button.x = (Uint16) event20->button.x;
icculus@31
  2054
            event12.button.y = (Uint16) event20->button.y;
icculus@18
  2055
            break;
icculus@18
  2056
icculus@18
  2057
        case SDL_MOUSEWHEEL:
icculus@32
  2058
            if (event20->wheel.y == 0)
icculus@32
  2059
                break;  /* don't support horizontal wheels in 1.2. */
icculus@32
  2060
icculus@32
  2061
            event12.type = SDL12_MOUSEBUTTONDOWN;
icculus@32
  2062
            event12.button.which = (Uint8) event20->wheel.which;
icculus@32
  2063
            event12.button.button = (event20->wheel.y > 0) ? 4 : 5;  /* wheelup is 4, down is 5. */
icculus@32
  2064
            event12.button.state = SDL_GetMouseState(&x, &y);
icculus@32
  2065
            event12.button.x = (Uint16) x;
icculus@32
  2066
            event12.button.y = (Uint16) y;
icculus@32
  2067
            PushEventIfNotFiltered(&event12);
icculus@32
  2068
icculus@32
  2069
            event12.type = SDL12_MOUSEBUTTONUP;  /* immediately release mouse "button" at the end of this switch. */
icculus@18
  2070
            break;
icculus@18
  2071
icculus@18
  2072
        case SDL_JOYAXISMOTION:
icculus@31
  2073
            event12.type = SDL12_JOYAXISMOTION;
icculus@31
  2074
            event12.jaxis.which = (Uint8) event20->jaxis.which;
icculus@31
  2075
            event12.jaxis.axis = event20->jaxis.axis;
icculus@31
  2076
            event12.jaxis.value = event20->jaxis.value;
icculus@18
  2077
            break;
icculus@18
  2078
icculus@18
  2079
        case SDL_JOYBALLMOTION:
icculus@31
  2080
            event12.type = SDL12_JOYBALLMOTION;
icculus@31
  2081
            event12.jball.which = (Uint8) event20->jball.which;
icculus@31
  2082
            event12.jball.ball = event20->jball.ball;
icculus@31
  2083
            event12.jball.xrel = event20->jball.xrel;
icculus@31
  2084
            event12.jball.yrel = event20->jball.yrel;
icculus@18
  2085
            break;
icculus@18
  2086
icculus@18
  2087
        case SDL_JOYHATMOTION:
icculus@31
  2088
            event12.type = SDL12_JOYHATMOTION;
icculus@31
  2089
            event12.jhat.which = (Uint8) event20->jhat.which;
icculus@31
  2090
            event12.jhat.hat = event20->jhat.hat;
icculus@31
  2091
            event12.jhat.value = event20->jhat.value;
icculus@18
  2092
            break;
icculus@18
  2093
icculus@18
  2094
        case SDL_JOYBUTTONDOWN:
icculus@31
  2095
            event12.type = SDL12_JOYBUTTONDOWN;
icculus@31
  2096
            event12.jbutton.which = (Uint8) event20->jbutton.which;
icculus@31
  2097
            event12.jbutton.button = event20->jbutton.button;
icculus@31
  2098
            event12.jbutton.state = event20->jbutton.state;
icculus@18
  2099
            break;
icculus@18
  2100
icculus@18
  2101
        case SDL_JOYBUTTONUP:
icculus@31
  2102
            event12.type = SDL12_JOYBUTTONUP;
icculus@31
  2103
            event12.jbutton.which = (Uint8) event20->jbutton.which;
icculus@31
  2104
            event12.jbutton.button = event20->jbutton.button;
icculus@31
  2105
            event12.jbutton.state = event20->jbutton.state;
icculus@18
  2106
            break;
icculus@18
  2107
icculus@18
  2108
        //case SDL_JOYDEVICEADDED:
icculus@18
  2109
        //case SDL_JOYDEVICEREMOVED:
icculus@18
  2110
	    //case SDL_CONTROLLERAXISMOTION:
icculus@18
  2111
	    //case SDL_CONTROLLERBUTTONDOWN:
icculus@18
  2112
	    //case SDL_CONTROLLERBUTTONUP:
icculus@18
  2113
	    //case SDL_CONTROLLERDEVICEADDED:
icculus@18
  2114
	    //case SDL_CONTROLLERDEVICEREMOVED:
icculus@18
  2115
	    //case SDL_CONTROLLERDEVICEREMAPPED:
icculus@18
  2116
        //case SDL_FINGERDOWN:
icculus@18
  2117
        //case SDL_FINGERUP:
icculus@18
  2118
        //case SDL_FINGERMOTION:
icculus@18
  2119
        //case SDL_DOLLARGESTURE:
icculus@18
  2120
        //case SDL_DOLLARRECORD:
icculus@18
  2121
        //case SDL_MULTIGESTURE:
icculus@18
  2122
        //case SDL_CLIPBOARDUPDATE:
icculus@18
  2123
        //case SDL_DROPFILE:
icculus@18
  2124
icculus@18
  2125
        default:
icculus@18
  2126
            return 0;  /* drop everything else. */
icculus@18
  2127
    }
icculus@18
  2128
icculus@32
  2129
    PushEventIfNotFiltered(&event12);
icculus@18
  2130
icculus@18
  2131
    return 0;  /* always drop it from the 2.0 event queue. */
icculus@18
  2132
}
icculus@18
  2133
icculus@35
  2134
DECLSPEC void SDLCALL
icculus@18
  2135
SDL_SetEventFilter(SDL12_EventFilter filter12)
icculus@18
  2136
{
icculus@18
  2137
    /* We always have a filter installed, but will call the app's too. */
icculus@18
  2138
    EventFilter12 = filter12;
icculus@18
  2139
}
icculus@18
  2140
icculus@35
  2141
DECLSPEC SDL12_EventFilter SDLCALL
icculus@18
  2142
SDL_GetEventFilter(void)
icculus@18
  2143
{
icculus@18
  2144
    return EventFilter12;
icculus@18
  2145
}
icculus@18
  2146
icculus@15
  2147
icculus@73
  2148
static SDL12_Rect *
icculus@73
  2149
Rect20to12(const SDL_Rect *rect20, SDL12_Rect *rect12)
icculus@73
  2150
{
icculus@73
  2151
    rect12->x = (Sint16) rect20->x;
icculus@73
  2152
    rect12->y = (Sint16) rect20->y;
icculus@73
  2153
    rect12->w = (Uint16) rect20->w;
icculus@73
  2154
    rect12->h = (Uint16) rect20->h;
icculus@73
  2155
    return rect12;
icculus@73
  2156
}
icculus@73
  2157
icculus@73
  2158
static SDL_Rect *
icculus@73
  2159
Rect12to20(const SDL12_Rect *rect12, SDL_Rect *rect20)
icculus@73
  2160
{
icculus@73
  2161
    rect20->x = (int) rect12->x;
icculus@73
  2162
    rect20->y = (int) rect12->y;
icculus@73
  2163
    rect20->w = (int) rect12->w;
icculus@73
  2164
    rect20->h = (int) rect12->h;
icculus@73
  2165
    return rect20;
icculus@73
  2166
}
icculus@73
  2167
icculus@34
  2168
static SDL12_Surface *
icculus@15
  2169
Surface20to12(SDL_Surface *surface20)
icculus@15
  2170
{
icculus@15
  2171
    SDL12_Surface *surface12 = NULL;
icculus@15
  2172
    SDL12_Palette *palette12 = NULL;
icculus@15
  2173
    SDL12_PixelFormat *format12 = NULL;
icculus@31
  2174
    Uint32 flags = 0;
icculus@15
  2175
icculus@15
  2176
    if (!surface20)
icculus@15
  2177
        return NULL;
icculus@15
  2178
icculus@15
  2179
    surface12 = (SDL12_Surface *) SDL20_malloc(sizeof (SDL12_Surface));
icculus@15
  2180
    if (!surface12)
icculus@15
  2181
        goto failed;
icculus@15
  2182
icculus@79
  2183
    if (surface20->format->palette) {
icculus@79
  2184
        palette12 = (SDL12_Palette *) SDL20_malloc(sizeof (SDL12_Palette));
icculus@79
  2185
        if (!palette12)
icculus@79
  2186
            goto failed;
icculus@79
  2187
    }
icculus@15
  2188
icculus@15
  2189
    format12 = (SDL12_PixelFormat *) SDL20_malloc(sizeof (SDL12_PixelFormat));
icculus@15
  2190
    if (!format12)
icculus@15
  2191
        goto failed;
icculus@15
  2192
icculus@79
  2193
    if (palette12) {
icculus@79
  2194
        SDL20_zerop(palette12);
icculus@79
  2195
        SDL_assert(surface20->format->palette);
icculus@79
  2196
        palette12->ncolors = surface20->format->palette->ncolors;
icculus@79
  2197
        palette12->colors = surface20->format->palette->colors;
icculus@79
  2198
    }
icculus@15
  2199
icculus@34
  2200
    SDL20_zerop(format12);
icculus@15
  2201
    format12->palette = palette12;
icculus@15
  2202
    format12->BitsPerPixel = surface20->format->BitsPerPixel;
icculus@15
  2203
    format12->BytesPerPixel = surface20->format->BytesPerPixel;
icculus@15
  2204
    format12->Rloss = surface20->format->Rloss;
icculus@15
  2205
    format12->Gloss = surface20->format->Gloss;
icculus@15
  2206
    format12->Bloss = surface20->format->Bloss;
icculus@15
  2207
    format12->Aloss = surface20->format->Aloss;
icculus@15
  2208
    format12->Rshift = surface20->format->Rshift;
icculus@15
  2209
    format12->Gshift = surface20->format->Gshift;
icculus@15
  2210
    format12->Bshift = surface20->format->Bshift;
icculus@15
  2211
    format12->Ashift = surface20->format->Ashift;
icculus@15
  2212
    format12->Rmask = surface20->format->Rmask;
icculus@15
  2213
    format12->Gmask = surface20->format->Gmask;
icculus@15
  2214
    format12->Bmask = surface20->format->Bmask;
icculus@15
  2215
    format12->Amask = surface20->format->Amask;
icculus@100
  2216
icculus@100
  2217
    if (SDL20_HasColorKey(surface20)) {
icculus@100
  2218
        if (SDL20_GetColorKey(surface20, &format12->colorkey) == -1) {
icculus@100
  2219
            format12->colorkey = 0;
icculus@100
  2220
        } else {
icculus@100
  2221
            surface12->flags |= SDL12_SRCCOLORKEY;
icculus@100
  2222
        }
icculus@100
  2223
    }
icculus@100
  2224
icculus@100
  2225
    if (SDL20_GetSurfaceAlphaMod(surface20, &format12->alpha) == -1) {
icculus@100
  2226
        format12->alpha = 255;
icculus@100
  2227
    }
icculus@100
  2228
icculus@102
  2229
    SDL_BlendMode blendmode = SDL_BLENDMODE_NONE;
icculus@102
  2230
    if ((SDL20_GetSurfaceBlendMode(surface20, &blendmode) == 0) && (blendmode == SDL_BLENDMODE_BLEND)) {
icculus@100
  2231
        surface12->flags |= SDL12_SRCALPHA;
icculus@100
  2232
    }
icculus@100
  2233
icculus@34
  2234
    SDL20_zerop(surface12);
icculus@15
  2235
    flags = surface20->flags;
icculus@66
  2236
    flags &= ~SDL_SIMD_ALIGNED;  /* we don't need to map this to 1.2 */
icculus@15
  2237
    #define MAPSURFACEFLAGS(fl) { if (surface20->flags & SDL_##fl) { surface12->flags |= SDL12_##fl; flags &= ~SDL_##fl; } }
icculus@15
  2238
    MAPSURFACEFLAGS(PREALLOC);
icculus@15
  2239
    MAPSURFACEFLAGS(RLEACCEL);
icculus@34
  2240
    /*MAPSURFACEFLAGS(DONTFREE);*/
icculus@15
  2241
    #undef MAPSURFACEFLAGS
icculus@31
  2242
    SDL_assert(flags == 0);  /* non-zero if there's a flag we didn't map. */
icculus@15
  2243
icculus@15
  2244
    surface12->format = format12;
icculus@15
  2245
    surface12->w = surface20->w;
icculus@15
  2246
    surface12->h = surface20->h;
icculus@54
  2247
    surface12->pitch = (Uint16) surface20->pitch;  FIXME("make sure this fits in a Uint16");
icculus@15
  2248
    surface12->pixels = surface20->pixels;
icculus@15
  2249
    surface12->offset = 0;
icculus@34
  2250
    surface12->surface20 = surface20;
icculus@73
  2251
    Rect20to12(&surface20->clip_rect, &surface12->clip_rect);
icculus@15
  2252
    surface12->refcount = surface20->refcount;
icculus@15
  2253
icculus@15
  2254
    return surface12;
icculus@15
  2255
icculus@15
  2256
failed:
icculus@15
  2257
    SDL20_free(surface12);
icculus@15
  2258
    SDL20_free(palette12);
icculus@15
  2259
    SDL20_free(format12);
icculus@15
  2260
    return NULL;
icculus@15
  2261
}
icculus@15
  2262
icculus@100
  2263
static void
icculus@100
  2264
SetPalette12ForMasks(SDL12_Surface *surface12, const Uint32 Rmask, const Uint32 Gmask, const Uint32 Bmask)
icculus@100
  2265
{
icculus@100
  2266
    SDL12_PixelFormat *format12 = surface12->format;
icculus@100
  2267
    if (format12->palette && (Rmask || Bmask || Gmask)) {
icculus@100
  2268
        #define LOSSMASKSHIFTSETUP(t) { \
icculus@100
  2269
            format12->t##shift = 0; \
icculus@100
  2270
            format12->t##loss = 8; \
icculus@100
  2271
            if (t##mask) { \
icculus@100
  2272
                Uint32 mask; \
icculus@100
  2273
                for (mask = t##mask; !(mask & 1); mask >>= 1) { \
icculus@100
  2274
                    format12->t##shift++; \
icculus@100
  2275
                } \
icculus@100
  2276
                while (mask & 1) { \
icculus@100
  2277
                    format12->t##loss--; \
icculus@100
  2278
                    mask >>= 1; \
icculus@100
  2279
                } \
icculus@100
  2280
            } \
icculus@100
  2281
            format12->t##mask = t##mask; \
icculus@100
  2282
        }
icculus@100
  2283
        LOSSMASKSHIFTSETUP(R);
icculus@100
  2284
        LOSSMASKSHIFTSETUP(G);
icculus@100
  2285
        LOSSMASKSHIFTSETUP(B);
icculus@100
  2286
        #undef LOSSMASSSHIFTSETUP
icculus@100
  2287
        format12->Amask = 0;
icculus@100
  2288
        format12->Ashift = 0;
icculus@100
  2289
        format12->Aloss = 8;
icculus@100
  2290
icculus@100
  2291
        #define MASKSETUP(t) \
icculus@100
  2292
            int t##w = 0, t##m = 0; \
icculus@100
  2293
            if (t##mask) { \
icculus@100
  2294
            t##w = 8 - format12->t##loss; \
icculus@100
  2295
            for (int i = format12->t##loss; i > 0; i -= t##w) { \
icculus@100
  2296
                t##m |= 1 << i; \
icculus@100
  2297
            } \
icculus@100
  2298
        }
icculus@100
  2299
        MASKSETUP(R);
icculus@100
  2300
        MASKSETUP(G);
icculus@100
  2301
        MASKSETUP(B);
icculus@100
  2302
        #undef MASKSETUP
icculus@100
  2303
icculus@100
  2304
        const int ncolors = format12->palette->ncolors;
icculus@100
  2305
        SDL_Color *color = format12->palette->colors;
icculus@100
  2306
        for (int i = 0; i < ncolors; i++, color++) {
icculus@100
  2307
            #define SETCOLOR(T, t) { \
icculus@100
  2308
                const int x = (i & T##mask) >> format12->T##shift; \
icculus@100
  2309
                color->t = (x << format12->T##loss) | ((x * T##m) >> T##w); \
icculus@100
  2310
            }
icculus@100
  2311
            SETCOLOR(R, r);
icculus@100
  2312
            SETCOLOR(G, g);
icculus@100
  2313
            SETCOLOR(B, b);
icculus@100
  2314
            #undef SETCOLOR
icculus@100
  2315
            color->a = 255;
icculus@100
  2316
        }
icculus@100
  2317
icculus@100
  2318
        SDL_PixelFormat *format20 = surface12->surface20->format;
icculus@100
  2319
        #define UPDATEFMT20(t) \
icculus@100
  2320
            format20->t##mask = format12->t##mask; \
icculus@100
  2321
            format20->t##loss = format12->t##loss; \
icculus@100
  2322
            format20->t##shift = format12->t##shift;
icculus@100
  2323
        UPDATEFMT20(R);
icculus@100
  2324
        UPDATEFMT20(G);
icculus@100
  2325
        UPDATEFMT20(B);
icculus@100
  2326
        UPDATEFMT20(A);
icculus@100
  2327
        #undef UPDATEFMT20
icculus@100
  2328
    }
icculus@100
  2329
}
icculus@100
  2330
icculus@35
  2331
DECLSPEC SDL12_Surface * SDLCALL
icculus@100
  2332
SDL_CreateRGBSurface(Uint32 flags12, int width, int height, int depth, Uint32 Rmask, Uint32 Gmask, Uint32 Bmask, Uint32 Amask)
icculus@15
  2333
{
icculus@100
  2334
    // SDL 1.2 checks this.
icculus@100
  2335
    if ((width >= 16384) || (height >= 65536)) {
icculus@100
  2336
        SDL20_SetError("Width or height is too large");
icculus@100
  2337
        return NULL;
icculus@92
  2338
    }
icculus@100
  2339
icculus@100
  2340
    SDL_Surface *surface20;
icculus@100
  2341
    if (depth == 8) {  // don't pass masks to SDL2 for 8-bit surfaces, it'll cause problems.
icculus@100
  2342
        surface20 = SDL20_CreateRGBSurface(0, width, height, depth, 0, 0, 0, 0);
icculus@100
  2343
    } else {
icculus@100
  2344
        surface20 = SDL20_CreateRGBSurface(0, width, height, depth, Rmask, Gmask, Bmask, Amask);
icculus@100
  2345
    }
icculus@100
  2346
icculus@15
  2347
    SDL12_Surface *surface12 = Surface20to12(surface20);
icculus@15
  2348
    if (!surface12) {
icculus@15
  2349
        SDL20_FreeSurface(surface20);
icculus@15
  2350
        return NULL;
icculus@15
  2351
    }
icculus@15
  2352
icculus@100
  2353
    SDL_assert((surface12->flags & ~(SDL12_SRCCOLORKEY|SDL12_SRCALPHA)) == 0);  // shouldn't have prealloc, rleaccel, or dontfree.
icculus@100
  2354
icculus@100
  2355
    SetPalette12ForMasks(surface12, Rmask, Gmask, Bmask);
icculus@100
  2356
icculus@102
  2357
    if (flags12 & SDL12_SRCALPHA) {
icculus@102
  2358
        surface12->flags |= SDL12_SRCALPHA;
icculus@102
  2359
        SDL20_SetSurfaceBlendMode(surface20, SDL_BLENDMODE_BLEND);
icculus@102
  2360
    }
icculus@102
  2361
icculus@15
  2362
    return surface12;
icculus@15
  2363
}
icculus@15
  2364
icculus@35
  2365
DECLSPEC SDL12_Surface * SDLCALL
icculus@15
  2366
SDL_CreateRGBSurfaceFrom(void *pixels, int width, int height, int depth, int pitch, Uint32 Rmask, Uint32 Gmask, Uint32 Bmask, Uint32 Amask)
icculus@15
  2367
{
icculus@100
  2368
    if ((width >= 16384) || (height >= 65536)) {
icculus@100
  2369
        SDL20_SetError("Width or height is too large");
icculus@100
  2370
        return NULL;
icculus@92
  2371
    }
icculus@100
  2372
icculus@100
  2373
    SDL_Surface *surface20;
icculus@100
  2374
    if (depth == 8) {  // don't pass masks to SDL2 for 8-bit surfaces, it'll cause problems.
icculus@100
  2375
        surface20 = SDL20_CreateRGBSurfaceFrom(pixels, width, height, depth, pitch, 0, 0, 0, 0);
icculus@100
  2376
    } else {
icculus@100
  2377
        surface20 = SDL20_CreateRGBSurfaceFrom(pixels, width, height, depth, pitch, Rmask, Gmask, Bmask, Amask);
icculus@100
  2378
    }
icculus@100
  2379
icculus@15
  2380
    SDL12_Surface *surface12 = Surface20to12(surface20);
icculus@15
  2381
    if (!surface12) {
icculus@15
  2382
        SDL20_FreeSurface(surface20);
icculus@15
  2383
        return NULL;
icculus@15
  2384
    }
icculus@15
  2385
icculus@100
  2386
    SDL_assert((surface12->flags & ~(SDL12_SRCCOLORKEY|SDL12_SRCALPHA)) == SDL12_PREALLOC);  // should _only_ have prealloc.
icculus@100
  2387
icculus@100
  2388
    SetPalette12ForMasks(surface12, Rmask, Gmask, Bmask);
icculus@100
  2389
icculus@15
  2390
    return surface12;
icculus@15
  2391
}
icculus@15
  2392
icculus@35
  2393
DECLSPEC void SDLCALL
icculus@35
  2394
SDL_FreeSurface(SDL12_Surface *surface12)
icculus@15
  2395
{
icculus@114
  2396
    if (surface12 && (surface12 != VideoSurface12)) {
icculus@34
  2397
        SDL20_FreeSurface(surface12->surface20);
icculus@15
  2398
        if (surface12->format) {
icculus@15
  2399
            SDL20_free(surface12->format->palette);
icculus@15
  2400
            SDL20_free(surface12->format);
icculus@15
  2401
        }
icculus@15
  2402
        SDL20_free(surface12);
icculus@15
  2403
    }
icculus@15
  2404
}
icculus@15
  2405
icculus@35
  2406
DECLSPEC void SDLCALL
icculus@73
  2407
SDL_GetClipRect(SDL12_Surface *surface12, SDL12_Rect *rect)
icculus@24
  2408
{
icculus@73
  2409
    if (surface12 && rect) {
icculus@73
  2410
        SDL_memcpy(rect, &surface12->clip_rect, sizeof (SDL12_Rect));
icculus@73
  2411
    }
icculus@24
  2412
}
icculus@24
  2413
icculus@35
  2414
DECLSPEC SDL_bool SDLCALL
icculus@73
  2415
SDL_SetClipRect(SDL12_Surface *surface12, const SDL12_Rect *rect12)
icculus@24
  2416
{
icculus@24
  2417
    SDL_bool retval = SDL_FALSE;
icculus@24
  2418
    if (surface12)
icculus@24
  2419
    {
icculus@73
  2420
        SDL_Rect rect20;
icculus@73
  2421
        retval = SDL20_SetClipRect(surface12->surface20, rect12 ? Rect12to20(rect12, &rect20) : NULL);
icculus@73
  2422
        SDL20_GetClipRect(surface12->surface20, &rect20);
icculus@73
  2423
        Rect20to12(&rect20, &surface12->clip_rect);
icculus@24
  2424
    }
icculus@24
  2425
    return retval;
icculus@24
  2426
}
icculus@24
  2427
icculus@35
  2428
DECLSPEC int SDLCALL
icculus@73
  2429
SDL_FillRect(SDL12_Surface *dst, SDL12_Rect *dstrect12, Uint32 color)
icculus@25
  2430
{
icculus@73
  2431
    SDL_Rect dstrect20;
icculus@73
  2432
    const int retval = SDL20_FillRect(dst->surface20, dstrect12 ? Rect12to20(dstrect12, &dstrect20) : NULL, color);
icculus@25
  2433
    if (retval != -1)
icculus@25
  2434
    {
icculus@73
  2435
        if (dstrect12) {  /* 1.2 stores the clip intersection in dstrect */
icculus@73
  2436
            SDL_Rect intersected20;
icculus@73
  2437
            SDL20_IntersectRect(&dstrect20, &dst->surface20->clip_rect, &intersected20);
icculus@73
  2438
            Rect20to12(&intersected20, dstrect12);
icculus@67
  2439
        }
icculus@25
  2440
    }
icculus@25
  2441
    return retval;
icculus@25
  2442
}
icculus@25
  2443
icculus@35
  2444
DECLSPEC Uint32 SDLCALL
icculus@17
  2445
SDL_MapRGB(const SDL12_PixelFormat *format12, Uint8 r, Uint8 g, Uint8 b)
icculus@17
  2446
{
icculus@17
  2447
    /* This is probably way slower than apps expect. */
icculus@17
  2448
    SDL_PixelFormat format20;
icculus@17
  2449
    SDL_Palette palette20;
icculus@17
  2450
    return SDL20_MapRGB(PixelFormat12to20(&format20, &palette20, format12), r, g, b);
icculus@17
  2451
}
icculus@17
  2452
icculus@35
  2453
DECLSPEC Uint32 SDLCALL
icculus@17
  2454
SDL_MapRGBA(const SDL12_PixelFormat *format12, Uint8 r, Uint8 g, Uint8 b, Uint8 a)
icculus@17
  2455
{
icculus@17
  2456
    /* This is probably way slower than apps expect. */
icculus@17
  2457
    SDL_PixelFormat format20;
icculus@17
  2458
    SDL_Palette palette20;
icculus@17
  2459
    return SDL20_MapRGBA(PixelFormat12to20(&format20, &palette20, format12), r, g, b, a);
icculus@17
  2460
}
icculus@17
  2461
icculus@35
  2462
DECLSPEC void SDLCALL
icculus@17
  2463
SDL_GetRGB(Uint32 pixel, const SDL12_PixelFormat *format12, Uint8 *r, Uint8 *g, Uint8 *b)
icculus@17
  2464
{
icculus@17
  2465
    /* This is probably way slower than apps expect. */
icculus@17
  2466
    SDL_PixelFormat format20;
icculus@17
  2467
    SDL_Palette palette20;
icculus@17
  2468
    return SDL20_GetRGB(pixel, PixelFormat12to20(&format20, &palette20, format12), r, g, b);
icculus@17
  2469
}
icculus@17
  2470
icculus@35
  2471
DECLSPEC void SDLCALL
icculus@17
  2472
SDL_GetRGBA(Uint32 pixel, const SDL12_PixelFormat *format12, Uint8 *r, Uint8 *g, Uint8 *b, Uint8 *a)
icculus@17
  2473
{
icculus@17
  2474
    /* This is probably way slower than apps expect. */
icculus@17
  2475
    SDL_PixelFormat format20;
icculus@17
  2476
    SDL_Palette palette20;
icculus@31
  2477
    return SDL20_GetRGBA(pixel, PixelFormat12to20(&format20, &palette20, format12), r, g, b, a);
icculus@17
  2478
}
icculus@15
  2479
icculus@35
  2480
DECLSPEC const SDL12_VideoInfo * SDLCALL
icculus@9
  2481
SDL_GetVideoInfo(void)
icculus@9
  2482
{
icculus@117
  2483
    return VideoInfo12.vfmt ? &VideoInfo12 : NULL;
icculus@9
  2484
}
icculus@9
  2485
icculus@35
  2486
DECLSPEC int SDLCALL
icculus@9
  2487
SDL_VideoModeOK(int width, int height, int bpp, Uint32 sdl12flags)
icculus@9
  2488
{
icculus@9
  2489
    int i, nummodes, actual_bpp = 0;
icculus@9
  2490
icculus@9
  2491
    if (!SDL20_WasInit(SDL_INIT_VIDEO)) {
icculus@9
  2492
        return 0;
icculus@9
  2493
    }
icculus@9
  2494
icculus@9
  2495
    if (!(sdl12flags & SDL12_FULLSCREEN)) {
icculus@9
  2496
        SDL_DisplayMode mode;
icculus@16
  2497
        SDL20_GetDesktopDisplayMode(VideoDisplayIndex, &mode);
icculus@9
  2498
        return SDL_BITSPERPIXEL(mode.format);
icculus@9
  2499
    }
icculus@9
  2500
icculus@16
  2501
    nummodes = SDL20_GetNumDisplayModes(VideoDisplayIndex);
icculus@9
  2502
    for (i = 0; i < nummodes; ++i) {
icculus@9
  2503
        SDL_DisplayMode mode;
icculus@16
  2504
        SDL20_GetDisplayMode(VideoDisplayIndex, i, &mode);
icculus@9
  2505
        if (!mode.w || !mode.h || (width == mode.w && height == mode.h)) {
icculus@9
  2506
            if (!mode.format) {
icculus@9
  2507
                return bpp;
icculus@9
  2508
            }
icculus@9
  2509
            if (SDL_BITSPERPIXEL(mode.format) >= (Uint32) bpp) {
icculus@9
  2510
                actual_bpp = SDL_BITSPERPIXEL(mode.format);
icculus@9
  2511
            }
icculus@9
  2512
        }
icculus@9
  2513
    }
icculus@9
  2514
    return actual_bpp;
icculus@9
  2515
}
icculus@9
  2516
icculus@73
  2517
DECLSPEC SDL12_Rect ** SDLCALL
icculus@39
  2518
SDL_ListModes(const SDL12_PixelFormat *format12, Uint32 flags)
icculus@9
  2519
{
icculus@39
  2520
    Uint32 fmt;
icculus@39
  2521
    int i;
icculus@9
  2522
icculus@9
  2523
    if (!SDL20_WasInit(SDL_INIT_VIDEO)) {
icculus@9
  2524
        return NULL;
icculus@9
  2525
    }
icculus@9
  2526
icculus@56
  2527
    if ((!format12) && (!VideoInfo12.vfmt)) {
icculus@39
  2528
        SDL20_SetError("No pixel format specified");
icculus@39
  2529
        return NULL;
icculus@39
  2530
    }
icculus@39
  2531
icculus@9
  2532
    if (!(flags & SDL12_FULLSCREEN)) {
icculus@73
  2533
        return (SDL12_Rect **) (-1);  /* any resolution is fine. */
icculus@9
  2534
    }
icculus@9
  2535
icculus@117
  2536
    if (format12 && (format12 != VideoInfo12.vfmt)) {
icculus@39
  2537
        fmt = SDL20_MasksToPixelFormatEnum(format12->BitsPerPixel, format12->Rmask, format12->Gmask, format12->Bmask, format12->Amask);
icculus@39
  2538
    } else {
icculus@117
  2539
        fmt = VideoInfoVfmt20->format;
icculus@9
  2540
    }
icculus@9
  2541
icculus@39
  2542
    for (i = 0; i < VideoModesCount; i++) {
icculus@39
  2543
        VideoModeList *modes = &VideoModes[i];
icculus@39
  2544
        if (modes->format == fmt) {
icculus@73
  2545
            return modes->modes12;
icculus@9
  2546
        }
icculus@9
  2547
    }
icculus@39
  2548
icculus@39
  2549
    SDL20_SetError("No modes support requested pixel format");
icculus@39
  2550
    return NULL;
icculus@9
  2551
}
icculus@9
  2552
icculus@35
  2553
DECLSPEC void SDLCALL
icculus@31
  2554
SDL_FreeCursor(SDL12_Cursor *cursor12)
icculus@31
  2555
{
icculus@51
  2556
    if (cursor12) {
icculus@31
  2557
        if (cursor12->wm_cursor)
icculus@31
  2558
            SDL20_FreeCursor(cursor12->wm_cursor);
icculus@31
  2559
        SDL20_free(cursor12->data);
icculus@31
  2560
        SDL20_free(cursor12->mask);
icculus@31
  2561
        SDL20_free(cursor12);
icculus@31
  2562
    }
icculus@31
  2563
}
icculus@23
  2564
icculus@35
  2565
DECLSPEC SDL12_Cursor * SDLCALL
icculus@23
  2566
SDL_CreateCursor(Uint8 *data, Uint8 *mask, int w, int h, int hot_x, int hot_y)
icculus@23
  2567
{
icculus@23
  2568
    const size_t datasize = h * (w / 8);
icculus@23
  2569
    SDL_Cursor *cursor20 = NULL;
icculus@23
  2570
    SDL12_Cursor *retval = NULL;
icculus@23
  2571
icculus@23
  2572
    retval = (SDL12_Cursor *) SDL20_malloc(sizeof (SDL12_Cursor));
icculus@23
  2573
    if (!retval)
icculus@23
  2574
        goto outofmem;
icculus@23
  2575
icculus@34
  2576
    SDL20_zerop(retval);
icculus@23
  2577
icculus@23
  2578
    retval->data = (Uint8 *) SDL20_malloc(datasize);
icculus@31
  2579
    if (!retval->data)
icculus@23
  2580
        goto outofmem;
icculus@23
  2581
icculus@23
  2582
    retval->mask = (Uint8 *) SDL20_malloc(datasize);
icculus@31
  2583
    if (!retval->mask)
icculus@23
  2584
        goto outofmem;
icculus@23
  2585
icculus@23
  2586
    cursor20 = SDL20_CreateCursor(data, mask, w, h, hot_x, hot_y);
icculus@23
  2587
    if (!cursor20)
icculus@23
  2588
        goto failed;
icculus@23
  2589
icculus@23
  2590
    retval->area.w = w;
icculus@23
  2591
    retval->area.h = h;
icculus@23
  2592
    retval->hot_x = hot_x;
icculus@23
  2593
    retval->hot_y = hot_y;
icculus@23
  2594
    retval->wm_cursor = cursor20;
icculus@23
  2595
    /* we always leave retval->save as null pointers. */
icculus@23
  2596
icculus@23
  2597
    SDL20_memcpy(retval->data, data, datasize);
icculus@23
  2598
    SDL20_memcpy(retval->mask, mask, datasize);
icculus@23
  2599
icculus@23
  2600
    return retval;
icculus@23
  2601
icculus@23
  2602
outofmem:
icculus@31
  2603
    SDL20_OutOfMemory();
icculus@23
  2604
icculus@23
  2605
failed:
icculus@23
  2606
    SDL_FreeCursor(retval);
icculus@23
  2607
    return NULL;
icculus@23
  2608
}
icculus@23
  2609
icculus@35
  2610
DECLSPEC void SDLCALL
icculus@23
  2611
SDL_SetCursor(SDL12_Cursor *cursor)
icculus@23
  2612
{
icculus@56
  2613
    CurrentCursor12 = cursor;
icculus@23
  2614
    SDL20_SetCursor(cursor ? cursor->wm_cursor : NULL);
icculus@23
  2615
}
icculus@23
  2616
icculus@35
  2617
DECLSPEC SDL12_Cursor * SDLCALL
icculus@23
  2618
SDL_GetCursor(void)
icculus@23
  2619
{
icculus@56
  2620
    return CurrentCursor12;
icculus@23
  2621
}
icculus@23
  2622
icculus@9
  2623
static void
icculus@59
  2624
GetEnvironmentWindowPosition(int *x, int *y)
icculus@9
  2625
{
icculus@16
  2626
    int display = VideoDisplayIndex;
icculus@58
  2627
    const char *window = SDL20_getenv("SDL_VIDEO_WINDOW_POS");
icculus@58
  2628
    const char *center = SDL20_getenv("SDL_VIDEO_CENTERED");
icculus@9
  2629
    if (window) {
icculus@58
  2630
        if (SDL20_strcmp(window, "center") == 0) {
icculus@58
  2631
            center = window;
icculus@58
  2632
        } else if (SDL20_sscanf(window, "%d,%d", x, y) == 2) {
icculus@9
  2633
            return;
icculus@9
  2634
        }
icculus@9
  2635
    }
icculus@58
  2636
icculus@9
  2637
    if (center) {
icculus@9
  2638
        *x = SDL_WINDOWPOS_CENTERED_DISPLAY(display);
icculus@9
  2639
        *y = SDL_WINDOWPOS_CENTERED_DISPLAY(display);
icculus@9
  2640
    }
icculus@9
  2641
}
icculus@9
  2642
icculus@9
  2643
static void
icculus@49
  2644
SetupScreenSaver(const int flags12)
icculus@9
  2645
{
icculus@9
  2646
    const char *env;
icculus@9
  2647
    SDL_bool allow_screensaver;
icculus@9
  2648
icculus@9
  2649
    /* Allow environment override of screensaver disable */
icculus@58
  2650
    env = SDL20_getenv("SDL_VIDEO_ALLOW_SCREENSAVER");
icculus@9
  2651
    if (env) {
icculus@34
  2652
        allow_screensaver = SDL20_atoi(env) ? SDL_TRUE : SDL_FALSE;
icculus@19
  2653
    } else if (flags12 & SDL12_FULLSCREEN) {
icculus@9
  2654
        allow_screensaver = SDL_FALSE;
icculus@9
  2655
    } else {
icculus@9
  2656
        allow_screensaver = SDL_TRUE;
icculus@9
  2657
    }
icculus@9
  2658
    if (allow_screensaver) {
icculus@17
  2659
        SDL20_EnableScreenSaver();
icculus@9
  2660
    } else {
icculus@17
  2661
        SDL20_DisableScreenSaver();
icculus@9
  2662
    }
icculus@9
  2663
}
icculus@9
  2664
icculus@9
  2665
icculus@59
  2666
static SDL12_Surface *
icculus@59
  2667
EndVidModeCreate(void)
icculus@59
  2668
{
icculus@59
  2669
    if (VideoTexture20) {
icculus@59
  2670
        SDL20_DestroyTexture(VideoTexture20);
icculus@59
  2671
        VideoTexture20 = NULL;
icculus@59
  2672
    }
icculus@59
  2673
    if (VideoRenderer20) {
icculus@59
  2674
        SDL20_DestroyRenderer(VideoRenderer20);
icculus@59
  2675
        VideoRenderer20 = NULL;
icculus@59
  2676
    }
icculus@59
  2677
    if (VideoGLContext20) {
icculus@59
  2678
        SDL20_GL_MakeCurrent(NULL, NULL);
icculus@59
  2679
        SDL20_GL_DeleteContext(VideoGLContext20);
icculus@59
  2680
        VideoGLContext20 = NULL;
icculus@59
  2681
    }
icculus@59
  2682
    if (VideoWindow20) {
icculus@59
  2683
        SDL20_DestroyWindow(VideoWindow20);
icculus@59
  2684
        VideoWindow20 = NULL;
icculus@59
  2685
    }
icculus@59
  2686
    if (VideoSurface12) {
icculus@59
  2687
        SDL20_free(VideoSurface12->pixels);
icculus@59
  2688
        VideoSurface12->pixels = NULL;
icculus@59
  2689
        SDL_FreeSurface(VideoSurface12);
icculus@59
  2690
        VideoSurface12 = NULL;
icculus@59
  2691
    }
icculus@59
  2692
    if (VideoConvertSurface20) {
icculus@59
  2693
        SDL20_FreeSurface(VideoConvertSurface20);
icculus@59
  2694
        VideoConvertSurface20 = NULL;
icculus@59
  2695
    }
icculus@59
  2696
    return NULL;
icculus@59
  2697
}
icculus@59
  2698
icculus@59
  2699
icculus@59
  2700
static SDL12_Surface *
icculus@59
  2701
CreateSurface12WithFormat(const int w, const int h, const Uint32 fmt)
icculus@59
  2702
{
icculus@59
  2703
    Uint32 rmask, gmask, bmask, amask;
icculus@59
  2704
    int bpp;
icculus@59
  2705
    if (!SDL20_PixelFormatEnumToMasks(fmt, &bpp, &rmask, &gmask, &bmask, &amask)) {
icculus@59
  2706
        return NULL;
icculus@59
  2707
    }
icculus@59
  2708
    return SDL_CreateRGBSurface(0, w, h, bpp, rmask, gmask, bmask, amask);
icculus@59
  2709
}
icculus@59
  2710
icculus@59
  2711
static SDL_Surface *
icculus@59
  2712
CreateNullPixelSurface20(const int width, const int height, const Uint32 fmt)
icculus@59
  2713
{
icculus@59
  2714
    SDL_Su