]> git.xonotic.org Git - xonotic/darkplaces.git/blobdiff - sys_shared.c
Tweak limits, to make this more like in Half-Life 2 :)
[xonotic/darkplaces.git] / sys_shared.c
index 76c32fa751b5b7fdf5071e26b5f7ab085f8e144d..3b83a49888e5cc2af639b12f90c6522afcff0250 100644 (file)
-
 #include "quakedef.h"
-#include <time.h>
+
+#define SUPPORTDLL
+
 #ifdef WIN32
-#include <direct.h>
+# include <windows.h>
+# include <mmsystem.h> // timeGetTime
+# include <time.h> // localtime
 #else
-#include <sys/stat.h>
-#include <unistd.h>
-#include <fcntl.h>
+# include <unistd.h>
+# include <fcntl.h>
+# include <sys/time.h>
+# include <time.h>
+# ifdef SUPPORTDLL
+#  include <dlfcn.h>
+# endif
 #endif
-#include <errno.h>
-
-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',  '{',  '|',  '}',  '~',  '<'
-};
 
-#ifdef WIN32
-extern HANDLE hinput, houtput;
+static char sys_timestring[128];
+char *Sys_TimeString(const char *timeformat)
+{
+       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;
+}
 
-#define MAX_PRINT_MSG  16384
-void Sys_Printf (const char *fmt, ...)
-{
-       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 = 0;
-       struct tm       *local = NULL;
+extern qboolean host_shuttingdown;
+void Sys_Quit (int returnvalue)
+{
+       if (COM_CheckParm("-profilegameonly"))
+               Sys_AllowProfiling(false);
+       host_shuttingdown = true;
+       Host_Shutdown();
+       exit(returnvalue);
+}
 
-       unsigned char           *p;
-#ifdef WIN32
-       DWORD           dummy;
+#if defined(__linux__) || defined(__FreeBSD__)
+#ifdef __cplusplus
+extern "C"
+#endif
+int moncontrol(int);
 #endif
 
-       va_start (argptr, fmt);
-#ifdef HAVE_VSNPRINTF
-       vsnprintf (start, sizeof(start), fmt, argptr);
-#else
-       vsprintf (start, fmt, argptr);
+void Sys_AllowProfiling(qboolean enable)
+{
+#if defined(__linux__) || defined(__FreeBSD__)
+       moncontrol(enable);
 #endif
-       va_end (argptr);
+}
 
-       if (sys_nostdout)
-               return;
 
-       if (timestamps.integer)
+/*
+===============================================================================
+
+DLL MANAGEMENT
+
+===============================================================================
+*/
+
+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];
+       // 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
-       if (cls.state == ca_dedicated)
-               WriteFile(houtput, final, strlen (final), &dummy, NULL);
+                       dllhandle = LoadLibrary (temp);
 #else
-       printf("%s", final);
+                       dllhandle = dlopen (temp, RTLD_LAZY | RTLD_GLOBAL);
 #endif
-}
+                       if (dllhandle)
+                               break;
+               }
+       }
+
+       // No DLL found
+       if (! dllhandle)
+       {
+               Con_DPrintf(" - failed.\n");
+               return false;
+       }
 
-// LordHavoc: 256 pak files (was 10)
-#define MAX_HANDLES 256
-QFile *sys_handles[MAX_HANDLES];
+       Con_DPrintf(" - loaded.\n");
 
-int findhandle (void)
-{
-       int i;
+       // 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;
+               }
 
-       for (i = 1;i < MAX_HANDLES;i++)
-               if (!sys_handles[i])
-                       return i;
-       Sys_Error ("out of handles");
-       return -1;
+       *handle = dllhandle;
+       return true;
+#else
+       return false;
+#endif
 }
 
-/*
-================
-Sys_FileLength
-================
-*/
-int Sys_FileLength (QFile *f)
+void Sys_UnloadLibrary (dllhandle_t* handle)
 {
-       int pos, end;
+#ifdef SUPPORTDLL
+       if (handle == NULL || *handle == NULL)
+               return;
 
-       pos = Qtell (f);
-       Qseek (f, 0, SEEK_END);
-       end = Qtell (f);
-       Qseek (f, pos, SEEK_SET);
+#ifdef WIN32
+       FreeLibrary (*handle);
+#else
+       dlclose (*handle);
+#endif
 
-       return end;
+       *handle = NULL;
+#endif
 }
 
-int Sys_FileOpenRead (const char *path, int *handle)
+void* Sys_GetProcAddress (dllhandle_t handle, const char* name)
 {
-       QFile *f;
-       int i, retval;
+#ifdef SUPPORTDLL
+#ifdef WIN32
+       return (void *)GetProcAddress (handle, name);
+#else
+       return (void *)dlsym (handle, name);
+#endif
+#else
+       return NULL;
+#endif
+}
 
-       i = findhandle ();
+#ifdef WIN32
+# define HAVE_TIMEGETTIME 1
+# define HAVE_QUERYPERFORMANCECOUNTER 1
+# define HAVE_Sleep 1
+#endif
 
-       f = Qopen(path, "rbz");
+#if defined(CLOCK_MONOTONIC) || defined(CLOCK_HIRES)
+# define HAVE_CLOCKGETTIME 1
+#endif
 
-       if (!f)
-       {
-               *handle = -1;
-               retval = -1;
-       }
-       else
-       {
-               sys_handles[i] = f;
-               *handle = i;
-               retval = Sys_FileLength(f);
-       }
+#ifndef WIN32
+// FIXME improve this check, manpage hints to DST_NONE
+# define HAVE_GETTIMEOFDAY 1
+#endif
 
-       return retval;
-}
+#ifdef FD_SET
+# define HAVE_SELECT 1
+#endif
 
-int Sys_FileOpenWrite (const char *path)
-{
-       QFile   *f;
-       int             i;
+#ifndef WIN32
+// FIXME improve this check
+# define HAVE_USLEEP 1
+#endif
 
-       i = findhandle ();
+// 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."};
 
-       f = Qopen(path, "wb");
-       if (!f)
-       {
-               Con_Printf("Sys_FileOpenWrite: Error opening %s: %s", path, strerror(errno));
-               return 0;
-       }
-       sys_handles[i] = f;
+// 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
 
-       return i;
-}
+static unsigned long benchmark_time;
 
-void Sys_FileClose (int handle)
+void Sys_Init_Commands (void)
 {
-       Qclose (sys_handles[handle]);
-       sys_handles[handle] = NULL;
-}
-
-void Sys_FileSeek (int handle, int position)
-{
-       Qseek (sys_handles[handle], position, SEEK_SET);
+       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
 }
 
-int Sys_FileRead (int handle, void *dest, int count)
+double Sys_DoubleTime(void)
 {
-       return Qread (sys_handles[handle], dest, count);
-}
+       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;
+       }
 
-int Sys_FileWrite (int handle, void *data, int count)
-{
-       return Qwrite (sys_handles[handle], data, count);
-}
+       // first all the OPTIONAL timers
 
-int Sys_FileTime (const char *path)
-{
-#if WIN32
-       QFile *f;
+#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
 
-       f = Qopen(path, "rb");
-       if (f)
+#if HAVE_CLOCKGETTIME
+       else if (sys_useclockgettime.integer)
        {
-               Qclose(f);
-               return 1;
+               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
 
-       return -1;
+       // 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
-       struct stat buf;
+       // 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 (stat (path,&buf) == -1)
-               return -1;
+       if (first)
+       {
+               first = false;
+               oldtime = newtime;
+       }
 
-       return buf.st_mtime;
-#endif
+       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_mkdir (const char *path)
+void Sys_Sleep(int microseconds)
 {
-#if WIN32
-       _mkdir (path);
+       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
-       mkdir (path, 0777);
+       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));
+       }
 }
 
-char engineversion[128];
-
-void Sys_Shared_EarlyInit(void)
+const char *Sys_FindInPATH(const char *name, char namesep, const char *PATH, char pathsep, char *buf, size_t bufsize)
 {
-       Memory_Init ();
-
-       COM_InitArgv();
-       COM_InitGameType();
+       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;
+}
 
-#if defined(__linux__)
-       sprintf (engineversion, "%s Linux %s", gamename, buildstring);
-#elif defined(WIN32)
-       sprintf (engineversion, "%s Windows %s", gamename, buildstring);
+const char *Sys_FindExecutableName(void)
+{
+#if defined(WIN32)
+       return com_argv[0];
 #else
-       sprintf (engineversion, "%s Unknown %s", gamename, buildstring);
+       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 (COM_CheckParm("-nostdout"))
-               sys_nostdout = 1;
+       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
-               Con_Printf("%s\n", engineversion);
+               return Sys_FindInPATH(com_argv[0], '/', getenv("PATH"), ':', exenamebuf, sizeof(exenamebuf));
+#endif
 }
 
-void Sys_Shared_LateInit(void)
+void Sys_ProvideSelfFD(void)
 {
+       if(com_selffd != -1)
+               return;
+       com_selffd = FS_SysOpenFD(Sys_FindExecutableName(), "rb", false);
 }
-