| | 1 | /* Cycript - Optimizing JavaScript Compiler/Runtime |
| | 2 | * Copyright (C) 2009-2010 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*/ |
projects / cycript.git / blame_incremental