daiduo/TurboPFor-Integer-Compression
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

IcBench: Benchmark App: include

Browse Source
This commit is contained in:
powturbo
2017-06-13 09:14:19 +02:00
parent 7c44ee7e4a
commit 0396be547d
1 changed files with 60 additions and 41 deletions
Download Patch File Download Diff File Expand all files Collapse all files

101
time_.h
View File

@ -1,16 +1,21 @@
#include <stdint.h>
#include <time.h>
#ifdef _WIN32
#ifdef _WIN32
#include <windows.h>
#ifndef sleep
#define sleep(n) Sleep((n) * 1000)
#else
#include <unistd.h>
#define Sleep(ms) usleep((ms) * 1000)
#endif
typedef unsigned __int64 uint64_t;
typedef unsigned __int64 tm_t;
#else
#include <stdint.h>
#include <unistd.h>
typedef uint64_t tm_t;
#define Sleep(ms) usleep((ms) * 1000)
#endif
#if defined (__i386__) || defined( __x86_64__ )
#ifdef _MSC_VER
#if defined (__i386__) || defined( __x86_64__ )
#ifdef _MSC_VER
#include <intrin.h> // __rdtsc
#else
#include <x86intrin.h>
@ -23,7 +28,7 @@
"mov %%edx, %0\n" \
"mov %%eax, %1\n": "=r" (_ch), "=r" (_cl):: \
"%rax", "%rbx", "%rcx", "%rdx"); \
_c_ = (unsigned long long)_ch << 32 | _cl; \
_c_ = (uint64_t)_ch << 32 | _cl; \
} while(0)
#define RDTSC(_c_) do { unsigned _cl, _ch; \
@ -32,7 +37,7 @@
"mov %%eax, %1\n" \
"cpuid\n\t": "=r" (_ch), "=r" (_cl):: "%rax",\
"%rbx", "%rcx", "%rdx");\
_c_ = (unsigned long long)_ch << 32 | _cl;\
_c_ = (uint64_t)_ch << 32 | _cl;\
} while(0)
#else
#define RDTSC(_c_) do { unsigned _cl, _ch;\
@ -41,42 +46,56 @@
: "=a"(_cl), "=d"(_ch)\
: "a"(0)\
: "%ebx", "%ecx");\
_c_ = (unsigned long long)_ch << 32 | _cl;\
_c_ = (uint64_t)_ch << 32 | _cl;\
} while(0)
#define RDTSC_INI(_c_) RDTSC(_c_)
#endif
#else
#define RDTSC_INI(_c_)
#define RDTSC(_c_)
#define RDTSC(_c_)
#endif
#define tmrdtscini() ({ tm_t _c; __asm volatile("" ::: "memory"); RDTSC_INI(_c); _c; })
#define tmrdtsc() ({ tm_t _c; RDTSC(_c); _c; })
typedef unsigned long long tm_t;
#ifndef TM_F
#define TM_F 1 // TM_F=4 -> MI/s
#define TM_F 1.0 // TM_F=4 -> MI/s
#endif
#ifdef RDTSC_ON
#define tminit() tmrdtscini()
#define tmtime() tmrdtsc()
#define TM_T CLOCKS_PER_SEC
#define TMBS(__l,__t) (double)(__t)/((double)(__l))
static double TMBS(unsigned l, tm_t t) { double dt=t,dl=l; return t/l; }
#define TM_C 1000
#else
#define TM_T 1000000.0
#define TM_C 1
#define TMBS(__l,__t) ((__t)>=0.000001?((double)(__l)/(1000000.0*TM_F))/((__t)/TM_T):0.0)
static double TMBS(unsigned l, tm_t tm) { double dl=l,dt=tm; return dt>=0.000001?(dl/(1000000.0*TM_F))/(dt/TM_T):0.0; }
#ifdef _WIN32
static LARGE_INTEGER tps;
static tm_t tmtime(void) { LARGE_INTEGER tm; QueryPerformanceCounter(&tm); return (tm_t)((double)tm.QuadPart*1000000.0/tps.QuadPart); }
static tm_t tminit() { QueryPerformanceFrequency(&tps); tm_t t0=tmtime(),ts; while((ts = tmtime())==t0); return ts; }
static tm_t tmtime(void) {
LARGE_INTEGER tm;
tm_t t;
double d;
QueryPerformanceCounter(&tm);
d = tm.QuadPart;
t = d*1000000.0/tps.QuadPart;
return t;
}
static tm_t tminit() { tm_t t0,ts; QueryPerformanceFrequency(&tps); t0 = tmtime(); while((ts = tmtime())==t0); return ts; }
#else
#ifdef __MACH__
#ifdef __APPLE__
#include <AvailabilityMacros.h>
#ifndef MAC_OS_X_VERSION_10_12
#define MAC_OS_X_VERSION_10_12 101200
#endif
#define CIVETWEB_APPLE_HAVE_CLOCK_GETTIME defined(__APPLE__) && MAC_OS_X_VERSION_MIN_REQUIRED >= MAC_OS_X_VERSION_10_12
#if !(CIVETWEB_APPLE_HAVE_CLOCK_GETTIME)
#include <sys/time.h>
#define CLOCK_REALTIME 0
#define CLOCK_MONOTONIC 0
#define CLOCK_REALTIME 0
#define CLOCK_MONOTONIC 0
int clock_gettime(int /*clk_id*/, struct timespec* t) {
struct timeval now;
int rv = gettimeofday(&now, NULL);
@ -85,12 +104,13 @@ int clock_gettime(int /*clk_id*/, struct timespec* t) {
t->tv_nsec = now.tv_usec * 1000;
return 0;
}
#endif
static tm_t tmtime(void) { struct timespec tm; clock_gettime(CLOCK_MONOTONIC, &tm); return (tm_t)tm.tv_sec*1000000ull + tm.tv_nsec/1000; }
#endif
#endif
static tm_t tmtime(void) { struct timespec tm; clock_gettime(CLOCK_MONOTONIC, &tm); return (tm_t)tm.tv_sec*1000000 + tm.tv_nsec/1000; }
static tm_t tminit() { tm_t t0=tmtime(),ts; while((ts = tmtime())==t0); return ts; }
#endif
static double tmsec( tm_t tm) { return (double)tm/1000000.0; }
static double tmmsec(tm_t tm) { return (double)tm/1000.0; }
static double tmsec( tm_t tm) { double d = tm; return d/1000000.0; }
static double tmmsec(tm_t tm) { double d = tm; return d/1000.0; }
#endif
//---------------------------------------- bench ----------------------------------------------------------------------
#define TM_TX TM_T
@ -98,21 +118,21 @@ static double tmmsec(tm_t tm) { return (double)tm/1000.0; }
#define TMSLEEP do { tm_T = tmtime(); if(!tm_0) tm_0 = tm_T; else if(tm_T - tm_0 > tm_TX) { if(tm_verbose) { printf("S \b\b");fflush(stdout);} sleep(tm_slp); tm_0=tmtime();} } while(0)
#define TMBEG(_tm_reps_, _tm_Reps_) { unsigned _tm_r,_tm_c=0,_tm_R; tm_t _tm_t0,_tm_t,_tm_ts;\
for(tm_rm = _tm_reps_, tm_tm = 1ull<<63,_tm_R = 0,_tm_ts=tmtime(); _tm_R < _tm_Reps_; _tm_R++) { tm_t _tm_t0 = tminit();\
for(tm_rm = _tm_reps_, tm_tm = (tm_t)1<<63,_tm_R = 0,_tm_ts=tmtime(); _tm_R < _tm_Reps_; _tm_R++) { tm_t _tm_t0 = tminit();\
for(_tm_r=0;_tm_r < tm_rm;) {
#define TMEND(_len_) _tm_r++; if((_tm_t = tmtime() - _tm_t0) > tm_tx) break; } \
if(_tm_t < tm_tm) { if(tm_tm == 1ull<<63) { tm_rm = _tm_r; /*printf("reps=%d ", tm_rm);*/ } tm_tm = _tm_t; _tm_c++; } \
else if(_tm_t>tm_tm*1.2) TMSLEEP; if(tm_verbose) printf("%8.2f %.2d_%d\b\b\b\b\b\b\b\b\b\b\b\b\b",TMBS(_len_, (double)tm_tm*TM_C/tm_rm),_tm_R+1,_tm_c),fflush(stdout);\
if(tmtime()-_tm_ts > tm_TX) break;\
if(_tm_t < tm_tm) { if(tm_tm == (tm_t)1<<63) tm_rm = _tm_r; tm_tm = _tm_t; _tm_c++; } \
else if(_tm_t>tm_tm*1.2) TMSLEEP; if(tm_verbose) { double d = tm_tm*TM_C,dr=tm_rm; printf("%8.2f %2d_%.2d\b\b\b\b\b\b\b\b\b\b\b\b\b\b",TMBS(_len_, d/dr),_tm_R+1,_tm_c),fflush(stdout); }\
if(tmtime()-_tm_ts > tm_TX && _tm_R < 8) break;\
if((_tm_R & 7)==7) sleep(tm_slp),_tm_ts=tmtime(); } }
static unsigned tm_rep = 1<<20, tm_Rep = 3, tm_rep2 = 1<<20, tm_Rep2 = 4, tm_slp = 20, tm_rm;
static tm_t tm_tx = TM_T, tm_TX = 10*TM_T, tm_0, tm_T, tm_verbose=1, tm_tm;
static void tm_init(int _tm_Rep, int _tm_verbose) { tm_verbose = _tm_verbose; if(_tm_Rep) tm_Rep = _tm_Rep; tm_tx = tminit(); Sleep(500); tm_tx = tmtime() - tm_tx; /*printf("tm_tx=%llu %lld\n", tm_tx, (long long)CLOCKS_PER_SEC);*/ tm_TX = 10*tm_tx; }
static tm_t tm_tx = TM_T, tm_TX = 120*TM_T, tm_0, tm_T, tm_verbose=1, tm_tm;
static void tm_init(int _tm_Rep, int _tm_verbose) { tm_verbose = _tm_verbose; if(_tm_Rep) tm_Rep = _tm_Rep; tm_tx = tminit(); Sleep(500); tm_tx = tmtime() - tm_tx; tm_TX = 10*tm_tx; }
#define TMBENCH(_name_, _func_, _len_) do { if(tm_verbose) printf("%-32s: ", _name_?_name_:#_func_ ); TMBEG(tm_rep, tm_Rep) _func_; TMEND(_len_); if(tm_verbose) printf("%8.2f \n", TMBS(_len_, (double)tm_tm*TM_C/(double)tm_rm) ); } while(0)
#define TMBENCHF(_name_,_func_, _len_, _res_) do { if(tm_verbose) printf("%-32s: ", _name_?_name_:#_func_ ); TMBEG(tm_rep, tm_Rep) if(_func_ != _res_) { printf("ERROR: %lld != %lld", (long long)_func_, (long long)_res_ ); exit(0); }; TMEND(_len_); if(tm_verbose) printf("%8.2f \n", TMBS(_len_,(double)tm_tm*TM_C/(double)tm_rm) ); } while(0)
#define TMBENCH(_name_, _func_, _len_) do { if(tm_verbose) printf("%s ", _name_?_name_:#_func_); TMBEG(tm_rep, tm_Rep) _func_; TMEND(_len_); { double dm = tm_tm,dr=tm_rm; if(tm_verbose) printf("%8.2f \b\b\b\b\b", TMBS(_len_, dm*TM_C/dr) );} } while(0)
#define TMBENCHF(_name_,_func_, _len_, _res_) do { if(tm_verbose) printf("%s ", _name_?_name_:#_func_ ); TMBEG(tm_rep, tm_Rep) if(_func_ != _res_) { printf("ERROR: %lld != %lld", (long long)_func_, (long long)_res_ ); exit(0); }; TMEND(_len_); if(tm_verbose) printf("%8.2f \b\b\b\b\b", TMBS(_len_,(double)tm_tm*TM_C/(double)tm_rm) ); } while(0)
#define Kb (1u<<10)
#define Mb (1u<<20)
@ -123,7 +143,7 @@ static void tm_init(int _tm_Rep, int _tm_verbose) { tm_verbose = _tm_verbose; if
static unsigned argtoi(char *s, unsigned def) {
char *p;
unsigned n = strtol(s, &p, 10),f = 1;
unsigned n = strtol(s, &p, 10),f = 1;
switch(*p) {
case 'K': f = KB; break;
case 'M': f = MB; break;
@ -131,15 +151,14 @@ static unsigned argtoi(char *s, unsigned def) {
case 'k': f = Kb; break;
case 'm': f = Mb; break;
case 'g': f = Gb; break;
case 'b': return 1u << n;
default: f = def;
case 'b': def = 0;
default: if(!def) return n>=32?0xffffffffu:(1u << n); f = def;
}
return n*f;
}
static unsigned long long argtol(char *s) {
static uint64_t argtol(char *s) {
char *p;
unsigned long long n = strtol(s, &p, 10),f=1;
uint64_t n = strtol(s, &p, 10),f=1;
switch(*p) {
case 'K': f = KB; break;
case 'M': f = MB; break;
@ -153,9 +172,9 @@ static unsigned long long argtol(char *s) {
return n*f;
}
static unsigned long long argtot(char *s) {
static uint64_t argtot(char *s) {
char *p;
unsigned long long n = strtol(s, &p, 10),f=1;
uint64_t n = strtol(s, &p, 10),f=1;
switch(*p) {
case 'h': f = 3600000; break;
case 'm': f = 60000; break;