123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077 |
- // © 2016 and later: Unicode, Inc. and others.
- // License & terms of use: http://www.unicode.org/copyright.html
- /*
- *******************************************************************************
- * Copyright (C) 1997-2016, International Business Machines Corporation and *
- * others. All Rights Reserved. *
- *******************************************************************************
- *
- * File CALENDAR.CPP
- *
- * Modification History:
- *
- * Date Name Description
- * 02/03/97 clhuang Creation.
- * 04/22/97 aliu Cleaned up, fixed memory leak, made
- * setWeekCountData() more robust.
- * Moved platform code to TPlatformUtilities.
- * 05/01/97 aliu Made equals(), before(), after() arguments const.
- * 05/20/97 aliu Changed logic of when to compute fields and time
- * to fix bugs.
- * 08/12/97 aliu Added equivalentTo. Misc other fixes.
- * 07/28/98 stephen Sync up with JDK 1.2
- * 09/02/98 stephen Sync with JDK 1.2 8/31 build (getActualMin/Max)
- * 03/17/99 stephen Changed adoptTimeZone() - now fAreFieldsSet is
- * set to false to force update of time.
- *******************************************************************************
- */
- #include "utypeinfo.h" // for 'typeid' to work
- #include "unicode/utypes.h"
- #if !UCONFIG_NO_FORMATTING
- #include "unicode/gregocal.h"
- #include "unicode/basictz.h"
- #include "unicode/simpletz.h"
- #include "unicode/rbtz.h"
- #include "unicode/vtzone.h"
- #include "gregoimp.h"
- #include "buddhcal.h"
- #include "taiwncal.h"
- #include "japancal.h"
- #include "islamcal.h"
- #include "hebrwcal.h"
- #include "persncal.h"
- #include "indiancal.h"
- #include "iso8601cal.h"
- #include "chnsecal.h"
- #include "coptccal.h"
- #include "dangical.h"
- #include "ethpccal.h"
- #include "unicode/calendar.h"
- #include "cpputils.h"
- #include "servloc.h"
- #include "ucln_in.h"
- #include "cstring.h"
- #include "locbased.h"
- #include "uresimp.h"
- #include "ustrenum.h"
- #include "uassert.h"
- #include "olsontz.h"
- #include "sharedcalendar.h"
- #include "unifiedcache.h"
- #include "ulocimp.h"
- #if !UCONFIG_NO_SERVICE
- static icu::ICULocaleService* gService = nullptr;
- static icu::UInitOnce gServiceInitOnce {};
- // INTERNAL - for cleanup
- U_CDECL_BEGIN
- static UBool calendar_cleanup() {
- #if !UCONFIG_NO_SERVICE
- if (gService) {
- delete gService;
- gService = nullptr;
- }
- gServiceInitOnce.reset();
- #endif
- return true;
- }
- U_CDECL_END
- #endif
- // ------------------------------------------
- //
- // Registration
- //
- //-------------------------------------------
- //#define U_DEBUG_CALSVC 1
- //
- #if defined( U_DEBUG_CALSVC ) || defined (U_DEBUG_CAL)
- /**
- * fldName was removed as a duplicate implementation.
- * use udbg_ services instead,
- * which depend on include files and library from ../tools/toolutil, the following circular link:
- * CPPFLAGS+=-I$(top_srcdir)/tools/toolutil
- * LIBS+=$(LIBICUTOOLUTIL)
- */
- #include "udbgutil.h"
- #include <stdio.h>
- /**
- * convert a UCalendarDateFields into a string - for debugging
- * @param f field enum
- * @return static string to the field name
- * @internal
- */
- const char* fldName(UCalendarDateFields f) {
- return udbg_enumName(UDBG_UCalendarDateFields, (int32_t)f);
- }
- #if UCAL_DEBUG_DUMP
- // from CalendarTest::calToStr - but doesn't modify contents.
- void ucal_dump(const Calendar &cal) {
- cal.dump();
- }
- void Calendar::dump() const {
- int i;
- fprintf(stderr, "@calendar=%s, timeset=%c, fieldset=%c, allfields=%c, virtualset=%c, t=%.2f",
- getType(), fIsTimeSet?'y':'n', fAreFieldsSet?'y':'n', fAreAllFieldsSet?'y':'n',
- fAreFieldsVirtuallySet?'y':'n',
- fTime);
- // can add more things here: DST, zone, etc.
- fprintf(stderr, "\n");
- for(i = 0;i<UCAL_FIELD_COUNT;i++) {
- int n;
- const char *f = fldName((UCalendarDateFields)i);
- fprintf(stderr, " %25s: %-11ld", f, fFields[i]);
- if(fStamp[i] == kUnset) {
- fprintf(stderr, " (unset) ");
- } else if(fStamp[i] == kInternallySet) {
- fprintf(stderr, " (internally set) ");
- //} else if(fStamp[i] == kInternalDefault) {
- // fprintf(stderr, " (internal default) ");
- } else {
- fprintf(stderr, " %%%d ", fStamp[i]);
- }
- fprintf(stderr, "\n");
- }
- }
- U_CFUNC void ucal_dump(UCalendar* cal) {
- ucal_dump( *((Calendar*)cal) );
- }
- #endif
- #endif
- /* Max value for stamp allowable before recalculation */
- #define STAMP_MAX 10000
- static const char * const gCalTypes[] = {
- "gregorian",
- "japanese",
- "buddhist",
- "roc",
- "persian",
- "islamic-civil",
- "islamic",
- "hebrew",
- "chinese",
- "indian",
- "coptic",
- "ethiopic",
- "ethiopic-amete-alem",
- "iso8601",
- "dangi",
- "islamic-umalqura",
- "islamic-tbla",
- "islamic-rgsa",
- nullptr
- };
- // Must be in the order of gCalTypes above
- typedef enum ECalType {
- CALTYPE_UNKNOWN = -1,
- CALTYPE_GREGORIAN = 0,
- CALTYPE_JAPANESE,
- CALTYPE_BUDDHIST,
- CALTYPE_ROC,
- CALTYPE_PERSIAN,
- CALTYPE_ISLAMIC_CIVIL,
- CALTYPE_ISLAMIC,
- CALTYPE_HEBREW,
- CALTYPE_CHINESE,
- CALTYPE_INDIAN,
- CALTYPE_COPTIC,
- CALTYPE_ETHIOPIC,
- CALTYPE_ETHIOPIC_AMETE_ALEM,
- CALTYPE_ISO8601,
- CALTYPE_DANGI,
- CALTYPE_ISLAMIC_UMALQURA,
- CALTYPE_ISLAMIC_TBLA,
- CALTYPE_ISLAMIC_RGSA
- } ECalType;
- U_NAMESPACE_BEGIN
- SharedCalendar::~SharedCalendar() {
- delete ptr;
- }
- template<> U_I18N_API
- const SharedCalendar *LocaleCacheKey<SharedCalendar>::createObject(
- const void * /*unusedCreationContext*/, UErrorCode &status) const {
- if (U_FAILURE(status)) {
- return nullptr;
- }
- Calendar *calendar = Calendar::makeInstance(fLoc, status);
- if (U_FAILURE(status)) {
- return nullptr;
- }
- SharedCalendar *shared = new SharedCalendar(calendar);
- if (shared == nullptr) {
- delete calendar;
- status = U_MEMORY_ALLOCATION_ERROR;
- return nullptr;
- }
- shared->addRef();
- return shared;
- }
- static ECalType getCalendarType(const char *s) {
- for (int i = 0; gCalTypes[i] != nullptr; i++) {
- if (uprv_stricmp(s, gCalTypes[i]) == 0) {
- return (ECalType)i;
- }
- }
- return CALTYPE_UNKNOWN;
- }
- #if !UCONFIG_NO_SERVICE
- // Only used with service registration.
- static UBool isStandardSupportedKeyword(const char *keyword, UErrorCode& status) {
- if(U_FAILURE(status)) {
- return false;
- }
- ECalType calType = getCalendarType(keyword);
- return (calType != CALTYPE_UNKNOWN);
- }
- // only used with service registration.
- static void getCalendarKeyword(const UnicodeString &id, char *targetBuffer, int32_t targetBufferSize) {
- UnicodeString calendarKeyword = UNICODE_STRING_SIMPLE("calendar=");
- int32_t calKeyLen = calendarKeyword.length();
- int32_t keyLen = 0;
- int32_t keywordIdx = id.indexOf((char16_t)0x003D); /* '=' */
- if (id[0] == 0x40/*'@'*/
- && id.compareBetween(1, keywordIdx+1, calendarKeyword, 0, calKeyLen) == 0)
- {
- keyLen = id.extract(keywordIdx+1, id.length(), targetBuffer, targetBufferSize, US_INV);
- }
- targetBuffer[keyLen] = 0;
- }
- #endif
- static ECalType getCalendarTypeForLocale(const char *locid) {
- UErrorCode status = U_ZERO_ERROR;
- ECalType calType = CALTYPE_UNKNOWN;
- //TODO: ULOC_FULL_NAME is out of date and too small..
- char canonicalName[256];
- // Canonicalize, so that an old-style variant will be transformed to keywords.
- // e.g ja_JP_TRADITIONAL -> ja_JP@calendar=japanese
- // NOTE: Since ICU-20187, ja_JP_TRADITIONAL no longer canonicalizes, and
- // the Gregorian calendar is returned instead.
- int32_t canonicalLen = uloc_canonicalize(locid, canonicalName, sizeof(canonicalName) - 1, &status);
- if (U_FAILURE(status)) {
- return CALTYPE_GREGORIAN;
- }
- canonicalName[canonicalLen] = 0; // terminate
- char calTypeBuf[32];
- int32_t calTypeBufLen;
- calTypeBufLen = uloc_getKeywordValue(canonicalName, "calendar", calTypeBuf, sizeof(calTypeBuf) - 1, &status);
- if (U_SUCCESS(status)) {
- calTypeBuf[calTypeBufLen] = 0;
- calType = getCalendarType(calTypeBuf);
- if (calType != CALTYPE_UNKNOWN) {
- return calType;
- }
- }
- status = U_ZERO_ERROR;
- // when calendar keyword is not available or not supported, read supplementalData
- // to get the default calendar type for the locale's region
- char region[ULOC_COUNTRY_CAPACITY];
- (void)ulocimp_getRegionForSupplementalData(canonicalName, true, region, sizeof(region), &status);
- if (U_FAILURE(status)) {
- return CALTYPE_GREGORIAN;
- }
- // Read preferred calendar values from supplementalData calendarPreference
- UResourceBundle *rb = ures_openDirect(nullptr, "supplementalData", &status);
- ures_getByKey(rb, "calendarPreferenceData", rb, &status);
- UResourceBundle *order = ures_getByKey(rb, region, nullptr, &status);
- if (status == U_MISSING_RESOURCE_ERROR && rb != nullptr) {
- status = U_ZERO_ERROR;
- order = ures_getByKey(rb, "001", nullptr, &status);
- }
- calTypeBuf[0] = 0;
- if (U_SUCCESS(status) && order != nullptr) {
- // the first calendar type is the default for the region
- int32_t len = 0;
- const char16_t *uCalType = ures_getStringByIndex(order, 0, &len, &status);
- if (len < (int32_t)sizeof(calTypeBuf)) {
- u_UCharsToChars(uCalType, calTypeBuf, len);
- *(calTypeBuf + len) = 0; // terminate;
- calType = getCalendarType(calTypeBuf);
- }
- }
- ures_close(order);
- ures_close(rb);
- if (calType == CALTYPE_UNKNOWN) {
- // final fallback
- calType = CALTYPE_GREGORIAN;
- }
- return calType;
- }
- static Calendar *createStandardCalendar(ECalType calType, const Locale &loc, UErrorCode& status) {
- if (U_FAILURE(status)) {
- return nullptr;
- }
- LocalPointer<Calendar> cal;
- switch (calType) {
- case CALTYPE_GREGORIAN:
- cal.adoptInsteadAndCheckErrorCode(new GregorianCalendar(loc, status), status);
- break;
- case CALTYPE_JAPANESE:
- cal.adoptInsteadAndCheckErrorCode(new JapaneseCalendar(loc, status), status);
- break;
- case CALTYPE_BUDDHIST:
- cal.adoptInsteadAndCheckErrorCode(new BuddhistCalendar(loc, status), status);
- break;
- case CALTYPE_ROC:
- cal.adoptInsteadAndCheckErrorCode(new TaiwanCalendar(loc, status), status);
- break;
- case CALTYPE_PERSIAN:
- cal.adoptInsteadAndCheckErrorCode(new PersianCalendar(loc, status), status);
- break;
- case CALTYPE_ISLAMIC_TBLA:
- cal.adoptInsteadAndCheckErrorCode(new IslamicTBLACalendar(loc, status), status);
- break;
- case CALTYPE_ISLAMIC_CIVIL:
- cal.adoptInsteadAndCheckErrorCode(new IslamicCivilCalendar(loc, status), status);
- break;
- case CALTYPE_ISLAMIC_RGSA:
- cal.adoptInsteadAndCheckErrorCode(new IslamicRGSACalendar(loc, status), status);
- break;
- case CALTYPE_ISLAMIC:
- cal.adoptInsteadAndCheckErrorCode(new IslamicCalendar(loc, status), status);
- break;
- case CALTYPE_ISLAMIC_UMALQURA:
- cal.adoptInsteadAndCheckErrorCode(new IslamicUmalquraCalendar(loc, status), status);
- break;
- case CALTYPE_HEBREW:
- cal.adoptInsteadAndCheckErrorCode(new HebrewCalendar(loc, status), status);
- break;
- case CALTYPE_CHINESE:
- cal.adoptInsteadAndCheckErrorCode(new ChineseCalendar(loc, status), status);
- break;
- case CALTYPE_INDIAN:
- cal.adoptInsteadAndCheckErrorCode(new IndianCalendar(loc, status), status);
- break;
- case CALTYPE_COPTIC:
- cal.adoptInsteadAndCheckErrorCode(new CopticCalendar(loc, status), status);
- break;
- case CALTYPE_ETHIOPIC:
- cal.adoptInsteadAndCheckErrorCode(new EthiopicCalendar(loc, status), status);
- break;
- case CALTYPE_ETHIOPIC_AMETE_ALEM:
- cal.adoptInsteadAndCheckErrorCode(new EthiopicAmeteAlemCalendar(loc, status), status);
- break;
- case CALTYPE_ISO8601:
- cal.adoptInsteadAndCheckErrorCode(new ISO8601Calendar(loc, status), status);
- break;
- case CALTYPE_DANGI:
- cal.adoptInsteadAndCheckErrorCode(new DangiCalendar(loc, status), status);
- break;
- default:
- status = U_UNSUPPORTED_ERROR;
- }
- return cal.orphan();
- }
- #if !UCONFIG_NO_SERVICE
- // -------------------------------------
- /**
- * a Calendar Factory which creates the "basic" calendar types, that is, those
- * shipped with ICU.
- */
- class BasicCalendarFactory : public LocaleKeyFactory {
- public:
- /**
- * @param calendarType static const string (caller owns storage - will be aliased) to calendar type
- */
- BasicCalendarFactory()
- : LocaleKeyFactory(LocaleKeyFactory::INVISIBLE) { }
- virtual ~BasicCalendarFactory();
- protected:
- //virtual UBool isSupportedID( const UnicodeString& id, UErrorCode& status) const {
- // if(U_FAILURE(status)) {
- // return false;
- // }
- // char keyword[ULOC_FULLNAME_CAPACITY];
- // getCalendarKeyword(id, keyword, (int32_t)sizeof(keyword));
- // return isStandardSupportedKeyword(keyword, status);
- //}
- virtual void updateVisibleIDs(Hashtable& result, UErrorCode& status) const override
- {
- if (U_SUCCESS(status)) {
- for(int32_t i=0;gCalTypes[i] != nullptr;i++) {
- UnicodeString id((char16_t)0x40); /* '@' a variant character */
- id.append(UNICODE_STRING_SIMPLE("calendar="));
- id.append(UnicodeString(gCalTypes[i], -1, US_INV));
- result.put(id, (void*)this, status);
- }
- }
- }
- virtual UObject* create(const ICUServiceKey& key, const ICUService* /*service*/, UErrorCode& status) const override {
- if (U_FAILURE(status)) {
- return nullptr;
- }
- #ifdef U_DEBUG_CALSVC
- if(dynamic_cast<const LocaleKey*>(&key) == nullptr) {
- fprintf(stderr, "::create - not a LocaleKey!\n");
- }
- #endif
- const LocaleKey* lkey = dynamic_cast<const LocaleKey*>(&key);
- U_ASSERT(lkey != nullptr);
- Locale curLoc; // current locale
- Locale canLoc; // Canonical locale
- lkey->currentLocale(curLoc);
- lkey->canonicalLocale(canLoc);
- char keyword[ULOC_FULLNAME_CAPACITY];
- UnicodeString str;
- key.currentID(str);
- getCalendarKeyword(str, keyword, (int32_t) sizeof(keyword));
- #ifdef U_DEBUG_CALSVC
- fprintf(stderr, "BasicCalendarFactory::create() - cur %s, can %s\n", (const char*)curLoc.getName(), (const char*)canLoc.getName());
- #endif
- if(!isStandardSupportedKeyword(keyword,status)) { // Do we handle this type?
- #ifdef U_DEBUG_CALSVC
- fprintf(stderr, "BasicCalendarFactory - not handling %s.[%s]\n", (const char*) curLoc.getName(), tmp );
- #endif
- return nullptr;
- }
- return createStandardCalendar(getCalendarType(keyword), canLoc, status);
- }
- };
- BasicCalendarFactory::~BasicCalendarFactory() {}
- /**
- * A factory which looks up the DefaultCalendar resource to determine which class of calendar to use
- */
- class DefaultCalendarFactory : public ICUResourceBundleFactory {
- public:
- DefaultCalendarFactory() : ICUResourceBundleFactory() { }
- virtual ~DefaultCalendarFactory();
- protected:
- virtual UObject* create(const ICUServiceKey& key, const ICUService* /*service*/, UErrorCode& status) const override {
- if (U_FAILURE(status)) {
- return nullptr;
- }
- const LocaleKey *lkey = dynamic_cast<const LocaleKey*>(&key);
- U_ASSERT(lkey != nullptr);
- Locale loc;
- lkey->currentLocale(loc);
- UnicodeString *ret = new UnicodeString();
- if (ret == nullptr) {
- status = U_MEMORY_ALLOCATION_ERROR;
- } else {
- ret->append((char16_t)0x40); // '@' is a variant character
- ret->append(UNICODE_STRING("calendar=", 9));
- ret->append(UnicodeString(gCalTypes[getCalendarTypeForLocale(loc.getName())], -1, US_INV));
- }
- return ret;
- }
- };
- DefaultCalendarFactory::~DefaultCalendarFactory() {}
- // -------------------------------------
- class CalendarService : public ICULocaleService {
- public:
- CalendarService()
- : ICULocaleService(UNICODE_STRING_SIMPLE("Calendar"))
- {
- UErrorCode status = U_ZERO_ERROR;
- registerFactory(new DefaultCalendarFactory(), status);
- }
- virtual ~CalendarService();
- virtual UObject* cloneInstance(UObject* instance) const override {
- UnicodeString *s = dynamic_cast<UnicodeString *>(instance);
- if(s != nullptr) {
- return s->clone();
- } else {
- #ifdef U_DEBUG_CALSVC_F
- UErrorCode status2 = U_ZERO_ERROR;
- fprintf(stderr, "Cloning a %s calendar with tz=%ld\n", ((Calendar*)instance)->getType(), ((Calendar*)instance)->get(UCAL_ZONE_OFFSET, status2));
- #endif
- return ((Calendar*)instance)->clone();
- }
- }
- virtual UObject* handleDefault(const ICUServiceKey& key, UnicodeString* /*actualID*/, UErrorCode& status) const override {
- if (U_FAILURE(status)) {
- return nullptr;
- }
- LocaleKey& lkey = static_cast<LocaleKey&>(const_cast<ICUServiceKey&>(key));
- //int32_t kind = lkey.kind();
- Locale loc;
- lkey.canonicalLocale(loc);
- #ifdef U_DEBUG_CALSVC
- Locale loc2;
- lkey.currentLocale(loc2);
- fprintf(stderr, "CalSvc:handleDefault for currentLoc %s, canloc %s\n", (const char*)loc.getName(), (const char*)loc2.getName());
- #endif
- Calendar *nc = new GregorianCalendar(loc, status);
- if (nc == nullptr) {
- status = U_MEMORY_ALLOCATION_ERROR;
- return nc;
- }
- #ifdef U_DEBUG_CALSVC
- UErrorCode status2 = U_ZERO_ERROR;
- fprintf(stderr, "New default calendar has tz=%d\n", ((Calendar*)nc)->get(UCAL_ZONE_OFFSET, status2));
- #endif
- return nc;
- }
- virtual UBool isDefault() const override {
- return countFactories() == 1;
- }
- };
- CalendarService::~CalendarService() {}
- // -------------------------------------
- static inline UBool
- isCalendarServiceUsed() {
- return !gServiceInitOnce.isReset();
- }
- // -------------------------------------
- static void U_CALLCONV
- initCalendarService(UErrorCode &status)
- {
- #ifdef U_DEBUG_CALSVC
- fprintf(stderr, "Spinning up Calendar Service\n");
- #endif
- if (U_FAILURE(status)) {
- return;
- }
- ucln_i18n_registerCleanup(UCLN_I18N_CALENDAR, calendar_cleanup);
- gService = new CalendarService();
- if (gService == nullptr) {
- status = U_MEMORY_ALLOCATION_ERROR;
- return;
- }
- #ifdef U_DEBUG_CALSVC
- fprintf(stderr, "Registering classes..\n");
- #endif
- // Register all basic instances.
- gService->registerFactory(new BasicCalendarFactory(),status);
- #ifdef U_DEBUG_CALSVC
- fprintf(stderr, "Done..\n");
- #endif
- if(U_FAILURE(status)) {
- #ifdef U_DEBUG_CALSVC
- fprintf(stderr, "err (%s) registering classes, deleting service.....\n", u_errorName(status));
- #endif
- delete gService;
- gService = nullptr;
- }
- }
- static ICULocaleService*
- getCalendarService(UErrorCode &status)
- {
- umtx_initOnce(gServiceInitOnce, &initCalendarService, status);
- return gService;
- }
- URegistryKey Calendar::registerFactory(ICUServiceFactory* toAdopt, UErrorCode& status)
- {
- return getCalendarService(status)->registerFactory(toAdopt, status);
- }
- UBool Calendar::unregister(URegistryKey key, UErrorCode& status) {
- return getCalendarService(status)->unregister(key, status);
- }
- #endif /* UCONFIG_NO_SERVICE */
- // -------------------------------------
- static const int32_t kCalendarLimits[UCAL_FIELD_COUNT][4] = {
- // Minimum Greatest min Least max Greatest max
- {/*N/A*/-1, /*N/A*/-1, /*N/A*/-1, /*N/A*/-1}, // ERA
- {/*N/A*/-1, /*N/A*/-1, /*N/A*/-1, /*N/A*/-1}, // YEAR
- {/*N/A*/-1, /*N/A*/-1, /*N/A*/-1, /*N/A*/-1}, // MONTH
- {/*N/A*/-1, /*N/A*/-1, /*N/A*/-1, /*N/A*/-1}, // WEEK_OF_YEAR
- {/*N/A*/-1, /*N/A*/-1, /*N/A*/-1, /*N/A*/-1}, // WEEK_OF_MONTH
- {/*N/A*/-1, /*N/A*/-1, /*N/A*/-1, /*N/A*/-1}, // DAY_OF_MONTH
- {/*N/A*/-1, /*N/A*/-1, /*N/A*/-1, /*N/A*/-1}, // DAY_OF_YEAR
- { 1, 1, 7, 7 }, // DAY_OF_WEEK
- {/*N/A*/-1, /*N/A*/-1, /*N/A*/-1, /*N/A*/-1}, // DAY_OF_WEEK_IN_MONTH
- { 0, 0, 1, 1 }, // AM_PM
- { 0, 0, 11, 11 }, // HOUR
- { 0, 0, 23, 23 }, // HOUR_OF_DAY
- { 0, 0, 59, 59 }, // MINUTE
- { 0, 0, 59, 59 }, // SECOND
- { 0, 0, 999, 999 }, // MILLISECOND
- {-16*kOneHour, -16*kOneHour, 12*kOneHour, 30*kOneHour }, // ZONE_OFFSET
- { -1*kOneHour, -1*kOneHour, 2*kOneHour, 2*kOneHour }, // DST_OFFSET
- {/*N/A*/-1, /*N/A*/-1, /*N/A*/-1, /*N/A*/-1}, // YEAR_WOY
- { 1, 1, 7, 7 }, // DOW_LOCAL
- {/*N/A*/-1, /*N/A*/-1, /*N/A*/-1, /*N/A*/-1}, // EXTENDED_YEAR
- { -0x7F000000, -0x7F000000, 0x7F000000, 0x7F000000 }, // JULIAN_DAY
- { 0, 0, 24*kOneHour-1, 24*kOneHour-1 }, // MILLISECONDS_IN_DAY
- { 0, 0, 1, 1 }, // IS_LEAP_MONTH
- { 0, 0, 11, 11 } // ORDINAL_MONTH
- };
- // Resource bundle tags read by this class
- static const char gCalendar[] = "calendar";
- static const char gMonthNames[] = "monthNames";
- static const char gGregorian[] = "gregorian";
- // Data flow in Calendar
- // ---------------------
- // The current time is represented in two ways by Calendar: as UTC
- // milliseconds from the epoch start (1 January 1970 0:00 UTC), and as local
- // fields such as MONTH, HOUR, AM_PM, etc. It is possible to compute the
- // millis from the fields, and vice versa. The data needed to do this
- // conversion is encapsulated by a TimeZone object owned by the Calendar.
- // The data provided by the TimeZone object may also be overridden if the
- // user sets the ZONE_OFFSET and/or DST_OFFSET fields directly. The class
- // keeps track of what information was most recently set by the caller, and
- // uses that to compute any other information as needed.
- // If the user sets the fields using set(), the data flow is as follows.
- // This is implemented by the Calendar subclass's computeTime() method.
- // During this process, certain fields may be ignored. The disambiguation
- // algorithm for resolving which fields to pay attention to is described
- // above.
- // local fields (YEAR, MONTH, DATE, HOUR, MINUTE, etc.)
- // |
- // | Using Calendar-specific algorithm
- // V
- // local standard millis
- // |
- // | Using TimeZone or user-set ZONE_OFFSET / DST_OFFSET
- // V
- // UTC millis (in time data member)
- // If the user sets the UTC millis using setTime(), the data flow is as
- // follows. This is implemented by the Calendar subclass's computeFields()
- // method.
- // UTC millis (in time data member)
- // |
- // | Using TimeZone getOffset()
- // V
- // local standard millis
- // |
- // | Using Calendar-specific algorithm
- // V
- // local fields (YEAR, MONTH, DATE, HOUR, MINUTE, etc.)
- // In general, a round trip from fields, through local and UTC millis, and
- // back out to fields is made when necessary. This is implemented by the
- // complete() method. Resolving a partial set of fields into a UTC millis
- // value allows all remaining fields to be generated from that value. If
- // the Calendar is lenient, the fields are also renormalized to standard
- // ranges when they are regenerated.
- // -------------------------------------
- Calendar::Calendar(UErrorCode& success)
- : UObject(),
- fIsTimeSet(false),
- fAreFieldsSet(false),
- fAreAllFieldsSet(false),
- fAreFieldsVirtuallySet(false),
- fNextStamp((int32_t)kMinimumUserStamp),
- fTime(0),
- fLenient(true),
- fZone(nullptr),
- fRepeatedWallTime(UCAL_WALLTIME_LAST),
- fSkippedWallTime(UCAL_WALLTIME_LAST)
- {
- validLocale[0] = 0;
- actualLocale[0] = 0;
- clear();
- if (U_FAILURE(success)) {
- return;
- }
- fZone = TimeZone::createDefault();
- if (fZone == nullptr) {
- success = U_MEMORY_ALLOCATION_ERROR;
- }
- setWeekData(Locale::getDefault(), nullptr, success);
- }
- // -------------------------------------
- Calendar::Calendar(TimeZone* zone, const Locale& aLocale, UErrorCode& success)
- : UObject(),
- fIsTimeSet(false),
- fAreFieldsSet(false),
- fAreAllFieldsSet(false),
- fAreFieldsVirtuallySet(false),
- fNextStamp((int32_t)kMinimumUserStamp),
- fTime(0),
- fLenient(true),
- fZone(nullptr),
- fRepeatedWallTime(UCAL_WALLTIME_LAST),
- fSkippedWallTime(UCAL_WALLTIME_LAST)
- {
- validLocale[0] = 0;
- actualLocale[0] = 0;
- if (U_FAILURE(success)) {
- delete zone;
- return;
- }
- if(zone == 0) {
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "%s:%d: ILLEGAL ARG because timezone cannot be 0\n",
- __FILE__, __LINE__);
- #endif
- success = U_ILLEGAL_ARGUMENT_ERROR;
- return;
- }
- clear();
- fZone = zone;
- setWeekData(aLocale, nullptr, success);
- }
- // -------------------------------------
- Calendar::Calendar(const TimeZone& zone, const Locale& aLocale, UErrorCode& success)
- : UObject(),
- fIsTimeSet(false),
- fAreFieldsSet(false),
- fAreAllFieldsSet(false),
- fAreFieldsVirtuallySet(false),
- fNextStamp((int32_t)kMinimumUserStamp),
- fTime(0),
- fLenient(true),
- fZone(nullptr),
- fRepeatedWallTime(UCAL_WALLTIME_LAST),
- fSkippedWallTime(UCAL_WALLTIME_LAST)
- {
- validLocale[0] = 0;
- actualLocale[0] = 0;
- if (U_FAILURE(success)) {
- return;
- }
- clear();
- fZone = zone.clone();
- if (fZone == nullptr) {
- success = U_MEMORY_ALLOCATION_ERROR;
- }
- setWeekData(aLocale, nullptr, success);
- }
- // -------------------------------------
- Calendar::~Calendar()
- {
- delete fZone;
- }
- // -------------------------------------
- Calendar::Calendar(const Calendar &source)
- : UObject(source)
- {
- fZone = nullptr;
- *this = source;
- }
- // -------------------------------------
- Calendar &
- Calendar::operator=(const Calendar &right)
- {
- if (this != &right) {
- uprv_arrayCopy(right.fFields, fFields, UCAL_FIELD_COUNT);
- uprv_arrayCopy(right.fIsSet, fIsSet, UCAL_FIELD_COUNT);
- uprv_arrayCopy(right.fStamp, fStamp, UCAL_FIELD_COUNT);
- fTime = right.fTime;
- fIsTimeSet = right.fIsTimeSet;
- fAreAllFieldsSet = right.fAreAllFieldsSet;
- fAreFieldsSet = right.fAreFieldsSet;
- fAreFieldsVirtuallySet = right.fAreFieldsVirtuallySet;
- fLenient = right.fLenient;
- fRepeatedWallTime = right.fRepeatedWallTime;
- fSkippedWallTime = right.fSkippedWallTime;
- delete fZone;
- fZone = nullptr;
- if (right.fZone != nullptr) {
- fZone = right.fZone->clone();
- }
- fFirstDayOfWeek = right.fFirstDayOfWeek;
- fMinimalDaysInFirstWeek = right.fMinimalDaysInFirstWeek;
- fWeekendOnset = right.fWeekendOnset;
- fWeekendOnsetMillis = right.fWeekendOnsetMillis;
- fWeekendCease = right.fWeekendCease;
- fWeekendCeaseMillis = right.fWeekendCeaseMillis;
- fNextStamp = right.fNextStamp;
- uprv_strncpy(validLocale, right.validLocale, sizeof(validLocale));
- uprv_strncpy(actualLocale, right.actualLocale, sizeof(actualLocale));
- validLocale[sizeof(validLocale)-1] = 0;
- actualLocale[sizeof(validLocale)-1] = 0;
- }
- return *this;
- }
- // -------------------------------------
- Calendar* U_EXPORT2
- Calendar::createInstance(UErrorCode& success)
- {
- return createInstance(TimeZone::createDefault(), Locale::getDefault(), success);
- }
- // -------------------------------------
- Calendar* U_EXPORT2
- Calendar::createInstance(const TimeZone& zone, UErrorCode& success)
- {
- return createInstance(zone, Locale::getDefault(), success);
- }
- // -------------------------------------
- Calendar* U_EXPORT2
- Calendar::createInstance(const Locale& aLocale, UErrorCode& success)
- {
- return createInstance(TimeZone::forLocaleOrDefault(aLocale), aLocale, success);
- }
- // ------------------------------------- Adopting
- // Note: this is the bottleneck that actually calls the service routines.
- Calendar * U_EXPORT2
- Calendar::makeInstance(const Locale& aLocale, UErrorCode& success) {
- if (U_FAILURE(success)) {
- return nullptr;
- }
- Locale actualLoc;
- UObject* u = nullptr;
- #if !UCONFIG_NO_SERVICE
- if (isCalendarServiceUsed()) {
- u = getCalendarService(success)->get(aLocale, LocaleKey::KIND_ANY, &actualLoc, success);
- }
- else
- #endif
- {
- u = createStandardCalendar(getCalendarTypeForLocale(aLocale.getName()), aLocale, success);
- }
- Calendar* c = nullptr;
- if(U_FAILURE(success) || !u) {
- if(U_SUCCESS(success)) { // Propagate some kind of err
- success = U_INTERNAL_PROGRAM_ERROR;
- }
- return nullptr;
- }
- #if !UCONFIG_NO_SERVICE
- const UnicodeString* str = dynamic_cast<const UnicodeString*>(u);
- if(str != nullptr) {
- // It's a unicode string telling us what type of calendar to load ("gregorian", etc)
- // Create a Locale over this string
- Locale l("");
- LocaleUtility::initLocaleFromName(*str, l);
- #ifdef U_DEBUG_CALSVC
- fprintf(stderr, "Calendar::createInstance(%s), looking up [%s]\n", aLocale.getName(), l.getName());
- #endif
- Locale actualLoc2;
- delete u;
- u = nullptr;
- // Don't overwrite actualLoc, since the actual loc from this call
- // may be something like "@calendar=gregorian" -- TODO investigate
- // further...
- c = (Calendar*)getCalendarService(success)->get(l, LocaleKey::KIND_ANY, &actualLoc2, success);
- if(U_FAILURE(success) || !c) {
- if(U_SUCCESS(success)) {
- success = U_INTERNAL_PROGRAM_ERROR; // Propagate some err
- }
- return nullptr;
- }
- str = dynamic_cast<const UnicodeString*>(c);
- if(str != nullptr) {
- // recursed! Second lookup returned a UnicodeString.
- // Perhaps DefaultCalendar{} was set to another locale.
- #ifdef U_DEBUG_CALSVC
- char tmp[200];
- // Extract a char* out of it..
- int32_t len = str->length();
- int32_t actLen = sizeof(tmp)-1;
- if(len > actLen) {
- len = actLen;
- }
- str->extract(0,len,tmp);
- tmp[len]=0;
- fprintf(stderr, "err - recursed, 2nd lookup was unistring %s\n", tmp);
- #endif
- success = U_MISSING_RESOURCE_ERROR; // requested a calendar type which could NOT be found.
- delete c;
- return nullptr;
- }
- #ifdef U_DEBUG_CALSVC
- fprintf(stderr, "%p: setting week count data to locale %s, actual locale %s\n", c, (const char*)aLocale.getName(), (const char *)actualLoc.getName());
- #endif
- c->setWeekData(aLocale, c->getType(), success); // set the correct locale (this was an indirect calendar)
- char keyword[ULOC_FULLNAME_CAPACITY] = "";
- UErrorCode tmpStatus = U_ZERO_ERROR;
- l.getKeywordValue("calendar", keyword, ULOC_FULLNAME_CAPACITY, tmpStatus);
- if (U_SUCCESS(tmpStatus) && uprv_strcmp(keyword, "iso8601") == 0) {
- c->setFirstDayOfWeek(UCAL_MONDAY);
- c->setMinimalDaysInFirstWeek(4);
- }
- }
- else
- #endif /* UCONFIG_NO_SERVICE */
- {
- // a calendar was returned - we assume the factory did the right thing.
- c = (Calendar*)u;
- }
- return c;
- }
- Calendar* U_EXPORT2
- Calendar::createInstance(TimeZone* zone, const Locale& aLocale, UErrorCode& success)
- {
- LocalPointer<TimeZone> zonePtr(zone);
- const SharedCalendar *shared = nullptr;
- UnifiedCache::getByLocale(aLocale, shared, success);
- if (U_FAILURE(success)) {
- return nullptr;
- }
- Calendar *c = (*shared)->clone();
- shared->removeRef();
- if (c == nullptr) {
- success = U_MEMORY_ALLOCATION_ERROR;
- return nullptr;
- }
- // Now, reset calendar to default state:
- c->adoptTimeZone(zonePtr.orphan()); // Set the correct time zone
- c->setTimeInMillis(getNow(), success); // let the new calendar have the current time.
- return c;
- }
- // -------------------------------------
- Calendar* U_EXPORT2
- Calendar::createInstance(const TimeZone& zone, const Locale& aLocale, UErrorCode& success)
- {
- Calendar* c = createInstance(aLocale, success);
- if(U_SUCCESS(success) && c) {
- c->setTimeZone(zone);
- }
- return c;
- }
- // -------------------------------------
- void U_EXPORT2
- Calendar::getCalendarTypeFromLocale(
- const Locale &aLocale,
- char *typeBuffer,
- int32_t typeBufferSize,
- UErrorCode &success) {
- const SharedCalendar *shared = nullptr;
- UnifiedCache::getByLocale(aLocale, shared, success);
- if (U_FAILURE(success)) {
- return;
- }
- uprv_strncpy(typeBuffer, (*shared)->getType(), typeBufferSize);
- shared->removeRef();
- if (typeBuffer[typeBufferSize - 1]) {
- success = U_BUFFER_OVERFLOW_ERROR;
- }
- }
- bool
- Calendar::operator==(const Calendar& that) const
- {
- UErrorCode status = U_ZERO_ERROR;
- return isEquivalentTo(that) &&
- getTimeInMillis(status) == that.getTimeInMillis(status) &&
- U_SUCCESS(status);
- }
- UBool
- Calendar::isEquivalentTo(const Calendar& other) const
- {
- return typeid(*this) == typeid(other) &&
- fLenient == other.fLenient &&
- fRepeatedWallTime == other.fRepeatedWallTime &&
- fSkippedWallTime == other.fSkippedWallTime &&
- fFirstDayOfWeek == other.fFirstDayOfWeek &&
- fMinimalDaysInFirstWeek == other.fMinimalDaysInFirstWeek &&
- fWeekendOnset == other.fWeekendOnset &&
- fWeekendOnsetMillis == other.fWeekendOnsetMillis &&
- fWeekendCease == other.fWeekendCease &&
- fWeekendCeaseMillis == other.fWeekendCeaseMillis &&
- *fZone == *other.fZone;
- }
- // -------------------------------------
- UBool
- Calendar::equals(const Calendar& when, UErrorCode& status) const
- {
- return (this == &when ||
- getTime(status) == when.getTime(status));
- }
- // -------------------------------------
- UBool
- Calendar::before(const Calendar& when, UErrorCode& status) const
- {
- return (this != &when &&
- getTimeInMillis(status) < when.getTimeInMillis(status));
- }
- // -------------------------------------
- UBool
- Calendar::after(const Calendar& when, UErrorCode& status) const
- {
- return (this != &when &&
- getTimeInMillis(status) > when.getTimeInMillis(status));
- }
- // -------------------------------------
- const Locale* U_EXPORT2
- Calendar::getAvailableLocales(int32_t& count)
- {
- return Locale::getAvailableLocales(count);
- }
- // -------------------------------------
- StringEnumeration* U_EXPORT2
- Calendar::getKeywordValuesForLocale(const char* key,
- const Locale& locale, UBool commonlyUsed, UErrorCode& status)
- {
- // This is a wrapper over ucal_getKeywordValuesForLocale
- UEnumeration *uenum = ucal_getKeywordValuesForLocale(key, locale.getName(),
- commonlyUsed, &status);
- if (U_FAILURE(status)) {
- uenum_close(uenum);
- return nullptr;
- }
- UStringEnumeration* ustringenum = new UStringEnumeration(uenum);
- if (ustringenum == nullptr) {
- status = U_MEMORY_ALLOCATION_ERROR;
- }
- return ustringenum;
- }
- // -------------------------------------
- UDate U_EXPORT2
- Calendar::getNow()
- {
- return uprv_getUTCtime(); // return as milliseconds
- }
- // -------------------------------------
- /**
- * Gets this Calendar's current time as a long.
- * @return the current time as UTC milliseconds from the epoch.
- */
- double
- Calendar::getTimeInMillis(UErrorCode& status) const
- {
- if(U_FAILURE(status))
- return 0.0;
- if ( ! fIsTimeSet)
- ((Calendar*)this)->updateTime(status);
- /* Test for buffer overflows */
- if(U_FAILURE(status)) {
- return 0.0;
- }
- return fTime;
- }
- // -------------------------------------
- /**
- * Sets this Calendar's current time from the given long value.
- * A status of U_ILLEGAL_ARGUMENT_ERROR is set when millis is
- * outside the range permitted by a Calendar object when not in lenient mode.
- * when in lenient mode the out of range values are pinned to their respective min/max.
- * @param date the new time in UTC milliseconds from the epoch.
- */
- void
- Calendar::setTimeInMillis( double millis, UErrorCode& status ) {
- if(U_FAILURE(status))
- return;
- if (millis > MAX_MILLIS) {
- if(isLenient()) {
- millis = MAX_MILLIS;
- } else {
- status = U_ILLEGAL_ARGUMENT_ERROR;
- return;
- }
- } else if (millis < MIN_MILLIS) {
- if(isLenient()) {
- millis = MIN_MILLIS;
- } else {
- status = U_ILLEGAL_ARGUMENT_ERROR;
- return;
- }
- }
- fTime = millis;
- fAreFieldsSet = fAreAllFieldsSet = false;
- fIsTimeSet = fAreFieldsVirtuallySet = true;
- for (int32_t i=0; i<UCAL_FIELD_COUNT; ++i) {
- fFields[i] = 0;
- fStamp[i] = kUnset;
- fIsSet[i] = false;
- }
- }
- // -------------------------------------
- int32_t
- Calendar::get(UCalendarDateFields field, UErrorCode& status) const
- {
- // field values are only computed when actually requested; for more on when computation
- // of various things happens, see the "data flow in Calendar" description at the top
- // of this file
- if (U_SUCCESS(status)) ((Calendar*)this)->complete(status); // Cast away const
- return U_SUCCESS(status) ? fFields[field] : 0;
- }
- // -------------------------------------
- void
- Calendar::set(UCalendarDateFields field, int32_t value)
- {
- if (fAreFieldsVirtuallySet) {
- UErrorCode ec = U_ZERO_ERROR;
- computeFields(ec);
- }
- fFields[field] = value;
- /* Ensure that the fNextStamp value doesn't go pass max value for int32_t */
- if (fNextStamp == STAMP_MAX) {
- recalculateStamp();
- }
- fStamp[field] = fNextStamp++;
- fIsSet[field] = true; // Remove later
- fIsTimeSet = fAreFieldsSet = fAreFieldsVirtuallySet = false;
- }
- // -------------------------------------
- void
- Calendar::set(int32_t year, int32_t month, int32_t date)
- {
- set(UCAL_YEAR, year);
- set(UCAL_MONTH, month);
- set(UCAL_DATE, date);
- }
- // -------------------------------------
- void
- Calendar::set(int32_t year, int32_t month, int32_t date, int32_t hour, int32_t minute)
- {
- set(UCAL_YEAR, year);
- set(UCAL_MONTH, month);
- set(UCAL_DATE, date);
- set(UCAL_HOUR_OF_DAY, hour);
- set(UCAL_MINUTE, minute);
- }
- // -------------------------------------
- void
- Calendar::set(int32_t year, int32_t month, int32_t date, int32_t hour, int32_t minute, int32_t second)
- {
- set(UCAL_YEAR, year);
- set(UCAL_MONTH, month);
- set(UCAL_DATE, date);
- set(UCAL_HOUR_OF_DAY, hour);
- set(UCAL_MINUTE, minute);
- set(UCAL_SECOND, second);
- }
- // -------------------------------------
- int32_t Calendar::getRelatedYear(UErrorCode &status) const
- {
- return get(UCAL_EXTENDED_YEAR, status);
- }
- // -------------------------------------
- void Calendar::setRelatedYear(int32_t year)
- {
- // set extended year
- set(UCAL_EXTENDED_YEAR, year);
- }
- // -------------------------------------
- void
- Calendar::clear()
- {
- for (int32_t i=0; i<UCAL_FIELD_COUNT; ++i) {
- fFields[i] = 0; // Must do this; other code depends on it
- fStamp[i] = kUnset;
- fIsSet[i] = false; // Remove later
- }
- fIsTimeSet = fAreFieldsSet = fAreAllFieldsSet = fAreFieldsVirtuallySet = false;
- // fTime is not 'cleared' - may be used if no fields are set.
- }
- // -------------------------------------
- void
- Calendar::clear(UCalendarDateFields field)
- {
- if (fAreFieldsVirtuallySet) {
- UErrorCode ec = U_ZERO_ERROR;
- computeFields(ec);
- }
- fFields[field] = 0;
- fStamp[field] = kUnset;
- fIsSet[field] = false; // Remove later
- fIsTimeSet = fAreFieldsSet = fAreAllFieldsSet = fAreFieldsVirtuallySet = false;
- }
- // -------------------------------------
- UBool
- Calendar::isSet(UCalendarDateFields field) const
- {
- return fAreFieldsVirtuallySet || (fStamp[field] != kUnset);
- }
- int32_t Calendar::newestStamp(UCalendarDateFields first, UCalendarDateFields last, int32_t bestStampSoFar) const
- {
- int32_t bestStamp = bestStampSoFar;
- for (int32_t i=(int32_t)first; i<=(int32_t)last; ++i) {
- if (fStamp[i] > bestStamp) {
- bestStamp = fStamp[i];
- }
- }
- return bestStamp;
- }
- // -------------------------------------
- void
- Calendar::complete(UErrorCode& status)
- {
- if (U_FAILURE(status)) {
- return;
- }
- if (!fIsTimeSet) {
- updateTime(status);
- /* Test for buffer overflows */
- if(U_FAILURE(status)) {
- return;
- }
- }
- if (!fAreFieldsSet) {
- computeFields(status); // fills in unset fields
- /* Test for buffer overflows */
- if(U_FAILURE(status)) {
- return;
- }
- fAreFieldsSet = true;
- fAreAllFieldsSet = true;
- }
- }
- //-------------------------------------------------------------------------
- // Protected utility methods for use by subclasses. These are very handy
- // for implementing add, roll, and computeFields.
- //-------------------------------------------------------------------------
- /**
- * Adjust the specified field so that it is within
- * the allowable range for the date to which this calendar is set.
- * For example, in a Gregorian calendar pinning the {@link #DAY_OF_MONTH DAY_OF_MONTH}
- * field for a calendar set to April 31 would cause it to be set
- * to April 30.
- * <p>
- * <b>Subclassing:</b>
- * <br>
- * This utility method is intended for use by subclasses that need to implement
- * their own overrides of {@link #roll roll} and {@link #add add}.
- * <p>
- * <b>Note:</b>
- * <code>pinField</code> is implemented in terms of
- * {@link #getActualMinimum getActualMinimum}
- * and {@link #getActualMaximum getActualMaximum}. If either of those methods uses
- * a slow, iterative algorithm for a particular field, it would be
- * unwise to attempt to call <code>pinField</code> for that field. If you
- * really do need to do so, you should override this method to do
- * something more efficient for that field.
- * <p>
- * @param field The calendar field whose value should be pinned.
- *
- * @see #getActualMinimum
- * @see #getActualMaximum
- * @stable ICU 2.0
- */
- void Calendar::pinField(UCalendarDateFields field, UErrorCode& status) {
- if (U_FAILURE(status)) {
- return;
- }
- int32_t max = getActualMaximum(field, status);
- int32_t min = getActualMinimum(field, status);
- if (fFields[field] > max) {
- set(field, max);
- } else if (fFields[field] < min) {
- set(field, min);
- }
- }
- void Calendar::computeFields(UErrorCode &ec)
- {
- if (U_FAILURE(ec)) {
- return;
- }
- // Compute local wall millis
- double localMillis = internalGetTime();
- int32_t rawOffset, dstOffset;
- getTimeZone().getOffset(localMillis, false, rawOffset, dstOffset, ec);
- if (U_FAILURE(ec)) {
- return;
- }
- localMillis += (rawOffset + dstOffset);
- // Mark fields as set. Do this before calling handleComputeFields().
- uint32_t mask = //fInternalSetMask;
- (1 << UCAL_ERA) |
- (1 << UCAL_YEAR) |
- (1 << UCAL_MONTH) |
- (1 << UCAL_DAY_OF_MONTH) | // = UCAL_DATE
- (1 << UCAL_DAY_OF_YEAR) |
- (1 << UCAL_EXTENDED_YEAR) |
- (1 << UCAL_ORDINAL_MONTH);
- for (int32_t i=0; i<UCAL_FIELD_COUNT; ++i) {
- if ((mask & 1) == 0) {
- fStamp[i] = kInternallySet;
- fIsSet[i] = true; // Remove later
- } else {
- fStamp[i] = kUnset;
- fIsSet[i] = false; // Remove later
- }
- mask >>= 1;
- }
- // We used to check for and correct extreme millis values (near
- // Long.MIN_VALUE or Long.MAX_VALUE) here. Such values would cause
- // overflows from positive to negative (or vice versa) and had to
- // be manually tweaked. We no longer need to do this because we
- // have limited the range of supported dates to those that have a
- // Julian day that fits into an int. This allows us to implement a
- // JULIAN_DAY field and also removes some inelegant code. - Liu
- // 11/6/00
- int32_t millisInDay;
- int32_t days = ClockMath::floorDivide(localMillis, kOneDay, &millisInDay);
- internalSet(UCAL_JULIAN_DAY,days + kEpochStartAsJulianDay);
- #if defined (U_DEBUG_CAL)
- //fprintf(stderr, "%s:%d- Hmm! Jules @ %d, as per %.0lf millis\n",
- //__FILE__, __LINE__, fFields[UCAL_JULIAN_DAY], localMillis);
- #endif
- computeGregorianAndDOWFields(fFields[UCAL_JULIAN_DAY], ec);
- // Call framework method to have subclass compute its fields.
- // These must include, at a minimum, MONTH, DAY_OF_MONTH,
- // EXTENDED_YEAR, YEAR, DAY_OF_YEAR. This method will call internalSet(),
- // which will update stamp[].
- handleComputeFields(fFields[UCAL_JULIAN_DAY], ec);
- // Compute week-related fields, based on the subclass-computed
- // fields computed by handleComputeFields().
- computeWeekFields(ec);
- // Compute time-related fields. These are independent of the date and
- // of the subclass algorithm. They depend only on the local zone
- // wall milliseconds in day.
- if (U_FAILURE(ec)) {
- return;
- }
- fFields[UCAL_MILLISECONDS_IN_DAY] = millisInDay;
- U_ASSERT(getMinimum(UCAL_MILLISECONDS_IN_DAY) <=
- fFields[UCAL_MILLISECONDS_IN_DAY]);
- U_ASSERT(fFields[UCAL_MILLISECONDS_IN_DAY] <=
- getMaximum(UCAL_MILLISECONDS_IN_DAY));
- fFields[UCAL_MILLISECOND] = millisInDay % 1000;
- U_ASSERT(getMinimum(UCAL_MILLISECOND) <= fFields[UCAL_MILLISECOND]);
- U_ASSERT(fFields[UCAL_MILLISECOND] <= getMaximum(UCAL_MILLISECOND));
- millisInDay /= 1000;
- fFields[UCAL_SECOND] = millisInDay % 60;
- U_ASSERT(getMinimum(UCAL_SECOND) <= fFields[UCAL_SECOND]);
- U_ASSERT(fFields[UCAL_SECOND] <= getMaximum(UCAL_SECOND));
- millisInDay /= 60;
- fFields[UCAL_MINUTE] = millisInDay % 60;
- U_ASSERT(getMinimum(UCAL_MINUTE) <= fFields[UCAL_MINUTE]);
- U_ASSERT(fFields[UCAL_MINUTE] <= getMaximum(UCAL_MINUTE));
- millisInDay /= 60;
- fFields[UCAL_HOUR_OF_DAY] = millisInDay;
- U_ASSERT(getMinimum(UCAL_HOUR_OF_DAY) <= fFields[UCAL_HOUR_OF_DAY]);
- U_ASSERT(fFields[UCAL_HOUR_OF_DAY] <= getMaximum(UCAL_HOUR_OF_DAY));
- fFields[UCAL_AM_PM] = millisInDay / 12; // Assume AM == 0
- U_ASSERT(getMinimum(UCAL_AM_PM) <= fFields[UCAL_AM_PM]);
- U_ASSERT(fFields[UCAL_AM_PM] <= getMaximum(UCAL_AM_PM));
- fFields[UCAL_HOUR] = millisInDay % 12;
- U_ASSERT(getMinimum(UCAL_HOUR) <= fFields[UCAL_HOUR]);
- U_ASSERT(fFields[UCAL_HOUR] <= getMaximum(UCAL_HOUR));
- fFields[UCAL_ZONE_OFFSET] = rawOffset;
- U_ASSERT(getMinimum(UCAL_ZONE_OFFSET) <= fFields[UCAL_ZONE_OFFSET]);
- U_ASSERT(fFields[UCAL_ZONE_OFFSET] <= getMaximum(UCAL_ZONE_OFFSET));
- fFields[UCAL_DST_OFFSET] = dstOffset;
- U_ASSERT(getMinimum(UCAL_DST_OFFSET) <= fFields[UCAL_DST_OFFSET]);
- U_ASSERT(fFields[UCAL_DST_OFFSET] <= getMaximum(UCAL_DST_OFFSET));
- }
- uint8_t Calendar::julianDayToDayOfWeek(double julian)
- {
- // If julian is negative, then julian%7 will be negative, so we adjust
- // accordingly. We add 1 because Julian day 0 is Monday.
- int8_t dayOfWeek = (int8_t) uprv_fmod(julian + 1, 7);
- uint8_t result = (uint8_t)(dayOfWeek + ((dayOfWeek < 0) ? (7+UCAL_SUNDAY ) : UCAL_SUNDAY));
- return result;
- }
- /**
- * Compute the Gregorian calendar year, month, and day of month from
- * the given Julian day. These values are not stored in fields, but in
- * member variables gregorianXxx. Also compute the DAY_OF_WEEK and
- * DOW_LOCAL fields.
- */
- void Calendar::computeGregorianAndDOWFields(int32_t julianDay, UErrorCode &ec)
- {
- computeGregorianFields(julianDay, ec);
- if (U_FAILURE(ec)) {
- return;
- }
- // Compute day of week: JD 0 = Monday
- int32_t dow = julianDayToDayOfWeek(julianDay);
- internalSet(UCAL_DAY_OF_WEEK,dow);
- // Calculate 1-based localized day of week
- int32_t dowLocal = dow - getFirstDayOfWeek() + 1;
- if (dowLocal < 1) {
- dowLocal += 7;
- }
- internalSet(UCAL_DOW_LOCAL,dowLocal);
- fFields[UCAL_DOW_LOCAL] = dowLocal;
- }
- /**
- * Compute the Gregorian calendar year, month, and day of month from the
- * Julian day. These values are not stored in fields, but in member
- * variables gregorianXxx. They are used for time zone computations and by
- * subclasses that are Gregorian derivatives. Subclasses may call this
- * method to perform a Gregorian calendar millis->fields computation.
- */
- void Calendar::computeGregorianFields(int32_t julianDay, UErrorCode& ec) {
- if (U_FAILURE(ec)) {
- return;
- }
- int32_t gregorianDayOfWeekUnused;
- Grego::dayToFields(julianDay - kEpochStartAsJulianDay, fGregorianYear, fGregorianMonth, fGregorianDayOfMonth, gregorianDayOfWeekUnused, fGregorianDayOfYear);
- }
- /**
- * Compute the fields WEEK_OF_YEAR, YEAR_WOY, WEEK_OF_MONTH,
- * DAY_OF_WEEK_IN_MONTH, and DOW_LOCAL from EXTENDED_YEAR, YEAR,
- * DAY_OF_WEEK, and DAY_OF_YEAR. The latter fields are computed by the
- * subclass based on the calendar system.
- *
- * <p>The YEAR_WOY field is computed simplistically. It is equal to YEAR
- * most of the time, but at the year boundary it may be adjusted to YEAR-1
- * or YEAR+1 to reflect the overlap of a week into an adjacent year. In
- * this case, a simple increment or decrement is performed on YEAR, even
- * though this may yield an invalid YEAR value. For instance, if the YEAR
- * is part of a calendar system with an N-year cycle field CYCLE, then
- * incrementing the YEAR may involve incrementing CYCLE and setting YEAR
- * back to 0 or 1. This is not handled by this code, and in fact cannot be
- * simply handled without having subclasses define an entire parallel set of
- * fields for fields larger than or equal to a year. This additional
- * complexity is not warranted, since the intention of the YEAR_WOY field is
- * to support ISO 8601 notation, so it will typically be used with a
- * proleptic Gregorian calendar, which has no field larger than a year.
- */
- void Calendar::computeWeekFields(UErrorCode &ec) {
- if(U_FAILURE(ec)) {
- return;
- }
- int32_t eyear = fFields[UCAL_EXTENDED_YEAR];
- int32_t dayOfWeek = fFields[UCAL_DAY_OF_WEEK];
- int32_t dayOfYear = fFields[UCAL_DAY_OF_YEAR];
- // WEEK_OF_YEAR start
- // Compute the week of the year. For the Gregorian calendar, valid week
- // numbers run from 1 to 52 or 53, depending on the year, the first day
- // of the week, and the minimal days in the first week. For other
- // calendars, the valid range may be different -- it depends on the year
- // length. Days at the start of the year may fall into the last week of
- // the previous year; days at the end of the year may fall into the
- // first week of the next year. ASSUME that the year length is less than
- // 7000 days.
- int32_t yearOfWeekOfYear = eyear;
- int32_t relDow = (dayOfWeek + 7 - getFirstDayOfWeek()) % 7; // 0..6
- int32_t relDowJan1 = (dayOfWeek - dayOfYear + 7001 - getFirstDayOfWeek()) % 7; // 0..6
- int32_t woy = (dayOfYear - 1 + relDowJan1) / 7; // 0..53
- if ((7 - relDowJan1) >= getMinimalDaysInFirstWeek()) {
- ++woy;
- }
- // Adjust for weeks at the year end that overlap into the previous or
- // next calendar year.
- if (woy == 0) {
- // We are the last week of the previous year.
- // Check to see if we are in the last week; if so, we need
- // to handle the case in which we are the first week of the
- // next year.
- int32_t prevDoy = dayOfYear + handleGetYearLength(eyear - 1);
- woy = weekNumber(prevDoy, dayOfWeek);
- yearOfWeekOfYear--;
- } else {
- int32_t lastDoy = handleGetYearLength(eyear);
- // Fast check: For it to be week 1 of the next year, the DOY
- // must be on or after L-5, where L is yearLength(), then it
- // cannot possibly be week 1 of the next year:
- // L-5 L
- // doy: 359 360 361 362 363 364 365 001
- // dow: 1 2 3 4 5 6 7
- if (dayOfYear >= (lastDoy - 5)) {
- int32_t lastRelDow = (relDow + lastDoy - dayOfYear) % 7;
- if (lastRelDow < 0) {
- lastRelDow += 7;
- }
- if (((6 - lastRelDow) >= getMinimalDaysInFirstWeek()) &&
- ((dayOfYear + 7 - relDow) > lastDoy)) {
- woy = 1;
- yearOfWeekOfYear++;
- }
- }
- }
- fFields[UCAL_WEEK_OF_YEAR] = woy;
- fFields[UCAL_YEAR_WOY] = yearOfWeekOfYear;
- // min/max of years are not constrains for caller, so not assert here.
- // WEEK_OF_YEAR end
- int32_t dayOfMonth = fFields[UCAL_DAY_OF_MONTH];
- fFields[UCAL_WEEK_OF_MONTH] = weekNumber(dayOfMonth, dayOfWeek);
- U_ASSERT(getMinimum(UCAL_WEEK_OF_MONTH) <= fFields[UCAL_WEEK_OF_MONTH]);
- U_ASSERT(fFields[UCAL_WEEK_OF_MONTH] <= getMaximum(UCAL_WEEK_OF_MONTH));
- fFields[UCAL_DAY_OF_WEEK_IN_MONTH] = (dayOfMonth-1) / 7 + 1;
- U_ASSERT(getMinimum(UCAL_DAY_OF_WEEK_IN_MONTH) <=
- fFields[UCAL_DAY_OF_WEEK_IN_MONTH]);
- U_ASSERT(fFields[UCAL_DAY_OF_WEEK_IN_MONTH] <=
- getMaximum(UCAL_DAY_OF_WEEK_IN_MONTH));
- #if defined (U_DEBUG_CAL)
- if(fFields[UCAL_DAY_OF_WEEK_IN_MONTH]==0) fprintf(stderr, "%s:%d: DOWIM %d on %g\n",
- __FILE__, __LINE__,fFields[UCAL_DAY_OF_WEEK_IN_MONTH], fTime);
- #endif
- }
- int32_t Calendar::weekNumber(int32_t desiredDay, int32_t dayOfPeriod, int32_t dayOfWeek)
- {
- // Determine the day of the week of the first day of the period
- // in question (either a year or a month). Zero represents the
- // first day of the week on this calendar.
- int32_t periodStartDayOfWeek = (dayOfWeek - getFirstDayOfWeek() - dayOfPeriod + 1) % 7;
- if (periodStartDayOfWeek < 0) periodStartDayOfWeek += 7;
- // Compute the week number. Initially, ignore the first week, which
- // may be fractional (or may not be). We add periodStartDayOfWeek in
- // order to fill out the first week, if it is fractional.
- int32_t weekNo = (desiredDay + periodStartDayOfWeek - 1)/7;
- // If the first week is long enough, then count it. If
- // the minimal days in the first week is one, or if the period start
- // is zero, we always increment weekNo.
- if ((7 - periodStartDayOfWeek) >= getMinimalDaysInFirstWeek()) ++weekNo;
- return weekNo;
- }
- void Calendar::handleComputeFields(int32_t /* julianDay */, UErrorCode& status)
- {
- if (U_FAILURE(status)) {
- return;
- }
- int32_t month = getGregorianMonth();
- internalSet(UCAL_MONTH, month);
- internalSet(UCAL_ORDINAL_MONTH, month);
- internalSet(UCAL_DAY_OF_MONTH, getGregorianDayOfMonth());
- internalSet(UCAL_DAY_OF_YEAR, getGregorianDayOfYear());
- int32_t eyear = getGregorianYear();
- internalSet(UCAL_EXTENDED_YEAR, eyear);
- int32_t era = GregorianCalendar::AD;
- if (eyear < 1) {
- era = GregorianCalendar::BC;
- eyear = 1 - eyear;
- }
- internalSet(UCAL_ERA, era);
- internalSet(UCAL_YEAR, eyear);
- }
- // -------------------------------------
- void Calendar::roll(EDateFields field, int32_t amount, UErrorCode& status)
- {
- roll((UCalendarDateFields)field, amount, status);
- }
- void Calendar::roll(UCalendarDateFields field, int32_t amount, UErrorCode& status) UPRV_NO_SANITIZE_UNDEFINED {
- if (amount == 0) {
- return; // Nothing to do
- }
- complete(status);
- if(U_FAILURE(status)) {
- return;
- }
- switch (field) {
- case UCAL_DAY_OF_MONTH:
- case UCAL_AM_PM:
- case UCAL_MINUTE:
- case UCAL_SECOND:
- case UCAL_MILLISECOND:
- case UCAL_MILLISECONDS_IN_DAY:
- case UCAL_ERA:
- // These are the standard roll instructions. These work for all
- // simple cases, that is, cases in which the limits are fixed, such
- // as the hour, the day of the month, and the era.
- {
- int32_t min = getActualMinimum(field,status);
- int32_t max = getActualMaximum(field,status);
- int32_t gap = max - min + 1;
- int32_t value = internalGet(field) + amount;
- value = (value - min) % gap;
- if (value < 0) {
- value += gap;
- }
- value += min;
- set(field, value);
- return;
- }
- case UCAL_HOUR:
- case UCAL_HOUR_OF_DAY:
- // Rolling the hour is difficult on the ONSET and CEASE days of
- // daylight savings. For example, if the change occurs at
- // 2 AM, we have the following progression:
- // ONSET: 12 Std -> 1 Std -> 3 Dst -> 4 Dst
- // CEASE: 12 Dst -> 1 Dst -> 1 Std -> 2 Std
- // To get around this problem we don't use fields; we manipulate
- // the time in millis directly.
- {
- // Assume min == 0 in calculations below
- double start = getTimeInMillis(status);
- int32_t oldHour = internalGet(field);
- int32_t max = getMaximum(field);
- int32_t newHour = (oldHour + amount) % (max + 1);
- if (newHour < 0) {
- newHour += max + 1;
- }
- setTimeInMillis(start + kOneHour * (newHour - oldHour),status);
- return;
- }
- case UCAL_MONTH:
- case UCAL_ORDINAL_MONTH:
- // Rolling the month involves both pinning the final value
- // and adjusting the DAY_OF_MONTH if necessary. We only adjust the
- // DAY_OF_MONTH if, after updating the MONTH field, it is illegal.
- // E.g., <jan31>.roll(MONTH, 1) -> <feb28> or <feb29>.
- {
- int32_t max = getActualMaximum(UCAL_MONTH, status);
- int32_t mon = (internalGet(UCAL_MONTH) + amount) % (max+1);
- if (mon < 0) {
- mon += (max + 1);
- }
- set(UCAL_MONTH, mon);
- // Keep the day of month in range. We don't want to spill over
- // into the next month; e.g., we don't want jan31 + 1 mo -> feb31 ->
- // mar3.
- pinField(UCAL_DAY_OF_MONTH,status);
- return;
- }
- case UCAL_YEAR:
- case UCAL_YEAR_WOY:
- {
- // * If era==0 and years go backwards in time, change sign of amount.
- // * Until we have new API per #9393, we temporarily hardcode knowledge of
- // which calendars have era 0 years that go backwards.
- UBool era0WithYearsThatGoBackwards = false;
- int32_t era = get(UCAL_ERA, status);
- if (era == 0) {
- const char * calType = getType();
- if ( uprv_strcmp(calType,"gregorian")==0 || uprv_strcmp(calType,"roc")==0 || uprv_strcmp(calType,"coptic")==0 ) {
- amount = -amount;
- era0WithYearsThatGoBackwards = true;
- }
- }
- int32_t newYear = internalGet(field) + amount;
- if (era > 0 || newYear >= 1) {
- int32_t maxYear = getActualMaximum(field, status);
- if (maxYear < 32768) {
- // this era has real bounds, roll should wrap years
- if (newYear < 1) {
- newYear = maxYear - ((-newYear) % maxYear);
- } else if (newYear > maxYear) {
- newYear = ((newYear - 1) % maxYear) + 1;
- }
- // else era is unbounded, just pin low year instead of wrapping
- } else if (newYear < 1) {
- newYear = 1;
- }
- // else we are in era 0 with newYear < 1;
- // calendars with years that go backwards must pin the year value at 0,
- // other calendars can have years < 0 in era 0
- } else if (era0WithYearsThatGoBackwards) {
- newYear = 1;
- }
- set(field, newYear);
- pinField(UCAL_MONTH,status);
- pinField(UCAL_ORDINAL_MONTH,status);
- pinField(UCAL_DAY_OF_MONTH,status);
- return;
- }
- case UCAL_EXTENDED_YEAR:
- // Rolling the year can involve pinning the DAY_OF_MONTH.
- set(field, internalGet(field) + amount);
- pinField(UCAL_MONTH,status);
- pinField(UCAL_ORDINAL_MONTH,status);
- pinField(UCAL_DAY_OF_MONTH,status);
- return;
- case UCAL_WEEK_OF_MONTH:
- {
- // This is tricky, because during the roll we may have to shift
- // to a different day of the week. For example:
- // s m t w r f s
- // 1 2 3 4 5
- // 6 7 8 9 10 11 12
- // When rolling from the 6th or 7th back one week, we go to the
- // 1st (assuming that the first partial week counts). The same
- // thing happens at the end of the month.
- // The other tricky thing is that we have to figure out whether
- // the first partial week actually counts or not, based on the
- // minimal first days in the week. And we have to use the
- // correct first day of the week to delineate the week
- // boundaries.
- // Here's our algorithm. First, we find the real boundaries of
- // the month. Then we discard the first partial week if it
- // doesn't count in this locale. Then we fill in the ends with
- // phantom days, so that the first partial week and the last
- // partial week are full weeks. We then have a nice square
- // block of weeks. We do the usual rolling within this block,
- // as is done elsewhere in this method. If we wind up on one of
- // the phantom days that we added, we recognize this and pin to
- // the first or the last day of the month. Easy, eh?
- // Normalize the DAY_OF_WEEK so that 0 is the first day of the week
- // in this locale. We have dow in 0..6.
- int32_t dow = internalGet(UCAL_DAY_OF_WEEK) - getFirstDayOfWeek();
- if (dow < 0) dow += 7;
- // Find the day of the week (normalized for locale) for the first
- // of the month.
- int32_t fdm = (dow - internalGet(UCAL_DAY_OF_MONTH) + 1) % 7;
- if (fdm < 0) fdm += 7;
- // Get the first day of the first full week of the month,
- // including phantom days, if any. Figure out if the first week
- // counts or not; if it counts, then fill in phantom days. If
- // not, advance to the first real full week (skip the partial week).
- int32_t start;
- if ((7 - fdm) < getMinimalDaysInFirstWeek())
- start = 8 - fdm; // Skip the first partial week
- else
- start = 1 - fdm; // This may be zero or negative
- // Get the day of the week (normalized for locale) for the last
- // day of the month.
- int32_t monthLen = getActualMaximum(UCAL_DAY_OF_MONTH, status);
- int32_t ldm = (monthLen - internalGet(UCAL_DAY_OF_MONTH) + dow) % 7;
- // We know monthLen >= DAY_OF_MONTH so we skip the += 7 step here.
- // Get the limit day for the blocked-off rectangular month; that
- // is, the day which is one past the last day of the month,
- // after the month has already been filled in with phantom days
- // to fill out the last week. This day has a normalized DOW of 0.
- int32_t limit = monthLen + 7 - ldm;
- // Now roll between start and (limit - 1).
- int32_t gap = limit - start;
- int32_t day_of_month = (internalGet(UCAL_DAY_OF_MONTH) + amount*7 -
- start) % gap;
- if (day_of_month < 0) day_of_month += gap;
- day_of_month += start;
- // Finally, pin to the real start and end of the month.
- if (day_of_month < 1) day_of_month = 1;
- if (day_of_month > monthLen) day_of_month = monthLen;
- // Set the DAY_OF_MONTH. We rely on the fact that this field
- // takes precedence over everything else (since all other fields
- // are also set at this point). If this fact changes (if the
- // disambiguation algorithm changes) then we will have to unset
- // the appropriate fields here so that DAY_OF_MONTH is attended
- // to.
- set(UCAL_DAY_OF_MONTH, day_of_month);
- return;
- }
- case UCAL_WEEK_OF_YEAR:
- {
- // This follows the outline of WEEK_OF_MONTH, except it applies
- // to the whole year. Please see the comment for WEEK_OF_MONTH
- // for general notes.
- // Normalize the DAY_OF_WEEK so that 0 is the first day of the week
- // in this locale. We have dow in 0..6.
- int32_t dow = internalGet(UCAL_DAY_OF_WEEK) - getFirstDayOfWeek();
- if (dow < 0) dow += 7;
- // Find the day of the week (normalized for locale) for the first
- // of the year.
- int32_t fdy = (dow - internalGet(UCAL_DAY_OF_YEAR) + 1) % 7;
- if (fdy < 0) fdy += 7;
- // Get the first day of the first full week of the year,
- // including phantom days, if any. Figure out if the first week
- // counts or not; if it counts, then fill in phantom days. If
- // not, advance to the first real full week (skip the partial week).
- int32_t start;
- if ((7 - fdy) < getMinimalDaysInFirstWeek())
- start = 8 - fdy; // Skip the first partial week
- else
- start = 1 - fdy; // This may be zero or negative
- // Get the day of the week (normalized for locale) for the last
- // day of the year.
- int32_t yearLen = getActualMaximum(UCAL_DAY_OF_YEAR,status);
- int32_t ldy = (yearLen - internalGet(UCAL_DAY_OF_YEAR) + dow) % 7;
- // We know yearLen >= DAY_OF_YEAR so we skip the += 7 step here.
- // Get the limit day for the blocked-off rectangular year; that
- // is, the day which is one past the last day of the year,
- // after the year has already been filled in with phantom days
- // to fill out the last week. This day has a normalized DOW of 0.
- int32_t limit = yearLen + 7 - ldy;
- // Now roll between start and (limit - 1).
- int32_t gap = limit - start;
- int32_t day_of_year = (internalGet(UCAL_DAY_OF_YEAR) + amount*7 -
- start) % gap;
- if (day_of_year < 0) day_of_year += gap;
- day_of_year += start;
- // Finally, pin to the real start and end of the month.
- if (day_of_year < 1) day_of_year = 1;
- if (day_of_year > yearLen) day_of_year = yearLen;
- // Make sure that the year and day of year are attended to by
- // clearing other fields which would normally take precedence.
- // If the disambiguation algorithm is changed, this section will
- // have to be updated as well.
- set(UCAL_DAY_OF_YEAR, day_of_year);
- clear(UCAL_MONTH);
- clear(UCAL_ORDINAL_MONTH);
- return;
- }
- case UCAL_DAY_OF_YEAR:
- {
- // Roll the day of year using millis. Compute the millis for
- // the start of the year, and get the length of the year.
- double delta = amount * kOneDay; // Scale up from days to millis
- double min2 = internalGet(UCAL_DAY_OF_YEAR)-1;
- min2 *= kOneDay;
- min2 = internalGetTime() - min2;
- // double min2 = internalGetTime() - (internalGet(UCAL_DAY_OF_YEAR) - 1.0) * kOneDay;
- double newtime;
- double yearLength = getActualMaximum(UCAL_DAY_OF_YEAR,status);
- double oneYear = yearLength;
- oneYear *= kOneDay;
- newtime = uprv_fmod((internalGetTime() + delta - min2), oneYear);
- if (newtime < 0) newtime += oneYear;
- setTimeInMillis(newtime + min2, status);
- return;
- }
- case UCAL_DAY_OF_WEEK:
- case UCAL_DOW_LOCAL:
- {
- // Roll the day of week using millis. Compute the millis for
- // the start of the week, using the first day of week setting.
- // Restrict the millis to [start, start+7days).
- double delta = amount * kOneDay; // Scale up from days to millis
- // Compute the number of days before the current day in this
- // week. This will be a value 0..6.
- int32_t leadDays = internalGet(field);
- leadDays -= (field == UCAL_DAY_OF_WEEK) ? getFirstDayOfWeek() : 1;
- if (leadDays < 0) leadDays += 7;
- double min2 = internalGetTime() - leadDays * kOneDay;
- double newtime = uprv_fmod((internalGetTime() + delta - min2), kOneWeek);
- if (newtime < 0) newtime += kOneWeek;
- setTimeInMillis(newtime + min2, status);
- return;
- }
- case UCAL_DAY_OF_WEEK_IN_MONTH:
- {
- // Roll the day of week in the month using millis. Determine
- // the first day of the week in the month, and then the last,
- // and then roll within that range.
- double delta = amount * kOneWeek; // Scale up from weeks to millis
- // Find the number of same days of the week before this one
- // in this month.
- int32_t preWeeks = (internalGet(UCAL_DAY_OF_MONTH) - 1) / 7;
- // Find the number of same days of the week after this one
- // in this month.
- int32_t postWeeks = (getActualMaximum(UCAL_DAY_OF_MONTH,status) -
- internalGet(UCAL_DAY_OF_MONTH)) / 7;
- // From these compute the min and gap millis for rolling.
- double min2 = internalGetTime() - preWeeks * kOneWeek;
- double gap2 = kOneWeek * (preWeeks + postWeeks + 1); // Must add 1!
- // Roll within this range
- double newtime = uprv_fmod((internalGetTime() + delta - min2), gap2);
- if (newtime < 0) newtime += gap2;
- setTimeInMillis(newtime + min2, status);
- return;
- }
- case UCAL_JULIAN_DAY:
- set(field, internalGet(field) + amount);
- return;
- default:
- // Other fields cannot be rolled by this method
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "%s:%d: ILLEGAL ARG because of roll on non-rollable field %s\n",
- __FILE__, __LINE__,fldName(field));
- #endif
- status = U_ILLEGAL_ARGUMENT_ERROR;
- }
- }
- void Calendar::add(EDateFields field, int32_t amount, UErrorCode& status)
- {
- Calendar::add((UCalendarDateFields)field, amount, status);
- }
- // -------------------------------------
- void Calendar::add(UCalendarDateFields field, int32_t amount, UErrorCode& status)
- {
- if (U_FAILURE(status)) {
- return;
- }
- if (amount == 0) {
- return; // Do nothing!
- }
- // We handle most fields in the same way. The algorithm is to add
- // a computed amount of millis to the current millis. The only
- // wrinkle is with DST (and/or a change to the zone's UTC offset, which
- // we'll include with DST) -- for some fields, like the DAY_OF_MONTH,
- // we don't want the wall time to shift due to changes in DST. If the
- // result of the add operation is to move from DST to Standard, or
- // vice versa, we need to adjust by an hour forward or back,
- // respectively. For such fields we set keepWallTimeInvariant to true.
- // We only adjust the DST for fields larger than an hour. For
- // fields smaller than an hour, we cannot adjust for DST without
- // causing problems. for instance, if you add one hour to April 5,
- // 1998, 1:00 AM, in PST, the time becomes "2:00 AM PDT" (an
- // illegal value), but then the adjustment sees the change and
- // compensates by subtracting an hour. As a result the time
- // doesn't advance at all.
- // For some fields larger than a day, such as a UCAL_MONTH, we pin the
- // UCAL_DAY_OF_MONTH. This allows <March 31>.add(UCAL_MONTH, 1) to be
- // <April 30>, rather than <April 31> => <May 1>.
- double delta = amount; // delta in ms
- UBool keepWallTimeInvariant = true;
- switch (field) {
- case UCAL_ERA:
- set(field, get(field, status) + amount);
- pinField(UCAL_ERA, status);
- return;
- case UCAL_YEAR:
- case UCAL_YEAR_WOY:
- {
- // * If era=0 and years go backwards in time, change sign of amount.
- // * Until we have new API per #9393, we temporarily hardcode knowledge of
- // which calendars have era 0 years that go backwards.
- // * Note that for UCAL_YEAR (but not UCAL_YEAR_WOY) we could instead handle
- // this by applying the amount to the UCAL_EXTENDED_YEAR field; but since
- // we would still need to handle UCAL_YEAR_WOY as below, might as well
- // also handle UCAL_YEAR the same way.
- int32_t era = get(UCAL_ERA, status);
- if (era == 0) {
- const char * calType = getType();
- if ( uprv_strcmp(calType,"gregorian")==0 || uprv_strcmp(calType,"roc")==0 || uprv_strcmp(calType,"coptic")==0 ) {
- amount = -amount;
- }
- }
- }
- // Fall through into normal handling
- U_FALLTHROUGH;
- case UCAL_EXTENDED_YEAR:
- case UCAL_MONTH:
- case UCAL_ORDINAL_MONTH:
- {
- UBool oldLenient = isLenient();
- setLenient(true);
- set(field, get(field, status) + amount);
- pinField(UCAL_DAY_OF_MONTH, status);
- if(oldLenient==false) {
- complete(status); /* force recalculate */
- setLenient(oldLenient);
- }
- }
- return;
- case UCAL_WEEK_OF_YEAR:
- case UCAL_WEEK_OF_MONTH:
- case UCAL_DAY_OF_WEEK_IN_MONTH:
- delta *= kOneWeek;
- break;
- case UCAL_AM_PM:
- delta *= 12 * kOneHour;
- break;
- case UCAL_DAY_OF_MONTH:
- case UCAL_DAY_OF_YEAR:
- case UCAL_DAY_OF_WEEK:
- case UCAL_DOW_LOCAL:
- case UCAL_JULIAN_DAY:
- delta *= kOneDay;
- break;
- case UCAL_HOUR_OF_DAY:
- case UCAL_HOUR:
- delta *= kOneHour;
- keepWallTimeInvariant = false;
- break;
- case UCAL_MINUTE:
- delta *= kOneMinute;
- keepWallTimeInvariant = false;
- break;
- case UCAL_SECOND:
- delta *= kOneSecond;
- keepWallTimeInvariant = false;
- break;
- case UCAL_MILLISECOND:
- case UCAL_MILLISECONDS_IN_DAY:
- keepWallTimeInvariant = false;
- break;
- default:
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "%s:%d: ILLEGAL ARG because field %s not addable",
- __FILE__, __LINE__, fldName(field));
- #endif
- status = U_ILLEGAL_ARGUMENT_ERROR;
- return;
- // throw new IllegalArgumentException("Calendar.add(" + fieldName(field) +
- // ") not supported");
- }
- // In order to keep the wall time invariant (for fields where this is
- // appropriate), check the combined DST & ZONE offset before and
- // after the add() operation. If it changes, then adjust the millis
- // to compensate.
- int32_t prevOffset = 0;
- int32_t prevWallTime = 0;
- if (keepWallTimeInvariant) {
- prevOffset = get(UCAL_DST_OFFSET, status) + get(UCAL_ZONE_OFFSET, status);
- prevWallTime = get(UCAL_MILLISECONDS_IN_DAY, status);
- }
- setTimeInMillis(getTimeInMillis(status) + delta, status);
- if (keepWallTimeInvariant) {
- int32_t newWallTime = get(UCAL_MILLISECONDS_IN_DAY, status);
- if (newWallTime != prevWallTime) {
- // There is at least one zone transition between the base
- // time and the result time. As the result, wall time has
- // changed.
- UDate t = internalGetTime();
- int32_t newOffset = get(UCAL_DST_OFFSET, status) + get(UCAL_ZONE_OFFSET, status);
- if (newOffset != prevOffset) {
- // When the difference of the previous UTC offset and
- // the new UTC offset exceeds 1 full day, we do not want
- // to roll over/back the date. For now, this only happens
- // in Samoa (Pacific/Apia) on Dec 30, 2011. See ticket:9452.
- int32_t adjAmount = prevOffset - newOffset;
- adjAmount = adjAmount >= 0 ? adjAmount % (int32_t)kOneDay : -(-adjAmount % (int32_t)kOneDay);
- if (adjAmount != 0) {
- setTimeInMillis(t + adjAmount, status);
- newWallTime = get(UCAL_MILLISECONDS_IN_DAY, status);
- }
- if (newWallTime != prevWallTime) {
- // The result wall time or adjusted wall time was shifted because
- // the target wall time does not exist on the result date.
- switch (fSkippedWallTime) {
- case UCAL_WALLTIME_FIRST:
- if (adjAmount > 0) {
- setTimeInMillis(t, status);
- }
- break;
- case UCAL_WALLTIME_LAST:
- if (adjAmount < 0) {
- setTimeInMillis(t, status);
- }
- break;
- case UCAL_WALLTIME_NEXT_VALID:
- UDate tmpT = adjAmount > 0 ? internalGetTime() : t;
- UDate immediatePrevTrans;
- UBool hasTransition = getImmediatePreviousZoneTransition(tmpT, &immediatePrevTrans, status);
- if (U_SUCCESS(status) && hasTransition) {
- setTimeInMillis(immediatePrevTrans, status);
- }
- break;
- }
- }
- }
- }
- }
- }
- // -------------------------------------
- int32_t Calendar::fieldDifference(UDate when, EDateFields field, UErrorCode& status) {
- return fieldDifference(when, (UCalendarDateFields) field, status);
- }
- int32_t Calendar::fieldDifference(UDate targetMs, UCalendarDateFields field, UErrorCode& ec) {
- if (U_FAILURE(ec)) return 0;
- int32_t min = 0;
- double startMs = getTimeInMillis(ec);
- // Always add from the start millis. This accommodates
- // operations like adding years from February 29, 2000 up to
- // February 29, 2004. If 1, 1, 1, 1 is added to the year
- // field, the DOM gets pinned to 28 and stays there, giving an
- // incorrect DOM difference of 1. We have to add 1, reset, 2,
- // reset, 3, reset, 4.
- if (startMs < targetMs) {
- int32_t max = 1;
- // Find a value that is too large
- while (U_SUCCESS(ec)) {
- setTimeInMillis(startMs, ec);
- add(field, max, ec);
- double ms = getTimeInMillis(ec);
- if (ms == targetMs) {
- return max;
- } else if (ms > targetMs) {
- break;
- } else if (max < INT32_MAX) {
- min = max;
- max <<= 1;
- if (max < 0) {
- max = INT32_MAX;
- }
- } else {
- // Field difference too large to fit into int32_t
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "%s:%d: ILLEGAL ARG because field %s's max too large for int32_t\n",
- __FILE__, __LINE__, fldName(field));
- #endif
- ec = U_ILLEGAL_ARGUMENT_ERROR;
- }
- }
- // Do a binary search
- while ((max - min) > 1 && U_SUCCESS(ec)) {
- int32_t t = min + (max - min)/2; // make sure intermediate values don't exceed INT32_MAX
- setTimeInMillis(startMs, ec);
- add(field, t, ec);
- double ms = getTimeInMillis(ec);
- if (ms == targetMs) {
- return t;
- } else if (ms > targetMs) {
- max = t;
- } else {
- min = t;
- }
- }
- } else if (startMs > targetMs) {
- int32_t max = -1;
- // Find a value that is too small
- while (U_SUCCESS(ec)) {
- setTimeInMillis(startMs, ec);
- add(field, max, ec);
- double ms = getTimeInMillis(ec);
- if (ms == targetMs) {
- return max;
- } else if (ms < targetMs) {
- break;
- } else {
- min = max;
- max = (int32_t)((uint32_t)(max) << 1);
- if (max == 0) {
- // Field difference too large to fit into int32_t
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "%s:%d: ILLEGAL ARG because field %s's max too large for int32_t\n",
- __FILE__, __LINE__, fldName(field));
- #endif
- ec = U_ILLEGAL_ARGUMENT_ERROR;
- }
- }
- }
- // Do a binary search
- while ((min - max) > 1 && U_SUCCESS(ec)) {
- int32_t t = min + (max - min)/2; // make sure intermediate values don't exceed INT32_MAX
- setTimeInMillis(startMs, ec);
- add(field, t, ec);
- double ms = getTimeInMillis(ec);
- if (ms == targetMs) {
- return t;
- } else if (ms < targetMs) {
- max = t;
- } else {
- min = t;
- }
- }
- }
- // Set calendar to end point
- setTimeInMillis(startMs, ec);
- add(field, min, ec);
- /* Test for buffer overflows */
- if(U_FAILURE(ec)) {
- return 0;
- }
- return min;
- }
- // -------------------------------------
- void
- Calendar::adoptTimeZone(TimeZone* zone)
- {
- // Do nothing if passed-in zone is nullptr
- if (zone == nullptr) return;
- // fZone should always be non-null
- delete fZone;
- fZone = zone;
- // if the zone changes, we need to recompute the time fields
- fAreFieldsSet = false;
- }
- // -------------------------------------
- void
- Calendar::setTimeZone(const TimeZone& zone)
- {
- adoptTimeZone(zone.clone());
- }
- // -------------------------------------
- const TimeZone&
- Calendar::getTimeZone() const
- {
- U_ASSERT(fZone != nullptr);
- return *fZone;
- }
- // -------------------------------------
- TimeZone*
- Calendar::orphanTimeZone()
- {
- // we let go of the time zone; the new time zone is the system default time zone
- TimeZone *defaultZone = TimeZone::createDefault();
- if (defaultZone == nullptr) {
- // No error handling available. Must keep fZone non-nullptr, there are many unchecked uses.
- return nullptr;
- }
- TimeZone *z = fZone;
- fZone = defaultZone;
- return z;
- }
- // -------------------------------------
- void
- Calendar::setLenient(UBool lenient)
- {
- fLenient = lenient;
- }
- // -------------------------------------
- UBool
- Calendar::isLenient() const
- {
- return fLenient;
- }
- // -------------------------------------
- void
- Calendar::setRepeatedWallTimeOption(UCalendarWallTimeOption option)
- {
- if (option == UCAL_WALLTIME_LAST || option == UCAL_WALLTIME_FIRST) {
- fRepeatedWallTime = option;
- }
- }
- // -------------------------------------
- UCalendarWallTimeOption
- Calendar::getRepeatedWallTimeOption() const
- {
- return fRepeatedWallTime;
- }
- // -------------------------------------
- void
- Calendar::setSkippedWallTimeOption(UCalendarWallTimeOption option)
- {
- fSkippedWallTime = option;
- }
- // -------------------------------------
- UCalendarWallTimeOption
- Calendar::getSkippedWallTimeOption() const
- {
- return fSkippedWallTime;
- }
- // -------------------------------------
- void
- Calendar::setFirstDayOfWeek(UCalendarDaysOfWeek value) UPRV_NO_SANITIZE_UNDEFINED {
- if (fFirstDayOfWeek != value &&
- value >= UCAL_SUNDAY && value <= UCAL_SATURDAY) {
- fFirstDayOfWeek = value;
- fAreFieldsSet = false;
- }
- }
- // -------------------------------------
- Calendar::EDaysOfWeek
- Calendar::getFirstDayOfWeek() const
- {
- return (Calendar::EDaysOfWeek)fFirstDayOfWeek;
- }
- UCalendarDaysOfWeek
- Calendar::getFirstDayOfWeek(UErrorCode & /*status*/) const
- {
- return fFirstDayOfWeek;
- }
- // -------------------------------------
- void
- Calendar::setMinimalDaysInFirstWeek(uint8_t value)
- {
- // Values less than 1 have the same effect as 1; values greater
- // than 7 have the same effect as 7. However, we normalize values
- // so operator== and so forth work.
- if (value < 1) {
- value = 1;
- } else if (value > 7) {
- value = 7;
- }
- if (fMinimalDaysInFirstWeek != value) {
- fMinimalDaysInFirstWeek = value;
- fAreFieldsSet = false;
- }
- }
- // -------------------------------------
- uint8_t
- Calendar::getMinimalDaysInFirstWeek() const
- {
- return fMinimalDaysInFirstWeek;
- }
- // -------------------------------------
- // weekend functions, just dummy implementations for now (for API freeze)
- UCalendarWeekdayType
- Calendar::getDayOfWeekType(UCalendarDaysOfWeek dayOfWeek, UErrorCode &status) const
- {
- if (U_FAILURE(status)) {
- return UCAL_WEEKDAY;
- }
- if (dayOfWeek < UCAL_SUNDAY || dayOfWeek > UCAL_SATURDAY) {
- status = U_ILLEGAL_ARGUMENT_ERROR;
- return UCAL_WEEKDAY;
- }
- if (fWeekendOnset == fWeekendCease) {
- if (dayOfWeek != fWeekendOnset)
- return UCAL_WEEKDAY;
- return (fWeekendOnsetMillis == 0) ? UCAL_WEEKEND : UCAL_WEEKEND_ONSET;
- }
- if (fWeekendOnset < fWeekendCease) {
- if (dayOfWeek < fWeekendOnset || dayOfWeek > fWeekendCease) {
- return UCAL_WEEKDAY;
- }
- } else {
- if (dayOfWeek > fWeekendCease && dayOfWeek < fWeekendOnset) {
- return UCAL_WEEKDAY;
- }
- }
- if (dayOfWeek == fWeekendOnset) {
- return (fWeekendOnsetMillis == 0) ? UCAL_WEEKEND : UCAL_WEEKEND_ONSET;
- }
- if (dayOfWeek == fWeekendCease) {
- return (fWeekendCeaseMillis >= 86400000) ? UCAL_WEEKEND : UCAL_WEEKEND_CEASE;
- }
- return UCAL_WEEKEND;
- }
- int32_t
- Calendar::getWeekendTransition(UCalendarDaysOfWeek dayOfWeek, UErrorCode &status) const
- {
- if (U_FAILURE(status)) {
- return 0;
- }
- if (dayOfWeek == fWeekendOnset) {
- return fWeekendOnsetMillis;
- } else if (dayOfWeek == fWeekendCease) {
- return fWeekendCeaseMillis;
- }
- status = U_ILLEGAL_ARGUMENT_ERROR;
- return 0;
- }
- UBool
- Calendar::isWeekend(UDate date, UErrorCode &status) const
- {
- if (U_FAILURE(status)) {
- return false;
- }
- // clone the calendar so we don't mess with the real one.
- Calendar *work = this->clone();
- if (work == nullptr) {
- status = U_MEMORY_ALLOCATION_ERROR;
- return false;
- }
- UBool result = false;
- work->setTime(date, status);
- if (U_SUCCESS(status)) {
- result = work->isWeekend();
- }
- delete work;
- return result;
- }
- UBool
- Calendar::isWeekend() const
- {
- UErrorCode status = U_ZERO_ERROR;
- UCalendarDaysOfWeek dayOfWeek = (UCalendarDaysOfWeek)get(UCAL_DAY_OF_WEEK, status);
- UCalendarWeekdayType dayType = getDayOfWeekType(dayOfWeek, status);
- if (U_SUCCESS(status)) {
- switch (dayType) {
- case UCAL_WEEKDAY:
- return false;
- case UCAL_WEEKEND:
- return true;
- case UCAL_WEEKEND_ONSET:
- case UCAL_WEEKEND_CEASE:
- // Use internalGet() because the above call to get() populated all fields.
- {
- int32_t millisInDay = internalGet(UCAL_MILLISECONDS_IN_DAY);
- int32_t transitionMillis = getWeekendTransition(dayOfWeek, status);
- if (U_SUCCESS(status)) {
- return (dayType == UCAL_WEEKEND_ONSET)?
- (millisInDay >= transitionMillis):
- (millisInDay < transitionMillis);
- }
- // else fall through, return false
- U_FALLTHROUGH;
- }
- default:
- break;
- }
- }
- return false;
- }
- // ------------------------------------- limits
- int32_t
- Calendar::getMinimum(EDateFields field) const {
- return getLimit((UCalendarDateFields) field,UCAL_LIMIT_MINIMUM);
- }
- int32_t
- Calendar::getMinimum(UCalendarDateFields field) const
- {
- return getLimit(field,UCAL_LIMIT_MINIMUM);
- }
- // -------------------------------------
- int32_t
- Calendar::getMaximum(EDateFields field) const
- {
- return getLimit((UCalendarDateFields) field,UCAL_LIMIT_MAXIMUM);
- }
- int32_t
- Calendar::getMaximum(UCalendarDateFields field) const
- {
- return getLimit(field,UCAL_LIMIT_MAXIMUM);
- }
- // -------------------------------------
- int32_t
- Calendar::getGreatestMinimum(EDateFields field) const
- {
- return getLimit((UCalendarDateFields)field,UCAL_LIMIT_GREATEST_MINIMUM);
- }
- int32_t
- Calendar::getGreatestMinimum(UCalendarDateFields field) const
- {
- return getLimit(field,UCAL_LIMIT_GREATEST_MINIMUM);
- }
- // -------------------------------------
- int32_t
- Calendar::getLeastMaximum(EDateFields field) const
- {
- return getLimit((UCalendarDateFields) field,UCAL_LIMIT_LEAST_MAXIMUM);
- }
- int32_t
- Calendar::getLeastMaximum(UCalendarDateFields field) const
- {
- return getLimit( field,UCAL_LIMIT_LEAST_MAXIMUM);
- }
- // -------------------------------------
- int32_t
- Calendar::getActualMinimum(EDateFields field, UErrorCode& status) const
- {
- return getActualMinimum((UCalendarDateFields) field, status);
- }
- int32_t Calendar::getLimit(UCalendarDateFields field, ELimitType limitType) const {
- switch (field) {
- case UCAL_DAY_OF_WEEK:
- case UCAL_AM_PM:
- case UCAL_HOUR:
- case UCAL_HOUR_OF_DAY:
- case UCAL_MINUTE:
- case UCAL_SECOND:
- case UCAL_MILLISECOND:
- case UCAL_ZONE_OFFSET:
- case UCAL_DST_OFFSET:
- case UCAL_DOW_LOCAL:
- case UCAL_JULIAN_DAY:
- case UCAL_MILLISECONDS_IN_DAY:
- case UCAL_IS_LEAP_MONTH:
- return kCalendarLimits[field][limitType];
- case UCAL_WEEK_OF_MONTH:
- {
- int32_t limit;
- if (limitType == UCAL_LIMIT_MINIMUM) {
- limit = getMinimalDaysInFirstWeek() == 1 ? 1 : 0;
- } else if (limitType == UCAL_LIMIT_GREATEST_MINIMUM) {
- limit = 1;
- } else {
- int32_t minDaysInFirst = getMinimalDaysInFirstWeek();
- int32_t daysInMonth = handleGetLimit(UCAL_DAY_OF_MONTH, limitType);
- if (limitType == UCAL_LIMIT_LEAST_MAXIMUM) {
- limit = (daysInMonth + (7 - minDaysInFirst)) / 7;
- } else { // limitType == UCAL_LIMIT_MAXIMUM
- limit = (daysInMonth + 6 + (7 - minDaysInFirst)) / 7;
- }
- }
- return limit;
- }
- default:
- return handleGetLimit(field, limitType);
- }
- }
- int32_t
- Calendar::getActualMinimum(UCalendarDateFields field, UErrorCode& status) const
- {
- if (U_FAILURE(status)) {
- return 0;
- }
- int32_t fieldValue = getGreatestMinimum(field);
- int32_t endValue = getMinimum(field);
- // if we know that the minimum value is always the same, just return it
- if (fieldValue == endValue) {
- return fieldValue;
- }
- // clone the calendar so we don't mess with the real one, and set it to
- // accept anything for the field values
- Calendar *work = this->clone();
- if (work == nullptr) {
- status = U_MEMORY_ALLOCATION_ERROR;
- return 0;
- }
- work->setLenient(true);
- // now try each value from getLeastMaximum() to getMaximum() one by one until
- // we get a value that normalizes to another value. The last value that
- // normalizes to itself is the actual minimum for the current date
- int32_t result = fieldValue;
- do {
- work->set(field, fieldValue);
- if (work->get(field, status) != fieldValue) {
- break;
- }
- else {
- result = fieldValue;
- fieldValue--;
- }
- } while (fieldValue >= endValue);
- delete work;
- /* Test for buffer overflows */
- if(U_FAILURE(status)) {
- return 0;
- }
- return result;
- }
- // -------------------------------------
- UBool
- Calendar::inDaylightTime(UErrorCode& status) const
- {
- if (U_FAILURE(status) || !getTimeZone().useDaylightTime()) {
- return false;
- }
- // Force an update of the state of the Calendar.
- ((Calendar*)this)->complete(status); // cast away const
- return (UBool)(U_SUCCESS(status) ? (internalGet(UCAL_DST_OFFSET) != 0) : false);
- }
- bool
- Calendar::inTemporalLeapYear(UErrorCode& status) const
- {
- // Default to Gregorian based leap year rule.
- return getActualMaximum(UCAL_DAY_OF_YEAR, status) == 366;
- }
- // -------------------------------------
- static const char * const gTemporalMonthCodes[] = {
- "M01", "M02", "M03", "M04", "M05", "M06",
- "M07", "M08", "M09", "M10", "M11", "M12", nullptr
- };
- const char*
- Calendar::getTemporalMonthCode(UErrorCode& status) const
- {
- int32_t month = get(UCAL_MONTH, status);
- if (U_FAILURE(status)) return nullptr;
- U_ASSERT(month < 12);
- U_ASSERT(internalGet(UCAL_IS_LEAP_MONTH) == 0);
- return gTemporalMonthCodes[month];
- }
- void
- Calendar::setTemporalMonthCode(const char* code, UErrorCode& status )
- {
- if (U_FAILURE(status)) return;
- int32_t len = static_cast<int32_t>(uprv_strlen(code));
- if (len == 3 && code[0] == 'M') {
- for (int m = 0; gTemporalMonthCodes[m] != nullptr; m++) {
- if (uprv_strcmp(code, gTemporalMonthCodes[m]) == 0) {
- set(UCAL_MONTH, m);
- set(UCAL_IS_LEAP_MONTH, 0);
- return;
- }
- }
- }
- status = U_ILLEGAL_ARGUMENT_ERROR;
- }
- // -------------------------------------
- /**
- * Ensure that each field is within its valid range by calling {@link
- * #validateField(int)} on each field that has been set. This method
- * should only be called if this calendar is not lenient.
- * @see #isLenient
- * @see #validateField(int)
- */
- void Calendar::validateFields(UErrorCode &status) {
- if (U_FAILURE(status)) {
- return;
- }
- for (int32_t field = 0; U_SUCCESS(status) && (field < UCAL_FIELD_COUNT); field++) {
- if (fStamp[field] >= kMinimumUserStamp) {
- validateField((UCalendarDateFields)field, status);
- }
- }
- }
- /**
- * Validate a single field of this calendar. Subclasses should
- * override this method to validate any calendar-specific fields.
- * Generic fields can be handled by
- * <code>Calendar.validateField()</code>.
- * @see #validateField(int, int, int)
- */
- void Calendar::validateField(UCalendarDateFields field, UErrorCode &status) {
- if (U_FAILURE(status)) {
- return;
- }
- int32_t y;
- switch (field) {
- case UCAL_DAY_OF_MONTH:
- y = handleGetExtendedYear();
- validateField(field, 1, handleGetMonthLength(y, internalGetMonth()), status);
- break;
- case UCAL_DAY_OF_YEAR:
- y = handleGetExtendedYear();
- validateField(field, 1, handleGetYearLength(y), status);
- break;
- case UCAL_DAY_OF_WEEK_IN_MONTH:
- if (internalGet(field) == 0) {
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "%s:%d: ILLEGAL ARG because DOW in month cannot be 0\n",
- __FILE__, __LINE__);
- #endif
- status = U_ILLEGAL_ARGUMENT_ERROR; // "DAY_OF_WEEK_IN_MONTH cannot be zero"
- return;
- }
- validateField(field, getMinimum(field), getMaximum(field), status);
- break;
- default:
- validateField(field, getMinimum(field), getMaximum(field), status);
- break;
- }
- }
- /**
- * Validate a single field of this calendar given its minimum and
- * maximum allowed value. If the field is out of range, throw a
- * descriptive <code>IllegalArgumentException</code>. Subclasses may
- * use this method in their implementation of {@link
- * #validateField(int)}.
- */
- void Calendar::validateField(UCalendarDateFields field, int32_t min, int32_t max, UErrorCode& status)
- {
- if (U_FAILURE(status)) {
- return;
- }
- int32_t value = fFields[field];
- if (value < min || value > max) {
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "%s:%d: ILLEGAL ARG because of field %s out of range %d..%d at %d\n",
- __FILE__, __LINE__,fldName(field),min,max,value);
- #endif
- status = U_ILLEGAL_ARGUMENT_ERROR;
- return;
- }
- }
- // -------------------------
- const UFieldResolutionTable* Calendar::getFieldResolutionTable() const {
- return kDatePrecedence;
- }
- UCalendarDateFields Calendar::newerField(UCalendarDateFields defaultField, UCalendarDateFields alternateField) const
- {
- if (fStamp[alternateField] > fStamp[defaultField]) {
- return alternateField;
- }
- return defaultField;
- }
- UCalendarDateFields Calendar::resolveFields(const UFieldResolutionTable* precedenceTable) const {
- int32_t bestField = UCAL_FIELD_COUNT;
- int32_t tempBestField;
- for (int32_t g=0; precedenceTable[g][0][0] != -1 && (bestField == UCAL_FIELD_COUNT); ++g) {
- int32_t bestStamp = kUnset;
- for (int32_t l=0; precedenceTable[g][l][0] != -1; ++l) {
- int32_t lineStamp = kUnset;
- // Skip over first entry if it is negative
- for (int32_t i=((precedenceTable[g][l][0]>=kResolveRemap)?1:0); precedenceTable[g][l][i]!=-1; ++i) {
- U_ASSERT(precedenceTable[g][l][i] < UCAL_FIELD_COUNT);
- int32_t s = fStamp[precedenceTable[g][l][i]];
- // If any field is unset then don't use this line
- if (s == kUnset) {
- goto linesInGroup;
- } else if(s > lineStamp) {
- lineStamp = s;
- }
- }
- // Record new maximum stamp & field no.
- if (lineStamp > bestStamp) {
- tempBestField = precedenceTable[g][l][0]; // First field refers to entire line
- if (tempBestField >= kResolveRemap) {
- tempBestField &= (kResolveRemap-1);
- // This check is needed to resolve some issues with UCAL_YEAR precedence mapping
- if (tempBestField != UCAL_DATE || (fStamp[UCAL_WEEK_OF_MONTH] < fStamp[tempBestField])) {
- bestField = tempBestField;
- }
- } else {
- bestField = tempBestField;
- }
- if (bestField == tempBestField) {
- bestStamp = lineStamp;
- }
- }
- linesInGroup:
- ;
- }
- }
- return (UCalendarDateFields)bestField;
- }
- const UFieldResolutionTable Calendar::kDatePrecedence[] =
- {
- {
- { UCAL_DAY_OF_MONTH, kResolveSTOP },
- { UCAL_WEEK_OF_YEAR, UCAL_DAY_OF_WEEK, kResolveSTOP },
- { UCAL_WEEK_OF_MONTH, UCAL_DAY_OF_WEEK, kResolveSTOP },
- { UCAL_DAY_OF_WEEK_IN_MONTH, UCAL_DAY_OF_WEEK, kResolveSTOP },
- { UCAL_WEEK_OF_YEAR, UCAL_DOW_LOCAL, kResolveSTOP },
- { UCAL_WEEK_OF_MONTH, UCAL_DOW_LOCAL, kResolveSTOP },
- { UCAL_DAY_OF_WEEK_IN_MONTH, UCAL_DOW_LOCAL, kResolveSTOP },
- { UCAL_DAY_OF_YEAR, kResolveSTOP },
- { kResolveRemap | UCAL_DAY_OF_MONTH, UCAL_YEAR, kResolveSTOP }, // if YEAR is set over YEAR_WOY use DAY_OF_MONTH
- { kResolveRemap | UCAL_WEEK_OF_YEAR, UCAL_YEAR_WOY, kResolveSTOP }, // if YEAR_WOY is set, calc based on WEEK_OF_YEAR
- { kResolveSTOP }
- },
- {
- { UCAL_WEEK_OF_YEAR, kResolveSTOP },
- { UCAL_WEEK_OF_MONTH, kResolveSTOP },
- { UCAL_DAY_OF_WEEK_IN_MONTH, kResolveSTOP },
- { kResolveRemap | UCAL_DAY_OF_WEEK_IN_MONTH, UCAL_DAY_OF_WEEK, kResolveSTOP },
- { kResolveRemap | UCAL_DAY_OF_WEEK_IN_MONTH, UCAL_DOW_LOCAL, kResolveSTOP },
- { kResolveSTOP }
- },
- {{kResolveSTOP}}
- };
- const UFieldResolutionTable Calendar::kMonthPrecedence[] =
- {
- {
- { UCAL_MONTH,kResolveSTOP, kResolveSTOP },
- { UCAL_ORDINAL_MONTH,kResolveSTOP, kResolveSTOP },
- {kResolveSTOP}
- },
- {{kResolveSTOP}}
- };
- const UFieldResolutionTable Calendar::kDOWPrecedence[] =
- {
- {
- { UCAL_DAY_OF_WEEK,kResolveSTOP, kResolveSTOP },
- { UCAL_DOW_LOCAL,kResolveSTOP, kResolveSTOP },
- {kResolveSTOP}
- },
- {{kResolveSTOP}}
- };
- // precedence for calculating a year
- const UFieldResolutionTable Calendar::kYearPrecedence[] =
- {
- {
- { UCAL_YEAR, kResolveSTOP },
- { UCAL_EXTENDED_YEAR, kResolveSTOP },
- { UCAL_YEAR_WOY, UCAL_WEEK_OF_YEAR, kResolveSTOP }, // YEAR_WOY is useless without WEEK_OF_YEAR
- { kResolveSTOP }
- },
- {{kResolveSTOP}}
- };
- // -------------------------
- void Calendar::computeTime(UErrorCode& status) {
- if (U_FAILURE(status)) {
- return;
- }
- if (!isLenient()) {
- validateFields(status);
- if (U_FAILURE(status)) {
- return;
- }
- }
- // Compute the Julian day
- int32_t julianDay = computeJulianDay();
- double millis = Grego::julianDayToMillis(julianDay);
- #if defined (U_DEBUG_CAL)
- // int32_t julianInsanityCheck = (int32_t)ClockMath::floorDivide(millis, kOneDay);
- // julianInsanityCheck += kEpochStartAsJulianDay;
- // if(1 || julianInsanityCheck != julianDay) {
- // fprintf(stderr, "%s:%d- D'oh- computed jules %d, to mills (%s)%.lf, recomputed %d\n",
- // __FILE__, __LINE__, julianDay, millis<0.0?"NEG":"", millis, julianInsanityCheck);
- // }
- #endif
- double millisInDay;
- // We only use MILLISECONDS_IN_DAY if it has been set by the user.
- // This makes it possible for the caller to set the calendar to a
- // time and call clear(MONTH) to reset the MONTH to January. This
- // is legacy behavior. Without this, clear(MONTH) has no effect,
- // since the internally set JULIAN_DAY is used.
- if (fStamp[UCAL_MILLISECONDS_IN_DAY] >= ((int32_t)kMinimumUserStamp) &&
- newestStamp(UCAL_AM_PM, UCAL_MILLISECOND, kUnset) <= fStamp[UCAL_MILLISECONDS_IN_DAY]) {
- millisInDay = internalGet(UCAL_MILLISECONDS_IN_DAY);
- } else {
- millisInDay = computeMillisInDay();
- }
- UDate t = 0;
- if (fStamp[UCAL_ZONE_OFFSET] >= ((int32_t)kMinimumUserStamp) || fStamp[UCAL_DST_OFFSET] >= ((int32_t)kMinimumUserStamp)) {
- t = millis + millisInDay - (internalGet(UCAL_ZONE_OFFSET) + internalGet(UCAL_DST_OFFSET));
- } else {
- // Compute the time zone offset and DST offset. There are two potential
- // ambiguities here. We'll assume a 2:00 am (wall time) switchover time
- // for discussion purposes here.
- //
- // 1. The positive offset change such as transition into DST.
- // Here, a designated time of 2:00 am - 2:59 am does not actually exist.
- // For this case, skippedWallTime option specifies the behavior.
- // For example, 2:30 am is interpreted as;
- // - WALLTIME_LAST(default): 3:30 am (DST) (interpreting 2:30 am as 31 minutes after 1:59 am (STD))
- // - WALLTIME_FIRST: 1:30 am (STD) (interpreting 2:30 am as 30 minutes before 3:00 am (DST))
- // - WALLTIME_NEXT_VALID: 3:00 am (DST) (next valid time after 2:30 am on a wall clock)
- // 2. The negative offset change such as transition out of DST.
- // Here, a designated time of 1:00 am - 1:59 am can be in standard or DST. Both are valid
- // representations (the rep jumps from 1:59:59 DST to 1:00:00 Std).
- // For this case, repeatedWallTime option specifies the behavior.
- // For example, 1:30 am is interpreted as;
- // - WALLTIME_LAST(default): 1:30 am (STD) - latter occurrence
- // - WALLTIME_FIRST: 1:30 am (DST) - former occurrence
- //
- // In addition to above, when calendar is strict (not default), wall time falls into
- // the skipped time range will be processed as an error case.
- //
- // These special cases are mostly handled in #computeZoneOffset(long), except WALLTIME_NEXT_VALID
- // at positive offset change. The protected method computeZoneOffset(long) is exposed to Calendar
- // subclass implementations and marked as @stable. Strictly speaking, WALLTIME_NEXT_VALID
- // should be also handled in the same place, but we cannot change the code flow without deprecating
- // the protected method.
- //
- // We use the TimeZone object, unless the user has explicitly set the ZONE_OFFSET
- // or DST_OFFSET fields; then we use those fields.
- if (!isLenient() || fSkippedWallTime == UCAL_WALLTIME_NEXT_VALID) {
- // When strict, invalidate a wall time falls into a skipped wall time range.
- // When lenient and skipped wall time option is WALLTIME_NEXT_VALID,
- // the result time will be adjusted to the next valid time (on wall clock).
- int32_t zoneOffset = computeZoneOffset(millis, millisInDay, status);
- UDate tmpTime = millis + millisInDay - zoneOffset;
- int32_t raw, dst;
- fZone->getOffset(tmpTime, false, raw, dst, status);
- if (U_SUCCESS(status)) {
- // zoneOffset != (raw + dst) only when the given wall time fall into
- // a skipped wall time range caused by positive zone offset transition.
- if (zoneOffset != (raw + dst)) {
- if (!isLenient()) {
- status = U_ILLEGAL_ARGUMENT_ERROR;
- } else {
- U_ASSERT(fSkippedWallTime == UCAL_WALLTIME_NEXT_VALID);
- // Adjust time to the next valid wall clock time.
- // At this point, tmpTime is on or after the zone offset transition causing
- // the skipped time range.
- UDate immediatePrevTransition;
- UBool hasTransition = getImmediatePreviousZoneTransition(tmpTime, &immediatePrevTransition, status);
- if (U_SUCCESS(status) && hasTransition) {
- t = immediatePrevTransition;
- }
- }
- } else {
- t = tmpTime;
- }
- }
- } else {
- t = millis + millisInDay - computeZoneOffset(millis, millisInDay, status);
- }
- }
- if (U_SUCCESS(status)) {
- internalSetTime(t);
- }
- }
- /**
- * Find the previous zone transition near the given time.
- */
- UBool Calendar::getImmediatePreviousZoneTransition(UDate base, UDate *transitionTime, UErrorCode& status) const {
- if (U_FAILURE(status)) {
- return false;
- }
- BasicTimeZone *btz = getBasicTimeZone();
- if (btz) {
- TimeZoneTransition trans;
- UBool hasTransition = btz->getPreviousTransition(base, true, trans);
- if (hasTransition) {
- *transitionTime = trans.getTime();
- return true;
- } else {
- // Could not find any transitions.
- // Note: This should never happen.
- status = U_INTERNAL_PROGRAM_ERROR;
- }
- } else {
- // If not BasicTimeZone, return unsupported error for now.
- // TODO: We may support non-BasicTimeZone in future.
- status = U_UNSUPPORTED_ERROR;
- }
- return false;
- }
- /**
- * Compute the milliseconds in the day from the fields. This is a
- * value from 0 to 23:59:59.999 inclusive, unless fields are out of
- * range, in which case it can be an arbitrary value. This value
- * reflects local zone wall time.
- * @stable ICU 2.0
- */
- double Calendar::computeMillisInDay() {
- // Do the time portion of the conversion.
- double millisInDay = 0;
- // Find the best set of fields specifying the time of day. There
- // are only two possibilities here; the HOUR_OF_DAY or the
- // AM_PM and the HOUR.
- int32_t hourOfDayStamp = fStamp[UCAL_HOUR_OF_DAY];
- int32_t hourStamp = (fStamp[UCAL_HOUR] > fStamp[UCAL_AM_PM])?fStamp[UCAL_HOUR]:fStamp[UCAL_AM_PM];
- int32_t bestStamp = (hourStamp > hourOfDayStamp) ? hourStamp : hourOfDayStamp;
- // Hours
- if (bestStamp != kUnset) {
- if (bestStamp == hourOfDayStamp) {
- // Don't normalize here; let overflow bump into the next period.
- // This is consistent with how we handle other fields.
- millisInDay += internalGet(UCAL_HOUR_OF_DAY);
- } else {
- // Don't normalize here; let overflow bump into the next period.
- // This is consistent with how we handle other fields.
- millisInDay += internalGet(UCAL_HOUR);
- millisInDay += 12 * internalGet(UCAL_AM_PM); // Default works for unset AM_PM
- }
- }
- // We use the fact that unset == 0; we start with millisInDay
- // == HOUR_OF_DAY.
- millisInDay *= 60;
- millisInDay += internalGet(UCAL_MINUTE); // now have minutes
- millisInDay *= 60;
- millisInDay += internalGet(UCAL_SECOND); // now have seconds
- millisInDay *= 1000;
- millisInDay += internalGet(UCAL_MILLISECOND); // now have millis
- return millisInDay;
- }
- /**
- * This method can assume EXTENDED_YEAR has been set.
- * @param millis milliseconds of the date fields
- * @param millisInDay milliseconds of the time fields; may be out
- * or range.
- * @stable ICU 2.0
- */
- int32_t Calendar::computeZoneOffset(double millis, double millisInDay, UErrorCode &ec) {
- if (U_FAILURE(ec)) {
- return 0;
- }
- int32_t rawOffset, dstOffset;
- UDate wall = millis + millisInDay;
- BasicTimeZone* btz = getBasicTimeZone();
- if (btz) {
- UTimeZoneLocalOption duplicatedTimeOpt = (fRepeatedWallTime == UCAL_WALLTIME_FIRST) ? UCAL_TZ_LOCAL_FORMER : UCAL_TZ_LOCAL_LATTER;
- UTimeZoneLocalOption nonExistingTimeOpt = (fSkippedWallTime == UCAL_WALLTIME_FIRST) ? UCAL_TZ_LOCAL_LATTER : UCAL_TZ_LOCAL_FORMER;
- btz->getOffsetFromLocal(wall, nonExistingTimeOpt, duplicatedTimeOpt, rawOffset, dstOffset, ec);
- } else {
- const TimeZone& tz = getTimeZone();
- // By default, TimeZone::getOffset behaves UCAL_WALLTIME_LAST for both.
- tz.getOffset(wall, true, rawOffset, dstOffset, ec);
- UBool sawRecentNegativeShift = false;
- if (fRepeatedWallTime == UCAL_WALLTIME_FIRST) {
- // Check if the given wall time falls into repeated time range
- UDate tgmt = wall - (rawOffset + dstOffset);
- // Any negative zone transition within last 6 hours?
- // Note: The maximum historic negative zone transition is -3 hours in the tz database.
- // 6 hour window would be sufficient for this purpose.
- int32_t tmpRaw, tmpDst;
- tz.getOffset(tgmt - 6*60*60*1000, false, tmpRaw, tmpDst, ec);
- int32_t offsetDelta = (rawOffset + dstOffset) - (tmpRaw + tmpDst);
- U_ASSERT(offsetDelta < -6*60*60*1000);
- if (offsetDelta < 0) {
- sawRecentNegativeShift = true;
- // Negative shift within last 6 hours. When UCAL_WALLTIME_FIRST is used and the given wall time falls
- // into the repeated time range, use offsets before the transition.
- // Note: If it does not fall into the repeated time range, offsets remain unchanged below.
- tz.getOffset(wall + offsetDelta, true, rawOffset, dstOffset, ec);
- }
- }
- if (!sawRecentNegativeShift && fSkippedWallTime == UCAL_WALLTIME_FIRST) {
- // When skipped wall time option is WALLTIME_FIRST,
- // recalculate offsets from the resolved time (non-wall).
- // When the given wall time falls into skipped wall time,
- // the offsets will be based on the zone offsets AFTER
- // the transition (which means, earliest possible interpretation).
- UDate tgmt = wall - (rawOffset + dstOffset);
- tz.getOffset(tgmt, false, rawOffset, dstOffset, ec);
- }
- }
- return rawOffset + dstOffset;
- }
- int32_t Calendar::computeJulianDay()
- {
- // We want to see if any of the date fields is newer than the
- // JULIAN_DAY. If not, then we use JULIAN_DAY. If so, then we do
- // the normal resolution. We only use JULIAN_DAY if it has been
- // set by the user. This makes it possible for the caller to set
- // the calendar to a time and call clear(MONTH) to reset the MONTH
- // to January. This is legacy behavior. Without this,
- // clear(MONTH) has no effect, since the internally set JULIAN_DAY
- // is used.
- if (fStamp[UCAL_JULIAN_DAY] >= (int32_t)kMinimumUserStamp) {
- int32_t bestStamp = newestStamp(UCAL_ERA, UCAL_DAY_OF_WEEK_IN_MONTH, kUnset);
- bestStamp = newestStamp(UCAL_YEAR_WOY, UCAL_EXTENDED_YEAR, bestStamp);
- bestStamp = newestStamp(UCAL_ORDINAL_MONTH, UCAL_ORDINAL_MONTH, bestStamp);
- if (bestStamp <= fStamp[UCAL_JULIAN_DAY]) {
- return internalGet(UCAL_JULIAN_DAY);
- }
- }
- UCalendarDateFields bestField = resolveFields(getFieldResolutionTable());
- if (bestField == UCAL_FIELD_COUNT) {
- bestField = UCAL_DAY_OF_MONTH;
- }
- return handleComputeJulianDay(bestField);
- }
- // -------------------------------------------
- int32_t Calendar::handleComputeJulianDay(UCalendarDateFields bestField) {
- UBool useMonth = (bestField == UCAL_DAY_OF_MONTH ||
- bestField == UCAL_WEEK_OF_MONTH ||
- bestField == UCAL_DAY_OF_WEEK_IN_MONTH);
- int32_t year;
- if (bestField == UCAL_WEEK_OF_YEAR && newerField(UCAL_YEAR_WOY, UCAL_YEAR) == UCAL_YEAR_WOY) {
- year = internalGet(UCAL_YEAR_WOY);
- } else {
- year = handleGetExtendedYear();
- }
- internalSet(UCAL_EXTENDED_YEAR, year);
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "%s:%d: bestField= %s - y=%d\n", __FILE__, __LINE__, fldName(bestField), year);
- #endif
- // Get the Julian day of the day BEFORE the start of this year.
- // If useMonth is true, get the day before the start of the month.
- // give calendar subclass a chance to have a default 'first' month
- int32_t month;
- if(isSet(UCAL_MONTH) || isSet(UCAL_ORDINAL_MONTH)) {
- month = internalGetMonth();
- } else {
- month = getDefaultMonthInYear(year);
- }
- int32_t julianDay = handleComputeMonthStart(year, useMonth ? month : 0, useMonth);
- if (bestField == UCAL_DAY_OF_MONTH) {
- // give calendar subclass a chance to have a default 'first' dom
- int32_t dayOfMonth;
- if(isSet(UCAL_DAY_OF_MONTH)) {
- dayOfMonth = internalGet(UCAL_DAY_OF_MONTH,1);
- } else {
- dayOfMonth = getDefaultDayInMonth(year, month);
- }
- return julianDay + dayOfMonth;
- }
- if (bestField == UCAL_DAY_OF_YEAR) {
- return julianDay + internalGet(UCAL_DAY_OF_YEAR);
- }
- int32_t firstDayOfWeek = getFirstDayOfWeek(); // Localized fdw
- // At this point julianDay is the 0-based day BEFORE the first day of
- // January 1, year 1 of the given calendar. If julianDay == 0, it
- // specifies (Jan. 1, 1) - 1, in whatever calendar we are using (Julian
- // or Gregorian). (or it is before the month we are in, if useMonth is True)
- // At this point we need to process the WEEK_OF_MONTH or
- // WEEK_OF_YEAR, which are similar, or the DAY_OF_WEEK_IN_MONTH.
- // First, perform initial shared computations. These locate the
- // first week of the period.
- // Get the 0-based localized DOW of day one of the month or year.
- // Valid range 0..6.
- int32_t first = julianDayToDayOfWeek(julianDay + 1) - firstDayOfWeek;
- if (first < 0) {
- first += 7;
- }
- int32_t dowLocal = getLocalDOW();
- // Find the first target DOW (dowLocal) in the month or year.
- // Actually, it may be just before the first of the month or year.
- // It will be an integer from -5..7.
- int32_t date = 1 - first + dowLocal;
- if (bestField == UCAL_DAY_OF_WEEK_IN_MONTH) {
- // Adjust the target DOW to be in the month or year.
- if (date < 1) {
- date += 7;
- }
- // The only trickiness occurs if the day-of-week-in-month is
- // negative.
- int32_t dim = internalGet(UCAL_DAY_OF_WEEK_IN_MONTH, 1);
- if (dim >= 0) {
- date += 7*(dim - 1);
- } else {
- // Move date to the last of this day-of-week in this month,
- // then back up as needed. If dim==-1, we don't back up at
- // all. If dim==-2, we back up once, etc. Don't back up
- // past the first of the given day-of-week in this month.
- // Note that we handle -2, -3, etc. correctly, even though
- // values < -1 are technically disallowed.
- int32_t m = internalGetMonth(UCAL_JANUARY);
- int32_t monthLength = handleGetMonthLength(year, m);
- date += ((monthLength - date) / 7 + dim + 1) * 7;
- }
- } else {
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "%s:%d - bf= %s\n", __FILE__, __LINE__, fldName(bestField));
- #endif
- if(bestField == UCAL_WEEK_OF_YEAR) { // ------------------------------------- WOY -------------
- if(!isSet(UCAL_YEAR_WOY) || // YWOY not set at all or
- ( (resolveFields(kYearPrecedence) != UCAL_YEAR_WOY) // YWOY doesn't have precedence
- && (fStamp[UCAL_YEAR_WOY]!=kInternallySet) ) ) // (excluding where all fields are internally set - then YWOY is used)
- {
- // need to be sure to stay in 'real' year.
- int32_t woy = internalGet(bestField);
- int32_t nextJulianDay = handleComputeMonthStart(year+1, 0, false); // jd of day before jan 1
- int32_t nextFirst = julianDayToDayOfWeek(nextJulianDay + 1) - firstDayOfWeek;
- if (nextFirst < 0) { // 0..6 ldow of Jan 1
- nextFirst += 7;
- }
- if(woy==1) { // FIRST WEEK ---------------------------------
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "%s:%d - woy=%d, yp=%d, nj(%d)=%d, nf=%d", __FILE__, __LINE__,
- internalGet(bestField), resolveFields(kYearPrecedence), year+1,
- nextJulianDay, nextFirst);
- fprintf(stderr, " next: %d DFW, min=%d \n", (7-nextFirst), getMinimalDaysInFirstWeek() );
- #endif
- // nextFirst is now the localized DOW of Jan 1 of y-woy+1
- if((nextFirst > 0) && // Jan 1 starts on FDOW
- (7-nextFirst) >= getMinimalDaysInFirstWeek()) // or enough days in the week
- {
- // Jan 1 of (yearWoy+1) is in yearWoy+1 - recalculate JD to next year
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "%s:%d - was going to move JD from %d to %d [d%d]\n", __FILE__, __LINE__,
- julianDay, nextJulianDay, (nextJulianDay-julianDay));
- #endif
- julianDay = nextJulianDay;
- // recalculate 'first' [0-based local dow of jan 1]
- first = julianDayToDayOfWeek(julianDay + 1) - firstDayOfWeek;
- if (first < 0) {
- first += 7;
- }
- // recalculate date.
- date = 1 - first + dowLocal;
- }
- } else if(woy>=getLeastMaximum(bestField)) {
- // could be in the last week- find out if this JD would overstep
- int32_t testDate = date;
- if ((7 - first) < getMinimalDaysInFirstWeek()) {
- testDate += 7;
- }
- // Now adjust for the week number.
- testDate += 7 * (woy - 1);
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "%s:%d - y=%d, y-1=%d doy%d, njd%d (C.F. %d)\n",
- __FILE__, __LINE__, year, year-1, testDate, julianDay+testDate, nextJulianDay);
- #endif
- if(julianDay+testDate > nextJulianDay) { // is it past Dec 31? (nextJulianDay is day BEFORE year+1's Jan 1)
- // Fire up the calculating engines.. retry YWOY = (year-1)
- julianDay = handleComputeMonthStart(year-1, 0, false); // jd before Jan 1 of previous year
- first = julianDayToDayOfWeek(julianDay + 1) - firstDayOfWeek; // 0 based local dow of first week
- if(first < 0) { // 0..6
- first += 7;
- }
- date = 1 - first + dowLocal;
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "%s:%d - date now %d, jd%d, ywoy%d\n",
- __FILE__, __LINE__, date, julianDay, year-1);
- #endif
- } /* correction needed */
- } /* leastmaximum */
- } /* resolvefields(year) != year_woy */
- } /* bestfield != week_of_year */
- // assert(bestField == WEEK_OF_MONTH || bestField == WEEK_OF_YEAR)
- // Adjust for minimal days in first week
- if ((7 - first) < getMinimalDaysInFirstWeek()) {
- date += 7;
- }
- // Now adjust for the week number.
- date += 7 * (internalGet(bestField) - 1);
- }
- return julianDay + date;
- }
- int32_t
- Calendar::getDefaultMonthInYear(int32_t /*eyear*/)
- {
- return 0;
- }
- int32_t
- Calendar::getDefaultDayInMonth(int32_t /*eyear*/, int32_t /*month*/)
- {
- return 1;
- }
- int32_t Calendar::getLocalDOW()
- {
- // Get zero-based localized DOW, valid range 0..6. This is the DOW
- // we are looking for.
- int32_t dowLocal = 0;
- switch (resolveFields(kDOWPrecedence)) {
- case UCAL_DAY_OF_WEEK:
- dowLocal = internalGet(UCAL_DAY_OF_WEEK) - fFirstDayOfWeek;
- break;
- case UCAL_DOW_LOCAL:
- dowLocal = internalGet(UCAL_DOW_LOCAL) - 1;
- break;
- default:
- break;
- }
- dowLocal = dowLocal % 7;
- if (dowLocal < 0) {
- dowLocal += 7;
- }
- return dowLocal;
- }
- int32_t Calendar::handleGetExtendedYearFromWeekFields(int32_t yearWoy, int32_t woy)
- {
- // We have UCAL_YEAR_WOY and UCAL_WEEK_OF_YEAR - from those, determine
- // what year we fall in, so that other code can set it properly.
- // (code borrowed from computeWeekFields and handleComputeJulianDay)
- //return yearWoy;
- // First, we need a reliable DOW.
- UCalendarDateFields bestField = resolveFields(kDatePrecedence); // !! Note: if subclasses have a different table, they should override handleGetExtendedYearFromWeekFields
- // Now, a local DOW
- int32_t dowLocal = getLocalDOW(); // 0..6
- int32_t firstDayOfWeek = getFirstDayOfWeek(); // Localized fdw
- int32_t jan1Start = handleComputeMonthStart(yearWoy, 0, false);
- int32_t nextJan1Start = handleComputeMonthStart(yearWoy+1, 0, false); // next year's Jan1 start
- // At this point julianDay is the 0-based day BEFORE the first day of
- // January 1, year 1 of the given calendar. If julianDay == 0, it
- // specifies (Jan. 1, 1) - 1, in whatever calendar we are using (Julian
- // or Gregorian). (or it is before the month we are in, if useMonth is True)
- // At this point we need to process the WEEK_OF_MONTH or
- // WEEK_OF_YEAR, which are similar, or the DAY_OF_WEEK_IN_MONTH.
- // First, perform initial shared computations. These locate the
- // first week of the period.
- // Get the 0-based localized DOW of day one of the month or year.
- // Valid range 0..6.
- int32_t first = julianDayToDayOfWeek(jan1Start + 1) - firstDayOfWeek;
- if (first < 0) {
- first += 7;
- }
- //// (nextFirst was not used below)
- // int32_t nextFirst = julianDayToDayOfWeek(nextJan1Start + 1) - firstDayOfWeek;
- // if (nextFirst < 0) {
- // nextFirst += 7;
- //}
- int32_t minDays = getMinimalDaysInFirstWeek();
- UBool jan1InPrevYear = false; // January 1st in the year of WOY is the 1st week? (i.e. first week is < minimal )
- //UBool nextJan1InPrevYear = false; // January 1st of Year of WOY + 1 is in the first week?
- if((7 - first) < minDays) {
- jan1InPrevYear = true;
- }
- // if((7 - nextFirst) < minDays) {
- // nextJan1InPrevYear = true;
- // }
- switch(bestField) {
- case UCAL_WEEK_OF_YEAR:
- if(woy == 1) {
- if(jan1InPrevYear) {
- // the first week of January is in the previous year
- // therefore WOY1 is always solidly within yearWoy
- return yearWoy;
- } else {
- // First WOY is split between two years
- if( dowLocal < first) { // we are prior to Jan 1
- return yearWoy-1; // previous year
- } else {
- return yearWoy; // in this year
- }
- }
- } else if(woy >= getLeastMaximum(bestField)) {
- // we _might_ be in the last week..
- int32_t jd = // Calculate JD of our target day:
- jan1Start + // JD of Jan 1
- (7-first) + // days in the first week (Jan 1.. )
- (woy-1)*7 + // add the weeks of the year
- dowLocal; // the local dow (0..6) of last week
- if(jan1InPrevYear==false) {
- jd -= 7; // woy already includes Jan 1's week.
- }
- if( (jd+1) >= nextJan1Start ) {
- // we are in week 52 or 53 etc. - actual year is yearWoy+1
- return yearWoy+1;
- } else {
- // still in yearWoy;
- return yearWoy;
- }
- } else {
- // we're not possibly in the last week -must be ywoy
- return yearWoy;
- }
- case UCAL_DATE:
- {
- int32_t m = internalGetMonth();
- if((m == 0) &&
- (woy >= getLeastMaximum(UCAL_WEEK_OF_YEAR))) {
- return yearWoy+1; // month 0, late woy = in the next year
- } else if(woy==1) {
- //if(nextJan1InPrevYear) {
- if(m == 0) {
- return yearWoy;
- } else {
- return yearWoy-1;
- }
- //}
- }
- }
- //(internalGet(UCAL_DATE) <= (7-first)) /* && in minDow */ ) {
- //within 1st week and in this month..
- //return yearWoy+1;
- return yearWoy;
- default: // assume the year is appropriate
- return yearWoy;
- }
- }
- int32_t Calendar::handleGetMonthLength(int32_t extendedYear, int32_t month) const
- {
- return handleComputeMonthStart(extendedYear, month+1, true) -
- handleComputeMonthStart(extendedYear, month, true);
- }
- int32_t Calendar::handleGetYearLength(int32_t eyear) const {
- return handleComputeMonthStart(eyear+1, 0, false) -
- handleComputeMonthStart(eyear, 0, false);
- }
- int32_t
- Calendar::getActualMaximum(UCalendarDateFields field, UErrorCode& status) const
- {
- if (U_FAILURE(status)) {
- return 0;
- }
- int32_t result;
- switch (field) {
- case UCAL_DATE:
- {
- if(U_FAILURE(status)) return 0;
- Calendar *cal = clone();
- if(!cal) { status = U_MEMORY_ALLOCATION_ERROR; return 0; }
- cal->setLenient(true);
- cal->prepareGetActual(field,false,status);
- result = handleGetMonthLength(cal->get(UCAL_EXTENDED_YEAR, status), cal->get(UCAL_MONTH, status));
- delete cal;
- }
- break;
- case UCAL_DAY_OF_YEAR:
- {
- if(U_FAILURE(status)) return 0;
- Calendar *cal = clone();
- if(!cal) { status = U_MEMORY_ALLOCATION_ERROR; return 0; }
- cal->setLenient(true);
- cal->prepareGetActual(field,false,status);
- result = handleGetYearLength(cal->get(UCAL_EXTENDED_YEAR, status));
- delete cal;
- }
- break;
- case UCAL_DAY_OF_WEEK:
- case UCAL_AM_PM:
- case UCAL_HOUR:
- case UCAL_HOUR_OF_DAY:
- case UCAL_MINUTE:
- case UCAL_SECOND:
- case UCAL_MILLISECOND:
- case UCAL_ZONE_OFFSET:
- case UCAL_DST_OFFSET:
- case UCAL_DOW_LOCAL:
- case UCAL_JULIAN_DAY:
- case UCAL_MILLISECONDS_IN_DAY:
- // These fields all have fixed minima/maxima
- result = getMaximum(field);
- break;
- case UCAL_ORDINAL_MONTH:
- result = inTemporalLeapYear(status) ? getMaximum(UCAL_ORDINAL_MONTH) : getLeastMaximum(UCAL_ORDINAL_MONTH);
- break;
- default:
- // For all other fields, do it the hard way....
- result = getActualHelper(field, getLeastMaximum(field), getMaximum(field),status);
- break;
- }
- return result;
- }
- /**
- * Prepare this calendar for computing the actual minimum or maximum.
- * This method modifies this calendar's fields; it is called on a
- * temporary calendar.
- *
- * <p>Rationale: The semantics of getActualXxx() is to return the
- * maximum or minimum value that the given field can take, taking into
- * account other relevant fields. In general these other fields are
- * larger fields. For example, when computing the actual maximum
- * DATE, the current value of DATE itself is ignored,
- * as is the value of any field smaller.
- *
- * <p>The time fields all have fixed minima and maxima, so we don't
- * need to worry about them. This also lets us set the
- * MILLISECONDS_IN_DAY to zero to erase any effects the time fields
- * might have when computing date fields.
- *
- * <p>DAY_OF_WEEK is adjusted specially for the WEEK_OF_MONTH and
- * WEEK_OF_YEAR fields to ensure that they are computed correctly.
- * @internal
- */
- void Calendar::prepareGetActual(UCalendarDateFields field, UBool isMinimum, UErrorCode &status)
- {
- if (U_FAILURE(status)) {
- return;
- }
- set(UCAL_MILLISECONDS_IN_DAY, 0);
- switch (field) {
- case UCAL_YEAR:
- case UCAL_EXTENDED_YEAR:
- set(UCAL_DAY_OF_YEAR, getGreatestMinimum(UCAL_DAY_OF_YEAR));
- break;
- case UCAL_YEAR_WOY:
- set(UCAL_WEEK_OF_YEAR, getGreatestMinimum(UCAL_WEEK_OF_YEAR));
- U_FALLTHROUGH;
- case UCAL_MONTH:
- set(UCAL_DATE, getGreatestMinimum(UCAL_DATE));
- break;
- case UCAL_DAY_OF_WEEK_IN_MONTH:
- // For dowim, the maximum occurs for the DOW of the first of the
- // month.
- set(UCAL_DATE, 1);
- set(UCAL_DAY_OF_WEEK, get(UCAL_DAY_OF_WEEK, status)); // Make this user set
- break;
- case UCAL_WEEK_OF_MONTH:
- case UCAL_WEEK_OF_YEAR:
- // If we're counting weeks, set the day of the week to either the
- // first or last localized DOW. We know the last week of a month
- // or year will contain the first day of the week, and that the
- // first week will contain the last DOW.
- {
- int32_t dow = fFirstDayOfWeek;
- if (isMinimum) {
- dow = (dow + 6) % 7; // set to last DOW
- if (dow < UCAL_SUNDAY) {
- dow += 7;
- }
- }
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "prepareGetActualHelper(WOM/WOY) - dow=%d\n", dow);
- #endif
- set(UCAL_DAY_OF_WEEK, dow);
- }
- break;
- default:
- break;
- }
- // Do this last to give it the newest time stamp
- set(field, getGreatestMinimum(field));
- }
- int32_t Calendar::getActualHelper(UCalendarDateFields field, int32_t startValue, int32_t endValue, UErrorCode &status) const
- {
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "getActualHelper(%d,%d .. %d, %s)\n", field, startValue, endValue, u_errorName(status));
- #endif
- if (U_FAILURE(status)) {
- return 0;
- }
- if (startValue == endValue) {
- // if we know that the maximum value is always the same, just return it
- return startValue;
- }
- int32_t delta = (endValue > startValue) ? 1 : -1;
- // clone the calendar so we don't mess with the real one, and set it to
- // accept anything for the field values
- if(U_FAILURE(status)) return startValue;
- Calendar *work = clone();
- if(!work) { status = U_MEMORY_ALLOCATION_ERROR; return startValue; }
- // need to resolve time here, otherwise, fields set for actual limit
- // may cause conflict with fields previously set (but not yet resolved).
- work->complete(status);
- work->setLenient(true);
- work->prepareGetActual(field, delta < 0, status);
- // now try each value from the start to the end one by one until
- // we get a value that normalizes to another value. The last value that
- // normalizes to itself is the actual maximum for the current date
- work->set(field, startValue);
- // prepareGetActual sets the first day of week in the same week with
- // the first day of a month. Unlike WEEK_OF_YEAR, week number for the
- // week which contains days from both previous and current month is
- // not unique. For example, last several days in the previous month
- // is week 5, and the rest of week is week 1.
- int32_t result = startValue;
- if ((work->get(field, status) != startValue
- && field != UCAL_WEEK_OF_MONTH && delta > 0 ) || U_FAILURE(status)) {
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "getActualHelper(fld %d) - got %d (not %d) - %s\n", field, work->get(field,status), startValue, u_errorName(status));
- #endif
- } else {
- do {
- startValue += delta;
- work->add(field, delta, status);
- if (work->get(field, status) != startValue || U_FAILURE(status)) {
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "getActualHelper(fld %d) - got %d (not %d), BREAK - %s\n", field, work->get(field,status), startValue, u_errorName(status));
- #endif
- break;
- }
- result = startValue;
- } while (startValue != endValue);
- }
- delete work;
- #if defined (U_DEBUG_CAL)
- fprintf(stderr, "getActualHelper(%d) = %d\n", field, result);
- #endif
- return result;
- }
- // -------------------------------------
- void
- Calendar::setWeekData(const Locale& desiredLocale, const char *type, UErrorCode& status)
- {
- if (U_FAILURE(status)) return;
- fFirstDayOfWeek = UCAL_SUNDAY;
- fMinimalDaysInFirstWeek = 1;
- fWeekendOnset = UCAL_SATURDAY;
- fWeekendOnsetMillis = 0;
- fWeekendCease = UCAL_SUNDAY;
- fWeekendCeaseMillis = 86400000; // 24*60*60*1000
- // Since week and weekend data is territory based instead of language based,
- // we may need to tweak the locale that we are using to try to get the appropriate
- // values, using the following logic:
- // 1). If the locale has a language but no territory, use the territory as defined by
- // the likely subtags.
- // 2). If the locale has a script designation then we ignore it,
- // then remove it ( i.e. "en_Latn_US" becomes "en_US" )
- UErrorCode myStatus = U_ZERO_ERROR;
- Locale min(desiredLocale);
- min.minimizeSubtags(myStatus);
- Locale useLocale;
- if ( uprv_strlen(desiredLocale.getCountry()) == 0 ||
- (uprv_strlen(desiredLocale.getScript()) > 0 && uprv_strlen(min.getScript()) == 0) ) {
- myStatus = U_ZERO_ERROR;
- Locale max(desiredLocale);
- max.addLikelySubtags(myStatus);
- useLocale = Locale(max.getLanguage(),max.getCountry());
- } else {
- useLocale = desiredLocale;
- }
- /* The code here is somewhat of a hack, since week data and weekend data aren't really tied to
- a specific calendar, they aren't truly locale data. But this is the only place where valid and
- actual locale can be set, so we take a shot at it here by loading a representative resource
- from the calendar data. The code used to use the dateTimeElements resource to get first day
- of week data, but this was moved to supplemental data under ticket 7755. (JCE) */
- // Get the monthNames resource bundle for the calendar 'type'. Fallback to gregorian if the resource is not
- // found.
- LocalUResourceBundlePointer calData(ures_open(nullptr, useLocale.getBaseName(), &status));
- ures_getByKey(calData.getAlias(), gCalendar, calData.getAlias(), &status);
- LocalUResourceBundlePointer monthNames;
- if (type != nullptr && *type != '\0' && uprv_strcmp(type, gGregorian) != 0) {
- monthNames.adoptInstead(ures_getByKeyWithFallback(calData.getAlias(), type, nullptr, &status));
- ures_getByKeyWithFallback(monthNames.getAlias(), gMonthNames,
- monthNames.getAlias(), &status);
- }
- if (monthNames.isNull() || status == U_MISSING_RESOURCE_ERROR) {
- status = U_ZERO_ERROR;
- monthNames.adoptInstead(ures_getByKeyWithFallback(calData.getAlias(), gGregorian,
- monthNames.orphan(), &status));
- ures_getByKeyWithFallback(monthNames.getAlias(), gMonthNames,
- monthNames.getAlias(), &status);
- }
- if (U_SUCCESS(status)) {
- U_LOCALE_BASED(locBased,*this);
- locBased.setLocaleIDs(ures_getLocaleByType(monthNames.getAlias(), ULOC_VALID_LOCALE, &status),
- ures_getLocaleByType(monthNames.getAlias(), ULOC_ACTUAL_LOCALE, &status));
- } else {
- status = U_USING_FALLBACK_WARNING;
- return;
- }
- char region[ULOC_COUNTRY_CAPACITY];
- (void)ulocimp_getRegionForSupplementalData(desiredLocale.getName(), true, region, sizeof(region), &status);
- // Read week data values from supplementalData week data
- UResourceBundle *rb = ures_openDirect(nullptr, "supplementalData", &status);
- ures_getByKey(rb, "weekData", rb, &status);
- UResourceBundle *weekData = ures_getByKey(rb, region, nullptr, &status);
- if (status == U_MISSING_RESOURCE_ERROR && rb != nullptr) {
- status = U_ZERO_ERROR;
- weekData = ures_getByKey(rb, "001", nullptr, &status);
- }
- if (U_FAILURE(status)) {
- status = U_USING_FALLBACK_WARNING;
- } else {
- int32_t arrLen;
- const int32_t *weekDataArr = ures_getIntVector(weekData,&arrLen,&status);
- if( U_SUCCESS(status) && arrLen == 6
- && 1 <= weekDataArr[0] && weekDataArr[0] <= 7
- && 1 <= weekDataArr[1] && weekDataArr[1] <= 7
- && 1 <= weekDataArr[2] && weekDataArr[2] <= 7
- && 1 <= weekDataArr[4] && weekDataArr[4] <= 7) {
- fFirstDayOfWeek = (UCalendarDaysOfWeek)weekDataArr[0];
- fMinimalDaysInFirstWeek = (uint8_t)weekDataArr[1];
- fWeekendOnset = (UCalendarDaysOfWeek)weekDataArr[2];
- fWeekendOnsetMillis = weekDataArr[3];
- fWeekendCease = (UCalendarDaysOfWeek)weekDataArr[4];
- fWeekendCeaseMillis = weekDataArr[5];
- } else {
- status = U_INVALID_FORMAT_ERROR;
- }
- // Check if the locale has a "fw" u extension and we honor it if present.
- // And we don't change the overal status, as the presence / lack of "fw" is not an error.
- UErrorCode fwStatus = U_ZERO_ERROR;
- char fwExt[ULOC_FULLNAME_CAPACITY] = "";
- desiredLocale.getKeywordValue("fw", fwExt, ULOC_FULLNAME_CAPACITY, fwStatus);
- if (U_SUCCESS(fwStatus)) {
- if (uprv_strcmp(fwExt, "sun") == 0) {
- fFirstDayOfWeek = UCAL_SUNDAY;
- } else if (uprv_strcmp(fwExt, "mon") == 0) {
- fFirstDayOfWeek = UCAL_MONDAY;
- } else if (uprv_strcmp(fwExt, "tue") == 0) {
- fFirstDayOfWeek = UCAL_TUESDAY;
- } else if (uprv_strcmp(fwExt, "wed") == 0) {
- fFirstDayOfWeek = UCAL_WEDNESDAY;
- } else if (uprv_strcmp(fwExt, "thu") == 0) {
- fFirstDayOfWeek = UCAL_THURSDAY;
- } else if (uprv_strcmp(fwExt, "fri") == 0) {
- fFirstDayOfWeek = UCAL_FRIDAY;
- } else if (uprv_strcmp(fwExt, "sat") == 0) {
- fFirstDayOfWeek = UCAL_SATURDAY;
- }
- }
- }
- ures_close(weekData);
- ures_close(rb);
- }
- /**
- * Recompute the time and update the status fields isTimeSet
- * and areFieldsSet. Callers should check isTimeSet and only
- * call this method if isTimeSet is false.
- */
- void
- Calendar::updateTime(UErrorCode& status)
- {
- computeTime(status);
- if(U_FAILURE(status))
- return;
- // If we are lenient, we need to recompute the fields to normalize
- // the values. Also, if we haven't set all the fields yet (i.e.,
- // in a newly-created object), we need to fill in the fields. [LIU]
- if (isLenient() || ! fAreAllFieldsSet)
- fAreFieldsSet = false;
- fIsTimeSet = true;
- fAreFieldsVirtuallySet = false;
- }
- Locale
- Calendar::getLocale(ULocDataLocaleType type, UErrorCode& status) const {
- U_LOCALE_BASED(locBased, *this);
- return locBased.getLocale(type, status);
- }
- const char *
- Calendar::getLocaleID(ULocDataLocaleType type, UErrorCode& status) const {
- U_LOCALE_BASED(locBased, *this);
- return locBased.getLocaleID(type, status);
- }
- void
- Calendar::recalculateStamp() {
- int32_t index;
- int32_t currentValue;
- int32_t j, i;
- fNextStamp = 1;
- for (j = 0; j < UCAL_FIELD_COUNT; j++) {
- currentValue = STAMP_MAX;
- index = -1;
- for (i = 0; i < UCAL_FIELD_COUNT; i++) {
- if (fStamp[i] > fNextStamp && fStamp[i] < currentValue) {
- currentValue = fStamp[i];
- index = i;
- }
- }
- if (index >= 0) {
- fStamp[index] = ++fNextStamp;
- } else {
- break;
- }
- }
- fNextStamp++;
- }
- // Deprecated function. This doesn't need to be inline.
- void
- Calendar::internalSet(EDateFields field, int32_t value)
- {
- internalSet((UCalendarDateFields) field, value);
- }
- int32_t Calendar::internalGetMonth() const {
- if (resolveFields(kMonthPrecedence) == UCAL_MONTH) {
- return internalGet(UCAL_MONTH);
- }
- return internalGet(UCAL_ORDINAL_MONTH);
- }
- int32_t Calendar::internalGetMonth(int32_t defaultValue) const {
- if (resolveFields(kMonthPrecedence) == UCAL_MONTH) {
- return internalGet(UCAL_MONTH, defaultValue);
- }
- return internalGet(UCAL_ORDINAL_MONTH);
- }
- BasicTimeZone*
- Calendar::getBasicTimeZone() const {
- if (dynamic_cast<const OlsonTimeZone *>(fZone) != nullptr
- || dynamic_cast<const SimpleTimeZone *>(fZone) != nullptr
- || dynamic_cast<const RuleBasedTimeZone *>(fZone) != nullptr
- || dynamic_cast<const VTimeZone *>(fZone) != nullptr) {
- return (BasicTimeZone*)fZone;
- }
- return nullptr;
- }
- U_NAMESPACE_END
- #endif /* #if !UCONFIG_NO_FORMATTING */
- //eof
|