root/ext/recode/recode.c

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

DEFINITIONS

This source file includes following definitions.
  1. ZEND_GET_MODULE
  2. PHP_MINIT_FUNCTION
  3. PHP_MSHUTDOWN_FUNCTION
  4. PHP_MINFO_FUNCTION
  5. PHP_FUNCTION
  6. PHP_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: Kristian Koehntopp <kris@koehntopp.de>                                           |
   +----------------------------------------------------------------------+
 */
 
/* $Id: recode.c,v 1.37.2.1.2.4 2007/12/31 07:20:10 sebastian Exp $ */

/* {{{ 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 <stdbool.h>
#else
  typedef enum {false = 0, true = 1} bool;
#endif

#include <stdio.h>
#include <sys/types.h>
#include <unistd.h>
#include <recode.h>

#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);

/* {{{ module stuff */
static zend_function_entry php_recode_functions[] = {
        PHP_FE(recode_string, NULL)
        PHP_FE(recode_file, NULL)
        PHP_FALIAS(recode, recode_string, NULL)
        {NULL, NULL, NULL}
};

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", "$Revision: 1.37.2.1.2.4 $");
        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(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;
        zval **req;
        zval **input, **output;
        php_stream *instream, *outstream;
        FILE  *in_fp,  *out_fp;

        if (ZEND_NUM_ARGS() != 3 || zend_get_parameters_ex(3, &req, &input, &output) == FAILURE) {
                WRONG_PARAM_COUNT;
        }

        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;
        }
        
        convert_to_string_ex(req);

        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, Z_STRVAL_PP(req))) {
                php_error_docref(NULL TSRMLS_CC, E_WARNING, "Illegal recode request '%s'", Z_STRVAL_PP(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:
 */

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