[apple/icu.git] / icuSources / test / cintltst / cdtrgtst.c

/********************************************************************
 * COPYRIGHT: 
 * Copyright (c) 1997-2003, International Business Machines Corporation and
 * others. All Rights Reserved.
 ********************************************************************/
/********************************************************************************
*
* File CDTRGTST.C
*
*     Madhu Katragadda            Ported for C API
* Modification History:
*   Date        Name        Description
*   07/15/99    helena      Ported to HPUX 10/11 CC.
*********************************************************************************
*/
/* REGRESSION TEST FOR DATE FORMAT */

#include "unicode/utypes.h"

#if !UCONFIG_NO_FORMATTING

#include "unicode/uloc.h"
#include "unicode/udat.h"
#include "unicode/ucal.h"
#include "unicode/unum.h"
#include "unicode/ustring.h"
#include "cintltst.h"
#include "cdtrgtst.h"
#include "cmemory.h"

void addDateForRgrTest(TestNode** root);

void addDateForRgrTest(TestNode** root)
{
    addTest(root, &Test4029195, "tsformat/cdtrgtst/Test4029195");
    addTest(root, &Test4056591, "tsformat/cdtrgtst/Test4056591");
    addTest(root, &Test4059917, "tsformat/cdtrgtst/Test4059917");
    addTest(root, &Test4060212, "tsformat/cdtrgtst/Test4060212");
    addTest(root, &Test4061287, "tsformat/cdtrgtst/Test4061287");
    addTest(root, &Test4073003, "tsformat/cdtrgtst/Test4073003");
    addTest(root, &Test4162071, "tsformat/cdtrgtst/Test4162071");
    addTest(root, &Test714,   "tsformat/cdtrgtst/Test714");
}

/**
 * @bug 4029195
 */
void Test4029195() 
{
    int32_t resultlength, resultlengthneeded;
    UChar  *fmdt, *todayS, *rt;
    UChar *pat=NULL;
    UChar *temp;
    UDate today, d1;
    UDateFormat *df;
    int32_t parsepos;
    UErrorCode status = U_ZERO_ERROR;

    log_verbose("Testing date format and parse function in regression test\n");
    today = ucal_getNow();
    
    df = udat_open(UDAT_DEFAULT,UDAT_DEFAULT ,"en_US", NULL, 0, NULL, 0, &status);
    if(U_FAILURE(status))
    {
        log_err("FAIL: error in creating the dateformat using default date and time style : %s\n", myErrorName(status));
        return;
    }
    resultlength=0;
    resultlengthneeded=udat_toPattern(df, TRUE, NULL, resultlength, &status);
    if(status==U_BUFFER_OVERFLOW_ERROR)
    {
        status=U_ZERO_ERROR;
        resultlength=resultlengthneeded + 1;
        pat=(UChar*)malloc(sizeof(UChar) * resultlength);
        udat_toPattern(df, TRUE, pat, resultlength, &status);
    }
    
    log_verbose("pattern: %s\n", austrdup(pat));

    
    fmdt = myFormatit(df, today);
    if(fmdt) {
      log_verbose("today: %s\n", austrdup(fmdt));
    } else {
      log_data_err("ERROR: couldn't format, exitting test");
      return;
    }
    
    temp=(UChar*)malloc(sizeof(UChar) * 10);
    u_uastrcpy(temp, "M yyyy dd");
    udat_applyPattern(df, TRUE, temp, u_strlen(temp));
    
    todayS =myFormatit(df, today);
    log_verbose("After teh pattern is applied\n today: %s\n", austrdup(todayS) );
    parsepos=0;
    d1=udat_parse(df, todayS, u_strlen(todayS), &parsepos, &status);
    if(U_FAILURE(status))
    {
        log_err("FAIL: Error in parsing using udat_parse(.....): %s\n", myErrorName(status));
    }
            
    rt =myFormatit(df, d1);
    log_verbose("today: %s\n", austrdup(rt) );
     
    log_verbose("round trip: %s\n", austrdup(rt) );
      
    if(u_strcmp(rt, todayS)!=0) {
            log_err("Fail: Want  %s  Got  %s\n", austrdup(todayS), austrdup(rt) );
    }
    else
        log_verbose("Pass: parse and format working fine\n");
    udat_close(df);
    free(temp);
    if(pat != NULL) {
        free(pat);
    }
}


/**
 * @bug 4056591
 * Verify the function of the [s|g]et2DigitYearStart() API.
 */
void Test4056591() 
{
    int i;
    UCalendar *cal;
    UDateFormat *def;    
    UDate start,exp,got;
    UChar s[10];
    UChar *gotdate, *expdate;
    UChar pat[10];
    UDate d[4];
    UErrorCode status = U_ZERO_ERROR;
    const char* strings[] = {
             "091225",
             "091224",
             "611226",
             "991227"
        };

    log_verbose("Testing s[get] 2 digit year start regressively\n");
    cal=ucal_open(NULL, 0, "en_US", UCAL_GREGORIAN, &status);
    if(U_FAILURE(status)){
        log_err("error in ucal_open caldef : %s\n", myErrorName(status));
    }
    ucal_setDateTime(cal, 1809, UCAL_DECEMBER, 25, 17, 40, 30, &status);
    d[0]=ucal_getMillis(cal, &status);
    if(U_FAILURE(status)){
            log_err("Error: failure in get millis: %s\n", myErrorName(status));
    }
    ucal_setDateTime(cal, 1909, UCAL_DECEMBER, 24, 17, 40, 30, &status);
    d[1]=ucal_getMillis(cal, &status);
    ucal_setDateTime(cal, 1861, UCAL_DECEMBER, 26, 17, 40, 30, &status);
    d[2]=ucal_getMillis(cal, &status);
    ucal_setDateTime(cal, 1999, UCAL_DECEMBER, 27, 17, 40, 30, &status);
    d[3]=ucal_getMillis(cal, &status);

    
    u_uastrcpy(pat, "yyMMdd");
    def = udat_open(UDAT_IGNORE,UDAT_IGNORE,NULL, NULL, 0, pat, u_strlen(pat), &status);
    if(U_FAILURE(status))
    {
        log_err("FAIL: error in creating the dateformat using u_openPattern(): %s\n", myErrorName(status));
        return;
    }
    start = 1800;
    udat_set2DigitYearStart(def, start, &status);
    if(U_FAILURE(status))
        log_err("ERROR: in setTwoDigitStartDate: %s\n", myErrorName(status));
    if( (udat_get2DigitYearStart(def, &status) != start))
        log_err("ERROR: get2DigitYearStart broken\n");
        

    for(i = 0; i < 4; ++i) {
        u_uastrcpy(s, strings[i]);
        exp = d[i];
        got = udat_parse(def, s, u_strlen(s), 0, &status);
        gotdate=myFormatit(def, got);
        expdate=myFormatit(def, exp);

        if(u_strcmp(gotdate, expdate) !=0){
            log_err("set2DigitYearStart broken for %s \n  got: %s, expected: %s\n", austrdup(s),
                austrdup(gotdate), austrdup(expdate) );
        }
    }
    
    udat_close(def);
    ucal_close(cal);
}


/**
 * @bug 4059917
 */
void Test4059917() 
{
    UDateFormat* def;
    UChar *myDate;
    UErrorCode status = U_ZERO_ERROR;
    UChar *pattern;
    UChar tzID[4];

    log_verbose("Testing apply pattern and to pattern regressively\n");
    u_uastrcpy(tzID, "PST");
    pattern=(UChar*)malloc(sizeof(UChar) * 11);
    u_uastrcpy(pattern, "yyyy/MM/dd");
    log_verbose("%s\n", austrdup(pattern) );
    def = udat_open(UDAT_IGNORE,UDAT_IGNORE,NULL,tzID,-1,pattern, u_strlen(pattern),&status);
    if(U_FAILURE(status))
    {
        log_err("FAIL: error in creating the dateformat using openPattern: %s\n", myErrorName(status));
        return;
    }
    myDate=(UChar*)malloc(sizeof(UChar) * 11);
    u_uastrcpy(myDate, "1970/01/12");
        
    aux917( def, myDate );
    udat_close(def);
    
    u_uastrcpy(pattern, "yyyyMMdd");
    def = udat_open(UDAT_IGNORE,UDAT_IGNORE,NULL,NULL,0,pattern, u_strlen(pattern),&status);
    if(U_FAILURE(status))
    {
        log_err("FAIL: error in creating the dateformat using openPattern: %s\n", myErrorName(status));
        return;
    }
    u_uastrcpy(myDate, "19700112");
    aux917( def, myDate );
    udat_close(def);    
    free(pattern);
    free(myDate);
    
}

void aux917( UDateFormat *fmt, UChar* str) 
{    
    int32_t resultlength, resultlengthneeded;
    UErrorCode status = U_ZERO_ERROR;
    UChar* formatted=NULL;
    UChar *pat=NULL;
    UDate d1=1000000000.0;
   
    resultlength=0;
    resultlengthneeded=udat_toPattern(fmt, TRUE, NULL, resultlength, &status);
    if(status==U_BUFFER_OVERFLOW_ERROR)
    {
        status=U_ZERO_ERROR;
        resultlength=resultlengthneeded + 1;
        pat=(UChar*)malloc(sizeof(UChar) * (resultlength));
        udat_toPattern(fmt, TRUE, pat, resultlength, &status);
    }
    if(U_FAILURE(status)){
        log_err("failure in retrieving the pattern: %s\n", myErrorName(status));
    }
    log_verbose("pattern: %s\n", austrdup(pat) );
       
    status = U_ZERO_ERROR;
    formatted = myFormatit(fmt, d1);
    if( u_strcmp(formatted,str)!=0) {
        log_err("Fail: Want %s Got: %s\n", austrdup(str),  austrdup(formatted) );
    }
    free(pat);
}

/**
 * @bug 4060212
 */
void Test4060212() 
{
    int32_t pos;
    UCalendar *cal;
    UDateFormat *formatter, *fmt;
    UErrorCode status = U_ZERO_ERROR;
    UDate myDate;
    UChar *myString;
    UChar dateString[30], pattern[20], tzID[4];
    u_uastrcpy(dateString, "1995-040.05:01:29 -8");
    u_uastrcpy(pattern, "yyyy-DDD.hh:mm:ss z");

    log_verbose( "dateString= %s Using yyyy-DDD.hh:mm:ss\n", austrdup(dateString) );
    status = U_ZERO_ERROR;
    u_uastrcpy(tzID, "PST");

    formatter = udat_open(UDAT_IGNORE,UDAT_IGNORE,"en_US",tzID,-1,pattern, u_strlen(pattern), &status);
    pos=0;
    myDate = udat_parse(formatter, dateString, u_strlen(dateString), &pos, &status);
    
    
    fmt = udat_open(UDAT_FULL,UDAT_LONG ,NULL, tzID, -1, NULL, 0, &status);
    if(U_FAILURE(status))
    {
        log_err("FAIL: error in creating the dateformat using default date and time style: %s\n", 
                        myErrorName(status) );
        return;
    }
    myString = myFormatit(fmt, myDate);
    cal=ucal_open(tzID, u_strlen(tzID), "en_US", UCAL_GREGORIAN, &status);
    if(U_FAILURE(status)){
        log_err("FAIL: error in ucal_open caldef : %s\n", myErrorName(status));
    }
    ucal_setMillis(cal, myDate, &status);
    if ((ucal_get(cal, UCAL_DAY_OF_YEAR, &status) != 40)){
        log_err("Fail: Got  %d Expected 40\n", ucal_get(cal, UCAL_DAY_OF_YEAR, &status));
    }
    
    udat_close(formatter);
    ucal_close(cal);
    udat_close(fmt);
    
}

/**
 * @bug 4061287
 */
void Test4061287() 
{
    UBool ok;
    int32_t pos;
    UDateFormat *df;
    UErrorCode status = U_ZERO_ERROR;
    UDate myDate;
    UChar pattern[21], dateString[11];
    
    u_uastrcpy(dateString, "35/13/1971");
    u_uastrcpy(pattern, "dd/mm/yyyy");
    status = U_ZERO_ERROR;
    log_verbose("Testing parsing by changing the attribute lenient\n");
    df = udat_open(UDAT_IGNORE,UDAT_IGNORE,NULL,NULL,0,pattern, u_strlen(pattern),&status);
    if(U_FAILURE(status)){
        log_err("ERROR: failure in open pattern of test4061287: %s\n", myErrorName(status));
        return;
    }

    pos=0;
    
    udat_setLenient(df, FALSE);
    ok=udat_isLenient(df);
    if(ok==TRUE)
        log_err("setLenient nor working\n");
    ok = FALSE;
    myDate = udat_parse(df, dateString, u_strlen(dateString), &pos, &status);
    if(U_FAILURE(status))
        ok = TRUE;
    if(ok!=TRUE) 
        log_err("Fail: Lenient not working: does lenient parsing in spite of setting Leninent as FALSE ");

    udat_close(df);
    
}


/* The java.text.DateFormat.parse(String) method expects for the
  US locale a string formatted according to mm/dd/yy and parses it
  correctly.

  When given a string mm/dd/yyyy it only parses up to the first
  two y's, typically resulting in a date in the year 1919.
  
  Please extend the parsing method(s) to handle strings with
  four-digit year values (probably also applicable to various
  other locales.  */
/**
 * @bug 4073003
 */
void Test4073003() 
{
    int32_t pos,i;
    UDate d,dd;
    UChar *datestr;
    UChar temp[15];
    UErrorCode status = U_ZERO_ERROR;
    UDateFormat *fmt;
    UChar *result, *result2;
    const char* tests [] = { 
                "12/25/61", 
                "12/25/1961", 
                "4/3/1999", 
                "4/3/99" 
        };
    
    fmt= udat_open(UDAT_SHORT,UDAT_SHORT ,NULL, NULL, 0, NULL, 0, &status);
    if(U_FAILURE(status))
    {
        log_err("FAIL: error in creating the dateformat using short date and time style: %s\n", 
            myErrorName(status));
        return;
    }
    u_uastrcpy(temp, "m/D/yy");
    udat_applyPattern(fmt, TRUE, temp, u_strlen(temp));
    
        for(i= 0; i < 4; i+=2) {
            status=U_ZERO_ERROR;
            datestr=(UChar*)malloc(sizeof(UChar) * (strlen(tests[i])+1));
            u_uastrcpy(datestr, tests[i]);
            
            pos=0;
            d = udat_parse(fmt, datestr, u_strlen(datestr), &pos, &status);
            if(U_FAILURE(status)){
                log_err("ERROR : in test 4073003: %s\n", myErrorName(status));
            }
            
            free(datestr);
            datestr=(UChar*)malloc(sizeof(UChar) * (strlen(tests[i+1])+1));
            u_uastrcpy(datestr, tests[i+1]);
        
            pos=0;
            status=U_ZERO_ERROR;
            dd = udat_parse(fmt, datestr, u_strlen(datestr), &pos, &status);
            if(U_FAILURE(status)){
                log_err("ERROR : in test 4073003: %s\n", myErrorName(status));
            }
            free(datestr);
            
            result =myFormatit(fmt, d);
            result2 =myFormatit(fmt, dd);
            if(!result || !result2) {
              log_data_err("Fail: could not format - exitting test");
              return;
            }
            if (u_strcmp(result, result2)!=0){
                log_err("Fail: %s != %s\n", austrdup(result), austrdup(result2) );
                 }
            else{
            log_verbose("Ok: %s == %s\n", austrdup(result), austrdup(result2) );
            }
            
            
        }
        udat_close(fmt);
}

/**
 * @bug 4162071
 **/
void Test4162071() 
{
    int32_t pos;
    UDate x;
    UErrorCode status = U_ZERO_ERROR;
    UDateFormat *df;
    UChar datestr[30];
    UChar format[50];
    u_uastrcpy(datestr, "Thu, 30-Jul-1999 11:51:14 GMT");
    u_uastrcpy(format, "EEE', 'dd-MMM-yyyy HH:mm:ss z"); /*  RFC 822/1123 */
    status = U_ZERO_ERROR;
    /* Can't hardcode the result to assume the default locale is "en_US". */
    df = udat_open(UDAT_IGNORE,UDAT_IGNORE,"en_US",NULL,0,format, u_strlen(format),&status);
    if(U_FAILURE(status)){
        log_data_err("ERROR: couldn't create date format: %s\n", myErrorName(status));
        return;
    }
    pos=0;
    x = udat_parse(df, datestr, u_strlen(datestr), &pos, &status);
    if(U_FAILURE(status)){
                log_data_err("ERROR : parse format  %s fails : %s\n", austrdup(format), myErrorName(status));
            }
    else{
        log_verbose("Parse format \"%s \" ok.\n", austrdup(format) );
    }
    log_verbose("date= %s\n", austrdup(myFormatit(df, x)) );    
    udat_close(df);
}

void Test714(void)
{
    UDate d=978103543000.0;
    UChar temp[20];
    UErrorCode status = U_ZERO_ERROR;
    UDateFormat *fmt;
    UChar *result;
    const char* expect =  "7:25:43 AM";
    
    ctest_setTimeZone(NULL, &status);

    fmt= udat_open(UDAT_MEDIUM,UDAT_NONE ,"en_US_CA", NULL, -1, NULL, 0, &status);
    if(U_FAILURE(status))
    {
        log_err("FAIL: error in creating the dateformat using medium time style and NO date style: %s\n", 
            myErrorName(status));
        return;
    }
    result =myFormatit(fmt, d);
    if(!result) {
      log_data_err("Fail: could not format - exitting test\n");
      return;
    }
    u_uastrcpy(temp, expect);
    if (u_strcmp(result, temp)!=0){
      log_err("Fail: %s != %s\n", austrdup(result), expect);
    }
    else{
      log_verbose("Ok: %s == %s\n", austrdup(result), expect );
    }
        
    udat_close(fmt);

    ctest_resetTimeZone();
}

/*INTERNAL FUNCTION USED */

UChar* myFormatit(UDateFormat* datdef, UDate d1)
{
    UChar *result1=NULL;
    int32_t resultlength, resultlengthneeded;
    UErrorCode status = U_ZERO_ERROR;
    
    resultlength=0;
    resultlengthneeded=udat_format(datdef, d1, NULL, resultlength, NULL, &status);
    if(status==U_BUFFER_OVERFLOW_ERROR)
    {
        status=U_ZERO_ERROR;
        resultlength=resultlengthneeded+1;
        /*result1=(UChar*)malloc(sizeof(UChar) * resultlength);*/ /*this leaks*/
        result1=(UChar*)ctst_malloc(sizeof(UChar) * resultlength); /*this won't*/
        udat_format(datdef, d1, result1, resultlength, NULL, &status);
    }
    if(U_FAILURE(status))
    {
        log_err("FAIL: Error in formatting using udat_format(.....): %s\n", myErrorName(status));
        return 0;
    }
    
    
    return result1;

}

#endif /* #if !UCONFIG_NO_FORMATTING */

/*eof*/
Commit	Line	Data
b75a7d8f A	1	/********************************************************************
b75a7d8f A	2	* COPYRIGHT:
374ca955	3	* Copyright (c) 1997-2003, International Business Machines Corporation and
b75a7d8f A	4	* others. All Rights Reserved.
	5	********************************************************************/
	6	/********************************************************************************
	7	*
	8	* File CDTRGTST.C
	9	*
	10	* Madhu Katragadda Ported for C API
	11	* Modification History:
	12	* Date Name Description
	13	* 07/15/99 helena Ported to HPUX 10/11 CC.
	14	*********************************************************************************
	15	*/
	16	/* REGRESSION TEST FOR DATE FORMAT */
	17
	18	#include "unicode/utypes.h"
	19
	20	#if !UCONFIG_NO_FORMATTING
	21
	22	#include "unicode/uloc.h"
	23	#include "unicode/udat.h"
	24	#include "unicode/ucal.h"
	25	#include "unicode/unum.h"
	26	#include "unicode/ustring.h"
	27	#include "cintltst.h"
	28	#include "cdtrgtst.h"
	29	#include "cmemory.h"
	30
	31	void addDateForRgrTest(TestNode** root);
	32
	33	void addDateForRgrTest(TestNode** root)
	34	{
	35	addTest(root, &Test4029195, "tsformat/cdtrgtst/Test4029195");
	36	addTest(root, &Test4056591, "tsformat/cdtrgtst/Test4056591");
	37	addTest(root, &Test4059917, "tsformat/cdtrgtst/Test4059917");
	38	addTest(root, &Test4060212, "tsformat/cdtrgtst/Test4060212");
	39	addTest(root, &Test4061287, "tsformat/cdtrgtst/Test4061287");
	40	addTest(root, &Test4073003, "tsformat/cdtrgtst/Test4073003");
	41	addTest(root, &Test4162071, "tsformat/cdtrgtst/Test4162071");
	42	addTest(root, &Test714, "tsformat/cdtrgtst/Test714");
	43	}
	44
	45	/**
	46	* @bug 4029195
	47	*/
	48	void Test4029195()
	49	{
	50	int32_t resultlength, resultlengthneeded;
	51	UChar fmdt, todayS, *rt;
	52	UChar *pat=NULL;
	53	UChar *temp;
	54	UDate today, d1;
	55	UDateFormat *df;
	56	int32_t parsepos;
	57	UErrorCode status = U_ZERO_ERROR;
	58
	59	log_verbose("Testing date format and parse function in regression test\n");
	60	today = ucal_getNow();
	61
	62	df = udat_open(UDAT_DEFAULT,UDAT_DEFAULT ,"en_US", NULL, 0, NULL, 0, &status);
	63	if(U_FAILURE(status))
	64	{
	65	log_err("FAIL: error in creating the dateformat using default date and time style : %s\n", myErrorName(status));
	66	return;
	67	}
68	resultlength=0;
69	resultlengthneeded=udat_toPattern(df, TRUE, NULL, resultlength, &status);
70	if(status==U_BUFFER_OVERFLOW_ERROR)
71	{
72	status=U_ZERO_ERROR;
73	resultlength=resultlengthneeded + 1;
74	pat=(UChar)malloc(sizeof(UChar) resultlength);
75	udat_toPattern(df, TRUE, pat, resultlength, &status);
76	}
77
78	log_verbose("pattern: %s\n", austrdup(pat));
79
80
81	fmdt = myFormatit(df, today);
82	if(fmdt) {
83	log_verbose("today: %s\n", austrdup(fmdt));
84	} else {
85	log_data_err("ERROR: couldn't format, exitting test");
86	return;
87	}
88
89	temp=(UChar)malloc(sizeof(UChar) 10);
90	u_uastrcpy(temp, "M yyyy dd");
91	udat_applyPattern(df, TRUE, temp, u_strlen(temp));
92
93	todayS =myFormatit(df, today);
94	log_verbose("After teh pattern is applied\n today: %s\n", austrdup(todayS) );
95	parsepos=0;
96	d1=udat_parse(df, todayS, u_strlen(todayS), &parsepos, &status);
97	if(U_FAILURE(status))
98	{
99	log_err("FAIL: Error in parsing using udat_parse(.....): %s\n", myErrorName(status));
100	}
101
102	rt =myFormatit(df, d1);
103	log_verbose("today: %s\n", austrdup(rt) );
104
105	log_verbose("round trip: %s\n", austrdup(rt) );
106
107	if(u_strcmp(rt, todayS)!=0) {
108	log_err("Fail: Want %s Got %s\n", austrdup(todayS), austrdup(rt) );
109	}
110	else
111	log_verbose("Pass: parse and format working fine\n");
112	udat_close(df);
113	free(temp);
114	if(pat != NULL) {
115	free(pat);
116	}
117	}
118
119
120	/**
121	* @bug 4056591
122	* Verify the function of the [s\|g]et2DigitYearStart() API.
123	*/
124	void Test4056591()
125	{
126	int i;
127	UCalendar *cal;
128	UDateFormat *def;
129	UDate start,exp,got;
130	UChar s[10];
131	UChar gotdate, expdate;
132	UChar pat[10];
b75a7d8f A	133	UDate d[4];
	134	UErrorCode status = U_ZERO_ERROR;
	135	const char* strings[] = {
	136	"091225",
	137	"091224",
	138	"611226",
	139	"991227"
	140	};
	141
	142	log_verbose("Testing s[get] 2 digit year start regressively\n");
374ca955	143	cal=ucal_open(NULL, 0, "en_US", UCAL_GREGORIAN, &status);
b75a7d8f A	144	if(U_FAILURE(status)){
	145	log_err("error in ucal_open caldef : %s\n", myErrorName(status));
	146	}
	147	ucal_setDateTime(cal, 1809, UCAL_DECEMBER, 25, 17, 40, 30, &status);
	148	d[0]=ucal_getMillis(cal, &status);
	149	if(U_FAILURE(status)){
	150	log_err("Error: failure in get millis: %s\n", myErrorName(status));
	151	}
	152	ucal_setDateTime(cal, 1909, UCAL_DECEMBER, 24, 17, 40, 30, &status);
	153	d[1]=ucal_getMillis(cal, &status);
	154	ucal_setDateTime(cal, 1861, UCAL_DECEMBER, 26, 17, 40, 30, &status);
	155	d[2]=ucal_getMillis(cal, &status);
	156	ucal_setDateTime(cal, 1999, UCAL_DECEMBER, 27, 17, 40, 30, &status);
	157	d[3]=ucal_getMillis(cal, &status);
	158
	159
	160	u_uastrcpy(pat, "yyMMdd");
374ca955	161	def = udat_open(UDAT_IGNORE,UDAT_IGNORE,NULL, NULL, 0, pat, u_strlen(pat), &status);
b75a7d8f A	162	if(U_FAILURE(status))
	163	{
	164	log_err("FAIL: error in creating the dateformat using u_openPattern(): %s\n", myErrorName(status));
	165	return;
	166	}
	167	start = 1800;
	168	udat_set2DigitYearStart(def, start, &status);
	169	if(U_FAILURE(status))
	170	log_err("ERROR: in setTwoDigitStartDate: %s\n", myErrorName(status));
	171	if( (udat_get2DigitYearStart(def, &status) != start))
	172	log_err("ERROR: get2DigitYearStart broken\n");
	173
	174
	175	for(i = 0; i < 4; ++i) {
	176	u_uastrcpy(s, strings[i]);
	177	exp = d[i];
	178	got = udat_parse(def, s, u_strlen(s), 0, &status);
	179	gotdate=myFormatit(def, got);
	180	expdate=myFormatit(def, exp);
	181
	182	if(u_strcmp(gotdate, expdate) !=0){
	183	log_err("set2DigitYearStart broken for %s \n got: %s, expected: %s\n", austrdup(s),
	184	austrdup(gotdate), austrdup(expdate) );
	185	}
	186	}
	187
	188	udat_close(def);
	189	ucal_close(cal);
b75a7d8f A	190	}
	191
	192
	193	/**
	194	* @bug 4059917
	195	*/
	196	void Test4059917()
	197	{
	198	UDateFormat* def;
	199	UChar *myDate;
	200	UErrorCode status = U_ZERO_ERROR;
	201	UChar *pattern;
374ca955 A	202	UChar tzID[4];
374ca955 A	203
b75a7d8f	204	log_verbose("Testing apply pattern and to pattern regressively\n");
374ca955	205	u_uastrcpy(tzID, "PST");
b75a7d8f A	206	pattern=(UChar)malloc(sizeof(UChar) 11);
	207	u_uastrcpy(pattern, "yyyy/MM/dd");
	208	log_verbose("%s\n", austrdup(pattern) );
374ca955	209	def = udat_open(UDAT_IGNORE,UDAT_IGNORE,NULL,tzID,-1,pattern, u_strlen(pattern),&status);
b75a7d8f A	210	if(U_FAILURE(status))
	211	{
	212	log_err("FAIL: error in creating the dateformat using openPattern: %s\n", myErrorName(status));
	213	return;
	214	}
	215	myDate=(UChar)malloc(sizeof(UChar) 11);
	216	u_uastrcpy(myDate, "1970/01/12");
	217
	218	aux917( def, myDate );
	219	udat_close(def);
	220
	221	u_uastrcpy(pattern, "yyyyMMdd");
	222	def = udat_open(UDAT_IGNORE,UDAT_IGNORE,NULL,NULL,0,pattern, u_strlen(pattern),&status);
	223	if(U_FAILURE(status))
	224	{
	225	log_err("FAIL: error in creating the dateformat using openPattern: %s\n", myErrorName(status));
	226	return;
	227	}
	228	u_uastrcpy(myDate, "19700112");
	229	aux917( def, myDate );
	230	udat_close(def);
	231	free(pattern);
	232	free(myDate);
	233
	234	}
	235
	236	void aux917( UDateFormat fmt, UChar str)
	237	{
374ca955 A	238	int32_t resultlength, resultlengthneeded;
	239	UErrorCode status = U_ZERO_ERROR;
	240	UChar* formatted=NULL;
	241	UChar *pat=NULL;
	242	UDate d1=1000000000.0;
b75a7d8f A	243
	244	resultlength=0;
	245	resultlengthneeded=udat_toPattern(fmt, TRUE, NULL, resultlength, &status);
	246	if(status==U_BUFFER_OVERFLOW_ERROR)
	247	{
	248	status=U_ZERO_ERROR;
	249	resultlength=resultlengthneeded + 1;
	250	pat=(UChar)malloc(sizeof(UChar) (resultlength));
	251	udat_toPattern(fmt, TRUE, pat, resultlength, &status);
	252	}
	253	if(U_FAILURE(status)){
	254	log_err("failure in retrieving the pattern: %s\n", myErrorName(status));
	255	}
	256	log_verbose("pattern: %s\n", austrdup(pat) );
	257
	258	status = U_ZERO_ERROR;
	259	formatted = myFormatit(fmt, d1);
	260	if( u_strcmp(formatted,str)!=0) {
	261	log_err("Fail: Want %s Got: %s\n", austrdup(str), austrdup(formatted) );
	262	}
	263	free(pat);
	264	}
	265
	266	/**
	267	* @bug 4060212
	268	*/
	269	void Test4060212()
	270	{
	271	int32_t pos;
	272	UCalendar *cal;
	273	UDateFormat formatter, fmt;
	274	UErrorCode status = U_ZERO_ERROR;
	275	UDate myDate;
	276	UChar *myString;
374ca955 A	277	UChar dateString[30], pattern[20], tzID[4];
	278	u_uastrcpy(dateString, "1995-040.05:01:29 -8");
	279	u_uastrcpy(pattern, "yyyy-DDD.hh:mm:ss z");
b75a7d8f A	280
	281	log_verbose( "dateString= %s Using yyyy-DDD.hh:mm:ss\n", austrdup(dateString) );
	282	status = U_ZERO_ERROR;
374ca955 A	283	u_uastrcpy(tzID, "PST");
	284
	285	formatter = udat_open(UDAT_IGNORE,UDAT_IGNORE,"en_US",tzID,-1,pattern, u_strlen(pattern), &status);
b75a7d8f A	286	pos=0;
	287	myDate = udat_parse(formatter, dateString, u_strlen(dateString), &pos, &status);
	288
	289
374ca955	290	fmt = udat_open(UDAT_FULL,UDAT_LONG ,NULL, tzID, -1, NULL, 0, &status);
b75a7d8f A	291	if(U_FAILURE(status))
	292	{
	293	log_err("FAIL: error in creating the dateformat using default date and time style: %s\n",
	294	myErrorName(status) );
	295	return;
	296	}
	297	myString = myFormatit(fmt, myDate);
b75a7d8f A	298	cal=ucal_open(tzID, u_strlen(tzID), "en_US", UCAL_GREGORIAN, &status);
	299	if(U_FAILURE(status)){
	300	log_err("FAIL: error in ucal_open caldef : %s\n", myErrorName(status));
	301	}
	302	ucal_setMillis(cal, myDate, &status);
	303	if ((ucal_get(cal, UCAL_DAY_OF_YEAR, &status) != 40)){
	304	log_err("Fail: Got %d Expected 40\n", ucal_get(cal, UCAL_DAY_OF_YEAR, &status));
	305	}
	306
	307	udat_close(formatter);
	308	ucal_close(cal);
	309	udat_close(fmt);
	310
	311	}
	312
	313	/**
	314	* @bug 4061287
	315	*/
	316	void Test4061287()
	317	{
	318	UBool ok;
	319	int32_t pos;
	320	UDateFormat *df;
	321	UErrorCode status = U_ZERO_ERROR;
	322	UDate myDate;
	323	UChar pattern[21], dateString[11];
	324
	325	u_uastrcpy(dateString, "35/13/1971");
	326	u_uastrcpy(pattern, "dd/mm/yyyy");
	327	status = U_ZERO_ERROR;
	328	log_verbose("Testing parsing by changing the attribute lenient\n");
	329	df = udat_open(UDAT_IGNORE,UDAT_IGNORE,NULL,NULL,0,pattern, u_strlen(pattern),&status);
	330	if(U_FAILURE(status)){
	331	log_err("ERROR: failure in open pattern of test4061287: %s\n", myErrorName(status));
	332	return;
	333	}
	334
	335	pos=0;
	336
	337	udat_setLenient(df, FALSE);
	338	ok=udat_isLenient(df);
	339	if(ok==TRUE)
	340	log_err("setLenient nor working\n");
	341	ok = FALSE;
	342	myDate = udat_parse(df, dateString, u_strlen(dateString), &pos, &status);
	343	if(U_FAILURE(status))
	344	ok = TRUE;
	345	if(ok!=TRUE)
	346	log_err("Fail: Lenient not working: does lenient parsing in spite of setting Leninent as FALSE ");
	347
	348	udat_close(df);
	349
	350	}
	351
	352
	353
	354	/* The java.text.DateFormat.parse(String) method expects for the
	355	US locale a string formatted according to mm/dd/yy and parses it
	356	correctly.
	357
	358	When given a string mm/dd/yyyy it only parses up to the first
	359	two y's, typically resulting in a date in the year 1919.
	360
	361	Please extend the parsing method(s) to handle strings with
362	four-digit year values (probably also applicable to various
363	other locales. */
364	/**
365	* @bug 4073003
366	*/
367	void Test4073003()
368	{
369	int32_t pos,i;
370	UDate d,dd;
371	UChar *datestr;
372	UChar temp[15];
373	UErrorCode status = U_ZERO_ERROR;
374	UDateFormat *fmt;
375	UChar result, result2;
376	const char* tests [] = {
377	"12/25/61",
378	"12/25/1961",
379	"4/3/1999",
380	"4/3/99"
381	};
382
383	fmt= udat_open(UDAT_SHORT,UDAT_SHORT ,NULL, NULL, 0, NULL, 0, &status);
384	if(U_FAILURE(status))
385	{
386	log_err("FAIL: error in creating the dateformat using short date and time style: %s\n",
387	myErrorName(status));
388	return;
389	}
390	u_uastrcpy(temp, "m/D/yy");
391	udat_applyPattern(fmt, TRUE, temp, u_strlen(temp));
392
393	for(i= 0; i < 4; i+=2) {
394	status=U_ZERO_ERROR;
395	datestr=(UChar)malloc(sizeof(UChar) (strlen(tests[i])+1));
396	u_uastrcpy(datestr, tests[i]);
397
398	pos=0;
399	d = udat_parse(fmt, datestr, u_strlen(datestr), &pos, &status);
400	if(U_FAILURE(status)){
401	log_err("ERROR : in test 4073003: %s\n", myErrorName(status));
402	}
403
404	free(datestr);
405	datestr=(UChar)malloc(sizeof(UChar) (strlen(tests[i+1])+1));
406	u_uastrcpy(datestr, tests[i+1]);
407
408	pos=0;
409	status=U_ZERO_ERROR;
410	dd = udat_parse(fmt, datestr, u_strlen(datestr), &pos, &status);
411	if(U_FAILURE(status)){
412	log_err("ERROR : in test 4073003: %s\n", myErrorName(status));
413	}
414	free(datestr);
415
416	result =myFormatit(fmt, d);
417	result2 =myFormatit(fmt, dd);
418	if(!result \|\| !result2) {
419	log_data_err("Fail: could not format - exitting test");
420	return;
421	}
422	if (u_strcmp(result, result2)!=0){
423	log_err("Fail: %s != %s\n", austrdup(result), austrdup(result2) );
424	}
425	else{
426	log_verbose("Ok: %s == %s\n", austrdup(result), austrdup(result2) );
427	}
428
429
430
431	}
432	udat_close(fmt);
433	}
434
435	/**
436	* @bug 4162071
437	**/
438	void Test4162071()
439	{
440	int32_t pos;
441	UDate x;
442	UErrorCode status = U_ZERO_ERROR;
443	UDateFormat *df;
444	UChar datestr[30];
445	UChar format[50];
446	u_uastrcpy(datestr, "Thu, 30-Jul-1999 11:51:14 GMT");
447	u_uastrcpy(format, "EEE', 'dd-MMM-yyyy HH:mm:ss z"); /* RFC 822/1123 */
448	status = U_ZERO_ERROR;
449	/* Can't hardcode the result to assume the default locale is "en_US". */
450	df = udat_open(UDAT_IGNORE,UDAT_IGNORE,"en_US",NULL,0,format, u_strlen(format),&status);
451	if(U_FAILURE(status)){
452	log_data_err("ERROR: couldn't create date format: %s\n", myErrorName(status));
453	return;
454	}
455	pos=0;
456	x = udat_parse(df, datestr, u_strlen(datestr), &pos, &status);
457	if(U_FAILURE(status)){
458	log_data_err("ERROR : parse format %s fails : %s\n", austrdup(format), myErrorName(status));
459	}
460	else{
461	log_verbose("Parse format \"%s \" ok.\n", austrdup(format) );
462	}
463	log_verbose("date= %s\n", austrdup(myFormatit(df, x)) );
464	udat_close(df);
465	}
466
467	void Test714(void)
468	{
469	UDate d=978103543000.0;
470	UChar temp[20];
471	UErrorCode status = U_ZERO_ERROR;
472	UDateFormat *fmt;
473	UChar *result;
474	const char* expect = "7:25:43 AM";
475
374ca955 A	476	ctest_setTimeZone(NULL, &status);
374ca955 A	477
b75a7d8f A	478	fmt= udat_open(UDAT_MEDIUM,UDAT_NONE ,"en_US_CA", NULL, -1, NULL, 0, &status);
	479	if(U_FAILURE(status))
	480	{
	481	log_err("FAIL: error in creating the dateformat using medium time style and NO date style: %s\n",
	482	myErrorName(status));
	483	return;
	484	}
	485	result =myFormatit(fmt, d);
	486	if(!result) {
	487	log_data_err("Fail: could not format - exitting test\n");
	488	return;
	489	}
	490	u_uastrcpy(temp, expect);
	491	if (u_strcmp(result, temp)!=0){
	492	log_err("Fail: %s != %s\n", austrdup(result), expect);
	493	}
	494	else{
	495	log_verbose("Ok: %s == %s\n", austrdup(result), expect );
	496	}
	497
	498	udat_close(fmt);
374ca955 A	499
374ca955 A	500	ctest_resetTimeZone();
b75a7d8f A	501	}
	502
	503	/INTERNAL FUNCTION USED /
	504
	505	UChar* myFormatit(UDateFormat* datdef, UDate d1)
	506	{
	507	UChar *result1=NULL;
	508	int32_t resultlength, resultlengthneeded;
	509	UErrorCode status = U_ZERO_ERROR;
	510
	511	resultlength=0;
	512	resultlengthneeded=udat_format(datdef, d1, NULL, resultlength, NULL, &status);
	513	if(status==U_BUFFER_OVERFLOW_ERROR)
	514	{
	515	status=U_ZERO_ERROR;
	516	resultlength=resultlengthneeded+1;
	517	/result1=(UChar)malloc(sizeof(UChar) * resultlength);/ /this leaks*/
	518	result1=(UChar)ctst_malloc(sizeof(UChar) resultlength); /this won't/
	519	udat_format(datdef, d1, result1, resultlength, NULL, &status);
	520	}
	521	if(U_FAILURE(status))
	522	{
	523	log_err("FAIL: Error in formatting using udat_format(.....): %s\n", myErrorName(status));
	524	return 0;
	525	}
	526
	527
	528	return result1;
	529
	530	}
	531
	532	#endif /* #if !UCONFIG_NO_FORMATTING */
	533
	534	/eof/