mirror of
https://github.com/php/php-src.git
synced 2024-09-21 18:07:23 +00:00
d319098b24
Apparently, users expect `bindtextdomain` and `bind_textdomain_codeset` with `null` as second argument to work like their C counterparts, namely to return the previously set value. Thus, we support that. Closes GH-6631.
300 lines
7.3 KiB
C
300 lines
7.3 KiB
C
/*
|
|
+----------------------------------------------------------------------+
|
|
| Copyright (c) The PHP Group |
|
|
+----------------------------------------------------------------------+
|
|
| 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. |
|
|
+----------------------------------------------------------------------+
|
|
| Author: Alex Plotnick <alex@wgate.com> |
|
|
+----------------------------------------------------------------------+
|
|
*/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include "php.h"
|
|
|
|
#ifdef HAVE_LIBINTL
|
|
|
|
#include <stdio.h>
|
|
#include "ext/standard/info.h"
|
|
#include "php_gettext.h"
|
|
#include "gettext_arginfo.h"
|
|
|
|
#include <libintl.h>
|
|
|
|
zend_module_entry php_gettext_module_entry = {
|
|
STANDARD_MODULE_HEADER,
|
|
"gettext",
|
|
ext_functions,
|
|
NULL,
|
|
NULL,
|
|
NULL,
|
|
NULL,
|
|
PHP_MINFO(php_gettext),
|
|
PHP_GETTEXT_VERSION,
|
|
STANDARD_MODULE_PROPERTIES
|
|
};
|
|
|
|
#ifdef COMPILE_DL_GETTEXT
|
|
ZEND_GET_MODULE(php_gettext)
|
|
#endif
|
|
|
|
#define PHP_GETTEXT_MAX_DOMAIN_LENGTH 1024
|
|
#define PHP_GETTEXT_MAX_MSGID_LENGTH 4096
|
|
|
|
#define PHP_GETTEXT_DOMAIN_LENGTH_CHECK(_arg_num, domain_len) \
|
|
if (UNEXPECTED(domain_len > PHP_GETTEXT_MAX_DOMAIN_LENGTH)) { \
|
|
zend_argument_value_error(_arg_num, "is too long"); \
|
|
RETURN_THROWS(); \
|
|
}
|
|
|
|
#define PHP_GETTEXT_LENGTH_CHECK(_arg_num, check_len) \
|
|
if (UNEXPECTED(check_len > PHP_GETTEXT_MAX_MSGID_LENGTH)) { \
|
|
zend_argument_value_error(_arg_num, "is too long"); \
|
|
RETURN_THROWS(); \
|
|
}
|
|
|
|
PHP_MINFO_FUNCTION(php_gettext)
|
|
{
|
|
php_info_print_table_start();
|
|
php_info_print_table_row(2, "GetText Support", "enabled");
|
|
php_info_print_table_end();
|
|
}
|
|
|
|
/* {{{ Set the textdomain to "domain". Returns the current domain */
|
|
PHP_FUNCTION(textdomain)
|
|
{
|
|
char *domain = NULL, *domain_name, *retval;
|
|
size_t domain_len = 0;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "s!", &domain, &domain_len) == FAILURE) {
|
|
RETURN_THROWS();
|
|
}
|
|
|
|
PHP_GETTEXT_DOMAIN_LENGTH_CHECK(1, domain_len)
|
|
|
|
if (domain != NULL && strcmp(domain, "") && strcmp(domain, "0")) {
|
|
domain_name = domain;
|
|
} else {
|
|
domain_name = NULL;
|
|
}
|
|
|
|
retval = textdomain(domain_name);
|
|
|
|
RETURN_STRING(retval);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ Return the translation of msgid for the current domain, or msgid unaltered if a translation does not exist */
|
|
PHP_FUNCTION(gettext)
|
|
{
|
|
char *msgstr;
|
|
zend_string *msgid;
|
|
|
|
ZEND_PARSE_PARAMETERS_START(1, 1)
|
|
Z_PARAM_STR(msgid)
|
|
ZEND_PARSE_PARAMETERS_END();
|
|
|
|
PHP_GETTEXT_LENGTH_CHECK(1, ZSTR_LEN(msgid))
|
|
msgstr = gettext(ZSTR_VAL(msgid));
|
|
|
|
if (msgstr != ZSTR_VAL(msgid)) {
|
|
RETURN_STRING(msgstr);
|
|
} else {
|
|
RETURN_STR_COPY(msgid);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ Return the translation of msgid for domain_name, or msgid unaltered if a translation does not exist */
|
|
PHP_FUNCTION(dgettext)
|
|
{
|
|
char *msgstr;
|
|
zend_string *domain, *msgid;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "SS", &domain, &msgid) == FAILURE) {
|
|
RETURN_THROWS();
|
|
}
|
|
|
|
PHP_GETTEXT_DOMAIN_LENGTH_CHECK(1, ZSTR_LEN(domain))
|
|
PHP_GETTEXT_LENGTH_CHECK(2, ZSTR_LEN(msgid))
|
|
|
|
msgstr = dgettext(ZSTR_VAL(domain), ZSTR_VAL(msgid));
|
|
|
|
if (msgstr != ZSTR_VAL(msgid)) {
|
|
RETURN_STRING(msgstr);
|
|
} else {
|
|
RETURN_STR_COPY(msgid);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ Return the translation of msgid for domain_name and category, or msgid unaltered if a translation does not exist */
|
|
PHP_FUNCTION(dcgettext)
|
|
{
|
|
char *msgstr;
|
|
zend_string *domain, *msgid;
|
|
zend_long category;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "SSl", &domain, &msgid, &category) == FAILURE) {
|
|
RETURN_THROWS();
|
|
}
|
|
|
|
PHP_GETTEXT_DOMAIN_LENGTH_CHECK(1, ZSTR_LEN(domain))
|
|
PHP_GETTEXT_LENGTH_CHECK(2, ZSTR_LEN(msgid))
|
|
|
|
msgstr = dcgettext(ZSTR_VAL(domain), ZSTR_VAL(msgid), category);
|
|
|
|
if (msgstr != ZSTR_VAL(msgid)) {
|
|
RETURN_STRING(msgstr);
|
|
} else {
|
|
RETURN_STR_COPY(msgid);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ Bind to the text domain domain_name, looking for translations in dir. Returns the current domain */
|
|
PHP_FUNCTION(bindtextdomain)
|
|
{
|
|
char *domain, *dir = NULL;
|
|
size_t domain_len, dir_len;
|
|
char *retval, dir_name[MAXPATHLEN];
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "ss!", &domain, &domain_len, &dir, &dir_len) == FAILURE) {
|
|
RETURN_THROWS();
|
|
}
|
|
|
|
PHP_GETTEXT_DOMAIN_LENGTH_CHECK(1, domain_len)
|
|
|
|
if (domain[0] == '\0') {
|
|
zend_argument_value_error(1, "cannot be empty");
|
|
RETURN_THROWS();
|
|
}
|
|
|
|
if (dir == NULL) {
|
|
RETURN_STRING(bindtextdomain(domain, NULL));
|
|
}
|
|
|
|
if (dir[0] != '\0' && strcmp(dir, "0")) {
|
|
if (!VCWD_REALPATH(dir, dir_name)) {
|
|
RETURN_FALSE;
|
|
}
|
|
} else if (!VCWD_GETCWD(dir_name, MAXPATHLEN)) {
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
retval = bindtextdomain(domain, dir_name);
|
|
|
|
RETURN_STRING(retval);
|
|
}
|
|
/* }}} */
|
|
|
|
#ifdef HAVE_NGETTEXT
|
|
/* {{{ Plural version of gettext() */
|
|
PHP_FUNCTION(ngettext)
|
|
{
|
|
char *msgid1, *msgid2, *msgstr;
|
|
size_t msgid1_len, msgid2_len;
|
|
zend_long count;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "ssl", &msgid1, &msgid1_len, &msgid2, &msgid2_len, &count) == FAILURE) {
|
|
RETURN_THROWS();
|
|
}
|
|
|
|
PHP_GETTEXT_LENGTH_CHECK(1, msgid1_len)
|
|
PHP_GETTEXT_LENGTH_CHECK(2, msgid2_len)
|
|
|
|
msgstr = ngettext(msgid1, msgid2, count);
|
|
|
|
ZEND_ASSERT(msgstr);
|
|
RETURN_STRING(msgstr);
|
|
}
|
|
/* }}} */
|
|
#endif
|
|
|
|
#ifdef HAVE_DNGETTEXT
|
|
/* {{{ Plural version of dgettext() */
|
|
PHP_FUNCTION(dngettext)
|
|
{
|
|
char *domain, *msgid1, *msgid2, *msgstr = NULL;
|
|
size_t domain_len, msgid1_len, msgid2_len;
|
|
zend_long count;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "sssl", &domain, &domain_len,
|
|
&msgid1, &msgid1_len, &msgid2, &msgid2_len, &count) == FAILURE) {
|
|
RETURN_THROWS();
|
|
}
|
|
|
|
PHP_GETTEXT_DOMAIN_LENGTH_CHECK(1, domain_len)
|
|
PHP_GETTEXT_LENGTH_CHECK(2, msgid1_len)
|
|
PHP_GETTEXT_LENGTH_CHECK(3, msgid2_len)
|
|
|
|
msgstr = dngettext(domain, msgid1, msgid2, count);
|
|
|
|
ZEND_ASSERT(msgstr);
|
|
RETURN_STRING(msgstr);
|
|
}
|
|
/* }}} */
|
|
#endif
|
|
|
|
#ifdef HAVE_DCNGETTEXT
|
|
/* {{{ Plural version of dcgettext() */
|
|
PHP_FUNCTION(dcngettext)
|
|
{
|
|
char *domain, *msgid1, *msgid2, *msgstr = NULL;
|
|
size_t domain_len, msgid1_len, msgid2_len;
|
|
zend_long count, category;
|
|
|
|
RETVAL_FALSE;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "sssll", &domain, &domain_len,
|
|
&msgid1, &msgid1_len, &msgid2, &msgid2_len, &count, &category) == FAILURE) {
|
|
RETURN_THROWS();
|
|
}
|
|
|
|
PHP_GETTEXT_DOMAIN_LENGTH_CHECK(1, domain_len)
|
|
PHP_GETTEXT_LENGTH_CHECK(2, msgid1_len)
|
|
PHP_GETTEXT_LENGTH_CHECK(3, msgid2_len)
|
|
|
|
msgstr = dcngettext(domain, msgid1, msgid2, count, category);
|
|
|
|
ZEND_ASSERT(msgstr);
|
|
RETURN_STRING(msgstr);
|
|
}
|
|
/* }}} */
|
|
#endif
|
|
|
|
#ifdef HAVE_BIND_TEXTDOMAIN_CODESET
|
|
|
|
/* {{{ Specify the character encoding in which the messages from the DOMAIN message catalog will be returned. */
|
|
PHP_FUNCTION(bind_textdomain_codeset)
|
|
{
|
|
char *domain, *codeset = NULL, *retval = NULL;
|
|
size_t domain_len, codeset_len;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "ss!", &domain, &domain_len, &codeset, &codeset_len) == FAILURE) {
|
|
RETURN_THROWS();
|
|
}
|
|
|
|
PHP_GETTEXT_DOMAIN_LENGTH_CHECK(1, domain_len)
|
|
|
|
retval = bind_textdomain_codeset(domain, codeset);
|
|
|
|
if (!retval) {
|
|
RETURN_FALSE;
|
|
}
|
|
RETURN_STRING(retval);
|
|
}
|
|
/* }}} */
|
|
#endif
|
|
|
|
|
|
#endif /* HAVE_LIBINTL */
|