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: Kirti Velankar <kirtig@yahoo-inc.com> | 14 +----------------------------------------------------------------------+ 15*/ 16 17#ifdef HAVE_CONFIG_H 18#include "config.h" 19#endif 20 21#include <unicode/ustring.h> 22#include <math.h> 23 24#include "php_intl.h" 25#include "intl_convert.h" 26#include "dateformat.h" 27#include "dateformat_class.h" 28#include "dateformat_parse.h" 29#include "dateformat_data.h" 30 31/* {{{ 32 * Internal function which calls the udat_parse 33 * param int store_error acts like a boolean 34 * if set to 1 - store any error encountered in the parameter parse_error 35 * if set to 0 - no need to store any error encountered in the parameter parse_error 36*/ 37static void internal_parse_to_timestamp(IntlDateFormatter_object *dfo, char* text_to_parse, int32_t text_len, int32_t *parse_pos, zval *return_value TSRMLS_DC) 38{ 39 double result = 0; 40 UDate timestamp =0; 41 UChar* text_utf16 = NULL; 42 int32_t text_utf16_len = 0; 43 44 /* Convert timezone to UTF-16. */ 45 intl_convert_utf8_to_utf16(&text_utf16, &text_utf16_len, text_to_parse, text_len, &INTL_DATA_ERROR_CODE(dfo)); 46 INTL_METHOD_CHECK_STATUS(dfo, "Error converting timezone to UTF-16" ); 47 48 timestamp = udat_parse( DATE_FORMAT_OBJECT(dfo), text_utf16, text_utf16_len, parse_pos, &INTL_DATA_ERROR_CODE(dfo)); 49 if( text_utf16 ){ 50 efree(text_utf16); 51 } 52 53 INTL_METHOD_CHECK_STATUS( dfo, "Date parsing failed" ); 54 55 /* Since return is in sec. */ 56 result = (double)timestamp / U_MILLIS_PER_SECOND; 57 if(result > LONG_MAX || result < -LONG_MAX) { 58 ZVAL_DOUBLE(return_value, result<0?ceil(result):floor(result)); 59 } else { 60 ZVAL_LONG(return_value, (long)result); 61 } 62} 63/* }}} */ 64 65static void add_to_localtime_arr( IntlDateFormatter_object *dfo, zval* return_value, UCalendar parsed_calendar, long calendar_field, char* key_name TSRMLS_DC) 66{ 67 long calendar_field_val = ucal_get( parsed_calendar, calendar_field, &INTL_DATA_ERROR_CODE(dfo)); 68 INTL_METHOD_CHECK_STATUS( dfo, "Date parsing - localtime failed : could not get a field from calendar" ); 69 70 if( strcmp(key_name, CALENDAR_YEAR )==0 ){ 71 /* since tm_year is years from 1900 */ 72 add_assoc_long( return_value, key_name,( calendar_field_val-1900) ); 73 }else if( strcmp(key_name, CALENDAR_WDAY )==0 ){ 74 /* since tm_wday starts from 0 whereas ICU WDAY start from 1 */ 75 add_assoc_long( return_value, key_name,( calendar_field_val-1) ); 76 }else{ 77 add_assoc_long( return_value, key_name, calendar_field_val ); 78 } 79} 80 81/* {{{ 82 * Internal function which calls the udat_parseCalendar 83*/ 84static void internal_parse_to_localtime(IntlDateFormatter_object *dfo, char* text_to_parse, int32_t text_len, int32_t *parse_pos, zval *return_value TSRMLS_DC) 85{ 86 UCalendar* parsed_calendar = NULL; 87 UChar* text_utf16 = NULL; 88 int32_t text_utf16_len = 0; 89 long isInDST = 0; 90 91 /* Convert timezone to UTF-16. */ 92 intl_convert_utf8_to_utf16(&text_utf16, &text_utf16_len, text_to_parse, text_len, &INTL_DATA_ERROR_CODE(dfo)); 93 INTL_METHOD_CHECK_STATUS(dfo, "Error converting timezone to UTF-16" ); 94 95 parsed_calendar = udat_getCalendar(DATE_FORMAT_OBJECT(dfo)); 96 udat_parseCalendar( DATE_FORMAT_OBJECT(dfo), parsed_calendar, text_utf16, text_utf16_len, parse_pos, &INTL_DATA_ERROR_CODE(dfo)); 97 98 if (text_utf16) { 99 efree(text_utf16); 100 } 101 102 INTL_METHOD_CHECK_STATUS( dfo, "Date parsing failed" ); 103 104 105 array_init( return_value ); 106 /* Add entries from various fields of the obtained parsed_calendar */ 107 add_to_localtime_arr( dfo, return_value, parsed_calendar, UCAL_SECOND, CALENDAR_SEC TSRMLS_CC); 108 add_to_localtime_arr( dfo, return_value, parsed_calendar, UCAL_MINUTE, CALENDAR_MIN TSRMLS_CC); 109 add_to_localtime_arr( dfo, return_value, parsed_calendar, UCAL_HOUR_OF_DAY, CALENDAR_HOUR TSRMLS_CC); 110 add_to_localtime_arr( dfo, return_value, parsed_calendar, UCAL_YEAR, CALENDAR_YEAR TSRMLS_CC); 111 add_to_localtime_arr( dfo, return_value, parsed_calendar, UCAL_DAY_OF_MONTH, CALENDAR_MDAY TSRMLS_CC); 112 add_to_localtime_arr( dfo, return_value, parsed_calendar, UCAL_DAY_OF_WEEK, CALENDAR_WDAY TSRMLS_CC); 113 add_to_localtime_arr( dfo, return_value, parsed_calendar, UCAL_DAY_OF_YEAR, CALENDAR_YDAY TSRMLS_CC); 114 add_to_localtime_arr( dfo, return_value, parsed_calendar, UCAL_MONTH, CALENDAR_MON TSRMLS_CC); 115 116 /* Is in DST? */ 117 isInDST = ucal_inDaylightTime(parsed_calendar , &INTL_DATA_ERROR_CODE(dfo)); 118 INTL_METHOD_CHECK_STATUS( dfo, "Date parsing - localtime failed : while checking if currently in DST." ); 119 add_assoc_long( return_value, CALENDAR_ISDST,(isInDST==1?1:0)); 120} 121/* }}} */ 122 123 124/* {{{ proto integer IntlDateFormatter::parse( string $text_to_parse [, int $parse_pos] ) 125 * Parse the string $value starting at parse_pos to a Unix timestamp -int }}}*/ 126/* {{{ proto integer datefmt_parse( IntlDateFormatter $fmt, string $text_to_parse [, int $parse_pos] ) 127 * Parse the string $value starting at parse_pos to a Unix timestamp -int }}}*/ 128PHP_FUNCTION(datefmt_parse) 129{ 130 char* text_to_parse = NULL; 131 int32_t text_len =0; 132 zval* z_parse_pos = NULL; 133 int32_t parse_pos = -1; 134 135 DATE_FORMAT_METHOD_INIT_VARS; 136 137 /* Parse parameters. */ 138 if( zend_parse_method_parameters( ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "Os|z!", 139 &object, IntlDateFormatter_ce_ptr, &text_to_parse, &text_len, &z_parse_pos ) == FAILURE ){ 140 intl_error_set( NULL, U_ILLEGAL_ARGUMENT_ERROR, "datefmt_parse: unable to parse input params", 0 TSRMLS_CC ); 141 RETURN_FALSE; 142 } 143 144 /* Fetch the object. */ 145 DATE_FORMAT_METHOD_FETCH_OBJECT; 146 147 if (z_parse_pos) { 148 convert_to_long(z_parse_pos); 149 parse_pos = (int32_t)Z_LVAL_P(z_parse_pos); 150 if(parse_pos > text_len) { 151 RETURN_FALSE; 152 } 153 } 154 internal_parse_to_timestamp( dfo, text_to_parse, text_len, z_parse_pos?&parse_pos:NULL, return_value TSRMLS_CC); 155 if(z_parse_pos) { 156 zval_dtor(z_parse_pos); 157 ZVAL_LONG(z_parse_pos, parse_pos); 158 } 159} 160/* }}} */ 161 162/* {{{ proto integer IntlDateFormatter::localtime( string $text_to_parse[, int $parse_pos] ) 163 * Parse the string $value to a localtime array }}}*/ 164/* {{{ proto integer datefmt_localtime( IntlDateFormatter $fmt, string $text_to_parse[, int $parse_pos ]) 165 * Parse the string $value to a localtime array }}}*/ 166PHP_FUNCTION(datefmt_localtime) 167{ 168 char* text_to_parse = NULL; 169 int32_t text_len =0; 170 zval* z_parse_pos = NULL; 171 int32_t parse_pos = -1; 172 173 DATE_FORMAT_METHOD_INIT_VARS; 174 175 /* Parse parameters. */ 176 if( zend_parse_method_parameters( ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "Os|z!", 177 &object, IntlDateFormatter_ce_ptr, &text_to_parse, &text_len, &z_parse_pos ) == FAILURE ){ 178 intl_error_set( NULL, U_ILLEGAL_ARGUMENT_ERROR, "datefmt_parse_to_localtime: unable to parse input params", 0 TSRMLS_CC ); 179 RETURN_FALSE; 180 } 181 182 /* Fetch the object. */ 183 DATE_FORMAT_METHOD_FETCH_OBJECT; 184 185 if(z_parse_pos) { 186 convert_to_long(z_parse_pos); 187 parse_pos = (int32_t)Z_LVAL_P(z_parse_pos); 188 if(parse_pos > text_len) { 189 RETURN_FALSE; 190 } 191 } 192 internal_parse_to_localtime( dfo, text_to_parse, text_len, z_parse_pos?&parse_pos:NULL, return_value TSRMLS_CC); 193 if(z_parse_pos) { 194 zval_dtor(z_parse_pos); 195 ZVAL_LONG(z_parse_pos, parse_pos); 196 } 197} 198/* }}} */ 199 200