Exception.hpp

   1 /* Cycript - Optimizing JavaScript Compiler/Runtime
   2  * Copyright (C) 2009-2012  Jay Freeman (saurik)
   3 */
   4
   5 /* GNU Lesser General Public License, Version 3 {{{ */
   6 /*
   7  * Cycript is free software: you can redistribute it and/or modify it under
   8  * the terms of the GNU Lesser General Public License as published by the
   9  * Free Software Foundation, either version 3 of the License, or (at your
  10  * option) any later version.
  11  *
  12  * Cycript is distributed in the hope that it will be useful, but WITHOUT
  13  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  14  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
  15  * License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public License
  18  * along with Cycript.  If not, see <http://www.gnu.org/licenses/>.
  19 **/
  20 /* }}} */
  21
  22 #ifndef CYCRIPT_EXCEPTION_HPP
  23 #define CYCRIPT_EXCEPTION_HPP
  24
  25 #ifdef CY_EXECUTE
  26 #include <JavaScriptCore/JSBase.h>
  27 #endif
  28
  29 #include <apr_pools.h>
  30 #include "Standard.hpp"
  31
  32 struct CYException {
  33     virtual ~CYException() {
  34     }
  35
  36     virtual const char *PoolCString(apr_pool_t *pool) const = 0;
  37 #ifdef CY_EXECUTE
  38     virtual JSValueRef CastJSValue(JSContextRef context) const = 0;
  39 #endif
  40 };
  41
  42 void CYThrow(const char *format, ...) _noreturn;
  43
  44 #ifdef CY_EXECUTE
  45 void CYThrow(JSContextRef context, JSValueRef value);
  46 #endif
  47
  48 #define CYTry \
  49     try
  50 #define CYCatch \
  51     catch (const CYException &error) { \
  52         *exception = error.CastJSValue(context); \
  53         return NULL; \
  54     } catch (...) { \
  55         *exception = CYCastJSValue(context, "catch(...)"); \
  56         return NULL; \
  57     }
  58
  59 // XXX: fix this: _ is not safe; this is /not/ Menes ;P
  60 #undef _assert
  61 #define _assert(test, args...) do { \
  62     if (!(test)) \
  63         CYThrow("*** _assert(%s):%s(%u):%s [errno=%d]", #test, __FILE__, __LINE__, __FUNCTION__, errno); \
  64 } while (false)
  65
  66 #define _trace() do { \
  67     fprintf(stderr, "_trace():%u\n", __LINE__); \
  68 } while (false)
  69
  70 #define _syscall(expr) ({ \
  71     __typeof__(expr) _value; \
  72     do if ((long) (_value = (expr)) != -1) \
  73         break; \
  74     else switch (errno) { \
  75         case EINTR: \
  76             continue; \
  77         default: \
  78             _assert(false); \
  79     } while (true); \
  80     _value; \
  81 })
  82
  83 #define _aprcall(expr) \
  84     do { \
  85         apr_status_t _aprstatus((expr)); \
  86         _assert(_aprstatus == APR_SUCCESS); \
  87     } while (false)
  88
  89 #define _krncall(expr) \
  90     do { \
  91         kern_return_t _krnstatus((expr)); \
  92         _assert(_krnstatus == KERN_SUCCESS); \
  93     } while (false)
  94
  95 #define _sqlcall(expr) ({ \
  96     __typeof__(expr) _value = (expr); \
  97     if (_value != 0 && (_value < 100 || _value >= 200)) \
  98         _assert(false, "_sqlcall(%u:%s): %s\n", _value, #expr, sqlite3_errmsg(database_)); \
  99     _value; \
 100 })
 101
 102 #endif/*CYCRIPT_ERROR_HPP*/