static void mousemoveevent(int x, int y) {
char* error;
if (!luastate_PushFunctionArgumentToMainstate_Double(x)) {
printerror("Error when pushing func args to blitwizard.onMouseMove");
fatalscripterror();
main_Quit(1);
return;
}
if (!luastate_PushFunctionArgumentToMainstate_Double(y)) {
printerror("Error when pushing func args to blitwizard.onMouseMove");
fatalscripterror();
main_Quit(1);
return;
}
if (!luastate_CallFunctionInMainstate("blitwizard.onMouseMove",
2, 1, 1, &error, NULL, NULL)) {
luacfuncs_onError("blitwizard.onMouseMove", error);
if (error) {
free(error);
}
}
#ifdef USE_GRAPHICS
luacfuncs_objectgraphics_processMouseMove(x, y);
#endif
}
static void keyboardevent(const char* key, int release) {
char* error;
// We handle key up and key down,
// and for both we ask a hidden (undocumented)
// event function for the templates whether they
// want to have the key event.
//
// (This will allow for a neat transparent
// addition of an ingame developer console)
const char onkeyup[] = "blitwizard.onKeyUp";
const char onkeyup_templates[] = "blitwizard._onKeyUp_Templates";
const char* funcname = "blitwizard.onKeyDown";
const char* funcname_templates = "blitwizard._onKeyDown_Templates";
if (release) {
funcname = onkeyup;
funcname_templates = onkeyup_templates;
}
// Call function template function first:
int returnboolean = 0;
if (!luastate_PushFunctionArgumentToMainstate_String(key)) {
printerror("Error when pushing func args to %s", funcname_templates);
fatalscripterror();
main_Quit(1);
}
if (!luastate_CallFunctionInMainstate(funcname_templates, 1, 1, 1, &error,
NULL, &returnboolean)) {
luacfuncs_onError(funcname_templates, error);
if (error) {
free(error);
}
return;
}
// if the templates event function has returned true, it handles
// the event and we don't propagate it further:
if (returnboolean) {
return;
}
// otherwise, call the regular event function now:
if (!luastate_PushFunctionArgumentToMainstate_String(key)) {
printerror("Error when pushing func args to %s", funcname);
fatalscripterror();
main_Quit(1);
return;
}
if (!luastate_CallFunctionInMainstate(funcname, 1, 1, 1, &error, NULL,
NULL)) {
luacfuncs_onError(funcname, error);
if (error) {
free(error);
}
return;
}
}
static BOOL main_TrayIconClicked( HWND hDlg, LPARAM lParam )
{
switch ( lParam )
{
case WM_LBUTTONDOWN:
return TRUE;
case WM_LBUTTONDBLCLK:
main_ToggleWindow( g_hDlg );
return TRUE;
case WM_RBUTTONUP:
{
// Show the tray menu.
POINT pt;
GetCursorPos( &pt );
int iSelection = ::TrackPopupMenu( g_hTrayMenu, TPM_LEFTALIGN | TPM_LEFTBUTTON | TPM_RETURNCMD | TPM_HORIZONTAL,
pt.x, pt.y, 0, hDlg, NULL );
if ( iSelection == IDR_EXIT )
main_Quit( );
else if ( iSelection == IDR_TOGGLE )
main_ToggleWindow( g_hDlg );
else if ( iSelection > IDR_DYNAMIC_MENU )
main_ConnectToFavorite( iSelection - IDR_DYNAMIC_MENU - 1 );
}
}
return FALSE;
}
static void textevent(const char* text) {
char* error;
// first, call the undocumented template pre-event function:
int returnboolean = 0;
if (!luastate_PushFunctionArgumentToMainstate_String(text)) {
printerror("Error when pushing func args to "
"blitwizard._onText_Templates");
fatalscripterror();
main_Quit(1);
return;
}
if (!luastate_CallFunctionInMainstate("blitwizard._onText_Templates",
1, 1, 1, &error, NULL, &returnboolean)) {
luacfuncs_onError("blitwizard._onText_Templates", error);
if (error) {
free(error);
}
return;
}
// now if the template event function returned true,
// it handles the event and we don't propagate it further:
if (returnboolean) {
return;
}
// since the template event function didn't object, continue with
// regular event function:
if (!luastate_PushFunctionArgumentToMainstate_String(text)) {
printerror("Error when pushing func args to blitwizard.onText");
fatalscripterror();
main_Quit(1);
return;
}
if (!luastate_CallFunctionInMainstate("blitwizard.onText",
1, 1, 1, &error, NULL, NULL)) {
luacfuncs_onError("blitwizard.onText", error);
if (error) {
free(error);
}
return;
}
}
static void mousebuttonevent(int button, int release, int x, int y) {
char* error;
char onmouseup[] = "blitwizard.onMouseUp";
const char* funcname = "blitwizard.onMouseDown";
if (release) {
funcname = onmouseup;
}
if (!luastate_PushFunctionArgumentToMainstate_Double(x)) {
printerror("Error when pushing func args to %s", funcname);
fatalscripterror();
main_Quit(1);
return;
}
if (!luastate_PushFunctionArgumentToMainstate_Double(y)) {
printerror("Error when pushing func args to %s", funcname);
fatalscripterror();
main_Quit(1);
return;
}
if (!luastate_PushFunctionArgumentToMainstate_Double(button)) {
printerror("Error when pushing func args to %s", funcname);
fatalscripterror();
main_Quit(1);
return;
}
if (!luastate_CallFunctionInMainstate(funcname, 3, 1, 1, &error, NULL,
NULL)) {
luacfuncs_onError(funcname, error);
if (error) {
free(error);
}
}
#ifdef USE_GRAPHICS
if (!release) {
luacfuncs_objectgraphics_processMouseClick(x, y, button);
}
#endif
}
int SDL_main(int argc, char** argv) {
#else
#ifdef WINDOWS
int CALLBACK WinMain(HINSTANCE hInstance,
HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow) {
#else
int main(int argc, char** argv) {
#endif
#endif
thread_MarkAsMainThread();
#if defined(ANDROID) || defined(__ANDROID__)
printinfo("Blitwizard %s starting", VERSION);
#endif
// set signal handlers:
signalhandling_Init();
// set path to blitwizard binary:
#ifdef UNIX
if (argc > 0) {
binpath = file_GetAbsolutePathFromRelativePath(argv[0]);
}
#endif
// test crash handling:
//*((int*)5) = 2;
// evaluate command line arguments:
const char* script = "game.lua";
int scriptargfound = 0;
int option_changedir = 0;
char* option_templatepath = NULL;
int nextoptionistemplatepath = 0;
int nextoptionisscriptarg = 0;
int gcframecount = 0;
#ifdef WINDOWS
// obtain command line arguments a special way on windows:
int argc = __argc;
char** argv = __argv;
#endif
// we want to store the script arguments so we can pass them to lua:
char** scriptargs = malloc(sizeof(char*) * MAXSCRIPTARGS);
if (!scriptargs) {
printerror("Error: failed to allocate script args space");
return 1;
}
int scriptargcount = 0;
// parse command line arguments:
int i = 1;
while (i < argc) {
if (!scriptargfound) { // pre-scriptname arguments
// process template path option parameter:
if (nextoptionistemplatepath) {
nextoptionistemplatepath = 0;
if (option_templatepath) {
free(option_templatepath);
}
option_templatepath = strdup(argv[i]);
if (!option_templatepath) {
printerror("Error: failed to strdup() template "
"path argument");
main_Quit(1);
return 1;
}
file_MakeSlashesNative(option_templatepath);
i++;
continue;
}
// various options:
if ((argv[i][0] == '-' || strcasecmp(argv[i],"/?") == 0)
&& !nextoptionisscriptarg) {
if (strcasecmp(argv[i], "--") == 0) {
// this enforces the next arg to be the script name:
nextoptionisscriptarg = 1;
i++;
continue;
}
if (strcasecmp(argv[i],"--help") == 0 || strcasecmp(argv[i], "-help") == 0
|| strcasecmp(argv[i], "-?") == 0 || strcasecmp(argv[i],"/?") == 0
|| strcasecmp(argv[i],"-h") == 0) {
printf("blitwizard %s (C) 2011-2013 Jonas Thiem et al\n",
VERSION);
printf("Usage:\n blitwizard [blitwizard options] "
"[script name] [script options]\n\n");
printf("The script name should be a .lua file containing\n"
"Lua source code for use with blitwizard.\n\n");
printf("The script options (optional) are passed through\n"
"to the script.\n\n");
printf("Supported blitwizard options:\n");
printf(" -changedir Change working directory to "
"the\n"
" folder of the script\n");
printf(" -help Show this help text and quit\n");
printf(" -templatepath [path] Check another place for "
"templates\n"
" (not the default "
"\"templates/\")\n");
printf(" -version Show extended version info and quit\n");
return 0;
}
if (strcasecmp(argv[i], "-changedir") == 0) {
option_changedir = 1;
i++;
continue;
}
if (strcasecmp(argv[i], "-templatepath") == 0) {
nextoptionistemplatepath = 1;
i++;
continue;
}
if (strcmp(argv[i], "-v") == 0 || strcasecmp(argv[i], "-version") == 0
|| strcasecmp(argv[i], "--version") == 0) {
printf("blitwizard %s (C) 2011-2013 Jonas Thiem et al\n",VERSION);
printf("\nSupported features of this build:\n");
#ifdef USE_SDL_AUDIO
printf(" Audio device: SDL 2\n");
#else
#ifdef USE_AUDIO
#ifdef WINDOWS
printf(" Audio device: waveOut\n");
#else
printf(" Audio device: only virtual (not audible)\n");
#endif
#else
printf(" Audio device: no\n");
printf(" Playback support: none, audio disabled\n");
printf(" Resampling support: none, audio disabled\n");
#endif
#endif
#if (defined(USE_SDL_AUDIO) || defined(USE_AUDIO))
printf(" Playback support: Ogg (libogg)%s%s\n",
#if defined(USE_FLAC_AUDIO)
", FLAC (libFLAC)"
#else
""
#endif
,
#if defined(USE_FFMPEG_AUDIO)
#ifndef USE_FLAC_AUDIO
", FLAC (FFmpeg),\n mp3 (FFmpeg), WAVE (FFmpeg), mp4 (FFmpeg),\n many more.. (FFmpeg)\n (Please note FFmpeg can fail to load at runtime,\n resulting in FFmpeg playback support not working)"
#else
",\n mp3 (FFmpeg), WAVE (FFmpeg), mp4 (FFmpeg),\n many more.. (FFmpeg)\n (Please note FFmpeg can fail to load at runtime,\n resulting in FFmpeg playback support not working)"
#endif
#else
""
#endif
);
#if defined(USE_SPEEX_RESAMPLING)
printf(" Resampling: libspeex\n");
#else
printf(" Resampling: none (non-48kHz audio will sound wrong!)\n");
#endif
#endif
#ifdef USE_GRAPHICS
#ifdef USE_SDL_GRAPHICS
#ifdef USE_OGRE_GRAPHICS
printf(" Graphics device: SDL 2, Ogre\n");
printf(" 2d graphics support: SDL 2, Ogre\n");
printf(" 3d graphics support: Ogre\n");
#else
printf(" Graphics device: SDL 2\n");
printf(" 2d graphics support: SDL 2\n");
printf(" 3d graphics support: none\n");
#endif
#else
printf(" Graphics device: only virtual (not visible)\n");
printf(" 2d graphics support: virtual\n");
printf(" 3d graphics support: none\n");
#endif
#else
printf(" Graphics device: none\n");
printf(" 2d graphics support: none, graphics disabled\n");
printf(" 3d graphics support: none, graphics disabled\n");
#endif
#if defined(USE_PHYSICS2D) || defined(USE_PHYSICS3D)
printf(" Physics: yes\n");
#else
printf(" Physics: no\n");
#endif
#if defined(USE_PHYSICS2D)
printf(" 2d physics: Box2D\n");
#else
printf(" 2d physics: none\n");
#endif
#if defined(USE_PHYSICS3D)
printf(" 3d physics: bullet\n");
#else
printf(" 3d physics: none\n");
#endif
#if defined(USE_PHYSFS)
printf(" .zip archive resource loading: yes\n");
#else
printf(" .zip archive resource loading: no\n");
#endif
printf("\nVarious build options:\n");
printf(" SYSTEM_TEMPLATE_PATH:\n %s\n",
SYSTEM_TEMPLATE_PATH);
#if defined(USE_LIB_FLAGS)
printf(" FINAL_USE_LIB_FLAGS:\n %s\n",
USE_LIB_FLAGS);
#endif
printf("\nCheck out http://www.blitwizard.de/"
" for info about blitwizard.\n");
fflush(stdout);
exit(0);
}
printwarning("Warning: Unknown Blitwizard option: %s", argv[i]);
} else {
scriptargfound = 1;
script = argv[i];
}
} else {
// post-scriptname arguments -> store them for Lua
if (scriptargcount < MAXSCRIPTARGS) {
scriptargs[scriptargcount] = strdup(argv[i]);
scriptargcount++;
}
}
i++;
}
#ifdef USE_AUDIO
// This needs to be done at some point before we actually
// initialise audio so that the mixer is ready for use then
audiomixer_Init();
#endif
// check the provided path:
char outofmem[] = "Out of memory";
char* error;
char* filenamebuf = NULL;
#if defined(ANDROID) || defined(__ANDROID__)
printinfo("Blitwizard startup: locating lua start script...");
#endif
// if no template path was provided, default to "templates/"
if (!option_templatepath) {
option_templatepath = strdup("templates/");
if (!option_templatepath) {
printerror("Error: failed to allocate initial template path");
main_Quit(1);
return 1;
}
file_MakeSlashesNative(option_templatepath);
}
// load internal resources appended to this binary,
// so we can load the game.lua from it if there is any inside:
#ifdef WINDOWS
// windows
// try encrypted first:
if (!resources_LoadZipFromOwnExecutable(NULL, 1)) {
// ... ok, then attempt unencrypted:
resources_LoadZipFromOwnExecutable(NULL, 0);
}
#else
#ifndef ANDROID
// unix systems
// encrypted first:
if (!resources_LoadZipFromOwnExecutable(argv[0], 1)) {
// ... ok, then attempt unencrypted:
resources_LoadZipFromOwnExecutable(argv[0], 0);
}
#endif
#endif
// check if provided script path is a folder:
if (file_IsDirectory(script)) {
// make sure it isn't inside a resource file as a proper file:
if (!resources_LocateResource(script, NULL)) {
// it isn't, so we can safely assume it is a folder.
// -> append "game.lua" to the path
if (filenamebuf) {
free(filenamebuf);
}
filenamebuf = file_AddComponentToPath(script, "game.lua");
if (!filenamebuf) {
printerror("Error: failed to add component to script path");
main_Quit(1);
return 1;
}
script = filenamebuf;
}
}
// check if script file is internal resource or disk file
int scriptdiskfile = 0;
struct resourcelocation s;
if (!resources_LocateResource(script, &s)) {
printerror("Error: cannot locate script file \"%s\"", script);
main_Quit(1);
return 1;
} else {
if (s.type == LOCATION_TYPE_ZIP) {
scriptdiskfile = 0;
} else{
scriptdiskfile = 1;
}
}
// compose game.lua path variable (for os.gameluapath())
if (scriptdiskfile) {
gameluapath = file_GetAbsolutePathFromRelativePath(script);
} else {
gameluapath = strdup(script);
}
if (!gameluapath) { // string allocation failed
printerror("Error: failed to allocate script path (gameluapath)");
main_Quit(1);
return 1;
} else {
if (gameluapath) {
file_MakeSlashesCrossplatform(gameluapath);
}
}
// check if we want to change directory to the provided script path:
if (option_changedir) {
char* p = file_GetAbsoluteDirectoryPathFromFilePath(script);
if (!p) {
printerror("Error: NULL returned for absolute directory");
main_Quit(1);
return 1;
}
char* newfilenamebuf = file_GetFileNameFromFilePath(script);
if (!newfilenamebuf) {
free(p);
printerror("Error: NULL returned for file name");
main_Quit(1);
return 1;
}
if (filenamebuf) {
free(filenamebuf);
}
filenamebuf = newfilenamebuf;
if (!file_Cwd(p)) {
free(filenamebuf);
printerror("Error: Cannot cd to \"%s\"", p);
free(p);
main_Quit(1);
return 1;
}
free(p);
script = filenamebuf;
}
/*#if defined(ANDROID) || defined(__ANDROID__)
printinfo("Blitwizard startup: Preparing graphics framework...");
#endif
// initialise graphics
#ifdef USE_GRAPHICS
if (!graphics_Init(&error)) {
printerror("Error: Failed to initialise graphics: %s",error);
free(error);
fatalscripterror();
main_Quit(1);
return 1;
}
sdlinitialised = 1;
#endif*/
#if defined(ANDROID) || defined(__ANDROID__)
printinfo("Blitwizard startup: Initialising physics...");
#endif
#ifdef USE_PHYSICS2D
// initialise physics
physics2ddefaultworld = physics_createWorld(0);
if (!physics2ddefaultworld) {
printerror("Error: Failed to initialise Box2D physics");
fatalscripterror();
main_Quit(1);
return 1;
}
luacfuncs_object_initialisePhysicsCallbacks();
#endif
#if defined(ANDROID) || defined(__ANDROID__)
printinfo("Blitwizard startup: Reading templates if present...");
#endif
// Search & run templates. Separate code for desktop/android due to
// android having the templates in embedded resources (where cwd'ing to
// isn't supported), while for the desktop it is a regular folder.
#if !defined(ANDROID)
int checksystemwidetemplate = 1;
// see if the template path points to a virtual zip folder:
if (resource_IsFolderInZip(option_templatepath)) {
// it does. run templates from here.
checksystemwidetemplate = 0;
if (!attemptTemplateLoad(option_templatepath)) {
checksystemwidetemplate = 1;
}
} else {
// see if there is a template directory & file:
if (file_DoesFileExist(option_templatepath)
&& file_IsDirectory(option_templatepath)) {
checksystemwidetemplate = 0;
// now run template file:
if (!attemptTemplateLoad(option_templatepath)) {
checksystemwidetemplate = 1;
}
}
}
#if defined(SYSTEM_TEMPLATE_PATH)
if (checksystemwidetemplate) {
attemptTemplateLoad(SYSTEM_TEMPLATE_PATH);
}
#endif
#else // if !defined(ANDROID)
// on Android, we only allow templates/init.lua.
// see if we can read the file:
int exists = 0;
SDL_RWops* rwops = SDL_RWFromFile("templates/init.lua", "rb");
if (rwops) {
exists = 1;
rwops->close(rwops);
}
if (exists) {
// run the template file:
attemptTemplateLoad("templates/");
}
#endif
// free template dir now that we've loaded things:
free(option_templatepath);
#if defined(ANDROID) || defined(__ANDROID__)
printinfo("Blitwizard startup: Executing lua start script...");
#endif
// push command line arguments into script state:
i = 0;
int pushfailure = 0;
while (i < scriptargcount) {
if (!luastate_PushFunctionArgumentToMainstate_String(scriptargs[i])) {
pushfailure = 1;
break;
}
i++;
}
if (pushfailure) {
printerror("Error: Couldn't push all script arguments into script state");
main_Quit(1);
return 1;
}
// free arguments:
i = 0;
while (i < scriptargcount) {
free(scriptargs[i]);
i++;
}
free(scriptargs);
// open and run provided script file and pass the command line arguments:
if (!luastate_DoInitialFile(script, scriptargcount, &error)) {
if (error == NULL) {
error = outofmem;
}
printerror("Error: an error occured when running \"%s\": %s", script, error);
if (error != outofmem) {
free(error);
}
fatalscripterror();
main_Quit(1);
return 1;
}
// enable blitwizard.onLog
doConsoleLog();
#if defined(ANDROID) || defined(__ANDROID__)
printinfo("Blitwizard startup: Calling blitwiz.on_init...");
#endif
doConsoleLog();
// call init
if (!luastate_CallFunctionInMainstate("blitwizard.onInit", 0, 1, 1,
&error, NULL, NULL)) {
printerror("Error: An error occured when calling blitwizard.onInit: %s",error);
if (error != outofmem) {
free(error);
}
fatalscripterror();
main_Quit(1);
return 1;
}
doConsoleLog();
// when graphics or audio is open, run the main loop
#if defined(ANDROID) || defined(__ANDROID__)
printinfo("Blitwizard startup: Entering main loop...");
#endif
doConsoleLog();
// Initialise audio when it isn't
main_InitAudio();
doConsoleLog();
// If we failed to initialise audio, we want to simulate it
#ifdef USE_AUDIO
uint64_t simulateaudiotime = 0;
if (simulateaudio) {
simulateaudiotime = time_GetMilliseconds();
}
#endif
uint64_t logictimestamp = time_GetMilliseconds();
uint64_t lastdrawingtime = 0;
uint64_t physicstimestamp = time_GetMilliseconds();
while (!wantquit) {
doConsoleLog();
uint64_t timeNow = time_GetMilliseconds();
// this is a hack for SDL bug http://bugzilla.libsdl.org/show_bug.cgi?id=1422
#ifdef USE_AUDIO
// simulate audio
if (simulateaudio) {
while (simulateaudiotime < time_GetMilliseconds()) {
char buf[48 * 4 * 2];
audiomixer_GetBuffer(buf, 48 * 4 * 2);
simulateaudiotime += 1; // 48 * 1000 times * 4 bytes * 2 channels per second = simulated 48kHz 32bit stereo audio
}
}
#endif // ifdef USE_AUDIO
// check for unused, no longer playing media objects:
checkAllMediaObjectsForCleanup();
// slow sleep: check if we can safe some cpu by waiting longer
unsigned int deltaspan = TIMESTEP;
#ifndef USE_GRAPHICS
int nodraw = 1;
#else
int nodraw = 1;
if (graphics_AreGraphicsRunning()) {
nodraw = 0;
}
#endif
// see how much time as already passed since the last frame:
uint64_t delta = time_GetMilliseconds()-lastdrawingtime;
// sleep/limit FPS as much as we can
if (delta < (deltaspan-10)) {
// the time passed is smaller than the optimal waiting time
// -> sleep
if (connections_NoConnectionsOpen() &&
!listeners_HaveActiveListeners()) {
// no connections, use regular sleep
time_Sleep((deltaspan-10)-delta);
connections_SleepWait(0);
} else {
// use connection select wait to get connection events
connections_SleepWait(deltaspan-delta);
}
} else {
// the time passed exceeds the optimal waiting time already
// -> don't slow down at all
connections_SleepWait(0); // check on connections
}
// Remember drawing time and process net events
lastdrawingtime = time_GetMilliseconds();
if (!luafuncs_ProcessNetEvents()) {
// there was an error processing the events
main_Quit(1);
}
#ifdef USE_GRAPHICS
// check and trigger all sort of input events
graphics_CheckEvents(&quitevent, &mousebuttonevent, &mousemoveevent, &keyboardevent, &textevent, &putinbackground);
#endif
doConsoleLog();
// call the step function and advance physics
int physicsiterations = 0;
int logiciterations = 0;
time_t iterationStart = time(NULL);
#if defined(USE_PHYSICS2D)
int psteps2d_max = ((float)TIMESTEP/
(float)physics_getStepSize(physics2ddefaultworld));
psteps2d_max++;
#endif
while (
// allow maximum of iterations in an attempt to keep up:
(logictimestamp < timeNow || physicstimestamp < timeNow) &&
(logiciterations < MAXLOGICITERATIONS
#if defined(USE_PHYSICS2D) || defined(USE_PHYSICS3D)
|| physicsiterations < MAXPHYSICSITERATIONS
#endif
)
// .. unless we're already doing this for >2 seconds:
&& iterationStart + 2 >= time(NULL)
) {
#ifdef USE_PHYSICS2D
if (physicsiterations < MAXPHYSICSITERATIONS &&
physicstimestamp < timeNow && (physicstimestamp <= logictimestamp
|| logiciterations >= MAXLOGICITERATIONS)) {
int psteps = psteps2d_max;
while (psteps > 0) {
physics_step(physics2ddefaultworld);
physicstimestamp += physics_getStepSize(
physics2ddefaultworld);
psteps--;
}
physicsiterations++;
}
#else
physicstimestamp = timeNow + 2000;
#endif
if (logiciterations < MAXLOGICITERATIONS &&
logictimestamp < timeNow && (logictimestamp <= physicstimestamp
|| physicsiterations >= MAXPHYSICSITERATIONS)) {
// check how much logic we might want to do in a batch:
int k = (timeNow-logictimestamp)/TIMESTEP;
if (k > MAXBATCHEDLOGIC) {
k = MAXBATCHEDLOGIC;
}
// call logic functions of all objects:
int i = luacfuncs_object_doAllSteps(k);
doConsoleLog();
// advance time step:
logictimestamp += i * TIMESTEP;
logiciterations += i;
}
}
// check if we ran out of iterations:
if (logiciterations >= MAXLOGICITERATIONS ||
physicsiterations >= MAXPHYSICSITERATIONS
|| iterationStart + 2 < time(NULL)) {
if (
#if defined(USE_PHYSICS2D) || defined(USE_PHYSICS3D)
physicstimestamp < timeNow ||
#endif
logictimestamp < timeNow) {
// we got a problem: we aren't finished,
// but we hit the iteration limit
physicstimestamp = time_GetMilliseconds();
logictimestamp = time_GetMilliseconds();
printwarning("Warning: logic is too slow, maximum logic iterations have been reached (%d)", (int)MAXLOGICITERATIONS);
} else {
// we don't need to iterate anymore -> everything is fine
}
}
#ifdef USE_GRAPHICS
// report visibility of sprites to texture manager:
graphics2dsprites_reportVisibility();
#endif
#ifdef USE_GRAPHICS
// texture manager tick:
texturemanager_tick();
#endif
// update object graphics:
luacfuncs_object_updateGraphics();
doConsoleLog();
#ifdef USE_GRAPHICS
if (graphics_AreGraphicsRunning()) {
#ifdef ANDROID
if (!appinbackground) {
#endif
// draw a frame
graphicsrender_Draw();
#ifdef ANDROID
}
#endif
}
#endif
// we might want to quit if there is nothing else to do
#ifdef USE_AUDIO
if (
#ifdef USE_GRAPHICS
!graphics_AreGraphicsRunning() &&
#endif
connections_NoConnectionsOpen() &&
!listeners_HaveActiveListeners() && audiomixer_NoSoundsPlaying()) {
#else
if (
#ifdef USE_GRAPHICS
!graphics_AreGraphicsRunning() &&
#endif
connections_NoConnectionsOpen() &&
!listeners_HaveActiveListeners()) {
#endif
main_Quit(1);
}
#ifdef USE_GRAPHICS
// be very sleepy if in background
if (appinbackground) {
#ifdef ANDROID
time_Sleep(40);
#endif
}
#endif
// do some garbage collection:
/*gcframecount++;
if (gcframecount > 100) {
// do a gc step once in a while
luastate_GCCollect();
}*/
// new frame:
#ifdef USE_GRAPHICS
luacfuncs_objectgraphics_newFrame();
#endif
}
main_Quit(0);
return 0;
}
int attemptTemplateLoad(const char* path) {
#ifdef WINDOWS
// check for invalid absolute unix paths:
if (path[0] == '/' || path[0] == '\\') {
return 0;
}
#endif
// path to init.lua:
char* p = malloc(strlen(path) + 1 + strlen("init.lua") + 1);
if (!p) {
printerror("Error: failed to allocate string when "
"attempting to run templates init.lua");
main_Quit(1);
return 0;
}
memcpy(p, path, strlen(path));
p[strlen(path)] = '/';
memcpy(p+strlen(path)+1, "init.lua", strlen("init.lua"));
p[strlen(path)+1+strlen("init.lua")] = 0;
file_MakeSlashesNative(p);
int loadFromZip = 0;
struct resourcelocation loc;
if (!resource_IsFolderInZip(path)) {
// if file doesn't exist, report failure:
if (!file_DoesFileExist(p)) {
free(p);
return 0;
}
} else {
// check for file in our .zip archives:
loadFromZip = 1;
if (!resources_LocateResource(p, &loc)) {
free(p);
return 0;
}
}
// update global template path:
if (templatepath) {
free(templatepath);
}
templatepath = file_GetAbsolutePathFromRelativePath(path);
// run file:
char outofmem[] = "Out of memory";
char* error;
if (!luastate_DoInitialFile(p, 0, &error)) {
if (error == NULL) {
error = outofmem;
}
printerror("Error: An error occured when running "
"templates init.lua: %s", error);
if (error != outofmem) {
free(error);
}
fatalscripterror();
free(p);
main_Quit(1);
return 0;
}
free(p);
return 1;
}
BOOL CALLBACK main_ConnectDialogCallback( HWND hDlg, UINT Message, WPARAM wParam, LPARAM lParam )
{
char szBuffer[128];
switch ( Message )
{
case WM_CTLCOLORSTATIC:
switch ( GetDlgCtrlID( (HWND) lParam ))
{
// Paint these two labels white.
case IDC_INTROTEXT:
case IDC_DESCTEXT:
return (LRESULT) g_hWhiteBrush;
// Ignore everything else.
default:
return NULL;
}
break;
case WM_PAINT:
{
// Paint the top of the form white.
PAINTSTRUCT Ps;
RECT r;
r.left = 0;
r.top = 3;
r.bottom = 55;
r.right = 400;
main_PaintRectangle( BeginPaint(hDlg, &Ps), &r, RGB(255, 255, 255));
}
break;
case WM_INITDIALOG:
{
g_hDlg = hDlg;
// Load the icon.
SendMessage( hDlg, WM_SETICON, (WPARAM)ICON_SMALL, (LPARAM) (HICON) LoadImage( g_hInst, MAKEINTRESOURCE( AAA_MAIN_ICON ), IMAGE_ICON, 16, 16, LR_SHARED ));
SendMessage( hDlg, WM_SETICON, (WPARAM)ICON_BIG, (LPARAM)LoadIcon( g_hInst, MAKEINTRESOURCE( AAA_MAIN_ICON )));
//==============================
// Create the notification icon.
//==============================
ZeroMemory( &g_NotifyIconData, sizeof( g_NotifyIconData ));
g_NotifyIconData.cbSize = sizeof( g_NotifyIconData );
g_NotifyIconData.hWnd = hDlg;
g_NotifyIconData.uID = 0;
g_NotifyIconData.uFlags = NIF_ICON|NIF_MESSAGE|NIF_TIP;
g_NotifyIconData.uCallbackMessage = UWM_TRAY_TRAYID;
g_NotifyIconData.hIcon = (HICON) LoadImage( g_hInst, MAKEINTRESOURCE( AAA_MAIN_ICON ), IMAGE_ICON, 16, 16, LR_SHARED );
lstrcpy( g_NotifyIconData.szTip, g_szTooltip );
Shell_NotifyIcon( NIM_ADD, &g_NotifyIconData );
//==================
// Create the menus.
//==================
// Create the favorites menu.
g_hFavoritesMenu = CreatePopupMenu( );
int iIndex = 1;
for( std::vector<FAVORITE_s>::iterator i = g_Favorites.begin(); i != g_Favorites.end(); ++i )
AppendMenu( g_hFavoritesMenu, MF_STRING, IDR_DYNAMIC_MENU + iIndex++, (LPCTSTR)(&(*i->szName)) );
// Create the tray menu.
g_hTrayMenu = CreatePopupMenu( );
AppendMenu( g_hTrayMenu, MF_STRING, IDR_TOGGLE, "Show/Hide" );
AppendMenu( g_hTrayMenu, MF_STRING|MF_POPUP, (UINT)g_hFavoritesMenu, "Favorites");
AppendMenu( g_hTrayMenu, MF_SEPARATOR, 0, 0 );
AppendMenu( g_hTrayMenu, MF_STRING, IDR_EXIT, "Exit" );
// Create the file menu.
HMENU hFileMenu = CreatePopupMenu( );
AppendMenu( hFileMenu, MF_STRING, IDR_EXIT, "Exit" );
// Create the file menu.
HMENU hHelpMenu = CreatePopupMenu( );
AppendMenu( hHelpMenu, MF_STRING, IDR_ABOUT, "About..." );
// Create the main menu.
g_hMainMenu = CreateMenu( );
AppendMenu( g_hMainMenu, MF_STRING|MF_POPUP, (UINT)hFileMenu, "File" );
AppendMenu( g_hMainMenu, MF_STRING|MF_POPUP, (UINT)g_hFavoritesMenu, "Favorites");
AppendMenu( g_hMainMenu, MF_STRING|MF_POPUP, (UINT)hHelpMenu, "Help");
AppendMenu( g_hMainMenu, MF_SEPARATOR, 0, 0 );
SetMenu( hDlg, g_hMainMenu );
// Set up the status bar.
g_hDlgStatusBar = CreateStatusWindow( WS_CHILD | WS_VISIBLE, (LPCTSTR)NULL, hDlg, IDC_STATIC );
// Set up the top, white section.
SendMessage( GetDlgItem( g_hDlg, IDC_INTROTEXT ), WM_SETFONT, (WPARAM) CreateFont( 13, 0, 0, 0, 600, 0, 0, 0, 0, 0, 0, 0, 0, "Tahoma" ), (LPARAM) 1 );
LOGBRUSH LogBrush;
LogBrush.lbStyle = BS_SOLID;
LogBrush.lbColor = RGB( 255, 255, 255 );
g_hWhiteBrush = CreateBrushIndirect( &LogBrush );
// Load the server address that was used last time.
if ( g_Config.HaveSections( ) && g_Config.SetSection( "Settings", true ) && g_Config.GetValueForKey( "LastServer" ) )
SetDlgItemText( hDlg, IDC_SERVERIP, g_Config.GetValueForKey( "LastServer" ) );
}
break;
case WM_COMMAND:
// Selecting a favorite from the menu?
if ( LOWORD( wParam ) > IDR_DYNAMIC_MENU && LOWORD( wParam ) <= IDR_DYNAMIC_MENU + g_Favorites.size( ))
{
main_ConnectToFavorite( LOWORD( wParam ) - IDR_DYNAMIC_MENU - 1 );
return TRUE;
}
switch ( LOWORD( wParam ))
{
// This also occurs when esc is pressed.
case IDCANCEL:
if ( g_State == STATE_CONNECTING )
{
main_SetState( STATE_WAITING );
main_EnableConnectionButtons( TRUE );
main_UpdateStatusbar( "Cancelled." );
}
else
main_Quit( );
break;
// The "connect" button.
case IDOK:
// Disable all the inputs.
main_EnableConnectionButtons( FALSE );
// Read in what the user gave us.
GetDlgItemText( hDlg, IDC_SERVERIP, szBuffer, 128 );
NETWORK_StringToAddress( szBuffer, &g_ServerAddress );
GetDlgItemText( hDlg, IDC_PASSWORD, g_szPassword, 128 );
// If the user didn't specify a port, use the default one.
if ( g_ServerAddress.usPort == 0 )
NETWORK_SetAddressPort( g_ServerAddress, DEFAULT_SERVER_PORT );
// Do some quick error checking.
if ( !strlen( szBuffer ))
MessageBox( hDlg, "You should probably enter a server address.", "Input error.", MB_ICONEXCLAMATION );
else if ( strlen( g_szPassword ) < 4 )
MessageBox( hDlg, "RCON passwords must be at least four characters long.", "Input error.", MB_ICONEXCLAMATION );
else
{
main_AttemptConnection( );
break;
}
// Re-enable the form so the user can try again.
main_EnableConnectionButtons( TRUE );
break;
case IDR_EXIT:
main_Quit( );
break;
case IDR_ABOUT:
DialogBox( g_hInst, MAKEINTRESOURCE( IDD_ABOUTDIALOG ), hDlg, main_AboutDialogCallback );
break;
}
break;
case WM_SYSCOMMAND:
// Hide the window when minimized.
if ( wParam == SC_MINIMIZE )
ShowWindow( hDlg, SW_HIDE );
else
DefWindowProc( hDlg, Message, wParam, lParam );
break;
case WM_CLOSE:
main_Quit( );
break;
case WM_DESTROY:
Shell_NotifyIcon( NIM_DELETE, &g_NotifyIconData );
PostQuitMessage( 0 );
break;
case UWM_TRAY_TRAYID:
return main_TrayIconClicked( hDlg, lParam );
default:
return FALSE;
}
return TRUE;
}
BOOL CALLBACK main_RCONDialogCallback( HWND hDlg, UINT Message, WPARAM wParam, LPARAM lParam )
{
char szBuffer[128];
switch ( Message )
{
case WM_CTLCOLORSTATIC:
switch ( GetDlgCtrlID( (HWND) lParam ))
{
// Paint these two labels (and the disconnct button's background) white.
case IDCANCEL:
case IDC_STATUS:
case IDC_SERVERSUBINFO:
return (LRESULT) g_hWhiteBrush;
// Ignore everything else.
default:
return NULL;
}
break;
case WM_PAINT:
{
// Paint the top of the form white.
PAINTSTRUCT Ps;
RECT r;
r.left = 0;
r.top = 0;
r.bottom = 48;
r.right = 800;
main_PaintRectangle( BeginPaint(hDlg, &Ps), &r, RGB(255, 255, 255));
}
break;
case WM_INITDIALOG:
// Hide the old dialog, and take its place.
ShowWindow( g_hDlg, SW_HIDE );
g_hDlg = hDlg;
SendDlgItemMessage( hDlg, IDC_CONSOLEBOX, EM_SETLIMITTEXT, 4096, 0 );
SendDlgItemMessage( hDlg, IDC_INPUTBOX, EM_SETLIMITTEXT, 256, 0 );
SetWindowText( hDlg, g_szHostname );
main_SetState( STATE_CONNECTED );
Printf( "\nMap: %s\n", g_szMapname );
// Fill the console with the received history.
sprintf( szBuffer, "Connected to \"%s\".", g_szHostname );
SetDlgItemText( hDlg, IDC_CONSOLEBOX, szBuffer );
SetDlgItemText( hDlg, IDC_STATUS, szBuffer );
main_UpdateTrayTooltip( szBuffer );
Printf_NoTimestamp( "\n" );
for( std::list<FString>::iterator i = g_RecentConsoleHistory.begin(); i != g_RecentConsoleHistory.end(); ++i )
Printf_NoTimestamp( "%s", *i );
g_RecentConsoleHistory.clear();
// Set up the top, white section.
SendMessage( GetDlgItem( g_hDlg, IDC_STATUS ), WM_SETFONT, (WPARAM) CreateFont( 13, 0, 0, 0, 600, 0, 0, 0, 0, 0, 0, 0, 0, "Tahoma" ), (LPARAM) 1 );
LOGBRUSH LogBrush;
LogBrush.lbStyle = BS_SOLID;
LogBrush.lbColor = RGB( 255, 255, 255 );
g_hWhiteBrush = CreateBrushIndirect( &LogBrush );
main_UpdateServerStatus( );
// Set up the player list
LVCOLUMN ColumnData;
ColumnData.mask = LVCF_FMT|LVCF_TEXT|LVCF_WIDTH;
ColumnData.fmt = LVCFMT_LEFT;
ColumnData.cx = 192;
ColumnData.pszText = "Name";
ColumnData.cchTextMax = 64;
ColumnData.iSubItem = 0;
SendDlgItemMessage( hDlg, IDC_PLAYERLIST, LVM_INSERTCOLUMN, COLUMN_NAME, (LPARAM)&ColumnData );
// Add the cached list of players.
LVITEM Item;
Item.mask = LVIF_TEXT;
Item.iSubItem = COLUMN_NAME;
Item.iItem = MAXPLAYERS;
while ( g_InitialPlayers.size( ) )
{
Item.pszText = (LPSTR) g_InitialPlayers.front( ).GetChars( );
g_InitialPlayers.pop_front( );
SendDlgItemMessage( g_hDlg, IDC_PLAYERLIST, LVM_INSERTITEM, 0, (LPARAM)&Item ) ;
}
// Load the icon.
SendMessage( hDlg, WM_SETICON, (WPARAM)ICON_SMALL, (LPARAM) (HICON) LoadImage( g_hInst, MAKEINTRESOURCE( AAA_MAIN_ICON ), IMAGE_ICON, 16, 16, LR_SHARED ));
SendMessage( hDlg, WM_SETICON, (WPARAM)ICON_BIG, (LPARAM)LoadIcon( g_hInst, MAKEINTRESOURCE( AAA_MAIN_ICON )));
// Set up the status bar.
g_hDlgStatusBar = CreateStatusWindow(WS_CHILD | WS_VISIBLE, (LPCTSTR)NULL, hDlg, IDC_STATIC);
g_bRCONDialogVisible = true;
break;
case WM_COMMAND:
switch ( LOWORD( wParam ))
{
// This also occurs when esc is pressed.
case IDCANCEL:
main_Quit( );
break;
// "Send" button.
case IDC_SEND:
char szCommand[256];
GetDlgItemText( hDlg, IDC_INPUTBOX, szCommand, sizeof( szCommand ));
NETWORK_ClearBuffer( &g_MessageBuffer );
NETWORK_WriteByte( &g_MessageBuffer.ByteStream, CLRC_COMMAND );
if ( szCommand[0] == ':' ) // If the text in the send buffer begins with a :, the admin is just talking.
{
char szBuffer2[256 + 4];
sprintf( szBuffer2, "say %s", szCommand + 1 );
NETWORK_WriteString( &g_MessageBuffer.ByteStream, szBuffer2 );
break;
}
else if ( szCommand[0] == '/' ) // If the text in the send buffer begins with a slash, error out -- Skulltag used to require you to do this to send commands.
{
Printf( "You longer have to prefix commands with a / to send them.\n" );
SetDlgItemText( hDlg, IDC_INPUTBOX, szCommand + 1 );
SendMessage( GetDlgItem( hDlg, IDC_INPUTBOX ), EM_SETSEL, strlen( szCommand ) - 1, strlen( szCommand ) - 1 );
break;
}
else
NETWORK_WriteString( &g_MessageBuffer.ByteStream, szCommand );
NETWORK_LaunchPacket( &g_MessageBuffer, g_ServerAddress );
time( &g_tLastSentCommand );
SetDlgItemText( hDlg, IDC_INPUTBOX, "" );
break;
}
break;
case WM_SYSCOMMAND:
// Hide the window when minimized.
if ( wParam == SC_MINIMIZE )
ShowWindow( hDlg, SW_HIDE );
else
DefWindowProc( hDlg, Message, wParam, lParam );
break;
case WM_CLOSE:
main_Quit( );
break;
case WM_DESTROY:
Shell_NotifyIcon( NIM_DELETE, &g_NotifyIconData );
PostQuitMessage( 0 );
break;
case UWM_TRAY_TRAYID:
return main_TrayIconClicked( hDlg, lParam );
default:
return FALSE;
}
return TRUE; // If this is false, minimizing the window won't hide it.
}
