Internal.hpp

   1 /* Cycript - Error.hppution Server and Disassembler
   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_INTERNAL_HPP
  41 #define CYCRIPT_INTERNAL_HPP
  42
  43 #include "Pooling.hpp"
  44
  45 #include <JavaScriptCore/JSBase.h>
  46 #include <JavaScriptCore/JSObjectRef.h>
  47 #include <JavaScriptCore/JSValueRef.h>
  48
  49 #include <sig/parse.hpp>
  50 #include <sig/ffi_type.hpp>
  51
  52 void Structor_(apr_pool_t *pool, sig::Type *&type);
  53
  54 struct Type_privateData :
  55     CYData
  56 {
  57     static JSClassRef Class_;
  58
  59     ffi_type *ffi_;
  60     sig::Type *type_;
  61
  62     void Set(sig::Type *type) {
  63         type_ = new(pool_) sig::Type;
  64         sig::Copy(pool_, *type_, *type);
  65     }
  66
  67     Type_privateData(apr_pool_t *pool, const char *type) :
  68         ffi_(NULL)
  69     {
  70         if (pool != NULL)
  71             pool_ = pool;
  72
  73         sig::Signature signature;
  74         sig::Parse(pool_, &signature, type, &Structor_);
  75         type_ = signature.elements[0].type;
  76     }
  77
  78     Type_privateData(sig::Type *type) :
  79         ffi_(NULL)
  80     {
  81         if (type != NULL)
  82             Set(type);
  83     }
  84
  85     Type_privateData(sig::Type *type, ffi_type *ffi) {
  86         ffi_ = new(pool_) ffi_type;
  87         sig::Copy(pool_, *ffi_, *ffi);
  88         Set(type);
  89     }
  90
  91     ffi_type *GetFFI() {
  92         if (ffi_ == NULL) {
  93             ffi_ = new(pool_) ffi_type;
  94
  95             sig::Element element;
  96             element.name = NULL;
  97             element.type = type_;
  98             element.offset = 0;
  99
 100             sig::Signature signature;
 101             signature.elements = &element;
 102             signature.count = 1;
 103
 104             ffi_cif cif;
 105             sig::sig_ffi_cif(pool_, &sig::ObjectiveC, &signature, &cif);
 106             *ffi_ = *cif.rtype;
 107         }
 108
 109         return ffi_;
 110     }
 111 };
 112
 113 struct CYValue :
 114     CYData
 115 {
 116     void *value_;
 117
 118     CYValue() {
 119     }
 120
 121     CYValue(const void *value) :
 122         value_(const_cast<void *>(value))
 123     {
 124     }
 125
 126     CYValue(const CYValue &rhs) :
 127         value_(rhs.value_)
 128     {
 129     }
 130
 131     virtual Type_privateData *GetType() const {
 132         return NULL;
 133     }
 134 };
 135
 136 struct CYOwned :
 137     CYValue
 138 {
 139   private:
 140     JSContextRef context_;
 141     JSObjectRef owner_;
 142
 143   public:
 144     CYOwned(void *value, JSContextRef context, JSObjectRef owner) :
 145         CYValue(value),
 146         context_(context),
 147         owner_(owner)
 148     {
 149         if (owner_ != NULL)
 150             JSValueProtect(context_, owner_);
 151     }
 152
 153     virtual ~CYOwned() {
 154         if (owner_ != NULL)
 155             JSValueUnprotect(context_, owner_);
 156     }
 157
 158     JSObjectRef GetOwner() const {
 159         return owner_;
 160     }
 161 };
 162
 163 namespace cy {
 164 struct Functor :
 165     CYValue
 166 {
 167     sig::Signature signature_;
 168     ffi_cif cif_;
 169
 170     Functor(const char *type, void (*value)()) :
 171         CYValue(reinterpret_cast<void *>(value))
 172     {
 173         sig::Parse(pool_, &signature_, type, &Structor_);
 174         sig::sig_ffi_cif(pool_, &sig::ObjectiveC, &signature_, &cif_);
 175     }
 176
 177     void (*GetValue())() const {
 178         return reinterpret_cast<void (*)()>(value_);
 179     }
 180
 181     static JSStaticFunction const * const StaticFunctions;
 182 }; }
 183
 184 struct Closure_privateData :
 185     cy::Functor
 186 {
 187     JSContextRef context_;
 188     JSObjectRef function_;
 189
 190     Closure_privateData(JSContextRef context, JSObjectRef function, const char *type) :
 191         cy::Functor(type, NULL),
 192         context_(context),
 193         function_(function)
 194     {
 195         JSValueProtect(context_, function_);
 196     }
 197
 198     virtual ~Closure_privateData() {
 199         JSValueUnprotect(context_, function_);
 200     }
 201 };
 202
 203 Closure_privateData *CYMakeFunctor_(JSContextRef context, JSObjectRef function, const char *type, void (*callback)(ffi_cif *, void *, void **, void *));
 204
 205 #endif/*CYCRIPT_INTERNAL_HPP*/