mirror of
https://github.com/jart/cosmopolitan.git
synced 2025-02-16 03:07:54 +00:00
fa20edc44d
- Remove most __ASSEMBLER__ __LINKER__ ifdefs - Rename libc/intrin/bits.h to libc/serialize.h - Block pthread cancelation in fchmodat() polyfill - Remove `clang-format off` statements in third_party
253 lines
7.2 KiB
C
253 lines
7.2 KiB
C
/*
|
|
* Copyright (c) Meta Platforms, Inc. and affiliates.
|
|
* All rights reserved.
|
|
*
|
|
* This source code is licensed under both the BSD-style license (found in the
|
|
* LICENSE file in the root directory of this source tree) and the GPLv2 (found
|
|
* in the COPYING file in the root directory of this source tree).
|
|
* You may select, at your option, one of the above-listed licenses.
|
|
*/
|
|
|
|
|
|
/* === Dependencies === */
|
|
|
|
#include "third_party/zstd/programs/timefn.h"
|
|
#include "third_party/zstd/programs/platform.h" /* set _POSIX_C_SOURCE */
|
|
#include "libc/calls/calls.h"
|
|
#include "libc/calls/struct/timespec.h"
|
|
#include "libc/calls/struct/timeval.h"
|
|
#include "libc/calls/weirdtypes.h"
|
|
#include "libc/sysv/consts/clock.h"
|
|
#include "libc/sysv/consts/sched.h"
|
|
#include "libc/sysv/consts/timer.h"
|
|
#include "libc/time/struct/tm.h"
|
|
#include "libc/time/time.h" /* CLOCK_MONOTONIC, TIME_UTC */
|
|
|
|
/*-****************************************
|
|
* Time functions
|
|
******************************************/
|
|
|
|
#if defined(_WIN32) /* Windows */
|
|
|
|
#include "libc/nt/accounting.h"
|
|
#include "libc/nt/automation.h"
|
|
#include "libc/nt/console.h"
|
|
#include "libc/nt/debug.h"
|
|
#include "libc/nt/dll.h"
|
|
#include "libc/nt/enum/keyaccess.h"
|
|
#include "libc/nt/enum/regtype.h"
|
|
#include "libc/nt/errors.h"
|
|
#include "libc/nt/events.h"
|
|
#include "libc/nt/files.h"
|
|
#include "libc/nt/ipc.h"
|
|
#include "libc/nt/memory.h"
|
|
#include "libc/nt/paint.h"
|
|
#include "libc/nt/process.h"
|
|
#include "libc/nt/registry.h"
|
|
#include "libc/nt/synchronization.h"
|
|
#include "libc/nt/thread.h"
|
|
#include "libc/nt/windows.h"
|
|
#include "libc/nt/winsock.h" /* LARGE_INTEGER */
|
|
#include "libc/calls/calls.h"
|
|
#include "libc/calls/termios.h"
|
|
#include "libc/fmt/conv.h"
|
|
#include "libc/limits.h"
|
|
#include "libc/mem/alg.h"
|
|
#include "libc/mem/alloca.h"
|
|
#include "libc/mem/mem.h"
|
|
#include "libc/runtime/runtime.h"
|
|
#include "libc/stdio/dprintf.h"
|
|
#include "libc/stdio/rand.h"
|
|
#include "libc/temp.h"
|
|
#include "libc/str/str.h"
|
|
#include "libc/sysv/consts/exit.h"
|
|
#include "third_party/musl/crypt.h"
|
|
#include "third_party/musl/rand48.h" /* abort */
|
|
#include "libc/calls/calls.h"
|
|
#include "libc/calls/weirdtypes.h"
|
|
#include "libc/stdio/dprintf.h"
|
|
#include "libc/stdio/stdio.h"
|
|
#include "libc/temp.h"
|
|
#include "third_party/musl/tempnam.h" /* perror */
|
|
|
|
UTIL_time_t UTIL_getTime(void)
|
|
{
|
|
static LARGE_INTEGER ticksPerSecond;
|
|
static int init = 0;
|
|
if (!init) {
|
|
if (!QueryPerformanceFrequency(&ticksPerSecond)) {
|
|
perror("timefn::QueryPerformanceFrequency");
|
|
abort();
|
|
}
|
|
init = 1;
|
|
}
|
|
{ UTIL_time_t r;
|
|
LARGE_INTEGER x;
|
|
QueryPerformanceCounter(&x);
|
|
r.t = (PTime)(x.QuadPart * 1000000000ULL / ticksPerSecond.QuadPart);
|
|
return r;
|
|
}
|
|
}
|
|
|
|
|
|
#elif defined(__APPLE__) && defined(__MACH__)
|
|
|
|
// MISSING #include <mach/mach_time.h> /* mach_timebase_info_data_t, mach_timebase_info, mach_absolute_time */
|
|
|
|
UTIL_time_t UTIL_getTime(void)
|
|
{
|
|
static mach_timebase_info_data_t rate;
|
|
static int init = 0;
|
|
if (!init) {
|
|
mach_timebase_info(&rate);
|
|
init = 1;
|
|
}
|
|
{ UTIL_time_t r;
|
|
r.t = mach_absolute_time() * (PTime)rate.numer / (PTime)rate.denom;
|
|
return r;
|
|
}
|
|
}
|
|
|
|
/* POSIX.1-2001 (optional) */
|
|
#elif defined(CLOCK_MONOTONIC)
|
|
|
|
#include "libc/calls/calls.h"
|
|
#include "libc/calls/termios.h"
|
|
#include "libc/fmt/conv.h"
|
|
#include "libc/limits.h"
|
|
#include "libc/mem/alg.h"
|
|
#include "libc/mem/alloca.h"
|
|
#include "libc/mem/mem.h"
|
|
#include "libc/runtime/runtime.h"
|
|
#include "libc/stdio/dprintf.h"
|
|
#include "libc/stdio/rand.h"
|
|
#include "libc/temp.h"
|
|
#include "libc/str/str.h"
|
|
#include "libc/sysv/consts/exit.h"
|
|
#include "third_party/getopt/getopt.internal.h"
|
|
#include "third_party/musl/crypt.h"
|
|
#include "third_party/musl/rand48.h" /* abort */
|
|
#include "libc/calls/calls.h"
|
|
#include "libc/calls/weirdtypes.h"
|
|
#include "libc/stdio/dprintf.h"
|
|
#include "libc/stdio/stdio.h"
|
|
#include "libc/temp.h"
|
|
#include "third_party/musl/tempnam.h" /* perror */
|
|
|
|
UTIL_time_t UTIL_getTime(void)
|
|
{
|
|
/* time must be initialized, othersize it may fail msan test.
|
|
* No good reason, likely a limitation of timespec_get() for some target */
|
|
struct timespec time = { 0, 0 };
|
|
if (clock_gettime(CLOCK_MONOTONIC, &time) != 0) {
|
|
perror("timefn::clock_gettime(CLOCK_MONOTONIC)");
|
|
abort();
|
|
}
|
|
{ UTIL_time_t r;
|
|
r.t = (PTime)time.tv_sec * 1000000000ULL + (PTime)time.tv_nsec;
|
|
return r;
|
|
}
|
|
}
|
|
|
|
|
|
/* C11 requires support of timespec_get().
|
|
* However, FreeBSD 11 claims C11 compliance while lacking timespec_get().
|
|
* Double confirm timespec_get() support by checking the definition of TIME_UTC.
|
|
* However, some versions of Android manage to simultaneously define TIME_UTC
|
|
* and lack timespec_get() support... */
|
|
#elif (defined (__STDC_VERSION__) && (__STDC_VERSION__ >= 201112L) /* C11 */) \
|
|
&& defined(TIME_UTC) && !defined(__ANDROID__)
|
|
|
|
#include "libc/calls/calls.h"
|
|
#include "libc/calls/termios.h"
|
|
#include "libc/fmt/conv.h"
|
|
#include "libc/limits.h"
|
|
#include "libc/mem/alg.h"
|
|
#include "libc/mem/alloca.h"
|
|
#include "libc/mem/mem.h"
|
|
#include "libc/runtime/runtime.h"
|
|
#include "libc/stdio/dprintf.h"
|
|
#include "libc/stdio/rand.h"
|
|
#include "libc/temp.h"
|
|
#include "libc/str/str.h"
|
|
#include "libc/sysv/consts/exit.h"
|
|
#include "third_party/getopt/getopt.internal.h"
|
|
#include "third_party/musl/crypt.h"
|
|
#include "third_party/musl/rand48.h" /* abort */
|
|
#include "libc/calls/calls.h"
|
|
#include "libc/calls/weirdtypes.h"
|
|
#include "libc/stdio/dprintf.h"
|
|
#include "libc/stdio/stdio.h"
|
|
#include "libc/temp.h"
|
|
#include "third_party/musl/tempnam.h" /* perror */
|
|
|
|
UTIL_time_t UTIL_getTime(void)
|
|
{
|
|
/* time must be initialized, othersize it may fail msan test.
|
|
* No good reason, likely a limitation of timespec_get() for some target */
|
|
struct timespec time = { 0, 0 };
|
|
if (timespec_get(&time, TIME_UTC) != TIME_UTC) {
|
|
perror("timefn::timespec_get(TIME_UTC)");
|
|
abort();
|
|
}
|
|
{ UTIL_time_t r;
|
|
r.t = (PTime)time.tv_sec * 1000000000ULL + (PTime)time.tv_nsec;
|
|
return r;
|
|
}
|
|
}
|
|
|
|
|
|
#else /* relies on standard C90 (note : clock_t produces wrong measurements for multi-threaded workloads) */
|
|
|
|
UTIL_time_t UTIL_getTime(void)
|
|
{
|
|
UTIL_time_t r;
|
|
r.t = (PTime)clock() * 1000000000ULL / CLOCKS_PER_SEC;
|
|
return r;
|
|
}
|
|
|
|
#define TIME_MT_MEASUREMENTS_NOT_SUPPORTED
|
|
|
|
#endif
|
|
|
|
/* ==== Common functions, valid for all time API ==== */
|
|
|
|
PTime UTIL_getSpanTimeNano(UTIL_time_t clockStart, UTIL_time_t clockEnd)
|
|
{
|
|
return clockEnd.t - clockStart.t;
|
|
}
|
|
|
|
PTime UTIL_getSpanTimeMicro(UTIL_time_t begin, UTIL_time_t end)
|
|
{
|
|
return UTIL_getSpanTimeNano(begin, end) / 1000ULL;
|
|
}
|
|
|
|
PTime UTIL_clockSpanMicro(UTIL_time_t clockStart )
|
|
{
|
|
UTIL_time_t const clockEnd = UTIL_getTime();
|
|
return UTIL_getSpanTimeMicro(clockStart, clockEnd);
|
|
}
|
|
|
|
PTime UTIL_clockSpanNano(UTIL_time_t clockStart )
|
|
{
|
|
UTIL_time_t const clockEnd = UTIL_getTime();
|
|
return UTIL_getSpanTimeNano(clockStart, clockEnd);
|
|
}
|
|
|
|
void UTIL_waitForNextTick(void)
|
|
{
|
|
UTIL_time_t const clockStart = UTIL_getTime();
|
|
UTIL_time_t clockEnd;
|
|
do {
|
|
clockEnd = UTIL_getTime();
|
|
} while (UTIL_getSpanTimeNano(clockStart, clockEnd) == 0);
|
|
}
|
|
|
|
int UTIL_support_MT_measurements(void)
|
|
{
|
|
# if defined(TIME_MT_MEASUREMENTS_NOT_SUPPORTED)
|
|
return 0;
|
|
# else
|
|
return 1;
|
|
# endif
|
|
}
|