mirror of
https://github.com/php/php-src.git
synced 2025-08-16 05:58:45 +02:00
0221ceeccd
According to POSIX, bindtextdomain() returns "the implementation-
defined default directory pathname used by the gettext family of
functions" when its second parameter is NULL (i.e. when you are
querying the directory corresponding to some text domain and that
directory has not yet been set). Its PHP counterpart is feeding
that result direclty to RETURN_STRING, but this can go wrong in
two ways:
1. If an error occurs, even POSIX-compliant implementations
may return NULL.
2. At least one non-compliant implementation (musl) lacks
a default directory and returns NULL whenever the domain
has not yet been bound.
In either of those cases, PHP segfaults on the NULL string. In this
commit we check for the NULL, and RETURN_FALSE when it happens rather
than crashing.
This partially addresses GH #13696
313 lines
7.8 KiB
C
313 lines
7.8 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: |
|
|
| https://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 <locale.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_name = NULL, *retval;
|
|
zend_string *domain = NULL;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "S!", &domain) == FAILURE) {
|
|
RETURN_THROWS();
|
|
}
|
|
|
|
if (domain != NULL && ZSTR_LEN(domain) != 0 && !zend_string_equals_literal(domain, "0")) {
|
|
PHP_GETTEXT_DOMAIN_LENGTH_CHECK(1, ZSTR_LEN(domain))
|
|
domain_name = ZSTR_VAL(domain);
|
|
}
|
|
|
|
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))
|
|
if (category == LC_ALL) {
|
|
RETURN_STR_COPY(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;
|
|
size_t domain_len;
|
|
zend_string *dir = NULL;
|
|
char *retval, dir_name[MAXPATHLEN], *btd_result;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "sS!", &domain, &domain_len, &dir) == 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) {
|
|
btd_result = bindtextdomain(domain, NULL);
|
|
if (btd_result == NULL) {
|
|
/* POSIX-compliant implementations can return
|
|
* NULL if an error occured. On musl you will
|
|
* also get NULL if the domain is not yet
|
|
* bound, because musl has no default directory
|
|
* to return in that case. */
|
|
RETURN_FALSE;
|
|
}
|
|
RETURN_STRING(btd_result);
|
|
}
|
|
|
|
if (ZSTR_LEN(dir) != 0 && !zend_string_equals_literal(dir, "0")) {
|
|
if (!VCWD_REALPATH(ZSTR_VAL(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)
|
|
if (category == LC_ALL) {
|
|
RETURN_STRING(msgid1);
|
|
}
|
|
|
|
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 */
|