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
89
90
91
92
93
94
95
96
97
|
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#define _GNU_SOURCE /* See feature_test_macros(7) */
#include <dlfcn.h>
#include "wrappedlibs.h"
#include "debug.h"
#include "wrapper.h"
#include "bridge.h"
#include "librarian/library_private.h"
#include "x64emu.h"
#include "emu/x64emu_private.h"
#include "callback.h"
#include "box64context.h"
#include "librarian.h"
#include "myalign.h"
const char* openclName = "libOpenCL.so.1";
#define LIBNAME opencl
#define ALTNAME "libOpenCL.so"
#include "generated/wrappedopencltypes.h"
#include "wrappercallback.h"
#define SUPER() \
GO(0) \
GO(1) \
GO(2) \
GO(3) \
GO(4)
// notify_program ...
#define GO(A) \
static uintptr_t my_notify_program_fct_##A = 0; \
static void my_notify_program_##A(void* a, void* b) \
{ \
RunFunctionFmt(my_notify_program_fct_##A, "pp", a, b); \
}
SUPER()
#undef GO
static void* find_notify_program_Fct(void* fct)
{
if(!fct) return fct;
if(GetNativeFnc((uintptr_t)fct)) return GetNativeFnc((uintptr_t)fct);
#define GO(A) if(my_notify_program_fct_##A == (uintptr_t)fct) return my_notify_program_##A;
SUPER()
#undef GO
#define GO(A) if(my_notify_program_fct_##A == 0) {my_notify_program_fct_##A = (uintptr_t)fct; return my_notify_program_##A; }
SUPER()
#undef GO
printf_log(LOG_NONE, "Warning, no more slot for opencl notify_program callback\n");
return NULL;
}
// notity_context ...
#define GO(A) \
static uintptr_t my_notity_context_fct_##A = 0; \
static void my_notity_context_##A(void* a, void* b, size_t c, void* d) \
{ \
RunFunctionFmt(my_notity_context_fct_##A, "ppLp", a, b, c, d); \
}
SUPER()
#undef GO
static void* find_notity_context_Fct(void* fct)
{
if(!fct) return fct;
if(GetNativeFnc((uintptr_t)fct)) return GetNativeFnc((uintptr_t)fct);
#define GO(A) if(my_notity_context_fct_##A == (uintptr_t)fct) return my_notity_context_##A;
SUPER()
#undef GO
#define GO(A) if(my_notity_context_fct_##A == 0) {my_notity_context_fct_##A = (uintptr_t)fct; return my_notity_context_##A; }
SUPER()
#undef GO
printf_log(LOG_NONE, "Warning, no more slot for opencl notity_context callback\n");
return NULL;
}
#undef SUPER
EXPORT int my_clBuildProgram(x64emu_t* emu, void* program, uint32_t num, void* devices, void* options, void* f, void* data)
{
return my->clBuildProgram(program, num, devices, options, find_notify_program_Fct(f), data);
}
EXPORT void* my_clCreateContext(x64emu_t* emu, void* prop, uint32_t num, void* devices, void* f, void* data, void* ret)
{
return my->clCreateContext(prop, num, devices, find_notity_context_Fct(f), data, ret);
}
EXPORT void* my_clCreateContextFromType(x64emu_t* emu, void* prop, uint32_t type, void* f, void* data, void* ret)
{
return my->clCreateContextFromType(prop, type, find_notity_context_Fct(f), data, ret);
}
#include "wrappedlib_init.h"
|