mirror of
https://github.com/php/php-src.git
synced 2025-08-19 08:49:28 +02:00

This patch removes the so called local variables defined per file basis for certain editors to properly show tab width, and similar settings. These are mainly used by Vim and Emacs editors yet with recent changes the once working definitions don't work anymore in Vim without custom plugins or additional configuration. Neither are these settings synced across the PHP code base. A simpler and better approach is EditorConfig and fixing code using some code style fixing tools in the future instead. This patch also removes the so called modelines for Vim. Modelines allow Vim editor specifically to set some editor configuration such as syntax highlighting, indentation style and tab width to be set in the first line or the last 5 lines per file basis. Since the php test files have syntax highlighting already set in most editors properly and EditorConfig takes care of the indentation settings, this patch removes these as well for the Vim 6.0 and newer versions. With the removal of local variables for certain editors such as Emacs and Vim, the footer is also probably not needed anymore when creating extensions using ext_skel.php script. Additionally, Vim modelines for setting php syntax and some editor settings has been removed from some *.phpt files. All these are mostly not relevant for phpt files neither work properly in the middle of the file.
391 lines
10 KiB
C
391 lines
10 KiB
C
/*
|
|
+----------------------------------------------------------------------+
|
|
| PHP Version 7 |
|
|
+----------------------------------------------------------------------+
|
|
| 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"
|
|
|
|
#if HAVE_LIBINTL
|
|
|
|
#include <stdio.h>
|
|
#include "ext/standard/info.h"
|
|
#include "php_gettext.h"
|
|
|
|
/* {{{ arginfo */
|
|
ZEND_BEGIN_ARG_INFO(arginfo_textdomain, 0)
|
|
ZEND_ARG_INFO(0, domain)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_gettext, 0)
|
|
ZEND_ARG_INFO(0, msgid)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_dgettext, 0)
|
|
ZEND_ARG_INFO(0, domain_name)
|
|
ZEND_ARG_INFO(0, msgid)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_dcgettext, 0)
|
|
ZEND_ARG_INFO(0, domain_name)
|
|
ZEND_ARG_INFO(0, msgid)
|
|
ZEND_ARG_INFO(0, category)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_bindtextdomain, 0)
|
|
ZEND_ARG_INFO(0, domain_name)
|
|
ZEND_ARG_INFO(0, dir)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
#if HAVE_NGETTEXT
|
|
ZEND_BEGIN_ARG_INFO(arginfo_ngettext, 0)
|
|
ZEND_ARG_INFO(0, msgid1)
|
|
ZEND_ARG_INFO(0, msgid2)
|
|
ZEND_ARG_INFO(0, count)
|
|
ZEND_END_ARG_INFO()
|
|
#endif
|
|
|
|
#if HAVE_DNGETTEXT
|
|
ZEND_BEGIN_ARG_INFO(arginfo_dngettext, 0)
|
|
ZEND_ARG_INFO(0, domain)
|
|
ZEND_ARG_INFO(0, msgid1)
|
|
ZEND_ARG_INFO(0, msgid2)
|
|
ZEND_ARG_INFO(0, count)
|
|
ZEND_END_ARG_INFO()
|
|
#endif
|
|
|
|
#if HAVE_DCNGETTEXT
|
|
ZEND_BEGIN_ARG_INFO(arginfo_dcngettext, 0)
|
|
ZEND_ARG_INFO(0, domain)
|
|
ZEND_ARG_INFO(0, msgid1)
|
|
ZEND_ARG_INFO(0, msgid2)
|
|
ZEND_ARG_INFO(0, count)
|
|
ZEND_ARG_INFO(0, category)
|
|
ZEND_END_ARG_INFO()
|
|
#endif
|
|
|
|
#if HAVE_BIND_TEXTDOMAIN_CODESET
|
|
ZEND_BEGIN_ARG_INFO(arginfo_bind_textdomain_codeset, 0)
|
|
ZEND_ARG_INFO(0, domain)
|
|
ZEND_ARG_INFO(0, codeset)
|
|
ZEND_END_ARG_INFO()
|
|
#endif
|
|
/* }}} */
|
|
|
|
/* {{{ php_gettext_functions[]
|
|
*/
|
|
static const zend_function_entry php_gettext_functions[] = {
|
|
PHP_NAMED_FE(textdomain, zif_textdomain, arginfo_textdomain)
|
|
PHP_NAMED_FE(gettext, zif_gettext, arginfo_gettext)
|
|
/* Alias for gettext() */
|
|
PHP_NAMED_FE(_, zif_gettext, arginfo_gettext)
|
|
PHP_NAMED_FE(dgettext, zif_dgettext, arginfo_dgettext)
|
|
PHP_NAMED_FE(dcgettext, zif_dcgettext, arginfo_dcgettext)
|
|
PHP_NAMED_FE(bindtextdomain, zif_bindtextdomain, arginfo_bindtextdomain)
|
|
#if HAVE_NGETTEXT
|
|
PHP_NAMED_FE(ngettext, zif_ngettext, arginfo_ngettext)
|
|
#endif
|
|
#if HAVE_DNGETTEXT
|
|
PHP_NAMED_FE(dngettext, zif_dngettext, arginfo_dngettext)
|
|
#endif
|
|
#if HAVE_DCNGETTEXT
|
|
PHP_NAMED_FE(dcngettext, zif_dcngettext, arginfo_dcngettext)
|
|
#endif
|
|
#if HAVE_BIND_TEXTDOMAIN_CODESET
|
|
PHP_NAMED_FE(bind_textdomain_codeset, zif_bind_textdomain_codeset, arginfo_bind_textdomain_codeset)
|
|
#endif
|
|
PHP_FE_END
|
|
};
|
|
/* }}} */
|
|
|
|
#include <libintl.h>
|
|
|
|
zend_module_entry php_gettext_module_entry = {
|
|
STANDARD_MODULE_HEADER,
|
|
"gettext",
|
|
php_gettext_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(domain_len) \
|
|
if (UNEXPECTED(domain_len > PHP_GETTEXT_MAX_DOMAIN_LENGTH)) { \
|
|
php_error_docref(NULL, E_WARNING, "domain passed too long"); \
|
|
RETURN_FALSE; \
|
|
}
|
|
|
|
#define PHP_GETTEXT_LENGTH_CHECK(check_name, check_len) \
|
|
if (UNEXPECTED(check_len > PHP_GETTEXT_MAX_MSGID_LENGTH)) { \
|
|
php_error_docref(NULL, E_WARNING, "%s passed too long", check_name); \
|
|
RETURN_FALSE; \
|
|
}
|
|
|
|
PHP_MINFO_FUNCTION(php_gettext)
|
|
{
|
|
php_info_print_table_start();
|
|
php_info_print_table_row(2, "GetText Support", "enabled");
|
|
php_info_print_table_end();
|
|
}
|
|
|
|
/* {{{ proto string textdomain(string domain)
|
|
Set the textdomain to "domain". Returns the current domain */
|
|
PHP_NAMED_FUNCTION(zif_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;
|
|
}
|
|
|
|
PHP_GETTEXT_DOMAIN_LENGTH_CHECK(domain_len)
|
|
|
|
if (domain != NULL && strcmp(domain, "") && strcmp(domain, "0")) {
|
|
domain_name = domain;
|
|
} else {
|
|
domain_name = NULL;
|
|
}
|
|
|
|
retval = textdomain(domain_name);
|
|
|
|
RETURN_STRING(retval);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto string gettext(string msgid)
|
|
Return the translation of msgid for the current domain, or msgid unaltered if a translation does not exist */
|
|
PHP_NAMED_FUNCTION(zif_gettext)
|
|
{
|
|
char *msgstr;
|
|
zend_string *msgid;
|
|
|
|
ZEND_PARSE_PARAMETERS_START(1, 1)
|
|
Z_PARAM_STR(msgid)
|
|
ZEND_PARSE_PARAMETERS_END();
|
|
|
|
PHP_GETTEXT_LENGTH_CHECK("msgid", ZSTR_LEN(msgid))
|
|
msgstr = gettext(ZSTR_VAL(msgid));
|
|
|
|
if (msgstr != ZSTR_VAL(msgid)) {
|
|
RETURN_STRING(msgstr);
|
|
} else {
|
|
RETURN_STR_COPY(msgid);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto string dgettext(string domain_name, string msgid)
|
|
Return the translation of msgid for domain_name, or msgid unaltered if a translation does not exist */
|
|
PHP_NAMED_FUNCTION(zif_dgettext)
|
|
{
|
|
char *msgstr;
|
|
zend_string *domain, *msgid;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "SS", &domain, &msgid) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
PHP_GETTEXT_DOMAIN_LENGTH_CHECK(ZSTR_LEN(domain))
|
|
PHP_GETTEXT_LENGTH_CHECK("msgid", ZSTR_LEN(msgid))
|
|
|
|
msgstr = dgettext(ZSTR_VAL(domain), ZSTR_VAL(msgid));
|
|
|
|
if (msgstr != ZSTR_VAL(msgid)) {
|
|
RETURN_STRING(msgstr);
|
|
} else {
|
|
RETURN_STR_COPY(msgid);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto string dcgettext(string domain_name, string msgid, int category)
|
|
Return the translation of msgid for domain_name and category, or msgid unaltered if a translation does not exist */
|
|
PHP_NAMED_FUNCTION(zif_dcgettext)
|
|
{
|
|
char *msgstr;
|
|
zend_string *domain, *msgid;
|
|
zend_long category;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "SSl", &domain, &msgid, &category) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
PHP_GETTEXT_DOMAIN_LENGTH_CHECK(ZSTR_LEN(domain))
|
|
PHP_GETTEXT_LENGTH_CHECK("msgid", 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);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto string bindtextdomain(string domain_name, string dir)
|
|
Bind to the text domain domain_name, looking for translations in dir. Returns the current domain */
|
|
PHP_NAMED_FUNCTION(zif_bindtextdomain)
|
|
{
|
|
char *domain, *dir;
|
|
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;
|
|
}
|
|
|
|
PHP_GETTEXT_DOMAIN_LENGTH_CHECK(domain_len)
|
|
|
|
if (domain[0] == '\0') {
|
|
php_error(E_WARNING, "The first parameter of bindtextdomain must not be empty");
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
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);
|
|
}
|
|
/* }}} */
|
|
|
|
#if HAVE_NGETTEXT
|
|
/* {{{ proto string ngettext(string MSGID1, string MSGID2, int N)
|
|
Plural version of gettext() */
|
|
PHP_NAMED_FUNCTION(zif_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;
|
|
}
|
|
|
|
PHP_GETTEXT_LENGTH_CHECK("msgid1", msgid1_len)
|
|
PHP_GETTEXT_LENGTH_CHECK("msgid2", msgid2_len)
|
|
|
|
msgstr = ngettext(msgid1, msgid2, count);
|
|
|
|
ZEND_ASSERT(msgstr);
|
|
RETURN_STRING(msgstr);
|
|
}
|
|
/* }}} */
|
|
#endif
|
|
|
|
#if HAVE_DNGETTEXT
|
|
/* {{{ proto string dngettext(string domain, string msgid1, string msgid2, int count)
|
|
Plural version of dgettext() */
|
|
PHP_NAMED_FUNCTION(zif_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;
|
|
}
|
|
|
|
PHP_GETTEXT_DOMAIN_LENGTH_CHECK(domain_len)
|
|
PHP_GETTEXT_LENGTH_CHECK("msgid1", msgid1_len)
|
|
PHP_GETTEXT_LENGTH_CHECK("msgid2", msgid2_len)
|
|
|
|
msgstr = dngettext(domain, msgid1, msgid2, count);
|
|
|
|
ZEND_ASSERT(msgstr);
|
|
RETURN_STRING(msgstr);
|
|
}
|
|
/* }}} */
|
|
#endif
|
|
|
|
#if HAVE_DCNGETTEXT
|
|
/* {{{ proto string dcngettext(string domain, string msgid1, string msgid2, int n, int category)
|
|
Plural version of dcgettext() */
|
|
PHP_NAMED_FUNCTION(zif_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;
|
|
}
|
|
|
|
PHP_GETTEXT_DOMAIN_LENGTH_CHECK(domain_len)
|
|
PHP_GETTEXT_LENGTH_CHECK("msgid1", msgid1_len)
|
|
PHP_GETTEXT_LENGTH_CHECK("msgid2", msgid2_len)
|
|
|
|
msgstr = dcngettext(domain, msgid1, msgid2, count, category);
|
|
|
|
ZEND_ASSERT(msgstr);
|
|
RETURN_STRING(msgstr);
|
|
}
|
|
/* }}} */
|
|
#endif
|
|
|
|
#if HAVE_BIND_TEXTDOMAIN_CODESET
|
|
|
|
/* {{{ proto string bind_textdomain_codeset(string domain, string codeset)
|
|
Specify the character encoding in which the messages from the DOMAIN message catalog will be returned. */
|
|
PHP_NAMED_FUNCTION(zif_bind_textdomain_codeset)
|
|
{
|
|
char *domain, *codeset, *retval = NULL;
|
|
size_t domain_len, codeset_len;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "ss", &domain, &domain_len, &codeset, &codeset_len) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
PHP_GETTEXT_DOMAIN_LENGTH_CHECK(domain_len)
|
|
|
|
retval = bind_textdomain_codeset(domain, codeset);
|
|
|
|
if (!retval) {
|
|
RETURN_FALSE;
|
|
}
|
|
RETURN_STRING(retval);
|
|
}
|
|
/* }}} */
|
|
#endif
|
|
|
|
|
|
#endif /* HAVE_LIBINTL */
|