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