root/ext/spl/spl_functions.c

DEFINITIONS

1. spl_register_interface
2. spl_register_std_class
3. spl_register_sub_class
4. spl_register_property
5. spl_add_class_name
6. spl_add_interfaces
7. spl_add_traits
8. spl_add_classes
9. spl_gen_private_prop_name

   1 /*
   2    +----------------------------------------------------------------------+
   3    | PHP Version 5                                                        |
   4    +----------------------------------------------------------------------+
   5    | Copyright (c) 1997-2016 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 */
  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 */
  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 */
  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 */
  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 */
  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 */
  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 */
 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 */
 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 
 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  */