1 /* 2 +----------------------------------------------------------------------+ 3 | PHP Version 5 | 4 +----------------------------------------------------------------------+ 5 | This source file is subject to version 3.01 of the PHP license, | 6 | that is bundled with this package in the file LICENSE, and is | 7 | available through the world-wide-web at the following url: | 8 | http://www.php.net/license/3_01.txt | 9 | If you did not receive a copy of the PHP license and are unable to | 10 | obtain it through the world-wide-web, please send a note to | 11 | license@php.net so we can mail you a copy immediately. | 12 +----------------------------------------------------------------------+ 13 | Authors: Vadim Savchuk <vsavchuk@productengine.com> | 14 | Dmitry Lakhtyuk <dlakhtyuk@productengine.com> | 15 | Stanislav Malyshev <stas@zend.com> | 16 +----------------------------------------------------------------------+ 17 */ 18 19 #ifndef INTL_DATA_H 20 #define INTL_DATA_H 21 22 #include <unicode/utypes.h> 23 24 #include "intl_error.h" 25 26 /* Mock object to generalize error handling in sub-modules. 27 Sub-module data structures should always have error as first element 28 for this to work! 29 */ 30 typedef struct _intl_data { 31 zend_object zo; 32 intl_error error; 33 } intl_object; 34 35 #define INTL_METHOD_INIT_VARS(oclass, obj) \ 36 zval* object = NULL; \ 37 oclass##_object* obj = NULL; \ 38 intl_error_reset( NULL TSRMLS_CC ); 39 40 #define INTL_DATA_ERROR(obj) (((intl_object *)(obj))->error) 41 #define INTL_DATA_ERROR_P(obj) (&(INTL_DATA_ERROR((obj)))) 42 #define INTL_DATA_ERROR_CODE(obj) INTL_ERROR_CODE(INTL_DATA_ERROR((obj))) 43 44 #define INTL_METHOD_FETCH_OBJECT(oclass, obj) \ 45 obj = (oclass##_object *) zend_object_store_get_object( object TSRMLS_CC ); \ 46 intl_error_reset( INTL_DATA_ERROR_P(obj) TSRMLS_CC ); \ 47 48 /* Check status by error code, if error - exit */ 49 #define INTL_CHECK_STATUS(err, msg) \ 50 intl_error_set_code( NULL, (err) TSRMLS_CC ); \ 51 if( U_FAILURE((err)) ) \ 52 { \ 53 intl_error_set_custom_msg( NULL, msg, 0 TSRMLS_CC ); \ 54 RETURN_FALSE; \ 55 } 56 57 /* Check status in object, if error - exit */ 58 #define INTL_METHOD_CHECK_STATUS(obj, msg) \ 59 intl_error_set_code( NULL, INTL_DATA_ERROR_CODE((obj)) TSRMLS_CC ); \ 60 if( U_FAILURE( INTL_DATA_ERROR_CODE((obj)) ) ) \ 61 { \ 62 intl_errors_set_custom_msg( INTL_DATA_ERROR_P((obj)), msg, 0 TSRMLS_CC ); \ 63 RETURN_FALSE; \ 64 } 65 66 /* Check status, if error - destroy value and exit */ 67 #define INTL_CTOR_CHECK_STATUS(obj, msg) \ 68 intl_error_set_code( NULL, INTL_DATA_ERROR_CODE((obj)) TSRMLS_CC ); \ 69 if( U_FAILURE( INTL_DATA_ERROR_CODE((obj)) ) ) \ 70 { \ 71 intl_errors_set_custom_msg( INTL_DATA_ERROR_P((obj)), msg, 0 TSRMLS_CC ); \ 72 zval_dtor(return_value); \ 73 RETURN_NULL(); \ 74 } 75 76 #define INTL_METHOD_RETVAL_UTF8(obj, ustring, ulen, free_it) \ 77 { \ 78 char *u8value; \ 79 int u8len; \ 80 intl_convert_utf16_to_utf8(&u8value, &u8len, ustring, ulen, &INTL_DATA_ERROR_CODE((obj))); \ 81 if((free_it)) { \ 82 efree(ustring); \ 83 } \ 84 INTL_METHOD_CHECK_STATUS((obj), "Error converting value to UTF-8"); \ 85 RETVAL_STRINGL(u8value, u8len, 0); \ 86 } 87 88 #define INTL_MAX_LOCALE_LEN 80 89 90 #define INTL_CHECK_LOCALE_LEN(locale_len) \ 91 if((locale_len) > INTL_MAX_LOCALE_LEN) { \ 92 intl_error_set( NULL, U_ILLEGAL_ARGUMENT_ERROR, \ 93 "Locale string too long, should be no longer than 80 characters", 0 TSRMLS_CC ); \ 94 RETURN_NULL(); \ 95 } 96 97 #define INTL_CHECK_LOCALE_LEN_OBJ(locale_len, object) \ 98 if((locale_len) > INTL_MAX_LOCALE_LEN) { \ 99 intl_error_set( NULL, U_ILLEGAL_ARGUMENT_ERROR, \ 100 "Locale string too long, should be no longer than 80 characters", 0 TSRMLS_CC ); \ 101 zval_dtor(object); \ 102 ZVAL_NULL(object); \ 103 RETURN_NULL(); \ 104 } 105 106 107 #endif // INTL_DATA_H 108
