| #include <xmmintrin.h> |
| #include <stdio.h> |
| #include <math.h> |
| #include <time.h> |
| #include <inttypes.h> |
| #include <stdlib.h> |
| #include <assert.h> |
| |
| #ifdef __EMSCRIPTEN__ |
| #include <emscripten/emscripten.h> |
| // This test never frees, so we can be carefree and just round up to be aligned. |
| #define aligned_alloc(align, size) (void*)(((uintptr_t)malloc((size) + ((align)-1)) + ((align)-1)) & (~((align)-1))) |
| #endif |
| |
| #if defined(__unix__) && !defined(__EMSCRIPTEN__) // Native build without Emscripten. |
| #include <time.h> |
| #include <errno.h> |
| #include <string.h> |
| #include <sys/time.h> |
| #define tick_t unsigned long long |
| #endif |
| |
| #ifdef __APPLE__ |
| #include <mach/mach_time.h> |
| #define aligned_alloc(align, size) malloc((size)) |
| #endif |
| |
| #ifdef WIN32 |
| #include <Windows.h> |
| #define tick_t unsigned long long |
| #define aligned_alloc(align, size) _aligned_malloc((size), (align)) |
| #endif |
| |
| // Scalar horizonal max across four lanes. |
| float hmax(__m128 m) |
| { |
| float f[4]; |
| _mm_storeu_ps(f, m); |
| return fmax(fmax(f[0], f[1]), fmax(f[2], f[3])); |
| } |
| |
| #ifdef __EMSCRIPTEN__ |
| #define tick emscripten_get_now |
| #define tick_t double |
| tick_t ticks_per_sec() { return 1000.0; } |
| #elif defined(__APPLE__) |
| #define tick_t unsigned long long |
| #define tick mach_absolute_time |
| tick_t ticks_per_sec() |
| { |
| mach_timebase_info_data_t timeBaseInfo; |
| mach_timebase_info(&timeBaseInfo); |
| return 1000000000ULL * (uint64_t)timeBaseInfo.denom / (uint64_t)timeBaseInfo.numer; |
| } |
| #elif defined(_POSIX_MONOTONIC_CLOCK) |
| inline tick_t tick() |
| { |
| timespec t; |
| clock_gettime(CLOCK_MONOTONIC, &t); |
| return (tick_t)t.tv_sec * 1000 * 1000 * 1000 + (tick_t)t.tv_nsec; |
| } |
| tick_t ticks_per_sec() |
| { |
| return 1000 * 1000 * 1000; |
| } |
| #elif defined(_POSIX_C_SOURCE) |
| inline tick_t tick() |
| { |
| timeval t; |
| gettimeofday(&t, NULL); |
| return (tick_t)t.tv_sec * 1000 * 1000 + (tick_t)t.tv_usec; |
| } |
| tick_t ticks_per_sec() |
| { |
| return 1000 * 1000; |
| } |
| #elif defined(WIN32) |
| inline tick_t tick() |
| { |
| LARGE_INTEGER ddwTimer; |
| QueryPerformanceCounter(&ddwTimer); |
| return ddwTimer.QuadPart; |
| } |
| tick_t ticks_per_sec() |
| { |
| LARGE_INTEGER ddwTimerFrequency; |
| QueryPerformanceFrequency(&ddwTimerFrequency); |
| return ddwTimerFrequency.QuadPart; |
| } |
| #else |
| #error No tick_t |
| #endif |
| |
| const int N = 2*1024*1024; |
| |
| tick_t scalarTotalTicks = 0; |
| tick_t simdTotalTicks = 0; |
| tick_t scalarTicks = 0; |
| const char *chartName = ""; |
| #define SETCHART(x) chartName = (x); |
| |
| #define START() \ |
| do { \ |
| tick_t start = tick(); |
| |
| bool comma=false; |
| #define END(result, name) \ |
| tick_t end = tick(); \ |
| tick_t ticks = end - start; \ |
| scalarTotalTicks += scalarTicks; \ |
| simdTotalTicks += ticks; \ |
| double nsecs = (double)ticks * 1000.0 * 1000.0 * 1000.0 / ticks_per_sec() / N; \ |
| printf("%s{ \"chart\": \"%s\", \"category\": \"%s\", \"scalar\": %f, \"simd\": %f }\n", comma?",":"", chartName, name, scalarTime, nsecs); \ |
| comma = true; \ |
| /*printf(name ": %f msecs (%.3fx of scalar)%s\n", msecs, msecs/scalarTime);*/ \ |
| printf("%s", (result) != 0 ? "Error!" : ""); \ |
| } while(0) |
| |
| #define ENDSCALAR(result, name) \ |
| tick_t end = tick(); \ |
| scalarTicks = end - start; \ |
| scalarTime = (double)scalarTicks * 1000.0 * 1000.0 * 1000.0 / ticks_per_sec() / N; \ |
| printf("%s", (result) != 0 ? "Error!" : ""); \ |
| } while(0) |
| |
| void Print(__m128 m) |
| { |
| float val[4]; |
| _mm_storeu_ps(val, m); |
| fprintf(stderr, "[%g, %g, %g, %g]\n", val[3], val[2], val[1], val[0]); |
| } |
| |
| bool always_true() { return time(NULL) != 0; } // This function always returns true, but the compiler should not know this. |
| |
| #ifdef _MSC_VER |
| #define NOINLINE __declspec(noinline) |
| #define INLINE __forceinline |
| #else |
| #define NOINLINE __attribute__((noinline)) |
| #define INLINE __inline__ |
| #endif |
| |
| float NOINLINE *get_src() { return always_true() ? (float*)aligned_alloc(16, (N+16)*sizeof(float)) : 0; } |
| float NOINLINE *get_src2() { return always_true() ? (float*)aligned_alloc(16, (N+16)*sizeof(float)) : 0; } |
| float NOINLINE *get_dst() { return always_true() ? (float*)aligned_alloc(16, (N+16)*sizeof(float)) : 0; } |
| |
| float checksum_dst(float *dst) |
| { |
| if (always_true()) return 0.f; |
| else |
| { |
| float s = 0.f; for(int i = 0; i < N; ++i) s += dst[i]; |
| return s; |
| } |
| } |
| |
| uint32_t fcastu(float f) { return *(uint32_t*)&f; } |
| float ucastf(uint32_t t) { return *(float*)&t; } |
| |
| // load-store test |
| #define LS_TEST(msg, load_instr, load_offset, store_instr, store_offset) \ |
| START(); \ |
| for(int i = 0; i < N; i += 4) \ |
| store_instr((float*)dst+store_offset+i, load_instr(src+load_offset+i)); \ |
| END(checksum_dst(dst), msg); |
| |
| // loadh/l - store test |
| #define LSH_TEST(msg, reg, load_instr, load_offset, store_instr, store_offset) \ |
| START(); \ |
| for(int i = 0; i < N; i += 4) \ |
| store_instr((float*)dst+store_offset+i, load_instr(reg, (const __m64*)(src+load_offset+i))); \ |
| END(checksum_dst(dst), msg); |
| |
| #define LS64_TEST(msg, load_instr, load_offset, store_instr, store_offset) \ |
| START(); \ |
| for(int i = 0; i < N; i += 4) \ |
| store_instr((__m64*)(dst+store_offset+i), load_instr(src+load_offset+i)); \ |
| END(checksum_dst(dst), msg); |
| |
| // set-store test |
| #define SS_TEST(msg, set_instr) \ |
| START(); \ |
| for(int i = 0; i < N; i += 4) \ |
| _mm_store_ps((float*)dst+i, set_instr); \ |
| END(checksum_dst(dst), msg); |
| |
| #define UNARYOP_TEST(msg, instr, op0) \ |
| START(); \ |
| __m128 o = op0; \ |
| for(int i = 0; i < N; i += 4) \ |
| o = instr(o); \ |
| _mm_store_ps(dst, o); \ |
| END(checksum_dst(dst), msg); |
| |
| #define BINARYOP_TEST(msg, instr, op0, op1) \ |
| START(); \ |
| __m128 o0 = op0; \ |
| __m128 o1 = op1; \ |
| for(int i = 0; i < N; i += 4) \ |
| o0 = instr(o0, o1); \ |
| _mm_store_ps(dst, o0); \ |
| END(checksum_dst(dst), msg); |
| |
| #define Max(a,b) ((a) >= (b) ? (a) : (b)) |
| #define Min(a,b) ((a) <= (b) ? (a) : (b)) |
| |
| static INLINE int Isnan(float __f) |
| { |
| return (*(unsigned int*)&__f << 1) > 0xFF000000u; |
| } |
| |
| int main() |
| { |
| #ifndef __EMSCRIPTEN__ |
| _MM_SET_FLUSH_ZERO_MODE(_MM_FLUSH_ZERO_ON); |
| #endif |
| |
| printf ("{ \"workload\": %u, \"results\": [\n", N); |
| assert(N%4 == 0); // Don't care about the tail for now. |
| float *src = get_src();//(float*)aligned_alloc(16, N*sizeof(float)); |
| for(int i = 0; i < N; ++i) |
| src[i] = (float)rand() / RAND_MAX; |
| float *src2 = get_src2();//(float*)aligned_alloc(16, N*sizeof(float)); |
| for(int i = 0; i < N; ++i) |
| src2[i] = (float)rand() / RAND_MAX; |
| float *dst = get_dst();//(float*)aligned_alloc(16, N*sizeof(float)); |
| |
| float scalarTime; |
| SETCHART("load"); |
| START(); |
| for(int i = 0; i < N; ++i) |
| dst[i] = src[i]; |
| ENDSCALAR(checksum_dst(dst), "scalar"); |
| |
| LS_TEST("_mm_load_ps", _mm_load_ps, 0, _mm_store_ps, 0); |
| LS_TEST("_mm_load_ps1", _mm_load_ps1, 1, _mm_store_ps, 0); |
| LS_TEST("_mm_load_ss", _mm_load_ss, 1, _mm_store_ps, 0); |
| LS_TEST("_mm_load1_ps", _mm_load1_ps, 1, _mm_store_ps, 0); |
| |
| __m128 tempReg = _mm_set_ps(1.f, 2.f, 3.f, 4.f); |
| LSH_TEST("_mm_loadh_pi", tempReg, _mm_loadh_pi, 1, _mm_store_ps, 0); |
| LSH_TEST("_mm_loadl_pi", tempReg, _mm_loadh_pi, 1, _mm_store_ps, 0); |
| |
| LS_TEST("_mm_loadr_ps", _mm_loadr_ps, 0, _mm_store_ps, 0); |
| LS_TEST("_mm_loadu_ps", _mm_loadu_ps, 1, _mm_store_ps, 0); |
| |
| SETCHART("set"); |
| SS_TEST("_mm_set_ps", _mm_set_ps(src[i+2], src[i+1], src[i+5], src[i+0])); |
| SS_TEST("_mm_set_ps1", _mm_set_ps1(src[i])); |
| SS_TEST("_mm_set_ss", _mm_set_ss(src[i])); |
| SS_TEST("_mm_set1_ps", _mm_set1_ps(src[i])); |
| SS_TEST("_mm_setr_ps", _mm_set_ps(src[i+2], src[i+1], src[i+5], src[i+0])); |
| SS_TEST("_mm_setzero_ps", _mm_setzero_ps()); |
| |
| SETCHART("move"); |
| SS_TEST("_mm_move_ss", _mm_move_ss(_mm_load_ps(src+i), _mm_load_ps(src2+i))); |
| SS_TEST("_mm_movehl_ps", _mm_movehl_ps(_mm_load_ps(src+i), _mm_load_ps(src2+i))); |
| SS_TEST("_mm_movelh_ps", _mm_movelh_ps(_mm_load_ps(src+i), _mm_load_ps(src2+i))); |
| |
| SETCHART("store"); |
| LS_TEST("_mm_store_ps", _mm_load_ps, 0, _mm_store_ps, 0); |
| LS_TEST("_mm_store_ps1", _mm_load_ps, 0, _mm_store_ps1, 0); |
| LS_TEST("_mm_store_ss", _mm_load_ps, 0, _mm_store_ss, 1); |
| LS64_TEST("_mm_storeh_pi", _mm_load_ps, 0, _mm_storeh_pi, 1); |
| LS64_TEST("_mm_storel_pi", _mm_load_ps, 0, _mm_storel_pi, 1); |
| LS_TEST("_mm_storer_ps", _mm_load_ps, 0, _mm_storer_ps, 0); |
| LS_TEST("_mm_storeu_ps", _mm_load_ps, 0, _mm_storeu_ps, 1); |
| LS_TEST("_mm_stream_ps", _mm_load_ps, 0, _mm_stream_ps, 0); |
| |
| SETCHART("arithmetic"); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] += src2[0]; dst[1] += src2[1]; dst[2] += src2[2]; dst[3] += src2[3]; } ENDSCALAR(checksum_dst(dst), "scalar add"); |
| BINARYOP_TEST("_mm_add_ps", _mm_add_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| BINARYOP_TEST("_mm_add_ss", _mm_add_ss, _mm_load_ps(src), _mm_load_ps(src2)); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] /= src2[0]; dst[1] /= src2[1]; dst[2] /= src2[2]; dst[3] /= src2[3]; } ENDSCALAR(checksum_dst(dst), "scalar div"); |
| BINARYOP_TEST("_mm_div_ps", _mm_div_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| BINARYOP_TEST("_mm_div_ss", _mm_div_ss, _mm_load_ps(src), _mm_load_ps(src2)); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] *= src2[0]; dst[1] *= src2[1]; dst[2] *= src2[2]; dst[3] *= src2[3]; } ENDSCALAR(checksum_dst(dst), "scalar mul"); |
| BINARYOP_TEST("_mm_mul_ps", _mm_mul_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| BINARYOP_TEST("_mm_mul_ss", _mm_mul_ss, _mm_load_ps(src), _mm_load_ps(src2)); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] -= src2[0]; dst[1] -= src2[1]; dst[2] -= src2[2]; dst[3] -= src2[3]; } ENDSCALAR(checksum_dst(dst), "scalar sub"); |
| BINARYOP_TEST("_mm_sub_ps", _mm_sub_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| BINARYOP_TEST("_mm_sub_ss", _mm_sub_ss, _mm_load_ps(src), _mm_load_ps(src2)); |
| |
| SETCHART("roots"); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] = 1.f / dst[0]; dst[1] = 1.f / dst[1]; dst[2] = 1.f / dst[2]; dst[3] = 1.f / dst[3]; } ENDSCALAR(checksum_dst(dst), "scalar rcp"); |
| UNARYOP_TEST("_mm_rcp_ps", _mm_rcp_ps, _mm_load_ps(src)); |
| UNARYOP_TEST("_mm_rcp_ss", _mm_rcp_ss, _mm_load_ps(src)); |
| |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] = 1.f / sqrtf(dst[0]); dst[1] = 1.f / sqrtf(dst[1]); dst[2] = 1.f / sqrtf(dst[2]); dst[3] = 1.f / sqrtf(dst[3]); } ENDSCALAR(checksum_dst(dst), "scalar rsqrt"); |
| UNARYOP_TEST("_mm_rsqrt_ps", _mm_rsqrt_ps, _mm_load_ps(src)); |
| UNARYOP_TEST("_mm_rsqrt_ss", _mm_rsqrt_ss, _mm_load_ps(src)); |
| |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] = sqrtf(dst[0]); dst[1] = sqrtf(dst[1]); dst[2] = sqrtf(dst[2]); dst[3] = sqrtf(dst[3]); } ENDSCALAR(checksum_dst(dst), "scalar sqrt"); |
| UNARYOP_TEST("_mm_sqrt_ps", _mm_sqrt_ps, _mm_load_ps(src)); |
| UNARYOP_TEST("_mm_sqrt_ss", _mm_sqrt_ss, _mm_load_ps(src)); |
| |
| SETCHART("logical"); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] = ucastf(fcastu(dst[0]) & fcastu(src2[0])); dst[1] = ucastf(fcastu(dst[1]) & fcastu(src2[1])); dst[2] = ucastf(fcastu(dst[2]) & fcastu(src2[2])); dst[3] = ucastf(fcastu(dst[3]) & fcastu(src2[3])); } ENDSCALAR(checksum_dst(dst), "scalar and"); |
| BINARYOP_TEST("_mm_and_ps", _mm_and_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] = ucastf((~fcastu(dst[0])) & fcastu(src2[0])); dst[1] = ucastf((~fcastu(dst[1])) & fcastu(src2[1])); dst[2] = ucastf((~fcastu(dst[2])) & fcastu(src2[2])); dst[3] = ucastf((~fcastu(dst[3])) & fcastu(src2[3])); } ENDSCALAR(checksum_dst(dst), "scalar andnot"); |
| BINARYOP_TEST("_mm_andnot_ps", _mm_andnot_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] = ucastf(fcastu(dst[0]) | fcastu(src2[0])); dst[1] = ucastf(fcastu(dst[1]) | fcastu(src2[1])); dst[2] = ucastf(fcastu(dst[2]) | fcastu(src2[2])); dst[3] = ucastf(fcastu(dst[3]) | fcastu(src2[3])); } ENDSCALAR(checksum_dst(dst), "scalar or"); |
| BINARYOP_TEST("_mm_or_ps", _mm_or_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] = ucastf(fcastu(dst[0]) ^ fcastu(src2[0])); dst[1] = ucastf(fcastu(dst[1]) ^ fcastu(src2[1])); dst[2] = ucastf(fcastu(dst[2]) ^ fcastu(src2[2])); dst[3] = ucastf(fcastu(dst[3]) ^ fcastu(src2[3])); } ENDSCALAR(checksum_dst(dst), "scalar xor"); |
| BINARYOP_TEST("_mm_xor_ps", _mm_xor_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| |
| SETCHART("cmp"); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] = (dst[0] == src2[0]) ? ucastf(0xFFFFFFFFU) : 0.f; dst[1] = (dst[1] == src2[1]) ? ucastf(0xFFFFFFFFU) : 0.f; dst[2] = (dst[2] == src2[2]) ? ucastf(0xFFFFFFFFU) : 0.f; dst[3] = (dst[3] == src2[3]) ? ucastf(0xFFFFFFFFU) : 0.f; } ENDSCALAR(checksum_dst(dst), "scalar cmp=="); |
| BINARYOP_TEST("_mm_cmpeq_ps", _mm_cmpeq_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| BINARYOP_TEST("_mm_cmpeq_ss", _mm_cmpeq_ss, _mm_load_ps(src), _mm_load_ps(src2)); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] = (dst[0] >= src2[0]) ? ucastf(0xFFFFFFFFU) : 0.f; dst[1] = (dst[1] >= src2[1]) ? ucastf(0xFFFFFFFFU) : 0.f; dst[2] = (dst[2] >= src2[2]) ? ucastf(0xFFFFFFFFU) : 0.f; dst[3] = (dst[3] >= src2[3]) ? ucastf(0xFFFFFFFFU) : 0.f; } ENDSCALAR(checksum_dst(dst), "scalar cmp>="); |
| BINARYOP_TEST("_mm_cmpge_ps", _mm_cmpge_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| BINARYOP_TEST("_mm_cmpge_ss", _mm_cmpge_ss, _mm_load_ps(src), _mm_load_ps(src2)); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] = (dst[0] > src2[0]) ? ucastf(0xFFFFFFFFU) : 0.f; dst[1] = (dst[1] > src2[1]) ? ucastf(0xFFFFFFFFU) : 0.f; dst[2] = (dst[2] > src2[2]) ? ucastf(0xFFFFFFFFU) : 0.f; dst[3] = (dst[3] > src2[3]) ? ucastf(0xFFFFFFFFU) : 0.f; } ENDSCALAR(checksum_dst(dst), "scalar cmp>"); |
| BINARYOP_TEST("_mm_cmpgt_ps", _mm_cmpgt_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| BINARYOP_TEST("_mm_cmpgt_ss", _mm_cmpgt_ss, _mm_load_ps(src), _mm_load_ps(src2)); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] = (dst[0] <= src2[0]) ? ucastf(0xFFFFFFFFU) : 0.f; dst[1] = (dst[1] <= src2[1]) ? ucastf(0xFFFFFFFFU) : 0.f; dst[2] = (dst[2] <= src2[2]) ? ucastf(0xFFFFFFFFU) : 0.f; dst[3] = (dst[3] <= src2[3]) ? ucastf(0xFFFFFFFFU) : 0.f; } ENDSCALAR(checksum_dst(dst), "scalar cmp<="); |
| BINARYOP_TEST("_mm_cmple_ps", _mm_cmple_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| BINARYOP_TEST("_mm_cmple_ss", _mm_cmple_ss, _mm_load_ps(src), _mm_load_ps(src2)); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] = (dst[0] < src2[0]) ? ucastf(0xFFFFFFFFU) : 0.f; dst[1] = (dst[1] < src2[1]) ? ucastf(0xFFFFFFFFU) : 0.f; dst[2] = (dst[2] < src2[2]) ? ucastf(0xFFFFFFFFU) : 0.f; dst[3] = (dst[3] < src2[3]) ? ucastf(0xFFFFFFFFU) : 0.f; } ENDSCALAR(checksum_dst(dst), "scalar cmp<"); |
| BINARYOP_TEST("_mm_cmplt_ps", _mm_cmplt_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| BINARYOP_TEST("_mm_cmplt_ss", _mm_cmplt_ss, _mm_load_ps(src), _mm_load_ps(src2)); |
| |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] = (!Isnan(dst[0]) && !Isnan(src2[0])) ? ucastf(0xFFFFFFFFU) : 0.f; dst[1] = (!Isnan(dst[1]) && !Isnan(src2[1])) ? ucastf(0xFFFFFFFFU) : 0.f; dst[2] = (!Isnan(dst[2]) && !Isnan(src2[2])) ? ucastf(0xFFFFFFFFU) : 0.f; dst[3] = (!Isnan(dst[3]) && !Isnan(src2[3])) ? ucastf(0xFFFFFFFFU) : 0.f; } ENDSCALAR(checksum_dst(dst), "scalar cmpord"); |
| BINARYOP_TEST("_mm_cmpord_ps", _mm_cmpord_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| BINARYOP_TEST("_mm_cmpord_ss", _mm_cmpord_ss, _mm_load_ps(src), _mm_load_ps(src2)); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] = (Isnan(dst[0]) || Isnan(src2[0])) ? ucastf(0xFFFFFFFFU) : 0.f; dst[1] = (Isnan(dst[1]) || Isnan(src2[1])) ? ucastf(0xFFFFFFFFU) : 0.f; dst[2] = (Isnan(dst[2]) || Isnan(src2[2])) ? ucastf(0xFFFFFFFFU) : 0.f; dst[3] = (Isnan(dst[3]) || Isnan(src2[3])) ? ucastf(0xFFFFFFFFU) : 0.f; } ENDSCALAR(checksum_dst(dst), "scalar cmpunord"); |
| BINARYOP_TEST("_mm_cmpunord_ps", _mm_cmpunord_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| BINARYOP_TEST("_mm_cmpunord_ss", _mm_cmpunord_ss, _mm_load_ps(src), _mm_load_ps(src2)); |
| |
| SETCHART("max"); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] = Max(dst[0], src2[0]); dst[1] = Max(dst[1], src2[1]); dst[2] = Max(dst[2], src2[2]); dst[3] = Max(dst[3], src2[3]); } ENDSCALAR(checksum_dst(dst), "scalar max"); |
| BINARYOP_TEST("_mm_max_ps", _mm_max_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| BINARYOP_TEST("_mm_max_ss", _mm_max_ss, _mm_load_ps(src), _mm_load_ps(src2)); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] = Min(dst[0], src2[0]); dst[1] = Min(dst[1], src2[1]); dst[2] = Min(dst[2], src2[2]); dst[3] = Min(dst[3], src2[3]); } ENDSCALAR(checksum_dst(dst), "scalar min"); |
| BINARYOP_TEST("_mm_min_ps", _mm_min_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| BINARYOP_TEST("_mm_min_ss", _mm_min_ss, _mm_load_ps(src), _mm_load_ps(src2)); |
| |
| SETCHART("shuffle"); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[3] = dst[1]; dst[2] = dst[0]; dst[1] = src2[3]; dst[0] = src2[2]; } ENDSCALAR(checksum_dst(dst), "scalar shuffle"); |
| // BINARYOP_TEST("_mm_shuffle_ps", _mm_shuffle_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| START(); |
| __m128 o0 = _mm_load_ps(src); |
| __m128 o1 = _mm_load_ps(src2); |
| for(int i = 0; i < N; i += 4) |
| o0 = _mm_shuffle_ps(o0, o1, _MM_SHUFFLE(1, 0, 3, 2)); |
| _mm_store_ps(dst, o0); |
| END(checksum_dst(dst), "_mm_shuffle_ps"); |
| |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[0] = dst[2]; dst[1] = src2[2]; dst[2] = dst[3]; dst[3] = src2[3]; } ENDSCALAR(checksum_dst(dst), "scalar unpackhi_ps"); |
| BINARYOP_TEST("_mm_unpackhi_ps", _mm_unpackhi_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| START(); dst[0] = src[0]; dst[1] = src[1]; dst[2] = src[2]; dst[3] = src[3]; for(int i = 0; i < N; ++i) { dst[2] = dst[1]; dst[1] = dst[0]; dst[0] = src2[0]; dst[3] = src2[1]; } ENDSCALAR(checksum_dst(dst), "scalar unpacklo_ps"); |
| BINARYOP_TEST("_mm_unpacklo_ps", _mm_unpacklo_ps, _mm_load_ps(src), _mm_load_ps(src2)); |
| printf("]}\n"); |
| /* |
| printf("Finished!\n"); |
| printf("Total time spent in scalar intrinsics: %f msecs.\n", (double)scalarTotalTicks * 1000.0 / ticks_per_sec()); |
| printf("Total time spent in SSE1 intrinsics: %f msecs.\n", (double)simdTotalTicks * 1000.0 / ticks_per_sec()); |
| if (scalarTotalTicks > simdTotalTicks) |
| printf("SSE1 was %.3fx faster than scalar!\n", (double)scalarTotalTicks / simdTotalTicks); |
| else |
| printf("SSE1 was %.3fx slower than scalar!\n", (double)simdTotalTicks / scalarTotalTicks); |
| */ |
| #ifdef __EMSCRIPTEN__ |
| fprintf(stderr,"User Agent: %s\n", emscripten_run_script_string("navigator.userAgent")); |
| printf("/*Test finished! Now please close Firefox to continue with benchmark_sse1.py.*/\n"); |
| #endif |
| exit(0); |
| } |