mirror of
https://github.com/php/php-src.git
synced 2024-10-19 07:22:40 +00:00
eb1837d9de
- Added arginfo - Fixed WS - Changed C++ comments to C comments
182 lines
6.7 KiB
C
Executable File
182 lines
6.7 KiB
C
Executable File
/*
|
|
+----------------------------------------------------------------------+
|
|
| PHP Version 5 |
|
|
+----------------------------------------------------------------------+
|
|
| 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. |
|
|
+----------------------------------------------------------------------+
|
|
| Authors: Kirti Velankar <kirtig@yahoo-inc.com> |
|
|
+----------------------------------------------------------------------+
|
|
*/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include <unicode/ustring.h>
|
|
#include <unicode/ucal.h>
|
|
|
|
#include "php_intl.h"
|
|
#include "intl_convert.h"
|
|
#include "dateformat.h"
|
|
#include "dateformat_class.h"
|
|
#include "dateformat_format.h"
|
|
#include "dateformat_data.h"
|
|
|
|
/* {{{
|
|
* Internal function which calls the udat_format
|
|
*/
|
|
static void internal_format(IntlDateFormatter_object *dfo, UDate timestamp , zval *return_value TSRMLS_DC){
|
|
UChar* formatted = NULL;
|
|
int32_t resultlengthneeded =0 ;
|
|
|
|
resultlengthneeded=udat_format( DATE_FORMAT_OBJECT(dfo), timestamp, NULL, resultlengthneeded, NULL, &INTL_DATA_ERROR_CODE(dfo));
|
|
if(INTL_DATA_ERROR_CODE(dfo)==U_BUFFER_OVERFLOW_ERROR)
|
|
{
|
|
INTL_DATA_ERROR_CODE(dfo)=U_ZERO_ERROR;
|
|
formatted=(UChar*)emalloc(sizeof(UChar) * resultlengthneeded);
|
|
udat_format( DATE_FORMAT_OBJECT(dfo), timestamp, formatted, resultlengthneeded, NULL, &INTL_DATA_ERROR_CODE(dfo));
|
|
}
|
|
|
|
if (formatted && U_FAILURE( INTL_DATA_ERROR_CODE(dfo) ) ) {
|
|
efree(formatted);
|
|
}
|
|
|
|
INTL_METHOD_CHECK_STATUS( dfo, "Date formatting failed" );
|
|
INTL_METHOD_RETVAL_UTF8( dfo, formatted, resultlengthneeded, 1 );
|
|
|
|
}
|
|
/* }}} */
|
|
|
|
|
|
/* {{{
|
|
* Internal function which fetches an element from the passed array for the key_name passed
|
|
*/
|
|
static double internal_get_arr_ele(IntlDateFormatter_object *dfo , HashTable* hash_arr ,char* key_name TSRMLS_DC){
|
|
zval** ele_value = NULL;
|
|
UDate result = -1;
|
|
|
|
if( zend_hash_find( hash_arr , key_name , strlen(key_name) + 1 ,(void **)&ele_value ) == SUCCESS ){
|
|
if( Z_TYPE_PP(ele_value)!= IS_LONG ){
|
|
intl_error_set( NULL, U_ILLEGAL_ARGUMENT_ERROR,
|
|
"datefmt_format: parameter array does not contain a long element.", 0 TSRMLS_CC );
|
|
}else{
|
|
result = Z_LVAL_PP(ele_value);
|
|
}
|
|
}
|
|
/* printf("\n Inside internal_get_arr_ele key_name= %s , result = %g \n" , key_name, result); */
|
|
return result;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{
|
|
* Internal function which creates a UCalendar from the passed array
|
|
*/
|
|
static void internal_create_ucal(IntlDateFormatter_object *dfo, HashTable* hash_arr , UCalendar* pcal TSRMLS_DC){
|
|
long year =0;
|
|
long month =0;
|
|
long hour =0;
|
|
long minute =0;
|
|
long second =0;
|
|
long wday =0;
|
|
long yday =0;
|
|
long mday =0;
|
|
UBool isInDST = FALSE;
|
|
|
|
/* Fetch values from the incoming array */
|
|
year = internal_get_arr_ele( dfo , hash_arr , CALENDAR_YEAR TSRMLS_CC) + 1900; /* tm_year is years since 1900 */
|
|
/* Month in ICU and PHP starts from January =0 */
|
|
month = internal_get_arr_ele( dfo , hash_arr , CALENDAR_MON TSRMLS_CC);
|
|
hour = internal_get_arr_ele( dfo , hash_arr , CALENDAR_HOUR TSRMLS_CC);
|
|
minute = internal_get_arr_ele( dfo , hash_arr , CALENDAR_MIN TSRMLS_CC);
|
|
second = internal_get_arr_ele( dfo , hash_arr , CALENDAR_SEC TSRMLS_CC);
|
|
wday = internal_get_arr_ele( dfo , hash_arr , CALENDAR_WDAY TSRMLS_CC);
|
|
yday = internal_get_arr_ele( dfo , hash_arr , CALENDAR_YDAY TSRMLS_CC);
|
|
isInDST = internal_get_arr_ele( dfo , hash_arr , CALENDAR_ISDST TSRMLS_CC);
|
|
/* For the ucal_setDateTime() function , this is the 'date' value */
|
|
mday = internal_get_arr_ele( dfo , hash_arr , CALENDAR_MDAY TSRMLS_CC);
|
|
|
|
/* set the incoming values for the calendar */
|
|
ucal_setDateTime( pcal, year, month , mday , hour , minute , second , &INTL_DATA_ERROR_CODE(dfo));
|
|
if( INTL_DATA_ERROR_CODE(dfo) != U_ZERO_ERROR){
|
|
return;
|
|
}
|
|
/* ICU UCAL_DAY_OF_WEEK starts from SUNDAY=1 thru SATURDAY=7
|
|
* whereas PHP localtime has tm_wday SUNDAY=0 thru SATURDAY=6 */
|
|
ucal_set( pcal, UCAL_DAY_OF_WEEK , (wday+1));
|
|
ucal_set( pcal, UCAL_DAY_OF_YEAR , yday);
|
|
|
|
/* TO DO: How to set the isInDST field?Is it required to set */
|
|
}
|
|
|
|
|
|
/* {{{ proto string IntlDateFormatter::format( [mixed]int $args or array $args )
|
|
* Format the time value as a string. }}}*/
|
|
/* {{{ proto string datefmt_format( [mixed]int $args or array $args )
|
|
* Format the time value as a string. }}}*/
|
|
PHP_FUNCTION(datefmt_format)
|
|
{
|
|
UDate timestamp =0;
|
|
UDate p_timestamp =0;
|
|
UCalendar* temp_cal ;
|
|
HashTable* hash_arr = NULL;
|
|
zval* zarg = NULL;
|
|
|
|
DATE_FORMAT_METHOD_INIT_VARS;
|
|
|
|
/* Parse parameters. */
|
|
if( zend_parse_method_parameters( ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "Oz", &object, IntlDateFormatter_ce_ptr ,&zarg ) == FAILURE )
|
|
{
|
|
intl_error_set( NULL, U_ILLEGAL_ARGUMENT_ERROR, "datefmt_format: unable to parse input params", 0 TSRMLS_CC );
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
/* Fetch the object. */
|
|
DATE_FORMAT_METHOD_FETCH_OBJECT;
|
|
|
|
switch(Z_TYPE_P(zarg) ){
|
|
case IS_LONG:
|
|
p_timestamp = Z_LVAL_P(zarg) ;
|
|
timestamp = p_timestamp * 1000;
|
|
break;
|
|
case IS_DOUBLE:
|
|
/* timestamp*1000 since ICU expects it in milliseconds */
|
|
p_timestamp = Z_DVAL_P(zarg) ;
|
|
timestamp = p_timestamp * 1000;
|
|
break;
|
|
case IS_ARRAY:
|
|
hash_arr = Z_ARRVAL_P(zarg);
|
|
if( !hash_arr || zend_hash_num_elements( hash_arr ) == 0 )
|
|
RETURN_FALSE;
|
|
/* Create a UCalendar object from the array and then format it */
|
|
temp_cal = ucal_open(NULL, -1, NULL, UCAL_GREGORIAN, &INTL_DATA_ERROR_CODE(dfo));
|
|
ucal_clear(temp_cal);
|
|
INTL_METHOD_CHECK_STATUS( dfo, "datefmt_format: Date formatting failed while creating calendar from the array" )
|
|
internal_create_ucal( dfo , hash_arr , temp_cal TSRMLS_CC);
|
|
INTL_METHOD_CHECK_STATUS( dfo, "datefmt_format: Date formatting failed while creating calendar from the array" )
|
|
/* Fetch the timestamp from the created UCalendar */
|
|
timestamp = ucal_getMillis(temp_cal , &INTL_DATA_ERROR_CODE(dfo) );
|
|
INTL_METHOD_CHECK_STATUS( dfo, "datefmt_format: Date formatting failed" )
|
|
break;
|
|
/*
|
|
case IS_OBJECT:
|
|
break;
|
|
*/
|
|
default:
|
|
intl_error_set( NULL, U_ILLEGAL_ARGUMENT_ERROR,
|
|
"datefmt_format: takes either an array or an integer TimeStamp value ", 0 TSRMLS_CC );
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
internal_format( dfo, timestamp ,return_value TSRMLS_CC);
|
|
|
|
}
|
|
|
|
/* }}} */
|
|
|