/* +----------------------------------------------------------------------+ | PHP Version 5 | +----------------------------------------------------------------------+ | Copyright (c) 1997-2016 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: Kristian Koehntopp | +----------------------------------------------------------------------+ */ /* $Id: cde03aacd1a1218dcad9dabc2f284594a0a4aa16 $ */ /* {{{ includes & prototypes */ #ifdef HAVE_CONFIG_H #include "config.h" #endif #include "php.h" #include "php_streams.h" #if HAVE_LIBRECODE /* For recode 3.5 */ #if HAVE_BROKEN_RECODE extern char *program_name; char *program_name = "php"; #endif #ifdef HAVE_STDBOOL_H # include #else typedef enum {false = 0, true = 1} bool; #endif #include #include #include #include #include "php_recode.h" #include "ext/standard/info.h" #include "ext/standard/file.h" #include "ext/standard/php_string.h" /* }}} */ ZEND_BEGIN_MODULE_GLOBALS(recode) RECODE_OUTER outer; ZEND_END_MODULE_GLOBALS(recode) #ifdef ZTS # define ReSG(v) TSRMG(recode_globals_id, zend_recode_globals *, v) #else # define ReSG(v) (recode_globals.v) #endif ZEND_DECLARE_MODULE_GLOBALS(recode) static PHP_GINIT_FUNCTION(recode); /* {{{ arginfo */ ZEND_BEGIN_ARG_INFO_EX(arginfo_recode_string, 0, 0, 2) ZEND_ARG_INFO(0, request) ZEND_ARG_INFO(0, str) ZEND_END_ARG_INFO() ZEND_BEGIN_ARG_INFO_EX(arginfo_recode_file, 0, 0, 3) ZEND_ARG_INFO(0, request) ZEND_ARG_INFO(0, input) ZEND_ARG_INFO(0, output) ZEND_END_ARG_INFO() /* }}} */ /* {{{ module stuff */ static const zend_function_entry php_recode_functions[] = { PHP_FE(recode_string, arginfo_recode_string) PHP_FE(recode_file, arginfo_recode_file) PHP_FALIAS(recode, recode_string, arginfo_recode_string) PHP_FE_END }; zend_module_entry recode_module_entry = { STANDARD_MODULE_HEADER, "recode", php_recode_functions, PHP_MINIT(recode), PHP_MSHUTDOWN(recode), NULL, NULL, PHP_MINFO(recode), NO_VERSION_YET, PHP_MODULE_GLOBALS(recode), PHP_GINIT(recode), NULL, NULL, STANDARD_MODULE_PROPERTIES_EX }; #ifdef COMPILE_DL_RECODE ZEND_GET_MODULE(recode) #endif static PHP_GINIT_FUNCTION(recode) { recode_globals->outer = NULL; } PHP_MINIT_FUNCTION(recode) { ReSG(outer) = recode_new_outer(false); if (ReSG(outer) == NULL) { return FAILURE; } return SUCCESS; } PHP_MSHUTDOWN_FUNCTION(recode) { if (ReSG(outer)) { recode_delete_outer(ReSG(outer)); } return SUCCESS; } PHP_MINFO_FUNCTION(recode) { php_info_print_table_start(); php_info_print_table_row(2, "Recode Support", "enabled"); php_info_print_table_row(2, "Revision", "$Id: cde03aacd1a1218dcad9dabc2f284594a0a4aa16 $"); php_info_print_table_end(); } /* {{{ proto string recode_string(string request, string str) Recode string str according to request string */ PHP_FUNCTION(recode_string) { RECODE_REQUEST request = NULL; char *r = NULL; size_t r_len = 0, r_alen = 0; int req_len, str_len; char *req, *str; if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ss", &req, &req_len, &str, &str_len) == FAILURE) { return; } request = recode_new_request(ReSG(outer)); if (request == NULL) { php_error_docref(NULL TSRMLS_CC, E_WARNING, "Cannot allocate request structure"); RETURN_FALSE; } if (!recode_scan_request(request, req)) { php_error_docref(NULL TSRMLS_CC, E_WARNING, "Illegal recode request '%s'", req); goto error_exit; } recode_buffer_to_buffer(request, str, str_len, &r, &r_len, &r_alen); if (!r) { php_error_docref(NULL TSRMLS_CC, E_WARNING, "Recoding failed."); error_exit: RETVAL_FALSE; } else { RETVAL_STRINGL_CHECK(r, r_len, 1); free(r); } recode_delete_request(request); return; } /* }}} */ /* {{{ proto bool recode_file(string request, resource input, resource output) Recode file input into file output according to request */ PHP_FUNCTION(recode_file) { RECODE_REQUEST request = NULL; char *req; int req_len; zval *input, *output; php_stream *instream, *outstream; FILE *in_fp, *out_fp; if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "srr", &req, &req_len, &input, &output) == FAILURE) { return; } php_stream_from_zval(instream, &input); php_stream_from_zval(outstream, &output); if (FAILURE == php_stream_cast(instream, PHP_STREAM_AS_STDIO, (void**)&in_fp, REPORT_ERRORS)) { RETURN_FALSE; } if (FAILURE == php_stream_cast(outstream, PHP_STREAM_AS_STDIO, (void**)&out_fp, REPORT_ERRORS)) { RETURN_FALSE; } request = recode_new_request(ReSG(outer)); if (request == NULL) { php_error_docref(NULL TSRMLS_CC, E_WARNING, "Cannot allocate request structure"); RETURN_FALSE; } if (!recode_scan_request(request, req)) { php_error_docref(NULL TSRMLS_CC, E_WARNING, "Illegal recode request '%s'", req); goto error_exit; } if (!recode_file_to_file(request, in_fp, out_fp)) { php_error_docref(NULL TSRMLS_CC, E_WARNING, "Recoding failed."); goto error_exit; } recode_delete_request(request); RETURN_TRUE; error_exit: recode_delete_request(request); RETURN_FALSE; } /* }}} */ #endif /* * Local variables: * tab-width: 4 * c-basic-offset: 4 * End: */