00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023 #ifndef O2SCL_ERR_HND_H
00024 #define O2SCL_ERR_HND_H
00025
00026 #include <iostream>
00027 #include <string>
00028 #include <gsl/gsl_errno.h>
00029
00030
00031
00032
00033
00034 #ifndef DOXYGENP
00035 namespace o2scl {
00036 #endif
00037
00038
00039
00040
00041
00042 enum {
00043
00044 gsl_success = 0,
00045
00046 gsl_failure = -1,
00047
00048 gsl_continue = -2,
00049
00050 gsl_edom = 1,
00051
00052 gsl_erange = 2,
00053
00054 gsl_efault = 3,
00055
00056 gsl_einval = 4,
00057
00058 gsl_efailed = 5,
00059
00060 gsl_efactor = 6,
00061
00062 gsl_esanity = 7,
00063
00064 gsl_enomem = 8,
00065
00066 gsl_ebadfunc = 9,
00067
00068 gsl_erunaway = 10,
00069
00070 gsl_emaxiter = 11,
00071
00072 gsl_ezerodiv = 12,
00073
00074 gsl_ebadtol = 13,
00075
00076 gsl_etol = 14,
00077
00078 gsl_eundrflw = 15,
00079
00080 gsl_eovrflw = 16,
00081
00082 gsl_eloss = 17,
00083
00084 gsl_eround = 18,
00085
00086 gsl_ebadlen = 19,
00087
00088 gsl_enotsqr = 20,
00089
00090 gsl_esing = 21,
00091
00092 gsl_ediverge = 22,
00093
00094 gsl_eunsup = 23,
00095
00096 gsl_eunimpl = 24,
00097
00098 gsl_ecache = 25,
00099
00100 gsl_etable = 26,
00101
00102 gsl_enoprog = 27,
00103
00104 gsl_enoprogj = 28,
00105
00106 gsl_etolf = 29,
00107
00108 gsl_etolx = 30,
00109
00110 gsl_etolg = 31,
00111
00112 gsl_eof = 32,
00113
00114 gsl_nobase = 33,
00115
00116 gsl_notfound = 34,
00117
00118 gsl_memtype = 35,
00119
00120 gsl_efilenotfound = 36,
00121
00122 gsl_index = 37
00123 };
00124
00125
00126
00127
00128
00129
00130
00131
00132
00133
00134
00135 class err_class {
00136
00137 public:
00138
00139 err_class();
00140
00141
00142
00143
00144
00145
00146
00147 static void gsl_hnd(const char *reason, const char *file,
00148 int line, int lerrno);
00149
00150
00151 void set(const char *reason, const char *file,
00152 int line, int lerrno);
00153
00154
00155 void add(const char *reason, const char *file,
00156 int line, int lerrno);
00157
00158
00159 void get(const char *&reason, const char *&file,
00160 int &line, int &lerrno);
00161
00162
00163 int get_errno();
00164
00165
00166 int get_line();
00167
00168
00169 const char *get_reason();
00170
00171
00172 const char *get_file();
00173
00174
00175 const char *get_str();
00176
00177
00178 void reset();
00179
00180
00181 void set_mode(int m) {
00182 if (m<0) mode=0;
00183 else if (m>2) mode=2;
00184 else mode=m;
00185 }
00186
00187
00188
00189
00190
00191
00192 bool array_abort;
00193
00194 protected:
00195
00196 #ifndef DOXYGEN_INTERNAL
00197
00198
00199 static err_class *ptr;
00200
00201
00202 static const int rsize=300;
00203
00204 static const int fsize=400;
00205
00206
00207 int a_errno;
00208
00209 int a_line;
00210
00211 int mode;
00212
00213
00214 char *a_file;
00215
00216 char a_reason[rsize];
00217
00218 char fullstr[fsize];
00219
00220 #endif
00221
00222 };
00223
00224
00225
00226 extern err_class *err_hnd;
00227
00228
00229
00230 extern err_class def_err_hnd;
00231
00232
00233
00234 #define set_err(d,n) o2scl::set_err_fn(d,__FILE__,__LINE__,n);
00235
00236
00237
00238 #define set_err_ret(d,n) \
00239 do { o2scl::set_err_fn(d,__FILE__,__LINE__,n); return n; } while (0)
00240
00241
00242
00243 #define add_err(d,n) o2scl::add_err_fn(d,__FILE__,__LINE__,n);
00244
00245
00246
00247
00248 #define add_err_ret(d,n) \
00249 do { o2scl::add_err_fn(d,__FILE__,__LINE__,n); return n; } while(0)
00250
00251
00252
00253 inline void set_err_fn(const char *desc, const char *file, int line,
00254 int errnum) {
00255 err_hnd->set(desc,file,line,errnum);
00256 return;
00257 }
00258
00259
00260
00261 inline void add_err_fn(const char *desc, const char *file, int line,
00262 int errnum) {
00263 err_hnd->add(desc,file,line,errnum);
00264 return;
00265 }
00266
00267
00268 inline void error_update(int &ret, int err) { if (ret==0) ret=err; }
00269
00270
00271
00272 #define err_print(ev) \
00273 do { if (ev!=0) std::cout << ev << " " << err_hnd->get_str() << std::endl; \
00274 else std::cout << "No error occured." << std::endl; } while (0)
00275
00276
00277
00278
00279 #define cerr_print(ev) \
00280 do { if (ev!=0) std::cerr << ev << " " << err_hnd->get_str() << std::endl; \
00281 } while (0)
00282
00283
00284
00285
00286
00287
00288 #define err_assert(ev) \
00289 do { if (ev!=0) { std::cout << "O2scl: Macro err_assert() causing exit" \
00290 << " from error " << ev << " at " \
00291 << __LINE__ << " in file:\n " \
00292 << __FILE__ << std::endl; \
00293 std::cout << "Error handler string:\n " << err_hnd->get_str() \
00294 << std::endl; exit(ev); } } while (0)
00295
00296
00297
00298
00299 #define bool_assert(ev,str) \
00300 do { if (ev==false) { \
00301 std::cout << "O2scl: Macro bool_assert() causing exit at line " \
00302 << __LINE__ << " in file:\n " \
00303 << __FILE__ << std::endl; \
00304 std::cout << "Given string: " << str \
00305 << std::endl; exit(-1); } } while (0)
00306
00307 #ifndef DOXYGENP
00308 }
00309 #endif
00310
00311 #endif