#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include <php.h>
#include <zend_exceptions.h>
#include "php_intl.h"
#include "intl_error.h"
#include "intl_convert.h"
ZEND_EXTERN_MODULE_GLOBALS( intl )
static zend_class_entry *IntlException_ce_ptr;
static intl_error* intl_g_error_get( TSRMLS_D )
{
return &INTL_G( g_error );
}
static void intl_free_custom_error_msg( intl_error* err TSRMLS_DC )
{
if( !err && !( err = intl_g_error_get( TSRMLS_C ) ) )
return;
if(err->free_custom_error_message ) {
efree( err->custom_error_message );
}
err->custom_error_message = NULL;
err->free_custom_error_message = 0;
}
intl_error* intl_error_create( TSRMLS_D )
{
intl_error* err = ecalloc( 1, sizeof( intl_error ) );
intl_error_init( err TSRMLS_CC );
return err;
}
void intl_error_init( intl_error* err TSRMLS_DC )
{
if( !err && !( err = intl_g_error_get( TSRMLS_C ) ) )
return;
err->code = U_ZERO_ERROR;
err->custom_error_message = NULL;
err->free_custom_error_message = 0;
}
void intl_error_reset( intl_error* err TSRMLS_DC )
{
if( !err && !( err = intl_g_error_get( TSRMLS_C ) ) )
return;
err->code = U_ZERO_ERROR;
intl_free_custom_error_msg( err TSRMLS_CC );
}
void intl_error_set_custom_msg( intl_error* err, char* msg, int copyMsg TSRMLS_DC )
{
if( !msg )
return;
if( !err ) {
if( INTL_G( error_level ) )
php_error_docref( NULL TSRMLS_CC, INTL_G( error_level ), "%s", msg );
if( INTL_G( use_exceptions ) )
zend_throw_exception_ex( IntlException_ce_ptr, 0 TSRMLS_CC, "%s", msg );
}
if( !err && !( err = intl_g_error_get( TSRMLS_C ) ) )
return;
intl_free_custom_error_msg( err TSRMLS_CC );
err->free_custom_error_message = copyMsg;
err->custom_error_message = copyMsg ? estrdup( msg ) : msg;
}
char* intl_error_get_message( intl_error* err TSRMLS_DC )
{
const char* uErrorName = NULL;
char* errMessage = 0;
if( !err && !( err = intl_g_error_get( TSRMLS_C ) ) )
return estrdup( "" );
uErrorName = u_errorName( err->code );
if( err->custom_error_message )
{
spprintf( &errMessage, 0, "%s: %s", err->custom_error_message, uErrorName );
}
else
{
spprintf( &errMessage, 0, "%s", uErrorName );
}
return errMessage;
}
void intl_error_set_code( intl_error* err, UErrorCode err_code TSRMLS_DC )
{
if( !err && !( err = intl_g_error_get( TSRMLS_C ) ) )
return;
err->code = err_code;
}
UErrorCode intl_error_get_code( intl_error* err TSRMLS_DC )
{
if( !err && !( err = intl_g_error_get( TSRMLS_C ) ) )
return U_ZERO_ERROR;
return err->code;
}
void intl_error_set( intl_error* err, UErrorCode code, char* msg, int copyMsg TSRMLS_DC )
{
intl_error_set_code( err, code TSRMLS_CC );
intl_error_set_custom_msg( err, msg, copyMsg TSRMLS_CC );
}
void intl_errors_set( intl_error* err, UErrorCode code, char* msg, int copyMsg TSRMLS_DC )
{
intl_errors_set_code( err, code TSRMLS_CC );
intl_errors_set_custom_msg( err, msg, copyMsg TSRMLS_CC );
}
void intl_errors_reset( intl_error* err TSRMLS_DC )
{
if(err) {
intl_error_reset( err TSRMLS_CC );
}
intl_error_reset( NULL TSRMLS_CC );
}
void intl_errors_set_custom_msg( intl_error* err, char* msg, int copyMsg TSRMLS_DC )
{
if(err) {
intl_error_set_custom_msg( err, msg, copyMsg TSRMLS_CC );
}
intl_error_set_custom_msg( NULL, msg, copyMsg TSRMLS_CC );
}
void intl_errors_set_code( intl_error* err, UErrorCode err_code TSRMLS_DC )
{
if(err) {
intl_error_set_code( err, err_code TSRMLS_CC );
}
intl_error_set_code( NULL, err_code TSRMLS_CC );
}
void intl_register_IntlException_class( TSRMLS_D )
{
zend_class_entry ce,
*default_exception_ce;
default_exception_ce = zend_exception_get_default( TSRMLS_C );
INIT_CLASS_ENTRY_EX( ce, "IntlException", sizeof( "IntlException" ) - 1, NULL );
IntlException_ce_ptr = zend_register_internal_class_ex( &ce,
default_exception_ce, NULL TSRMLS_CC );
IntlException_ce_ptr->create_object = default_exception_ce->create_object;
}
smart_str intl_parse_error_to_string( UParseError* pe )
{
smart_str ret = {0};
char *buf;
int u8len;
UErrorCode status;
int any = 0;
assert( pe != NULL );
smart_str_appends( &ret, "parse error " );
if( pe->line > 0 )
{
smart_str_appends( &ret, "on line " );
smart_str_append_long( &ret, (long ) pe->line );
any = 1;
}
if( pe->offset >= 0 ) {
if( any )
smart_str_appends( &ret, ", " );
else
smart_str_appends( &ret, "at " );
smart_str_appends( &ret, "offset " );
smart_str_append_long( &ret, (long ) pe->offset );
any = 1;
}
if (pe->preContext[0] != 0 ) {
if( any )
smart_str_appends( &ret, ", " );
smart_str_appends( &ret, "after \"" );
intl_convert_utf16_to_utf8( &buf, &u8len, pe->preContext, -1, &status );
if( U_FAILURE( status ) )
{
smart_str_appends( &ret, "(could not convert parser error pre-context to UTF-8)" );
}
else {
smart_str_appendl( &ret, buf, u8len );
efree( buf );
}
smart_str_appends( &ret, "\"" );
any = 1;
}
if( pe->postContext[0] != 0 )
{
if( any )
smart_str_appends( &ret, ", " );
smart_str_appends( &ret, "before or at \"" );
intl_convert_utf16_to_utf8( &buf, &u8len, pe->postContext, -1, &status );
if( U_FAILURE( status ) )
{
smart_str_appends( &ret, "(could not convert parser error post-context to UTF-8)" );
}
else
{
smart_str_appendl( &ret, buf, u8len );
efree( buf );
}
smart_str_appends( &ret, "\"" );
any = 1;
}
if( !any )
{
smart_str_free( &ret );
smart_str_appends( &ret, "no parse error" );
}
smart_str_0( &ret );
return ret;
}