wasmer/tests/emscripten_resources/emtests/test_simd_float32x4.c
2020-04-02 16:51:58 -07:00

128 lines
5.1 KiB
C

/*
* Copyright 2016 The Emscripten Authors. All rights reserved.
* Emscripten is available under two separate licenses, the MIT license and the
* University of Illinois/NCSA Open Source License. Both these licenses can be
* found in the LICENSE file.
*/
#include <emscripten/vector.h>
#include <stdio.h>
#include <string.h>
#include <inttypes.h>
#include <math.h>
#include <assert.h>
void printFloat(float n) {
if (isnan(n)) {
printf("nan");
} else {
printf("%f", n);
}
}
void dump(const char *name, float32x4 vec)
{
printf("%s: ", name);
printFloat(emscripten_float32x4_extractLane(vec, 0));
printf(" ");
printFloat(emscripten_float32x4_extractLane(vec, 1));
printf(" ");
printFloat(emscripten_float32x4_extractLane(vec, 2));
printf(" ");
printFloat(emscripten_float32x4_extractLane(vec, 3));
printf("\n");
}
#define DUMP(V) dump(#V, (V))
void dumpBytes(const char *name, const void *bytes, int n)
{
printf("%s:", name);
for(int i = 0; i < n; ++i)
printf(" %02X", ((uint8_t*)bytes)[i]);
printf("\n");
}
#define DUMPBYTES(name, bytes) dumpBytes(name, bytes, sizeof(bytes))
int main()
{
float32x4 v = emscripten_float32x4_set(-1.f, 0.f, 1.f, 3.5f);
DUMP(v);
float32x4 w = emscripten_float32x4_splat(2.f);
DUMP(w);
DUMP(emscripten_float32x4_add(v, w));
DUMP(emscripten_float32x4_sub(v, w));
DUMP(emscripten_float32x4_mul(v, w));
DUMP(emscripten_float32x4_div(v, w));
DUMP(emscripten_float32x4_max(v, w));
DUMP(emscripten_float32x4_min(v, w));
DUMP(emscripten_float32x4_maxNum(v, w));
DUMP(emscripten_float32x4_minNum(v, w));
DUMP(emscripten_float32x4_neg(v));
DUMP(emscripten_float32x4_sqrt(v));
float32x4 rcp = emscripten_float32x4_reciprocalApproximation(v);
assert(fabs(emscripten_float32x4_extractLane(rcp, 0) - 1.0 / emscripten_float32x4_extractLane(v, 0)) < 0.1);
assert(isinf(emscripten_float32x4_extractLane(rcp, 1)));
assert(fabs(emscripten_float32x4_extractLane(rcp, 2) - 1.0 / emscripten_float32x4_extractLane(v, 2)) < 0.1);
assert(fabs(emscripten_float32x4_extractLane(rcp, 3) - 1.0 / emscripten_float32x4_extractLane(v, 3)) < 0.1);
float32x4 rcpSqrt = emscripten_float32x4_reciprocalSqrtApproximation(v);
assert(isnan(emscripten_float32x4_extractLane(rcpSqrt, 0)));
assert(isinf(emscripten_float32x4_extractLane(rcpSqrt, 1)));
assert(fabs(emscripten_float32x4_extractLane(rcpSqrt, 2) - 1.0 / sqrt(emscripten_float32x4_extractLane(v, 2))) < 0.1);
assert(fabs(emscripten_float32x4_extractLane(rcpSqrt, 3) - 1.0 / sqrt(emscripten_float32x4_extractLane(v, 3))) < 0.1);
DUMP(emscripten_float32x4_abs(v));
DUMP(emscripten_float32x4_and(v, w));
DUMP(emscripten_float32x4_xor(v, w));
DUMP(emscripten_float32x4_or(v, w));
DUMP(emscripten_float32x4_not(v));
DUMP(emscripten_float32x4_lessThan(v, w));
DUMP(emscripten_float32x4_lessThanOrEqual(v, w));
DUMP(emscripten_float32x4_greaterThan(v, w));
DUMP(emscripten_float32x4_greaterThanOrEqual(v, w));
DUMP(emscripten_float32x4_equal(v, w));
DUMP(emscripten_float32x4_notEqual(v, w));
bool32x4 b = emscripten_int32x4_set(0, -1, 0, -1);
DUMP(emscripten_float32x4_select(b, v, w));
DUMP(emscripten_float32x4_replaceLane(v, 0, 9.f));
DUMP(emscripten_float32x4_replaceLane(v, 1, -3.f));
DUMP(emscripten_float32x4_replaceLane(v, 2, 0.f));
DUMP(emscripten_float32x4_replaceLane(v, 3, -0.f));
uint8_t bytes[16];
memset(bytes, 0xFF, sizeof(bytes));
emscripten_float32x4_store(bytes, v);
DUMPBYTES("emscripten_float32x4_store", bytes);
memset(bytes, 0xFF, sizeof(bytes));
emscripten_float32x4_store1(bytes, v);
DUMPBYTES("emscripten_float32x4_store1", bytes);
memset(bytes, 0xFF, sizeof(bytes));
emscripten_float32x4_store2(bytes, v);
DUMPBYTES("emscripten_float32x4_store2", bytes);
emscripten_float32x4_store(bytes, v);
DUMP(emscripten_float32x4_load(bytes));
DUMP(emscripten_float32x4_load1(bytes));
DUMP(emscripten_float32x4_load2(bytes));
// TODO: emscripten_float32x4_fromFloat64x2Bits
// TODO: emscripten_float32x4_fromInt32x4Bits
// TODO: emscripten_float32x4_fromUint32x4Bits
// TODO: emscripten_float32x4_fromInt16x8Bits
// TODO: emscripten_float32x4_fromUint16x8Bits
// TODO: emscripten_float32x4_fromInt8x16Bits
// TODO: emscripten_float32x4_fromUint8x16Bits
// TODO: emscripten_float32x4_fromInt32x4
// TODO: emscripten_float32x4_fromUint32x4
DUMP(emscripten_float32x4_swizzle(v, 0, 1, 2, 3));
DUMP(emscripten_float32x4_swizzle(v, 3, 2, 1, 0));
DUMP(emscripten_float32x4_swizzle(v, 0, 0, 0, 0));
DUMP(emscripten_float32x4_swizzle(v, 0, 3, 0, 3));
DUMP(emscripten_float32x4_swizzle(v, 3, 3, 3, 3));
float32x4 z = emscripten_float32x4_set(-5.f, 20.f, 14.f, 9.f);
DUMP(z);
DUMP(emscripten_float32x4_shuffle(v, z, 0, 0, 0, 0));
DUMP(emscripten_float32x4_shuffle(v, z, 4, 4, 4, 4));
DUMP(emscripten_float32x4_shuffle(v, z, 7, 7, 7, 7));
DUMP(emscripten_float32x4_shuffle(v, z, 0, 2, 4, 6));
DUMP(emscripten_float32x4_shuffle(v, z, 7, 0, 3, 5));
printf("Done!\n");
}