1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
|
#include <cstdint>
#include <cstring>
#include <iostream>
#include "utest_helper.hpp"
void compiler_long_div(void)
{
const size_t n = 16;
int64_t src1[n], src2[n];
// Setup kernel and buffers
OCL_CREATE_KERNEL_FROM_FILE("compiler_long_div", "compiler_long_div");
OCL_CREATE_BUFFER(buf[0], 0, n * sizeof(int64_t), NULL);
OCL_CREATE_BUFFER(buf[1], 0, n * sizeof(int64_t), NULL);
OCL_CREATE_BUFFER(buf[2], 0, n * sizeof(int64_t), NULL);
OCL_SET_ARG(0, sizeof(cl_mem), &buf[0]);
OCL_SET_ARG(1, sizeof(cl_mem), &buf[1]);
OCL_SET_ARG(2, sizeof(cl_mem), &buf[2]);
globals[0] = n;
locals[0] = 16;
// Run random tests
for (int32_t i = 0; i < (int32_t) n; ++i) {
src1[i] = ((int64_t)rand() << 32) + rand();
src2[i] = ((int64_t)rand() << 32) + rand();;
}
OCL_MAP_BUFFER(0);
OCL_MAP_BUFFER(1);
memcpy(buf_data[0], src1, sizeof(src1));
memcpy(buf_data[1], src2, sizeof(src2));
OCL_UNMAP_BUFFER(0);
OCL_UNMAP_BUFFER(1);
// Run the kernel on GPU
OCL_NDRANGE(1);
// Compare
OCL_MAP_BUFFER(2);
for (int32_t i = 0; i < (int32_t) n; ++i) {
//printf("ref is %lx, res is %lx\n", src1[i] / src2[i] , ((int64_t *)buf_data[2])[i]);
OCL_ASSERT(src1[i] / src2[i] == ((int64_t *)buf_data[2])[i]);
}
OCL_UNMAP_BUFFER(2);
}
MAKE_UTEST_FROM_FUNCTION(compiler_long_div);
void compiler_long_rem(void)
{
const size_t n = 16;
int64_t src1[n], src2[n];
// Setup kernel and buffers
OCL_CREATE_KERNEL_FROM_FILE("compiler_long_div", "compiler_long_rem");
OCL_CREATE_BUFFER(buf[0], 0, n * sizeof(int64_t), NULL);
OCL_CREATE_BUFFER(buf[1], 0, n * sizeof(int64_t), NULL);
OCL_CREATE_BUFFER(buf[2], 0, n * sizeof(int64_t), NULL);
OCL_SET_ARG(0, sizeof(cl_mem), &buf[0]);
OCL_SET_ARG(1, sizeof(cl_mem), &buf[1]);
OCL_SET_ARG(2, sizeof(cl_mem), &buf[2]);
globals[0] = n;
locals[0] = 16;
// Run random tests
for (int32_t i = 0; i < (int32_t) n; ++i) {
src1[i] = ((int64_t)rand() << 32) + rand();
src2[i] = ((int64_t)rand() << 32) + rand();;
}
OCL_MAP_BUFFER(0);
OCL_MAP_BUFFER(1);
memcpy(buf_data[0], src1, sizeof(src1));
memcpy(buf_data[1], src2, sizeof(src2));
OCL_UNMAP_BUFFER(0);
OCL_UNMAP_BUFFER(1);
// Run the kernel on GPU
OCL_NDRANGE(1);
// Compare
OCL_MAP_BUFFER(2);
for (int32_t i = 0; i < (int32_t) n; ++i) {
//printf("ref is %lx, res is %lx\n", src1[i] / src2[i] , ((int64_t *)buf_data[2])[i]);
OCL_ASSERT(src1[i] % src2[i] == ((int64_t *)buf_data[2])[i]);
}
OCL_UNMAP_BUFFER(2);
}
MAKE_UTEST_FROM_FUNCTION(compiler_long_rem);
|