[apple/icu.git] / icuSources / test / intltest / dadrfmt.cpp

/********************************************************************
 * COPYRIGHT: 
 * Copyright (c) 1997-2008, International Business Machines Corporation and
 * others. All Rights Reserved.
 ********************************************************************/

/***********************************************************************
 * Modification history
 * Date        Name        Description
 * 07/09/2007  srl         Copied from dadrcoll.cpp
 ***********************************************************************/

#include "unicode/utypes.h"

#if !UCONFIG_NO_FORMATTING

#include "unicode/tstdtmod.h"
#include "tsdate.h"
#include "dadrfmt.h"
#include "unicode/calendar.h"
#include "intltest.h"
#include <string.h>
#include "unicode/schriter.h"
#include "unicode/regex.h"
#include "unicode/smpdtfmt.h"
#include "unicode/dbgutil.h"
#include "fldset.h"


#include <stdio.h>

DataDrivenFormatTest::DataDrivenFormatTest() {
    UErrorCode status = U_ZERO_ERROR;
    driver = TestDataModule::getTestDataModule("format", *this, status);
}

DataDrivenFormatTest::~DataDrivenFormatTest() {
    delete driver;
}

void DataDrivenFormatTest::runIndexedTest(int32_t index, UBool exec,
        const char* &name, char* /*par */) {
    if (driver != NULL) {
        if (exec) {
            //  logln("Begin ");
        }
        const DataMap *info= NULL;
        UErrorCode status= U_ZERO_ERROR;
        TestData *testData = driver->createTestData(index, status);
        if (U_SUCCESS(status)) {
            name = testData->getName();
            if (testData->getInfo(info, status)) {
                log(info->getString("Description", status));
            }
            if (exec) {
                log(name);
                logln("---");
                logln("");

                processTest(testData);
            }
            delete testData;
        } else {
            name = "";
        }
    } else {
        dataerrln("[DATA] format/DataDriven*Test data (format.res) not initialized!");
        name = "";
    }

}


/*
 *             Headers { "locale","spec", "date", "str"}
            // locale: locale including calendar type
            // spec:   either 'PATTERN=y mm h' etc, or 'DATE=SHORT,TIME=LONG'
            // date:   either an unsigned long (millis), or a calendar spec ERA=0,YEAR=1, etc.. applied to the calendar type specified by the locale
            // str:   the expected unicode string
            Cases { 
               {
                    "en_US@calendar=gregorian",         
                    "DATE=SHORT,TIME=SHORT",
                    "ERA=1,YEAR=2007,MONTH=AUGUST,DATE=8,HOUR=18,MINUTE=54,SECOND=12",
                    "8/8/2007 6:54pm"
               },
 * */


void DataDrivenFormatTest::testConvertDate(TestData *testData,
        const DataMap * /* settings */, UBool fmt) {
    UnicodeString kPATTERN("PATTERN="); // TODO: static
    UnicodeString kMILLIS("MILLIS="); // TODO: static
    UnicodeString kRELATIVE_MILLIS("RELATIVE_MILLIS="); // TODO: static
    UnicodeString kRELATIVE_ADD("RELATIVE_ADD:"); // TODO: static
    
    UErrorCode status = U_ZERO_ERROR;
    SimpleDateFormat basicFmt(UnicodeString("EEE MMM dd yyyy / YYYY'-W'ww-ee"),
            status);
    if (U_FAILURE(status)) {
        errln("FAIL: Couldn't create basic SimpleDateFormat: %s\n",
                u_errorName(status));
        return;
    }

    const DataMap *currentCase= NULL;
    // Start the processing
    int n = 0;
    while (testData->nextCase(currentCase, status)) {
        char calLoc[256] = "";
        DateTimeStyleSet styleSet;
        UnicodeString pattern;
        UBool usePattern = FALSE;
        CalendarFieldsSet fromSet;
        UDate fromDate = 0;
        UBool useDate = FALSE;
        
        UDate now = Calendar::getNow();
        
        ++n;

        char theCase[200];
        sprintf(theCase, "case %d:", n);
        UnicodeString caseString(theCase, "");
        
        // load params
        UnicodeString locale = currentCase->getString("locale", status);
        if (U_FAILURE(status)) {
            errln("case %d: No 'locale' line.", n);
            continue;
        }
        UnicodeString spec = currentCase->getString("spec", status);
        if(U_FAILURE(status)) {
            errln("case %d: No 'spec' line.", n);
            continue;
        }
        UnicodeString date = currentCase->getString("date", status);
        if(U_FAILURE(status)) {
            errln("case %d: No 'date' line.", n);
            continue;
        }
        UnicodeString expectStr= currentCase->getString("str", status);
        if(U_FAILURE(status)) {
            errln("case %d: No 'str' line.", n);
            continue;
        }
                
        DateFormat *format = NULL;
        
        // Process: 'locale'
        locale.extract(0, locale.length(), calLoc, (const char*)0); // default codepage.  Invariant codepage doesn't have '@'!
        Locale loc(calLoc);
        if(spec.startsWith(kPATTERN)) {
            pattern = UnicodeString(spec,kPATTERN.length());
            usePattern = TRUE;
            format = new SimpleDateFormat(pattern, loc, status);
            if(U_FAILURE(status)) {
                errln("case %d: could not create SimpleDateFormat from pattern: %s", n, u_errorName(status));
                continue;
            }
        } else {
            if(styleSet.parseFrom(spec, status)<0 || U_FAILURE(status)) {
                errln("case %d: could not parse spec as style fields: %s", n, u_errorName(status));
                continue;
            }
            format = DateFormat::createDateTimeInstance((DateFormat::EStyle)styleSet.getDateStyle(), (DateFormat::EStyle)styleSet.getTimeStyle(), loc);
            if(format == NULL ) {
                errln("case %d: could not create SimpleDateFormat from styles.", n);
                continue;
            }
        }

        Calendar *cal = Calendar::createInstance(loc, status);
        if(U_FAILURE(status)) {
            errln("case %d: could not create calendar from %s", n, calLoc);
        }

        // parse 'date'
        if(date.startsWith(kMILLIS)) {
            UnicodeString millis = UnicodeString(date, kMILLIS.length());
            useDate = TRUE;
            fromDate = udbg_stoi(millis);
        } else if(date.startsWith(kRELATIVE_MILLIS)) {
            UnicodeString millis = UnicodeString(date, kRELATIVE_MILLIS.length());
            useDate = TRUE;
            fromDate = udbg_stoi(millis) + now;
        } else if(date.startsWith(kRELATIVE_ADD)) {
            UnicodeString add = UnicodeString(date, kRELATIVE_ADD.length());  // "add" is a string indicating which fields to add
            if(fromSet.parseFrom(add, status)<0 || U_FAILURE(status)) {
                errln("case %d: could not parse date as RELATIVE_ADD calendar fields: %s", n, u_errorName(status));
                continue;
            }
            useDate=TRUE;
            cal->clear();
            cal->setTime(now, status);
            for (int q=0; q<UCAL_FIELD_COUNT; q++) {
                if (fromSet.isSet((UCalendarDateFields)q)) {
                    int32_t oldv = cal->get((UCalendarDateFields)q, status);
                    cal->add((UCalendarDateFields)q,
                                fromSet.get((UCalendarDateFields)q), status);
                    int32_t newv = cal->get((UCalendarDateFields)q, status);
                }
            }
            fromDate = cal->getTime(status);
            if(U_FAILURE(status)) {
                errln("case %d: could not apply date as RELATIVE_ADD calendar fields: %s", n, u_errorName(status));
                continue;
            }
        } else if(fromSet.parseFrom(date, status)<0 || U_FAILURE(status)) {
            errln("case %d: could not parse date as calendar fields: %s", n, u_errorName(status));
            continue;
        }
        
        // now, do it.
        if (fmt) {
            FieldPosition pos;
//            logln((UnicodeString)"#"+n+" "+locale+"/"+from+" >>> "+toCalLoc+"/"
//                    +to);
            cal->clear();
            UnicodeString output;
            output.remove();
            
            if(useDate) {
//                cal->setTime(fromDate, status);
//                if(U_FAILURE(status)) {
//                    errln("case %d: could not set time on calendar: %s", n, u_errorName(status));
//                    continue;
//                }
                format->format(fromDate, output, pos, status);
            } else {
                fromSet.setOnCalendar(cal, status);
                if(U_FAILURE(status)) {
                    errln("case %d: could not set fields on calendar: %s", n, u_errorName(status));
                    continue;
                }
                format->format(*cal, output, pos);
            }            
            
            // check erro result from 'format'
            if(U_FAILURE(status)) {
                errln("case %d: could not format(): %s", n, u_errorName(status)); // TODO: use 'pos'
            }
//            if(pos.getBeginIndex()==0 && pos.getEndIndex()==0) { // TODO: more precise error?
//                errln("WARNING: case %d: format's pos returned (0,0) - error ??", n);
//            }
            
            if(output == expectStr) {
                logln(caseString+": format: SUCCESS! "+UnicodeString("expect=output=")+output);
            } else {
                UnicodeString result;
                UnicodeString result2;
                errln(caseString+": format:  output!=expectStr, got " + *udbg_escape(output, &result) + " expected " + *udbg_escape(expectStr, &result2));
            }
        } else {
            cal->clear();
            ParsePosition pos;
            format->parse(expectStr,*cal,pos);
            if(useDate) {
                UDate gotDate = cal->getTime(status);
                if(U_FAILURE(status)) {
                    errln(caseString+": parse: could not get time on calendar: "+UnicodeString(u_errorName(status)));
                    continue;
                }
                if(gotDate == fromDate) {
                    logln(caseString+": parse: SUCCESS! "+UnicodeString("gotDate=parseDate=")+expectStr);
                } else {
                    UnicodeString expectDateStr, gotDateStr;
                    basicFmt.format(fromDate,expectDateStr);
                    basicFmt.format(gotDate,gotDateStr);
                    errln(caseString+": parse: FAIL. parsed '"+expectStr+"' and got "+gotDateStr+", expected " + expectDateStr);
                }
            } else {
//                Calendar *cal2 = cal->clone();
//                cal2->clear();
//                fromSet.setOnCalendar(cal2, status);
                if(U_FAILURE(status)) {
                    errln("case %d: parse: could not set fields on calendar: %s", n, u_errorName(status));
                    continue;
                }
                
                CalendarFieldsSet diffSet;
//                diffSet.clear();
                if (!fromSet.matches(cal, diffSet, status)) {
                    UnicodeString diffs = diffSet.diffFrom(fromSet, status);
                    errln((UnicodeString)"FAIL: "+caseString
                            +", Differences: '"+ diffs
                            +"', status: "+ u_errorName(status));
                } else if (U_FAILURE(status)) {
                    errln("FAIL: "+caseString+" parse SET SOURCE calendar Failed to match: "
                            +u_errorName(status));
                } else {
                    logln("PASS: "+caseString+" parse.");
                }
                

            }
        }
        delete cal;
        delete format;

    }
//    delete basicFmt;
}

void DataDrivenFormatTest::processTest(TestData *testData) {
    //Format *cal= NULL;
    //const UChar *arguments= NULL;
    //int32_t argLen = 0;
    char testType[256];
    const DataMap *settings= NULL;
    //const UChar *type= NULL;
    UErrorCode status = U_ZERO_ERROR;
    UnicodeString testSetting;
    int n = 0;
    while (testData->nextSettings(settings, status)) {
        status = U_ZERO_ERROR;
        // try to get a locale
        testSetting = settings->getString("Type", status);
        if (U_SUCCESS(status)) {
            if ((++n)>0) {
                logln("---");
            }
            logln(testSetting + "---");
            testSetting.extract(0, testSetting.length(), testType, "");
        } else {
            errln("Unable to extract 'Type'. Skipping..");
            continue;
        }

        if (!strcmp(testType, "date_format")) {
            testConvertDate(testData, settings, true);
        } else if (!strcmp(testType, "date_parse")) {
            testConvertDate(testData, settings, false);
        } else {
            errln("Unknown type: %s", testType);
        }
    }
}

#endif
Commit	Line	Data
46f4442e A	1	/********************************************************************
	2	* COPYRIGHT:
	3	* Copyright (c) 1997-2008, International Business Machines Corporation and
	4	* others. All Rights Reserved.
	5	********************************************************************/
	6
	7	/***********************************************************************
	8	* Modification history
	9	* Date Name Description
	10	* 07/09/2007 srl Copied from dadrcoll.cpp
	11	***********************************************************************/
	12
	13	#include "unicode/utypes.h"
	14
	15	#if !UCONFIG_NO_FORMATTING
	16
	17	#include "unicode/tstdtmod.h"
	18	#include "tsdate.h"
	19	#include "dadrfmt.h"
	20	#include "unicode/calendar.h"
	21	#include "intltest.h"
	22	#include <string.h>
	23	#include "unicode/schriter.h"
	24	#include "unicode/regex.h"
	25	#include "unicode/smpdtfmt.h"
	26	#include "unicode/dbgutil.h"
	27	#include "fldset.h"
	28
	29
	30	#include <stdio.h>
	31
	32	DataDrivenFormatTest::DataDrivenFormatTest() {
	33	UErrorCode status = U_ZERO_ERROR;
	34	driver = TestDataModule::getTestDataModule("format", *this, status);
	35	}
	36
	37	DataDrivenFormatTest::~DataDrivenFormatTest() {
	38	delete driver;
	39	}
	40
	41	void DataDrivenFormatTest::runIndexedTest(int32_t index, UBool exec,
	42	const char* &name, char* /par /) {
	43	if (driver != NULL) {
	44	if (exec) {
	45	// logln("Begin ");
	46	}
	47	const DataMap *info= NULL;
	48	UErrorCode status= U_ZERO_ERROR;
	49	TestData *testData = driver->createTestData(index, status);
	50	if (U_SUCCESS(status)) {
	51	name = testData->getName();
	52	if (testData->getInfo(info, status)) {
	53	log(info->getString("Description", status));
	54	}
	55	if (exec) {
	56	log(name);
	57	logln("---");
	58	logln("");
	59
	60	processTest(testData);
	61	}
	62	delete testData;
	63	} else {
	64	name = "";
65	}
66	} else {
67	dataerrln("[DATA] format/DataDriven*Test data (format.res) not initialized!");
68	name = "";
69	}
70
71	}
72
73
74
75	/*
76	* Headers { "locale","spec", "date", "str"}
77	// locale: locale including calendar type
78	// spec: either 'PATTERN=y mm h' etc, or 'DATE=SHORT,TIME=LONG'
79	// date: either an unsigned long (millis), or a calendar spec ERA=0,YEAR=1, etc.. applied to the calendar type specified by the locale
80	// str: the expected unicode string
81	Cases {
82	{
83	"en_US@calendar=gregorian",
84	"DATE=SHORT,TIME=SHORT",
85	"ERA=1,YEAR=2007,MONTH=AUGUST,DATE=8,HOUR=18,MINUTE=54,SECOND=12",
86	"8/8/2007 6:54pm"
87	},
88	* */
89
90
91	void DataDrivenFormatTest::testConvertDate(TestData *testData,
92	const DataMap * /* settings */, UBool fmt) {
93	UnicodeString kPATTERN("PATTERN="); // TODO: static
94	UnicodeString kMILLIS("MILLIS="); // TODO: static
95	UnicodeString kRELATIVE_MILLIS("RELATIVE_MILLIS="); // TODO: static
96	UnicodeString kRELATIVE_ADD("RELATIVE_ADD:"); // TODO: static
97
98	UErrorCode status = U_ZERO_ERROR;
99	SimpleDateFormat basicFmt(UnicodeString("EEE MMM dd yyyy / YYYY'-W'ww-ee"),
100	status);
101	if (U_FAILURE(status)) {
102	errln("FAIL: Couldn't create basic SimpleDateFormat: %s\n",
103	u_errorName(status));
104	return;
105	}
106
107	const DataMap *currentCase= NULL;
108	// Start the processing
109	int n = 0;
110	while (testData->nextCase(currentCase, status)) {
111	char calLoc[256] = "";
112	DateTimeStyleSet styleSet;
113	UnicodeString pattern;
114	UBool usePattern = FALSE;
115	CalendarFieldsSet fromSet;
116	UDate fromDate = 0;
117	UBool useDate = FALSE;
118
119	UDate now = Calendar::getNow();
120
121	++n;
122
123	char theCase[200];
124	sprintf(theCase, "case %d:", n);
125	UnicodeString caseString(theCase, "");
126
127	// load params
128	UnicodeString locale = currentCase->getString("locale", status);
129	if (U_FAILURE(status)) {
130	errln("case %d: No 'locale' line.", n);
131	continue;
132	}
133	UnicodeString spec = currentCase->getString("spec", status);
134	if(U_FAILURE(status)) {
135	errln("case %d: No 'spec' line.", n);
136	continue;
137	}
138	UnicodeString date = currentCase->getString("date", status);
139	if(U_FAILURE(status)) {
140	errln("case %d: No 'date' line.", n);
141	continue;
142	}
143	UnicodeString expectStr= currentCase->getString("str", status);
144	if(U_FAILURE(status)) {
145	errln("case %d: No 'str' line.", n);
146	continue;
147	}
148
149	DateFormat *format = NULL;
150
151	// Process: 'locale'
152	locale.extract(0, locale.length(), calLoc, (const char*)0); // default codepage. Invariant codepage doesn't have '@'!
153	Locale loc(calLoc);
154	if(spec.startsWith(kPATTERN)) {
155	pattern = UnicodeString(spec,kPATTERN.length());
156	usePattern = TRUE;
157	format = new SimpleDateFormat(pattern, loc, status);
158	if(U_FAILURE(status)) {
159	errln("case %d: could not create SimpleDateFormat from pattern: %s", n, u_errorName(status));
160	continue;
161	}
162	} else {
163	if(styleSet.parseFrom(spec, status)<0 \|\| U_FAILURE(status)) {
164	errln("case %d: could not parse spec as style fields: %s", n, u_errorName(status));
165	continue;
166	}
167	format = DateFormat::createDateTimeInstance((DateFormat::EStyle)styleSet.getDateStyle(), (DateFormat::EStyle)styleSet.getTimeStyle(), loc);
168	if(format == NULL ) {
169	errln("case %d: could not create SimpleDateFormat from styles.", n);
170	continue;
171	}
172	}
173
174	Calendar *cal = Calendar::createInstance(loc, status);
175	if(U_FAILURE(status)) {
176	errln("case %d: could not create calendar from %s", n, calLoc);
177	}
178
179	// parse 'date'
180	if(date.startsWith(kMILLIS)) {
181	UnicodeString millis = UnicodeString(date, kMILLIS.length());
182	useDate = TRUE;
183	fromDate = udbg_stoi(millis);
184	} else if(date.startsWith(kRELATIVE_MILLIS)) {
185	UnicodeString millis = UnicodeString(date, kRELATIVE_MILLIS.length());
186	useDate = TRUE;
187	fromDate = udbg_stoi(millis) + now;
188	} else if(date.startsWith(kRELATIVE_ADD)) {
189	UnicodeString add = UnicodeString(date, kRELATIVE_ADD.length()); // "add" is a string indicating which fields to add
190	if(fromSet.parseFrom(add, status)<0 \|\| U_FAILURE(status)) {
191	errln("case %d: could not parse date as RELATIVE_ADD calendar fields: %s", n, u_errorName(status));
192	continue;
193	}
194	useDate=TRUE;
195	cal->clear();
196	cal->setTime(now, status);
197	for (int q=0; q<UCAL_FIELD_COUNT; q++) {
198	if (fromSet.isSet((UCalendarDateFields)q)) {
199	int32_t oldv = cal->get((UCalendarDateFields)q, status);
200	cal->add((UCalendarDateFields)q,
201	fromSet.get((UCalendarDateFields)q), status);
202	int32_t newv = cal->get((UCalendarDateFields)q, status);
203	}
204	}
205	fromDate = cal->getTime(status);
206	if(U_FAILURE(status)) {
207	errln("case %d: could not apply date as RELATIVE_ADD calendar fields: %s", n, u_errorName(status));
208	continue;
209	}
210	} else if(fromSet.parseFrom(date, status)<0 \|\| U_FAILURE(status)) {
211	errln("case %d: could not parse date as calendar fields: %s", n, u_errorName(status));
212	continue;
213	}
214
215	// now, do it.
216	if (fmt) {
217	FieldPosition pos;
218	// logln((UnicodeString)"#"+n+" "+locale+"/"+from+" >>> "+toCalLoc+"/"
219	// +to);
220	cal->clear();
221	UnicodeString output;
222	output.remove();
223
224	if(useDate) {
225	// cal->setTime(fromDate, status);
226	// if(U_FAILURE(status)) {
227	// errln("case %d: could not set time on calendar: %s", n, u_errorName(status));
228	// continue;
229	// }
230	format->format(fromDate, output, pos, status);
231	} else {
232	fromSet.setOnCalendar(cal, status);
233	if(U_FAILURE(status)) {
234	errln("case %d: could not set fields on calendar: %s", n, u_errorName(status));
235	continue;
236	}
237	format->format(*cal, output, pos);
238	}
239
240	// check erro result from 'format'
241	if(U_FAILURE(status)) {
242	errln("case %d: could not format(): %s", n, u_errorName(status)); // TODO: use 'pos'
243	}
244	// if(pos.getBeginIndex()==0 && pos.getEndIndex()==0) { // TODO: more precise error?
245	// errln("WARNING: case %d: format's pos returned (0,0) - error ??", n);
246	// }
247
248	if(output == expectStr) {
249	logln(caseString+": format: SUCCESS! "+UnicodeString("expect=output=")+output);
250	} else {
251	UnicodeString result;
252	UnicodeString result2;
253	errln(caseString+": format: output!=expectStr, got " + udbg_escape(output, &result) + " expected " + udbg_escape(expectStr, &result2));
254	}
255	} else {
256	cal->clear();
257	ParsePosition pos;
258	format->parse(expectStr,*cal,pos);
259	if(useDate) {
260	UDate gotDate = cal->getTime(status);
261	if(U_FAILURE(status)) {
262	errln(caseString+": parse: could not get time on calendar: "+UnicodeString(u_errorName(status)));
263	continue;
264	}
265	if(gotDate == fromDate) {
266	logln(caseString+": parse: SUCCESS! "+UnicodeString("gotDate=parseDate=")+expectStr);
267	} else {
268	UnicodeString expectDateStr, gotDateStr;
269	basicFmt.format(fromDate,expectDateStr);
270	basicFmt.format(gotDate,gotDateStr);
271	errln(caseString+": parse: FAIL. parsed '"+expectStr+"' and got "+gotDateStr+", expected " + expectDateStr);
272	}
273	} else {
274	// Calendar *cal2 = cal->clone();
275	// cal2->clear();
276	// fromSet.setOnCalendar(cal2, status);
277	if(U_FAILURE(status)) {
278	errln("case %d: parse: could not set fields on calendar: %s", n, u_errorName(status));
279	continue;
280	}
281
282	CalendarFieldsSet diffSet;
283	// diffSet.clear();
284	if (!fromSet.matches(cal, diffSet, status)) {
285	UnicodeString diffs = diffSet.diffFrom(fromSet, status);
286	errln((UnicodeString)"FAIL: "+caseString
287	+", Differences: '"+ diffs
288	+"', status: "+ u_errorName(status));
289	} else if (U_FAILURE(status)) {
290	errln("FAIL: "+caseString+" parse SET SOURCE calendar Failed to match: "
291	+u_errorName(status));
292	} else {
293	logln("PASS: "+caseString+" parse.");
294	}
295
296
297
298	}
299	}
300	delete cal;
301	delete format;
302
303	}
304	// delete basicFmt;
305	}
306
307	void DataDrivenFormatTest::processTest(TestData *testData) {
308	//Format *cal= NULL;
309	//const UChar *arguments= NULL;
310	//int32_t argLen = 0;
311	char testType[256];
312	const DataMap *settings= NULL;
313	//const UChar *type= NULL;
314	UErrorCode status = U_ZERO_ERROR;
315	UnicodeString testSetting;
316	int n = 0;
317	while (testData->nextSettings(settings, status)) {
318	status = U_ZERO_ERROR;
319	// try to get a locale
320	testSetting = settings->getString("Type", status);
321	if (U_SUCCESS(status)) {
322	if ((++n)>0) {
323	logln("---");
324	}
325	logln(testSetting + "---");
326	testSetting.extract(0, testSetting.length(), testType, "");
327	} else {
328	errln("Unable to extract 'Type'. Skipping..");
329	continue;
330	}
331
332	if (!strcmp(testType, "date_format")) {
333	testConvertDate(testData, settings, true);
334	} else if (!strcmp(testType, "date_parse")) {
335	testConvertDate(testData, settings, false);
336	} else {
337	errln("Unknown type: %s", testType);
338	}
339	}
340	}
341
342	#endif