0
|
1 #ifndef OCL_UTILS_H
|
|
2 #define OCL_UTILS_H
|
|
3
|
|
4 #include <OpenCL/opencl.h>
|
|
5 #include <stdio.h>
|
|
6 #include <stdlib.h>
|
|
7
|
|
8 // SDK Revision #
|
|
9 #define OCL_SDKREVISION "6161726"
|
|
10
|
|
11 // Error and Exit Handling Macros...
|
|
12 // *********************************************************************
|
|
13 // Full error handling macro with Cleanup() callback (if supplied)...
|
|
14 // (Companion Inline Function lower on page)
|
|
15 #define oclCheckErrorEX(a, b, c) __oclCheckErrorEX(a, b, c, __FILE__ , __LINE__)
|
|
16
|
|
17 // Short version without Cleanup() callback pointer
|
|
18 // Both Input (a) and Reference (b) are specified as args
|
|
19 #define oclCheckError(a, b) oclCheckErrorEX(a, b, 0)
|
|
20
|
|
21 extern "C" const char* oclErrorString(cl_int error);
|
|
22
|
|
23 inline void __oclCheckErrorEX(cl_int iSample, cl_int iReference, void (*pCleanup)(int), const char* cFile, const int iLine)
|
|
24 {
|
|
25 // An error condition is defined by the sample/test value not equal to the reference
|
|
26 if (iReference != iSample)
|
|
27 {
|
|
28 // If the sample/test value isn't equal to the ref, it's an error by defnition, so override 0 sample/test value
|
|
29 iSample = (iSample == 0) ? -9999 : iSample;
|
|
30
|
|
31 // Log the error info
|
|
32 //shrLog("\n !!! Error # %i (%s) at line %i , in file %s !!!\n\n", iSample, oclErrorString(iSample), iLine, cFile);
|
|
33
|
|
34 printf("\n !!! Error # %i (%s) at line %i , in file %s !!!\n\n", iSample, oclErrorString(iSample), iLine, cFile);
|
|
35
|
|
36 // Cleanup and exit, or just exit if no cleanup function pointer provided. Use iSample (error code in this case) as process exit code.
|
|
37 if (pCleanup != NULL)
|
|
38 {
|
|
39 pCleanup(iSample);
|
|
40 }
|
|
41 else
|
|
42 {
|
|
43 //shrLogEx(LOGBOTH | CLOSELOG, 0, "Exiting...\n");
|
|
44 exit(iSample);
|
|
45 }
|
|
46 }
|
|
47 }
|
|
48
|
|
49 #endif
|
|
50
|