1 /*
2 +----------------------------------------------------------------------+
3 | PHP Version 5 |
4 +----------------------------------------------------------------------+
5 | This source file is subject to version 3.01 of the PHP license, |
6 | that is bundled with this package in the file LICENSE, and is |
7 | available through the world-wide-web at the following url: |
8 | http://www.php.net/license/3_01.txt |
9 | If you did not receive a copy of the PHP license and are unable to |
10 | obtain it through the world-wide-web, please send a note to |
11 | license@php.net so we can mail you a copy immediately. |
12 +----------------------------------------------------------------------+
13 | Authors: Stanislav Malyshev <stas@zend.com> |
14 +----------------------------------------------------------------------+
15 */
16
17 #ifdef HAVE_CONFIG_H
18 #include "config.h"
19 #endif
20
21 #include <unicode/ustring.h>
22
23 #include "php_intl.h"
24 #include "msgformat_class.h"
25 #include "msgformat_format.h"
26 #include "msgformat_data.h"
27 #include "msgformat_helpers.h"
28 #include "intl_convert.h"
29
30 #ifndef Z_ADDREF_P
31 #define Z_ADDREF_P(z) ((z)->refcount++)
32 #endif
33
34 /* {{{ */
msgfmt_do_format(MessageFormatter_object * mfo,zval * args,zval * return_value TSRMLS_DC)35 static void msgfmt_do_format(MessageFormatter_object *mfo, zval *args, zval *return_value TSRMLS_DC)
36 {
37 int count;
38 UChar* formatted = NULL;
39 int formatted_len = 0;
40 HashTable *args_copy;
41
42 count = zend_hash_num_elements(Z_ARRVAL_P(args));
43
44 ALLOC_HASHTABLE(args_copy);
45 zend_hash_init(args_copy, count, NULL, ZVAL_PTR_DTOR, 0);
46 zend_hash_copy(args_copy, Z_ARRVAL_P(args), (copy_ctor_func_t)zval_add_ref,
47 NULL, sizeof(zval*));
48
49 umsg_format_helper(mfo, args_copy, &formatted, &formatted_len TSRMLS_CC);
50
51 zend_hash_destroy(args_copy);
52 efree(args_copy);
53
54 if (formatted && U_FAILURE(INTL_DATA_ERROR_CODE(mfo))) {
55 efree(formatted);
56 }
57
58 if (U_FAILURE(INTL_DATA_ERROR_CODE(mfo))) {
59 RETURN_FALSE;
60 } else {
61 INTL_METHOD_RETVAL_UTF8(mfo, formatted, formatted_len, 1);
62 }
63 }
64 /* }}} */
65
66 /* {{{ proto mixed MessageFormatter::format( array $args )
67 * Format a message. }}} */
68 /* {{{ proto mixed msgfmt_format( MessageFormatter $nf, array $args )
69 * Format a message.
70 */
PHP_FUNCTION(msgfmt_format)71 PHP_FUNCTION( msgfmt_format )
72 {
73 zval *args;
74 MSG_FORMAT_METHOD_INIT_VARS;
75
76
77 /* Parse parameters. */
78 if( zend_parse_method_parameters( ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "Oa",
79 &object, MessageFormatter_ce_ptr, &args ) == FAILURE )
80 {
81 intl_error_set( NULL, U_ILLEGAL_ARGUMENT_ERROR,
82 "msgfmt_format: unable to parse input params", 0 TSRMLS_CC );
83
84 RETURN_FALSE;
85 }
86
87 /* Fetch the object. */
88 MSG_FORMAT_METHOD_FETCH_OBJECT;
89
90 msgfmt_do_format(mfo, args, return_value TSRMLS_CC);
91 }
92 /* }}} */
93
94 /* {{{ proto mixed MessageFormatter::formatMessage( string $locale, string $pattern, array $args )
95 * Format a message. }}} */
96 /* {{{ proto mixed msgfmt_format_message( string $locale, string $pattern, array $args )
97 * Format a message.
98 */
PHP_FUNCTION(msgfmt_format_message)99 PHP_FUNCTION( msgfmt_format_message )
100 {
101 zval *args;
102 UChar *spattern = NULL;
103 int spattern_len = 0;
104 char *pattern = NULL;
105 int pattern_len = 0;
106 const char *slocale = NULL;
107 int slocale_len = 0;
108 MessageFormatter_object mf = {0};
109 MessageFormatter_object *mfo = &mf;
110
111 /* Parse parameters. */
112 if( zend_parse_method_parameters( ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "ssa",
113 &slocale, &slocale_len, &pattern, &pattern_len, &args ) == FAILURE )
114 {
115 intl_error_set( NULL, U_ILLEGAL_ARGUMENT_ERROR,
116 "msgfmt_format_message: unable to parse input params", 0 TSRMLS_CC );
117
118 RETURN_FALSE;
119 }
120
121 msgformat_data_init(&mfo->mf_data TSRMLS_CC);
122
123 if(pattern && pattern_len) {
124 intl_convert_utf8_to_utf16(&spattern, &spattern_len, pattern, pattern_len, &INTL_DATA_ERROR_CODE(mfo));
125 if( U_FAILURE(INTL_DATA_ERROR_CODE((mfo))) )
126 {
127 intl_error_set( NULL, U_ILLEGAL_ARGUMENT_ERROR,
128 "msgfmt_format_message: error converting pattern to UTF-16", 0 TSRMLS_CC );
129 RETURN_FALSE;
130 }
131 } else {
132 spattern_len = 0;
133 spattern = NULL;
134 }
135
136 if(slocale_len == 0) {
137 slocale = intl_locale_get_default(TSRMLS_C);
138 }
139
140 #ifdef MSG_FORMAT_QUOTE_APOS
141 if(msgformat_fix_quotes(&spattern, &spattern_len, &INTL_DATA_ERROR_CODE(mfo)) != SUCCESS) {
142 intl_error_set( NULL, U_INVALID_FORMAT_ERROR,
143 "msgfmt_format_message: error converting pattern to quote-friendly format", 0 TSRMLS_CC );
144 RETURN_FALSE;
145 }
146 #endif
147
148 /* Create an ICU message formatter. */
149 MSG_FORMAT_OBJECT(mfo) = umsg_open(spattern, spattern_len, slocale, NULL, &INTL_DATA_ERROR_CODE(mfo));
150 if(spattern && spattern_len) {
151 efree(spattern);
152 }
153 INTL_METHOD_CHECK_STATUS(mfo, "Creating message formatter failed");
154
155 msgfmt_do_format(mfo, args, return_value TSRMLS_CC);
156
157 /* drop the temporary formatter */
158 msgformat_data_free(&mfo->mf_data TSRMLS_CC);
159 }
160 /* }}} */
161
162 /*
163 * Local variables:
164 * tab-width: 4
165 * c-basic-offset: 4
166 * End:
167 * vim600: noet sw=4 ts=4 fdm=marker
168 * vim<600: noet sw=4 ts=4
169 */
170