mirror of
https://github.com/php/php-src.git
synced 2024-09-30 22:36:12 +00:00
1dd07d6bf4
The address of $this passed to drectly called internal constructor in execute_data->return_value. Internal constructors should use ZEND_CTOR_MAKE_NULL() macro (insted of previous ZEND_NULL(EG(This))) to do the work. This patch doesn't fix the problem for indirectly called constructors. e.g. parant::__construct().
461 lines
15 KiB
C
461 lines
15 KiB
C
/*
|
|
+----------------------------------------------------------------------+
|
|
| PHP Version 5 |
|
|
+----------------------------------------------------------------------+
|
|
| This source file is subject to version 3.01 of the PHP license, |
|
|
| that is bundled with this package in the file LICENSE, and is |
|
|
| available through the world-wide-web at the following url: |
|
|
| http://www.php.net/license/3_01.txt |
|
|
| If you did not receive a copy of the PHP license and are unable to |
|
|
| obtain it through the world-wide-web, please send a note to |
|
|
| license@php.net so we can mail you a copy immediately. |
|
|
+----------------------------------------------------------------------+
|
|
| Authors: Hans-Peter Oeri (University of St.Gallen) <hp@oeri.ch> |
|
|
+----------------------------------------------------------------------+
|
|
*/
|
|
|
|
#include <stdlib.h>
|
|
#include <unicode/ures.h>
|
|
#include <unicode/uenum.h>
|
|
|
|
#include <zend.h>
|
|
#include <Zend/zend_exceptions.h>
|
|
#include <Zend/zend_interfaces.h>
|
|
#include <php.h>
|
|
|
|
#include "php_intl.h"
|
|
#include "intl_data.h"
|
|
|
|
#include "resourcebundle/resourcebundle.h"
|
|
#include "resourcebundle/resourcebundle_iterator.h"
|
|
#include "resourcebundle/resourcebundle_class.h"
|
|
|
|
zend_class_entry *ResourceBundle_ce_ptr = NULL;
|
|
|
|
static zend_object_handlers ResourceBundle_object_handlers;
|
|
|
|
/* {{{ ResourceBundle_object_dtor */
|
|
static void ResourceBundle_object_destroy( zend_object *object TSRMLS_DC )
|
|
{
|
|
ResourceBundle_object *rb = php_intl_resourcebundle_fetch_object(object);
|
|
|
|
// only free local errors
|
|
intl_error_reset( INTL_DATA_ERROR_P(rb) TSRMLS_CC );
|
|
|
|
if (rb->me) {
|
|
ures_close( rb->me );
|
|
}
|
|
if (rb->child) {
|
|
ures_close( rb->child );
|
|
}
|
|
|
|
//???zend_object_std_dtor( object TSRMLS_CC );
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ ResourceBundle_object_create */
|
|
static zend_object *ResourceBundle_object_create( zend_class_entry *ce TSRMLS_DC )
|
|
{
|
|
ResourceBundle_object *rb;
|
|
|
|
rb = ecalloc( 1, sizeof(ResourceBundle_object) + sizeof(zval) * (ce->default_properties_count - 1) );
|
|
|
|
zend_object_std_init( &rb->zend, ce TSRMLS_CC );
|
|
object_properties_init( &rb->zend, ce);
|
|
|
|
intl_error_init( INTL_DATA_ERROR_P(rb) TSRMLS_CC );
|
|
rb->me = NULL;
|
|
rb->child = NULL;
|
|
|
|
rb->zend.handlers = &ResourceBundle_object_handlers;
|
|
|
|
return &rb->zend;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ ResourceBundle_ctor */
|
|
static void resourcebundle_ctor(INTERNAL_FUNCTION_PARAMETERS)
|
|
{
|
|
const char *bundlename;
|
|
int bundlename_len = 0;
|
|
const char *locale;
|
|
int locale_len = 0;
|
|
zend_bool fallback = 1;
|
|
|
|
zval *object = return_value;
|
|
ResourceBundle_object *rb = Z_INTL_RESOURCEBUNDLE_P( object );
|
|
|
|
intl_error_reset( NULL TSRMLS_CC );
|
|
|
|
if( zend_parse_parameters( ZEND_NUM_ARGS() TSRMLS_CC, "s!s!|b",
|
|
&locale, &locale_len, &bundlename, &bundlename_len, &fallback ) == FAILURE )
|
|
{
|
|
intl_error_set( NULL, U_ILLEGAL_ARGUMENT_ERROR,
|
|
"resourcebundle_ctor: unable to parse input parameters", 0 TSRMLS_CC );
|
|
Z_OBJ_P(return_value) = NULL;
|
|
return;
|
|
}
|
|
|
|
INTL_CHECK_LOCALE_LEN_OBJ(locale_len, return_value);
|
|
|
|
if (locale == NULL) {
|
|
locale = intl_locale_get_default(TSRMLS_C);
|
|
}
|
|
|
|
if (fallback) {
|
|
rb->me = ures_open(bundlename, locale, &INTL_DATA_ERROR_CODE(rb));
|
|
} else {
|
|
rb->me = ures_openDirect(bundlename, locale, &INTL_DATA_ERROR_CODE(rb));
|
|
}
|
|
|
|
INTL_CTOR_CHECK_STATUS(rb, "resourcebundle_ctor: Cannot load libICU resource bundle");
|
|
|
|
if (!fallback && (INTL_DATA_ERROR_CODE(rb) == U_USING_FALLBACK_WARNING ||
|
|
INTL_DATA_ERROR_CODE(rb) == U_USING_DEFAULT_WARNING)) {
|
|
char *pbuf;
|
|
intl_errors_set_code(NULL, INTL_DATA_ERROR_CODE(rb) TSRMLS_CC);
|
|
spprintf(&pbuf, 0, "resourcebundle_ctor: Cannot load libICU resource "
|
|
"'%s' without fallback from %s to %s",
|
|
bundlename ? bundlename : "(default data)", locale,
|
|
ures_getLocaleByType(
|
|
rb->me, ULOC_ACTUAL_LOCALE, &INTL_DATA_ERROR_CODE(rb)));
|
|
intl_errors_set_custom_msg(INTL_DATA_ERROR_P(rb), pbuf, 1 TSRMLS_CC);
|
|
efree(pbuf);
|
|
Z_OBJ_P(return_value) = NULL;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ arginfo_resourcebundle__construct */
|
|
ZEND_BEGIN_ARG_INFO_EX( arginfo_resourcebundle___construct, 0, 0, 2 )
|
|
ZEND_ARG_INFO( 0, locale )
|
|
ZEND_ARG_INFO( 0, bundlename )
|
|
ZEND_ARG_INFO( 0, fallback )
|
|
ZEND_END_ARG_INFO()
|
|
/* }}} */
|
|
|
|
/* {{{ proto void ResourceBundle::__construct( string $locale [, string $bundlename [, bool $fallback = true ]] )
|
|
* ResourceBundle object constructor
|
|
*/
|
|
PHP_METHOD( ResourceBundle, __construct )
|
|
{
|
|
zval orig_this = *getThis();
|
|
|
|
return_value = getThis();
|
|
resourcebundle_ctor(INTERNAL_FUNCTION_PARAM_PASSTHRU);
|
|
|
|
if (Z_TYPE_P(return_value) == IS_OBJECT && Z_OBJ_P(return_value) == NULL) {
|
|
zend_object_store_ctor_failed(Z_OBJ(orig_this) TSRMLS_CC);
|
|
zval_dtor(&orig_this);
|
|
ZEND_CTOR_MAKE_NULL();
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto ResourceBundle ResourceBundle::create( string $locale [, string $bundlename [, bool $fallback = true ]] )
|
|
proto ResourceBundle resourcebundle_create( string $locale [, string $bundlename [, bool $fallback = true ]] )
|
|
*/
|
|
PHP_FUNCTION( resourcebundle_create )
|
|
{
|
|
object_init_ex( return_value, ResourceBundle_ce_ptr );
|
|
resourcebundle_ctor(INTERNAL_FUNCTION_PARAM_PASSTHRU);
|
|
if (Z_TYPE_P(return_value) == IS_OBJECT && Z_OBJ_P(return_value) == NULL) {
|
|
RETURN_NULL();
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ resourcebundle_array_fetch */
|
|
static void resourcebundle_array_fetch(zval *object, zval *offset, zval *return_value, int fallback TSRMLS_DC)
|
|
{
|
|
int32_t meindex = 0;
|
|
char * mekey = NULL;
|
|
zend_bool is_numeric = 0;
|
|
char *pbuf;
|
|
ResourceBundle_object *rb;
|
|
|
|
intl_error_reset( NULL TSRMLS_CC );
|
|
RESOURCEBUNDLE_METHOD_FETCH_OBJECT;
|
|
|
|
if(Z_TYPE_P(offset) == IS_LONG) {
|
|
is_numeric = 1;
|
|
meindex = Z_LVAL_P(offset);
|
|
rb->child = ures_getByIndex( rb->me, meindex, rb->child, &INTL_DATA_ERROR_CODE(rb) );
|
|
} else if(Z_TYPE_P(offset) == IS_STRING) {
|
|
mekey = Z_STRVAL_P(offset);
|
|
rb->child = ures_getByKey(rb->me, mekey, rb->child, &INTL_DATA_ERROR_CODE(rb) );
|
|
} else {
|
|
intl_errors_set(INTL_DATA_ERROR_P(rb), U_ILLEGAL_ARGUMENT_ERROR,
|
|
"resourcebundle_get: index should be integer or string", 0 TSRMLS_CC);
|
|
RETURN_NULL();
|
|
}
|
|
|
|
intl_error_set_code( NULL, INTL_DATA_ERROR_CODE(rb) TSRMLS_CC );
|
|
if (U_FAILURE(INTL_DATA_ERROR_CODE(rb))) {
|
|
if (is_numeric) {
|
|
spprintf( &pbuf, 0, "Cannot load resource element %d", meindex );
|
|
} else {
|
|
spprintf( &pbuf, 0, "Cannot load resource element '%s'", mekey );
|
|
}
|
|
intl_errors_set_custom_msg( INTL_DATA_ERROR_P(rb), pbuf, 1 TSRMLS_CC );
|
|
efree(pbuf);
|
|
RETURN_NULL();
|
|
}
|
|
|
|
if (!fallback && (INTL_DATA_ERROR_CODE(rb) == U_USING_FALLBACK_WARNING || INTL_DATA_ERROR_CODE(rb) == U_USING_DEFAULT_WARNING)) {
|
|
UErrorCode icuerror;
|
|
const char * locale = ures_getLocaleByType( rb->me, ULOC_ACTUAL_LOCALE, &icuerror );
|
|
if (is_numeric) {
|
|
spprintf( &pbuf, 0, "Cannot load element %d without fallback from to %s", meindex, locale );
|
|
} else {
|
|
spprintf( &pbuf, 0, "Cannot load element '%s' without fallback from to %s", mekey, locale );
|
|
}
|
|
intl_errors_set_custom_msg( INTL_DATA_ERROR_P(rb), pbuf, 1 TSRMLS_CC );
|
|
efree(pbuf);
|
|
RETURN_NULL();
|
|
}
|
|
|
|
resourcebundle_extract_value( return_value, rb TSRMLS_CC );
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ resourcebundle_array_get */
|
|
zval *resourcebundle_array_get(zval *object, zval *offset, int type, zval *rv TSRMLS_DC)
|
|
{
|
|
if(offset == NULL) {
|
|
php_error( E_ERROR, "Cannot apply [] to ResourceBundle object" );
|
|
}
|
|
ZVAL_NULL(rv);
|
|
resourcebundle_array_fetch(object, offset, rv, 1 TSRMLS_CC);
|
|
return rv;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ arginfo_resourcebundle_get */
|
|
ZEND_BEGIN_ARG_INFO_EX( arginfo_resourcebundle_get, 0, 0, 1 )
|
|
ZEND_ARG_INFO( 0, index )
|
|
ZEND_ARG_INFO( 0, fallback )
|
|
ZEND_END_ARG_INFO()
|
|
/* }}} */
|
|
|
|
/* {{{ proto mixed ResourceBundle::get( integer|string $resindex [, bool $fallback = true ] )
|
|
* proto mixed resourcebundle_get( ResourceBundle $rb, integer|string $resindex [, bool $fallback = true ] )
|
|
* Get resource identified by numerical index or key name.
|
|
*/
|
|
PHP_FUNCTION( resourcebundle_get )
|
|
{
|
|
zend_bool fallback = 1;
|
|
zval * offset;
|
|
zval * object;
|
|
|
|
if (zend_parse_method_parameters(ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "Oz|b", &object, ResourceBundle_ce_ptr, &offset, &fallback ) == FAILURE) {
|
|
intl_error_set(NULL, U_ILLEGAL_ARGUMENT_ERROR,
|
|
"resourcebundle_get: unable to parse input params", 0 TSRMLS_CC);
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
resourcebundle_array_fetch(object, offset, return_value, fallback TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ resourcebundle_array_count */
|
|
int resourcebundle_array_count(zval *object, long *count TSRMLS_DC)
|
|
{
|
|
ResourceBundle_object *rb;
|
|
RESOURCEBUNDLE_METHOD_FETCH_OBJECT_NO_CHECK;
|
|
|
|
if (rb->me == NULL) {
|
|
intl_errors_set(&rb->error, U_ILLEGAL_ARGUMENT_ERROR,
|
|
"Found unconstructed ResourceBundle", 0 TSRMLS_CC);
|
|
return 0;
|
|
}
|
|
|
|
*count = ures_getSize( rb->me );
|
|
|
|
return SUCCESS;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ arginfo_resourcebundle_count */
|
|
ZEND_BEGIN_ARG_INFO_EX( arginfo_resourcebundle_count, 0, 0, 0 )
|
|
ZEND_END_ARG_INFO()
|
|
/* }}} */
|
|
|
|
/* {{{ proto int ResourceBundle::count()
|
|
* proto int resourcebundle_count( ResourceBundle $bundle )
|
|
* Get resources count
|
|
*/
|
|
PHP_FUNCTION( resourcebundle_count )
|
|
{
|
|
int32_t len;
|
|
RESOURCEBUNDLE_METHOD_INIT_VARS;
|
|
|
|
if( zend_parse_method_parameters( ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "O", &object, ResourceBundle_ce_ptr ) == FAILURE ) {
|
|
intl_error_set(NULL, U_ILLEGAL_ARGUMENT_ERROR,
|
|
"resourcebundle_count: unable to parse input params", 0 TSRMLS_CC);
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
RESOURCEBUNDLE_METHOD_FETCH_OBJECT;
|
|
|
|
len = ures_getSize( rb->me );
|
|
RETURN_LONG( len );
|
|
}
|
|
|
|
/* {{{ arginfo_resourcebundle_getlocales */
|
|
ZEND_BEGIN_ARG_INFO_EX( arginfo_resourcebundle_getlocales, 0, 0, 1 )
|
|
ZEND_ARG_INFO( 0, bundlename )
|
|
ZEND_END_ARG_INFO()
|
|
/* }}} */
|
|
|
|
/* {{{ proto array ResourceBundle::getLocales( string $bundlename )
|
|
* proto array resourcebundle_locales( string $bundlename )
|
|
* Get available locales from ResourceBundle name
|
|
*/
|
|
PHP_FUNCTION( resourcebundle_locales )
|
|
{
|
|
char * bundlename;
|
|
int bundlename_len = 0;
|
|
const char * entry;
|
|
int entry_len;
|
|
UEnumeration *icuenum;
|
|
UErrorCode icuerror = U_ZERO_ERROR;
|
|
|
|
intl_errors_reset( NULL TSRMLS_CC );
|
|
|
|
if( zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &bundlename, &bundlename_len ) == FAILURE )
|
|
{
|
|
intl_error_set(NULL, U_ILLEGAL_ARGUMENT_ERROR,
|
|
"resourcebundle_locales: unable to parse input params", 0 TSRMLS_CC);
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
if(bundlename_len == 0) {
|
|
// fetch default locales list
|
|
bundlename = NULL;
|
|
}
|
|
|
|
icuenum = ures_openAvailableLocales( bundlename, &icuerror );
|
|
INTL_CHECK_STATUS(icuerror, "Cannot fetch locales list");
|
|
|
|
uenum_reset( icuenum, &icuerror );
|
|
INTL_CHECK_STATUS(icuerror, "Cannot iterate locales list");
|
|
|
|
array_init( return_value );
|
|
while ((entry = uenum_next( icuenum, &entry_len, &icuerror ))) {
|
|
add_next_index_stringl( return_value, (char *) entry, entry_len);
|
|
}
|
|
uenum_close( icuenum );
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ arginfo_resourcebundle_get_error_code */
|
|
ZEND_BEGIN_ARG_INFO_EX( arginfo_resourcebundle_get_error_code, 0, 0, 0 )
|
|
ZEND_END_ARG_INFO()
|
|
/* }}} */
|
|
|
|
/* {{{ proto string ResourceBundle::getErrorCode( )
|
|
* proto string resourcebundle_get_error_code( ResourceBundle $bundle )
|
|
* Get text description for ResourceBundle's last error code.
|
|
*/
|
|
PHP_FUNCTION( resourcebundle_get_error_code )
|
|
{
|
|
RESOURCEBUNDLE_METHOD_INIT_VARS;
|
|
|
|
if( zend_parse_method_parameters( ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "O",
|
|
&object, ResourceBundle_ce_ptr ) == FAILURE )
|
|
{
|
|
intl_error_set( NULL, U_ILLEGAL_ARGUMENT_ERROR,
|
|
"resourcebundle_get_error_code: unable to parse input params", 0 TSRMLS_CC );
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
rb = Z_INTL_RESOURCEBUNDLE_P( object );
|
|
|
|
RETURN_LONG(INTL_DATA_ERROR_CODE(rb));
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ arginfo_resourcebundle_get_error_message */
|
|
ZEND_BEGIN_ARG_INFO_EX( arginfo_resourcebundle_get_error_message, 0, 0, 0 )
|
|
ZEND_END_ARG_INFO()
|
|
/* }}} */
|
|
|
|
/* {{{ proto string ResourceBundle::getErrorMessage( )
|
|
* proto string resourcebundle_get_error_message( ResourceBundle $bundle )
|
|
* Get text description for ResourceBundle's last error.
|
|
*/
|
|
PHP_FUNCTION( resourcebundle_get_error_message )
|
|
{
|
|
zend_string* message = NULL;
|
|
RESOURCEBUNDLE_METHOD_INIT_VARS;
|
|
|
|
if( zend_parse_method_parameters( ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "O",
|
|
&object, ResourceBundle_ce_ptr ) == FAILURE )
|
|
{
|
|
intl_error_set( NULL, U_ILLEGAL_ARGUMENT_ERROR,
|
|
"resourcebundle_get_error_message: unable to parse input params", 0 TSRMLS_CC );
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
rb = Z_INTL_RESOURCEBUNDLE_P( object );
|
|
message = intl_error_get_message(INTL_DATA_ERROR_P(rb) TSRMLS_CC);
|
|
RETURN_STR(message);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ ResourceBundle_class_functions
|
|
* Every 'ResourceBundle' class method has an entry in this table
|
|
*/
|
|
static zend_function_entry ResourceBundle_class_functions[] = {
|
|
PHP_ME( ResourceBundle, __construct, arginfo_resourcebundle___construct, ZEND_ACC_PUBLIC|ZEND_ACC_CTOR )
|
|
ZEND_NAMED_ME( create, ZEND_FN( resourcebundle_create ), arginfo_resourcebundle___construct, ZEND_ACC_PUBLIC|ZEND_ACC_STATIC )
|
|
ZEND_NAMED_ME( get, ZEND_FN(resourcebundle_get), arginfo_resourcebundle_get, ZEND_ACC_PUBLIC )
|
|
ZEND_NAMED_ME( count, ZEND_FN(resourcebundle_count), arginfo_resourcebundle_count, ZEND_ACC_PUBLIC )
|
|
ZEND_NAMED_ME( getLocales, ZEND_FN(resourcebundle_locales), arginfo_resourcebundle_getlocales, ZEND_ACC_PUBLIC | ZEND_ACC_STATIC )
|
|
ZEND_NAMED_ME( getErrorCode, ZEND_FN(resourcebundle_get_error_code), arginfo_resourcebundle_get_error_code, ZEND_ACC_PUBLIC )
|
|
ZEND_NAMED_ME( getErrorMessage, ZEND_FN(resourcebundle_get_error_message), arginfo_resourcebundle_get_error_message, ZEND_ACC_PUBLIC )
|
|
PHP_FE_END
|
|
};
|
|
/* }}} */
|
|
|
|
/* {{{ resourcebundle_register_class
|
|
* Initialize 'ResourceBundle' class
|
|
*/
|
|
void resourcebundle_register_class( TSRMLS_D )
|
|
{
|
|
zend_class_entry ce;
|
|
|
|
INIT_CLASS_ENTRY( ce, "ResourceBundle", ResourceBundle_class_functions );
|
|
|
|
ce.create_object = ResourceBundle_object_create;
|
|
ce.get_iterator = resourcebundle_get_iterator;
|
|
|
|
ResourceBundle_ce_ptr = zend_register_internal_class( &ce TSRMLS_CC );
|
|
|
|
if( !ResourceBundle_ce_ptr )
|
|
{
|
|
zend_error(E_ERROR, "Failed to register ResourceBundle class");
|
|
return;
|
|
}
|
|
|
|
ResourceBundle_object_handlers = std_object_handlers;
|
|
ResourceBundle_object_handlers.offset = XtOffsetOf(ResourceBundle_object, zend);
|
|
ResourceBundle_object_handlers.clone_obj = NULL; /* ICU ResourceBundle has no clone implementation */
|
|
ResourceBundle_object_handlers.dtor_obj = ResourceBundle_object_destroy;
|
|
ResourceBundle_object_handlers.read_dimension = resourcebundle_array_get;
|
|
ResourceBundle_object_handlers.count_elements = resourcebundle_array_count;
|
|
|
|
zend_class_implements(ResourceBundle_ce_ptr TSRMLS_CC, 1, zend_ce_traversable);
|
|
}
|
|
/* }}} */
|
|
|
|
/*
|
|
* Local variables:
|
|
* tab-width: 4
|
|
* c-basic-offset: 4
|
|
* End:
|
|
* vim600: noet sw=4 ts=4 fdm=marker
|
|
* vim<600: noet sw=4 ts=4
|
|
*/
|