Annotation of embedaddon/php/ext/intl/dateformat/dateformat_format.c, revision 1.1
1.1 ! misho 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 <unicode/ucal.h>
! 23:
! 24: #include "php_intl.h"
! 25: #include "intl_convert.h"
! 26: #include "dateformat.h"
! 27: #include "dateformat_class.h"
! 28: #include "dateformat_format.h"
! 29: #include "dateformat_data.h"
! 30: #include "ext/date/php_date.h"
! 31:
! 32: /* {{{
! 33: * Internal function which calls the udat_format
! 34: */
! 35: static void internal_format(IntlDateFormatter_object *dfo, UDate timestamp, zval *return_value TSRMLS_DC)
! 36: {
! 37: UChar* formatted = NULL;
! 38: int32_t resultlengthneeded =0 ;
! 39:
! 40: resultlengthneeded=udat_format( DATE_FORMAT_OBJECT(dfo), timestamp, NULL, resultlengthneeded, NULL, &INTL_DATA_ERROR_CODE(dfo));
! 41: if(INTL_DATA_ERROR_CODE(dfo)==U_BUFFER_OVERFLOW_ERROR)
! 42: {
! 43: INTL_DATA_ERROR_CODE(dfo)=U_ZERO_ERROR;
! 44: formatted=(UChar*)emalloc(sizeof(UChar) * resultlengthneeded);
! 45: udat_format( DATE_FORMAT_OBJECT(dfo), timestamp, formatted, resultlengthneeded, NULL, &INTL_DATA_ERROR_CODE(dfo));
! 46: }
! 47:
! 48: if (formatted && U_FAILURE( INTL_DATA_ERROR_CODE(dfo) ) ) {
! 49: efree(formatted);
! 50: }
! 51:
! 52: INTL_METHOD_CHECK_STATUS( dfo, "Date formatting failed" );
! 53: INTL_METHOD_RETVAL_UTF8( dfo, formatted, resultlengthneeded, 1 );
! 54:
! 55: }
! 56: /* }}} */
! 57:
! 58:
! 59: /* {{{
! 60: * Internal function which fetches an element from the passed array for the key_name passed
! 61: */
! 62: static double internal_get_arr_ele(IntlDateFormatter_object *dfo, HashTable* hash_arr, char* key_name TSRMLS_DC)
! 63: {
! 64: zval** ele_value = NULL;
! 65: UDate result = -1;
! 66:
! 67: if( zend_hash_find( hash_arr, key_name, strlen(key_name) + 1, (void **)&ele_value ) == SUCCESS ){
! 68: if( Z_TYPE_PP(ele_value)!= IS_LONG ){
! 69: intl_error_set( NULL, U_ILLEGAL_ARGUMENT_ERROR,
! 70: "datefmt_format: parameter array does not contain a long element.", 0 TSRMLS_CC );
! 71: }else{
! 72: result = Z_LVAL_PP(ele_value);
! 73: }
! 74: }
! 75: /* printf("\n Inside internal_get_arr_ele key_name= %s, result = %g \n", key_name, result); */
! 76: return result;
! 77: }
! 78: /* }}} */
! 79:
! 80: /* {{{
! 81: * Internal function which sets UCalendar from the passed array and retrieves timestamp
! 82: */
! 83: static UDate internal_get_timestamp(IntlDateFormatter_object *dfo, HashTable* hash_arr TSRMLS_DC)
! 84: {
! 85: long year =0;
! 86: long month =0;
! 87: long hour =0;
! 88: long minute =0;
! 89: long second =0;
! 90: long wday =0;
! 91: long yday =0;
! 92: long mday =0;
! 93: UBool isInDST = FALSE;
! 94: UCalendar *pcal;
! 95:
! 96: /* Fetch values from the incoming array */
! 97: year = internal_get_arr_ele( dfo, hash_arr, CALENDAR_YEAR TSRMLS_CC) + 1900; /* tm_year is years since 1900 */
! 98: /* Month in ICU and PHP starts from January =0 */
! 99: month = internal_get_arr_ele( dfo, hash_arr, CALENDAR_MON TSRMLS_CC);
! 100: hour = internal_get_arr_ele( dfo, hash_arr, CALENDAR_HOUR TSRMLS_CC);
! 101: minute = internal_get_arr_ele( dfo, hash_arr, CALENDAR_MIN TSRMLS_CC);
! 102: second = internal_get_arr_ele( dfo, hash_arr, CALENDAR_SEC TSRMLS_CC);
! 103: wday = internal_get_arr_ele( dfo, hash_arr, CALENDAR_WDAY TSRMLS_CC);
! 104: yday = internal_get_arr_ele( dfo, hash_arr, CALENDAR_YDAY TSRMLS_CC);
! 105: isInDST = internal_get_arr_ele( dfo, hash_arr, CALENDAR_ISDST TSRMLS_CC);
! 106: /* For the ucal_setDateTime() function, this is the 'date' value */
! 107: mday = internal_get_arr_ele( dfo, hash_arr, CALENDAR_MDAY TSRMLS_CC);
! 108:
! 109: pcal = udat_getCalendar(DATE_FORMAT_OBJECT(dfo));
! 110: /* set the incoming values for the calendar */
! 111: ucal_setDateTime( pcal, year, month, mday, hour, minute, second, &INTL_DATA_ERROR_CODE(dfo));
! 112: if( INTL_DATA_ERROR_CODE(dfo) != U_ZERO_ERROR){
! 113: return 0;
! 114: }
! 115:
! 116: /* Fetch the timestamp from the UCalendar */
! 117: return ucal_getMillis(pcal, &INTL_DATA_ERROR_CODE(dfo) );
! 118: }
! 119:
! 120:
! 121: /* {{{ proto string IntlDateFormatter::format( [mixed]int $args or array $args )
! 122: * Format the time value as a string. }}}*/
! 123: /* {{{ proto string datefmt_format( [mixed]int $args or array $args )
! 124: * Format the time value as a string. }}}*/
! 125: PHP_FUNCTION(datefmt_format)
! 126: {
! 127: UDate timestamp =0;
! 128: UDate p_timestamp =0;
! 129: HashTable* hash_arr = NULL;
! 130: zval* zarg = NULL;
! 131:
! 132: DATE_FORMAT_METHOD_INIT_VARS;
! 133:
! 134: /* Parse parameters. */
! 135: if( zend_parse_method_parameters( ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "Oz", &object, IntlDateFormatter_ce_ptr,&zarg ) == FAILURE )
! 136: {
! 137: intl_error_set( NULL, U_ILLEGAL_ARGUMENT_ERROR, "datefmt_format: unable to parse input params", 0 TSRMLS_CC );
! 138: RETURN_FALSE;
! 139: }
! 140:
! 141: /* Fetch the object. */
! 142: DATE_FORMAT_METHOD_FETCH_OBJECT;
! 143:
! 144: switch(Z_TYPE_P(zarg) ){
! 145: case IS_LONG:
! 146: p_timestamp = Z_LVAL_P(zarg) ;
! 147: timestamp = p_timestamp * 1000;
! 148: break;
! 149: case IS_DOUBLE:
! 150: /* timestamp*1000 since ICU expects it in milliseconds */
! 151: p_timestamp = Z_DVAL_P(zarg) ;
! 152: timestamp = p_timestamp * 1000;
! 153: break;
! 154: case IS_ARRAY:
! 155: hash_arr = Z_ARRVAL_P(zarg);
! 156: if( !hash_arr || zend_hash_num_elements( hash_arr ) == 0 )
! 157: RETURN_FALSE;
! 158:
! 159: timestamp = internal_get_timestamp(dfo, hash_arr TSRMLS_CC);
! 160: INTL_METHOD_CHECK_STATUS( dfo, "datefmt_format: Date formatting failed" )
! 161: break;
! 162: case IS_OBJECT: {
! 163: zend_class_entry *date_ce = php_date_get_date_ce();
! 164: zval retval;
! 165: zval *zfuncname;
! 166: if(!instanceof_function(Z_OBJCE_P(zarg), date_ce TSRMLS_CC)) {
! 167: intl_errors_set(INTL_DATA_ERROR_P(dfo), U_ILLEGAL_ARGUMENT_ERROR, "datefmt_format: object must be an instance of DateTime", 0 TSRMLS_CC );
! 168: RETURN_FALSE;
! 169: }
! 170: INIT_ZVAL(retval);
! 171: MAKE_STD_ZVAL(zfuncname);
! 172: ZVAL_STRING(zfuncname, "getTimestamp", 1);
! 173: if(call_user_function(NULL, &zarg, zfuncname, &retval, 0, NULL TSRMLS_CC) != SUCCESS || Z_TYPE(retval) != IS_LONG) {
! 174: intl_errors_set(INTL_DATA_ERROR_P(dfo), U_ILLEGAL_ARGUMENT_ERROR, "datefmt_format: cannot get timestamp", 0 TSRMLS_CC );
! 175: zval_ptr_dtor(&zfuncname);
! 176: RETURN_FALSE;
! 177: }
! 178: zval_ptr_dtor(&zfuncname);
! 179: p_timestamp = Z_LVAL(retval);
! 180: timestamp = p_timestamp*1000;
! 181: }
! 182: break;
! 183: default:
! 184: intl_errors_set( INTL_DATA_ERROR_P(dfo), U_ILLEGAL_ARGUMENT_ERROR,
! 185: "datefmt_format: takes either an array or an integer timestamp value or a DateTime object", 0 TSRMLS_CC );
! 186: RETURN_FALSE;
! 187: }
! 188:
! 189: internal_format( dfo, timestamp, return_value TSRMLS_CC);
! 190:
! 191: }
! 192:
! 193: /* }}} */
! 194:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>