949 lines
29 KiB
C++
949 lines
29 KiB
C++
/*
|
|
www.sourceforge.net/projects/dfhack
|
|
Copyright (c) 2009 Petr Mrázek (peterix)
|
|
|
|
This software is provided 'as-is', without any express or implied
|
|
warranty. In no event will the authors be held liable for any
|
|
damages arising from the use of this software.
|
|
|
|
Permission is granted to anyone to use this software for any
|
|
purpose, including commercial applications, and to alter it and
|
|
redistribute it freely, subject to the following restrictions:
|
|
|
|
1. The origin of this software must not be misrepresented; you must
|
|
not claim that you wrote the original software. If you use this
|
|
software in a product, an acknowledgment in the product documentation
|
|
would be appreciated but is not required.
|
|
|
|
2. Altered source versions must be plainly marked as such, and
|
|
must not be misrepresented as being the original software.
|
|
|
|
3. This notice may not be removed or altered from any source
|
|
distribution.
|
|
*/
|
|
|
|
/**
|
|
* This is the source for the DF <-> dfhack shm bridge,
|
|
* to be used with SDL 1.2 and DF 40d16. Windows sucks
|
|
* using hacks like this sucks even more
|
|
*/
|
|
|
|
#include <windows.h>
|
|
#include <stdarg.h>
|
|
|
|
#define DFhackCExport extern "C" __declspec(dllexport)
|
|
|
|
#include "dfhack/DFIntegers.h"
|
|
#include <vector>
|
|
#include <string>
|
|
#include "shms.h"
|
|
#include "mod-core.h"
|
|
#include <stdio.h>
|
|
int errorstate = 0;
|
|
char *shm = 0;
|
|
int shmid = 0;
|
|
bool inited = 0;
|
|
HANDLE shmHandle = 0;
|
|
|
|
HANDLE DFSVMutex = 0;
|
|
HANDLE DFCLMutex[SHM_MAX_CLIENTS];
|
|
HANDLE DFCLSuspendMutex[SHM_MAX_CLIENTS];
|
|
int held_DFCLSuspendMutex[SHM_MAX_CLIENTS];
|
|
int numheld = SHM_MAX_CLIENTS;
|
|
bool FirstCall();
|
|
|
|
void OS_lockSuspendLock(int which)
|
|
{
|
|
if(numheld == SHM_MAX_CLIENTS)
|
|
return;
|
|
// lock not held by server and can be picked up. OK.
|
|
if(held_DFCLSuspendMutex[which] == 0)
|
|
{
|
|
uint32_t state = WaitForSingleObject(DFCLSuspendMutex[which],INFINITE);
|
|
if(state == WAIT_ABANDONED || state == WAIT_OBJECT_0)
|
|
{
|
|
held_DFCLSuspendMutex[which] = 1;
|
|
numheld++;
|
|
return;
|
|
}
|
|
// lock couldn't be picked up!
|
|
errorstate = 1;
|
|
MessageBox(0,"Suspend lock locking failed. Further communication disabled!","Error", MB_OK);
|
|
return;
|
|
}
|
|
errorstate = 1;
|
|
MessageBox(0,"Server tried to lock already locked suspend lock? Further communication disabled!","Error", MB_OK);
|
|
return;
|
|
}
|
|
|
|
void OS_releaseSuspendLock(int which)
|
|
{
|
|
/*
|
|
if(which >=0 && which < SHM_MAX_CLIENTS)
|
|
return;
|
|
*/
|
|
if(numheld != SHM_MAX_CLIENTS)
|
|
{
|
|
MessageBox(0,"Locking system failure. Further communication disabled!","Error", MB_OK);
|
|
errorstate = 1;
|
|
return;
|
|
}
|
|
// lock hel by server and can be released -> OK
|
|
if(held_DFCLSuspendMutex[which] == 1 && ReleaseMutex(DFCLSuspendMutex[which]))
|
|
{
|
|
numheld--;
|
|
held_DFCLSuspendMutex[which] = 0;
|
|
}
|
|
// locked and not can't be released? FAIL!
|
|
else if (held_DFCLSuspendMutex[which] == 1)
|
|
{
|
|
MessageBox(0,"Suspend lock failed to unlock. Further communication disabled!","Error", MB_OK);
|
|
return;
|
|
}
|
|
}
|
|
|
|
|
|
void SHM_Init ( void )
|
|
{
|
|
// check that we do this only once per process
|
|
if(inited)
|
|
{
|
|
MessageBox(0,"SHM_Init was called twice or more!","FUN", MB_OK);
|
|
return;
|
|
}
|
|
inited = true;
|
|
|
|
|
|
char clmutexname [256];
|
|
char clsmutexname [256];
|
|
char shmname [256];
|
|
sprintf(shmname,"DFShm-%d",OS_getPID());
|
|
|
|
// create a locked server mutex
|
|
char svmutexname [256];
|
|
sprintf(svmutexname,"DFSVMutex-%d",OS_getPID());
|
|
DFSVMutex = CreateMutex( 0, 1, svmutexname);
|
|
if(DFSVMutex == 0)
|
|
{
|
|
MessageBox(0,"Server mutex creation failed. Further communication disabled!","Error", MB_OK);
|
|
errorstate = 1;
|
|
return;
|
|
}
|
|
// the mutex already existed. we don't want to know.
|
|
if(GetLastError() == ERROR_ALREADY_EXISTS)
|
|
{
|
|
MessageBox(0,"Server mutex already existed. Further communication disabled!","Error", MB_OK);
|
|
errorstate = 1;
|
|
return;
|
|
}
|
|
|
|
// create client and suspend mutexes
|
|
for(int i = 0; i < SHM_MAX_CLIENTS; i++)
|
|
{
|
|
sprintf(clmutexname,"DFCLMutex-%d-%d",OS_getPID(),i);
|
|
sprintf(clsmutexname,"DFCLSuspendMutex-%d-%d",OS_getPID(),i);
|
|
|
|
DFCLMutex[i] = CreateMutex( 0, 0, clmutexname); // client mutex, not held
|
|
DFCLSuspendMutex[i] = CreateMutex( 0, 1, clsmutexname); // suspend mutexes held on start
|
|
held_DFCLSuspendMutex[i] = 1;
|
|
|
|
if(DFCLMutex[i] == 0 || DFCLSuspendMutex[i] == 0 || GetLastError() == ERROR_ALREADY_EXISTS)
|
|
{
|
|
MessageBox(0,"Client mutex creation failed. Close all tools before starting DF.","Error", MB_OK);
|
|
errorstate = 1;
|
|
return;
|
|
}
|
|
}
|
|
|
|
// create virtual memory mapping
|
|
shmHandle = CreateFileMapping(INVALID_HANDLE_VALUE,NULL,PAGE_READWRITE,0,SHM_SIZE,shmname);
|
|
// if can't create or already exists -> nothing happens
|
|
if(GetLastError() == ERROR_ALREADY_EXISTS)
|
|
{
|
|
MessageBox(0,"SHM bridge already in use","Error", MB_OK);
|
|
errorstate = 1;
|
|
return;
|
|
}
|
|
if(!shmHandle)
|
|
{
|
|
MessageBox(0,"Couldn't create SHM bridge","Error", MB_OK);
|
|
errorstate = 1;
|
|
return;
|
|
}
|
|
// attempt to attach the created mapping
|
|
shm = (char *) MapViewOfFile(shmHandle,FILE_MAP_ALL_ACCESS, 0,0, SHM_SIZE);
|
|
if(shm)
|
|
{
|
|
// make sure we don't stall or do crazy stuff
|
|
for(int i = 0; i < SHM_MAX_CLIENTS;i++)
|
|
{
|
|
((uint32_t *)shm)[i] = CORE_RUNNING;
|
|
}
|
|
// init modules :)
|
|
InitModules();
|
|
}
|
|
else
|
|
{
|
|
MessageBox(0,"Couldn't attach SHM bridge","Error", MB_OK);
|
|
errorstate = 1;
|
|
return;
|
|
}
|
|
}
|
|
|
|
void SHM_Destroy ( void )
|
|
{
|
|
if(errorstate)
|
|
return;
|
|
KillModules();
|
|
// get rid of all the locks
|
|
CloseHandle(DFSVMutex);
|
|
for(int i=0; i < SHM_MAX_CLIENTS; i++)
|
|
{
|
|
CloseHandle(DFCLSuspendMutex[i]);
|
|
CloseHandle(DFCLMutex[i]);
|
|
}
|
|
}
|
|
|
|
uint32_t OS_getPID()
|
|
{
|
|
return GetCurrentProcessId();
|
|
}
|
|
|
|
// TODO: move to some utils file
|
|
uint32_t OS_getAffinity()
|
|
{
|
|
HANDLE hProcess = GetCurrentProcess();
|
|
DWORD dwProcessAffinityMask, dwSystemAffinityMask;
|
|
GetProcessAffinityMask( hProcess, &dwProcessAffinityMask, &dwSystemAffinityMask );
|
|
return dwProcessAffinityMask;
|
|
}
|
|
|
|
|
|
|
|
// is the other side still there?
|
|
bool isValidSHM(int which)
|
|
{
|
|
// try if CL mutex is free (by locking client mutex)
|
|
uint32_t result = WaitForSingleObject(DFCLMutex[which],0);
|
|
|
|
switch (result)
|
|
{
|
|
case WAIT_ABANDONED:
|
|
case WAIT_OBJECT_0:
|
|
{
|
|
OS_lockSuspendLock(which);
|
|
ReleaseMutex(DFCLMutex[which]);
|
|
return false;
|
|
}
|
|
case WAIT_TIMEOUT:
|
|
{
|
|
// mutex is held by a process already
|
|
return true;
|
|
}
|
|
default:
|
|
case WAIT_FAILED:
|
|
{
|
|
// TODO: now how do I respond to this?
|
|
return false;
|
|
}
|
|
}
|
|
}
|
|
|
|
/*************************************************************************/
|
|
// boring wrappers beyond this point. Only fix when broken
|
|
|
|
// function and variable pointer... we don't try to understand what SDL does here
|
|
typedef void * fPtr;
|
|
typedef void * vPtr;
|
|
|
|
/// wrappers for SDL 1.2 functions used in 40d16
|
|
/***** Condition variables
|
|
|
|
SDL_CreateCond
|
|
SDL_cond * SDLCALL SDL_CreateCond(void);
|
|
SDL_CondSignal
|
|
int SDLCALL SDL_CondSignal(SDL_cond *cond);
|
|
SDL_CondWait
|
|
int SDLCALL SDL_CondWait(SDL_cond *cond, SDL_mutex *mut);
|
|
SDL_DestroyCond
|
|
void SDLCALL SDL_DestroyCond(SDL_cond *cond);
|
|
*/
|
|
static vPtr (*_SDL_CreateCond)() = 0;
|
|
DFhackCExport vPtr SDL_CreateCond()
|
|
{
|
|
return _SDL_CreateCond();
|
|
}
|
|
|
|
static int (*_SDL_CondSignal)(vPtr cond) = 0;
|
|
DFhackCExport int SDL_CondSignal(vPtr cond)
|
|
{
|
|
return _SDL_CondSignal(cond);
|
|
}
|
|
|
|
static int (*_SDL_CondWait)(vPtr cond, vPtr mutex) = 0;
|
|
DFhackCExport int SDL_CondWait(vPtr cond, vPtr mutex)
|
|
{
|
|
return _SDL_CondWait(cond, mutex);
|
|
}
|
|
|
|
static void (*_SDL_DestroyCond)(vPtr cond) = 0;
|
|
DFhackCExport void SDL_DestroyCond(vPtr cond)
|
|
{
|
|
_SDL_DestroyCond(cond);
|
|
}
|
|
|
|
/***** mutexes
|
|
|
|
SDL_CreateMutex
|
|
SDL_mutex * SDLCALL SDL_CreateMutex(void);
|
|
SDL_mutexP
|
|
int SDLCALL SDL_mutexP(SDL_mutex *mutex);
|
|
SDL_DestroyMutex
|
|
void SDLCALL SDL_DestroyMutex(SDL_mutex *mutex);
|
|
*/
|
|
static vPtr (*_SDL_CreateMutex)(void) = 0;
|
|
DFhackCExport vPtr SDL_CreateMutex(void)
|
|
{
|
|
return _SDL_CreateMutex();
|
|
}
|
|
|
|
static int (*_SDL_mutexP)(vPtr mutex) = 0;
|
|
DFhackCExport int SDL_mutexP(vPtr mutex)
|
|
{
|
|
return _SDL_mutexP(mutex);
|
|
}
|
|
|
|
static void (*_SDL_DestroyMutex)(vPtr mutex) = 0;
|
|
DFhackCExport void SDL_DestroyMutex(vPtr mutex)
|
|
{
|
|
_SDL_DestroyMutex(mutex);
|
|
}
|
|
|
|
|
|
/***** timers
|
|
|
|
SDL_AddTimer
|
|
SDL_TimerID SDLCALL SDL_AddTimer(Uint32 interval, SDL_NewTimerCallback callback, void *param);
|
|
SDL_RemoveTimer
|
|
SDL_bool SDLCALL SDL_RemoveTimer(SDL_TimerID t);
|
|
SDL_GetTicks
|
|
Uint32 SDLCALL SDL_GetTicks(void);
|
|
*/
|
|
static vPtr (*_SDL_AddTimer)(uint32_t interval, fPtr callback, vPtr param) = 0;
|
|
DFhackCExport vPtr SDL_AddTimer(uint32_t interval, fPtr callback, vPtr param)
|
|
{
|
|
return _SDL_AddTimer(interval, callback, param);
|
|
}
|
|
|
|
static bool (*_SDL_RemoveTimer)(vPtr timer) = 0;
|
|
DFhackCExport bool SDL_RemoveTimer(vPtr timer)
|
|
{
|
|
return _SDL_RemoveTimer(timer);
|
|
}
|
|
|
|
static uint32_t (*_SDL_GetTicks)(void) = 0;
|
|
DFhackCExport uint32_t SDL_GetTicks(void)
|
|
{
|
|
return _SDL_GetTicks();
|
|
}
|
|
|
|
/***** Surfaces
|
|
SDL_CreateRGBSurface
|
|
SDL_Surface * SDLCALL SDL_CreateRGBSurface
|
|
(Uint32 flags, int width, int height, int depth,
|
|
Uint32 Rmask, Uint32 Gmask, Uint32 Bmask, Uint32 Amask);
|
|
|
|
SDL_CreateRGBSurfaceFrom
|
|
SDL_Surface * SDLCALL SDL_CreateRGBSurfaceFrom
|
|
(void *pixels, int width, int height, int depth, int pitch,
|
|
Uint32 Rmask, Uint32 Gmask, Uint32 Bmask, Uint32 Amask);
|
|
|
|
SDL_FreeSurface
|
|
void SDLCALL SDL_FreeSurface(SDL_Surface *surface);
|
|
|
|
SDL_ConvertSurface
|
|
SDL_Surface * SDLCALL SDL_ConvertSurface
|
|
(SDL_Surface *src, SDL_PixelFormat *fmt, Uint32 flags);
|
|
|
|
SDL_LockSurface
|
|
int SDLCALL SDL_LockSurface(SDL_Surface *surface);
|
|
|
|
SDL_UnlockSurface
|
|
void SDLCALL SDL_UnlockSurface(SDL_Surface *surface);
|
|
*/
|
|
|
|
static vPtr (*_SDL_CreateRGBSurface)(uint32_t flags, int width, int height, int depth,
|
|
uint32_t Rmask, uint32_t Gmask, uint32_t Bmask, uint32_t Amask) = 0;
|
|
DFhackCExport vPtr SDL_CreateRGBSurface(uint32_t flags, int width, int height, int depth,
|
|
uint32_t Rmask, uint32_t Gmask, uint32_t Bmask, uint32_t Amask)
|
|
{
|
|
return _SDL_CreateRGBSurface(flags, width, height, depth, Rmask, Gmask, Bmask, Amask);
|
|
}
|
|
|
|
static vPtr (*_SDL_CreateRGBSurfaceFrom)(vPtr pixels, int width, int height, int depth, int pitch,
|
|
uint32_t Rmask, uint32_t Gmask, uint32_t Bmask, uint32_t Amask) = 0;
|
|
DFhackCExport vPtr SDL_CreateRGBSurfaceFrom(vPtr pixels, int width, int height, int depth, int pitch,
|
|
uint32_t Rmask, uint32_t Gmask, uint32_t Bmask, uint32_t Amask)
|
|
{
|
|
return _SDL_CreateRGBSurfaceFrom(pixels, width, height, depth, pitch, Rmask, Gmask, Bmask, Amask);
|
|
}
|
|
|
|
static void (*_SDL_FreeSurface)(vPtr surface) = 0;
|
|
DFhackCExport void SDL_FreeSurface(vPtr surface)
|
|
{
|
|
_SDL_FreeSurface(surface);
|
|
}
|
|
|
|
static vPtr (*_SDL_ConvertSurface)(vPtr surface, vPtr format, uint32_t flags) = 0;
|
|
DFhackCExport vPtr SDL_ConvertSurface(vPtr surface, vPtr format, uint32_t flags)
|
|
{
|
|
return _SDL_ConvertSurface(surface, format, flags);
|
|
}
|
|
|
|
static int (*_SDL_LockSurface)(vPtr surface) = 0;
|
|
DFhackCExport int SDL_LockSurface(vPtr surface)
|
|
{
|
|
return _SDL_LockSurface(surface);
|
|
}
|
|
|
|
static void (*_SDL_UnlockSurface)(vPtr surface) = 0;
|
|
DFhackCExport void SDL_UnlockSurface(vPtr surface)
|
|
{
|
|
_SDL_UnlockSurface(surface);
|
|
}
|
|
|
|
/***** More surface stuff
|
|
SDL_MapRGB
|
|
Uint32 SDLCALL SDL_MapRGB
|
|
(const SDL_PixelFormat * const format, const Uint8 r, const Uint8 g, const Uint8 b);
|
|
|
|
SDL_SaveBMP_RW
|
|
int SDLCALL SDL_SaveBMP_RW
|
|
(SDL_Surface *surface, SDL_RWops *dst, int freedst);
|
|
|
|
SDL_SetAlpha
|
|
int SDLCALL SDL_SetAlpha(SDL_Surface *surface, Uint32 flag, Uint8 alpha);
|
|
|
|
SDL_SetColorKey
|
|
int SDLCALL SDL_SetColorKey(SDL_Surface *surface, Uint32 flag, Uint32 key);
|
|
|
|
SDL_GetVideoInfo
|
|
const SDL_VideoInfo * SDLCALL SDL_GetVideoInfo(void);
|
|
|
|
SDL_SetVideoMode
|
|
SDL_Surface * SDLCALL SDL_SetVideoMode
|
|
(int width, int height, int bpp, Uint32 flags);
|
|
|
|
SDL_UpperBlit
|
|
int SDLCALL SDL_UpperBlit
|
|
(SDL_Surface *src, SDL_Rect *srcrect, SDL_Surface *dst, SDL_Rect *dstrect);
|
|
*/
|
|
|
|
static uint32_t (*_SDL_MapRGB)(vPtr pixelformat, uint8_t r, uint8_t g, uint8_t b) = 0;
|
|
DFhackCExport uint32_t SDL_MapRGB(vPtr pixelformat, uint8_t r, uint8_t g, uint8_t b)
|
|
{
|
|
return _SDL_MapRGB(pixelformat,r,g,b);
|
|
}
|
|
|
|
static int (*_SDL_SaveBMP_RW)(vPtr surface, vPtr dst, int freedst) = 0;
|
|
DFhackCExport int SDL_SaveBMP_RW(vPtr surface, vPtr dst, int freedst)
|
|
{
|
|
return _SDL_SaveBMP_RW(surface,dst,freedst);
|
|
}
|
|
|
|
static int (*_SDL_SetAlpha)(vPtr surface, uint32_t flag, uint8_t alpha) = 0;
|
|
DFhackCExport int SDL_SetAlpha(vPtr surface, uint32_t flag, uint8_t alpha)
|
|
{
|
|
return _SDL_SetAlpha(surface,flag,alpha);
|
|
}
|
|
|
|
static int (*_SDL_SetColorKey)(vPtr surface, uint32_t flag, uint32_t key) = 0;
|
|
DFhackCExport int SDL_SetColorKey(vPtr surface, uint32_t flag, uint32_t key)
|
|
{
|
|
return _SDL_SetColorKey(surface,flag,key);
|
|
}
|
|
|
|
static vPtr (*_SDL_GetVideoInfo)(void) = 0;
|
|
DFhackCExport vPtr SDL_GetVideoInfo(void)
|
|
{
|
|
return _SDL_GetVideoInfo();
|
|
}
|
|
|
|
static vPtr (*_SDL_SetVideoMode)(int width, int height, int bpp, uint32_t flags) = 0;
|
|
DFhackCExport vPtr SDL_SetVideoMode(int width, int height, int bpp, uint32_t flags)
|
|
{
|
|
return _SDL_SetVideoMode(width, height, bpp, flags);
|
|
}
|
|
static int (*_SDL_UpperBlit)(vPtr src, vPtr srcrect, vPtr dst, vPtr dstrect) = 0;
|
|
DFhackCExport int SDL_UpperBlit(vPtr src, vPtr srcrect, vPtr dst, vPtr dstrect)
|
|
{
|
|
return _SDL_UpperBlit(src, srcrect, dst, dstrect);
|
|
}
|
|
|
|
/***** Even more surface
|
|
SDL_GL_GetAttribute
|
|
int SDLCALL SDL_GL_GetAttribute(SDL_GLattr attr, int* value);
|
|
|
|
SDL_GL_SetAttribute
|
|
int SDLCALL SDL_GL_SetAttribute(SDL_GLattr attr, int value);
|
|
|
|
SDL_WM_SetCaption
|
|
void SDLCALL SDL_WM_SetCaption(const char *title, const char *icon);
|
|
|
|
SDL_WM_SetIcon
|
|
void SDLCALL SDL_WM_SetIcon(SDL_Surface *icon, Uint8 *mask);
|
|
|
|
SDL_FillRect
|
|
int SDLCALL SDL_FillRect(SDL_Surface *dst, SDL_Rect *dstrect, Uint32 color);
|
|
*/
|
|
|
|
|
|
static void * (*_SDL_GetVideoSurface)( void ) = 0;
|
|
DFhackCExport void * SDL_GetVideoSurface(void)
|
|
{
|
|
return _SDL_GetVideoSurface();
|
|
}
|
|
|
|
static void * (*_SDL_DisplayFormat)( void * surface ) = 0;
|
|
DFhackCExport void * SDL_DisplayFormat(void *surface)
|
|
{
|
|
return _SDL_DisplayFormat(surface);
|
|
}
|
|
|
|
static int (*_SDL_GL_GetAttribute)(int attr, int * value) = 0;
|
|
DFhackCExport int SDL_GL_GetAttribute(int attr, int * value)
|
|
{
|
|
return _SDL_GL_GetAttribute(attr,value);
|
|
}
|
|
|
|
static int (*_SDL_GL_SetAttribute)(int attr, int value) = 0;
|
|
DFhackCExport int SDL_GL_SetAttribute(int attr, int value)
|
|
{
|
|
return _SDL_GL_SetAttribute(attr,value);
|
|
}
|
|
|
|
static void (*_SDL_WM_SetCaption)(const char *title, const char *icon) = 0;
|
|
DFhackCExport void SDL_WM_SetCaption(const char *title, const char *icon)
|
|
{
|
|
//_SDL_WM_SetCaption("DwarfHacked the Fortress of Hacks",icon);
|
|
_SDL_WM_SetCaption(title,icon);
|
|
}
|
|
|
|
static void (*_SDL_WM_SetIcon)(vPtr icon, uint8_t *mask) = 0;
|
|
DFhackCExport void SDL_WM_SetIcon(vPtr icon, uint8_t *mask)
|
|
{
|
|
_SDL_WM_SetIcon(icon, mask);
|
|
}
|
|
|
|
static int (*_SDL_FillRect)(vPtr dst, vPtr dstrect, uint32_t color) = 0;
|
|
DFhackCExport int SDL_FillRect(vPtr dst, vPtr dstrect, uint32_t color)
|
|
{
|
|
return _SDL_FillRect(dst,dstrect,color);
|
|
}
|
|
|
|
/***** Events and input
|
|
SDL_EnableKeyRepeat
|
|
int SDLCALL SDL_EnableKeyRepeat(int delay, int interval);
|
|
SDL_EnableUNICODE
|
|
int SDLCALL SDL_EnableUNICODE(int enable);
|
|
SDL_GetKeyState
|
|
Uint8 * SDLCALL SDL_GetKeyState(int *numkeys);
|
|
SDL_PollEvent
|
|
int SDLCALL SDL_PollEvent(SDL_Event *event);
|
|
*/
|
|
|
|
static int (*_SDL_EnableKeyRepeat)(int delay, int interval) = 0;
|
|
DFhackCExport int SDL_EnableKeyRepeat(int delay, int interval)
|
|
{
|
|
return _SDL_EnableKeyRepeat(delay, interval);
|
|
}
|
|
|
|
static int (*_SDL_EnableUNICODE)(int enable) = 0;
|
|
DFhackCExport int SDL_EnableUNICODE(int enable)
|
|
{
|
|
return _SDL_EnableUNICODE(enable);
|
|
}
|
|
|
|
static uint8_t * (*_SDL_GetKeyState)(int* numkeys) = 0;
|
|
DFhackCExport uint8_t * SDL_GetKeyState(int* numkeys)
|
|
{
|
|
return _SDL_GetKeyState(numkeys);
|
|
}
|
|
|
|
static int (*_SDL_PollEvent)(vPtr event) = 0;
|
|
DFhackCExport int SDL_PollEvent(vPtr event)
|
|
{
|
|
return _SDL_PollEvent(event);
|
|
}
|
|
|
|
/***** error handling
|
|
SDL_GetError
|
|
char * SDLCALL SDL_GetError(void);
|
|
SDL_SetError
|
|
extern DECLSPEC void SDLCALL SDL_SetError(const char *fmt, ...);
|
|
SDL_ClearError
|
|
extern DECLSPEC void SDLCALL SDL_ClearError(void);
|
|
SDL_Error
|
|
extern DECLSPEC void SDLCALL SDL_Error(SDL_errorcode code);
|
|
*/
|
|
|
|
static char * (*_SDL_GetError)(void) = 0;
|
|
DFhackCExport char * SDL_GetError(void)
|
|
{
|
|
return _SDL_GetError();
|
|
}
|
|
|
|
static void (*_SDL_SetError)(const char *fmt, ...) = 0;
|
|
DFhackCExport void SDL_SetError(const char *fmt, ...)
|
|
{
|
|
char buf[1024];
|
|
va_list args;
|
|
va_start(args,fmt);
|
|
vsnprintf(buf, sizeof(buf) - 1 ,fmt,args);
|
|
va_end(args);
|
|
_SDL_SetError(buf);
|
|
}
|
|
|
|
static void (*_SDL_ClearError)(void) = 0;
|
|
DFhackCExport void SDL_ClearError(void)
|
|
{
|
|
_SDL_ClearError();
|
|
}
|
|
|
|
static void (*_SDL_Error)(int code) = 0;
|
|
DFhackCExport void SDL_Error(int code)
|
|
{
|
|
_SDL_Error(code);
|
|
}
|
|
|
|
/***** symbol resolution
|
|
SDL_LoadFunction
|
|
extern DECLSPEC void * SDLCALL SDL_LoadFunction(void *handle, const char *name);
|
|
SDL_LoadObject
|
|
extern DECLSPEC void * SDLCALL SDL_LoadObject(const char *sofile);
|
|
SDL_UnloadObject
|
|
extern DECLSPEC void SDLCALL SDL_UnloadObject(void *handle);
|
|
*/
|
|
|
|
static vPtr (*_SDL_LoadFunction)(void *handle, const char *name) = 0;
|
|
DFhackCExport vPtr SDL_LoadFunction(void *handle, const char *name)
|
|
{
|
|
return _SDL_LoadFunction(handle, name);
|
|
}
|
|
|
|
static vPtr (*_SDL_LoadObject)(const char *sofile) = 0;
|
|
DFhackCExport vPtr SDL_LoadObject(const char *sofile)
|
|
{
|
|
return _SDL_LoadObject(sofile);
|
|
}
|
|
|
|
static void (*_SDL_UnloadObject)(vPtr handle) = 0;
|
|
DFhackCExport void SDL_UnloadObject(vPtr handle)
|
|
{
|
|
_SDL_UnloadObject(handle);
|
|
}
|
|
|
|
/***** r/w
|
|
SDL_ReadBE32
|
|
extern DECLSPEC Uint32 SDLCALL SDL_ReadBE32(SDL_RWops *src);
|
|
SDL_ReadLE16
|
|
extern DECLSPEC Uint16 SDLCALL SDL_ReadLE16(SDL_RWops *src);
|
|
SDL_ReadLE32
|
|
extern DECLSPEC Uint32 SDLCALL SDL_ReadLE32(SDL_RWops *src);
|
|
*/
|
|
|
|
static uint32_t (*_SDL_ReadBE32)(vPtr src) = 0;
|
|
DFhackCExport uint32_t SDL_ReadBE32(vPtr src)
|
|
{
|
|
return _SDL_ReadBE32(src);
|
|
}
|
|
|
|
static uint16_t (*_SDL_ReadLE16)(vPtr src) = 0;
|
|
DFhackCExport uint16_t SDL_ReadLE16(vPtr src)
|
|
{
|
|
return _SDL_ReadLE16(src);
|
|
}
|
|
|
|
static uint32_t (*_SDL_ReadLE32)(vPtr src) = 0;
|
|
DFhackCExport uint32_t SDL_ReadLE32(vPtr src)
|
|
{
|
|
return _SDL_ReadLE32(src);
|
|
}
|
|
|
|
/***** Misc
|
|
SDL_RWFromFile
|
|
SDL_RWops * SDLCALL SDL_RWFromFile(const char *file, const char *mode);
|
|
SDL_SetModuleHandle
|
|
void SDLCALL SDL_SetModuleHandle(void *hInst);
|
|
SDL_ShowCursor
|
|
int SDLCALL SDL_ShowCursor(int toggle);
|
|
SDL_strlcpy
|
|
size_t SDLCALL SDL_strlcpy(char *dst, const char *src, size_t maxlen);
|
|
*/
|
|
|
|
static vPtr (*_SDL_RWFromFile)(const char* file, const char *mode) = 0;
|
|
DFhackCExport vPtr SDL_RWFromFile(const char* file, const char *mode)
|
|
{
|
|
return _SDL_RWFromFile(file, mode);
|
|
}
|
|
|
|
static void (*_SDL_SetModuleHandle)(vPtr hInst) = 0;
|
|
DFhackCExport void SDL_SetModuleHandle(vPtr hInst)
|
|
{
|
|
_SDL_SetModuleHandle(hInst);
|
|
}
|
|
|
|
static int (*_SDL_ShowCursor)(int toggle) = 0;
|
|
DFhackCExport int SDL_ShowCursor(int toggle)
|
|
{
|
|
return _SDL_ShowCursor(toggle);
|
|
}
|
|
|
|
static size_t (*_SDL_strlcpy)(char *dst, const char *src, size_t maxlen) = 0;
|
|
DFhackCExport size_t SDL_strlcpy(char *dst, const char *src, size_t maxlen)
|
|
{
|
|
if(!_SDL_strlcpy)
|
|
{
|
|
HMODULE realSDLlib = LoadLibrary("SDLreal.dll");
|
|
_SDL_strlcpy = (size_t (*)(char*, const char*, size_t))GetProcAddress(realSDLlib,"SDL_strlcpy");
|
|
}
|
|
return _SDL_strlcpy(dst,src,maxlen);
|
|
}
|
|
|
|
/***** The real meat of this
|
|
SDL_Init
|
|
SDL_Quit
|
|
SDL_GL_SwapBuffers
|
|
void SDLCALL SDL_GL_SwapBuffers(void);
|
|
*/
|
|
|
|
|
|
// hook - called at program exit
|
|
static void (*_SDL_Quit)(void) = 0;
|
|
DFhackCExport void SDL_Quit(void)
|
|
{
|
|
fprintf(stderr,"Quitting!\n");
|
|
if(!errorstate)
|
|
{
|
|
SHM_Destroy();
|
|
errorstate = true;
|
|
}
|
|
if(_SDL_Quit)
|
|
{
|
|
_SDL_Quit();
|
|
}
|
|
}
|
|
// this is supported from 0.31.04 forward
|
|
DFhackCExport int SDL_NumJoysticks(void)
|
|
{
|
|
if(errorstate)
|
|
return -1;
|
|
if(!inited)
|
|
{
|
|
SHM_Init();
|
|
return -2;
|
|
}
|
|
SHM_Act();
|
|
return -3;
|
|
}
|
|
|
|
static void (*_SDL_GL_SwapBuffers)(void) = 0;
|
|
DFhackCExport void SDL_GL_SwapBuffers(void)
|
|
{
|
|
if(!inited)
|
|
FirstCall();
|
|
_SDL_GL_SwapBuffers();
|
|
}
|
|
|
|
// hook - called every tick in the 2D mode of DF
|
|
static int (*_SDL_Flip)(void * some_ptr) = 0;
|
|
DFhackCExport int SDL_Flip(void * some_ptr)
|
|
{
|
|
if(!inited)
|
|
FirstCall();
|
|
return _SDL_Flip(some_ptr);
|
|
}
|
|
|
|
static int (*_SDL_Init)(uint32_t flags) = 0;
|
|
DFhackCExport int SDL_Init(uint32_t flags)
|
|
{
|
|
if(!inited)
|
|
FirstCall();
|
|
return _SDL_Init(flags);
|
|
}
|
|
|
|
/*
|
|
MORE CRAP
|
|
*/
|
|
static void * (*_SDL_CreateSemaphore)(uint32_t initial_value) = 0;
|
|
DFhackCExport void *SDL_CreateSemaphore(uint32_t initial_value)
|
|
{
|
|
if(!inited)
|
|
FirstCall();
|
|
return _SDL_CreateSemaphore(initial_value);
|
|
}
|
|
|
|
static void * (*_SDL_CreateThread)(int (*fn)(void *), void *data) = 0;
|
|
DFhackCExport void *SDL_CreateThread(int (*fn)(void *), void *data)
|
|
{
|
|
if(!inited)
|
|
FirstCall();
|
|
return _SDL_CreateThread(fn,data);
|
|
}
|
|
|
|
|
|
static void (*_SDL_Delay)(uint32_t ms) = 0;
|
|
DFhackCExport void SDL_Delay(uint32_t ms)
|
|
{
|
|
if(!inited)
|
|
FirstCall();
|
|
_SDL_Delay(ms);
|
|
}
|
|
|
|
static void (*_SDL_DestroySemaphore)(void *sem) = 0;
|
|
DFhackCExport void SDL_DestroySemaphore(void *sem)
|
|
{
|
|
if(!inited)
|
|
FirstCall();
|
|
_SDL_DestroySemaphore(sem);
|
|
}
|
|
|
|
static uint8_t (*_SDL_GetAppState)(void) = 0;
|
|
DFhackCExport uint8_t SDL_GetAppState(void)
|
|
{
|
|
if(!inited)
|
|
FirstCall();
|
|
return _SDL_GetAppState();
|
|
}
|
|
|
|
static uint8_t (*_SDL_GetMouseState)(int *, int *) = 0;
|
|
DFhackCExport uint8_t SDL_GetMouseState(int *x, int *y)
|
|
{
|
|
if(!inited)
|
|
FirstCall();
|
|
return _SDL_GetMouseState(x,y);
|
|
}
|
|
|
|
static int (*_SDL_InitSubSystem)(uint32_t flags) = 0;
|
|
DFhackCExport int SDL_InitSubSystem(uint32_t flags)
|
|
{
|
|
if(!inited)
|
|
FirstCall();
|
|
return _SDL_InitSubSystem(flags);
|
|
}
|
|
|
|
static int (*_SDL_SemPost)(void *sem) = 0;
|
|
DFhackCExport int SDL_SemPost(void *sem)
|
|
{
|
|
if(!inited)
|
|
FirstCall();
|
|
return _SDL_SemPost(sem);
|
|
}
|
|
|
|
static int (*_SDL_SemTryWait)(void *sem) = 0;
|
|
DFhackCExport int SDL_SemTryWait(void *sem)
|
|
{
|
|
if(!inited)
|
|
FirstCall();
|
|
return _SDL_SemTryWait(sem);
|
|
}
|
|
|
|
static int (*_SDL_SemWait)(void *sem) = 0;
|
|
DFhackCExport int SDL_SemWait(void *sem)
|
|
{
|
|
if(!inited)
|
|
FirstCall();
|
|
return _SDL_SemWait(sem);
|
|
}
|
|
|
|
static uint32_t (*_SDL_ThreadID)(void) = 0;
|
|
DFhackCExport uint32_t SDL_ThreadID(void)
|
|
{
|
|
if(!inited)
|
|
FirstCall();
|
|
return _SDL_ThreadID();
|
|
}
|
|
|
|
// this has to be thread-safe. Let's hope it is.
|
|
bool FirstCall()
|
|
{
|
|
HMODULE realSDLlib = LoadLibrary("SDLreal.dll");
|
|
if(!realSDLlib)
|
|
{
|
|
MessageBox(0,"Can't load SDLreal.dll\n","Error", MB_OK);
|
|
fprintf(stderr, "Can't load SDLreal.dll\n");
|
|
return 0;
|
|
}
|
|
// stuff for DF
|
|
_SDL_AddTimer = (void*(*)(uint32_t, void*, void*)) GetProcAddress(realSDLlib,"SDL_AddTimer");
|
|
_SDL_CondSignal = (int (*)(void*))GetProcAddress(realSDLlib,"SDL_CondSignal");
|
|
_SDL_CondWait = (int (*)(void*, void*))GetProcAddress(realSDLlib,"SDL_CondWait");
|
|
_SDL_ConvertSurface = (void*(*)(void*, void*, uint32_t))GetProcAddress(realSDLlib,"SDL_ConvertSurface");
|
|
_SDL_CreateCond = (void*(*)())GetProcAddress(realSDLlib,"SDL_CreateCond");
|
|
_SDL_CreateMutex = (void*(*)())GetProcAddress(realSDLlib,"SDL_CreateMutex");
|
|
_SDL_CreateRGBSurface = (void*(*)(uint32_t, int, int, int, uint32_t, uint32_t, uint32_t, uint32_t))GetProcAddress(realSDLlib,"SDL_CreateRGBSurface");
|
|
_SDL_CreateRGBSurfaceFrom = (void*(*)(void*, int, int, int, int, uint32_t, uint32_t, uint32_t, uint32_t))GetProcAddress(realSDLlib,"SDL_CreateRGBSurfaceFrom");
|
|
_SDL_DestroyCond = (void (*)(void*))GetProcAddress(realSDLlib,"SDL_DestroyCond");
|
|
_SDL_DestroyMutex = (void (*)(void*))GetProcAddress(realSDLlib,"SDL_DestroyMutex");
|
|
_SDL_EnableKeyRepeat = (int (*)(int, int))GetProcAddress(realSDLlib,"SDL_EnableKeyRepeat");
|
|
_SDL_EnableUNICODE = (int (*)(int))GetProcAddress(realSDLlib,"SDL_EnableUNICODE");
|
|
_SDL_GetVideoSurface = (void*(*)())GetProcAddress(realSDLlib,"SDL_GetVideoSurface");
|
|
_SDL_DisplayFormat = (void * (*) (void *))GetProcAddress(realSDLlib,"SDL_DisplayFormat");
|
|
_SDL_FreeSurface = (void (*)(void*))GetProcAddress(realSDLlib,"SDL_FreeSurface");
|
|
_SDL_GL_GetAttribute = (int (*)(int, int*))GetProcAddress(realSDLlib,"SDL_GL_GetAttribute");
|
|
_SDL_GL_SetAttribute = (int (*)(int, int))GetProcAddress(realSDLlib,"SDL_GL_SetAttribute");
|
|
_SDL_GL_SwapBuffers = (void (*)())GetProcAddress(realSDLlib,"SDL_GL_SwapBuffers");
|
|
_SDL_GetError = (char*(*)())GetProcAddress(realSDLlib,"SDL_GetError");
|
|
_SDL_GetKeyState = (uint8_t*(*)(int*))GetProcAddress(realSDLlib,"SDL_GetKeyState");
|
|
_SDL_GetTicks = (uint32_t (*)())GetProcAddress(realSDLlib,"SDL_GetTicks");
|
|
_SDL_GetVideoInfo = (void*(*)())GetProcAddress(realSDLlib,"SDL_GetVideoInfo");
|
|
_SDL_Init = (int (*)(uint32_t))GetProcAddress(realSDLlib,"SDL_Init");
|
|
_SDL_Flip = (int (*)( void * )) GetProcAddress(realSDLlib, "SDL_Flip");
|
|
_SDL_LockSurface = (int (*)(void*))GetProcAddress(realSDLlib,"SDL_LockSurface");
|
|
_SDL_MapRGB = (uint32_t (*)(void*, uint8_t, uint8_t, uint8_t))GetProcAddress(realSDLlib,"SDL_MapRGB");
|
|
_SDL_PollEvent = (int (*)(void*))GetProcAddress(realSDLlib,"SDL_PollEvent");
|
|
_SDL_Quit = (void (*)())GetProcAddress(realSDLlib,"SDL_Quit");
|
|
_SDL_RWFromFile = (void*(*)(const char*, const char*))GetProcAddress(realSDLlib,"SDL_RWFromFile");
|
|
_SDL_RemoveTimer = (bool (*)(void*))GetProcAddress(realSDLlib,"SDL_RemoveTimer");
|
|
_SDL_SaveBMP_RW = (int (*)(void*, void*, int))GetProcAddress(realSDLlib,"SDL_SaveBMP_RW");
|
|
_SDL_SetAlpha = (int (*)(void*, uint32_t, uint8_t))GetProcAddress(realSDLlib,"SDL_SetAlpha");
|
|
_SDL_SetColorKey = (int (*)(void*, uint32_t, uint32_t))GetProcAddress(realSDLlib,"SDL_SetColorKey");
|
|
_SDL_SetModuleHandle = (void (*)(void*))GetProcAddress(realSDLlib,"SDL_SetModuleHandle");
|
|
_SDL_SetVideoMode = (void*(*)(int, int, int, uint32_t))GetProcAddress(realSDLlib,"SDL_SetVideoMode");
|
|
_SDL_ShowCursor = (int (*)(int))GetProcAddress(realSDLlib,"SDL_ShowCursor");
|
|
_SDL_UnlockSurface = (void (*)(void*))GetProcAddress(realSDLlib,"SDL_UnlockSurface");
|
|
_SDL_UpperBlit = (int (*)(void*, void*, void*, void*))GetProcAddress(realSDLlib,"SDL_UpperBlit");
|
|
_SDL_WM_SetCaption = (void (*)(const char*, const char*))GetProcAddress(realSDLlib,"SDL_WM_SetCaption");
|
|
_SDL_WM_SetIcon = (void (*)(void*, uint8_t*))GetProcAddress(realSDLlib,"SDL_WM_SetIcon");
|
|
_SDL_mutexP = (int (*)(void*))GetProcAddress(realSDLlib,"SDL_mutexP");
|
|
_SDL_strlcpy = (size_t (*)(char*, const char*, size_t))GetProcAddress(realSDLlib,"SDL_strlcpy");
|
|
|
|
// stuff for SDL_Image
|
|
_SDL_ClearError = (void (*)())GetProcAddress(realSDLlib,"SDL_ClearError");
|
|
_SDL_Error = (void (*)(int))GetProcAddress(realSDLlib,"SDL_Error");
|
|
_SDL_LoadFunction = (void*(*)(void*, const char*))GetProcAddress(realSDLlib,"SDL_LoadFunction");
|
|
_SDL_LoadObject = (void*(*)(const char*))GetProcAddress(realSDLlib,"SDL_LoadObject");
|
|
_SDL_ReadBE32 = (uint32_t (*)(void*))GetProcAddress(realSDLlib,"SDL_ReadBE32");
|
|
_SDL_ReadLE16 = (uint16_t (*)(void*))GetProcAddress(realSDLlib,"SDL_ReadLE16");
|
|
_SDL_ReadLE32 = (uint32_t (*)(void*))GetProcAddress(realSDLlib,"SDL_ReadLE32");
|
|
_SDL_SetError = (void (*)(const char*, ...))GetProcAddress(realSDLlib,"SDL_SetError");
|
|
_SDL_UnloadObject = (void (*)(void*))GetProcAddress(realSDLlib,"SDL_UnloadObject");
|
|
_SDL_FillRect = (int (*)(void*,void*,uint32_t))GetProcAddress(realSDLlib,"SDL_FillRect");
|
|
|
|
// new in DF 0.31.04
|
|
_SDL_CreateSemaphore = (void* (*)(uint32_t))GetProcAddress(realSDLlib,"SDL_CreateSemaphore");
|
|
_SDL_CreateThread = (void* (*)(int (*fn)(void *), void *data))GetProcAddress(realSDLlib,"SDL_CreateThread");
|
|
_SDL_Delay = (void (*)(uint32_t))GetProcAddress(realSDLlib,"SDL_Delay");
|
|
_SDL_DestroySemaphore = (void (*)(void *))GetProcAddress(realSDLlib,"SDL_DestroySemaphore");
|
|
_SDL_GetAppState = (uint8_t (*)(void))GetProcAddress(realSDLlib,"SDL_GetAppState");
|
|
_SDL_GetMouseState = (uint8_t (*)(int *, int *))GetProcAddress(realSDLlib,"SDL_GetMouseState");
|
|
_SDL_InitSubSystem = (int (*)(uint32_t))GetProcAddress(realSDLlib,"SDL_InitSubSystem");
|
|
_SDL_SemPost = (int (*)(void *))GetProcAddress(realSDLlib,"SDL_SemPost");
|
|
_SDL_SemTryWait = (int (*)(void *))GetProcAddress(realSDLlib,"SDL_SemTryWait");
|
|
_SDL_SemWait = (int (*)(void *))GetProcAddress(realSDLlib,"SDL_SemWait");
|
|
_SDL_ThreadID = (uint32_t (*)(void))GetProcAddress(realSDLlib,"SDL_ThreadID");
|
|
|
|
fprintf(stderr,"Initized HOOKS!\n");
|
|
return 1;
|
|
}
|