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