diff options
Diffstat (limited to 'ext/iconv/iconv.c')
-rw-r--r-- | ext/iconv/iconv.c | 399 |
1 files changed, 0 insertions, 399 deletions
diff --git a/ext/iconv/iconv.c b/ext/iconv/iconv.c deleted file mode 100644 index b3d0ec99ae..0000000000 --- a/ext/iconv/iconv.c +++ /dev/null @@ -1,399 +0,0 @@ -/* - +----------------------------------------------------------------------+ - | PHP Version 4 | - +----------------------------------------------------------------------+ - | Copyright (c) 1997-2002 The PHP Group | - +----------------------------------------------------------------------+ - | This source file is subject to version 2.02 of the PHP license, | - | that is bundled with this package in the file LICENSE, and is | - | available at through the world-wide-web at | - | http://www.php.net/license/2_02.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. | - +----------------------------------------------------------------------+ - | Authors: Rui Hirokawa <rui_hirokawa@ybb.ne.jp> | - | Stig Bakken <ssb@fast.no> | - +----------------------------------------------------------------------+ - */ - -/* $Id$ */ - -#ifdef HAVE_CONFIG_H -#include "config.h" -#endif - -#include "php.h" - -#ifdef PHP_ATOM_INC -#include "php_have_iconv.h" -#include "php_have_libiconv.h" -#endif - -#if HAVE_ICONV - -#ifdef HAVE_GICONV_H -#include <giconv.h> -#else -#include <iconv.h> -#endif - -#include <errno.h> - -#include "php_globals.h" -#include "php_iconv.h" -#include "ext/standard/info.h" -#include "main/php_output.h" -#include "SAPI.h" -#include "php_ini.h" - - -#if HAVE_LIBICONV -#define icv_open(a, b) libiconv_open(a, b) -#define icv_close(a) libiconv_close(a) -#define icv(a, b, c, d, e) libiconv(a, b, c, d, e) -#else -#define icv_open(a, b) iconv_open(a, b) -#define icv_close(a) iconv_close(a) -#define icv(a, b, c, d, e) iconv(a, b, c, d, e) -#endif - - -/* {{{ iconv_functions[] - */ -function_entry iconv_functions[] = { - PHP_NAMED_FE(iconv,php_if_iconv, NULL) - PHP_FE(ob_iconv_handler, NULL) - PHP_FE(iconv_get_encoding, NULL) - PHP_FE(iconv_set_encoding, NULL) - {NULL, NULL, NULL} -}; -/* }}} */ - -/* {{{ iconv_module_entry - */ -zend_module_entry iconv_module_entry = { - STANDARD_MODULE_HEADER, - "iconv", - iconv_functions, - PHP_MINIT(miconv), - PHP_MSHUTDOWN(miconv), - NULL, - NULL, - PHP_MINFO(miconv), - NO_VERSION_YET, - STANDARD_MODULE_PROPERTIES -}; -/* }}} */ - -ZEND_DECLARE_MODULE_GLOBALS(iconv) - -#ifdef COMPILE_DL_ICONV -ZEND_GET_MODULE(iconv) -#endif - -static int php_iconv_string(const char * in_str, unsigned int in_len, char ** out_str, unsigned int * out_len, const char * in_encoding, const char * out_encoding, int *err TSRMLS_DC); - -/* {{{ PHP_INI - */ -PHP_INI_BEGIN() - STD_PHP_INI_ENTRY("iconv.input_encoding", ICONV_INPUT_ENCODING, PHP_INI_ALL, OnUpdateString, input_encoding, zend_iconv_globals, iconv_globals) - STD_PHP_INI_ENTRY("iconv.output_encoding", ICONV_OUTPUT_ENCODING, PHP_INI_ALL, OnUpdateString, output_encoding, zend_iconv_globals, iconv_globals) - STD_PHP_INI_ENTRY("iconv.internal_encoding", ICONV_INTERNAL_ENCODING, PHP_INI_ALL, OnUpdateString, internal_encoding, zend_iconv_globals, iconv_globals) -PHP_INI_END() -/* }}} */ - -static void php_iconv_init_globals(zend_iconv_globals *iconv_globals) -{ - iconv_globals->input_encoding = NULL; - iconv_globals->output_encoding = NULL; - iconv_globals->internal_encoding = NULL; -} - -PHP_MINIT_FUNCTION(miconv) -{ - ZEND_INIT_MODULE_GLOBALS(iconv, php_iconv_init_globals, NULL); - REGISTER_INI_ENTRIES(); - return SUCCESS; -} - -PHP_MSHUTDOWN_FUNCTION(miconv) -{ - UNREGISTER_INI_ENTRIES(); - return SUCCESS; -} - -PHP_MINFO_FUNCTION(miconv) -{ - php_info_print_table_start(); - php_info_print_table_header(2, "iconv support", "enabled"); - php_info_print_table_end(); - - DISPLAY_INI_ENTRIES(); -} -# -#define PHP_ICONV_CONVERTER 1 -#define PHP_ICONV_WRONG_CHARSET 2 -#define PHP_ICONV_TOO_BIG 3 -#define PHP_ICONV_ILLEGAL_SEQ 4 -#define PHP_ICONV_ILLEGAL_CHAR 5 -#define PHP_ICONV_UNKNOWN 6 - -/* {{{ php_iconv_string - */ -static int php_iconv_string(const char *in_p, size_t in_len, - char **out, size_t *out_len, - const char *in_charset, const char *out_charset, int *err TSRMLS_DC) -{ -#if HAVE_LIBICONV - /* No errno for libiconv(?) */ - unsigned int in_size, out_size, out_left; - char *out_buffer, *out_p; - iconv_t cd; - size_t result; - typedef unsigned int ucs4_t; - - *err = 0; - in_size = in_len; - - /* - This is not the right way to get output size... - This is not space efficient for large text. - This is also problem for encoding like UTF-7/UTF-8/ISO-2022 which - a single char can be more than 4 bytes. - I added 15 extra bytes for safety. <yohgaki@php.net> - */ - out_size = in_len * sizeof(ucs4_t) + 16; - out_buffer = (char *) emalloc(out_size); - - *out = out_buffer; - out_p = out_buffer; - out_left = out_size; - - cd = icv_open(out_charset, in_charset); - - if (cd == (iconv_t)(-1)) { - *err = PHP_ICONV_UNKNOWN; - php_error(E_WARNING, "%s(): unknown error, unable to convert from `%s' to `%s'", - get_active_function_name(TSRMLS_C), in_charset, out_charset); - efree(out_buffer); - return FAILURE; - } - - result = icv(cd, (char **) &in_p, &in_size, (char **) - &out_p, &out_left); - - if (result == (size_t)(-1)) { - *err = PHP_ICONV_UNKNOWN; - efree(out_buffer); - return FAILURE; - } - - *out_len = out_size - out_left; - out_buffer[*out_len] = '\0'; - icv_close(cd); - - return SUCCESS; - -#else - /* - libc iconv should support errno. Handle it better way. - */ - iconv_t cd; - size_t in_left, out_size, out_left; - char *out_p, *out_buf, *tmp_buf; - size_t i, bsz, result; - - *err = 0; - cd = iconv_open(out_charset, in_charset); - if (cd == (iconv_t)(-1)) { - if (errno == EINVAL) { - *err = PHP_ICONV_WRONG_CHARSET; - php_error(E_NOTICE, "%s() wrong charset, cannot convert from `%s' to `%s'", - get_active_function_name(TSRMLS_C), in_charset, out_charset); - } - else { - *err = PHP_ICONV_CONVERTER; - php_error(E_NOTICE, "%s() cannot open converter", - get_active_function_name(TSRMLS_C)); - } - return FAILURE; - } - - in_left= in_len; - out_left = in_len + 32; /* Avoid realloc() most cases */ - bsz = out_left; - out_buf = (char *) emalloc(bsz+1); - out_p = out_buf; - result = iconv(cd, (char **)&in_p, &in_left, (char **) &out_p, &out_left); - out_size = bsz - out_left; - for (i = 2;in_left > 0 && errno == E2BIG; i++) { - /* converted string is longer than out buffer */ - tmp_buf = (char*)erealloc(out_buf, bsz*i+1); - if (tmp_buf == NULL) { - break; - } - out_buf = tmp_buf; - out_p = tmp_buf; - out_p += out_size; - out_left = in_len; - result = iconv(cd, (char **)&in_p, &in_left, &out_p, &out_left); - out_size += bsz - out_left; - } - iconv_close(cd); - if (result == (size_t)(-1)) { - switch (errno) { - case EINVAL: - php_error(E_NOTICE, "%s() detected incomplete character in input string", - get_active_function_name(TSRMLS_C)); - *err = PHP_ICONV_ILLEGAL_CHAR; - break; - case EILSEQ: - php_error(E_NOTICE, "%s() detected illegal character in input string", - get_active_function_name(TSRMLS_C)); - *err = PHP_ICONV_ILLEGAL_SEQ; - break; - case E2BIG: - /* should not happen */ - php_error(E_WARNING, "%s() run out buffer", - get_active_function_name(TSRMLS_C)); - *err = PHP_ICONV_TOO_BIG; - break; - default: - /* other error */ - php_error(E_NOTICE, "%s() unknown error (%d)", - get_active_function_name(TSRMLS_C), errno); - *err = PHP_ICONV_UNKNOWN; - efree(out_buf); - return FAILURE; - break; - } - } - *out_p = '\0'; - *out = out_buf; - *out_len = out_size; - return SUCCESS; -#endif -} -/* }}} */ - -/* {{{ proto string iconv(string in_charset, string out_charset, string str) - Returns str converted to the out_charset character set */ -PHP_NAMED_FUNCTION(php_if_iconv) -{ - char *in_charset, *out_charset, *in_buffer, *out_buffer; - unsigned int out_len; - int in_charset_len, out_charset_len, in_buffer_len, err; - - if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "sss", - &in_charset, &in_charset_len, &out_charset, &out_charset_len, &in_buffer, &in_buffer_len) == FAILURE) - return; - - if (php_iconv_string(in_buffer, in_buffer_len, - &out_buffer, &out_len, - in_charset, out_charset, &err TSRMLS_CC) == SUCCESS) { - RETVAL_STRINGL(out_buffer, out_len, 0); - } else { - RETURN_FALSE; - } -} -/* }}} */ - -/* {{{ proto string ob_iconv_handler(string contents, int status) - Returns str in output buffer converted to the iconv.output_encoding character set */ -PHP_FUNCTION(ob_iconv_handler) -{ - char *out_buffer; - zval *zv_string; - unsigned int out_len; - int err, status;; - - if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "zl", &zv_string, &status) == FAILURE) - return; - - convert_to_string_ex(&zv_string); - - if (SG(sapi_headers).send_default_content_type && - php_iconv_string(Z_STRVAL_P(zv_string), Z_STRLEN_P(zv_string), - &out_buffer, &out_len, - ICONVG(internal_encoding), - ICONVG(output_encoding), - &err TSRMLS_CC) == SUCCESS) { - RETVAL_STRINGL(out_buffer, out_len, 0); - } else { - zval_dtor(return_value); - *return_value = *zv_string; - zval_copy_ctor(return_value); - } - -} -/* }}} */ - -/* {{{ proto bool iconv_set_encoding(string type, string charset) - Sets internal encoding and output encoding for ob_iconv_handler() */ -PHP_FUNCTION(iconv_set_encoding) -{ - char *type, *charset; - int type_len, charset_len, retval; - - if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ss", &type, &type_len, &charset, &charset_len) == FAILURE) - return; - - if(!strcasecmp("input_encoding", type)) { - retval = zend_alter_ini_entry("iconv.input_encoding", sizeof("iconv.input_encoding"), charset, charset_len, PHP_INI_USER, PHP_INI_STAGE_RUNTIME); - } else if(!strcasecmp("output_encoding", type)) { - retval = zend_alter_ini_entry("iconv.output_encoding", sizeof("iconv.output_encoding"), charset, charset_len, PHP_INI_USER, PHP_INI_STAGE_RUNTIME); - } else if(!strcasecmp("internal_encoding", type)) { - retval = zend_alter_ini_entry("iconv.internal_encoding", sizeof("iconv.internal_encoding"), charset, charset_len, PHP_INI_USER, PHP_INI_STAGE_RUNTIME); - } else { - RETURN_FALSE; - } - - if (retval == SUCCESS) { - RETURN_TRUE; - } else { - RETURN_FALSE; - } -} -/* }}} */ - -/* {{{ proto array iconv_get_encoding([string type]) - Get internal encoding and output encoding for ob_iconv_handler() */ -PHP_FUNCTION(iconv_get_encoding) -{ - char *type = "all"; - int type_len; - - if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &type, &type_len) == FAILURE) - return; - - if (!strcasecmp("all", type)) { - if (array_init(return_value) == FAILURE) { - RETURN_FALSE; - } - add_assoc_string(return_value, "input_encoding", ICONVG(input_encoding), 1); - add_assoc_string(return_value, "output_encoding", ICONVG(output_encoding), 1); - add_assoc_string(return_value, "internal_encoding", ICONVG(internal_encoding), 1); - } else if (!strcasecmp("input_encoding", type)) { - RETVAL_STRING(ICONVG(input_encoding), 1); - } else if (!strcasecmp("output_encoding", type)) { - RETVAL_STRING(ICONVG(output_encoding), 1); - } else if (!strcasecmp("internal_encoding", type)) { - RETVAL_STRING(ICONVG(internal_encoding), 1); - } else { - RETURN_FALSE; - } - -} -/* }}} */ - -#endif - -/* - * Local variables: - * tab-width: 4 - * c-basic-offset: 4 - * End: - * vim600: sw=4 ts=4 fdm=marker - * vim<600: sw=4 ts=4 - */ |