sig/copy.cpp

   1 /* Cycript - Optimizing JavaScript Compiler/Runtime
   2  * Copyright (C) 2009-2015  Jay Freeman (saurik)
   3 */
   4
   5 /* GNU Affero General Public License, Version 3 {{{ */
   6 /*
   7  * This program is free software: you can redistribute it and/or modify
   8  * it under the terms of the GNU Affero General Public License as published by
   9  * the Free Software Foundation, either version 3 of the License, or
  10  * (at your option) any later version.
  11
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU Affero General Public License for more details.
  16
  17  * You should have received a copy of the GNU Affero General Public License
  18  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  19 **/
  20 /* }}} */
  21
  22 #ifndef _GNU_SOURCE
  23 #define _GNU_SOURCE
  24 #endif
  25
  26 #include "Pooling.hpp"
  27 #include "sig/parse.hpp"
  28
  29 #ifdef HAVE_FFI_FFI_H
  30 #include <ffi/ffi.h>
  31 #else
  32 #include <ffi.h>
  33 #endif
  34
  35 namespace sig {
  36
  37 void Copy(CYPool &pool, Element &lhs, const Element &rhs) {
  38     lhs.name = pool.strdup(rhs.name);
  39     if (rhs.type == NULL)
  40         lhs.type = NULL;
  41     else {
  42         lhs.type = new(pool) Type;
  43         Copy(pool, *lhs.type, *rhs.type);
  44     }
  45     lhs.offset = rhs.offset;
  46 }
  47
  48 void Copy(CYPool &pool, Signature &lhs, const Signature &rhs) {
  49     size_t count(rhs.count);
  50     lhs.count = count;
  51     lhs.elements = new(pool) Element[count];
  52     for (size_t index(0); index != count; ++index)
  53         Copy(pool, lhs.elements[index], rhs.elements[index]);
  54 }
  55
  56 void Copy(CYPool &pool, Type &lhs, const Type &rhs) {
  57     lhs.primitive = rhs.primitive;
  58     lhs.name = pool.strdup(rhs.name);
  59     lhs.flags = rhs.flags;
  60
  61     if (sig::IsFunctional(rhs.primitive) || sig::IsAggregate(rhs.primitive))
  62         Copy(pool, lhs.data.signature, rhs.data.signature);
  63     else {
  64         sig::Type *&lht(lhs.data.data.type);
  65         sig::Type *const &rht(rhs.data.data.type);
  66
  67         if (rht == NULL)
  68             lht = NULL;
  69         else {
  70             lht = new(pool) Type;
  71             Copy(pool, *lht, *rht);
  72         }
  73
  74         lhs.data.data.size = rhs.data.data.size;
  75     }
  76 }
  77
  78 void Copy(CYPool &pool, ffi_type &lhs, ffi_type &rhs) {
  79     lhs.size = rhs.size;
  80     lhs.alignment = rhs.alignment;
  81     lhs.type = rhs.type;
  82     if (rhs.elements == NULL)
  83         lhs.elements = NULL;
  84     else {
  85         size_t count(0);
  86         while (rhs.elements[count] != NULL)
  87             ++count;
  88
  89         lhs.elements = new(pool) ffi_type *[count + 1];
  90         lhs.elements[count] = NULL;
  91
  92         for (size_t index(0); index != count; ++index) {
  93             // XXX: if these are libffi native then you can just take them
  94             ffi_type *ffi(new(pool) ffi_type);
  95             lhs.elements[index] = ffi;
  96             sig::Copy(pool, *ffi, *rhs.elements[index]);
  97         }
  98     }
  99 }
 100
 101 }