00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033
00034
00035
00036
00037
00038
00039
00040
00041
00042
00043
00044
00045
00046
00047
00048
00049
00050
00051
00052
00053
00054
00055
00056
00057
00058
00059
00060
00061
00062
00063
00064
00065
00066
00067
00068
00069
00070
00071
00072
00073
00074
00075
00076
00077
00078
00079
00080
00081
00082
00083
00084
00085
00086
00087
00088 #ifndef UVES_ERROR_H
00089 #define UVES_ERROR_H
00090
00091
00095
00098
00099
00100
00101 #include <uves_utils.h>
00102 #include <uves_msg.h>
00103
00104 #if defined CPL_VERSION_CODE && CPL_VERSION_CODE < CPL_VERSION(4, 0, 0)
00105 #include <irplib_error.h>
00106 #endif
00107
00108 #include <cpl_error.h>
00109
00110
00111
00112
00113
00114
00115
00116
00117
00118 #if defined CPL_VERSION_CODE && CPL_VERSION_CODE >= CPL_VERSION(4, 0, 0)
00119
00122 #define assure(BOOL, CODE, ...) \
00123 do { \
00124 cpl_error_ensure(cpl_error_get_code() == CPL_ERROR_NONE, \
00125 cpl_error_get_code(), goto cleanup, \
00126 "An error occurred that was not caught: %s", \
00127 cpl_error_get_where() ); \
00128 cpl_error_ensure(BOOL, CODE, goto cleanup, __VA_ARGS__); \
00129 } while (0)
00130
00132 #define assure_nomsg(BOOL, CODE) \
00133 assure(BOOL, CODE, " ")
00134
00136 #define assure_mem(PTR) \
00137 assure((PTR) != NULL, CPL_ERROR_ILLEGAL_OUTPUT, "Memory allocation failure!")
00138
00139 #define ck0(IEXP, ...) \
00140 assure((IEXP) == 0, CPL_ERROR_UNSPECIFIED, __VA_ARGS__)
00141
00142 #define ck0_nomsg(IEXP) ck0(IEXP, " ")
00143
00144 #define cknull(NULLEXP, ...) \
00145 assure((NULLEXP) != NULL, CPL_ERROR_UNSPECIFIED, __VA_ARGS__)
00146
00147 #define cknull_nomsg(NULLEXP) cknull(NULLEXP, " ")
00148
00149
00151 #define check(CMD, ...) \
00152 assure((uves_msg_softer(), (CMD), uves_msg_louder(), \
00153 cpl_error_get_code() == CPL_ERROR_NONE), \
00154 cpl_error_get_code(), __VA_ARGS__)
00155
00157 #define check_nomsg(CMD) check(CMD, " ")
00158
00160 #define passure(BOOL, ...) \
00161 assure(BOOL, CPL_ERROR_UNSPECIFIED, \
00162 "Internal error. Please report to " PACKAGE_BUGREPORT " " __VA_ARGS__ )
00163
00164
00165
00167 #define uves_error_reset() cpl_error_reset()
00168
00169
00170 #else // if we still test CPL31
00171
00172
00173 #define assure(BOOL, CODE, ...) \
00174 irplib_error_assure(BOOL, CODE, (__VA_ARGS__), goto cleanup)
00175
00177 #define assure_nomsg(BOOL, CODE) \
00178 irplib_error_assure(BOOL, CODE, (" "), goto cleanup)
00179
00181 #define assure_mem(PTR) \
00182 irplib_error_assure((PTR) != NULL, CPL_ERROR_ILLEGAL_OUTPUT, \
00183 ("Memory allocation failure!"), goto cleanup)
00184 #define ck0(IEXP, ...) \
00185 irplib_error_assure(IEXP == 0, CPL_ERROR_UNSPECIFIED, \
00186 (__VA_ARGS__), goto cleanup)
00187
00188 #define ck0_nomsg(IEXP) ck0(IEXP," ")
00189
00190 #define cknull(NULLEXP, ...) \
00191 irplib_error_assure((NULLEXP) != NULL, \
00192 CPL_ERROR_UNSPECIFIED, (__VA_ARGS__), goto cleanup)
00193
00194 #define cknull_nomsg(NULLEXP) cknull(NULLEXP," ")
00195
00196
00198 #define check(CMD, ...) \
00199 irplib_error_assure((uves_msg_softer(), (CMD), uves_msg_louder(), \
00200 cpl_error_get_code() == CPL_ERROR_NONE), \
00201 cpl_error_get_code(), (__VA_ARGS__), goto cleanup)
00202
00204 #define check_nomsg(CMD) check(CMD, " ")
00205
00207 #define passure(BOOL, ...) \
00208 irplib_error_assure(BOOL, CPL_ERROR_UNSPECIFIED, \
00209 ("Internal error. Please report to " \
00210 PACKAGE_BUGREPORT " " __VA_ARGS__), goto cleanup)
00211
00212
00213
00215 #define uves_error_reset() \
00216 irplib_error_reset()
00217
00219 #define uves_error_dump() \
00220 irplib_error_dump(CPL_MSG_ERROR, CPL_MSG_ERROR)
00221
00222 #endif //end check on CPL version
00223
00232
00499
00500
00501 #endif
00502
00503
00504
00505
00506
00507
00508
00509
00510
00511
00512
00513
00514
00515
00516
00517
00518
00519
00520
00521
00522
00523
00524