xref: /PHP-5.4/ext/spl/spl_functions.c (revision c0d060f5)
1 /*
2    +----------------------------------------------------------------------+
3    | PHP Version 5                                                        |
4    +----------------------------------------------------------------------+
5    | Copyright (c) 1997-2014 The PHP Group                                |
6    +----------------------------------------------------------------------+
7    | This source file is subject to version 3.01 of the PHP license,      |
8    | that is bundled with this package in the file LICENSE, and is        |
9    | available through the world-wide-web at the following url:           |
10    | http://www.php.net/license/3_01.txt                                  |
11    | If you did not receive a copy of the PHP license and are unable to   |
12    | obtain it through the world-wide-web, please send a note to          |
13    | license@php.net so we can mail you a copy immediately.               |
14    +----------------------------------------------------------------------+
15    | Authors: Marcus Boerger <helly@php.net>                              |
16    +----------------------------------------------------------------------+
17  */
18 
19 /* $Id$ */
20 
21 #ifdef HAVE_CONFIG_H
22 	#include "config.h"
23 #endif
24 
25 #include "php.h"
26 #include "php_ini.h"
27 #include "ext/standard/info.h"
28 #include "php_spl.h"
29 
30 /* {{{ spl_register_interface */
spl_register_interface(zend_class_entry ** ppce,char * class_name,const zend_function_entry * functions TSRMLS_DC)31 void spl_register_interface(zend_class_entry ** ppce, char * class_name, const zend_function_entry * functions TSRMLS_DC)
32 {
33 	zend_class_entry ce;
34 
35 	INIT_CLASS_ENTRY_EX(ce, class_name, strlen(class_name), functions);
36 	*ppce = zend_register_internal_interface(&ce TSRMLS_CC);
37 }
38 /* }}} */
39 
40 /* {{{ spl_register_std_class */
spl_register_std_class(zend_class_entry ** ppce,char * class_name,void * obj_ctor,const zend_function_entry * function_list TSRMLS_DC)41 PHPAPI void spl_register_std_class(zend_class_entry ** ppce, char * class_name, void * obj_ctor, const zend_function_entry * function_list TSRMLS_DC)
42 {
43 	zend_class_entry ce;
44 
45 	INIT_CLASS_ENTRY_EX(ce, class_name, strlen(class_name), function_list);
46 	*ppce = zend_register_internal_class(&ce TSRMLS_CC);
47 
48 	/* entries changed by initialize */
49 	if (obj_ctor) {
50 		(*ppce)->create_object = obj_ctor;
51 	}
52 }
53 /* }}} */
54 
55 /* {{{ spl_register_sub_class */
spl_register_sub_class(zend_class_entry ** ppce,zend_class_entry * parent_ce,char * class_name,void * obj_ctor,const zend_function_entry * function_list TSRMLS_DC)56 PHPAPI void spl_register_sub_class(zend_class_entry ** ppce, zend_class_entry * parent_ce, char * class_name, void *obj_ctor, const zend_function_entry * function_list TSRMLS_DC)
57 {
58 	zend_class_entry ce;
59 
60 	INIT_CLASS_ENTRY_EX(ce, class_name, strlen(class_name), function_list);
61 	*ppce = zend_register_internal_class_ex(&ce, parent_ce, NULL TSRMLS_CC);
62 
63 	/* entries changed by initialize */
64 	if (obj_ctor) {
65 		(*ppce)->create_object = obj_ctor;
66 	} else {
67 		(*ppce)->create_object = parent_ce->create_object;
68 	}
69 }
70 /* }}} */
71 
72 /* {{{ spl_register_property */
spl_register_property(zend_class_entry * class_entry,char * prop_name,int prop_name_len,int prop_flags TSRMLS_DC)73 void spl_register_property( zend_class_entry * class_entry, char *prop_name, int prop_name_len, int prop_flags TSRMLS_DC)
74 {
75 	zend_declare_property_null(class_entry, prop_name, prop_name_len, prop_flags TSRMLS_CC);
76 }
77 /* }}} */
78 
79 /* {{{ spl_add_class_name */
spl_add_class_name(zval * list,zend_class_entry * pce,int allow,int ce_flags TSRMLS_DC)80 void spl_add_class_name(zval *list, zend_class_entry * pce, int allow, int ce_flags TSRMLS_DC)
81 {
82 	if (!allow || (allow > 0 && pce->ce_flags & ce_flags) || (allow < 0 && !(pce->ce_flags & ce_flags))) {
83 		size_t len = pce->name_length;
84 		zval *tmp;
85 
86 		if (zend_hash_find(Z_ARRVAL_P(list), pce->name, len+1, (void*)&tmp) == FAILURE) {
87 			MAKE_STD_ZVAL(tmp);
88 			ZVAL_STRINGL(tmp, pce->name, pce->name_length, 1);
89 			zend_hash_add(Z_ARRVAL_P(list), pce->name, len+1, &tmp, sizeof(zval *), NULL);
90 		}
91 	}
92 }
93 /* }}} */
94 
95 /* {{{ spl_add_interfaces */
spl_add_interfaces(zval * list,zend_class_entry * pce,int allow,int ce_flags TSRMLS_DC)96 void spl_add_interfaces(zval *list, zend_class_entry * pce, int allow, int ce_flags TSRMLS_DC)
97 {
98 	zend_uint num_interfaces;
99 
100 	for (num_interfaces = 0; num_interfaces < pce->num_interfaces; num_interfaces++) {
101 		spl_add_class_name(list, pce->interfaces[num_interfaces], allow, ce_flags TSRMLS_CC);
102 	}
103 }
104 /* }}} */
105 
106 /* {{{ spl_add_traits */
spl_add_traits(zval * list,zend_class_entry * pce,int allow,int ce_flags TSRMLS_DC)107 void spl_add_traits(zval *list, zend_class_entry * pce, int allow, int ce_flags TSRMLS_DC)
108 {
109 	zend_uint num_traits;
110 
111 	for (num_traits = 0; num_traits < pce->num_traits; num_traits++) {
112 		spl_add_class_name(list, pce->traits[num_traits], allow, ce_flags TSRMLS_CC);
113 	}
114 }
115 /* }}} */
116 
117 
118 /* {{{ spl_add_classes */
spl_add_classes(zend_class_entry * pce,zval * list,int sub,int allow,int ce_flags TSRMLS_DC)119 int spl_add_classes(zend_class_entry *pce, zval *list, int sub, int allow, int ce_flags TSRMLS_DC)
120 {
121 	if (!pce) {
122 		return 0;
123 	}
124 	spl_add_class_name(list, pce, allow, ce_flags TSRMLS_CC);
125 	if (sub) {
126 		spl_add_interfaces(list, pce, allow, ce_flags TSRMLS_CC);
127 		while (pce->parent) {
128 			pce = pce->parent;
129 			spl_add_classes(pce, list, sub, allow, ce_flags TSRMLS_CC);
130 		}
131 	}
132 	return 0;
133 }
134 /* }}} */
135 
spl_gen_private_prop_name(zend_class_entry * ce,char * prop_name,int prop_len,int * name_len TSRMLS_DC)136 char * spl_gen_private_prop_name(zend_class_entry *ce, char *prop_name, int prop_len, int *name_len TSRMLS_DC) /* {{{ */
137 {
138 	char *rv;
139 
140 	zend_mangle_property_name(&rv, name_len, ce->name, ce->name_length, prop_name, prop_len, 0);
141 
142 	return rv;
143 }
144 /* }}} */
145 
146 /*
147  * Local variables:
148  * tab-width: 4
149  * c-basic-offset: 4
150  * End:
151  * vim600: fdm=marker
152  * vim: noet sw=4 ts=4
153  */
154