sig/copy.cpp

   1 /* Cycript - The Truly Universal Scripting Language
   2  * Copyright (C) 2009-2016  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 namespace sig {
  30
  31 void Copy(CYPool &pool, Element &lhs, const Element &rhs) {
  32     lhs.name = pool.strdup(rhs.name);
  33     if (rhs.type == NULL)
  34         lhs.type = NULL;
  35     else
  36         lhs.type = rhs.type->Copy(pool);
  37     lhs.offset = rhs.offset;
  38 }
  39
  40 void Copy(CYPool &pool, Signature &lhs, const Signature &rhs) {
  41     size_t count(rhs.count);
  42     lhs.count = count;
  43     lhs.elements = new(pool) Element[count];
  44     for (size_t index(0); index != count; ++index)
  45         Copy(pool, lhs.elements[index], rhs.elements[index]);
  46 }
  47
  48 Void *Void::Copy(CYPool &pool, const char *rename) const {
  49     return new(pool) Void();
  50 }
  51
  52 Unknown *Unknown::Copy(CYPool &pool, const char *rename) const {
  53     return new(pool) Unknown();
  54 }
  55
  56 String *String::Copy(CYPool &pool, const char *rename) const {
  57     return new(pool) String();
  58 }
  59
  60 #ifdef CY_OBJECTIVEC
  61 Meta *Meta::Copy(CYPool &pool, const char *rename) const {
  62     return new(pool) Meta();
  63 }
  64
  65 Selector *Selector::Copy(CYPool &pool, const char *rename) const {
  66     return new(pool) Selector();
  67 }
  68 #endif
  69
  70 Bits *Bits::Copy(CYPool &pool, const char *rename) const {
  71     return new(pool) Bits(size);
  72 }
  73
  74 Pointer *Pointer::Copy(CYPool &pool, const char *rename) const {
  75     return new(pool) Pointer(*type.Copy(pool));
  76 }
  77
  78 Array *Array::Copy(CYPool &pool, const char *rename) const {
  79     return new(pool) Array(*type.Copy(pool), size);
  80 }
  81
  82 #ifdef CY_OBJECTIVEC
  83 Object *Object::Copy(CYPool &pool, const char *rename) const {
  84     return new(pool) Object(pool.strdup(name));
  85 }
  86 #endif
  87
  88 Enum *Enum::Copy(CYPool &pool, const char *rename) const {
  89     if (rename == NULL)
  90         rename = pool.strdup(name);
  91     else if (rename[0] == '\0')
  92         rename = NULL;
  93     Enum *copy(new(pool) Enum(*type.Copy(pool), count, rename));
  94     copy->constants = new(pool) Constant[count];
  95     for (size_t i(0); i != count; ++i) {
  96         copy->constants[i].name = pool.strdup(constants[i].name);
  97         copy->constants[i].value = constants[i].value;
  98     }
  99     return copy;
 100 }
 101
 102 Aggregate *Aggregate::Copy(CYPool &pool, const char *rename) const {
 103     if (rename == NULL)
 104         rename = pool.strdup(name);
 105     else if (rename[0] == '\0')
 106         rename = NULL;
 107     Aggregate *copy(new(pool) Aggregate(overlap, rename));
 108     sig::Copy(pool, copy->signature, signature);
 109     return copy;
 110 }
 111
 112 Function *Function::Copy(CYPool &pool, const char *rename) const {
 113     Function *copy(new(pool) Function(variadic));
 114     sig::Copy(pool, copy->signature, signature);
 115     return copy;
 116 }
 117
 118 #ifdef CY_OBJECTIVEC
 119 Block *Block::Copy(CYPool &pool, const char *rename) const {
 120     Block *copy(new(pool) Block());
 121     sig::Copy(pool, copy->signature, signature);
 122     return copy;
 123 }
 124 #endif
 125
 126 void Copy(CYPool &pool, ffi_type &lhs, ffi_type &rhs) {
 127     lhs.size = rhs.size;
 128     lhs.alignment = rhs.alignment;
 129     lhs.type = rhs.type;
 130     if (rhs.elements == NULL)
 131         lhs.elements = NULL;
 132     else {
 133         size_t count(0);
 134         while (rhs.elements[count] != NULL)
 135             ++count;
 136
 137         lhs.elements = new(pool) ffi_type *[count + 1];
 138         lhs.elements[count] = NULL;
 139
 140         for (size_t index(0); index != count; ++index) {
 141             // XXX: if these are libffi native then you can just take them
 142             ffi_type *ffi(new(pool) ffi_type);
 143             lhs.elements[index] = ffi;
 144             sig::Copy(pool, *ffi, *rhs.elements[index]);
 145         }
 146     }
 147 }
 148
 149 const char *Type::GetName() const {
 150     return NULL;
 151 }
 152
 153 const char *Enum::GetName() const {
 154     return name;
 155 }
 156
 157 const char *Aggregate::GetName() const {
 158     return name;
 159 }
 160
 161 }