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 double benchmark_time; // actually always contains an integer amount of milliseconds, will eventually "overflow"
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)
294 double old_benchmark_time = benchmark_time;
296 if(benchmark_time == old_benchmark_time)
297 Sys_Error("sys_usenoclockbutbenchmark cannot run any longer, sorry");
298 return benchmark_time * 0.000001;
301 // first all the OPTIONAL timers
303 #if HAVE_QUERYPERFORMANCECOUNTER
304 else if (sys_usequeryperformancecounter.integer)
306 // LordHavoc: note to people modifying this code, DWORD is specifically defined as an unsigned 32bit number, therefore the 65536.0 * 65536.0 is fine.
307 // QueryPerformanceCounter
309 // Windows 95/98/ME/NT/2000/XP
311 // very accurate (CPU cycles)
313 // does not necessarily match realtime too well (tends to get faster and faster in win98)
314 // wraps around occasionally on some platforms (depends on CPU speed and probably other unknown factors)
316 LARGE_INTEGER PerformanceFreq;
317 LARGE_INTEGER PerformanceCount;
319 if (!QueryPerformanceFrequency (&PerformanceFreq))
321 Con_Printf ("No hardware timer available\n");
322 // fall back to timeGetTime
323 Cvar_SetValueQuick(&sys_usequeryperformancecounter, false);
324 return Sys_DoubleTime();
326 QueryPerformanceCounter (&PerformanceCount);
329 timescale = 1.0 / ((double) PerformanceFreq.u.LowPart + (double) PerformanceFreq.u.HighPart * 65536.0 * 65536.0);
330 newtime = ((double) PerformanceCount.u.LowPart + (double) PerformanceCount.u.HighPart * 65536.0 * 65536.0) * timescale;
332 timescale = 1.0 / ((double) PerformanceFreq.LowPart + (double) PerformanceFreq.HighPart * 65536.0 * 65536.0);
333 newtime = ((double) PerformanceCount.LowPart + (double) PerformanceCount.HighPart * 65536.0 * 65536.0) * timescale;
338 #if HAVE_CLOCKGETTIME
339 else if (sys_useclockgettime.integer)
342 # ifdef CLOCK_MONOTONIC
344 clock_gettime(CLOCK_MONOTONIC, &ts);
347 clock_gettime(CLOCK_HIGHRES, &ts);
349 newtime = (double) ts.tv_sec + ts.tv_nsec / 1000000000.0;
353 // now all the FALLBACK timers
354 else if(sys_supportsdlgetticks && sys_usesdlgetticks.integer)
356 newtime = (double) Sys_SDL_GetTicks() / 1000.0;
358 #if HAVE_GETTIMEOFDAY
362 gettimeofday(&tp, NULL);
363 newtime = (double) tp.tv_sec + tp.tv_usec / 1000000.0;
365 #elif HAVE_TIMEGETTIME
368 static int firsttimegettime = true;
371 // Windows 95/98/ME/NT/2000/XP
373 // reasonable accuracy (millisecond)
375 // wraps around every 47 days or so (but this is non-fatal to us, odd times are rejected, only causes a one frame stutter)
377 // make sure the timer is high precision, otherwise different versions of windows have varying accuracy
378 if (firsttimegettime)
381 firsttimegettime = false;
384 newtime = (double) timeGetTime () / 1000.0;
387 // fallback for using the SDL timer if no other timer is available
390 newtime = (double) Sys_SDL_GetTicks() / 1000.0;
391 // this calls Sys_Error() if not linking against SDL
401 if (newtime < oldtime)
403 // warn if it's significant
404 if (newtime - oldtime < -0.01)
405 Con_Printf("Sys_DoubleTime: time stepped backwards (went from %f to %f, difference %f)\n", oldtime, newtime, newtime - oldtime);
407 else if (newtime > oldtime + 1800)
409 Con_Printf("Sys_DoubleTime: time stepped forward (went from %f to %f, difference %f)\n", oldtime, newtime, newtime - oldtime);
412 curtime += newtime - oldtime;
418 void Sys_Sleep(int microseconds)
421 if(sys_usenoclockbutbenchmark.integer)
425 double old_benchmark_time = benchmark_time;
426 benchmark_time += microseconds;
427 if(benchmark_time == old_benchmark_time)
428 Sys_Error("sys_usenoclockbutbenchmark cannot run any longer, sorry");
432 if(sys_debugsleep.integer)
434 t = Sys_DoubleTime();
436 if(sys_supportsdlgetticks && sys_usesdldelay.integer)
438 Sys_SDL_Delay(microseconds / 1000);
444 tv.tv_sec = microseconds / 1000000;
445 tv.tv_usec = microseconds % 1000000;
446 select(0, NULL, NULL, NULL, &tv);
451 usleep(microseconds);
456 Sleep(microseconds / 1000);
461 Sys_SDL_Delay(microseconds / 1000);
464 if(sys_debugsleep.integer)
466 t = Sys_DoubleTime() - t;
467 printf("%d %d # debugsleep\n", microseconds, (unsigned int)(t * 1000000));
471 const char *Sys_FindInPATH(const char *name, char namesep, const char *PATH, char pathsep, char *buf, size_t bufsize)
473 const char *p = PATH;
477 while((q = strchr(p, ':')))
479 dpsnprintf(buf, bufsize, "%.*s%c%s", (int)(q-p), p, namesep, name);
480 if(FS_SysFileExists(buf))
484 if(!q) // none found - try the last item
486 dpsnprintf(buf, bufsize, "%s%c%s", p, namesep, name);
487 if(FS_SysFileExists(buf))
494 const char *Sys_FindExecutableName(void)
499 static char exenamebuf[MAX_OSPATH+1];
501 #if defined(__FreeBSD__)
502 n = readlink("/proc/curproc/file", exenamebuf, sizeof(exenamebuf)-1);
503 #elif defined(__linux__)
504 n = readlink("/proc/self/exe", exenamebuf, sizeof(exenamebuf)-1);
506 if(n > 0 && (size_t)(n) < sizeof(exenamebuf))
511 if(strchr(com_argv[0], '/'))
512 return com_argv[0]; // possibly a relative path
514 return Sys_FindInPATH(com_argv[0], '/', getenv("PATH"), ':', exenamebuf, sizeof(exenamebuf));
518 void Sys_ProvideSelfFD(void)
522 com_selffd = FS_SysOpenFD(Sys_FindExecutableName(), "rb", false);
525 // for x86 cpus only... (x64 has SSE2_PRESENT)
526 #if defined(SSE_POSSIBLE) && !defined(SSE2_PRESENT)
527 // code from SDL, shortened as we can expect CPUID to work
528 static int CPUID_Features(void)
531 # if defined(__GNUC__) && defined(__i386__)
533 " movl %%ebx,%%edi\n"
534 " xorl %%eax,%%eax \n"
536 " cpuid # Get family/model/stepping/features\n"
538 " movl %%edi,%%ebx\n"
541 : "%eax", "%ecx", "%edx", "%edi"
543 # elif (defined(_MSC_VER) && defined(_M_IX86)) || defined(__WATCOMC__)
547 cpuid ; Get family/model/stepping/features
551 # error SSE_POSSIBLE set but no CPUID implementation
556 qboolean Sys_HaveSSE(void)
558 // COMMANDLINEOPTION: SSE: -nosse disables SSE support and detection
559 if(COM_CheckParm("-nosse"))
561 // COMMANDLINEOPTION: SSE: -forcesse enables SSE support and disables detection
562 if(COM_CheckParm("-forcesse") || COM_CheckParm("-forcesse2"))
564 if(CPUID_Features() & (1 << 25))
569 qboolean Sys_HaveSSE2(void)
571 // COMMANDLINEOPTION: SSE2: -nosse2 disables SSE2 support and detection
572 if(COM_CheckParm("-nosse") || COM_CheckParm("-nosse2"))
574 // COMMANDLINEOPTION: SSE2: -forcesse2 enables SSE2 support and disables detection
575 if(COM_CheckParm("-forcesse2"))
577 if((CPUID_Features() & (3 << 25)) == (3 << 25)) // SSE is 1<<25, SSE2 is 1<<26