/* Cycript - Optimizing JavaScript Compiler/Runtime
- * Copyright (C) 2009-2013 Jay Freeman (saurik)
+ * Copyright (C) 2009-2015 Jay Freeman (saurik)
*/
-/* GNU General Public License, Version 3 {{{ */
+/* GNU Affero General Public License, Version 3 {{{ */
/*
- * Cycript is free software: you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published
- * by the Free Software Foundation, either version 3 of the License,
- * or (at your option) any later version.
- *
- * Cycript is distributed in the hope that it will be useful, but
- * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Affero General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with Cycript. If not, see <http://www.gnu.org/licenses/>.
+ * GNU Affero General Public License for more details.
+
+ * You should have received a copy of the GNU Affero General Public License
+ * along with this program. If not, see <http://www.gnu.org/licenses/>.
**/
/* }}} */
Type *Parse_(CYPool &pool, const char **name, char eos, bool named, Callback callback) {
char next = *(*name)++;
- if (next == '?')
- return NULL;
Type *type(new(pool) Type());
_assert(type != NULL);
parse:
switch (next) {
+ case '?': type->primitive = unknown_P; break;
case '#': type->primitive = typename_P; break;
case '(':
case '^':
type->primitive = pointer_P;
- if (**name == '"') {
+ if (**name == '"')
+ // XXX: why is this here?
type->data.data.type = NULL;
- } else {
+ else
type->data.data.type = Parse_(pool, name, eos, named, callback);
- sig::Type *&target(type->data.data.type);
- if (target != NULL && target->primitive == void_P)
- target = NULL;
- }
break;
case 'b':
type->data.data.size = strtoul(*name, (char **) name, 10);
break;
- case 'c': type->primitive = char_P; break;
+ case 'c': type->primitive = schar_P; break;
case 'd': type->primitive = double_P; break;
case 'f': type->primitive = float_P; break;
case 'i': type->primitive = int_P; break;
return pool.strdup(out.str().c_str());
} break;
+ case unknown_P: return "?";
case typename_P: return "#";
case union_P: return pool.strcat("(", Unparse(pool, &type->data.signature), ")", NULL);
case string_P: return "*";
} break;
case pointer_P: {
- if (type->data.data.type == NULL)
- return "^v";
- else if (type->data.data.type->primitive == function_P)
+ // XXX: protect against the weird '"' check in Parse_
+ _assert(type->data.data.type != NULL);
+ if (type->data.data.type->primitive == function_P)
return "^?";
else
return pool.strcat("^", Unparse(pool, type->data.data.type), NULL);
} break;
case bit_P: return pool.strcat("b", pool.itoa(type->data.data.size), NULL);
- case char_P: return "c";
+ case schar_P: return "c";
case double_P: return "d";
case float_P: return "f";
case int_P: return "i";
case longlong_P: return "q";
case short_P: return "s";
case void_P: return "v";
+ case char_P: return "c";
case struct_P: return pool.strcat("{", type->name == NULL ? "?" : type->name, "=", Unparse(pool, &type->data.signature), "}", NULL);
}