2 # ifndef DONT_USE_SETDLLDIRECTORY
3 # define _WIN32_WINNT 0x0502
13 # include <mmsystem.h> // timeGetTime
14 # include <time.h> // localtime
16 #pragma comment(lib, "winmm.lib")
21 # include <sys/time.h>
28 static char sys_timestring[128];
29 char *Sys_TimeString(const char *timeformat)
31 time_t mytime = time(NULL);
34 localtime_s(&mytm, &mytime);
35 strftime(sys_timestring, sizeof(sys_timestring), timeformat, &mytm);
37 strftime(sys_timestring, sizeof(sys_timestring), timeformat, localtime(&mytime));
39 return sys_timestring;
43 extern qboolean host_shuttingdown;
44 void Sys_Quit (int returnvalue)
46 if (COM_CheckParm("-profilegameonly"))
47 Sys_AllowProfiling(false);
48 host_shuttingdown = true;
53 #if defined(__linux__) || defined(__FreeBSD__)
60 void Sys_AllowProfiling(qboolean enable)
62 #if defined(__linux__) || defined(__FreeBSD__)
69 ===============================================================================
73 ===============================================================================
76 static qboolean Sys_LoadLibraryFunctions(dllhandle_t dllhandle, const dllfunction_t *fcts, qboolean complain, qboolean has_next)
78 const dllfunction_t *func;
81 for (func = fcts; func && func->name != NULL; func++)
82 if (!(*func->funcvariable = (void *) Sys_GetProcAddress (dllhandle, func->name)))
86 Con_DPrintf (" - missing function \"%s\" - broken library!", func->name);
88 Con_DPrintf("\nContinuing with");
95 for (func = fcts; func && func->name != NULL; func++)
96 *func->funcvariable = NULL;
101 qboolean Sys_LoadLibrary (const char** dllnames, dllhandle_t* handle, const dllfunction_t *fcts)
104 const dllfunction_t *func;
105 dllhandle_t dllhandle = 0;
112 #ifdef PREFER_PRELOAD
113 dllhandle = dlopen(NULL, RTLD_LAZY | RTLD_GLOBAL);
114 if(Sys_LoadLibraryFunctions(dllhandle, fcts, false, false))
116 Con_DPrintf ("All of %s's functions were already linked in! Not loading dynamically...\n", dllnames[0]);
121 Sys_UnloadLibrary(&dllhandle);
127 for (func = fcts; func && func->name != NULL; func++)
128 *func->funcvariable = NULL;
130 // Try every possible name
131 Con_DPrintf ("Trying to load library...");
132 for (i = 0; dllnames[i] != NULL; i++)
134 Con_DPrintf (" \"%s\"", dllnames[i]);
136 # ifndef DONT_USE_SETDLLDIRECTORY
138 SetDllDirectory("bin64");
140 SetDllDirectory("bin32");
143 dllhandle = LoadLibrary (dllnames[i]);
144 // no need to unset this - we want ALL dlls to be loaded from there, anyway
146 dllhandle = dlopen (dllnames[i], RTLD_LAZY | RTLD_GLOBAL);
148 if (Sys_LoadLibraryFunctions(dllhandle, fcts, true, (dllnames[i+1] != NULL) || (strrchr(com_argv[0], '/'))))
151 Sys_UnloadLibrary (&dllhandle);
154 // see if the names can be loaded relative to the executable path
155 // (this is for Mac OSX which does not check next to the executable)
156 if (!dllhandle && strrchr(com_argv[0], '/'))
158 char path[MAX_OSPATH];
159 strlcpy(path, com_argv[0], sizeof(path));
160 strrchr(path, '/')[1] = 0;
161 for (i = 0; dllnames[i] != NULL; i++)
163 char temp[MAX_OSPATH];
164 strlcpy(temp, path, sizeof(temp));
165 strlcat(temp, dllnames[i], sizeof(temp));
166 Con_DPrintf (" \"%s\"", temp);
168 dllhandle = LoadLibrary (temp);
170 dllhandle = dlopen (temp, RTLD_LAZY | RTLD_GLOBAL);
172 if (Sys_LoadLibraryFunctions(dllhandle, fcts, true, dllnames[i+1] != NULL))
175 Sys_UnloadLibrary (&dllhandle);
182 Con_DPrintf(" - failed.\n");
186 Con_DPrintf(" - loaded.\n");
195 void Sys_UnloadLibrary (dllhandle_t* handle)
198 if (handle == NULL || *handle == NULL)
202 FreeLibrary (*handle);
211 void* Sys_GetProcAddress (dllhandle_t handle, const char* name)
215 return (void *)GetProcAddress (handle, name);
217 return (void *)dlsym (handle, name);
225 # define HAVE_TIMEGETTIME 1
226 # define HAVE_QUERYPERFORMANCECOUNTER 1
227 # define HAVE_Sleep 1
230 #if defined(CLOCK_MONOTONIC) || defined(CLOCK_HIRES)
231 # define HAVE_CLOCKGETTIME 1
235 // FIXME improve this check, manpage hints to DST_NONE
236 # define HAVE_GETTIMEOFDAY 1
240 // on Win32, select() cannot be used with all three FD list args being NULL according to MSDN
241 // (so much for POSIX...)
243 # define HAVE_SELECT 1
248 // FIXME improve this check
249 # define HAVE_USLEEP 1
252 // this one is referenced elsewhere
253 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."};
256 static cvar_t sys_debugsleep = {0, "sys_debugsleep", "0", "write requested and attained sleep times to standard output, to be used with gnuplot"};
257 static cvar_t sys_usesdlgetticks = {CVAR_SAVE, "sys_usesdlgetticks", "0", "use SDL_GetTicks() timer (less accurate, for debugging)"};
258 static cvar_t sys_usesdldelay = {CVAR_SAVE, "sys_usesdldelay", "0", "use SDL_Delay() (less accurate, for debugging)"};
259 #if HAVE_QUERYPERFORMANCECOUNTER
260 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)"};
262 #if HAVE_CLOCKGETTIME
263 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)"};
266 static unsigned long benchmark_time;
268 void Sys_Init_Commands (void)
270 Cvar_RegisterVariable(&sys_debugsleep);
271 Cvar_RegisterVariable(&sys_usenoclockbutbenchmark);
272 #if HAVE_TIMEGETTIME || HAVE_QUERYPERFORMANCECOUNTER || HAVE_CLOCKGETTIME || HAVE_GETTIMEOFDAY
273 if(sys_supportsdlgetticks)
275 Cvar_RegisterVariable(&sys_usesdlgetticks);
276 Cvar_RegisterVariable(&sys_usesdldelay);
279 #if HAVE_QUERYPERFORMANCECOUNTER
280 Cvar_RegisterVariable(&sys_usequeryperformancecounter);
282 #if HAVE_CLOCKGETTIME
283 Cvar_RegisterVariable(&sys_useclockgettime);
287 double Sys_DoubleTime(void)
289 static int first = true;
290 static double oldtime = 0.0, curtime = 0.0;
292 if(sys_usenoclockbutbenchmark.integer)
295 return ((double) benchmark_time) / 1e6;
298 // first all the OPTIONAL timers
300 #if HAVE_QUERYPERFORMANCECOUNTER
301 else if (sys_usequeryperformancecounter.integer)
303 // LordHavoc: note to people modifying this code, DWORD is specifically defined as an unsigned 32bit number, therefore the 65536.0 * 65536.0 is fine.
304 // QueryPerformanceCounter
306 // Windows 95/98/ME/NT/2000/XP
308 // very accurate (CPU cycles)
310 // does not necessarily match realtime too well (tends to get faster and faster in win98)
311 // wraps around occasionally on some platforms (depends on CPU speed and probably other unknown factors)
313 LARGE_INTEGER PerformanceFreq;
314 LARGE_INTEGER PerformanceCount;
316 if (!QueryPerformanceFrequency (&PerformanceFreq))
318 Con_Printf ("No hardware timer available\n");
319 // fall back to timeGetTime
320 Cvar_SetValueQuick(&sys_usequeryperformancecounter, false);
321 return Sys_DoubleTime();
323 QueryPerformanceCounter (&PerformanceCount);
326 timescale = 1.0 / ((double) PerformanceFreq.u.LowPart + (double) PerformanceFreq.u.HighPart * 65536.0 * 65536.0);
327 newtime = ((double) PerformanceCount.u.LowPart + (double) PerformanceCount.u.HighPart * 65536.0 * 65536.0) * timescale;
329 timescale = 1.0 / ((double) PerformanceFreq.LowPart + (double) PerformanceFreq.HighPart * 65536.0 * 65536.0);
330 newtime = ((double) PerformanceCount.LowPart + (double) PerformanceCount.HighPart * 65536.0 * 65536.0) * timescale;
335 #if HAVE_CLOCKGETTIME
336 else if (sys_useclockgettime.integer)
339 # ifdef CLOCK_MONOTONIC
341 clock_gettime(CLOCK_MONOTONIC, &ts);
344 clock_gettime(CLOCK_HIGHRES, &ts);
346 newtime = (double) ts.tv_sec + ts.tv_nsec / 1000000000.0;
350 // now all the FALLBACK timers
351 else if(sys_supportsdlgetticks && sys_usesdlgetticks.integer)
353 newtime = (double) Sys_SDL_GetTicks() / 1000.0;
355 #if HAVE_GETTIMEOFDAY
359 gettimeofday(&tp, NULL);
360 newtime = (double) tp.tv_sec + tp.tv_usec / 1000000.0;
362 #elif HAVE_TIMEGETTIME
365 static int firsttimegettime = true;
368 // Windows 95/98/ME/NT/2000/XP
370 // reasonable accuracy (millisecond)
372 // wraps around every 47 days or so (but this is non-fatal to us, odd times are rejected, only causes a one frame stutter)
374 // make sure the timer is high precision, otherwise different versions of windows have varying accuracy
375 if (firsttimegettime)
378 firsttimegettime = false;
381 newtime = (double) timeGetTime () / 1000.0;
384 // fallback for using the SDL timer if no other timer is available
387 newtime = (double) Sys_SDL_GetTicks() / 1000.0;
388 // this calls Sys_Error() if not linking against SDL
398 if (newtime < oldtime)
400 // warn if it's significant
401 if (newtime - oldtime < -0.01)
402 Con_Printf("Sys_DoubleTime: time stepped backwards (went from %f to %f, difference %f)\n", oldtime, newtime, newtime - oldtime);
404 else if (newtime > oldtime + 1800)
406 Con_Printf("Sys_DoubleTime: time stepped forward (went from %f to %f, difference %f)\n", oldtime, newtime, newtime - oldtime);
409 curtime += newtime - oldtime;
415 void Sys_Sleep(int microseconds)
418 if(sys_usenoclockbutbenchmark.integer)
420 benchmark_time += microseconds;
423 if(sys_debugsleep.integer)
425 t = Sys_DoubleTime();
427 if(sys_supportsdlgetticks && sys_usesdldelay.integer)
429 Sys_SDL_Delay(microseconds / 1000);
435 tv.tv_sec = microseconds / 1000000;
436 tv.tv_usec = microseconds % 1000000;
437 select(0, NULL, NULL, NULL, &tv);
442 usleep(microseconds);
447 Sleep(microseconds / 1000);
452 Sys_SDL_Delay(microseconds / 1000);
455 if(sys_debugsleep.integer)
457 t = Sys_DoubleTime() - t;
458 printf("%d %d # debugsleep\n", microseconds, (unsigned int)(t * 1000000));
462 const char *Sys_FindInPATH(const char *name, char namesep, const char *PATH, char pathsep, char *buf, size_t bufsize)
464 const char *p = PATH;
468 while((q = strchr(p, ':')))
470 dpsnprintf(buf, bufsize, "%.*s%c%s", (int)(q-p), p, namesep, name);
471 if(FS_SysFileExists(buf))
475 if(!q) // none found - try the last item
477 dpsnprintf(buf, bufsize, "%s%c%s", p, namesep, name);
478 if(FS_SysFileExists(buf))
485 const char *Sys_FindExecutableName(void)
490 static char exenamebuf[MAX_OSPATH+1];
492 #if defined(__FreeBSD__)
493 n = readlink("/proc/curproc/file", exenamebuf, sizeof(exenamebuf)-1);
494 #elif defined(__linux__)
495 n = readlink("/proc/self/exe", exenamebuf, sizeof(exenamebuf)-1);
497 if(n > 0 && (size_t)(n) < sizeof(exenamebuf))
502 if(strchr(com_argv[0], '/'))
503 return com_argv[0]; // possibly a relative path
505 return Sys_FindInPATH(com_argv[0], '/', getenv("PATH"), ':', exenamebuf, sizeof(exenamebuf));
509 void Sys_ProvideSelfFD(void)
513 com_selffd = FS_SysOpenFD(Sys_FindExecutableName(), "rb", false);
516 // for x86 cpus only... (x64 has SSE2_PRESENT)
517 #if defined(SSE_POSSIBLE) && !defined(SSE2_PRESENT)
518 // code from SDL, shortened as we can expect CPUID to work
519 static int CPUID_Features(void)
522 # if defined(__GNUC__) && defined(__i386__)
524 " movl %%ebx,%%edi\n"
525 " xorl %%eax,%%eax \n"
527 " cpuid # Get family/model/stepping/features\n"
529 " movl %%edi,%%ebx\n"
532 : "%eax", "%ecx", "%edx", "%edi"
534 # elif (defined(_MSC_VER) && defined(_M_IX86)) || defined(__WATCOMC__)
538 cpuid ; Get family/model/stepping/features
542 # error SSE_POSSIBLE set but no CPUID implementation
547 qboolean Sys_HaveSSE(void)
549 // COMMANDLINEOPTION: SSE: -nosse disables SSE support and detection
550 if(COM_CheckParm("-nosse"))
552 // COMMANDLINEOPTION: SSE: -forcesse enables SSE support and disables detection
553 if(COM_CheckParm("-forcesse") || COM_CheckParm("-forcesse2"))
555 if(CPUID_Features() & (1 << 25))
560 qboolean Sys_HaveSSE2(void)
562 // COMMANDLINEOPTION: SSE2: -nosse2 disables SSE2 support and detection
563 if(COM_CheckParm("-nosse") || COM_CheckParm("-nosse2"))
565 // COMMANDLINEOPTION: SSE2: -forcesse2 enables SSE2 support and disables detection
566 if(COM_CheckParm("-forcesse2"))
568 if((CPUID_Features() & (3 << 25)) == (3 << 25)) // SSE is 1<<25, SSE2 is 1<<26