Annotation of embedaddon/php/ext/standard/var_unserializer.c, revision 1.1.1.4
1.1.1.4 ! misho 1: /* Generated by re2c 0.13.5 on Mon Jul 29 17:57:26 2013 */
1.1 misho 2: /*
3: +----------------------------------------------------------------------+
4: | PHP Version 5 |
5: +----------------------------------------------------------------------+
1.1.1.3 misho 6: | Copyright (c) 1997-2013 The PHP Group |
1.1 misho 7: +----------------------------------------------------------------------+
8: | This source file is subject to version 3.01 of the PHP license, |
9: | that is bundled with this package in the file LICENSE, and is |
10: | available through the world-wide-web at the following url: |
11: | http://www.php.net/license/3_01.txt |
12: | If you did not receive a copy of the PHP license and are unable to |
13: | obtain it through the world-wide-web, please send a note to |
14: | license@php.net so we can mail you a copy immediately. |
15: +----------------------------------------------------------------------+
16: | Author: Sascha Schumann <sascha@schumann.cx> |
17: +----------------------------------------------------------------------+
18: */
19:
1.1.1.2 misho 20: /* $Id$ */
1.1 misho 21:
22: #include "php.h"
23: #include "ext/standard/php_var.h"
24: #include "php_incomplete_class.h"
25:
26: /* {{{ reference-handling for unserializer: var_* */
27: #define VAR_ENTRIES_MAX 1024
1.1.1.4 ! misho 28: #define VAR_ENTRIES_DBG 0
1.1 misho 29:
30: typedef struct {
31: zval *data[VAR_ENTRIES_MAX];
32: long used_slots;
33: void *next;
34: } var_entries;
35:
36: static inline void var_push(php_unserialize_data_t *var_hashx, zval **rval)
37: {
1.1.1.2 misho 38: var_entries *var_hash = (*var_hashx)->last;
1.1.1.4 ! misho 39: #if VAR_ENTRIES_DBG
1.1.1.2 misho 40: fprintf(stderr, "var_push(%ld): %d\n", var_hash?var_hash->used_slots:-1L, Z_TYPE_PP(rval));
41: #endif
1.1 misho 42:
1.1.1.2 misho 43: if (!var_hash || var_hash->used_slots == VAR_ENTRIES_MAX) {
1.1 misho 44: var_hash = emalloc(sizeof(var_entries));
45: var_hash->used_slots = 0;
46: var_hash->next = 0;
47:
1.1.1.2 misho 48: if (!(*var_hashx)->first) {
49: (*var_hashx)->first = var_hash;
50: } else {
51: ((var_entries *) (*var_hashx)->last)->next = var_hash;
52: }
53:
54: (*var_hashx)->last = var_hash;
1.1 misho 55: }
56:
57: var_hash->data[var_hash->used_slots++] = *rval;
58: }
59:
60: PHPAPI void var_push_dtor(php_unserialize_data_t *var_hashx, zval **rval)
61: {
1.1.1.2 misho 62: var_entries *var_hash = (*var_hashx)->last_dtor;
1.1.1.4 ! misho 63: #if VAR_ENTRIES_DBG
1.1.1.2 misho 64: fprintf(stderr, "var_push_dtor(%ld): %d\n", var_hash?var_hash->used_slots:-1L, Z_TYPE_PP(rval));
65: #endif
1.1 misho 66:
1.1.1.2 misho 67: if (!var_hash || var_hash->used_slots == VAR_ENTRIES_MAX) {
1.1 misho 68: var_hash = emalloc(sizeof(var_entries));
69: var_hash->used_slots = 0;
70: var_hash->next = 0;
71:
1.1.1.2 misho 72: if (!(*var_hashx)->first_dtor) {
73: (*var_hashx)->first_dtor = var_hash;
74: } else {
75: ((var_entries *) (*var_hashx)->last_dtor)->next = var_hash;
76: }
77:
78: (*var_hashx)->last_dtor = var_hash;
1.1 misho 79: }
80:
81: Z_ADDREF_PP(rval);
82: var_hash->data[var_hash->used_slots++] = *rval;
83: }
84:
1.1.1.4 ! misho 85: PHPAPI void var_push_dtor_no_addref(php_unserialize_data_t *var_hashx, zval **rval)
! 86: {
! 87: var_entries *var_hash = (*var_hashx)->last_dtor;
! 88: #if VAR_ENTRIES_DBG
! 89: fprintf(stderr, "var_push_dtor_no_addref(%ld): %d (%d)\n", var_hash?var_hash->used_slots:-1L, Z_TYPE_PP(rval), Z_REFCOUNT_PP(rval));
! 90: #endif
! 91:
! 92: if (!var_hash || var_hash->used_slots == VAR_ENTRIES_MAX) {
! 93: var_hash = emalloc(sizeof(var_entries));
! 94: var_hash->used_slots = 0;
! 95: var_hash->next = 0;
! 96:
! 97: if (!(*var_hashx)->first_dtor) {
! 98: (*var_hashx)->first_dtor = var_hash;
! 99: } else {
! 100: ((var_entries *) (*var_hashx)->last_dtor)->next = var_hash;
! 101: }
! 102:
! 103: (*var_hashx)->last_dtor = var_hash;
! 104: }
! 105:
! 106: var_hash->data[var_hash->used_slots++] = *rval;
! 107: }
! 108:
1.1 misho 109: PHPAPI void var_replace(php_unserialize_data_t *var_hashx, zval *ozval, zval **nzval)
110: {
111: long i;
1.1.1.2 misho 112: var_entries *var_hash = (*var_hashx)->first;
1.1.1.4 ! misho 113: #if VAR_ENTRIES_DBG
1.1.1.2 misho 114: fprintf(stderr, "var_replace(%ld): %d\n", var_hash?var_hash->used_slots:-1L, Z_TYPE_PP(nzval));
115: #endif
1.1 misho 116:
117: while (var_hash) {
118: for (i = 0; i < var_hash->used_slots; i++) {
119: if (var_hash->data[i] == ozval) {
120: var_hash->data[i] = *nzval;
121: /* do not break here */
122: }
123: }
124: var_hash = var_hash->next;
125: }
126: }
127:
128: static int var_access(php_unserialize_data_t *var_hashx, long id, zval ***store)
129: {
1.1.1.2 misho 130: var_entries *var_hash = (*var_hashx)->first;
1.1.1.4 ! misho 131: #if VAR_ENTRIES_DBG
1.1.1.2 misho 132: fprintf(stderr, "var_access(%ld): %ld\n", var_hash?var_hash->used_slots:-1L, id);
133: #endif
134:
1.1 misho 135: while (id >= VAR_ENTRIES_MAX && var_hash && var_hash->used_slots == VAR_ENTRIES_MAX) {
136: var_hash = var_hash->next;
137: id -= VAR_ENTRIES_MAX;
138: }
139:
140: if (!var_hash) return !SUCCESS;
141:
142: if (id < 0 || id >= var_hash->used_slots) return !SUCCESS;
143:
144: *store = &var_hash->data[id];
145:
146: return SUCCESS;
147: }
148:
149: PHPAPI void var_destroy(php_unserialize_data_t *var_hashx)
150: {
151: void *next;
152: long i;
1.1.1.2 misho 153: var_entries *var_hash = (*var_hashx)->first;
1.1.1.4 ! misho 154: #if VAR_ENTRIES_DBG
1.1.1.2 misho 155: fprintf(stderr, "var_destroy(%ld)\n", var_hash?var_hash->used_slots:-1L);
156: #endif
1.1 misho 157:
158: while (var_hash) {
159: next = var_hash->next;
160: efree(var_hash);
161: var_hash = next;
162: }
163:
1.1.1.2 misho 164: var_hash = (*var_hashx)->first_dtor;
1.1 misho 165:
166: while (var_hash) {
167: for (i = 0; i < var_hash->used_slots; i++) {
168: zval_ptr_dtor(&var_hash->data[i]);
169: }
170: next = var_hash->next;
171: efree(var_hash);
172: var_hash = next;
173: }
174: }
175:
176: /* }}} */
177:
178: static char *unserialize_str(const unsigned char **p, size_t *len, size_t maxlen)
179: {
180: size_t i, j;
181: char *str = safe_emalloc(*len, 1, 1);
182: unsigned char *end = *(unsigned char **)p+maxlen;
183:
184: if (end < *p) {
185: efree(str);
186: return NULL;
187: }
188:
189: for (i = 0; i < *len; i++) {
190: if (*p >= end) {
191: efree(str);
192: return NULL;
193: }
194: if (**p != '\\') {
195: str[i] = (char)**p;
196: } else {
197: unsigned char ch = 0;
198:
199: for (j = 0; j < 2; j++) {
200: (*p)++;
201: if (**p >= '0' && **p <= '9') {
202: ch = (ch << 4) + (**p -'0');
203: } else if (**p >= 'a' && **p <= 'f') {
204: ch = (ch << 4) + (**p -'a'+10);
205: } else if (**p >= 'A' && **p <= 'F') {
206: ch = (ch << 4) + (**p -'A'+10);
207: } else {
208: efree(str);
209: return NULL;
210: }
211: }
212: str[i] = (char)ch;
213: }
214: (*p)++;
215: }
216: str[i] = 0;
217: *len = i;
218: return str;
219: }
220:
221: #define YYFILL(n) do { } while (0)
222: #define YYCTYPE unsigned char
223: #define YYCURSOR cursor
224: #define YYLIMIT limit
225: #define YYMARKER marker
226:
227:
228:
229:
230:
231:
232: static inline long parse_iv2(const unsigned char *p, const unsigned char **q)
233: {
234: char cursor;
235: long result = 0;
236: int neg = 0;
237:
238: switch (*p) {
239: case '-':
240: neg++;
241: /* fall-through */
242: case '+':
243: p++;
244: }
245:
246: while (1) {
247: cursor = (char)*p;
248: if (cursor >= '0' && cursor <= '9') {
249: result = result * 10 + (size_t)(cursor - (unsigned char)'0');
250: } else {
251: break;
252: }
253: p++;
254: }
255: if (q) *q = p;
256: if (neg) return -result;
257: return result;
258: }
259:
260: static inline long parse_iv(const unsigned char *p)
261: {
262: return parse_iv2(p, NULL);
263: }
264:
265: /* no need to check for length - re2c already did */
266: static inline size_t parse_uiv(const unsigned char *p)
267: {
268: unsigned char cursor;
269: size_t result = 0;
270:
271: if (*p == '+') {
272: p++;
273: }
274:
275: while (1) {
276: cursor = *p;
277: if (cursor >= '0' && cursor <= '9') {
278: result = result * 10 + (size_t)(cursor - (unsigned char)'0');
279: } else {
280: break;
281: }
282: p++;
283: }
284: return result;
285: }
286:
287: #define UNSERIALIZE_PARAMETER zval **rval, const unsigned char **p, const unsigned char *max, php_unserialize_data_t *var_hash TSRMLS_DC
288: #define UNSERIALIZE_PASSTHRU rval, p, max, var_hash TSRMLS_CC
289:
290: static inline int process_nested_data(UNSERIALIZE_PARAMETER, HashTable *ht, long elements, int objprops)
291: {
292: while (elements-- > 0) {
293: zval *key, *data, **old_data;
294:
295: ALLOC_INIT_ZVAL(key);
296:
297: if (!php_var_unserialize(&key, p, max, NULL TSRMLS_CC)) {
298: zval_dtor(key);
299: FREE_ZVAL(key);
300: return 0;
301: }
302:
303: if (Z_TYPE_P(key) != IS_LONG && Z_TYPE_P(key) != IS_STRING) {
304: zval_dtor(key);
305: FREE_ZVAL(key);
306: return 0;
307: }
308:
309: ALLOC_INIT_ZVAL(data);
310:
311: if (!php_var_unserialize(&data, p, max, var_hash TSRMLS_CC)) {
312: zval_dtor(key);
313: FREE_ZVAL(key);
314: zval_dtor(data);
315: FREE_ZVAL(data);
316: return 0;
317: }
318:
319: if (!objprops) {
320: switch (Z_TYPE_P(key)) {
321: case IS_LONG:
322: if (zend_hash_index_find(ht, Z_LVAL_P(key), (void **)&old_data)==SUCCESS) {
323: var_push_dtor(var_hash, old_data);
324: }
325: zend_hash_index_update(ht, Z_LVAL_P(key), &data, sizeof(data), NULL);
326: break;
327: case IS_STRING:
328: if (zend_symtable_find(ht, Z_STRVAL_P(key), Z_STRLEN_P(key) + 1, (void **)&old_data)==SUCCESS) {
329: var_push_dtor(var_hash, old_data);
330: }
331: zend_symtable_update(ht, Z_STRVAL_P(key), Z_STRLEN_P(key) + 1, &data, sizeof(data), NULL);
332: break;
333: }
334: } else {
335: /* object properties should include no integers */
336: convert_to_string(key);
337: zend_hash_update(ht, Z_STRVAL_P(key), Z_STRLEN_P(key) + 1, &data,
338: sizeof data, NULL);
339: }
340:
341: zval_dtor(key);
342: FREE_ZVAL(key);
343:
344: if (elements && *(*p-1) != ';' && *(*p-1) != '}') {
345: (*p)--;
346: return 0;
347: }
348: }
349:
350: return 1;
351: }
352:
353: static inline int finish_nested_data(UNSERIALIZE_PARAMETER)
354: {
355: if (*((*p)++) == '}')
356: return 1;
357:
358: #if SOMETHING_NEW_MIGHT_LEAD_TO_CRASH_ENABLE_IF_YOU_ARE_BRAVE
359: zval_ptr_dtor(rval);
360: #endif
361: return 0;
362: }
363:
364: static inline int object_custom(UNSERIALIZE_PARAMETER, zend_class_entry *ce)
365: {
366: long datalen;
367:
368: datalen = parse_iv2((*p) + 2, p);
369:
370: (*p) += 2;
371:
372: if (datalen < 0 || (*p) + datalen >= max) {
373: zend_error(E_WARNING, "Insufficient data for unserializing - %ld required, %ld present", datalen, (long)(max - (*p)));
374: return 0;
375: }
376:
377: if (ce->unserialize == NULL) {
378: zend_error(E_WARNING, "Class %s has no unserializer", ce->name);
379: object_init_ex(*rval, ce);
380: } else if (ce->unserialize(rval, ce, (const unsigned char*)*p, datalen, (zend_unserialize_data *)var_hash TSRMLS_CC) != SUCCESS) {
381: return 0;
382: }
383:
384: (*p) += datalen;
385:
386: return finish_nested_data(UNSERIALIZE_PASSTHRU);
387: }
388:
389: static inline long object_common1(UNSERIALIZE_PARAMETER, zend_class_entry *ce)
390: {
391: long elements;
392:
393: elements = parse_iv2((*p) + 2, p);
394:
395: (*p) += 2;
396:
397: object_init_ex(*rval, ce);
398: return elements;
399: }
400:
1.1.1.2 misho 401: #ifdef PHP_WIN32
402: # pragma optimize("", off)
403: #endif
1.1 misho 404: static inline int object_common2(UNSERIALIZE_PARAMETER, long elements)
405: {
406: zval *retval_ptr = NULL;
407: zval fname;
408:
409: if (!process_nested_data(UNSERIALIZE_PASSTHRU, Z_OBJPROP_PP(rval), elements, 1)) {
410: return 0;
411: }
412:
413: if (Z_OBJCE_PP(rval) != PHP_IC_ENTRY &&
414: zend_hash_exists(&Z_OBJCE_PP(rval)->function_table, "__wakeup", sizeof("__wakeup"))) {
415: INIT_PZVAL(&fname);
416: ZVAL_STRINGL(&fname, "__wakeup", sizeof("__wakeup") - 1, 0);
1.1.1.2 misho 417: BG(serialize_lock)++;
1.1 misho 418: call_user_function_ex(CG(function_table), rval, &fname, &retval_ptr, 0, 0, 1, NULL TSRMLS_CC);
1.1.1.2 misho 419: BG(serialize_lock)--;
1.1 misho 420: }
421:
1.1.1.3 misho 422: if (retval_ptr) {
1.1 misho 423: zval_ptr_dtor(&retval_ptr);
1.1.1.3 misho 424: }
425:
426: if (EG(exception)) {
427: return 0;
428: }
1.1 misho 429:
430: return finish_nested_data(UNSERIALIZE_PASSTHRU);
431:
432: }
1.1.1.2 misho 433: #ifdef PHP_WIN32
434: # pragma optimize("", on)
435: #endif
1.1 misho 436:
437: PHPAPI int php_var_unserialize(UNSERIALIZE_PARAMETER)
438: {
439: const unsigned char *cursor, *limit, *marker, *start;
440: zval **rval_ref;
441:
1.1.1.2 misho 442: limit = max;
443: cursor = *p;
444:
445: if (YYCURSOR >= YYLIMIT) {
446: return 0;
447: }
1.1 misho 448:
449: if (var_hash && cursor[0] != 'R') {
450: var_push(var_hash, rval);
451: }
452:
453: start = cursor;
454:
455:
456:
457:
458: {
459: YYCTYPE yych;
460: static const unsigned char yybm[] = {
461: 0, 0, 0, 0, 0, 0, 0, 0,
462: 0, 0, 0, 0, 0, 0, 0, 0,
463: 0, 0, 0, 0, 0, 0, 0, 0,
464: 0, 0, 0, 0, 0, 0, 0, 0,
465: 0, 0, 0, 0, 0, 0, 0, 0,
466: 0, 0, 0, 0, 0, 0, 0, 0,
467: 128, 128, 128, 128, 128, 128, 128, 128,
468: 128, 128, 0, 0, 0, 0, 0, 0,
469: 0, 0, 0, 0, 0, 0, 0, 0,
470: 0, 0, 0, 0, 0, 0, 0, 0,
471: 0, 0, 0, 0, 0, 0, 0, 0,
472: 0, 0, 0, 0, 0, 0, 0, 0,
473: 0, 0, 0, 0, 0, 0, 0, 0,
474: 0, 0, 0, 0, 0, 0, 0, 0,
475: 0, 0, 0, 0, 0, 0, 0, 0,
476: 0, 0, 0, 0, 0, 0, 0, 0,
477: 0, 0, 0, 0, 0, 0, 0, 0,
478: 0, 0, 0, 0, 0, 0, 0, 0,
479: 0, 0, 0, 0, 0, 0, 0, 0,
480: 0, 0, 0, 0, 0, 0, 0, 0,
481: 0, 0, 0, 0, 0, 0, 0, 0,
482: 0, 0, 0, 0, 0, 0, 0, 0,
483: 0, 0, 0, 0, 0, 0, 0, 0,
484: 0, 0, 0, 0, 0, 0, 0, 0,
485: 0, 0, 0, 0, 0, 0, 0, 0,
486: 0, 0, 0, 0, 0, 0, 0, 0,
487: 0, 0, 0, 0, 0, 0, 0, 0,
488: 0, 0, 0, 0, 0, 0, 0, 0,
489: 0, 0, 0, 0, 0, 0, 0, 0,
490: 0, 0, 0, 0, 0, 0, 0, 0,
491: 0, 0, 0, 0, 0, 0, 0, 0,
492: 0, 0, 0, 0, 0, 0, 0, 0,
493: };
494:
495: if ((YYLIMIT - YYCURSOR) < 7) YYFILL(7);
496: yych = *YYCURSOR;
497: switch (yych) {
498: case 'C':
499: case 'O': goto yy13;
500: case 'N': goto yy5;
501: case 'R': goto yy2;
502: case 'S': goto yy10;
503: case 'a': goto yy11;
504: case 'b': goto yy6;
505: case 'd': goto yy8;
506: case 'i': goto yy7;
507: case 'o': goto yy12;
508: case 'r': goto yy4;
509: case 's': goto yy9;
510: case '}': goto yy14;
511: default: goto yy16;
512: }
513: yy2:
514: yych = *(YYMARKER = ++YYCURSOR);
515: if (yych == ':') goto yy95;
516: yy3:
517: { return 0; }
518: yy4:
519: yych = *(YYMARKER = ++YYCURSOR);
520: if (yych == ':') goto yy89;
521: goto yy3;
522: yy5:
523: yych = *++YYCURSOR;
524: if (yych == ';') goto yy87;
525: goto yy3;
526: yy6:
527: yych = *(YYMARKER = ++YYCURSOR);
528: if (yych == ':') goto yy83;
529: goto yy3;
530: yy7:
531: yych = *(YYMARKER = ++YYCURSOR);
532: if (yych == ':') goto yy77;
533: goto yy3;
534: yy8:
535: yych = *(YYMARKER = ++YYCURSOR);
536: if (yych == ':') goto yy53;
537: goto yy3;
538: yy9:
539: yych = *(YYMARKER = ++YYCURSOR);
540: if (yych == ':') goto yy46;
541: goto yy3;
542: yy10:
543: yych = *(YYMARKER = ++YYCURSOR);
544: if (yych == ':') goto yy39;
545: goto yy3;
546: yy11:
547: yych = *(YYMARKER = ++YYCURSOR);
548: if (yych == ':') goto yy32;
549: goto yy3;
550: yy12:
551: yych = *(YYMARKER = ++YYCURSOR);
552: if (yych == ':') goto yy25;
553: goto yy3;
554: yy13:
555: yych = *(YYMARKER = ++YYCURSOR);
556: if (yych == ':') goto yy17;
557: goto yy3;
558: yy14:
559: ++YYCURSOR;
560: {
561: /* this is the case where we have less data than planned */
562: php_error_docref(NULL TSRMLS_CC, E_NOTICE, "Unexpected end of serialized data");
563: return 0; /* not sure if it should be 0 or 1 here? */
564: }
565: yy16:
566: yych = *++YYCURSOR;
567: goto yy3;
568: yy17:
569: yych = *++YYCURSOR;
570: if (yybm[0+yych] & 128) {
571: goto yy20;
572: }
573: if (yych == '+') goto yy19;
574: yy18:
575: YYCURSOR = YYMARKER;
576: goto yy3;
577: yy19:
578: yych = *++YYCURSOR;
579: if (yybm[0+yych] & 128) {
580: goto yy20;
581: }
582: goto yy18;
583: yy20:
584: ++YYCURSOR;
585: if ((YYLIMIT - YYCURSOR) < 2) YYFILL(2);
586: yych = *YYCURSOR;
587: if (yybm[0+yych] & 128) {
588: goto yy20;
589: }
590: if (yych != ':') goto yy18;
591: yych = *++YYCURSOR;
592: if (yych != '"') goto yy18;
593: ++YYCURSOR;
594: {
595: size_t len, len2, len3, maxlen;
596: long elements;
597: char *class_name;
598: zend_class_entry *ce;
599: zend_class_entry **pce;
600: int incomplete_class = 0;
601:
602: int custom_object = 0;
603:
604: zval *user_func;
605: zval *retval_ptr;
606: zval **args[1];
607: zval *arg_func_name;
608:
609: if (*start == 'C') {
610: custom_object = 1;
611: }
612:
613: INIT_PZVAL(*rval);
614: len2 = len = parse_uiv(start + 2);
615: maxlen = max - YYCURSOR;
616: if (maxlen < len || len == 0) {
617: *p = start + 2;
618: return 0;
619: }
620:
621: class_name = (char*)YYCURSOR;
622:
623: YYCURSOR += len;
624:
625: if (*(YYCURSOR) != '"') {
626: *p = YYCURSOR;
627: return 0;
628: }
629: if (*(YYCURSOR+1) != ':') {
630: *p = YYCURSOR+1;
631: return 0;
632: }
633:
634: len3 = strspn(class_name, "0123456789_abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ\177\200\201\202\203\204\205\206\207\210\211\212\213\214\215\216\217\220\221\222\223\224\225\226\227\230\231\232\233\234\235\236\237\240\241\242\243\244\245\246\247\250\251\252\253\254\255\256\257\260\261\262\263\264\265\266\267\270\271\272\273\274\275\276\277\300\301\302\303\304\305\306\307\310\311\312\313\314\315\316\317\320\321\322\323\324\325\326\327\330\331\332\333\334\335\336\337\340\341\342\343\344\345\346\347\350\351\352\353\354\355\356\357\360\361\362\363\364\365\366\367\370\371\372\373\374\375\376\377\\");
635: if (len3 != len)
636: {
637: *p = YYCURSOR + len3 - len;
638: return 0;
639: }
640:
641: class_name = estrndup(class_name, len);
642:
643: do {
644: /* Try to find class directly */
1.1.1.4 ! misho 645: BG(serialize_lock)++;
1.1 misho 646: if (zend_lookup_class(class_name, len2, &pce TSRMLS_CC) == SUCCESS) {
1.1.1.4 ! misho 647: BG(serialize_lock)--;
1.1.1.3 misho 648: if (EG(exception)) {
649: efree(class_name);
650: return 0;
651: }
1.1 misho 652: ce = *pce;
653: break;
654: }
1.1.1.4 ! misho 655: BG(serialize_lock)--;
1.1.1.3 misho 656:
657: if (EG(exception)) {
658: efree(class_name);
659: return 0;
660: }
1.1 misho 661:
662: /* Check for unserialize callback */
663: if ((PG(unserialize_callback_func) == NULL) || (PG(unserialize_callback_func)[0] == '\0')) {
664: incomplete_class = 1;
665: ce = PHP_IC_ENTRY;
666: break;
667: }
668:
669: /* Call unserialize callback */
670: MAKE_STD_ZVAL(user_func);
671: ZVAL_STRING(user_func, PG(unserialize_callback_func), 1);
672: args[0] = &arg_func_name;
673: MAKE_STD_ZVAL(arg_func_name);
674: ZVAL_STRING(arg_func_name, class_name, 1);
1.1.1.4 ! misho 675: BG(serialize_lock)++;
1.1 misho 676: if (call_user_function_ex(CG(function_table), NULL, user_func, &retval_ptr, 1, args, 0, NULL TSRMLS_CC) != SUCCESS) {
1.1.1.4 ! misho 677: BG(serialize_lock)--;
1.1.1.3 misho 678: if (EG(exception)) {
679: efree(class_name);
680: zval_ptr_dtor(&user_func);
681: zval_ptr_dtor(&arg_func_name);
682: return 0;
683: }
1.1 misho 684: php_error_docref(NULL TSRMLS_CC, E_WARNING, "defined (%s) but not found", user_func->value.str.val);
685: incomplete_class = 1;
686: ce = PHP_IC_ENTRY;
687: zval_ptr_dtor(&user_func);
688: zval_ptr_dtor(&arg_func_name);
689: break;
690: }
1.1.1.4 ! misho 691: BG(serialize_lock)--;
1.1 misho 692: if (retval_ptr) {
693: zval_ptr_dtor(&retval_ptr);
694: }
1.1.1.3 misho 695: if (EG(exception)) {
696: efree(class_name);
697: zval_ptr_dtor(&user_func);
698: zval_ptr_dtor(&arg_func_name);
699: return 0;
700: }
1.1 misho 701:
702: /* The callback function may have defined the class */
703: if (zend_lookup_class(class_name, len2, &pce TSRMLS_CC) == SUCCESS) {
704: ce = *pce;
705: } else {
706: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Function %s() hasn't defined the class it was called for", user_func->value.str.val);
707: incomplete_class = 1;
708: ce = PHP_IC_ENTRY;
709: }
710:
711: zval_ptr_dtor(&user_func);
712: zval_ptr_dtor(&arg_func_name);
713: break;
714: } while (1);
715:
716: *p = YYCURSOR;
717:
718: if (custom_object) {
1.1.1.4 ! misho 719: int ret;
! 720:
! 721: ret = object_custom(UNSERIALIZE_PASSTHRU, ce);
1.1 misho 722:
723: if (ret && incomplete_class) {
724: php_store_class_name(*rval, class_name, len2);
725: }
726: efree(class_name);
727: return ret;
728: }
729:
730: elements = object_common1(UNSERIALIZE_PASSTHRU, ce);
731:
732: if (incomplete_class) {
733: php_store_class_name(*rval, class_name, len2);
734: }
735: efree(class_name);
736:
737: return object_common2(UNSERIALIZE_PASSTHRU, elements);
738: }
739: yy25:
740: yych = *++YYCURSOR;
741: if (yych <= ',') {
742: if (yych != '+') goto yy18;
743: } else {
744: if (yych <= '-') goto yy26;
745: if (yych <= '/') goto yy18;
746: if (yych <= '9') goto yy27;
747: goto yy18;
748: }
749: yy26:
750: yych = *++YYCURSOR;
751: if (yych <= '/') goto yy18;
752: if (yych >= ':') goto yy18;
753: yy27:
754: ++YYCURSOR;
755: if ((YYLIMIT - YYCURSOR) < 2) YYFILL(2);
756: yych = *YYCURSOR;
757: if (yych <= '/') goto yy18;
758: if (yych <= '9') goto yy27;
759: if (yych >= ';') goto yy18;
760: yych = *++YYCURSOR;
761: if (yych != '"') goto yy18;
762: ++YYCURSOR;
763: {
764:
765: INIT_PZVAL(*rval);
766:
767: return object_common2(UNSERIALIZE_PASSTHRU,
768: object_common1(UNSERIALIZE_PASSTHRU, ZEND_STANDARD_CLASS_DEF_PTR));
769: }
770: yy32:
771: yych = *++YYCURSOR;
772: if (yych == '+') goto yy33;
773: if (yych <= '/') goto yy18;
774: if (yych <= '9') goto yy34;
775: goto yy18;
776: yy33:
777: yych = *++YYCURSOR;
778: if (yych <= '/') goto yy18;
779: if (yych >= ':') goto yy18;
780: yy34:
781: ++YYCURSOR;
782: if ((YYLIMIT - YYCURSOR) < 2) YYFILL(2);
783: yych = *YYCURSOR;
784: if (yych <= '/') goto yy18;
785: if (yych <= '9') goto yy34;
786: if (yych >= ';') goto yy18;
787: yych = *++YYCURSOR;
788: if (yych != '{') goto yy18;
789: ++YYCURSOR;
790: {
791: long elements = parse_iv(start + 2);
792: /* use iv() not uiv() in order to check data range */
793: *p = YYCURSOR;
794:
795: if (elements < 0) {
796: return 0;
797: }
798:
799: INIT_PZVAL(*rval);
800:
801: array_init_size(*rval, elements);
802:
803: if (!process_nested_data(UNSERIALIZE_PASSTHRU, Z_ARRVAL_PP(rval), elements, 0)) {
804: return 0;
805: }
806:
807: return finish_nested_data(UNSERIALIZE_PASSTHRU);
808: }
809: yy39:
810: yych = *++YYCURSOR;
811: if (yych == '+') goto yy40;
812: if (yych <= '/') goto yy18;
813: if (yych <= '9') goto yy41;
814: goto yy18;
815: yy40:
816: yych = *++YYCURSOR;
817: if (yych <= '/') goto yy18;
818: if (yych >= ':') goto yy18;
819: yy41:
820: ++YYCURSOR;
821: if ((YYLIMIT - YYCURSOR) < 2) YYFILL(2);
822: yych = *YYCURSOR;
823: if (yych <= '/') goto yy18;
824: if (yych <= '9') goto yy41;
825: if (yych >= ';') goto yy18;
826: yych = *++YYCURSOR;
827: if (yych != '"') goto yy18;
828: ++YYCURSOR;
829: {
830: size_t len, maxlen;
831: char *str;
832:
833: len = parse_uiv(start + 2);
834: maxlen = max - YYCURSOR;
835: if (maxlen < len) {
836: *p = start + 2;
837: return 0;
838: }
839:
840: if ((str = unserialize_str(&YYCURSOR, &len, maxlen)) == NULL) {
841: return 0;
842: }
843:
844: if (*(YYCURSOR) != '"') {
845: efree(str);
846: *p = YYCURSOR;
847: return 0;
848: }
849:
850: YYCURSOR += 2;
851: *p = YYCURSOR;
852:
853: INIT_PZVAL(*rval);
854: ZVAL_STRINGL(*rval, str, len, 0);
855: return 1;
856: }
857: yy46:
858: yych = *++YYCURSOR;
859: if (yych == '+') goto yy47;
860: if (yych <= '/') goto yy18;
861: if (yych <= '9') goto yy48;
862: goto yy18;
863: yy47:
864: yych = *++YYCURSOR;
865: if (yych <= '/') goto yy18;
866: if (yych >= ':') goto yy18;
867: yy48:
868: ++YYCURSOR;
869: if ((YYLIMIT - YYCURSOR) < 2) YYFILL(2);
870: yych = *YYCURSOR;
871: if (yych <= '/') goto yy18;
872: if (yych <= '9') goto yy48;
873: if (yych >= ';') goto yy18;
874: yych = *++YYCURSOR;
875: if (yych != '"') goto yy18;
876: ++YYCURSOR;
877: {
878: size_t len, maxlen;
879: char *str;
880:
881: len = parse_uiv(start + 2);
882: maxlen = max - YYCURSOR;
883: if (maxlen < len) {
884: *p = start + 2;
885: return 0;
886: }
887:
888: str = (char*)YYCURSOR;
889:
890: YYCURSOR += len;
891:
892: if (*(YYCURSOR) != '"') {
893: *p = YYCURSOR;
894: return 0;
895: }
896:
897: YYCURSOR += 2;
898: *p = YYCURSOR;
899:
900: INIT_PZVAL(*rval);
901: ZVAL_STRINGL(*rval, str, len, 1);
902: return 1;
903: }
904: yy53:
905: yych = *++YYCURSOR;
906: if (yych <= '/') {
907: if (yych <= ',') {
908: if (yych == '+') goto yy57;
909: goto yy18;
910: } else {
911: if (yych <= '-') goto yy55;
912: if (yych <= '.') goto yy60;
913: goto yy18;
914: }
915: } else {
916: if (yych <= 'I') {
917: if (yych <= '9') goto yy58;
918: if (yych <= 'H') goto yy18;
919: goto yy56;
920: } else {
921: if (yych != 'N') goto yy18;
922: }
923: }
924: yych = *++YYCURSOR;
925: if (yych == 'A') goto yy76;
926: goto yy18;
927: yy55:
928: yych = *++YYCURSOR;
929: if (yych <= '/') {
930: if (yych == '.') goto yy60;
931: goto yy18;
932: } else {
933: if (yych <= '9') goto yy58;
934: if (yych != 'I') goto yy18;
935: }
936: yy56:
937: yych = *++YYCURSOR;
938: if (yych == 'N') goto yy72;
939: goto yy18;
940: yy57:
941: yych = *++YYCURSOR;
942: if (yych == '.') goto yy60;
943: if (yych <= '/') goto yy18;
944: if (yych >= ':') goto yy18;
945: yy58:
946: ++YYCURSOR;
947: if ((YYLIMIT - YYCURSOR) < 4) YYFILL(4);
948: yych = *YYCURSOR;
949: if (yych <= ':') {
950: if (yych <= '.') {
951: if (yych <= '-') goto yy18;
952: goto yy70;
953: } else {
954: if (yych <= '/') goto yy18;
955: if (yych <= '9') goto yy58;
956: goto yy18;
957: }
958: } else {
959: if (yych <= 'E') {
960: if (yych <= ';') goto yy63;
961: if (yych <= 'D') goto yy18;
962: goto yy65;
963: } else {
964: if (yych == 'e') goto yy65;
965: goto yy18;
966: }
967: }
968: yy60:
969: yych = *++YYCURSOR;
970: if (yych <= '/') goto yy18;
971: if (yych >= ':') goto yy18;
972: yy61:
973: ++YYCURSOR;
974: if ((YYLIMIT - YYCURSOR) < 4) YYFILL(4);
975: yych = *YYCURSOR;
976: if (yych <= ';') {
977: if (yych <= '/') goto yy18;
978: if (yych <= '9') goto yy61;
979: if (yych <= ':') goto yy18;
980: } else {
981: if (yych <= 'E') {
982: if (yych <= 'D') goto yy18;
983: goto yy65;
984: } else {
985: if (yych == 'e') goto yy65;
986: goto yy18;
987: }
988: }
989: yy63:
990: ++YYCURSOR;
991: {
992: #if SIZEOF_LONG == 4
993: use_double:
994: #endif
995: *p = YYCURSOR;
996: INIT_PZVAL(*rval);
997: ZVAL_DOUBLE(*rval, zend_strtod((const char *)start + 2, NULL));
998: return 1;
999: }
1000: yy65:
1001: yych = *++YYCURSOR;
1002: if (yych <= ',') {
1003: if (yych != '+') goto yy18;
1004: } else {
1005: if (yych <= '-') goto yy66;
1006: if (yych <= '/') goto yy18;
1007: if (yych <= '9') goto yy67;
1008: goto yy18;
1009: }
1010: yy66:
1011: yych = *++YYCURSOR;
1012: if (yych <= ',') {
1013: if (yych == '+') goto yy69;
1014: goto yy18;
1015: } else {
1016: if (yych <= '-') goto yy69;
1017: if (yych <= '/') goto yy18;
1018: if (yych >= ':') goto yy18;
1019: }
1020: yy67:
1021: ++YYCURSOR;
1022: if (YYLIMIT <= YYCURSOR) YYFILL(1);
1023: yych = *YYCURSOR;
1024: if (yych <= '/') goto yy18;
1025: if (yych <= '9') goto yy67;
1026: if (yych == ';') goto yy63;
1027: goto yy18;
1028: yy69:
1029: yych = *++YYCURSOR;
1030: if (yych <= '/') goto yy18;
1031: if (yych <= '9') goto yy67;
1032: goto yy18;
1033: yy70:
1034: ++YYCURSOR;
1035: if ((YYLIMIT - YYCURSOR) < 4) YYFILL(4);
1036: yych = *YYCURSOR;
1037: if (yych <= ';') {
1038: if (yych <= '/') goto yy18;
1039: if (yych <= '9') goto yy70;
1040: if (yych <= ':') goto yy18;
1041: goto yy63;
1042: } else {
1043: if (yych <= 'E') {
1044: if (yych <= 'D') goto yy18;
1045: goto yy65;
1046: } else {
1047: if (yych == 'e') goto yy65;
1048: goto yy18;
1049: }
1050: }
1051: yy72:
1052: yych = *++YYCURSOR;
1053: if (yych != 'F') goto yy18;
1054: yy73:
1055: yych = *++YYCURSOR;
1056: if (yych != ';') goto yy18;
1057: ++YYCURSOR;
1058: {
1059: *p = YYCURSOR;
1060: INIT_PZVAL(*rval);
1061:
1062: if (!strncmp(start + 2, "NAN", 3)) {
1063: ZVAL_DOUBLE(*rval, php_get_nan());
1064: } else if (!strncmp(start + 2, "INF", 3)) {
1065: ZVAL_DOUBLE(*rval, php_get_inf());
1066: } else if (!strncmp(start + 2, "-INF", 4)) {
1067: ZVAL_DOUBLE(*rval, -php_get_inf());
1068: }
1069:
1070: return 1;
1071: }
1072: yy76:
1073: yych = *++YYCURSOR;
1074: if (yych == 'N') goto yy73;
1075: goto yy18;
1076: yy77:
1077: yych = *++YYCURSOR;
1078: if (yych <= ',') {
1079: if (yych != '+') goto yy18;
1080: } else {
1081: if (yych <= '-') goto yy78;
1082: if (yych <= '/') goto yy18;
1083: if (yych <= '9') goto yy79;
1084: goto yy18;
1085: }
1086: yy78:
1087: yych = *++YYCURSOR;
1088: if (yych <= '/') goto yy18;
1089: if (yych >= ':') goto yy18;
1090: yy79:
1091: ++YYCURSOR;
1092: if (YYLIMIT <= YYCURSOR) YYFILL(1);
1093: yych = *YYCURSOR;
1094: if (yych <= '/') goto yy18;
1095: if (yych <= '9') goto yy79;
1096: if (yych != ';') goto yy18;
1097: ++YYCURSOR;
1098: {
1099: #if SIZEOF_LONG == 4
1100: int digits = YYCURSOR - start - 3;
1101:
1102: if (start[2] == '-' || start[2] == '+') {
1103: digits--;
1104: }
1105:
1106: /* Use double for large long values that were serialized on a 64-bit system */
1107: if (digits >= MAX_LENGTH_OF_LONG - 1) {
1108: if (digits == MAX_LENGTH_OF_LONG - 1) {
1109: int cmp = strncmp(YYCURSOR - MAX_LENGTH_OF_LONG, long_min_digits, MAX_LENGTH_OF_LONG - 1);
1110:
1111: if (!(cmp < 0 || (cmp == 0 && start[2] == '-'))) {
1112: goto use_double;
1113: }
1114: } else {
1115: goto use_double;
1116: }
1117: }
1118: #endif
1119: *p = YYCURSOR;
1120: INIT_PZVAL(*rval);
1121: ZVAL_LONG(*rval, parse_iv(start + 2));
1122: return 1;
1123: }
1124: yy83:
1125: yych = *++YYCURSOR;
1126: if (yych <= '/') goto yy18;
1127: if (yych >= '2') goto yy18;
1128: yych = *++YYCURSOR;
1129: if (yych != ';') goto yy18;
1130: ++YYCURSOR;
1131: {
1132: *p = YYCURSOR;
1133: INIT_PZVAL(*rval);
1134: ZVAL_BOOL(*rval, parse_iv(start + 2));
1135: return 1;
1136: }
1137: yy87:
1138: ++YYCURSOR;
1139: {
1140: *p = YYCURSOR;
1141: INIT_PZVAL(*rval);
1142: ZVAL_NULL(*rval);
1143: return 1;
1144: }
1145: yy89:
1146: yych = *++YYCURSOR;
1147: if (yych <= ',') {
1148: if (yych != '+') goto yy18;
1149: } else {
1150: if (yych <= '-') goto yy90;
1151: if (yych <= '/') goto yy18;
1152: if (yych <= '9') goto yy91;
1153: goto yy18;
1154: }
1155: yy90:
1156: yych = *++YYCURSOR;
1157: if (yych <= '/') goto yy18;
1158: if (yych >= ':') goto yy18;
1159: yy91:
1160: ++YYCURSOR;
1161: if (YYLIMIT <= YYCURSOR) YYFILL(1);
1162: yych = *YYCURSOR;
1163: if (yych <= '/') goto yy18;
1164: if (yych <= '9') goto yy91;
1165: if (yych != ';') goto yy18;
1166: ++YYCURSOR;
1167: {
1168: long id;
1169:
1170: *p = YYCURSOR;
1171: if (!var_hash) return 0;
1172:
1173: id = parse_iv(start + 2) - 1;
1174: if (id == -1 || var_access(var_hash, id, &rval_ref) != SUCCESS) {
1175: return 0;
1176: }
1177:
1178: if (*rval == *rval_ref) return 0;
1179:
1180: if (*rval != NULL) {
1.1.1.4 ! misho 1181: var_push_dtor_no_addref(var_hash, rval);
1.1 misho 1182: }
1183: *rval = *rval_ref;
1184: Z_ADDREF_PP(rval);
1185: Z_UNSET_ISREF_PP(rval);
1186:
1187: return 1;
1188: }
1189: yy95:
1190: yych = *++YYCURSOR;
1191: if (yych <= ',') {
1192: if (yych != '+') goto yy18;
1193: } else {
1194: if (yych <= '-') goto yy96;
1195: if (yych <= '/') goto yy18;
1196: if (yych <= '9') goto yy97;
1197: goto yy18;
1198: }
1199: yy96:
1200: yych = *++YYCURSOR;
1201: if (yych <= '/') goto yy18;
1202: if (yych >= ':') goto yy18;
1203: yy97:
1204: ++YYCURSOR;
1205: if (YYLIMIT <= YYCURSOR) YYFILL(1);
1206: yych = *YYCURSOR;
1207: if (yych <= '/') goto yy18;
1208: if (yych <= '9') goto yy97;
1209: if (yych != ';') goto yy18;
1210: ++YYCURSOR;
1211: {
1212: long id;
1213:
1214: *p = YYCURSOR;
1215: if (!var_hash) return 0;
1216:
1217: id = parse_iv(start + 2) - 1;
1218: if (id == -1 || var_access(var_hash, id, &rval_ref) != SUCCESS) {
1219: return 0;
1220: }
1221:
1222: if (*rval != NULL) {
1223: zval_ptr_dtor(rval);
1224: }
1225: *rval = *rval_ref;
1226: Z_ADDREF_PP(rval);
1227: Z_SET_ISREF_PP(rval);
1228:
1229: return 1;
1230: }
1231: }
1232:
1233:
1234: return 0;
1235: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>