1 /**************************************************************
2  *
3  * Licensed to the Apache Software Foundation (ASF) under one
4  * or more contributor license agreements.  See the NOTICE file
5  * distributed with this work for additional information
6  * regarding copyright ownership.  The ASF licenses this file
7  * to you under the Apache License, Version 2.0 (the
8  * "License"); you may not use this file except in compliance
9  * with the License.  You may obtain a copy of the License at
10  *
11  *   http://www.apache.org/licenses/LICENSE-2.0
12  *
13  * Unless required by applicable law or agreed to in writing,
14  * software distributed under the License is distributed on an
15  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16  * KIND, either express or implied.  See the License for the
17  * specific language governing permissions and limitations
18  * under the License.
19  *
20  *************************************************************/
21 
22 
23 
24 // MARKER(update_precomp.py): autogen include statement, do not remove
25 #include "precompiled_i18npool.hxx"
26 
27 #include "calendar_gregorian.hxx"
28 #include "localedata.hxx"
29 #include <com/sun/star/i18n/AmPmValue.hpp>
30 #include <com/sun/star/i18n/Months.hpp>
31 #include <com/sun/star/i18n/Weekdays.hpp>
32 #include <com/sun/star/i18n/reservedWords.hpp>
33 #include <com/sun/star/lang/XMultiServiceFactory.hpp>
34 #include <comphelper/processfactory.hxx>
35 
36 #include <stdio.h>
37 #include <string.h>
38 
39 #define erDUMP_ICU_CALENDAR 0
40 #define erDUMP_I18N_CALENDAR 0
41 #if erDUMP_ICU_CALENDAR || erDUMP_I18N_CALENDAR
42 // If both are used, DUMP_ICU_CAL_MSG() must be used before DUMP_I18N_CAL_MSG()
43 // to obtain internally set values from ICU, else Calendar::get() calls in
44 // DUMP_I18N_CAL_MSG() recalculate!
45 
46 // These pieces of macro are shamelessly borrowed from icu's olsontz.cpp, the
47 // double parens'ed approach to pass multiple parameters as one macro parameter
48 // is appealing.
debug_cal_loc(const char * f,int32_t l)49 static void debug_cal_loc(const char *f, int32_t l)
50 {
51     fprintf(stderr, "%s:%d: ", f, l);
52 }
53 # include <stdarg.h>
debug_cal_msg(const char * pat,...)54 static void debug_cal_msg(const char *pat, ...)
55 {
56     va_list ap;
57     va_start(ap, pat);
58     vfprintf(stderr, pat, ap);
59 }
60 
61 #if erDUMP_ICU_CALENDAR
62 // Make icu with
63 // DEFS = -DU_DEBUG_CALSVC -DUCAL_DEBUG_DUMP
64 // in icu/$(INPATH)/misc/build/icu/source/icudefs.mk
65 // May need some patches to fix unmaintained things there.
66 extern void ucal_dump( const icu::Calendar & );
debug_icu_cal_dump(const::icu::Calendar & r)67 static void debug_icu_cal_dump( const ::icu::Calendar & r )
68 {
69     ucal_dump(r);
70     fflush(stderr);
71     // set a breakpoint here to pause display between dumps
72 }
73 // must use double parens, i.e.:  DUMP_ICU_CAL_MSG(("four is: %d",4));
74 #define DUMP_ICU_CAL_MSG(x) {debug_cal_loc(__FILE__,__LINE__);debug_cal_msg x;debug_icu_cal_dump(*body);}
75 #else   // erDUMP_ICU_CALENDAR
76 #define DUMP_ICU_CAL_MSG(x)
77 #endif  // erDUMP_ICU_CALENDAR
78 
79 #if erDUMP_I18N_CALENDAR
debug_cal_millis_to_time(long nMillis,long & h,long & m,long & s,long & f)80 static void debug_cal_millis_to_time( long nMillis, long & h, long & m, long & s, long & f )
81 {
82     int sign = (nMillis < 0 ? -1 : 1);
83     nMillis = ::std::abs(nMillis);
84     h = sign * nMillis / (60 * 60 * 1000);
85     nMillis -= sign * h * (60 * 60 * 1000);
86     m = nMillis / (60 * 1000);
87     nMillis -= m * (60 * 1000);
88     s = nMillis / (1000);
89     nMillis -= s * (1000);
90     f = nMillis;
91 }
debug_i18n_cal_dump(const::icu::Calendar & r)92 static void debug_i18n_cal_dump( const ::icu::Calendar & r )
93 {
94     UErrorCode status;
95     long nMillis, h, m, s, f;
96     fprintf( stderr, " %04ld", (long)r.get( UCAL_YEAR, status = U_ZERO_ERROR));
97     fprintf( stderr, "-%02ld", (long)r.get( UCAL_MONTH, status = U_ZERO_ERROR)+1);
98     fprintf( stderr, "-%02ld", (long)r.get( UCAL_DATE, status = U_ZERO_ERROR));
99     fprintf( stderr, " %02ld", (long)r.get( UCAL_HOUR_OF_DAY, status = U_ZERO_ERROR));
100     fprintf( stderr, ":%02ld", (long)r.get( UCAL_MINUTE, status = U_ZERO_ERROR));
101     fprintf( stderr, ":%02ld", (long)r.get( UCAL_SECOND, status = U_ZERO_ERROR));
102     fprintf( stderr, "  zone: %ld", (long)(nMillis = r.get( UCAL_ZONE_OFFSET, status = U_ZERO_ERROR)));
103     fprintf( stderr, " (%f min)", (double)nMillis / 60000);
104     debug_cal_millis_to_time( nMillis, h, m, s, f);
105     fprintf( stderr, " (%ld:%02ld:%02ld.%ld)", h, m, s, f);
106     fprintf( stderr, "  DST: %ld", (long)(nMillis = r.get( UCAL_DST_OFFSET, status = U_ZERO_ERROR)));
107     fprintf( stderr, " (%f min)", (double)nMillis / 60000);
108     debug_cal_millis_to_time( nMillis, h, m, s, f);
109     fprintf( stderr, " (%ld:%02ld:%02ld.%ld)", h, m, s, f);
110     fprintf( stderr, "\n");
111     fflush(stderr);
112 }
113 // must use double parens, i.e.:  DUMP_I18N_CAL_MSG(("four is: %d",4));
114 #define DUMP_I18N_CAL_MSG(x) {debug_cal_loc(__FILE__,__LINE__);debug_cal_msg x;debug_i18n_cal_dump(*body);}
115 #else   // erDUMP_I18N_CALENDAR
116 #define DUMP_I18N_CAL_MSG(x)
117 #endif  // erDUMP_I18N_CALENDAR
118 
119 #else   // erDUMP_ICU_CALENDAR || erDUMP_I18N_CALENDAR
120 #define DUMP_ICU_CAL_MSG(x)
121 #define DUMP_I18N_CAL_MSG(x)
122 #endif  // erDUMP_ICU_CALENDAR || erDUMP_I18N_CALENDAR
123 
124 
125 using namespace ::com::sun::star::uno;
126 using namespace ::com::sun::star::lang;
127 using namespace ::com::sun::star::i18n;
128 using namespace ::rtl;
129 
130 #define ERROR RuntimeException()
131 
Calendar_gregorian()132 Calendar_gregorian::Calendar_gregorian()
133 {
134     init(NULL);
135 }
Calendar_gregorian(Era * _eraArray)136 Calendar_gregorian::Calendar_gregorian(Era *_eraArray)
137 {
138     init(_eraArray);
139 }
140 void SAL_CALL
init(Era * _eraArray)141 Calendar_gregorian::init(Era *_eraArray)
142 {
143         cCalendar = "com.sun.star.i18n.Calendar_gregorian";
144 
145         // #i102356# With icu::Calendar::createInstance(UErrorCode) in a Thai
146         // th_TH system locale we accidentally used a Buddhist calendar. Though
147         // the ICU documentation says that should be the case only for
148         // th_TH_TRADITIONAL (and ja_JP_TRADITIONAL Gengou), a plain th_TH
149         // already triggers that behavior, ja_JP does not. Strange enough,
150         // passing a th_TH locale to the calendar creation doesn't trigger
151         // this.
152         // See also http://userguide.icu-project.org/datetime/calendar
153 
154         // Whatever ICU offers as the default calendar for a locale, ensure we
155         // have a Gregorian calendar as requested.
156 
157         /* XXX: with the current implementation the aLocale member variable is
158          * not set prior to loading a calendar from locale data. This
159          * creates an empty (root) locale for ICU, but at least the correct
160          * calendar is used. The language part must not be NULL (respectively
161          * not all, language and country and variant), otherwise the current
162          * default locale would be used again and the calendar keyword ignored.
163          * */
164         icu::Locale aIcuLocale( "", NULL, NULL, "calendar=gregorian");
165 
166         UErrorCode status;
167         body = icu::Calendar::createInstance( aIcuLocale, status = U_ZERO_ERROR);
168         if (!body || !U_SUCCESS(status)) throw ERROR;
169 
170 #if 0
171         {
172             icu::Locale loc;
173             loc = body->getLocale( ULOC_ACTUAL_LOCALE, status = U_ZERO_ERROR);
174             fprintf( stderr, "\nICU calendar actual locale: %s\n", loc.getName());
175             loc = body->getLocale( ULOC_VALID_LOCALE, status = U_ZERO_ERROR);
176             fprintf( stderr,   "ICU calendar valid  locale: %s\n", loc.getName());
177         }
178 #endif
179 
180         eraArray=_eraArray;
181 }
182 
~Calendar_gregorian()183 Calendar_gregorian::~Calendar_gregorian()
184 {
185         delete body;
186 }
187 
Calendar_hanja()188 Calendar_hanja::Calendar_hanja()
189 {
190         cCalendar = "com.sun.star.i18n.Calendar_hanja";
191 }
192 
193 OUString SAL_CALL
getDisplayName(sal_Int16 displayIndex,sal_Int16 idx,sal_Int16 nameType)194 Calendar_hanja::getDisplayName( sal_Int16 displayIndex, sal_Int16 idx, sal_Int16 nameType ) throw(RuntimeException)
195 {
196         if ( displayIndex == CalendarDisplayIndex::AM_PM ) {
197             // Am/Pm string for Korean Hanja calendar will refer to Japanese locale
198             com::sun::star::lang::Locale jaLocale =
199                 com::sun::star::lang::Locale(OUString::createFromAscii("ja"), OUString(), OUString());
200             if (idx == 0) return LocaleData().getLocaleItem(jaLocale).timeAM;
201             else if (idx == 1) return LocaleData().getLocaleItem(jaLocale).timePM;
202             else throw ERROR;
203         }
204         else
205             return Calendar_gregorian::getDisplayName( displayIndex, idx, nameType );
206 }
207 
208 void SAL_CALL
loadCalendar(const OUString &,const com::sun::star::lang::Locale & rLocale)209 Calendar_hanja::loadCalendar( const OUString& /*uniqueID*/, const com::sun::star::lang::Locale& rLocale ) throw(RuntimeException)
210 {
211         // Since this class could be called by service name 'hanja_yoil', we have to
212         // rename uniqueID to get right calendar defined in locale data.
213         Calendar_gregorian::loadCalendar(OUString::createFromAscii("hanja"), rLocale);
214 }
215 
216 static Era gengou_eraArray[] = {
217     {1868,  1,  1},
218     {1912,  7, 30},
219     {1926, 12, 25},
220     {1989,  1,  8},
221     {2019,  5,  1},
222     {0, 0,  0}
223 };
Calendar_gengou()224 Calendar_gengou::Calendar_gengou() : Calendar_gregorian(gengou_eraArray)
225 {
226         cCalendar = "com.sun.star.i18n.Calendar_gengou";
227 }
228 
229 static Era ROC_eraArray[] = {
230     {1912, 1, 1},
231     {0, 0,  0}
232 };
Calendar_ROC()233 Calendar_ROC::Calendar_ROC() : Calendar_gregorian(ROC_eraArray)
234 {
235         cCalendar = "com.sun.star.i18n.Calendar_ROC";
236 }
237 
238 static Era buddhist_eraArray[] = {
239     {-542, 1, 1},
240     {0, 0,  0}
241 };
Calendar_buddhist()242 Calendar_buddhist::Calendar_buddhist() : Calendar_gregorian(buddhist_eraArray)
243 {
244         cCalendar = "com.sun.star.i18n.Calendar_buddhist";
245 }
246 
247 void SAL_CALL
loadCalendar(const OUString & uniqueID,const com::sun::star::lang::Locale & rLocale)248 Calendar_gregorian::loadCalendar( const OUString& uniqueID, const com::sun::star::lang::Locale& rLocale ) throw(RuntimeException)
249 {
250         // init. fieldValue[]
251         getValue();
252 
253         aLocale = rLocale;
254         Sequence< Calendar> xC = LocaleData().getAllCalendars(rLocale);
255         for (sal_Int32 i = 0; i < xC.getLength(); i++)
256         {
257             if (uniqueID == xC[i].Name)
258             {
259                 aCalendar = xC[i];
260                 // setup minimalDaysInFirstWeek
261                 setMinimumNumberOfDaysForFirstWeek(
262                         aCalendar.MinimumNumberOfDaysForFirstWeek);
263                 // setup first day of week
264                 for (sal_Int16 day = sal::static_int_cast<sal_Int16>(
265                             aCalendar.Days.getLength()-1); day>=0; day--)
266                 {
267                     if (aCalendar.StartOfWeek == aCalendar.Days[day].ID)
268                     {
269                         setFirstDayOfWeek( day);
270                         return;
271                     }
272                 }
273             }
274         }
275         // Calendar is not for the locale
276         throw ERROR;
277 }
278 
279 
280 com::sun::star::i18n::Calendar SAL_CALL
getLoadedCalendar()281 Calendar_gregorian::getLoadedCalendar() throw(RuntimeException)
282 {
283         return aCalendar;
284 }
285 
286 OUString SAL_CALL
getUniqueID()287 Calendar_gregorian::getUniqueID() throw(RuntimeException)
288 {
289         return aCalendar.Name;
290 }
291 
292 void SAL_CALL
setDateTime(double timeInDays)293 Calendar_gregorian::setDateTime( double timeInDays ) throw(RuntimeException)
294 {
295         UErrorCode status;
296         body->setTime(timeInDays * U_MILLIS_PER_DAY, status = U_ZERO_ERROR);
297         if ( !U_SUCCESS(status) ) throw ERROR;
298         getValue();
299 }
300 
301 double SAL_CALL
getDateTime()302 Calendar_gregorian::getDateTime() throw(RuntimeException)
303 {
304         if (fieldSet) {
305             setValue();
306             getValue();
307         }
308         UErrorCode status;
309         double r = body->getTime(status = U_ZERO_ERROR);
310         if ( !U_SUCCESS(status) ) throw ERROR;
311         return r / U_MILLIS_PER_DAY;
312 }
313 
314 // map field value from gregorian calendar to other calendar, it can be overwritten by derived class.
315 // By using eraArray, it can take care Japanese and Taiwan ROC calendar.
mapFromGregorian()316 void Calendar_gregorian::mapFromGregorian() throw(RuntimeException)
317 {
318         if (eraArray) {
319             sal_Int16 e, y, m, d;
320 
321             e = fieldValue[CalendarFieldIndex::ERA];
322             y = fieldValue[CalendarFieldIndex::YEAR];
323             m = fieldValue[CalendarFieldIndex::MONTH] + 1;
324             d = fieldValue[CalendarFieldIndex::DAY_OF_MONTH];
325 
326             // since the year is reversed for first era, it is reversed again here for Era compare.
327             if (e == 0)
328                 y = 1 - y;
329 
330             for (e = 0; eraArray[e].year; e++)
331                 if ((y != eraArray[e].year) ? y < eraArray[e].year :
332                     (m != eraArray[e].month) ? m < eraArray[e].month : d < eraArray[e].day)
333                     break;
334 
335             fieldValue[CalendarFieldIndex::ERA] = e;
336             fieldValue[CalendarFieldIndex::YEAR] =
337                 sal::static_int_cast<sal_Int16>( (e == 0) ? (eraArray[0].year - y) : (y - eraArray[e-1].year + 1) );
338         }
339 }
340 
341 #define FIELDS  ((1 << CalendarFieldIndex::ERA) | (1 << CalendarFieldIndex::YEAR))
342 // map field value from other calendar to gregorian calendar, it can be overwritten by derived class.
343 // By using eraArray, it can take care Japanese and Taiwan ROC calendar.
mapToGregorian()344 void Calendar_gregorian::mapToGregorian() throw(RuntimeException)
345 {
346         if (eraArray && (fieldSet & FIELDS)) {
347             sal_Int16 y, e = fieldValue[CalendarFieldIndex::ERA];
348             if (e == 0)
349                 y = sal::static_int_cast<sal_Int16>( eraArray[0].year - fieldValue[CalendarFieldIndex::YEAR] );
350             else
351                 y = sal::static_int_cast<sal_Int16>( eraArray[e-1].year + fieldValue[CalendarFieldIndex::YEAR] - 1 );
352 
353             fieldSetValue[CalendarFieldIndex::ERA] = y <= 0 ? 0 : 1;
354             fieldSetValue[CalendarFieldIndex::YEAR] = (y <= 0 ? 1 - y : y);
355             fieldSet |= FIELDS;
356         }
357 }
358 
fieldNameConverter(sal_Int16 fieldIndex)359 static UCalendarDateFields fieldNameConverter(sal_Int16 fieldIndex) throw(RuntimeException)
360 {
361         UCalendarDateFields f;
362 
363         switch (fieldIndex) {
364             case CalendarFieldIndex::AM_PM:             f = UCAL_AM_PM; break;
365             case CalendarFieldIndex::DAY_OF_MONTH:      f = UCAL_DATE; break;
366             case CalendarFieldIndex::DAY_OF_WEEK:       f = UCAL_DAY_OF_WEEK; break;
367             case CalendarFieldIndex::DAY_OF_YEAR:       f = UCAL_DAY_OF_YEAR; break;
368             case CalendarFieldIndex::DST_OFFSET:        f = UCAL_DST_OFFSET; break;
369             case CalendarFieldIndex::ZONE_OFFSET:       f = UCAL_ZONE_OFFSET; break;
370             case CalendarFieldIndex::HOUR:              f = UCAL_HOUR_OF_DAY; break;
371             case CalendarFieldIndex::MINUTE:            f = UCAL_MINUTE; break;
372             case CalendarFieldIndex::SECOND:            f = UCAL_SECOND; break;
373             case CalendarFieldIndex::MILLISECOND:       f = UCAL_MILLISECOND; break;
374             case CalendarFieldIndex::WEEK_OF_MONTH:     f = UCAL_WEEK_OF_MONTH; break;
375             case CalendarFieldIndex::WEEK_OF_YEAR:      f = UCAL_WEEK_OF_YEAR; break;
376             case CalendarFieldIndex::YEAR:              f = UCAL_YEAR; break;
377             case CalendarFieldIndex::MONTH:             f = UCAL_MONTH; break;
378             case CalendarFieldIndex::ERA:               f = UCAL_ERA; break;
379             default: throw ERROR;
380         }
381         return f;
382 }
383 
384 void SAL_CALL
setValue(sal_Int16 fieldIndex,sal_Int16 value)385 Calendar_gregorian::setValue( sal_Int16 fieldIndex, sal_Int16 value ) throw(RuntimeException)
386 {
387     if (fieldIndex < 0 || FIELD_INDEX_COUNT <= fieldIndex)
388         throw ERROR;
389     fieldSet |= (1 << fieldIndex);
390     fieldValue[fieldIndex] = value;
391 }
392 
getCombinedOffset(sal_Int32 & o_nOffset,sal_Int16 nParentFieldIndex,sal_Int16 nChildFieldIndex) const393 bool Calendar_gregorian::getCombinedOffset( sal_Int32 & o_nOffset,
394         sal_Int16 nParentFieldIndex, sal_Int16 nChildFieldIndex ) const
395 {
396     o_nOffset = 0;
397     bool bFieldsSet = false;
398     if (fieldSet & (1 << nParentFieldIndex))
399     {
400         bFieldsSet = true;
401         o_nOffset = static_cast<sal_Int32>( fieldValue[nParentFieldIndex]) * 60000;
402     }
403     if (fieldSet & (1 << nChildFieldIndex))
404     {
405         bFieldsSet = true;
406         if (o_nOffset < 0)
407             o_nOffset -= static_cast<sal_uInt16>( fieldValue[nChildFieldIndex]);
408         else
409             o_nOffset += static_cast<sal_uInt16>( fieldValue[nChildFieldIndex]);
410     }
411     return bFieldsSet;
412 }
413 
getZoneOffset(sal_Int32 & o_nOffset) const414 bool Calendar_gregorian::getZoneOffset( sal_Int32 & o_nOffset ) const
415 {
416     return getCombinedOffset( o_nOffset, CalendarFieldIndex::ZONE_OFFSET,
417             CalendarFieldIndex::ZONE_OFFSET_SECOND_MILLIS);
418 }
419 
getDSTOffset(sal_Int32 & o_nOffset) const420 bool Calendar_gregorian::getDSTOffset( sal_Int32 & o_nOffset ) const
421 {
422     return getCombinedOffset( o_nOffset, CalendarFieldIndex::DST_OFFSET,
423             CalendarFieldIndex::DST_OFFSET_SECOND_MILLIS);
424 }
425 
submitFields()426 void Calendar_gregorian::submitFields() throw(com::sun::star::uno::RuntimeException)
427 {
428     for (sal_Int16 fieldIndex = 0; fieldIndex < FIELD_INDEX_COUNT; fieldIndex++)
429     {
430         if (fieldSet & (1 << fieldIndex))
431         {
432             switch (fieldIndex)
433             {
434                 default:
435                     body->set(fieldNameConverter(fieldIndex), fieldSetValue[fieldIndex]);
436                     break;
437                 case CalendarFieldIndex::ZONE_OFFSET:
438                 case CalendarFieldIndex::DST_OFFSET:
439                 case CalendarFieldIndex::ZONE_OFFSET_SECOND_MILLIS:
440                 case CalendarFieldIndex::DST_OFFSET_SECOND_MILLIS:
441                     break;  // nothing, extra handling
442             }
443         }
444     }
445     sal_Int32 nZoneOffset, nDSTOffset;
446     if (getZoneOffset( nZoneOffset))
447         body->set( fieldNameConverter( CalendarFieldIndex::ZONE_OFFSET), nZoneOffset);
448     if (getDSTOffset( nDSTOffset))
449         body->set( fieldNameConverter( CalendarFieldIndex::DST_OFFSET), nDSTOffset);
450 }
451 
submitValues(sal_Int32 nYear,sal_Int32 nMonth,sal_Int32 nDay,sal_Int32 nHour,sal_Int32 nMinute,sal_Int32 nSecond,sal_Int32 nMilliSecond,sal_Int32 nZone,sal_Int32 nDST)452 void Calendar_gregorian::submitValues( sal_Int32 nYear,
453         sal_Int32 nMonth, sal_Int32 nDay, sal_Int32 nHour, sal_Int32 nMinute,
454         sal_Int32 nSecond, sal_Int32 nMilliSecond, sal_Int32 nZone, sal_Int32 nDST )
455             throw(com::sun::star::uno::RuntimeException)
456 {
457     submitFields();
458     if (nYear >= 0)
459         body->set( UCAL_YEAR, nYear);
460     if (nMonth >= 0)
461         body->set( UCAL_MONTH, nMonth);
462     if (nDay >= 0)
463         body->set( UCAL_DATE, nDay);
464     if (nHour >= 0)
465         body->set( UCAL_HOUR_OF_DAY, nHour);
466     if (nMinute >= 0)
467         body->set( UCAL_MINUTE, nMinute);
468     if (nSecond >= 0)
469         body->set( UCAL_SECOND, nSecond);
470     if (nMilliSecond >= 0)
471         body->set( UCAL_MILLISECOND, nMilliSecond);
472     if (nZone != 0)
473         body->set( UCAL_ZONE_OFFSET, nZone);
474     if (nDST != 0)
475         body->set( UCAL_DST_OFFSET, nDST);
476 }
477 
lcl_setCombinedOffsetFieldValues(sal_Int32 nValue,sal_Int16 rFieldSetValue[],sal_Int16 rFieldValue[],sal_Int16 nParentFieldIndex,sal_Int16 nChildFieldIndex)478 static void lcl_setCombinedOffsetFieldValues( sal_Int32 nValue,
479         sal_Int16 rFieldSetValue[], sal_Int16 rFieldValue[],
480         sal_Int16 nParentFieldIndex, sal_Int16 nChildFieldIndex )
481 {
482     sal_Int32 nTrunc = nValue / 60000;
483     rFieldSetValue[nParentFieldIndex] = rFieldValue[nParentFieldIndex] =
484         static_cast<sal_Int16>( nTrunc);
485     sal_uInt16 nMillis = static_cast<sal_uInt16>( abs( nValue - nTrunc * 60000));
486     rFieldSetValue[nChildFieldIndex] = rFieldValue[nChildFieldIndex] =
487         static_cast<sal_Int16>( nMillis);
488 }
489 
setValue()490 void Calendar_gregorian::setValue() throw(RuntimeException)
491 {
492         // Correct DST glitch, see also localtime/gmtime conversion pitfalls at
493         // http://www.erack.de/download/timetest.c
494         //
495         // #i24082# in order to make the DST correction work in all
496         // circumstances, the time values have to be always resubmitted,
497         // regardless whether specified by the caller or not. It is not
498         // sufficient to rely on the ICU internal values previously set, as the
499         // following may happen:
500         // - Let 2004-03-28T02:00 be the onsetRule.
501         // - On 2004-03-29 (calendar initialized with 2004-03-29T00:00 DST) set
502         //   a date of 2004-03-28 => calendar results in 2004-03-27T23:00 no DST.
503         // - Correcting this with simply "2004-03-28 no DST" and no time
504         //   specified results in 2004-03-29T00:00, the ICU internal 23:00 time
505         //   being adjusted to 24:00 in this case, switching one day further.
506         // => submit 2004-03-28T00:00 no DST.
507 
508         // This got even weirder since ICU incorporated also historical data,
509         // even the timezone may differ for different dates! It is necessary to
510         // let ICU choose the corresponding OlsonTimeZone transitions and adapt
511         // values.
512         // #i86094# gives examples where that went wrong:
513         // TZ=Europe/Moscow date <= 1919-07-01
514         //      zone +2:30:48 (!) instead of +3h, DST +2h instead of +1h
515         // TZ=America/St_Johns date <= 1935-03-30
516         //      zone -3:30:52 (!) instead of -3:30
517 
518         // Copy fields before calling submitFields() directly or indirectly below.
519         memcpy(fieldSetValue, fieldValue, sizeof(fieldSetValue));
520         // Possibly setup ERA and YEAR in fieldSetValue.
521         mapToGregorian();
522 
523         DUMP_ICU_CAL_MSG(("%s\n","setValue() before any submission"));
524         DUMP_I18N_CAL_MSG(("%s\n","setValue() before any submission"));
525 
526         bool bNeedZone = !(fieldSet & (1 << CalendarFieldIndex::ZONE_OFFSET));
527         bool bNeedDST  = !(fieldSet & (1 << CalendarFieldIndex::DST_OFFSET));
528         sal_Int32 nZone1, nDST1, nYear, nMonth, nDay, nHour, nMinute, nSecond, nMilliSecond, nZone0, nDST0;
529         nZone1 = nDST1 = nZone0 = nDST0 = 0;
530         nYear = nMonth = nDay = nHour = nMinute = nSecond = nMilliSecond = -1;
531         if ( bNeedZone || bNeedDST )
532         {
533             UErrorCode status;
534             if ( !(fieldSet & (1 << CalendarFieldIndex::YEAR)) )
535             {
536                 nYear = body->get( UCAL_YEAR, status = U_ZERO_ERROR);
537                 if ( !U_SUCCESS(status) )
538                     nYear = -1;
539             }
540             if ( !(fieldSet & (1 << CalendarFieldIndex::MONTH)) )
541             {
542                 nMonth = body->get( UCAL_MONTH, status = U_ZERO_ERROR);
543                 if ( !U_SUCCESS(status) )
544                     nMonth = -1;
545             }
546             if ( !(fieldSet & (1 << CalendarFieldIndex::DAY_OF_MONTH)) )
547             {
548                 nDay = body->get( UCAL_DATE, status = U_ZERO_ERROR);
549                 if ( !U_SUCCESS(status) )
550                     nDay = -1;
551             }
552             if ( !(fieldSet & (1 << CalendarFieldIndex::HOUR)) )
553             {
554                 nHour = body->get( UCAL_HOUR_OF_DAY, status = U_ZERO_ERROR);
555                 if ( !U_SUCCESS(status) )
556                     nHour = -1;
557             }
558             if ( !(fieldSet & (1 << CalendarFieldIndex::MINUTE)) )
559             {
560                 nMinute = body->get( UCAL_MINUTE, status = U_ZERO_ERROR);
561                 if ( !U_SUCCESS(status) )
562                     nMinute = -1;
563             }
564             if ( !(fieldSet & (1 << CalendarFieldIndex::SECOND)) )
565             {
566                 nSecond = body->get( UCAL_SECOND, status = U_ZERO_ERROR);
567                 if ( !U_SUCCESS(status) )
568                     nSecond = -1;
569             }
570             if ( !(fieldSet & (1 << CalendarFieldIndex::MILLISECOND)) )
571             {
572                 nMilliSecond = body->get( UCAL_MILLISECOND, status = U_ZERO_ERROR);
573                 if ( !U_SUCCESS(status) )
574                     nMilliSecond = -1;
575             }
576             if ( !(fieldSet & (1 << CalendarFieldIndex::ZONE_OFFSET)) )
577             {
578                 nZone0 = body->get( UCAL_ZONE_OFFSET, status = U_ZERO_ERROR);
579                 if ( !U_SUCCESS(status) )
580                     nZone0 = 0;
581             }
582             if ( !(fieldSet & (1 << CalendarFieldIndex::DST_OFFSET)) )
583             {
584                 nDST0 = body->get( UCAL_DST_OFFSET, status = U_ZERO_ERROR);
585                 if ( !U_SUCCESS(status) )
586                     nDST0 = 0;
587             }
588 
589             // Submit values to obtain a time zone and DST corresponding to the date/time.
590             submitValues( nYear, nMonth, nDay, nHour, nMinute, nSecond, nMilliSecond, nZone0, nDST0);
591 
592             DUMP_ICU_CAL_MSG(("%s\n","setValue() in bNeedZone||bNeedDST after submitValues()"));
593             DUMP_I18N_CAL_MSG(("%s\n","setValue() in bNeedZone||bNeedDST after submitValues()"));
594             nZone1 = body->get( UCAL_ZONE_OFFSET, status = U_ZERO_ERROR);
595             if ( !U_SUCCESS(status) )
596                 nZone1 = 0;
597             nDST1 = body->get( UCAL_DST_OFFSET, status = U_ZERO_ERROR);
598             if ( !U_SUCCESS(status) )
599                 nDST1 = 0;
600         }
601 
602         // The original submission, may lead to a different zone/DST and
603         // different date.
604         submitFields();
605         DUMP_ICU_CAL_MSG(("%s\n","setValue() after original submission"));
606         DUMP_I18N_CAL_MSG(("%s\n","setValue() after original submission"));
607 
608         if ( bNeedZone || bNeedDST )
609         {
610             UErrorCode status;
611             sal_Int32 nZone2 = body->get( UCAL_ZONE_OFFSET, status = U_ZERO_ERROR);
612             if ( !U_SUCCESS(status) )
613                 nZone2 = nZone1;
614             sal_Int32 nDST2 = body->get( UCAL_DST_OFFSET, status = U_ZERO_ERROR);
615             if ( !U_SUCCESS(status) )
616                 nDST2 = nDST1;
617             if ( nZone0 != nZone1 || nZone2 != nZone1 || nDST0 != nDST1 || nDST2 != nDST1 )
618             {
619                 // Due to different DSTs, resulting date values may differ if
620                 // DST is onset at 00:00 and the very onsetRule date was
621                 // submitted with DST off => date-1 23:00, for example, which
622                 // is not what we want.
623                 // Resubmit all values, this time including DST => date 01:00
624                 // Similar for zone differences.
625                 // If already the first full submission with nZone0 and nDST0
626                 // lead to date-1 23:00, the original submission was based on
627                 // that date if it wasn't a full date (nDST0 set, nDST1 not
628                 // set, nDST2==nDST1). If it was January 1st without year we're
629                 // even off by one year now. Resubmit all values including new
630                 // DST => date 00:00.
631 
632                 // Set field values accordingly in case they were used.
633                 if (!bNeedZone)
634                     lcl_setCombinedOffsetFieldValues( nZone2, fieldSetValue,
635                             fieldValue, CalendarFieldIndex::ZONE_OFFSET,
636                             CalendarFieldIndex::ZONE_OFFSET_SECOND_MILLIS);
637                 if (!bNeedDST)
638                     lcl_setCombinedOffsetFieldValues( nDST2, fieldSetValue,
639                             fieldValue, CalendarFieldIndex::DST_OFFSET,
640                             CalendarFieldIndex::DST_OFFSET_SECOND_MILLIS);
641                 submitValues( nYear, nMonth, nDay, nHour, nMinute, nSecond, nMilliSecond, nZone2, nDST2);
642                 DUMP_ICU_CAL_MSG(("%s\n","setValue() after Zone/DST glitch resubmit"));
643                 DUMP_I18N_CAL_MSG(("%s\n","setValue() after Zone/DST glitch resubmit"));
644 
645                 // Time zone transition => resubmit.
646                 // TZ=America/St_Johns date <= 1935-03-30
647                 //      -3:30:52 (!) instead of -3:30
648                 //      if first submission included time zone -3:30 that would be wrong.
649                 bool bResubmit = false;
650                 sal_Int32 nZone3 = body->get( UCAL_ZONE_OFFSET, status = U_ZERO_ERROR);
651                 if ( !U_SUCCESS(status) )
652                     nZone3 = nZone2;
653                 if (nZone3 != nZone2)
654                 {
655                     bResubmit = true;
656                     if (!bNeedZone)
657                         lcl_setCombinedOffsetFieldValues( nZone3, fieldSetValue,
658                                 fieldValue, CalendarFieldIndex::ZONE_OFFSET,
659                                 CalendarFieldIndex::ZONE_OFFSET_SECOND_MILLIS);
660                 }
661 
662                 // If the DST onset rule says to switch from 00:00 to 01:00 and
663                 // we tried to set onsetDay 00:00 with DST, the result was
664                 // onsetDay-1 23:00 and no DST, which is not what we want. So
665                 // once again without DST, resulting in onsetDay 01:00 and DST.
666                 // Yes, this seems to be weird, but logically correct.
667                 // It doesn't even have to be on an onsetDay as the DST is
668                 // factored in all days by ICU and there seems to be some
669                 // unknown behavior.
670                 // TZ=Asia/Tehran 1999-03-22 exposes this, for example.
671                 sal_Int32 nDST3 = body->get( UCAL_DST_OFFSET, status = U_ZERO_ERROR);
672                 if ( !U_SUCCESS(status) )
673                     nDST3 = nDST2;
674                 if (nDST2 != nDST3 && !nDST3)
675                 {
676                     bResubmit = true;
677                     if (!bNeedDST)
678                     {
679                         fieldSetValue[CalendarFieldIndex::DST_OFFSET] =
680                             fieldValue[CalendarFieldIndex::DST_OFFSET] = 0;
681                         fieldSetValue[CalendarFieldIndex::DST_OFFSET_SECOND_MILLIS] =
682                             fieldValue[CalendarFieldIndex::DST_OFFSET_SECOND_MILLIS] = 0;
683                     }
684                 }
685                 if (bResubmit)
686                 {
687                     submitValues( nYear, nMonth, nDay, nHour, nMinute, nSecond, nMilliSecond, nZone3, nDST3);
688                     DUMP_ICU_CAL_MSG(("%s\n","setValue() after Zone/DST glitch 2nd resubmit"));
689                     DUMP_I18N_CAL_MSG(("%s\n","setValue() after Zone/DST glitch 2nd resubmit"));
690                 }
691             }
692         }
693 #if erDUMP_ICU_CALENDAR || erDUMP_I18N_CALENDAR
694         {
695             // force icu::Calendar to recalculate
696             UErrorCode status;
697             sal_Int32 nTmp = body->get( UCAL_DATE, status = U_ZERO_ERROR);
698             DUMP_ICU_CAL_MSG(("%s: %d\n","setValue() result day",nTmp));
699             DUMP_I18N_CAL_MSG(("%s: %d\n","setValue() result day",nTmp));
700         }
701 #endif
702 }
703 
getValue()704 void Calendar_gregorian::getValue() throw(RuntimeException)
705 {
706     DUMP_ICU_CAL_MSG(("%s\n","getValue()"));
707     DUMP_I18N_CAL_MSG(("%s\n","getValue()"));
708     for (sal_Int16 fieldIndex = 0; fieldIndex < FIELD_INDEX_COUNT; fieldIndex++)
709     {
710         if (fieldIndex == CalendarFieldIndex::ZONE_OFFSET_SECOND_MILLIS ||
711                 fieldIndex == CalendarFieldIndex::DST_OFFSET_SECOND_MILLIS)
712             continue;   // not ICU fields
713 
714         UErrorCode status; sal_Int32 value = body->get( fieldNameConverter(
715                     fieldIndex), status = U_ZERO_ERROR);
716         if ( !U_SUCCESS(status) ) throw ERROR;
717 
718         // Convert millisecond to minute for ZONE and DST and set remainder in
719         // second field.
720         if (fieldIndex == CalendarFieldIndex::ZONE_OFFSET)
721         {
722             sal_Int32 nMinutes = value / 60000;
723             sal_Int16 nMillis = static_cast<sal_Int16>( static_cast<sal_uInt16>(
724                         abs( value - nMinutes * 60000)));
725             fieldValue[CalendarFieldIndex::ZONE_OFFSET] = static_cast<sal_Int16>( nMinutes);
726             fieldValue[CalendarFieldIndex::ZONE_OFFSET_SECOND_MILLIS] = nMillis;
727         }
728         else if (fieldIndex == CalendarFieldIndex::DST_OFFSET)
729         {
730             sal_Int32 nMinutes = value / 60000;
731             sal_Int16 nMillis = static_cast<sal_Int16>( static_cast<sal_uInt16>(
732                         abs( value - nMinutes * 60000)));
733             fieldValue[CalendarFieldIndex::DST_OFFSET] = static_cast<sal_Int16>( nMinutes);
734             fieldValue[CalendarFieldIndex::DST_OFFSET_SECOND_MILLIS] = nMillis;
735         }
736         else
737             fieldValue[fieldIndex] = (sal_Int16) value;
738 
739         // offset 1 since the value for week start day SunDay is different between Calendar and Weekdays.
740         if ( fieldIndex == CalendarFieldIndex::DAY_OF_WEEK )
741             fieldValue[fieldIndex]--;   // UCAL_SUNDAY:/* == 1 */ ==> Weekdays::SUNDAY /* ==0 */
742     }
743     mapFromGregorian();
744     fieldSet = 0;
745 }
746 
747 sal_Int16 SAL_CALL
getValue(sal_Int16 fieldIndex)748 Calendar_gregorian::getValue( sal_Int16 fieldIndex ) throw(RuntimeException)
749 {
750     if (fieldIndex < 0 || FIELD_INDEX_COUNT <= fieldIndex)
751         throw ERROR;
752 
753     if (fieldSet)  {
754         setValue();
755         getValue();
756     }
757 
758     return fieldValue[fieldIndex];
759 }
760 
761 void SAL_CALL
addValue(sal_Int16 fieldIndex,sal_Int32 value)762 Calendar_gregorian::addValue( sal_Int16 fieldIndex, sal_Int32 value ) throw(RuntimeException)
763 {
764         // since ZONE and DST could not be add, we don't need to convert value here
765         UErrorCode status;
766         body->add(fieldNameConverter(fieldIndex), value, status = U_ZERO_ERROR);
767         if ( !U_SUCCESS(status) ) throw ERROR;
768         getValue();
769 }
770 
771 sal_Bool SAL_CALL
isValid()772 Calendar_gregorian::isValid() throw(RuntimeException)
773 {
774         if (fieldSet) {
775             sal_Int32 tmp = fieldSet;
776             setValue();
777             memcpy(fieldSetValue, fieldValue, sizeof(fieldSetValue));
778             getValue();
779             for ( sal_Int16 fieldIndex = 0; fieldIndex < FIELD_INDEX_COUNT; fieldIndex++ ) {
780                 // compare only with fields that are set and reset fieldSet[]
781                 if (tmp & (1 << fieldIndex)) {
782                     if (fieldSetValue[fieldIndex] != fieldValue[fieldIndex])
783                         return sal_False;
784                 }
785             }
786         }
787         return true;
788 }
789 
790 // NativeNumberMode has different meaning between Number and Calendar for Asian locales.
791 // Here is the mapping table
792 // calendar(q/y/m/d)    zh_CN           zh_TW           ja              ko
793 // NatNum1              NatNum1/1/7/7   NatNum1/1/7/7   NatNum1/1/4/4   NatNum1/1/7/7
794 // NatNum2              NatNum2/2/8/8   NatNum2/2/8/8   NatNum2/2/5/5   NatNum2/2/8/8
795 // NatNum3              NatNum3/3/3/3   NatNum3/3/3/3   NatNum3/3/3/3   NatNum3/3/3/3
796 // NatNum4                                                              NatNum9/9/11/11
797 
NatNumForCalendar(const com::sun::star::lang::Locale & aLocale,sal_Int32 nCalendarDisplayCode,sal_Int16 nNativeNumberMode,sal_Int16 value)798 static sal_Int16 SAL_CALL NatNumForCalendar(const com::sun::star::lang::Locale& aLocale,
799         sal_Int32 nCalendarDisplayCode, sal_Int16 nNativeNumberMode, sal_Int16 value )
800 {
801     sal_Bool isShort = ((nCalendarDisplayCode == CalendarDisplayCode::SHORT_YEAR ||
802         nCalendarDisplayCode == CalendarDisplayCode::LONG_YEAR) && value >= 100) ||
803         nCalendarDisplayCode == CalendarDisplayCode::SHORT_QUARTER ||
804         nCalendarDisplayCode == CalendarDisplayCode::LONG_QUARTER;
805     sal_Bool isChinese = aLocale.Language.equalsAscii("zh");
806     sal_Bool isJapanese = aLocale.Language.equalsAscii("ja");
807     sal_Bool isKorean = aLocale.Language.equalsAscii("ko");
808 
809     if (isChinese || isJapanese || isKorean) {
810         switch (nNativeNumberMode) {
811             case NativeNumberMode::NATNUM1:
812                 if (!isShort)
813                     nNativeNumberMode = isJapanese ? NativeNumberMode::NATNUM4 : NativeNumberMode::NATNUM7;
814                 break;
815             case NativeNumberMode::NATNUM2:
816                 if (!isShort)
817                     nNativeNumberMode = isJapanese ? NativeNumberMode::NATNUM5 : NativeNumberMode::NATNUM8;
818                 break;
819             case NativeNumberMode::NATNUM3:
820                 break;
821             case NativeNumberMode::NATNUM4:
822                 if (isKorean)
823                     return isShort ? NativeNumberMode::NATNUM9 : NativeNumberMode::NATNUM11;
824                 // fall through
825             default: return 0;
826         }
827     }
828     return nNativeNumberMode;
829 }
830 
DisplayCode2FieldIndex(sal_Int32 nCalendarDisplayCode)831 static sal_Int32 SAL_CALL DisplayCode2FieldIndex(sal_Int32 nCalendarDisplayCode)
832 {
833     switch( nCalendarDisplayCode ) {
834         case CalendarDisplayCode::SHORT_DAY:
835         case CalendarDisplayCode::LONG_DAY:
836             return CalendarFieldIndex::DAY_OF_MONTH;
837         case CalendarDisplayCode::SHORT_DAY_NAME:
838         case CalendarDisplayCode::LONG_DAY_NAME:
839             return CalendarFieldIndex::DAY_OF_WEEK;
840         case CalendarDisplayCode::SHORT_QUARTER:
841         case CalendarDisplayCode::LONG_QUARTER:
842         case CalendarDisplayCode::SHORT_MONTH:
843         case CalendarDisplayCode::LONG_MONTH:
844         case CalendarDisplayCode::SHORT_MONTH_NAME:
845         case CalendarDisplayCode::LONG_MONTH_NAME:
846             return CalendarFieldIndex::MONTH;
847         case CalendarDisplayCode::SHORT_YEAR:
848         case CalendarDisplayCode::LONG_YEAR:
849             return CalendarFieldIndex::YEAR;
850         case CalendarDisplayCode::SHORT_ERA:
851         case CalendarDisplayCode::LONG_ERA:
852             return CalendarFieldIndex::ERA;
853         case CalendarDisplayCode::SHORT_YEAR_AND_ERA:
854         case CalendarDisplayCode::LONG_YEAR_AND_ERA:
855             return CalendarFieldIndex::YEAR;
856         default:
857             return 0;
858     }
859 }
860 
861 sal_Int16 SAL_CALL
getFirstDayOfWeek()862 Calendar_gregorian::getFirstDayOfWeek() throw(RuntimeException)
863 {
864     // UCAL_SUNDAY == 1, Weekdays::SUNDAY == 0 => offset -1
865     // Check for underflow just in case we're called "out of sync".
866     return ::std::max( sal::static_int_cast<sal_Int16>(0),
867             sal::static_int_cast<sal_Int16>( static_cast<sal_Int16>(
868                     body->getFirstDayOfWeek()) - 1));
869 }
870 
871 void SAL_CALL
setFirstDayOfWeek(sal_Int16 day)872 Calendar_gregorian::setFirstDayOfWeek( sal_Int16 day )
873 throw(RuntimeException)
874 {
875     // Weekdays::SUNDAY == 0, UCAL_SUNDAY == 1 => offset +1
876     body->setFirstDayOfWeek( static_cast<UCalendarDaysOfWeek>( day + 1));
877 }
878 
879 void SAL_CALL
setMinimumNumberOfDaysForFirstWeek(sal_Int16 days)880 Calendar_gregorian::setMinimumNumberOfDaysForFirstWeek( sal_Int16 days ) throw(RuntimeException)
881 {
882         aCalendar.MinimumNumberOfDaysForFirstWeek = days;
883         body->setMinimalDaysInFirstWeek( static_cast<uint8_t>( days));
884 }
885 
886 sal_Int16 SAL_CALL
getMinimumNumberOfDaysForFirstWeek()887 Calendar_gregorian::getMinimumNumberOfDaysForFirstWeek() throw(RuntimeException)
888 {
889         return aCalendar.MinimumNumberOfDaysForFirstWeek;
890 }
891 
892 sal_Int16 SAL_CALL
getNumberOfMonthsInYear()893 Calendar_gregorian::getNumberOfMonthsInYear() throw(RuntimeException)
894 {
895         return (sal_Int16) aCalendar.Months.getLength();
896 }
897 
898 
899 sal_Int16 SAL_CALL
getNumberOfDaysInWeek()900 Calendar_gregorian::getNumberOfDaysInWeek() throw(RuntimeException)
901 {
902         return (sal_Int16) aCalendar.Days.getLength();
903 }
904 
905 
906 Sequence< CalendarItem > SAL_CALL
getMonths()907 Calendar_gregorian::getMonths() throw(RuntimeException)
908 {
909         return aCalendar.Months;
910 }
911 
912 
913 Sequence< CalendarItem > SAL_CALL
getDays()914 Calendar_gregorian::getDays() throw(RuntimeException)
915 {
916         return aCalendar.Days;
917 }
918 
919 OUString SAL_CALL
getDisplayName(sal_Int16 displayIndex,sal_Int16 idx,sal_Int16 nameType)920 Calendar_gregorian::getDisplayName( sal_Int16 displayIndex, sal_Int16 idx, sal_Int16 nameType ) throw(RuntimeException)
921 {
922         OUString aStr;
923 
924         switch( displayIndex ) {
925             case CalendarDisplayIndex::AM_PM:/* ==0 */
926                 if (idx == 0) aStr = LocaleData().getLocaleItem(aLocale).timeAM;
927                 else if (idx == 1) aStr = LocaleData().getLocaleItem(aLocale).timePM;
928                 else throw ERROR;
929                 break;
930             case CalendarDisplayIndex::DAY:
931                 if( idx >= aCalendar.Days.getLength() ) throw ERROR;
932                 if (nameType == 0) aStr = aCalendar.Days[idx].AbbrevName;
933                 else if (nameType == 1) aStr = aCalendar.Days[idx].FullName;
934                 else throw ERROR;
935                 break;
936             case CalendarDisplayIndex::MONTH:
937                 if( idx >= aCalendar.Months.getLength() ) throw ERROR;
938                 if (nameType == 0) aStr = aCalendar.Months[idx].AbbrevName;
939                 else if (nameType == 1) aStr = aCalendar.Months[idx].FullName;
940                 else throw ERROR;
941                 break;
942             case CalendarDisplayIndex::ERA:
943                 if( idx >= aCalendar.Eras.getLength() ) throw ERROR;
944                 if (nameType == 0) aStr = aCalendar.Eras[idx].AbbrevName;
945                 else if (nameType == 1) aStr = aCalendar.Eras[idx].FullName;
946                 else throw ERROR;
947                 break;
948             case CalendarDisplayIndex::YEAR:
949                 break;
950             default:
951                 throw ERROR;
952         }
953         return aStr;
954 }
955 
956 // Methods in XExtendedCalendar
957 OUString SAL_CALL
getDisplayString(sal_Int32 nCalendarDisplayCode,sal_Int16 nNativeNumberMode)958 Calendar_gregorian::getDisplayString( sal_Int32 nCalendarDisplayCode, sal_Int16 nNativeNumberMode )
959         throw (RuntimeException)
960 {
961     sal_Int16 value = getValue(sal::static_int_cast<sal_Int16>( DisplayCode2FieldIndex(nCalendarDisplayCode) ));
962     OUString aOUStr;
963 
964     if (nCalendarDisplayCode == CalendarDisplayCode::SHORT_QUARTER ||
965             nCalendarDisplayCode == CalendarDisplayCode::LONG_QUARTER) {
966         Sequence< OUString> xR = LocaleData().getReservedWord(aLocale);
967         sal_Int16 quarter = value / 3;
968         // Since this base class method may be called by derived calendar
969         // classes where a year consists of more than 12 months we need a check
970         // to not run out of bounds of reserved quarter words. Perhaps a more
971         // clean way (instead of dividing by 3) would be to first get the
972         // number of months, divide by 4 and then use that result to divide the
973         // actual month value.
974         if ( quarter > 3 )
975             quarter = 3;
976         quarter = sal::static_int_cast<sal_Int16>( quarter +
977             ((nCalendarDisplayCode == CalendarDisplayCode::SHORT_QUARTER) ?
978             reservedWords::QUARTER1_ABBREVIATION : reservedWords::QUARTER1_WORD) );
979         aOUStr = xR[quarter];
980     } else {
981         // The "#100211# - checked" comments serve for detection of "use of
982         // sprintf is safe here" conditions. An sprintf encountered without
983         // having that comment triggers alarm ;-)
984         sal_Char aStr[10];
985         switch( nCalendarDisplayCode ) {
986             case CalendarDisplayCode::SHORT_MONTH:
987                 value += 1;     // month is zero based
988                 // fall thru
989             case CalendarDisplayCode::SHORT_DAY:
990                 sprintf(aStr, "%d", value);     // #100211# - checked
991                 break;
992             case CalendarDisplayCode::LONG_YEAR:
993                 if (aCalendar.Name.equalsAscii("gengou"))
994                     sprintf(aStr, "%02d", value);     // #100211# - checked
995                 else
996                     sprintf(aStr, "%d", value);     // #100211# - checked
997                 break;
998             case CalendarDisplayCode::LONG_MONTH:
999                 value += 1;     // month is zero based
1000                 sprintf(aStr, "%02d", value);   // #100211# - checked
1001                 break;
1002             case CalendarDisplayCode::SHORT_YEAR:
1003                 // Take last 2 digits, or only one if value<10, for example,
1004                 // in case of the Gengou calendar.
1005                 // #i116701# For values in non-Gregorian era years use all
1006                 // digits.
1007                 if (value < 100 || eraArray)
1008                     sprintf(aStr, "%d", value); // #100211# - checked
1009                 else
1010                     sprintf(aStr, "%02d", value % 100); // #100211# - checked
1011                 break;
1012             case CalendarDisplayCode::LONG_DAY:
1013                 sprintf(aStr, "%02d", value);   // #100211# - checked
1014                 break;
1015 
1016             case CalendarDisplayCode::SHORT_DAY_NAME:
1017                 return getDisplayName(CalendarDisplayIndex::DAY, value, 0);
1018             case CalendarDisplayCode::LONG_DAY_NAME:
1019                 return getDisplayName(CalendarDisplayIndex::DAY, value, 1);
1020             case CalendarDisplayCode::SHORT_MONTH_NAME:
1021                 return getDisplayName(CalendarDisplayIndex::MONTH, value, 0);
1022             case CalendarDisplayCode::LONG_MONTH_NAME:
1023                 return getDisplayName(CalendarDisplayIndex::MONTH, value, 1);
1024             case CalendarDisplayCode::SHORT_ERA:
1025                 return getDisplayName(CalendarDisplayIndex::ERA, value, 0);
1026             case CalendarDisplayCode::LONG_ERA:
1027                 return getDisplayName(CalendarDisplayIndex::ERA, value, 1);
1028 
1029             case CalendarDisplayCode::SHORT_YEAR_AND_ERA:
1030                 return  getDisplayString( CalendarDisplayCode::SHORT_ERA, nNativeNumberMode ) +
1031                     getDisplayString( CalendarDisplayCode::SHORT_YEAR, nNativeNumberMode );
1032 
1033             case CalendarDisplayCode::LONG_YEAR_AND_ERA:
1034                 return  getDisplayString( CalendarDisplayCode::LONG_ERA, nNativeNumberMode ) +
1035                     getDisplayString( CalendarDisplayCode::LONG_YEAR, nNativeNumberMode );
1036 
1037             default:
1038                 throw ERROR;
1039         }
1040         aOUStr = OUString::createFromAscii(aStr);
1041     }
1042     if (nNativeNumberMode > 0) {
1043         // For Japanese calendar, first year calls GAN, see bug 111668 for detail.
1044 		if (eraArray == gengou_eraArray && value == 1
1045 			&& (nCalendarDisplayCode == CalendarDisplayCode::SHORT_YEAR ||
1046 				nCalendarDisplayCode == CalendarDisplayCode::LONG_YEAR)
1047 			&& (nNativeNumberMode == NativeNumberMode::NATNUM1 ||
1048 				nNativeNumberMode == NativeNumberMode::NATNUM2)) {
1049 			static sal_Unicode gan = 0x5143;
1050 			return OUString(&gan, 1);
1051 		}
1052         sal_Int16 nNatNum = NatNumForCalendar(aLocale, nCalendarDisplayCode, nNativeNumberMode, value);
1053         if (nNatNum > 0)
1054             return aNatNum.getNativeNumberString(aOUStr, aLocale, nNatNum);
1055     }
1056     return aOUStr;
1057 }
1058 
1059 // Methods in XExtendedCalendar
1060 OUString SAL_CALL
getDisplayString(sal_Int32 nCalendarDisplayCode,sal_Int16 nNativeNumberMode)1061 Calendar_buddhist::getDisplayString( sal_Int32 nCalendarDisplayCode, sal_Int16 nNativeNumberMode )
1062         throw (RuntimeException)
1063 {
1064     // make year and era in different order for year before and after 0.
1065     if ((nCalendarDisplayCode == CalendarDisplayCode::LONG_YEAR_AND_ERA ||
1066                 nCalendarDisplayCode == CalendarDisplayCode::SHORT_YEAR_AND_ERA) &&
1067             getValue(CalendarFieldIndex::ERA) == 0) {
1068         if (nCalendarDisplayCode == CalendarDisplayCode::LONG_YEAR_AND_ERA)
1069             return  getDisplayString( CalendarDisplayCode::SHORT_YEAR, nNativeNumberMode ) +
1070                 getDisplayString( CalendarDisplayCode::SHORT_ERA, nNativeNumberMode );
1071         else
1072             return  getDisplayString( CalendarDisplayCode::LONG_YEAR, nNativeNumberMode ) +
1073                 getDisplayString( CalendarDisplayCode::LONG_ERA, nNativeNumberMode );
1074     }
1075     return Calendar_gregorian::getDisplayString(nCalendarDisplayCode, nNativeNumberMode);
1076 }
1077 
1078 OUString SAL_CALL
getImplementationName(void)1079 Calendar_gregorian::getImplementationName(void) throw( RuntimeException )
1080 {
1081         return OUString::createFromAscii(cCalendar);
1082 }
1083 
1084 sal_Bool SAL_CALL
supportsService(const rtl::OUString & rServiceName)1085 Calendar_gregorian::supportsService(const rtl::OUString& rServiceName) throw( RuntimeException )
1086 {
1087         return !rServiceName.compareToAscii(cCalendar);
1088 }
1089 
1090 Sequence< OUString > SAL_CALL
getSupportedServiceNames(void)1091 Calendar_gregorian::getSupportedServiceNames(void) throw( RuntimeException )
1092 {
1093         Sequence< OUString > aRet(1);
1094         aRet[0] = OUString::createFromAscii(cCalendar);
1095         return aRet;
1096 }
1097 
1098