root/ext/intl/resourcebundle/resourcebundle.c

DEFINITIONS

1. resourcebundle_extract_value

/*
   +----------------------------------------------------------------------+
   | 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 <unicode/ures.h>

#include <zend.h>
#include <zend_API.h>

#include "intl_convert.h"
#include "intl_data.h"
#include "resourcebundle/resourcebundle_class.h"

/* {{{ ResourceBundle_extract_value */
void resourcebundle_extract_value( zval *return_value, ResourceBundle_object *source TSRMLS_DC ) 
{
        UResType               restype;
        const UChar*           ufield;
        const uint8_t*         bfield;
        const int32_t*         vfield;
        int32_t                ilen;
        int                    i;
        long                   lfield;
        ResourceBundle_object* newrb;

        restype = ures_getType( source->child );
        switch (restype)
        {
                case URES_STRING:
                        ufield = ures_getString( source->child, &ilen, &INTL_DATA_ERROR_CODE(source) );
                        INTL_METHOD_CHECK_STATUS(source, "Failed to retrieve string value");
                        INTL_METHOD_RETVAL_UTF8(source, (UChar *)ufield, ilen, 0);
                        break;

                case URES_BINARY:
                        bfield = ures_getBinary( source->child, &ilen, &INTL_DATA_ERROR_CODE(source) );
                        INTL_METHOD_CHECK_STATUS(source, "Failed to retrieve binary value");
                        ZVAL_STRINGL( return_value, (char *) bfield, ilen, 1 );
                        break;

                case URES_INT:
                        lfield = ures_getInt( source->child, &INTL_DATA_ERROR_CODE(source) );
                        INTL_METHOD_CHECK_STATUS(source, "Failed to retrieve integer value");
                        ZVAL_LONG( return_value, lfield );
                        break;

                case URES_INT_VECTOR:
                        vfield = ures_getIntVector( source->child, &ilen, &INTL_DATA_ERROR_CODE(source) );
                        INTL_METHOD_CHECK_STATUS(source, "Failed to retrieve vector value");
                        array_init( return_value );
                        for (i=0; i<ilen; i++) {
                                add_next_index_long( return_value, vfield[i] );
                        }
                        break;

                case URES_ARRAY:
                case URES_TABLE:
                        object_init_ex( return_value, ResourceBundle_ce_ptr );
                        newrb = (ResourceBundle_object *) zend_object_store_get_object( return_value TSRMLS_CC );
                        newrb->me = source->child;
                        source->child = NULL;
                        intl_errors_reset(INTL_DATA_ERROR_P(source) TSRMLS_CC);
                        break;

                default:
                        intl_errors_set(INTL_DATA_ERROR_P(source), U_ILLEGAL_ARGUMENT_ERROR, "Unknown resource type", 0 TSRMLS_CC);
                        RETURN_FALSE;
                        break;
        }
}
/* }}} */

/*
 * 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
 */