-
#include "quakedef.h"
-#include <time.h>
-#ifndef WIN32
-#include <unistd.h>
-#include <fcntl.h>
-#endif
-
-extern cvar_t timestamps;
-extern cvar_t timeformat;
-
-static int sys_nostdout = false;
-
-/* The translation table between the graphical font and plain ASCII --KB */
-static char qfont_table[256] = {
- '\0', '#', '#', '#', '#', '.', '#', '#',
- '#', 9, 10, '#', ' ', 13, '.', '.',
- '[', ']', '0', '1', '2', '3', '4', '5',
- '6', '7', '8', '9', '.', '<', '=', '>',
- ' ', '!', '"', '#', '$', '%', '&', '\'',
- '(', ')', '*', '+', ',', '-', '.', '/',
- '0', '1', '2', '3', '4', '5', '6', '7',
- '8', '9', ':', ';', '<', '=', '>', '?',
- '@', 'A', 'B', 'C', 'D', 'E', 'F', 'G',
- 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O',
- 'P', 'Q', 'R', 'S', 'T', 'U', 'V', 'W',
- 'X', 'Y', 'Z', '[', '\\', ']', '^', '_',
- '`', 'a', 'b', 'c', 'd', 'e', 'f', 'g',
- 'h', 'i', 'j', 'k', 'l', 'm', 'n', 'o',
- 'p', 'q', 'r', 's', 't', 'u', 'v', 'w',
- 'x', 'y', 'z', '{', '|', '}', '~', '<',
-
- '<', '=', '>', '#', '#', '.', '#', '#',
- '#', '#', ' ', '#', ' ', '>', '.', '.',
- '[', ']', '0', '1', '2', '3', '4', '5',
- '6', '7', '8', '9', '.', '<', '=', '>',
- ' ', '!', '"', '#', '$', '%', '&', '\'',
- '(', ')', '*', '+', ',', '-', '.', '/',
- '0', '1', '2', '3', '4', '5', '6', '7',
- '8', '9', ':', ';', '<', '=', '>', '?',
- '@', 'A', 'B', 'C', 'D', 'E', 'F', 'G',
- 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O',
- 'P', 'Q', 'R', 'S', 'T', 'U', 'V', 'W',
- 'X', 'Y', 'Z', '[', '\\', ']', '^', '_',
- '`', 'a', 'b', 'c', 'd', 'e', 'f', 'g',
- 'h', 'i', 'j', 'k', 'l', 'm', 'n', 'o',
- 'p', 'q', 'r', 's', 't', 'u', 'v', 'w',
- 'x', 'y', 'z', '{', '|', '}', '~', '<'
-};
-
-
-#define MAX_PRINT_MSG 16384
-void Sys_Printf (const char *fmt, ...)
+
+#define SUPPORTDLL
+
+#ifdef WIN32
+# include <windows.h>
+# include <mmsystem.h> // timeGetTime
+# include <time.h> // localtime
+#else
+# include <unistd.h>
+# include <fcntl.h>
+# include <sys/time.h>
+# include <time.h>
+# ifdef SUPPORTDLL
+# include <dlfcn.h>
+# endif
+#endif
+
+static char sys_timestring[128];
+char *Sys_TimeString(const char *timeformat)
{
- va_list argptr;
- char start[MAX_PRINT_MSG]; // String we started with
- char stamp[MAX_PRINT_MSG]; // Time stamp
- char final[MAX_PRINT_MSG]; // String we print
+ time_t mytime = time(NULL);
+#if _MSC_VER >= 1400
+ struct tm mytm;
+ localtime_s(&mytm, &mytime);
+ strftime(sys_timestring, sizeof(sys_timestring), timeformat, &mytm);
+#else
+ strftime(sys_timestring, sizeof(sys_timestring), timeformat, localtime(&mytime));
+#endif
+ return sys_timestring;
+}
- time_t mytime = 0;
- struct tm *local = NULL;
- unsigned char *p;
+extern qboolean host_shuttingdown;
+void Sys_Quit (int returnvalue)
+{
+ if (COM_CheckParm("-profilegameonly"))
+ Sys_AllowProfiling(false);
+ host_shuttingdown = true;
+ Host_Shutdown();
+ exit(returnvalue);
+}
- va_start (argptr, fmt);
- vsnprintf (start, sizeof(start), fmt, argptr);
- va_end (argptr);
+#if defined(__linux__) || defined(__FreeBSD__)
+#ifdef __cplusplus
+extern "C"
+#endif
+int moncontrol(int);
+#endif
- if (sys_nostdout)
- return;
+void Sys_AllowProfiling(qboolean enable)
+{
+#if defined(__linux__) || defined(__FreeBSD__)
+ moncontrol(enable);
+#endif
+}
+
+
+/*
+===============================================================================
+
+DLL MANAGEMENT
- if (timestamps.integer)
+===============================================================================
+*/
+
+qboolean Sys_LoadLibrary (const char** dllnames, dllhandle_t* handle, const dllfunction_t *fcts)
+{
+#ifdef SUPPORTDLL
+ const dllfunction_t *func;
+ dllhandle_t dllhandle = 0;
+ unsigned int i;
+
+ if (handle == NULL)
+ return false;
+
+#ifndef WIN32
+#ifdef PREFER_PRELOAD
+ dllhandle = dlopen(NULL, RTLD_LAZY | RTLD_GLOBAL);
+ if(dllhandle)
{
- mytime = time (NULL);
- local = localtime (&mytime);
- strftime (stamp, sizeof (stamp), timeformat.string, local);
+ for (func = fcts; func && func->name != NULL; func++)
+ if (!(*func->funcvariable = (void *) Sys_GetProcAddress (dllhandle, func->name)))
+ {
+ dlclose(dllhandle);
+ goto notfound;
+ }
+ Con_DPrintf ("All of %s's functions were already linked in! Not loading dynamically...\n", dllnames[0]);
+ *handle = dllhandle;
+ return true;
+ }
+notfound:
+#endif
+#endif
- snprintf (final, sizeof (final), "%s%s", stamp, start);
+ // Initializations
+ for (func = fcts; func && func->name != NULL; func++)
+ *func->funcvariable = NULL;
+
+ // Try every possible name
+ Con_DPrintf ("Trying to load library...");
+ for (i = 0; dllnames[i] != NULL; i++)
+ {
+ Con_DPrintf (" \"%s\"", dllnames[i]);
+#ifdef WIN32
+ dllhandle = LoadLibrary (dllnames[i]);
+#else
+ dllhandle = dlopen (dllnames[i], RTLD_LAZY | RTLD_GLOBAL);
+#endif
+ if (dllhandle)
+ break;
}
- else
- snprintf (final, sizeof (final), "%s", start);
- // LordHavoc: make sure the string is terminated
- final[MAX_PRINT_MSG - 1] = 0;
- for (p = (unsigned char *) final;*p; p++)
- *p = qfont_table[*p];
- Sys_Print(final);
-}
+ // see if the names can be loaded relative to the executable path
+ // (this is for Mac OSX which does not check next to the executable)
+ if (!dllhandle && strrchr(com_argv[0], '/'))
+ {
+ char path[MAX_OSPATH];
+ strlcpy(path, com_argv[0], sizeof(path));
+ strrchr(path, '/')[1] = 0;
+ for (i = 0; dllnames[i] != NULL; i++)
+ {
+ char temp[MAX_OSPATH];
+ strlcpy(temp, path, sizeof(temp));
+ strlcat(temp, dllnames[i], sizeof(temp));
+ Con_DPrintf (" \"%s\"", temp);
+#ifdef WIN32
+ dllhandle = LoadLibrary (temp);
+#else
+ dllhandle = dlopen (temp, RTLD_LAZY | RTLD_GLOBAL);
+#endif
+ if (dllhandle)
+ break;
+ }
+ }
+ // No DLL found
+ if (! dllhandle)
+ {
+ Con_DPrintf(" - failed.\n");
+ return false;
+ }
-char engineversion[128];
+ Con_DPrintf(" - loaded.\n");
-void Sys_Shared_EarlyInit(void)
-{
- const char* os;
+ // Get the function adresses
+ for (func = fcts; func && func->name != NULL; func++)
+ if (!(*func->funcvariable = (void *) Sys_GetProcAddress (dllhandle, func->name)))
+ {
+ Con_DPrintf ("Missing function \"%s\" - broken library!\n", func->name);
+ Sys_UnloadLibrary (&dllhandle);
+ return false;
+ }
- Memory_Init ();
+ *handle = dllhandle;
+ return true;
+#else
+ return false;
+#endif
+}
- COM_InitArgv();
- COM_InitGameType();
+void Sys_UnloadLibrary (dllhandle_t* handle)
+{
+#ifdef SUPPORTDLL
+ if (handle == NULL || *handle == NULL)
+ return;
-#if defined(__linux__)
- os = "Linux";
-#elif defined(WIN32)
- os = "Windows";
+#ifdef WIN32
+ FreeLibrary (*handle);
#else
- os = "Unknown";
+ dlclose (*handle);
#endif
- snprintf (engineversion, sizeof (engineversion), "%s %s %s", gamename, os, buildstring);
- if (COM_CheckParm("-nostdout"))
- sys_nostdout = 1;
- else
- Con_Printf("%s\n", engineversion);
+ *handle = NULL;
+#endif
}
-void Sys_Shared_LateInit(void)
+void* Sys_GetProcAddress (dllhandle_t handle, const char* name)
{
+#ifdef SUPPORTDLL
+#ifdef WIN32
+ return (void *)GetProcAddress (handle, name);
+#else
+ return (void *)dlsym (handle, name);
+#endif
+#else
+ return NULL;
+#endif
}
-/*
-===============================================================================
+#ifdef WIN32
+# define HAVE_TIMEGETTIME 1
+# define HAVE_QUERYPERFORMANCECOUNTER 1
+# define HAVE_Sleep 1
+#endif
-DLL MANAGEMENT
+#if defined(CLOCK_MONOTONIC) || defined(CLOCK_HIRES)
+# define HAVE_CLOCKGETTIME 1
+#endif
-===============================================================================
-*/
+#ifndef WIN32
+// FIXME improve this check, manpage hints to DST_NONE
+# define HAVE_GETTIMEOFDAY 1
+#endif
+
+#ifdef FD_SET
+# define HAVE_SELECT 1
+#endif
#ifndef WIN32
-#include <dlfcn.h>
+// FIXME improve this check
+# define HAVE_USLEEP 1
+#endif
+
+// this one is referenced elsewhere
+cvar_t sys_usenoclockbutbenchmark = {CVAR_SAVE, "sys_usenoclockbutbenchmark", "0", "don't use ANY real timing, and simulate a clock (for benchmarking); the game then runs as fast as possible. Run a QC mod with bots that does some stuff, then does a quit at the end, to benchmark a server. NEVER do this on a public server."};
+
+// these are not
+static cvar_t sys_debugsleep = {0, "sys_debugsleep", "0", "write requested and attained sleep times to standard output, to be used with gnuplot"};
+static cvar_t sys_usesdlgetticks = {CVAR_SAVE, "sys_usesdlgetticks", "0", "use SDL_GetTicks() timer (less accurate, for debugging)"};
+static cvar_t sys_usesdldelay = {CVAR_SAVE, "sys_usesdldelay", "0", "use SDL_Delay() (less accurate, for debugging)"};
+#if HAVE_QUERYPERFORMANCECOUNTER
+static cvar_t sys_usequeryperformancecounter = {CVAR_SAVE, "sys_usequeryperformancecounter", "0", "use windows QueryPerformanceCounter timer (which has issues on multicore/multiprocessor machines and processors which are designed to conserve power) for timing rather than timeGetTime function (which has issues on some motherboards)"};
+#endif
+#if HAVE_CLOCKGETTIME
+static cvar_t sys_useclockgettime = {CVAR_SAVE, "sys_useclockgettime", "0", "use POSIX clock_gettime function (which has issues if the system clock speed is far off, as it can't get fixed by NTP) for timing rather than gettimeofday (which has issues if the system time is stepped by ntpdate, or apparently on some Xen installations)"};
#endif
-dllhandle_t Sys_LoadLibrary (const char* name)
+static unsigned long benchmark_time;
+
+void Sys_Init_Commands (void)
{
-#ifdef WIN32
- return LoadLibrary (name);
+ Cvar_RegisterVariable(&sys_debugsleep);
+ Cvar_RegisterVariable(&sys_usenoclockbutbenchmark);
+#if HAVE_TIMEGETTIME || HAVE_QUERYPERFORMANCECOUNTER || HAVE_CLOCKGETTIME || HAVE_GETTIMEOFDAY
+ if(sys_supportsdlgetticks)
+ {
+ Cvar_RegisterVariable(&sys_usesdlgetticks);
+ Cvar_RegisterVariable(&sys_usesdldelay);
+ }
+#endif
+#if HAVE_QUERYPERFORMANCECOUNTER
+ Cvar_RegisterVariable(&sys_usequeryperformancecounter);
+#endif
+#if HAVE_CLOCKGETTIME
+ Cvar_RegisterVariable(&sys_useclockgettime);
+#endif
+}
+
+double Sys_DoubleTime(void)
+{
+ static int first = true;
+ static double oldtime = 0.0, curtime = 0.0;
+ double newtime;
+ if(sys_usenoclockbutbenchmark.integer)
+ {
+ benchmark_time += 1;
+ return ((double) benchmark_time) / 1e6;
+ }
+
+ // first all the OPTIONAL timers
+
+#if HAVE_QUERYPERFORMANCECOUNTER
+ else if (sys_usequeryperformancecounter.integer)
+ {
+ // LordHavoc: note to people modifying this code, DWORD is specifically defined as an unsigned 32bit number, therefore the 65536.0 * 65536.0 is fine.
+ // QueryPerformanceCounter
+ // platform:
+ // Windows 95/98/ME/NT/2000/XP
+ // features:
+ // very accurate (CPU cycles)
+ // known issues:
+ // does not necessarily match realtime too well (tends to get faster and faster in win98)
+ // wraps around occasionally on some platforms (depends on CPU speed and probably other unknown factors)
+ double timescale;
+ LARGE_INTEGER PerformanceFreq;
+ LARGE_INTEGER PerformanceCount;
+
+ if (!QueryPerformanceFrequency (&PerformanceFreq))
+ {
+ Con_Printf ("No hardware timer available\n");
+ // fall back to timeGetTime
+ Cvar_SetValueQuick(&sys_usequeryperformancecounter, false);
+ return Sys_DoubleTime();
+ }
+ QueryPerformanceCounter (&PerformanceCount);
+
+ #ifdef __BORLANDC__
+ timescale = 1.0 / ((double) PerformanceFreq.u.LowPart + (double) PerformanceFreq.u.HighPart * 65536.0 * 65536.0);
+ newtime = ((double) PerformanceCount.u.LowPart + (double) PerformanceCount.u.HighPart * 65536.0 * 65536.0) * timescale;
+ #else
+ timescale = 1.0 / ((double) PerformanceFreq.LowPart + (double) PerformanceFreq.HighPart * 65536.0 * 65536.0);
+ newtime = ((double) PerformanceCount.LowPart + (double) PerformanceCount.HighPart * 65536.0 * 65536.0) * timescale;
+ #endif
+ }
+#endif
+
+#if HAVE_CLOCKGETTIME
+ else if (sys_useclockgettime.integer)
+ {
+ struct timespec ts;
+# ifdef CLOCK_MONOTONIC
+ // linux
+ clock_gettime(CLOCK_MONOTONIC, &ts);
+# else
+ // sunos
+ clock_gettime(CLOCK_HIGHRES, &ts);
+# endif
+ newtime = (double) ts.tv_sec + ts.tv_nsec / 1000000000.0;
+ }
+#endif
+
+ // now all the FALLBACK timers
+ else if(sys_supportsdlgetticks && sys_usesdlgetticks.integer)
+ {
+ newtime = (double) Sys_SDL_GetTicks() / 1000.0;
+ }
+#if HAVE_GETTIMEOFDAY
+ else
+ {
+ struct timeval tp;
+ gettimeofday(&tp, NULL);
+ newtime = (double) tp.tv_sec + tp.tv_usec / 1000000.0;
+ }
+#elif HAVE_TIMEGETTIME
+ else
+ {
+ static int firsttimegettime = true;
+ // timeGetTime
+ // platform:
+ // Windows 95/98/ME/NT/2000/XP
+ // features:
+ // reasonable accuracy (millisecond)
+ // issues:
+ // wraps around every 47 days or so (but this is non-fatal to us, odd times are rejected, only causes a one frame stutter)
+
+ // make sure the timer is high precision, otherwise different versions of windows have varying accuracy
+ if (firsttimegettime)
+ {
+ timeBeginPeriod (1);
+ firsttimegettime = false;
+ }
+
+ newtime = (double) timeGetTime () / 1000.0;
+ }
#else
- return dlopen (name, RTLD_LAZY);
+ // fallback for using the SDL timer if no other timer is available
+ else
+ {
+ newtime = (double) Sys_SDL_GetTicks() / 1000.0;
+ // this calls Sys_Error() if not linking against SDL
+ }
#endif
+
+ if (first)
+ {
+ first = false;
+ oldtime = newtime;
+ }
+
+ if (newtime < oldtime)
+ {
+ // warn if it's significant
+ if (newtime - oldtime < -0.01)
+ Con_Printf("Sys_DoubleTime: time stepped backwards (went from %f to %f, difference %f)\n", oldtime, newtime, newtime - oldtime);
+ }
+ else if (newtime > oldtime + 1800)
+ {
+ Con_Printf("Sys_DoubleTime: time stepped forward (went from %f to %f, difference %f)\n", oldtime, newtime, newtime - oldtime);
+ }
+ else
+ curtime += newtime - oldtime;
+ oldtime = newtime;
+
+ return curtime;
}
-void Sys_UnloadLibrary (dllhandle_t handle)
+void Sys_Sleep(int microseconds)
{
-#ifdef WIN32
- FreeLibrary (handle);
+ double t = 0;
+ if(sys_usenoclockbutbenchmark.integer)
+ {
+ benchmark_time += microseconds;
+ return;
+ }
+ if(sys_debugsleep.integer)
+ {
+ t = Sys_DoubleTime();
+ }
+ if(sys_supportsdlgetticks && sys_usesdldelay.integer)
+ {
+ Sys_SDL_Delay(microseconds / 1000);
+ }
+#if HAVE_SELECT
+ else
+ {
+ struct timeval tv;
+ tv.tv_sec = microseconds / 1000000;
+ tv.tv_usec = microseconds % 1000000;
+ select(0, NULL, NULL, NULL, &tv);
+ }
+#elif HAVE_USLEEP
+ else
+ {
+ usleep(microseconds);
+ }
+#elif HAVE_Sleep
+ else
+ {
+ Sleep(microseconds / 1000);
+ }
#else
- dlclose (handle);
+ else
+ {
+ Sys_SDL_Delay(microseconds / 1000);
+ }
#endif
+ if(sys_debugsleep.integer)
+ {
+ t = Sys_DoubleTime() - t;
+ printf("%d %d # debugsleep\n", microseconds, (unsigned int)(t * 1000000));
+ }
}
-void* Sys_GetProcAddress (dllhandle_t handle, const char* name)
+const char *Sys_FindInPATH(const char *name, char namesep, const char *PATH, char pathsep, char *buf, size_t bufsize)
{
-#ifdef WIN32
- return (void *)GetProcAddress (handle, name);
+ const char *p = PATH;
+ const char *q;
+ if(p && name)
+ {
+ while((q = strchr(p, ':')))
+ {
+ dpsnprintf(buf, bufsize, "%.*s%c%s", (int)(q-p), p, namesep, name);
+ if(FS_SysFileExists(buf))
+ return buf;
+ p = q + 1;
+ }
+ if(!q) // none found - try the last item
+ {
+ dpsnprintf(buf, bufsize, "%s%c%s", p, namesep, name);
+ if(FS_SysFileExists(buf))
+ return buf;
+ }
+ }
+ return name;
+}
+
+const char *Sys_FindExecutableName(void)
+{
+#if defined(WIN32)
+ return com_argv[0];
#else
- return (void *)dlsym (handle, name);
+ static char exenamebuf[MAX_OSPATH+1];
+ ssize_t n = -1;
+#if defined(__FreeBSD__)
+ n = readlink("/proc/curproc/file", exenamebuf, sizeof(exenamebuf)-1);
+#elif defined(__linux__)
+ n = readlink("/proc/self/exe", exenamebuf, sizeof(exenamebuf)-1);
+#endif
+ if(n > 0 && (size_t)(n) < sizeof(exenamebuf))
+ {
+ exenamebuf[n] = 0;
+ return exenamebuf;
+ }
+ if(strchr(com_argv[0], '/'))
+ return com_argv[0]; // possibly a relative path
+ else
+ return Sys_FindInPATH(com_argv[0], '/', getenv("PATH"), ':', exenamebuf, sizeof(exenamebuf));
#endif
}
+void Sys_ProvideSelfFD(void)
+{
+ if(com_selffd != -1)
+ return;
+ com_selffd = FS_SysOpenFD(Sys_FindExecutableName(), "rb", false);
+}
projects / xonotic / darkplaces.git / blobdiff