Exception.hpp

   1 /* Cycript - Inlining/Optimizing JavaScript Compiler
   2  * Copyright (C) 2009  Jay Freeman (saurik)
   3 */
   4
   5 /* Modified BSD License {{{ */
   6 /*
   7  *        Redistribution and use in source and binary
   8  * forms, with or without modification, are permitted
   9  * provided that the following conditions are met:
  10  *
  11  * 1. Redistributions of source code must retain the
  12  *    above copyright notice, this list of conditions
  13  *    and the following disclaimer.
  14  * 2. Redistributions in binary form must reproduce the
  15  *    above copyright notice, this list of conditions
  16  *    and the following disclaimer in the documentation
  17  *    and/or other materials provided with the
  18  *    distribution.
  19  * 3. The name of the author may not be used to endorse
  20  *    or promote products derived from this software
  21  *    without specific prior written permission.
  22  *
  23  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS''
  24  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING,
  25  * BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
  26  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  27  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE
  28  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
  29  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  30  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
  31  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  32  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
  33  * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
  34  * TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
  35  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
  36  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  37 */
  38 /* }}} */
  39
  40 #ifndef CYCRIPT_EXCEPTION_HPP
  41 #define CYCRIPT_EXCEPTION_HPP
  42
  43 #ifdef CY_EXECUTE
  44 #include <JavaScriptCore/JSBase.h>
  45 #endif
  46
  47 #include <apr_pools.h>
  48 #include "Standard.hpp"
  49
  50 struct CYException {
  51     virtual ~CYException() {
  52     }
  53
  54     virtual const char *PoolCString(apr_pool_t *pool) const = 0;
  55 #ifdef CY_EXECUTE
  56     virtual JSValueRef CastJSValue(JSContextRef context) const = 0;
  57 #endif
  58 };
  59
  60 void CYThrow(const char *format, ...) _noreturn;
  61
  62 #ifdef CY_EXECUTE
  63 void CYThrow(JSContextRef context, JSValueRef value);
  64 #endif
  65
  66 #define CYTry \
  67     try
  68 #define CYCatch \
  69     catch (const CYException &error) { \
  70         *exception = error.CastJSValue(context); \
  71         return NULL; \
  72     } catch (...) { \
  73         *exception = CYCastJSValue(context, "catch(...)"); \
  74         return NULL; \
  75     }
  76
  77 #define _assert(test, args...) do { \
  78     if (!(test)) \
  79         CYThrow("*** _assert(%s):%s(%u):%s [errno=%d]", #test, __FILE__, __LINE__, __FUNCTION__, errno); \
  80 } while (false)
  81
  82 #define _trace() do { \
  83     fprintf(stderr, "_trace():%u\n", __LINE__); \
  84 } while (false)
  85
  86 #define _syscall(expr) ({ \
  87     __typeof__(expr) _value; \
  88     do if ((long) (_value = (expr)) != -1) \
  89         break; \
  90     else switch (errno) { \
  91         case EINTR: \
  92             continue; \
  93         default: \
  94             _assert(false); \
  95     } while (true); \
  96     _value; \
  97 })
  98
  99 #define _aprcall(expr) \
 100     do { \
 101         apr_status_t _aprstatus((expr)); \
 102         _assert(_aprstatus == APR_SUCCESS); \
 103     } while (false)
 104
 105 #define _krncall(expr) \
 106     do { \
 107         kern_return_t _krnstatus((expr)); \
 108         _assert(_krnstatus == KERN_SUCCESS); \
 109     } while (false)
 110
 111 #define _sqlcall(expr) ({ \
 112     __typeof__(expr) _value = (expr); \
 113     if (_value != 0 && (_value < 100 || _value >= 200)) \
 114         _assert(false, "_sqlcall(%u:%s): %s\n", _value, #expr, sqlite3_errmsg(database_)); \
 115     _value; \
 116 })
 117
 118 #endif/*CYCRIPT_ERROR_HPP*/