1 |
#!/bin/sh |
2 |
|
3 |
# extracts various bits of data form OpenCL heder files, which are expected to |
4 |
# be in CL/ |
5 |
|
6 |
# constants |
7 |
( |
8 |
echo '// autogenerated by h_extract' |
9 |
cat CL/cl.h CL/cl_ext.h CL/cl_gl.h CL/cl_gl_ext.h CL/cl_d3d10.h | |
10 |
perl -ne 'print "const_iv($1)\n" if /^#define CL_(\S+)/' |
11 |
) >constiv.h |
12 |
|
13 |
# constants that look like enum values |
14 |
( |
15 |
echo '// autogenerated by h_extract' |
16 |
cat CL/cl.h CL/cl_ext.h CL/cl_gl.h CL/cl_gl_ext.h CL/cl_d3d10.h | |
17 |
perl -ne 'print "const_iv($1)\n" if /^#define CL_(\S+)\s+0x[0-9a-fA-F]{4}/' |
18 |
) >enumstr.h |
19 |
|
20 |
# error codes |
21 |
( |
22 |
echo '// autogenerated by h_extract' |
23 |
echo "const_iv(SUCCESS)" |
24 |
cat CL/cl.h CL/cl_ext.h CL/cl_gl.h CL/cl_gl_ext.h CL/cl_d3d10.h | |
25 |
perl -ne 'print "const_iv($1)\n" if !/#define CL_BUILD_(?:NONE|ERROR|IN_PROGRESS)/ && /^#define CL_(\S+)\s+-\d+\s*$/' |
26 |
) >errstr.h |
27 |
|
28 |
# default constant values to -1 |
29 |
( |
30 |
echo '// autogenerated by h_extract' |
31 |
cat constiv.h enumstr.h errstr.h | |
32 |
perl -ne '/const_iv\((.*)\)/ or next; print "#ifndef CL_$1\n#define CL_$1 -1\n#endif\n"' |
33 |
) >default.h |
34 |
|
35 |
# *glGet*Info |
36 |
( |
37 |
<CL/cl.hpp perl -ne 'print "$1\n" if /^\s*F\((.*)\)\s*\\?\s*$/' |
38 |
# DEVICE_DOUBLE_FP_CONFIG |
39 |
# DEVICE_HALF_FP_CONFIG |
40 |
# PLATFORM_ICD_SUFFIX_KHR |
41 |
# PLATFORM_NOT_FOUND_KHR |
42 |
# DEVICE_COMPUTE_CAPABILITY_MAJOR_NV |
43 |
# DEVICE_COMPUTE_CAPABILITY_MINOR_NV |
44 |
# DEVICE_REGISTERS_PER_BLOCK_NV |
45 |
# DEVICE_WARP_SIZE_NV |
46 |
# DEVICE_GPU_OVERLAP_NV |
47 |
# DEVICE_KERNEL_EXEC_TIMEOUT_NV |
48 |
# DEVICE_INTEGRATED_MEMORY_NV |
49 |
# DEVICE_PROFILING_TIMER_OFFSET_AMD |
50 |
|
51 |
cat <<EOF |
52 |
cl_program_build_info, CL_PROGRAM_BINARY_TYPE, cl_program_binary_type |
53 |
cl_gl_texture_info, CL_GL_TEXTURE_TARGET, cl_GLenum |
54 |
cl_gl_texture_info, CL_GL_MIPMAP_LEVEL, cl_GLint |
55 |
cl_kernel_arg_info, CL_KERNEL_ARG_ADDRESS_QUALIFIER, cl_kernel_arg_address_qualifier |
56 |
cl_kernel_arg_info, CL_KERNEL_ARG_ACCESS_QUALIFIER, cl_kernel_arg_access_qualifier |
57 |
cl_kernel_arg_info, CL_KERNEL_ARG_TYPE_NAME, STRING_CLASS |
58 |
cl_kernel_arg_info, CL_KERNEL_ARG_TYPE_QUALIFIER, cl_kernel_arg_type_qualifier |
59 |
cl_kernel_arg_info, CL_KERNEL_ARG_NAME, STRING_CLASS |
60 |
EOF |
61 |
) >getinfo.txt |
62 |
|