#include "php.h"
#include "ext/date/php_date.h"
-typedef struct php_ion_global_serializer php_ion_global_serializer;
-typedef struct php_ion_global_unserializer php_ion_global_unserializer;
+typedef struct php_ion_serializer {
+ ION_WRITER *writer;
+ ION_WRITER_OPTIONS *options;
+ smart_str *buffer;
+
+ zend_string *call_custom;
+ zend_bool call_magic;
+ zend_bool multi_seq;
+
+ uint32_t level;
+ HashTable *ids;
+ HashTable *tmp;
+} php_ion_serializer;
+
+typedef struct php_ion_annotaions {
+ uint8_t backref:1;
+ uint8_t makeref:1;
+ uint8_t object_prop:1;
+ uint8_t object_type;
+ zend_string *object_class;
+ zend_string *property_class;
+} php_ion_annotations;
+
+typedef struct php_ion_unserializer {
+ ION_READER *reader;
+ ION_READER_OPTIONS *options;
+ ION_TYPE type;
+
+ zend_string *call_custom;
+ zend_bool call_magic;
+ zend_bool multi_seq;
+
+ uint32_t level;
+ HashTable *ids;
+ HashTable *tmp;
+ HashTable *addref;
+
+ php_ion_annotations annotations;
+} php_ion_unserializer;
ZEND_BEGIN_MODULE_GLOBALS(ion)
- struct php_ion_global_serializer {
- HashTable ids;
- HashTable tmp;
- uint64_t level;
- } serializer;
+ php_ion_serializer serializer;
+ php_ion_unserializer unserializer;
- struct php_ion_global_unserializer {
- HashTable ids;
- HashTable tmp;
- uint64_t level;
- } unserializer;
+ struct {
+ HashTable serializer[2];
+ HashTable unserializer[3];
+ } _ht;
ZEND_END_MODULE_GLOBALS(ion);
static inline void php_ion_globals_serializer_init(void)
{
- php_ion_global_serializer *s = &php_ion_globals.serializer;
+ php_ion_serializer *s = &php_ion_globals.serializer;
+ HashTable *h = php_ion_globals._ht.serializer;
- zend_hash_init(&s->tmp, 0, NULL, ZVAL_PTR_DTOR, 0);
- zend_hash_init(&s->ids, 0, NULL, NULL, 0);
+ zend_hash_init(s->tmp = &h[0], 0, NULL, ZVAL_PTR_DTOR, 0);
+ zend_hash_init(s->ids = &h[1], 0, NULL, NULL, 0);
}
-static inline void php_ion_globals_serializer_step(void)
+static inline uint32_t php_ion_globals_serializer_step(void)
{
- php_ion_global_serializer *s = &php_ion_globals.serializer;
+ php_ion_serializer *s = &php_ion_globals.serializer;
+ uint32_t level;
- if (!s->level++) {
- zend_hash_clean(&s->ids);
- zend_hash_clean(&s->tmp);
+ if (!(level = s->level++)) {
+ zend_hash_clean(s->ids);
+ zend_hash_clean(s->tmp);
}
+ return level;
}
-static inline void php_ion_globals_serializer_exit(void)
+static inline uint32_t php_ion_globals_serializer_exit(void)
{
- php_ion_global_serializer *s = &php_ion_globals.serializer;
+ php_ion_serializer *s = &php_ion_globals.serializer;
ZEND_ASSERT(s->level);
if (!--s->level) {
- zend_hash_clean(&s->ids);
- zend_hash_clean(&s->tmp);
+ zend_hash_clean(s->ids);
+ zend_hash_clean(s->tmp);
}
+ return s->level;
}
static inline void php_ion_globals_serializer_dtor(void)
{
- php_ion_global_serializer *s = &php_ion_globals.serializer;
+ php_ion_serializer *s = &php_ion_globals.serializer;
- zend_hash_destroy(&s->tmp);
- zend_hash_destroy(&s->ids);
+ zend_hash_destroy(s->tmp);
+ zend_hash_destroy(s->ids);
}
+void ZVAL_ADDREF(zval *zv)
+{
+ if (Z_ISREF_P(zv)) {
+ Z_TRY_ADDREF_P(Z_REFVAL_P(zv));
+ } else {
+ Z_TRY_ADDREF_P(zv);
+ }
+}
static inline void php_ion_globals_unserializer_init(void)
{
- php_ion_global_unserializer *s = &php_ion_globals.unserializer;
+ php_ion_unserializer *s = &php_ion_globals.unserializer;
+ HashTable *h = php_ion_globals._ht.unserializer;
- zend_hash_init(&s->tmp, 0, NULL, ZVAL_PTR_DTOR, 0);
- zend_hash_init(&s->ids, 0, NULL, NULL, 0);
+ zend_hash_init(s->tmp = &h[0], 0, NULL, ZVAL_PTR_DTOR, 0);
+ zend_hash_init(s->ids = &h[1], 0, NULL, NULL, 0);
+ zend_hash_init(s->addref = &h[2], 0, NULL, ZVAL_ADDREF, 0);
}
static inline void php_ion_globals_unserializer_step(void)
{
- php_ion_global_unserializer *s = &php_ion_globals.unserializer;
+ php_ion_unserializer *s = &php_ion_globals.unserializer;
if (!s->level++) {
- zend_hash_clean(&s->ids);
- zend_hash_clean(&s->tmp);
+ zend_hash_clean(s->addref);
+ zend_hash_clean(s->ids);
+ zend_hash_clean(s->tmp);
}
}
static inline void php_ion_globals_unserializer_exit(void)
{
- php_ion_global_unserializer *s = &php_ion_globals.unserializer;
+ php_ion_unserializer *s = &php_ion_globals.unserializer;
ZEND_ASSERT(s->level);
if (!--s->level) {
- zend_hash_clean(&s->ids);
- zend_hash_clean(&s->tmp);
+ zend_hash_clean(s->addref);
+ zend_hash_clean(s->ids);
+ zend_hash_clean(s->tmp);
}
}
static inline void php_ion_globals_unserializer_dtor(void)
{
- php_ion_global_unserializer *s = &php_ion_globals.unserializer;
+ php_ion_unserializer *s = &php_ion_globals.unserializer;
- zend_hash_destroy(&s->tmp);
- zend_hash_destroy(&s->ids);
+ zend_hash_destroy(s->addref);
+ zend_hash_destroy(s->ids);
+ zend_hash_destroy(s->tmp);
}
static zend_class_entry
*ce_Collection,
*ce_Decimal,
*ce_Decimal_Context,
- *ce_PHP_Serializer,
- *ce_PHP_Unserializer,
+ *ce_Decimal_Context_Rounding,
+ *ce_LOB,
*ce_Reader,
*ce_Reader_Options,
*ce_Reader_Reader,
*ce_Reader_Stream,
*ce_Reader_Buffer_Reader,
*ce_Reader_Stream_Reader,
+ *ce_Serializer,
+ *ce_Serializer_PHP,
*ce_Symbol,
*ce_Symbol_ImportLocation,
*ce_Symbol_System,
*ce_Symbol_System_SID,
*ce_Symbol_Table,
*ce_Timestamp,
+ *ce_Timestamp_Precision,
*ce_Type,
+ *ce_Unserializer,
+ *ce_Unserializer_PHP,
*ce_Writer,
*ce_Writer_Options,
*ce_Writer_Buffer,
*ce_Writer_Stream_Writer,
*ce_Writer_Writer
;
-static zend_object_handlers
- oh_catalog,
- oh_decimal,
- oh_decimal_ctx,
- oh_reader_options,
- oh_reader,
- oh_symbol,
- oh_symbol_iloc,
- oh_symbol_table,
- oh_timestamp,
- oh_type,
- oh_writer_options,
- oh_writer
- ;
-#define php_ion_decl(type, name, ...) \
- static zend_object *create_ion_ ## name(zend_class_entry *ce) \
+#define php_ion_decl(type, cname, ...) \
+ static zend_object_handlers oh_ ## cname; \
+ static inline zend_object *create_ion_ ## cname(zend_class_entry *ce) \
{ \
- if (!ce) ce = ce_ ## name; \
+ if (!ce) ce = ce_ ## cname; \
php_ion_ ## type *o = ecalloc(1, sizeof(*o) + zend_object_properties_size(ce)); \
zend_object_std_init(&o->std, ce); \
object_properties_init(&o->std, ce); \
- o->std.handlers = &oh_ ## type; \
+ o->std.handlers = &oh_ ## cname; \
return &o->std; \
} \
- static void free_ion_ ## name(zend_object *std) \
+ static inline void free_ion_ ## cname(zend_object *std) \
{ \
php_ion_ ## type *obj = php_ion_obj(type, std); \
__VA_ARGS__; \
zend_object_std_dtor(std); \
(void) obj; \
}
-#define php_ion_register(type, name, ...) do { \
- ce_ ## name = register_class_ion_ ## name(__VA_ARGS__); \
- ce_ ## name ->create_object = create_ion_ ## name; \
- memcpy(&oh_ ## type, zend_get_std_object_handlers(), sizeof(zend_object_handlers)); \
- oh_ ## type .offset = offsetof(php_ion_ ## type, std); \
- oh_ ## type .free_obj = free_ion_ ## name; \
+#define php_ion_register(type, cname, ...) do { \
+ ce_ ## cname = register_class_ion_ ## cname(__VA_ARGS__); \
+ ce_ ## cname ->create_object = create_ion_ ## cname; \
+ memcpy(&oh_ ## cname, zend_get_std_object_handlers(), sizeof(zend_object_handlers)); \
+ oh_ ## cname .offset = offsetof(php_ion_ ## type, std); \
+ oh_ ## cname .free_obj = free_ion_ ## cname; \
} while (0)
#define php_ion_obj(type, obj) \
PTR_CHECK(*((void **)obj)); \
} while (0)
-static inline ION_STRING *ion_string_from_cstr(ION_STRING *is, const char *s, size_t l)
-{
- is->length = l;
- is->value = (BYTE *) s;
- return is;
-}
-
static inline ION_STRING *ion_string_from_zend(ION_STRING *is, const zend_string *zs)
{
- is->length = ZSTR_LEN(zs);
- is->value = (BYTE *) ZSTR_VAL(zs);
+ is->length = zs ? zs->len : 0;
+ is->value = (BYTE *) (zs ? zs->val : NULL);
return is;
}
zend_object std;
} php_ion_type;
+php_ion_decl(type, Type);
+
#define RETURN_IONTYPE(typ) do { \
zend_object *__zo = php_ion_type_fetch(typ); \
if (UNEXPECTED(!__zo)) { \
zend_string_release(obj->name);
}
+php_ion_decl(symbol_iloc, Symbol_ImportLocation, php_ion_symbol_iloc_dtor(obj));
+
typedef struct php_ion_symbol {
ION_SYMBOL sym;
zend_string *value;
zend_object *iloc, std;
} php_ion_symbol;
+static inline int php_ion_symbol_zval_compare(zval *zv1, zval *zv2) {
+ zend_string *zs1 = zval_get_string(zv1);
+ zend_string *zs2 = zval_get_string(zv2);
+
+ if (EG(exception)) {
+ return 0;
+ }
+
+ int result;
+ if (zs1->len > zs2->len) {
+ result = 1;
+ } else if (zs2->len > zs1->len) {
+ result = -1;
+ } else {
+ result = memcmp(zs1->val, zs2->val, zs1->len);
+ }
+ zend_string_release(zs1);
+ zend_string_release(zs2);
+ return result;
+}
+
static inline void php_ion_symbol_ctor(php_ion_symbol *obj)
{
zend_update_property_long(obj->std.ce, &obj->std, ZEND_STRL("sid"),
obj->sym.sid);
- zend_update_property_str(obj->std.ce, &obj->std, ZEND_STRL("value"), obj->value);
+ if (obj->value) {
+ zend_update_property_str(obj->std.ce, &obj->std, ZEND_STRL("value"), obj->value);
+ } else{
+ zend_update_property_null(obj->std.ce, &obj->std, ZEND_STRL("value"));
+ }
ion_string_from_zend(&obj->sym.value, obj->value);
if (obj->iloc) {
update_property_obj(&obj->std, ZEND_STRL("importLocation"), obj->iloc);
static inline void php_ion_symbol_dtor(php_ion_symbol *obj)
{
- zend_string_release(obj->value);
+ if (obj->value) {
+ zend_string_release(obj->value);
+ }
}
static inline void php_ion_symbol_zval(ION_SYMBOL *sym_ptr, zval *return_value)
}
php_ion_symbol_ctor(sym);
+
+ if (!ION_SYMBOL_IMPORT_LOCATION_IS_NULL(sym_ptr)) {
+ GC_DELREF(sym->iloc);
+ }
}
+php_ion_decl(symbol, Symbol, php_ion_symbol_dtor(obj));
+
typedef struct php_ion_symbol_table {
zend_object std;
} php_ion_symbol_table;
+php_ion_decl(symbol_table, Symbol_Table);
+
typedef struct php_ion_decimal_ctx {
decContext ctx;
zend_object std;
} php_ion_decimal_ctx;
+#define php_ion_decimal_ctx_init_max(c, rounding) \
+ php_ion_decimal_ctx_init((c), DEC_MAX_DIGITS, DEC_MAX_EMAX, DEC_MIN_EMIN, (rounding), false)
+static inline void php_ion_decimal_ctx_init(decContext *ctx,
+ zend_long digits, zend_long emax, zend_long emin, zend_long round, zend_bool clamp)
+{
+ memset(ctx, 0, sizeof(*ctx));
+ ctx->digits = digits;
+ ctx->emax = emax;
+ ctx->emin = emin;
+ ctx->round = round;
+ ctx->clamp = clamp;
+}
+
+static inline void php_ion_decimal_ctx_ctor(php_ion_decimal_ctx *obj, zend_object *o_round)
+{
+ if (!obj->ctx.digits) {
+ php_ion_decimal_ctx_init_max(&obj->ctx, DEC_ROUND_HALF_EVEN);
+ }
+ if (o_round) {
+ update_property_obj(&obj->std, ZEND_STRL("round"), o_round);
+ } else {
+ zend_update_property_long(obj->std.ce, &obj->std, ZEND_STRL("round"), obj->ctx.round);
+ }
+ zend_update_property_long(obj->std.ce, &obj->std, ZEND_STRL("digits"), obj->ctx.digits);
+ zend_update_property_long(obj->std.ce, &obj->std, ZEND_STRL("eMax"), obj->ctx.emax);
+ zend_update_property_long(obj->std.ce, &obj->std, ZEND_STRL("eMin"), obj->ctx.emin);
+ zend_update_property_bool(obj->std.ce, &obj->std, ZEND_STRL("clamp"), obj->ctx.clamp);
+}
+
+php_ion_decl(decimal_ctx, Decimal_Context);
+
typedef struct php_ion_decimal {
ION_DECIMAL dec;
zend_object *ctx, std;
} php_ion_decimal;
-static inline void php_ion_decimal_ctor(php_ion_decimal *obj)
+static inline void php_ion_decimal_from_zend_long(ION_DECIMAL *dec, decContext *ctx, zend_long num)
{
- if (obj->ctx) {
- update_property_obj(&obj->std, ZEND_STRL("context"), obj->ctx);
+ if (num <= INT32_MAX && num >= INT32_MIN) {
+ ION_CHECK(ion_decimal_from_int32(dec, num));
+ } else if (num > 0 && num <= UINT32_MAX) {
+ ION_CHECK(ion_decimal_from_uint32(dec, num));
} else {
- zend_update_property_null(obj->std.ce, &obj->std, ZEND_STRL("context"));
+ ION_INT *iint;
+ ION_CHECK(ion_int_alloc(NULL, &iint));
+ ION_CHECK(ion_int_from_long(iint, num),
+ ion_int_free(iint));
+ /* WATCH OUT: BS API */
+ dec->type = ION_DECIMAL_TYPE_QUAD;
+ ION_CHECK(ion_decimal_from_ion_int(dec, ctx, iint),
+ ion_int_free(iint));
+ ion_int_free(iint);
}
}
-static inline void php_ion_decimal_dtor(php_ion_decimal *obj)
-{
- ion_decimal_free(&obj->dec);
-}
-
static inline zend_string *php_ion_decimal_to_string(ION_DECIMAL *dec)
{
zend_string *zstr = zend_string_alloc(ION_DECIMAL_STRLEN(dec), 0);
return zend_string_truncate(zstr, strlen(zstr->val), 0);
}
-static zend_array *php_ion_decimal_get_props_for(zend_object *object, zend_prop_purpose purpose)
+static inline void php_ion_decimal_to_zend_long(ION_DECIMAL *dec, decContext *ctx, zend_long *l)
{
- php_ion_decimal *obj = php_ion_obj(decimal, object);
+ ION_INT *ii = NULL;
+ ION_CHECK(ion_int_alloc(NULL, &ii));
+ ION_CHECK(ion_decimal_to_ion_int(dec, ctx, ii), ion_int_free(ii));
+ int64_t i64;
+ ION_CHECK(ion_int_to_int64(ii, &i64), ion_int_free(ii));
+ *l = i64;
+ ion_int_free(ii);
+}
- switch (purpose) {
- case ZEND_PROP_PURPOSE_DEBUG:
- zend_array *arr = zend_new_array(1);
- zval *zv = zend_hash_str_add_empty_element(arr, ZEND_STRL("value"));
- ZVAL_STR(zv, php_ion_decimal_to_string(&obj->dec));
- return arr;
+static inline bool php_ion_decimal_fits_zend_long(php_ion_decimal *obj)
+{
+ int32_t result;
- default:
- return zend_std_get_properties_for(object, purpose);
+ if (!ion_decimal_is_integer(&obj->dec)) {
+ return false;
}
-}
-typedef php_date_obj php_ion_timestamp;
+ result = 1;
+ ion_decimal_compare(&obj->dec, &g_ion_dec_zend_max, &g_dec_ctx, &result);
+ if (result == 1) {
+ return false;
+ }
+ result = -1;
+ ion_decimal_compare(&obj->dec, &g_ion_dec_zend_min, &g_dec_ctx, &result);
+ if (result == -1) {
+ return false;
+ }
+ return true;
+}
-static inline void php_ion_timestamp_ctor(php_ion_timestamp *obj, zend_long precision, zend_string *fmt, zend_string *dt, zval *tz)
+static inline void php_ion_decimal_ctor(php_ion_decimal *obj)
{
- if (!obj->time) {
- php_date_initialize(obj, dt ? dt->val : "now", dt ? dt->len : 3, fmt ? fmt->val : NULL, tz, PHP_DATE_INIT_CTOR);
+ if (!obj->ctx) {
+ zval zdc;
+ object_init_ex(&zdc, ce_Decimal_Context);
+ obj->ctx = Z_OBJ(zdc);
+ php_ion_decimal_ctx_ctor(php_ion_obj(decimal_ctx, obj->ctx), NULL);
+ GC_DELREF(obj->ctx);
}
- zend_update_property_long(obj->std.ce, &obj->std, ZEND_STRL("precision"), precision);
- if (fmt) {
- zend_update_property_str(obj->std.ce, &obj->std, ZEND_STRL("format"), fmt);
+ update_property_obj(&obj->std, ZEND_STRL("context"), obj->ctx);
+
+ if (php_ion_decimal_fits_zend_long(obj)) {
+ zend_long l;
+ php_ion_decimal_to_zend_long(&obj->dec, &php_ion_obj(decimal_ctx, obj->ctx)->ctx, &l);
+ zend_update_property_long(obj->std.ce, &obj->std, ZEND_STRL("number"), l);
} else {
- zend_update_property_stringl(obj->std.ce, &obj->std, ZEND_STRL("format"), ZEND_STRL("c"));
+ zend_string *zstr = php_ion_decimal_to_string(&obj->dec);
+ zend_update_property_str(obj->std.ce, &obj->std, ZEND_STRL("number"), zstr);
+ zend_string_release(zstr);
}
}
-static inline void php_ion_timestamp_dtor(php_ion_timestamp *obj)
+static inline void php_ion_decimal_dtor(php_ion_decimal *obj)
{
- if (obj->time) {
- timelib_time_dtor(obj->time);
- }
+ ion_decimal_free(&obj->dec);
}
+php_ion_decl(decimal, Decimal, php_ion_decimal_dtor(obj));
+
+typedef php_date_obj php_ion_timestamp;
+
static inline zend_long php_usec_from_ion(const decQuad *frac, decContext *ctx)
{
decQuad microsecs, result;
return decQuadDivide(frac, decQuadFromInt32(&us, usec), decQuadFromInt32(µsecs, 1000000), ctx);
}
+static inline zend_string *php_dt_format_from_precision(uint8_t precision)
+{
+ switch (precision) {
+ case ION_TS_FRAC:
+ return zend_string_init(ZEND_STRL("c"), 0);
+ case ION_TS_SEC:
+ return zend_string_init(ZEND_STRL("Y-m-d\\TH:i:sP"), 0);
+ case ION_TS_MIN:
+ return zend_string_init(ZEND_STRL("Y-m-d\\TH:iP"), 0);
+ case ION_TS_DAY:
+ return zend_string_init(ZEND_STRL("Y-m-d\\T"), 0);
+ case ION_TS_MONTH:
+ return zend_string_init(ZEND_STRL("Y-m\\T"), 0);
+ case ION_TS_YEAR:
+ return zend_string_init(ZEND_STRL("Y\\T"), 0);
+ default:
+ return zend_string_init(ZEND_STRL("c"), 0);
+ }
+}
+
static inline timelib_time* php_time_from_ion(const ION_TIMESTAMP *ts, decContext *ctx, zend_string **fmt)
{
timelib_time *time = timelib_time_ctor();
switch (ts->precision) {
case ION_TS_FRAC:
time->us = php_usec_from_ion(&ts->fraction, ctx);
- if (fmt) *fmt = zend_string_init(ZEND_STRL("c"), 0);
/* fallthrough */
case ION_TS_SEC:
time->s = ts->seconds;
- if (fmt && !*fmt) *fmt = zend_string_init(ZEND_STRL("Y-m-d\\TH:i:sP"), 0);
/* fallthrough */
case ION_TS_MIN:
time->i = ts->minutes;
time->h = ts->hours;
- if (fmt && !*fmt) *fmt = zend_string_init(ZEND_STRL("Y-m-d\\TH:iP"), 0);
/* fallthrough */
case ION_TS_DAY:
time->d = ts->day;
- if (fmt && !*fmt) *fmt = zend_string_init(ZEND_STRL("Y-m-d\\T"), 0);
/* fallthrough */
case ION_TS_MONTH:
time->m = ts->month;
- if (fmt && !*fmt) *fmt = zend_string_init(ZEND_STRL("Y-m\\T"), 0);
/* fallthrough */
case ION_TS_YEAR:
time->y = ts->year;
- if (fmt && !*fmt) *fmt = zend_string_init(ZEND_STRL("Y\\T"), 0);
/* fallthrough */
default:
- if (fmt && !*fmt) *fmt = zend_string_init(ZEND_STRL("c"), 0);
time->z = ts->tz_offset * 60;
}
+ if (fmt) {
+ *fmt = php_dt_format_from_precision(ts->precision);
+ }
return time;
}
return buf;
}
+static inline void php_ion_timestamp_ctor(php_ion_timestamp *obj, zend_long precision, zend_string *fmt, zend_string *dt, zval *tz)
+{
+ if (!obj->time) {
+ php_date_initialize(obj, dt ? dt->val : "", dt ? dt->len : 0, fmt ? fmt->val : NULL, tz, PHP_DATE_INIT_CTOR);
+ }
+ zend_update_property_long(obj->std.ce, &obj->std, ZEND_STRL("precision"), precision);
+
+ fmt = php_dt_format_from_precision(precision);
+ zend_update_property_str(obj->std.ce, &obj->std, ZEND_STRL("format"), fmt);
+ zend_string_release(fmt);
+}
+
+static inline void php_ion_timestamp_dtor(php_ion_timestamp *obj)
+{
+ if (obj->time) {
+ timelib_time_dtor(obj->time);
+ }
+}
+
+php_ion_decl(timestamp, Timestamp, php_ion_timestamp_dtor(obj));
+
typedef struct php_ion_catalog {
ION_CATALOG *cat;
zend_object std;
} php_ion_catalog;
+php_ion_decl(catalog, Catalog);
+
typedef struct php_ion_reader_options {
ION_READER_OPTIONS opt;
zend_object *cat, *dec_ctx, *cb, std;
} php_ion_reader_options;
+php_ion_decl(reader_options, Reader_Options);
+
typedef struct php_ion_reader {
ION_READER *reader;
ION_TYPE state;
ION_STRING buf;
} stream;
};
- struct {
- zend_bool call_magic_unserialize;
- zend_string *custom_unserialize;
- } php;
zend_object *opt, std;
} php_ion_reader;
-static iERR php_ion_reader_stream_handler(struct _ion_user_stream *user)
+static inline iERR php_ion_reader_stream_handler(struct _ion_user_stream *user)
{
php_ion_reader *reader = (php_ion_reader *) user->handler_state;
size_t remaining = 0, spare = reader->stream.buf.length;
return IERR_READ_ERROR;
}
-static iERR on_context_change(void *context, ION_COLLECTION *imports)
+static inline iERR on_context_change(void *context, ION_COLLECTION *imports)
{
if (context) {
php_ion_reader *obj = php_ion_obj(reader, context);
}
}
+php_ion_decl(reader, Reader_Reader, php_ion_reader_dtor(obj));
+
typedef struct php_ion_writer_options {
ION_WRITER_OPTIONS opt;
zend_object *cat, *dec_ctx, *col, std;
} php_ion_writer_options;
+php_ion_decl(writer_options, Writer_Options);
+
typedef struct php_ion_writer {
ION_WRITER *writer;
enum {
php_stream *ptr;
} stream;
};
- struct {
- zend_bool call_magic_serialize;
- zend_string *custom_serialize;
- } php;
zend_object *opt, std;
} php_ion_writer;
-static iERR php_ion_writer_stream_handler(struct _ion_user_stream *user)
+static inline iERR php_ion_writer_stream_handler(struct _ion_user_stream *user)
{
php_ion_writer *writer = (php_ion_writer *) user->handler_state;
NEW_REF_STR();
}
-static iERR php_ion_writer_buffer_handler(struct _ion_user_stream *user)
+static inline iERR php_ion_writer_buffer_handler(struct _ion_user_stream *user)
{
php_ion_writer *writer = (php_ion_writer *) user->handler_state;
zend_list_delete(obj->stream.ptr->res);
}
} else {
- smart_str_0(&obj->buffer.str);
- zend_string_release(obj->buffer.str.s);
+ if (obj->buffer.str.s) {
+ smart_str_0(&obj->buffer.str);
+ zend_string_release(obj->buffer.str.s);
+ }
zval_ptr_dtor(&obj->buffer.val);
}
- if (obj->php.custom_serialize) {
- zend_string_release(obj->php.custom_serialize);
+}
+
+php_ion_decl(writer, Writer_Writer, php_ion_writer_dtor(obj));
+
+typedef struct php_ion_serializer_php {
+ php_ion_serializer serializer;
+ zend_object *opt, std;
+} php_ion_serializer_php;
+
+static inline void php_ion_serializer_php_ctor(php_ion_serializer_php *ser_obj)
+{
+ php_ion_serializer *global_ser = &php_ion_globals.serializer;
+ ser_obj->serializer.ids = global_ser->ids;
+ ser_obj->serializer.tmp = global_ser->tmp;
+
+ zend_update_property_bool(ser_obj->std.ce, &ser_obj->std, ZEND_STRL("callMagicSerialize"),
+ ser_obj->serializer.call_magic);
+ if (ser_obj->serializer.call_custom) {
+ zend_update_property_str(ser_obj->std.ce, &ser_obj->std, ZEND_STRL("callCustomSerialize"),
+ ser_obj->serializer.call_custom);
+ ser_obj->serializer.call_custom = zend_string_tolower(ser_obj->serializer.call_custom);
+ } else {
+ zend_update_property_null(ser_obj->std.ce, &ser_obj->std, ZEND_STRL("callCustomSerialize"));
+ }
+ if (ser_obj->opt) {
+ php_ion_writer_options *o_woptions = php_ion_obj(writer_options, ser_obj->opt);
+ ser_obj->serializer.options = &o_woptions->opt;
+ update_property_obj(&ser_obj->std, ZEND_STRL("writerOptions"), ser_obj->opt);
+ } else {
+ zend_update_property_null(ser_obj->std.ce, &ser_obj->std, ZEND_STRL("writerOptions"));
+ }
+}
+
+static inline void php_ion_serializer_php_dtor(php_ion_serializer_php *obj)
+{
+ if (obj->serializer.call_custom) {
+ zend_string_release(obj->serializer.call_custom);
}
}
-static inline void php_ion_serialize_zval(php_ion_writer *, zval *);
+static inline void php_ion_serialize_zval(php_ion_serializer *, zval *);
-static inline void php_ion_serialize_struct(php_ion_writer *obj, zend_array *arr)
+static inline void php_ion_serialize_struct(php_ion_serializer *ser, zend_array *arr, bool props)
{
- ION_CHECK(ion_writer_start_container(obj->writer, tid_STRUCT));
+ ION_CHECK(ion_writer_start_container(ser->writer, tid_STRUCT));
zval *v;
zend_ulong h;
if (arr) ZEND_HASH_FOREACH_KEY_VAL_IND(arr, h, k, v)
ION_STRING is;
if (k) {
- ION_CHECK(ion_writer_write_field_name(obj->writer, ion_string_from_zend(&is, k)));
+ size_t prop_len;
+ const char *class_name, *prop_name;
+ if (props && (SUCCESS == zend_unmangle_property_name_ex(k, &class_name, &prop_name, &prop_len)) && class_name) {
+ ION_CHECK(ion_writer_add_annotation(ser->writer, ion_string_assign_cstr(&is, ZEND_STRL("p"))));
+ ION_CHECK(ion_writer_add_annotation(ser->writer, ion_string_assign_cstr(&is, (char *) class_name, prop_name - class_name - 1)));
+ } else {
+ prop_name = k->val;
+ prop_len = k->len;
+ }
+ ION_CHECK(ion_writer_write_field_name(ser->writer, ion_string_assign_cstr(&is, (char *) prop_name, prop_len)));
} else {
- char buf[MAX_LENGTH_OF_LONG + 1], *ptr = zend_print_ulong_to_buf(buf + sizeof(buf), h);
- ION_CHECK(ion_writer_add_annotation(obj->writer, ion_string_from_cstr(&is, ZEND_STRL("i"))));
- ION_CHECK(ion_writer_write_field_name(obj->writer, ion_string_from_cstr(&is, ptr, buf - ptr)));
+ char buf[MAX_LENGTH_OF_LONG + 1], *end = buf + sizeof(buf) - 1;
+ char *ptr = zend_print_long_to_buf(end, (zend_long) h);
+ ION_CHECK(ion_writer_write_field_name(ser->writer, ion_string_assign_cstr(&is, ptr, end - ptr)));
}
- php_ion_serialize_zval(obj, v);
+ php_ion_serialize_zval(ser, v);
ION_CATCH();
ZEND_HASH_FOREACH_END();
- ION_CHECK(ion_writer_finish_container(obj->writer));
+ ION_CHECK(ion_writer_finish_container(ser->writer));
}
-static inline void php_ion_serialize_list(php_ion_writer *obj, zend_array *arr)
+static inline void php_ion_serialize_list(php_ion_serializer *ser, zend_array *arr)
{
- ION_CHECK(ion_writer_start_container(obj->writer, tid_LIST));
+ ION_CHECK(ion_writer_start_container(ser->writer, tid_LIST));
zval *v;
ZEND_HASH_FOREACH_VAL_IND(arr, v)
- php_ion_serialize_zval(obj, v);
+ php_ion_serialize_zval(ser, v);
ION_CATCH();
ZEND_HASH_FOREACH_END();
- ION_CHECK(ion_writer_finish_container(obj->writer));
+ ION_CHECK(ion_writer_finish_container(ser->writer));
}
-static inline void php_ion_serialize_array(php_ion_writer *obj, zend_array *arr)
+static inline void php_ion_serialize_array(php_ion_serializer *ser, zend_array *arr)
{
if (zend_array_is_list(arr)) {
- php_ion_serialize_list(obj, arr);
+ php_ion_serialize_list(ser, arr);
} else {
- php_ion_serialize_struct(obj, arr);
+ php_ion_serialize_struct(ser, arr, false);
}
}
-static inline void php_ion_serialize_object_iface(php_ion_writer *obj, zend_object *zobject)
+static inline void php_ion_serialize_object_iface(php_ion_serializer *ser, zend_object *zobject)
{
uint8_t *buf;
size_t len;
ZVAL_OBJ(&tmp, zobject);
if (SUCCESS == zobject->ce->serialize(&tmp, &buf, &len, NULL)) {
ION_STRING is;
- ION_CHECK(ion_writer_add_annotation(obj->writer, ion_string_from_cstr(&is, ZEND_STRL("S"))));
- ION_CHECK(ion_writer_add_annotation(obj->writer, ion_string_from_zend(&is, zobject->ce->name)));
- ION_CHECK(ion_writer_write_string(obj->writer, ion_string_from_cstr(&is, (char *) buf, len)));
+ ION_CHECK(ion_writer_add_annotation(ser->writer, ion_string_assign_cstr(&is, ZEND_STRL("S"))));
+ ION_CHECK(ion_writer_add_annotation(ser->writer, ion_string_from_zend(&is, zobject->ce->name)));
+ ION_CHECK(ion_writer_write_string(ser->writer, ion_string_assign_cstr(&is, (char *) buf, len)));
efree(buf);
} else if (!EG(exception)){
zend_throw_exception_ex(spl_ce_UnexpectedValueException, IERR_INTERNAL_ERROR,
}
}
-static inline void php_ion_serialize_object_magic(php_ion_writer *obj, zend_object *zobject, zend_function *fn)
+static inline void php_ion_serialize_object_magic(php_ion_serializer *ser, zend_object *zobject, zend_function *fn)
{
zval rv;
ZVAL_NULL(&rv);
- zend_call_method_with_0_params(zobject, zobject->ce, fn ? &fn : &zobject->ce->__serialize, "", &rv);
+ zend_call_known_instance_method_with_0_params(fn ? fn : zobject->ce->__serialize, zobject, &rv);
ION_CATCH();
if (IS_ARRAY == Z_TYPE(rv)) {
ION_STRING is;
- ION_CHECK(ion_writer_add_annotation(obj->writer, ion_string_from_cstr(&is, ZEND_STRL(fn ? "C" : "O"))));
- ION_CHECK(ion_writer_add_annotation(obj->writer, ion_string_from_zend(&is, zobject->ce->name)));
- php_ion_serialize_zval(obj, &rv);
+ ION_CHECK(ion_writer_add_annotation(ser->writer, ion_string_assign_cstr(&is, fn ? "C" : "O", 1)));
+ ION_CHECK(ion_writer_add_annotation(ser->writer, ion_string_from_zend(&is, zobject->ce->name)));
+ php_ion_serialize_zval(ser, &rv);
zval_ptr_dtor(&rv);
} else {
zend_throw_exception_ex(spl_ce_UnexpectedValueException, IERR_INTERNAL_ERROR,
}
}
-static inline zend_string *fq_enum_case(zend_object *zobject)
-{
- zval *cn = zend_enum_fetch_case_name(zobject);
- zend_string *en = zend_string_alloc(zobject->ce->name->len + Z_STRLEN_P(cn) + strlen("\\"), 0);
- memcpy(en->val, zobject->ce->name->val, zobject->ce->name->len);
- en->val[zobject->ce->name->len] = '\\';
- memcpy(&en->val[zobject->ce->name->len + 1], Z_STRVAL_P(cn), Z_STRLEN_P(cn));
- en->val[en->len] = 0;
- return en;
-}
-
-static inline void php_ion_serialize_object_enum(php_ion_writer *obj, zend_object *zobject)
+static inline void php_ion_serialize_object_enum(php_ion_serializer *ser, zend_object *zobject)
{
ION_STRING is;
- ION_CHECK(ion_writer_add_annotation(obj->writer, ion_string_from_cstr(&is, ZEND_STRL("E"))));
+ ION_CHECK(ion_writer_add_annotation(ser->writer, ion_string_assign_cstr(&is, ZEND_STRL("E"))));
- zend_string *en = fq_enum_case(zobject);
- ION_CHECK(ion_writer_write_string(obj->writer, ion_string_from_zend(&is, en)));
- zend_string_release(en);
+ ION_CHECK(ion_writer_add_annotation(ser->writer, ion_string_from_zend(&is, zobject->ce->name)));
+ zval *z_cname = zend_enum_fetch_case_name(zobject);
+ ION_CHECK(ion_writer_write_symbol(ser->writer, ion_string_from_zend(&is, Z_STR_P(z_cname))));
}
-static inline void php_ion_serialize_object_std(php_ion_writer *obj, zend_object *zobject)
+static inline void php_ion_serialize_object_std(php_ion_serializer *ser, zend_object *zobject)
{
ION_STRING is;
- ION_CHECK(ion_writer_add_annotation(obj->writer, ion_string_from_cstr(&is, ZEND_STRL("o"))));
if (zobject->ce != zend_standard_class_def) {
- ION_CHECK(ion_writer_add_annotation(obj->writer, ion_string_from_zend(&is, zobject->ce->name)));
+ ION_CHECK(ion_writer_add_annotation(ser->writer, ion_string_assign_cstr(&is, ZEND_STRL("c"))));
+ ION_CHECK(ion_writer_add_annotation(ser->writer, ion_string_from_zend(&is, zobject->ce->name)));
+ } else {
+ ION_CHECK(ion_writer_add_annotation(ser->writer, ion_string_assign_cstr(&is, ZEND_STRL("o"))));
}
zval zobj;
ZVAL_OBJ(&zobj, zobject);
HashTable *props = zend_get_properties_for(&zobj, ZEND_PROP_PURPOSE_SERIALIZE);
if (props) {
- php_ion_serialize_struct(obj, props);
+ php_ion_serialize_struct(ser, props, true);
zend_release_properties(props);
} else {
zend_throw_exception_ex(spl_ce_UnexpectedValueException, IERR_INTERNAL_ERROR,
}
}
-static inline bool can_call_magic_serialize(php_ion_writer *obj, zend_class_entry *ce)
+static inline void php_ion_serialize_object_lob(php_ion_serializer *ser, zend_object *zobject)
{
- if (ce->__serialize && obj->php.call_magic_serialize) {
- return true;
+ zval tmp_type, *type = zend_read_property(NULL, zobject, ZEND_STRL("type"), 0, &tmp_type);
+ zval tmp_value, *value = zend_read_property(NULL, zobject, ZEND_STRL("value"), 0, &tmp_value);
+ switch (Z_LVAL_P(zend_enum_fetch_case_value(Z_OBJ_P(type)))) {
+ case tid_BLOB_INT:
+ ION_CHECK(ion_writer_write_blob(ser->writer, (BYTE *) Z_STRVAL_P(value), Z_STRLEN_P(value)));
+ break;
+ case tid_CLOB_INT:
+ ION_CHECK(ion_writer_write_clob(ser->writer, (BYTE *) Z_STRVAL_P(value), Z_STRLEN_P(value)));
+ break;
+ default:
+ zend_throw_exception_ex(spl_ce_InvalidArgumentException, IERR_INVALID_ARG,
+ "Unsupported LOB type: ion\\Type::%s", Z_STRVAL_P(zend_enum_fetch_case_name(Z_OBJ_P(type))));
+ break;
}
- return false;
}
-static inline bool can_call_iface_serialize(php_ion_writer *obj, zend_class_entry *ce)
+static inline bool can_call_magic_serialize(php_ion_serializer *ser, zend_class_entry *ce)
+{
+ return ce->__serialize && ser->call_magic;
+}
+
+static inline bool can_call_iface_serialize(php_ion_serializer *, zend_class_entry *ce)
{
return !!ce->serialize;
}
-static inline bool can_call_custom_serialize(php_ion_writer *obj, zend_object *zobject, zend_function **fn)
+static inline bool can_call_custom_serialize(php_ion_serializer *ser, zend_object *zobject, zend_function **fn)
{
- if (obj->php.custom_serialize) {
- return !!((*fn = zend_hash_find_ptr(&zobject->ce->function_table, obj->php.custom_serialize)));
+ if (ser->call_custom) {
+ return !!(*fn = zend_hash_find_ptr(&zobject->ce->function_table, ser->call_custom));
}
return false;
}
-static inline void php_ion_serialize_object(php_ion_writer *obj, zend_object *zobject)
+static inline void php_ion_serialize_object(php_ion_serializer *ser, zend_object *zobject)
{
zend_function *fn;
zend_class_entry *ce = zobject->ce;
return;
}
- if (can_call_magic_serialize(obj, ce)) {
- php_ion_serialize_object_magic(obj, zobject, NULL);
- } else if (can_call_iface_serialize(obj, ce)) {
- php_ion_serialize_object_iface(obj, zobject);
- } else if (can_call_custom_serialize(obj, zobject, &fn)) {
- php_ion_serialize_object_magic(obj, zobject, fn);
+ if (can_call_magic_serialize(ser, ce)) {
+ php_ion_serialize_object_magic(ser, zobject, NULL);
+ } else if (can_call_iface_serialize(ser, ce)) {
+ php_ion_serialize_object_iface(ser, zobject);
+ } else if (can_call_custom_serialize(ser, zobject, &fn)) {
+ php_ion_serialize_object_magic(ser, zobject, fn);
} else if (zobject->ce->ce_flags & ZEND_ACC_ENUM) {
- php_ion_serialize_object_enum(obj, zobject);
+ php_ion_serialize_object_enum(ser, zobject);
} else if (ce == ce_Symbol) {
- ION_CHECK(ion_writer_write_ion_symbol(obj->writer, &php_ion_obj(symbol, zobject)->sym));
+ ION_CHECK(ion_writer_write_ion_symbol(ser->writer, &php_ion_obj(symbol, zobject)->sym));
} else if (ce == ce_Decimal) {
- ION_CHECK(ion_writer_write_ion_decimal(obj->writer, &php_ion_obj(decimal, zobject)->dec));
+ ION_CHECK(ion_writer_write_ion_decimal(ser->writer, &php_ion_obj(decimal, zobject)->dec));
} else if (ce == ce_Timestamp) {
ION_TIMESTAMP its;
php_ion_timestamp *pts = php_ion_obj(timestamp, zobject);
- php_ion_writer_options *opt = php_ion_obj(writer_options, obj->opt);
- decContext *ctx = opt ? opt->opt.decimal_context : NULL;
- ION_CHECK(ion_writer_write_timestamp(obj->writer, ion_timestamp_from_php(&its, pts, ctx)));
+ decContext *ctx = ser->options ? ser->options->decimal_context : NULL;
+ ION_CHECK(ion_writer_write_timestamp(ser->writer, ion_timestamp_from_php(&its, pts, ctx)));
+ } else if (ce == ce_LOB) {
+ php_ion_serialize_object_lob(ser, zobject);
} else {
- php_ion_serialize_object_std(obj, zobject);
+ php_ion_serialize_object_std(ser, zobject);
}
}
-static inline void php_ion_serialize_refcounted(php_ion_writer *obj, zval *zv)
+static inline void php_ion_serialize_refcounted(php_ion_serializer *ser, zval *zv)
{
zend_ulong idx = (zend_ulong) (uintptr_t) Z_COUNTED_P(zv);
ION_STRING is;
- if (zend_hash_index_exists(&php_ion_globals.serializer.ids, idx)) {
- zval *num = zend_hash_index_find(&php_ion_globals.serializer.ids, idx);
+ if (zend_hash_index_exists(ser->ids, idx)) {
+ zval *num = zend_hash_index_find(ser->ids, idx);
- ION_CHECK(ion_writer_add_annotation(obj->writer, ion_string_from_cstr(&is, ZEND_STRL("r"))));
- ION_CHECK(ion_writer_write_int64(obj->writer, Z_LVAL_P(num)));
+ ION_CHECK(ion_writer_add_annotation(ser->writer, ion_string_assign_cstr(&is, ZEND_STRL("r"))));
+ ION_CHECK(ion_writer_write_int64(ser->writer, Z_LVAL_P(num)));
} else {
zval num;
- ZVAL_LONG(&num, zend_hash_num_elements(&php_ion_globals.serializer.ids));
- zend_hash_index_add(&php_ion_globals.serializer.ids, idx, &num);
+ ZVAL_LONG(&num, zend_hash_num_elements(ser->ids));
+ zend_hash_index_add(ser->ids, idx, &num);
Z_TRY_ADDREF_P(zv);
- zend_hash_next_index_insert(&php_ion_globals.serializer.tmp, zv);
+ zend_hash_next_index_insert(ser->tmp, zv);
switch (Z_TYPE_P(zv)) {
case IS_STRING:
- ION_CHECK(ion_writer_write_string(obj->writer, ion_string_from_zend(&is, Z_STR_P(zv))));
+ ION_CHECK(ion_writer_write_string(ser->writer, ion_string_from_zend(&is, Z_STR_P(zv))));
break;
case IS_ARRAY:
- php_ion_serialize_array(obj, Z_ARRVAL_P(zv));
+ php_ion_serialize_array(ser, Z_ARRVAL_P(zv));
break;
case IS_OBJECT:
- php_ion_serialize_object(obj, Z_OBJ_P(zv));
+ php_ion_serialize_object(ser, Z_OBJ_P(zv));
break;
case IS_REFERENCE:
- ION_CHECK(ion_writer_add_annotation(obj->writer, ion_string_from_cstr(&is, ZEND_STRL("R"))));
- php_ion_serialize_zval(obj, Z_REFVAL_P(zv));
+ ION_CHECK(ion_writer_add_annotation(ser->writer, ion_string_assign_cstr(&is, ZEND_STRL("R"))));
+ php_ion_serialize_zval(ser, Z_REFVAL_P(zv));
break;
}
}
}
-static inline void php_ion_serialize_zval(php_ion_writer *obj, zval *zv)
+static inline void php_ion_serialize_zval(php_ion_serializer *ser, zval *zv)
{
- OBJ_CHECK(obj);
+ OBJ_CHECK(ser);
switch (Z_TYPE_P(zv)) {
case IS_NULL:
- ION_CHECK(ion_writer_write_null(obj->writer));
+ ION_CHECK(ion_writer_write_null(ser->writer));
break;
case IS_TRUE:
- ION_CHECK(ion_writer_write_bool(obj->writer, TRUE));
+ ION_CHECK(ion_writer_write_bool(ser->writer, TRUE));
break;
case IS_FALSE:
- ION_CHECK(ion_writer_write_bool(obj->writer, FALSE));
+ ION_CHECK(ion_writer_write_bool(ser->writer, FALSE));
break;
case IS_LONG:
- ION_CHECK(ion_writer_write_int64(obj->writer, Z_LVAL_P(zv)));
+ ION_CHECK(ion_writer_write_int64(ser->writer, Z_LVAL_P(zv)));
break;
case IS_DOUBLE:
- ION_CHECK(ion_writer_write_double(obj->writer, Z_DVAL_P(zv)));
+ ION_CHECK(ion_writer_write_double(ser->writer, Z_DVAL_P(zv)));
break;
case IS_STRING:
case IS_ARRAY:
case IS_OBJECT:
case IS_REFERENCE:
- php_ion_serialize_refcounted(obj, zv);
+ php_ion_serialize_refcounted(ser, zv);
break;
default:
zend_throw_exception_ex(spl_ce_InvalidArgumentException, IERR_INVALID_ARG,
- "Failed to serialize value of type %s", zend_zval_get_legacy_type(zv)->val);
+ "Failed to serialize value of type %s", zend_zval_type_name(zv));
}
}
-void php_ion_serialize(php_ion_writer *obj, zval *zv, zval *return_value)
+php_ion_decl(serializer_php, Serializer_PHP, php_ion_serializer_php_dtor(obj));
+
+static inline void php_ion_serialize_ex(php_ion_serializer *ser, zval *zv)
{
- zval zwriter;
+ HashPosition pos;
+ HashTable *arr = NULL;
- if (obj) {
- ZVAL_OBJ_COPY(&zwriter, &obj->std);
- } else {
- object_init_ex(&zwriter, ce_Writer_Buffer_Writer);
- obj = php_ion_obj(writer, Z_OBJ(zwriter));
- obj->type = BUFFER_WRITER;
- php_ion_writer_ctor(obj);
+ if (ser->multi_seq) {
+ if (Z_TYPE_P(zv) != IS_ARRAY || !zend_array_is_list(Z_ARRVAL_P(zv))) {
+ zend_throw_exception_ex(spl_ce_InvalidArgumentException, IERR_INVALID_ARG,
+ "Expected a packed, consecutively numerically indexed array as argument to the multi sequence serializer");
+ return;
+ }
+
+ arr = Z_ARRVAL_P(zv);
+
+ zend_hash_internal_pointer_reset_ex(arr, &pos);
+ zv = zend_hash_get_current_data_ex(arr, &pos);
}
- php_ion_globals_serializer_step();
+ while (zv) {
+ /* start off with a global PHP annotation instead of repeating it all over the place */
+ if (0 == php_ion_globals_serializer_step()) {
+ ION_STRING is;
+ ION_CHECK(ion_writer_add_annotation(ser->writer, ion_string_assign_cstr(&is, ZEND_STRL("PHP"))));
+ }
+ php_ion_serialize_zval(ser, zv);
+ php_ion_globals_serializer_exit();
- /* start off with a global PHP annotation instead of repeating it all over the place */
- ION_STRING is;
- ION_CHECK(ion_writer_add_annotation(obj->writer, ion_string_from_cstr(&is, ZEND_STRL("PHP"))));
+ if (!ser->multi_seq) {
+ break;
+ }
+ zend_hash_move_forward_ex(arr, &pos);
+ zv = zend_hash_get_current_data_ex(arr, &pos);
+ }
+}
- php_ion_serialize_zval(obj, zv);
+void php_ion_serialize(php_ion_serializer *ser, zval *zv, zval *return_value)
+{
+ zend_object *zo_opt = NULL, *zo_ser = NULL;
- /* make sure to flush when done, else str.s might not contain everything until the writer is closed */
- ion_writer_flush(obj->writer, NULL);
- RETVAL_STR_COPY(obj->buffer.str.s);
+ if (!ser) {
+ zo_ser = create_ion_Serializer_PHP(NULL);
+ php_ion_serializer_php *o_ser = php_ion_obj(serializer_php, zo_ser);
+ PTR_CHECK(o_ser);
+ o_ser->serializer.call_magic = true;
+ php_ion_serializer_php_ctor(o_ser);
+ ION_CATCH();
+ ser = &o_ser->serializer;
+ }
+
+ zend_object *zo_writer = create_ion_Writer_Writer(ce_Writer_Buffer_Writer);
+ php_ion_writer *writer = php_ion_obj(writer, zo_writer);
+ writer->type = BUFFER_WRITER;
+
+ if (ser->options) {
+ zo_opt = writer->opt = create_ion_Writer_Options(NULL);
+ php_ion_obj(writer_options, writer->opt)->opt = *ser->options;
+ }
+
+ php_ion_writer_ctor(writer);
+ ser->writer = writer->writer;
+ ser->buffer = &writer->buffer.str;
- php_ion_globals_serializer_exit();
+ if (!EG(exception)) {
+ php_ion_serialize_ex(ser, zv);
+ }
+
+ /* make sure to flush when done, else str.s might not contain everything until the writer is closed */
+ ion_writer_flush(ser->writer, NULL);
+ RETVAL_STR_COPY(ser->buffer->s);
- zval_ptr_dtor(&zwriter);
+ OBJ_RELEASE(zo_writer);
+ if (zo_opt) {
+ OBJ_RELEASE(zo_opt);
+ }
+ if (zo_ser) {
+ OBJ_RELEASE(zo_ser);
+ }
}
-static inline void php_ion_unserialize_zval(php_ion_reader *obj, zval *return_value);
+typedef struct php_ion_unserializer_php {
+ php_ion_unserializer unserializer;
+ zend_object *opt, std;
+} php_ion_unserializer_php;
+
+static inline void php_ion_unserializer_php_ctor(php_ion_unserializer_php *ser_obj)
+{
+ php_ion_unserializer *global_ser = &php_ion_globals.unserializer;
+ ser_obj->unserializer.ids = global_ser->ids;
+ ser_obj->unserializer.tmp = global_ser->tmp;
+ ser_obj->unserializer.addref = global_ser->addref;
+
+ zend_update_property_bool(ser_obj->std.ce, &ser_obj->std, ZEND_STRL("callMagicSerialize"),
+ ser_obj->unserializer.call_magic);
+ if (ser_obj->unserializer.call_custom) {
+ zend_update_property_str(ser_obj->std.ce, &ser_obj->std, ZEND_STRL("callCustomSerialize"),
+ ser_obj->unserializer.call_custom);
+ ser_obj->unserializer.call_custom = zend_string_tolower(ser_obj->unserializer.call_custom);
+ } else {
+ zend_update_property_null(ser_obj->std.ce, &ser_obj->std, ZEND_STRL("callCustomSerialize"));
+ }
+ if (ser_obj->opt) {
+ php_ion_reader_options *o_roptions = php_ion_obj(reader_options, ser_obj->opt);
+ ser_obj->unserializer.options = &o_roptions->opt;
+ update_property_obj(&ser_obj->std, ZEND_STRL("readerOptions"), ser_obj->opt);
+ } else {
+ zend_update_property_null(ser_obj->std.ce, &ser_obj->std, ZEND_STRL("readerOptions"));
+ }
+}
-static inline bool can_call_magic_unserialize(php_ion_reader *obj, zend_class_entry *ce)
+static inline void php_ion_unserializer_php_dtor(php_ion_unserializer_php *obj)
{
- if (ce->__unserialize && obj->php.call_magic_unserialize) {
- return true;
+ if (obj->unserializer.call_custom) {
+ zend_string_release(obj->unserializer.call_custom);
}
- return false;
}
-static inline bool can_call_iface_unserialize(php_ion_reader *obj, zend_class_entry *ce)
+static inline void php_ion_unserialize_zval(php_ion_unserializer *ser, zval *return_value, ION_TYPE *typ);
+
+static inline bool can_call_magic_unserialize(php_ion_unserializer *ser, zend_class_entry *ce)
{
- return !!ce->unserialize;
+ return (ce && ce->__unserialize && ser->call_magic);
}
-static inline bool can_call_custom_unserialize(php_ion_reader *obj, zend_object *zobject, zend_function **fn)
+static inline bool can_call_iface_unserialize(php_ion_unserializer *ser, zend_class_entry *ce)
{
- if (obj->php.custom_unserialize) {
- return !!((*fn = zend_hash_find_ptr(&zobject->ce->function_table, obj->php.custom_unserialize)));
+ return (ce && ce->unserialize);
+}
+
+static inline bool can_call_custom_unserialize(php_ion_unserializer *ser, zend_object *zobject, zend_function **fn)
+{
+ if (ser->call_custom) {
+ return !!(*fn = zend_hash_find_ptr(&zobject->ce->function_table, ser->call_custom));
}
return false;
}
-static inline zval *php_ion_unserialize_class(php_ion_reader *obj, zend_string *class_name, zval *return_value)
+static inline zval *php_ion_unserialize_class(php_ion_unserializer *ser, zval *return_value)
{
- zend_class_entry *ce = zend_lookup_class(class_name);
+ zend_class_entry *ce = zend_lookup_class(ser->annotations.object_class);
if (ce) {
object_init_ex(return_value, ce);
- return zend_hash_next_index_insert(&php_ion_globals.unserializer.ids, return_value);
+ return zend_hash_next_index_insert(ser->ids, return_value);
}
zend_throw_exception_ex(spl_ce_RuntimeException, IERR_IMPORT_NOT_FOUND,
- "Could not find class %s", class_name->val);
+ "Could not find class %s", ser->annotations.object_class->val);
return NULL;
}
-static inline void php_ion_unserialize_object_iface(php_ion_reader *obj, zend_string *class_name, zval *return_value)
+static inline void php_ion_unserialize_object_enum(php_ion_unserializer *ser, zval *return_value)
{
- ZEND_ASSERT(Z_TYPE_P(return_value) == IS_STRING);
- zend_string *s = Z_STR_P(return_value);
-
- zval *backref = php_ion_unserialize_class(obj, class_name, return_value);
+ zend_string *zs_case = zval_get_string(return_value);
ION_CATCH();
- zend_class_entry *ce = Z_OBJCE_P(return_value);
- if (can_call_iface_unserialize(obj, ce)) {
+ zend_class_entry *ce = zend_lookup_class(ser->annotations.object_class);
+ if (!ce || !(ce->ce_flags & ZEND_ACC_ENUM)) {
+ zend_throw_exception_ex(spl_ce_RuntimeException, IERR_INVALID_TOKEN,
+ "Not a valid enum: %s", ser->annotations.object_class->val);
+ return;
+ }
+ if (!zend_hash_exists(CE_CONSTANTS_TABLE(ce), zs_case)) {
+ zend_throw_exception_ex(spl_ce_RuntimeException, IERR_INVALID_TOKEN,
+ "Not a valid enum case: %s::%s", ser->annotations.object_class->val, zs_case->val);
+ return;
+ }
+ RETVAL_OBJ_COPY(zend_enum_get_case(ce, zs_case));
+ zend_hash_next_index_insert(ser->ids, return_value);
+ zend_string_release(zs_case);
+}
+
+static inline void php_ion_unserialize_object_iface(php_ion_unserializer *ser, zval *return_value)
+{
+ zend_class_entry *ce = zend_lookup_class(ser->annotations.object_class);
+ if (can_call_iface_unserialize(ser, ce)) {
+ zend_string *s = zval_get_string(return_value);
+ ZVAL_NULL(return_value);
+ zval *backref = zend_hash_next_index_insert(ser->ids, return_value);
if (SUCCESS == ce->unserialize(backref, ce, (BYTE *) s->val, s->len, NULL)) {
- // remove all this Serializable crap in PHP-9
- zval_ptr_dtor(return_value);
- ZVAL_COPY_VALUE(return_value, backref);
+ RETVAL_ZVAL(backref, 0, 0);
} else if (!EG(exception)) {
zend_throw_exception_ex(spl_ce_UnexpectedValueException, IERR_INTERNAL_ERROR,
"Failed to unserialize class %s", ce->name->val);
}
+ zend_string_release(s);
} else {
zend_throw_exception_ex(spl_ce_RuntimeException, IERR_INVALID_TOKEN,
- "Class %s does not implement Serializable", class_name->val);
+ "Class %s does not implement Serializable", ser->annotations.object_class->val);
}
+}
- zend_string_release(s);
+static inline void php_ion_unserialize_field_name(php_ion_unserializer *ser, zend_string **key)
+{
+ // FIXME: symbol table
+ ION_STRING name;
+ ION_CHECK(ion_reader_get_field_name(ser->reader, &name));
+ if (!name.length) {
+ ION_SYMBOL *is_ptr;
+ ION_CHECK(ion_reader_get_field_name_symbol(ser->reader, &is_ptr));
+ if (!ION_SYMBOL_IS_NULL(is_ptr) && is_ptr->value.length) {
+ name = is_ptr->value;
+ } else if (is_ptr) {
+ char buf[MAX_LENGTH_OF_LONG + 1 + 1] = {0}, *end = buf + sizeof(buf) - 1, *ptr;
+ ptr = zend_print_long_to_buf(end, is_ptr->sid);
+ *--ptr = '$';
+ *key = zend_string_init(ptr, end - ptr, 0);
+ return;
+ }
+ }
+ *key = zend_string_from_ion(&name);
}
-static inline void php_ion_unserialize_hash(php_ion_reader *obj, zval *return_value)
+static void php_ion_unserialize_props(php_ion_unserializer *ser, zval *return_value)
{
- ION_CHECK(ion_reader_step_in(obj->reader));
+ zend_hash_next_index_insert(ser->ids, return_value);
+
+ ION_CHECK(ion_reader_step_in(ser->reader));
- ION_TYPE typ;
while (true) {
- ION_CHECK(ion_reader_next(obj->reader, &typ));
+ ION_TYPE typ;
+ ION_CHECK(ion_reader_next(ser->reader, &typ));
if (typ == tid_EOF) {
break;
}
- ION_STRING name;
- ION_CHECK(ion_reader_get_field_name(obj->reader, &name));
-
- zend_string *zkey = zend_string_from_ion(&name);
- zval *zvalue = zend_hash_add_empty_element(HASH_OF(return_value), zkey);
- php_ion_unserialize_zval(obj, zvalue);
- zend_string_release(zkey);
+ zend_string *key;
+ php_ion_unserialize_field_name(ser, &key);
ION_CATCH();
+
+ zval zvalue;
+ php_ion_unserialize_zval(ser, &zvalue, &typ);
+ ION_CATCH(zend_string_release(key));
+
+ zend_class_entry *ce = Z_OBJCE_P(return_value);
+ if (ser->annotations.object_prop && ser->annotations.property_class->val[0] != '*') {
+ ce = zend_lookup_class(ser->annotations.property_class);
+ }
+ zend_update_property_ex(ce, Z_OBJ_P(return_value), key, &zvalue);
+ zval_ptr_dtor(&zvalue);
+ zend_string_release(key);
}
- ION_CHECK(ion_reader_step_out(obj->reader));
+ ION_CHECK(ion_reader_step_out(ser->reader));
}
-static inline void php_ion_unserialize_object_magic(php_ion_reader *obj, zend_string *class_name, bool custom, zval *return_value)
+/**
+ * @link https://amzn.github.io/ion-docs/docs/spec.html#struct
+ * When two fields in the same struct have the same name [...] Implementations must preserve all such fields,
+ * i.e., they may not discard fields that have repeated names. However, implementations may reorder fields
+ * (the binary format identifies structs that are sorted by symbolID), so certain operations may lead to
+ * nondeterministic behavior.
+ */
+static inline void php_ion_unserialize_hash(php_ion_unserializer *ser, zval *return_value)
{
- php_ion_unserialize_class(obj, class_name, return_value);
- ION_CATCH();
+ zend_hash_next_index_insert(ser->ids, return_value);
- zend_object *zobject = Z_OBJ_P(return_value);
- zend_function *fn = NULL;
- if (custom) {
- if (!can_call_custom_unserialize(obj, Z_OBJ_P(return_value), &fn)) {
- zend_throw_exception_ex(spl_ce_RuntimeException, IERR_INVALID_TOKEN,
- "Could not find custom serializer method of %s", class_name->val);
- return;
+ ION_CHECK(ion_reader_step_in(ser->reader));
+
+ while (true) {
+ ION_TYPE typ;
+ ION_CHECK(ion_reader_next(ser->reader, &typ));
+
+ if (typ == tid_EOF) {
+ break;
}
- } else {
- if (!can_call_magic_unserialize(obj, zobject->ce)) {
- zend_throw_exception_ex(spl_ce_RuntimeException, IERR_INVALID_TOKEN,
- "Could not find method %s::__serialize()", class_name->val);
+
+ zend_string *key;
+ php_ion_unserialize_field_name(ser, &key);
+ ION_CATCH();
+
+ zval zvalue;
+ php_ion_unserialize_zval(ser, &zvalue, &typ);
+ ION_CATCH(zend_string_release(key));
+
+ // FIXME:: too naive; b0rked if the previous value is an array
+ if (zend_symtable_exists(HASH_OF(return_value), key)) {
+ zval tmp, *prev = zend_hash_find(HASH_OF(return_value), key);
+ if (Z_TYPE_P(prev) != IS_ARRAY) {
+ array_init(&tmp);
+ Z_TRY_ADDREF_P(prev);
+ zend_hash_next_index_insert(Z_ARRVAL(tmp), prev);
+ prev = zend_hash_update(HASH_OF(return_value), key, &tmp);
+ }
+ zend_hash_next_index_insert(Z_ARRVAL_P(prev), &zvalue);
+ } else {
+ zend_symtable_update(HASH_OF(return_value), key, &zvalue);
}
+ zend_string_release(key);
}
- zval sv;
- array_init(&sv);
- php_ion_unserialize_hash(obj, &sv);
- ION_CATCH(zval_ptr_dtor(&sv));
-
- zval rv;
- ZVAL_NULL(&rv);
- zend_call_method_with_1_params(zobject, zobject->ce, fn ? &fn : &zobject->ce->__serialize, "", &rv, &sv);
- zval_ptr_dtor(&rv);
- zval_ptr_dtor(&sv);
+ ION_CHECK(ion_reader_step_out(ser->reader));
}
-static inline void php_ion_unserialize_object_of_class(php_ion_reader *obj, uint8_t object_type, zend_string *class_name, zval *return_value)
+static inline void verify_unserializer(php_ion_unserializer *ser, zend_object *zobject, zend_function **fn)
{
- switch (object_type) {
- case 'S':
- php_ion_unserialize_object_iface(obj, class_name, return_value);
+ switch (ser->annotations.object_type) {
+ case 'c':
+ *fn = NULL;
break;
case 'C':
- php_ion_unserialize_object_magic(obj, class_name, true, return_value);
+ if (!can_call_custom_unserialize(ser, zobject, fn)) {
+ zend_throw_exception_ex(spl_ce_RuntimeException, IERR_INVALID_TOKEN,
+ "Could not find custom serializer method of %s", ser->annotations.object_class->val);
+ }
break;
case 'O':
- php_ion_unserialize_object_magic(obj, class_name, false, return_value);
+ if (!can_call_magic_unserialize(ser, zobject->ce)) {
+ zend_throw_exception_ex(spl_ce_RuntimeException, IERR_INVALID_TOKEN,
+ "Could not find method %s::__unserialize()", ser->annotations.object_class->val);
+ }
+ *fn = zobject->ce->__unserialize;
break;
default:
zend_throw_exception_ex(spl_ce_RuntimeException, IERR_INVALID_TOKEN,
- "Invalid object type %c", object_type);
+ "Invalid object type %c", ser->annotations.object_type);
}
}
-static inline void php_ion_unserialize_struct(php_ion_reader *obj, uint8_t object_type, zend_string *class_name, zval *return_value)
+static inline void php_ion_unserialize_object(php_ion_unserializer *ser, zval *return_value)
{
- if (class_name) {
- php_ion_unserialize_object_of_class(obj, object_type, class_name, return_value);
- } else if (!object_type) {
+ // backup possible backref to array returned by magic/custom __serialize()
+ zval *input = zend_hash_next_index_insert(ser->tmp, return_value);
+
+ php_ion_unserialize_class(ser, return_value);
+ ION_CATCH();
+
+ zend_function *fn = NULL;
+ zend_object *zobject = Z_OBJ_P(return_value);
+ verify_unserializer(ser, zobject, &fn);
+ ION_CATCH();
+
+ // plain object
+ if (!fn) {
+ php_ion_unserialize_props(ser, return_value);
+ return;
+ }
+
+ // magic object
+ if (Z_TYPE_P(input) != IS_ARRAY) {
+ zval_ptr_dtor(input);
+ array_init(input);
+ zend_hash_real_init_mixed(Z_ARRVAL_P(input));
+ php_ion_unserialize_hash(ser, input);
+ ION_CATCH();
+ }
+ zval rv;
+ ZVAL_NULL(&rv);
+ zend_call_method_with_1_params(zobject, zobject->ce, &fn, "", &rv, input);
+ zval_ptr_dtor(&rv);
+}
+
+static inline void php_ion_unserialize_struct(php_ion_unserializer *ser, zval *return_value)
+{
+ if (ser->annotations.object_class) {
+ switch (ser->annotations.object_type) {
+ case 'S':
+ php_ion_unserialize_object_iface(ser, return_value);
+ break;
+ case 'E':
+ php_ion_unserialize_object_enum(ser, return_value);
+ break;
+ default:
+ php_ion_unserialize_object(ser, return_value);
+ }
+ } else if (!ser->annotations.object_type) {
array_init(return_value);
- zend_hash_next_index_insert(&php_ion_globals.unserializer.ids, return_value);
- php_ion_unserialize_hash(obj, return_value);
- } else if (object_type == 'o') {
+ php_ion_unserialize_hash(ser, return_value);
+ } else if (ser->annotations.object_type == 'o') {
object_init(return_value);
- zend_hash_next_index_insert(&php_ion_globals.unserializer.ids, return_value);
- php_ion_unserialize_hash(obj, return_value);
+ php_ion_unserialize_hash(ser, return_value);
} else {
zend_throw_exception_ex(spl_ce_RuntimeException, IERR_INVALID_TOKEN,
- "Invalid object type %c", object_type);
+ "Invalid object annotation %c::", ser->annotations.object_type);
}
}
-static inline void php_ion_unserialize_list(php_ion_reader *obj, zval *return_value)
+static inline void php_ion_unserialize_list(php_ion_unserializer *ser, zval *return_value)
{
- ION_CHECK(ion_reader_step_in(obj->reader));
+ ION_CHECK(ion_reader_step_in(ser->reader));
array_init(return_value);
- zend_hash_next_index_insert(&php_ion_globals.unserializer.ids, return_value);
+ zend_hash_next_index_insert(ser->ids, return_value);
- ION_TYPE typ;
- HashTable *ht = Z_ARRVAL_P(return_value);
while (true) {
- zval next;
- php_ion_unserialize_zval(obj, &next);
- ION_CATCH();
+ ION_TYPE typ;
+ ION_CHECK(ion_reader_next(ser->reader, &typ));
- ION_CHECK(ion_reader_get_type(obj->reader, &typ));
if (typ == tid_EOF) {
break;
}
- zend_hash_next_index_insert(ht, &next);
+ zval next;
+ php_ion_unserialize_zval(ser, &next, &typ);
+ ION_CATCH();
+
+ zend_hash_next_index_insert(Z_ARRVAL_P(return_value), &next);
}
- ION_CHECK(ion_reader_step_out(obj->reader));
+ ION_CHECK(ion_reader_step_out(ser->reader));
}
-static inline void php_ion_unserialize_lob(php_ion_reader *obj, zval *return_value)
+static inline void php_ion_reader_read_lob(ION_READER *reader, zval *return_value)
{
zend_string *zstr = zend_string_alloc(0x1000, 0);
again:
SIZE read = 0;
- iERR err = ion_reader_read_lob_bytes(obj->reader, (BYTE *) zstr->val, zstr->len, &read);
+ iERR err = ion_reader_read_lob_bytes(reader, (BYTE *) zstr->val, zstr->len, &read);
if (err == IERR_BUFFER_TOO_SMALL) {
zstr = zend_string_extend(zstr, zstr->len << 2, 0);
goto again;
}
ION_CHECK(err, zend_string_release(zstr));
if (zstr->len > read) {
+ zstr->val[read] = 0;
zstr = zend_string_truncate(zstr, read, 0);
}
RETURN_STR(zstr);
}
-static inline void php_ion_unserialize_timestamp(php_ion_reader *obj, zval *return_value)
+static inline void php_ion_reader_read_timestamp(ION_READER *reader, ION_READER_OPTIONS *opt, zval *return_value)
{
ION_TIMESTAMP ts;
- ION_CHECK(ion_reader_read_timestamp(obj->reader, &ts));
-
- decContext *ctx = NULL;
- if (obj->opt) {
- ctx = php_ion_obj(reader_options, obj->opt)->opt.decimal_context;
- }
+ ION_CHECK(ion_reader_read_timestamp(reader, &ts));
object_init_ex(return_value, ce_Timestamp);
php_ion_timestamp *ts_obj = php_ion_obj(timestamp, Z_OBJ_P(return_value));
zend_string *fmt = NULL;
+ decContext *ctx = opt ? opt->decimal_context : NULL;
ts_obj->time = php_time_from_ion(&ts, ctx, &fmt);
php_ion_timestamp_ctor(ts_obj, ts.precision, fmt, NULL, NULL);
zend_string_release(fmt);
OBJ_CHECK(ts_obj);
}
-static inline void php_ion_unserialize_int(php_ion_reader *obj, zval *return_value)
+static inline void php_ion_reader_read_int(ION_READER *reader, zval *return_value)
{
ION_INT *num = NULL;
- ION_CHECK(ion_int_alloc(obj->reader, &num));
- ION_CHECK(ion_reader_read_ion_int(obj->reader, num));
+ ION_CHECK(ion_int_alloc(reader, &num));
+ ION_CHECK(ion_reader_read_ion_int(reader, num));
// TODO: SIZEOF_ZEND_LONG == 4
int64_t i64;
case IERR_NUMERIC_OVERFLOW:
SIZE max, len;
ION_CHECK(ion_int_char_length(num, &max));
- zend_string *zs = zend_string_alloc(max-1, 0);
+ zend_string *zs = zend_string_alloc(max, 0);
err = ion_int_to_char(num, (BYTE *) zs->val, max, &len);
- ZEND_ASSERT(len == zs->len);
+ zs->val[zs->len = len] = 0;
RETVAL_STR(zs);
/* fall through */
}
}
-static inline void php_ion_unserialize_backref(php_ion_reader *obj, zval *return_value)
+static inline void php_ion_unserialize_backref(php_ion_unserializer *ser, zval *return_value)
{
- php_ion_global_unserializer *u = &php_ion_globals.unserializer;
- zval *backref = zend_hash_index_find(&u->ids, Z_LVAL_P(return_value));
+ zval *backref = zend_hash_index_find(ser->ids, Z_LVAL_P(return_value));
if (backref) {
- ZVAL_COPY(return_value, backref);
+ ZVAL_COPY_VALUE(return_value, backref);
+ zend_hash_next_index_insert(ser->addref, return_value);
} else {
zend_throw_exception_ex(spl_ce_RuntimeException, IERR_INTERNAL_ERROR,
- "Could not find backref %ld", Z_LVAL_P(return_value));
+ "Could not find back reference %ld", Z_LVAL_P(return_value));
}
}
-static inline void php_ion_unserialize_zval(php_ion_reader *obj, zval *return_value)
+static inline void php_ion_unserialize_annotations(php_ion_unserializer *ser)
{
- ION_TYPE typ;
- ION_CHECK(ion_reader_next(obj->reader, &typ));
+ memset(&ser->annotations, 0, sizeof(ser->annotations));
-#define next_annotation() do { \
- if (ann_count) { \
- --ann_count; \
- ION_CHECK(ion_reader_get_an_annotation(obj->reader, ann_index++, &annotation)); \
- } \
-} while (0)
-#define has_annotation(a) (has_annotations && annotation.length == 1 && annotation.value[0] == a)
+ int32_t ann_cnt;
+ ION_CHECK(ion_reader_get_annotation_count(ser->reader, &ann_cnt));
+ for (int32_t i = 0; i < ann_cnt; ++i) {
+ ION_STRING ann_str;
+ ION_CHECK(ion_reader_get_an_annotation(ser->reader, i, &ann_str));
+
+ if (ann_str.length != 1) {
+ continue;
+ }
+
+ switch (*ann_str.value) {
+ case 'R':
+ if (ser->annotations.makeref) {
+ zend_throw_exception_ex(spl_ce_RuntimeException, IERR_INVALID_SYNTAX,
+ "Invalid multiple reference annotations");
+ return;
+ }
+ ser->annotations.makeref = true;
+ break;
+
+ case 'r':
+ if (ser->annotations.backref) {
+ zend_throw_exception_ex(spl_ce_RuntimeException, IERR_INVALID_SYNTAX,
+ "Invalid multiple back reference annotations");
+ return;
+ }
+ ser->annotations.backref = true;
+ break;
- BOOL has_annotations;
- int32_t ann_index = 0, ann_count = 0;
- ION_STRING annotation = {0};
- ION_CHECK(ion_reader_has_any_annotations(obj->reader, &has_annotations));
- if (has_annotations) {
- ION_CHECK(ion_reader_get_annotation_count(obj->reader, &ann_count));
- next_annotation();
+ case 'p':
+ if (ser->annotations.object_prop) {
+ zend_throw_exception_ex(spl_ce_RuntimeException, IERR_INVALID_SYNTAX,
+ "Invalid multiple object property annotations");
+ return;
+ }
+ ser->annotations.object_prop = true;
+
+ ION_STRING prop_class;
+ ION_CHECK(ion_reader_get_an_annotation(ser->reader, ++i, &prop_class));
+ ser->annotations.property_class = zend_string_from_ion(&prop_class);
+
+ zval zptmp;
+ ZVAL_STR(&zptmp, ser->annotations.property_class);
+ zend_hash_next_index_insert(ser->tmp, &zptmp);
+ break;
+
+ case 'E':
+ case 'S':
+ case 'O':
+ case 'C':
+ case 'o':
+ case 'c':
+ if (ser->annotations.object_type) {
+ zend_throw_exception_ex(spl_ce_RuntimeException, IERR_INVALID_SYNTAX,
+ "Invalid multiple object type annotations: %c::%c",
+ ser->annotations.object_type, *ann_str.value);
+ return;
+ }
+ if ('o' != (ser->annotations.object_type = *ann_str.value)) {
+ ION_STRING class_name;
+ ION_CHECK(ion_reader_get_an_annotation(ser->reader, ++i, &class_name));
+ ser->annotations.object_class = zend_string_from_ion(&class_name);
+
+ zval zctmp;
+ ZVAL_STR(&zctmp, ser->annotations.object_class);
+ zend_hash_next_index_insert(ser->tmp, &zctmp);
+ }
+ break;
+ }
+
+ // sanity checks
+ if (ser->annotations.object_type && ser->annotations.object_type != 'o' && !ser->annotations.object_class) {
+ zend_throw_exception_ex(spl_ce_RuntimeException, IERR_INVALID_SYNTAX,
+ "Invalid object annotation without class name: %c::", ser->annotations.object_type);
+ return;
+ }
+ if (ser->annotations.object_type == 'o' && ser->annotations.object_class) {
+ zend_throw_exception_ex(spl_ce_RuntimeException, IERR_INVALID_SYNTAX,
+ "Invalid object annotation with class name: o::%s", ser->annotations.object_class->val);
+ return;
+ }
}
+}
- if (has_annotation('r')) {
- // BACKREF
- php_ion_unserialize_int(obj, return_value);
- ION_CATCH();
- php_ion_unserialize_backref(obj, return_value);
- ION_CATCH();
- return;
+static inline void php_ion_unserialize_zval(php_ion_unserializer *ser, zval *return_value, ION_TYPE *typ)
+{
+ if (typ) {
+ memcpy(&ser->type, typ, sizeof(ser->type));
+ } else {
+ typ = &ser->type;
+ ION_CHECK(ion_reader_next(ser->reader, typ));
}
- if (has_annotation('R')) {
- // REFERENCE
+ php_ion_unserialize_annotations(ser);
+ ION_CATCH();
+
+ if (ser->annotations.makeref) {
ZVAL_MAKE_REF(return_value);
+ zend_hash_next_index_insert(ser->ids, return_value);
ZVAL_DEREF(return_value);
- next_annotation();
}
- BOOL bval;
- ION_CHECK(ion_reader_is_null(obj->reader, &bval));
- if (bval) {
- goto read_null;
+ if (ION_TYPE_INT(*typ) > 0) {
+ BOOL is_null;
+ ION_CHECK(ion_reader_is_null(ser->reader, &is_null));
+ if (is_null) {
+ RETURN_NULL();
+ }
}
- switch (ION_TYPE_INT(typ)) {
+ switch (ION_TYPE_INT(*typ)) {
case tid_NULL_INT:
- read_null: ;
- ION_CHECK(ion_reader_read_null(obj->reader, &typ));
+ ION_CHECK(ion_reader_read_null(ser->reader, typ));
RETURN_NULL();
case tid_BOOL_INT:
- ION_CHECK(ion_reader_read_bool(obj->reader, &bval));
+ BOOL bval;
+ ION_CHECK(ion_reader_read_bool(ser->reader, &bval));
RETURN_BOOL(bval);
case tid_INT_INT:
- php_ion_unserialize_int(obj, return_value);
+ php_ion_reader_read_int(ser->reader, return_value);
+ if (ser->annotations.backref) {
+ ION_CATCH();
+ php_ion_unserialize_backref(ser, return_value);
+ }
+ if (ser->annotations.object_type) {
+ if (!ser->annotations.backref) {
+ zend_throw_exception_ex(spl_ce_RuntimeException, IERR_INVALID_SYNTAX,
+ "Invalid object type annotation: %c::" ZEND_LONG_FMT,
+ ser->annotations.object_type, Z_LVAL_P(return_value));
+ return;
+ }
+ goto unserialize_struct;
+ }
return;
case tid_FLOAT_INT:
- ION_CHECK(ion_reader_read_double(obj->reader, &Z_DVAL_P(return_value)));
- return;
+ double d;
+ ION_CHECK(ion_reader_read_double(ser->reader, &d));
+ RETURN_DOUBLE(d);
case tid_DECIMAL_INT:
object_init_ex(return_value, ce_Decimal);
php_ion_decimal *dec = php_ion_obj(decimal, Z_OBJ_P(return_value));
- ION_CHECK(ion_reader_read_ion_decimal(obj->reader, &dec->dec));
+ ION_CHECK(ion_reader_read_ion_decimal(ser->reader, &dec->dec));
php_ion_decimal_ctor(dec);
- zend_hash_next_index_insert(&php_ion_globals.unserializer.ids, return_value);
+ zend_hash_next_index_insert(ser->ids, return_value);
return;
case tid_TIMESTAMP_INT:
- php_ion_unserialize_timestamp(obj, return_value);
- zend_hash_next_index_insert(&php_ion_globals.unserializer.ids, return_value);
+ php_ion_reader_read_timestamp(ser->reader, ser->options, return_value);
+ zend_hash_next_index_insert(ser->ids, return_value);
return;
case tid_SYMBOL_INT:
ION_SYMBOL sym;
- ION_CHECK(ion_reader_read_ion_symbol(obj->reader, &sym));
+ ION_CHECK(ion_reader_read_ion_symbol(ser->reader, &sym));
php_ion_symbol_zval(&sym, return_value);
- zend_hash_next_index_insert(&php_ion_globals.unserializer.ids, return_value);
+ if (ser->annotations.object_type) {
+ zend_hash_next_index_insert(ser->tmp, return_value);
+ goto unserialize_struct;
+ }
+ zend_hash_next_index_insert(ser->ids, return_value);
return;
case tid_STRING_INT:
ION_STRING str;
- ION_CHECK(ion_reader_read_string(obj->reader, &str));
+ ION_CHECK(ion_reader_read_string(ser->reader, &str));
RETVAL_STRINGL((char *) str.value, str.length);
- if (has_annotation('S')) {
- goto serializable;
+ if (ser->annotations.object_type) {
+ zend_hash_next_index_insert(ser->tmp, return_value);
+ goto unserialize_struct;
}
- zend_hash_next_index_insert(&php_ion_globals.unserializer.ids, return_value);
+ zend_hash_next_index_insert(ser->ids, return_value);
return;
case tid_CLOB_INT:
case tid_BLOB_INT:
- php_ion_unserialize_lob(obj, return_value);
- if (has_annotation('S')) {
- goto serializable;
+ php_ion_reader_read_lob(ser->reader, return_value);
+ if (ser->annotations.object_type) {
+ zend_hash_next_index_insert(ser->tmp, return_value);
+ goto unserialize_struct;
}
- zend_hash_next_index_insert(&php_ion_globals.unserializer.ids, return_value);
+ zend_hash_next_index_insert(ser->ids, return_value);
return;
case tid_LIST_INT:
case tid_SEXP_INT: // FIXME
- php_ion_unserialize_list(obj, return_value);
- return;
+ php_ion_unserialize_list(ser, return_value);
+ if (!ser->annotations.object_type) {
+ return;
+ }
+ /* fall through */
case tid_STRUCT_INT:
- serializable: ;
- zend_string *class_name = NULL;
- uint8_t object_type = annotation.length == 1 ? annotation.value[0] : 0;
- if (object_type && object_type != 'o') {
- next_annotation();
- class_name = zend_string_from_ion(&annotation);
- }
- php_ion_unserialize_struct(obj, object_type, class_name, return_value);
- if (class_name) {
- zend_string_release(class_name);
- }
+unserialize_struct: ;
+ php_ion_unserialize_struct(ser, return_value);
return;
case tid_none_INT:
break;
case tid_DATAGRAM_INT:
+ ZEND_ASSERT(!"datagram");
case tid_EOF_INT:
return;
}
}
-void php_ion_unserialize(php_ion_reader *obj, zend_string *zstr, zval *return_value)
+php_ion_decl(unserializer_php, Unserializer_PHP, php_ion_unserializer_php_dtor(obj));
+
+static inline void php_ion_unserialize_ex(php_ion_unserializer *ser, zval *return_value)
+{
+ if (ser->multi_seq) {
+ array_init(return_value);
+ }
+
+ do {
+ zval tmp;
+ ZVAL_NULL(&tmp);
+ php_ion_globals_unserializer_step();
+ php_ion_unserialize_zval(ser, &tmp, NULL);
+ php_ion_globals_unserializer_exit();
+ ION_CATCH(zval_ptr_dtor(&tmp));
+
+ if (!ser->multi_seq) {
+ RETURN_COPY_VALUE(&tmp);
+ } else if (ser->type != tid_EOF) {
+ zend_hash_next_index_insert(Z_ARRVAL_P(return_value), &tmp);
+ }
+ } while (ser->type != tid_EOF);
+}
+
+void php_ion_unserialize(php_ion_unserializer *ser, zval *zdata, zval *return_value)
{
- zval zreader;
+ zend_object *zo_opt = NULL, *zo_ser = NULL;
- if (obj) {
- ZVAL_OBJ_COPY(&zreader, &obj->std);
+ if (!ser) {
+ zo_ser = create_ion_Unserializer_PHP(NULL);
+ php_ion_unserializer_php *o_ser = php_ion_obj(unserializer_php, zo_ser);
+ PTR_CHECK(o_ser);
+ o_ser->unserializer.call_magic = true;
+ php_ion_unserializer_php_ctor(o_ser);
+ ION_CATCH();
+ ser = &o_ser->unserializer;
+ }
+
+ zend_object *zo_reader;
+ php_ion_reader *reader;
+ ZVAL_DEREF(zdata);
+
+ if (Z_TYPE_P(zdata) == IS_RESOURCE) {
+ zo_reader = create_ion_Reader_Reader(ce_Reader_Stream_Reader);
+ reader = php_ion_obj(reader, zo_reader);
+ reader->type = STREAM_READER;
+ php_stream_from_zval_no_verify(reader->stream.ptr, zdata);
+ } else if (Z_TYPE_P(zdata) <= IS_STRING) {
+ zo_reader = create_ion_Reader_Reader(ce_Reader_Buffer_Reader);
+ reader = php_ion_obj(reader, zo_reader);
+ reader->type = BUFFER_READER;
+ reader->buffer = zval_get_string(zdata);
} else {
- object_init_ex(&zreader, ce_Reader_Buffer_Reader);
- obj = php_ion_obj(reader, Z_OBJ(zreader));
- obj->type = BUFFER_READER;
- obj->buffer = zend_string_copy(zstr);
- php_ion_reader_ctor(obj);
+ zend_throw_exception_ex(spl_ce_InvalidArgumentException, IERR_INVALID_ARG,
+ "Invalid source to unserialize; expected string or resource");
+ if (zo_ser) {
+ OBJ_RELEASE(zo_ser);
+ }
+ return;
+ }
+
+ if (ser->options) {
+ zo_opt = reader->opt = create_ion_Reader_Options(NULL);
+ php_ion_obj(reader_options, reader->opt)->opt = *ser->options;
}
- php_ion_globals_serializer_step();
- php_ion_unserialize_zval(obj, return_value);
- php_ion_globals_serializer_exit();
+ php_ion_reader_ctor(reader);
+ ser->reader = reader->reader;
- zval_ptr_dtor(&zreader);
+ if (!EG(exception)) {
+ php_ion_unserialize_ex(ser, return_value);
+ }
+
+ OBJ_RELEASE(zo_reader);
+ if (zo_opt) {
+ OBJ_RELEASE(zo_opt);
+ }
+ if (zo_ser) {
+ OBJ_RELEASE(zo_ser);
+ }
}