root/ext/gettext/gettext.c

/* [<][>][^][v][top][bottom][index][help] */

DEFINITIONS

This source file includes following definitions.
  1. ZEND_GET_MODULE
  2. PHP_NAMED_FUNCTION
  3. PHP_NAMED_FUNCTION
  4. PHP_NAMED_FUNCTION
  5. PHP_NAMED_FUNCTION
  6. PHP_NAMED_FUNCTION
  7. PHP_NAMED_FUNCTION
  8. PHP_NAMED_FUNCTION
  9. PHP_NAMED_FUNCTION
  10. PHP_NAMED_FUNCTION

/*
   +----------------------------------------------------------------------+
   | PHP Version 5                                                        |
   +----------------------------------------------------------------------+
   | Copyright (c) 1997-2008 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>                               |
   +----------------------------------------------------------------------+
 */

/* $Id: gettext.c,v 1.46.2.2.2.5 2007/12/31 07:20:06 sebastian Exp $ */

#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 */
static
ZEND_BEGIN_ARG_INFO(arginfo_textdomain, 0)
        ZEND_ARG_INFO(0, domain)
ZEND_END_ARG_INFO()

static
ZEND_BEGIN_ARG_INFO(arginfo_gettext, 0)
        ZEND_ARG_INFO(0, msgid)
ZEND_END_ARG_INFO()

static
ZEND_BEGIN_ARG_INFO(arginfo_dgettext, 0)
        ZEND_ARG_INFO(0, domain_name)
        ZEND_ARG_INFO(0, msgid)
ZEND_END_ARG_INFO()

static
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()

static
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
static
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
static
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
static
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
static
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[]
 */
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
    {NULL, NULL, NULL}
};
/* }}} */

#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),
        NO_VERSION_YET,
        STANDARD_MODULE_PROPERTIES
};

#ifdef COMPILE_DL_GETTEXT
ZEND_GET_MODULE(php_gettext)
#endif

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)
{
        zval **domain;
        char *domain_name, *retval;
        char *val;

        if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &domain) == FAILURE) {
                WRONG_PARAM_COUNT;
        }
        convert_to_string_ex(domain);

        val = Z_STRVAL_PP(domain);
        if (strcmp(val, "") && strcmp(val, "0")) {
                domain_name = val;
        } else {
                domain_name = NULL;
        }

        retval = textdomain(domain_name);

        RETURN_STRING(retval, 1);
}
/* }}} */

/* {{{ 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)
{
        zval **msgid;
        char *msgstr;

        if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &msgid) == FAILURE) {
                WRONG_PARAM_COUNT;
        }
        convert_to_string_ex(msgid);

        msgstr = gettext(Z_STRVAL_PP(msgid));

        RETURN_STRING(msgstr, 1);
}
/* }}} */

/* {{{ 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)
{
        zval **domain_name, **msgid;
        char *msgstr;

        if (ZEND_NUM_ARGS() != 2 || zend_get_parameters_ex(2, &domain_name, &msgid) == FAILURE) {
                WRONG_PARAM_COUNT;
        }
        convert_to_string_ex(domain_name);
        convert_to_string_ex(msgid);

        msgstr = dgettext(Z_STRVAL_PP(domain_name), Z_STRVAL_PP(msgid));

        RETURN_STRING(msgstr, 1);
}
/* }}} */

/* {{{ proto string dcgettext(string domain_name, string msgid, long 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)
{
        zval **domain_name, **msgid, **category;
        char *msgstr;

        if (ZEND_NUM_ARGS() != 3 || zend_get_parameters_ex(3, &domain_name, &msgid, &category) == FAILURE) {
                WRONG_PARAM_COUNT;
        }
        convert_to_string_ex(domain_name);
        convert_to_string_ex(msgid);
        convert_to_long_ex(category);

        msgstr = dcgettext(Z_STRVAL_PP(domain_name), Z_STRVAL_PP(msgid), Z_LVAL_PP(category));

        RETURN_STRING(msgstr, 1);
}
/* }}} */

/* {{{ 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)
{
        zval **domain_name, **dir;
        char *retval, dir_name[MAXPATHLEN];

        if (ZEND_NUM_ARGS() != 2 || zend_get_parameters_ex(2, &domain_name, &dir) == FAILURE) {
                WRONG_PARAM_COUNT;
        }
        convert_to_string_ex(domain_name);
        convert_to_string_ex(dir);

        if (Z_STRVAL_PP(domain_name)[0] == '\0') {
                php_error(E_WARNING, "The first parameter of bindtextdomain must not be empty");
                RETURN_FALSE;
        }
        
        if (Z_STRVAL_PP(dir)[0] != '\0' && strcmp(Z_STRVAL_PP(dir), "0")) {
                if (!VCWD_REALPATH(Z_STRVAL_PP(dir), dir_name)) {
                        RETURN_FALSE;
                }
        } else if (!VCWD_GETCWD(dir_name, MAXPATHLEN)) {
                RETURN_FALSE;
        }

        retval = bindtextdomain(Z_STRVAL_PP(domain_name), dir_name);

        RETURN_STRING(retval, 1);
}
/* }}} */

#if HAVE_NGETTEXT
/* {{{ proto string ngettext(string MSGID1, string MSGID2, int N)
   Plural version of gettext() */
PHP_NAMED_FUNCTION(zif_ngettext)
{
        zval **msgid1, **msgid2, **count;
        char *msgstr;

        RETVAL_FALSE;

        if (ZEND_NUM_ARGS() != 3 || zend_get_parameters_ex(3, &msgid1, &msgid2, &count) == FAILURE) {
                WRONG_PARAM_COUNT;
        } else {
                convert_to_string_ex(msgid1);
                convert_to_string_ex(msgid2);
                convert_to_long_ex(count);

                msgstr = ngettext(Z_STRVAL_PP(msgid1), Z_STRVAL_PP(msgid2), Z_LVAL_PP(count));
                if (msgstr) {
                        RETVAL_STRING (msgstr, 1);
                }
        }
}
/* }}} */
#endif

#if HAVE_DNGETTEXT
/* {{{ proto string dngettext (string domain, string msgid1, string msgid2, int count)
   Plural version of dgettext() */
PHP_NAMED_FUNCTION(zif_dngettext)
{
        zval **domain, **msgid1, **msgid2, **count;

        RETVAL_FALSE;

        if (ZEND_NUM_ARGS() != 4 || zend_get_parameters_ex(4, &domain, &msgid1, &msgid2, &count) == FAILURE) {
                WRONG_PARAM_COUNT;
        } else {
                char *msgstr;
                
                convert_to_string_ex(domain);
                convert_to_string_ex(msgid1);
                convert_to_string_ex(msgid2);
                convert_to_long_ex(count);

                msgstr = dngettext(Z_STRVAL_PP(domain), Z_STRVAL_PP(msgid1), Z_STRVAL_PP(msgid2), Z_LVAL_PP(count));
                if (msgstr) {
                        RETVAL_STRING(msgstr, 1);
                }
        }
}
/* }}} */
#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)
{
        zval **domain, **msgid1, **msgid2, **count, **category;

        RETVAL_FALSE;

        if (ZEND_NUM_ARGS() != 5 || zend_get_parameters_ex(5, &domain, &msgid1, &msgid2, &count, &category) == FAILURE) {
                WRONG_PARAM_COUNT;
        } else {
                char* msgstr = NULL;

                convert_to_string_ex(domain);
                convert_to_string_ex(msgid1);
                convert_to_string_ex(msgid2);
                convert_to_long_ex(count);
                convert_to_long_ex(category);

                msgstr = dcngettext(Z_STRVAL_PP(domain), Z_STRVAL_PP(msgid1), Z_STRVAL_PP(msgid2), Z_LVAL_PP(count), Z_LVAL_PP(category));

                if (msgstr) {
                        RETVAL_STRING(msgstr, 1);
                }
        }
}
/* }}} */
#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)
{
        zval **domain, **codeset;
        char *retval;
        
        if (ZEND_NUM_ARGS() != 2 || zend_get_parameters_ex(2, &domain, &codeset) == FAILURE) {
                WRONG_PARAM_COUNT;
        } else {
                convert_to_string_ex(domain);
                convert_to_string_ex(codeset);
                
                retval = bind_textdomain_codeset(Z_STRVAL_PP(domain), Z_STRVAL_PP(codeset));

                if (!retval) {
                        RETURN_FALSE;
                }
                RETURN_STRING(retval, 1);
        }
}
/* }}} */
#endif


#endif /* HAVE_LIBINTL */

/*
 * Local variables:
 * tab-width: 4
 * c-basic-offset: 4
 * End:
 * vim600: sw=4 ts=4 fdm=marker
 * vim<600: sw=4 ts=4
 */


/* [<][>][^][v][top][bottom][index][help] */