icuSources/i18n/gregoimp.h

   1 // © 2016 and later: Unicode, Inc. and others.
   2 // License & terms of use: http://www.unicode.org/copyright.html
   3 /*
   4  **********************************************************************
   5  * Copyright (c) 2003-2008, International Business Machines
   6  * Corporation and others.  All Rights Reserved.
   7  **********************************************************************
   8  * Author: Alan Liu
   9  * Created: September 2 2003
  10  * Since: ICU 2.8
  11  **********************************************************************
  12  */
  13
  14 #ifndef GREGOIMP_H
  15 #define GREGOIMP_H
  16 #include "unicode/utypes.h"
  17 #if !UCONFIG_NO_FORMATTING
  18
  19 #include "unicode/ures.h"
  20 #include "unicode/locid.h"
  21 #include "putilimp.h"
  22
  23 U_NAMESPACE_BEGIN
  24
  25 /**
  26  * A utility class providing mathematical functions used by time zone
  27  * and calendar code.  Do not instantiate.  Formerly just named 'Math'.
  28  * @internal
  29  */
  30 class ClockMath {
  31  public:
  32     /**
  33      * Divide two integers, returning the floor of the quotient.
  34      * Unlike the built-in division, this is mathematically
  35      * well-behaved.  E.g., <code>-1/4</code> => 0 but
  36      * <code>floorDivide(-1,4)</code> => -1.
  37      * @param numerator the numerator
  38      * @param denominator a divisor which must be != 0
  39      * @return the floor of the quotient
  40      */
  41     static int32_t floorDivide(int32_t numerator, int32_t denominator);
  42
  43     /**
  44      * Divide two integers, returning the floor of the quotient.
  45      * Unlike the built-in division, this is mathematically
  46      * well-behaved.  E.g., <code>-1/4</code> => 0 but
  47      * <code>floorDivide(-1,4)</code> => -1.
  48      * @param numerator the numerator
  49      * @param denominator a divisor which must be != 0
  50      * @return the floor of the quotient
  51      */
  52     static int64_t floorDivide(int64_t numerator, int64_t denominator);
  53
  54     /**
  55      * Divide two numbers, returning the floor of the quotient.
  56      * Unlike the built-in division, this is mathematically
  57      * well-behaved.  E.g., <code>-1/4</code> => 0 but
  58      * <code>floorDivide(-1,4)</code> => -1.
  59      * @param numerator the numerator
  60      * @param denominator a divisor which must be != 0
  61      * @return the floor of the quotient
  62      */
  63     static inline double floorDivide(double numerator, double denominator);
  64
  65     /**
  66      * Divide two numbers, returning the floor of the quotient and
  67      * the modulus remainder.  Unlike the built-in division, this is
  68      * mathematically well-behaved.  E.g., <code>-1/4</code> => 0 and
  69      * <code>-1%4</code> => -1, but <code>floorDivide(-1,4)</code> =>
  70      * -1 with <code>remainder</code> => 3.  NOTE: If numerator is
  71      * too large, the returned quotient may overflow.
  72      * @param numerator the numerator
  73      * @param denominator a divisor which must be != 0
  74      * @param remainder output parameter to receive the
  75      * remainder. Unlike <code>numerator % denominator</code>, this
  76      * will always be non-negative, in the half-open range <code>[0,
  77      * |denominator|)</code>.
  78      * @return the floor of the quotient
  79      */
  80     static int32_t floorDivide(double numerator, int32_t denominator,
  81                                int32_t& remainder);
  82
  83     /**
  84      * For a positive divisor, return the quotient and remainder
  85      * such that dividend = quotient*divisor + remainder and
  86      * 0 <= remainder < divisor.
  87      *
  88      * Works around edge-case bugs.  Handles pathological input
  89      * (divident >> divisor) reasonably.
  90      *
  91      * Calling with a divisor <= 0 is disallowed.
  92      */
  93     static double floorDivide(double dividend, double divisor,
  94                               double& remainder);
  95 };
  96
  97 // Useful millisecond constants
  98 #define kOneDay    (1.0 * U_MILLIS_PER_DAY)       //  86,400,000
  99 #define kOneHour   (60*60*1000)
 100 #define kOneMinute 60000
 101 #define kOneSecond 1000
 102 #define kOneMillisecond  1
 103 #define kOneWeek   (7.0 * kOneDay) // 604,800,000
 104
 105 // Epoch constants
 106 #define kJan1_1JulianDay  1721426 // January 1, year 1 (Gregorian)
 107
 108 #define kEpochStartAsJulianDay  2440588 // January 1, 1970 (Gregorian)
 109
 110 #define kEpochYear              1970
 111
 112
 113 #define kEarliestViableMillis  -185331720384000000.0  // minimum representable by julian day  -1e17
 114
 115 #define kLatestViableMillis     185753453990400000.0  // max representable by julian day      +1e17
 116
 117 /**
 118  * The minimum supported Julian day.  This value is equivalent to
 119  * MIN_MILLIS.
 120  */
 121 #define MIN_JULIAN (-0x7F000000)
 122
 123 /**
 124  * The minimum supported epoch milliseconds.  This value is equivalent
 125  * to MIN_JULIAN.
 126  */
 127 #define MIN_MILLIS ((MIN_JULIAN - kEpochStartAsJulianDay) * kOneDay)
 128
 129 /**
 130  * The maximum supported Julian day.  This value is equivalent to
 131  * MAX_MILLIS.
 132  */
 133 #define MAX_JULIAN (+0x7F000000)
 134
 135 /**
 136  * The maximum supported epoch milliseconds.  This value is equivalent
 137  * to MAX_JULIAN.
 138  */
 139 #define MAX_MILLIS ((MAX_JULIAN - kEpochStartAsJulianDay) * kOneDay)
 140
 141 /**
 142  * A utility class providing proleptic Gregorian calendar functions
 143  * used by time zone and calendar code.  Do not instantiate.
 144  *
 145  * Note:  Unlike GregorianCalendar, all computations performed by this
 146  * class occur in the pure proleptic GregorianCalendar.
 147  */
 148 class Grego {
 149  public:
 150     /**
 151      * Return TRUE if the given year is a leap year.
 152      * @param year Gregorian year, with 0 == 1 BCE, -1 == 2 BCE, etc.
 153      * @return TRUE if the year is a leap year
 154      */
 155     static inline UBool isLeapYear(int32_t year);
 156
 157     /**
 158      * Return the number of days in the given month.
 159      * @param year Gregorian year, with 0 == 1 BCE, -1 == 2 BCE, etc.
 160      * @param month 0-based month, with 0==Jan
 161      * @return the number of days in the given month
 162      */
 163     static inline int8_t monthLength(int32_t year, int32_t month);
 164
 165     /**
 166      * Return the length of a previous month of the Gregorian calendar.
 167      * @param y the extended year
 168      * @param m the 0-based month number
 169      * @return the number of days in the month previous to the given month
 170      */
 171     static inline int8_t previousMonthLength(int y, int m);
 172
 173     /**
 174      * Convert a year, month, and day-of-month, given in the proleptic
 175      * Gregorian calendar, to 1970 epoch days.
 176      * @param year Gregorian year, with 0 == 1 BCE, -1 == 2 BCE, etc.
 177      * @param month 0-based month, with 0==Jan
 178      * @param dom 1-based day of month
 179      * @return the day number, with day 0 == Jan 1 1970
 180      */
 181     static double fieldsToDay(int32_t year, int32_t month, int32_t dom);
 182
 183     /**
 184      * Convert a 1970-epoch day number to proleptic Gregorian year,
 185      * month, day-of-month, and day-of-week.
 186      * @param day 1970-epoch day (integral value)
 187      * @param year output parameter to receive year
 188      * @param month output parameter to receive month (0-based, 0==Jan)
 189      * @param dom output parameter to receive day-of-month (1-based)
 190      * @param dow output parameter to receive day-of-week (1-based, 1==Sun)
 191      * @param doy output parameter to receive day-of-year (1-based)
 192      */
 193     static void dayToFields(double day, int32_t& year, int32_t& month,
 194                             int32_t& dom, int32_t& dow, int32_t& doy);
 195
 196     /**
 197      * Convert a 1970-epoch day number to proleptic Gregorian year,
 198      * month, day-of-month, and day-of-week.
 199      * @param day 1970-epoch day (integral value)
 200      * @param year output parameter to receive year
 201      * @param month output parameter to receive month (0-based, 0==Jan)
 202      * @param dom output parameter to receive day-of-month (1-based)
 203      * @param dow output parameter to receive day-of-week (1-based, 1==Sun)
 204      */
 205     static inline void dayToFields(double day, int32_t& year, int32_t& month,
 206                                    int32_t& dom, int32_t& dow);
 207
 208     /**
 209      * Convert a 1970-epoch milliseconds to proleptic Gregorian year,
 210      * month, day-of-month, and day-of-week, day of year and millis-in-day.
 211      * @param time 1970-epoch milliseconds
 212      * @param year output parameter to receive year
 213      * @param month output parameter to receive month (0-based, 0==Jan)
 214      * @param dom output parameter to receive day-of-month (1-based)
 215      * @param dow output parameter to receive day-of-week (1-based, 1==Sun)
 216      * @param doy output parameter to receive day-of-year (1-based)
 217      * @param mid output parameter to recieve millis-in-day
 218      */
 219     static void timeToFields(UDate time, int32_t& year, int32_t& month,
 220                             int32_t& dom, int32_t& dow, int32_t& doy, int32_t& mid);
 221
 222     /**
 223      * Return the day of week on the 1970-epoch day
 224      * @param day the 1970-epoch day (integral value)
 225      * @return the day of week
 226      */
 227     static int32_t dayOfWeek(double day);
 228
 229     /**
 230      * Returns the ordinal number for the specified day of week within the month.
 231      * The valid return value is 1, 2, 3, 4 or -1.
 232      * @param year Gregorian year, with 0 == 1 BCE, -1 == 2 BCE, etc.
 233      * @param month 0-based month, with 0==Jan
 234      * @param dom 1-based day of month
 235      * @return The ordinal number for the specified day of week within the month
 236      */
 237     static int32_t dayOfWeekInMonth(int32_t year, int32_t month, int32_t dom);
 238
 239     /**
 240      * Converts Julian day to time as milliseconds.
 241      * @param julian the given Julian day number.
 242      * @return time as milliseconds.
 243      * @internal
 244      */
 245     static inline double julianDayToMillis(int32_t julian);
 246
 247     /**
 248      * Converts time as milliseconds to Julian day.
 249      * @param millis the given milliseconds.
 250      * @return the Julian day number.
 251      * @internal
 252      */
 253     static inline int32_t millisToJulianDay(double millis);
 254
 255     /**
 256      * Calculates the Gregorian day shift value for an extended year.
 257      * @param eyear Extended year
 258      * @returns number of days to ADD to Julian in order to convert from J->G
 259      */
 260     static inline int32_t gregorianShift(int32_t eyear);
 261
 262  private:
 263     static const int16_t DAYS_BEFORE[24];
 264     static const int8_t MONTH_LENGTH[24];
 265 };
 266
 267 inline double ClockMath::floorDivide(double numerator, double denominator) {
 268     return uprv_floor(numerator / denominator);
 269 }
 270
 271 inline UBool Grego::isLeapYear(int32_t year) {
 272     // year&0x3 == year%4
 273     return ((year&0x3) == 0) && ((year%100 != 0) || (year%400 == 0));
 274 }
 275
 276 inline int8_t
 277 Grego::monthLength(int32_t year, int32_t month) {
 278     return MONTH_LENGTH[month + (isLeapYear(year) ? 12 : 0)];
 279 }
 280
 281 inline int8_t
 282 Grego::previousMonthLength(int y, int m) {
 283   return (m > 0) ? monthLength(y, m-1) : 31;
 284 }
 285
 286 inline void Grego::dayToFields(double day, int32_t& year, int32_t& month,
 287                                int32_t& dom, int32_t& dow) {
 288   int32_t doy_unused;
 289   dayToFields(day,year,month,dom,dow,doy_unused);
 290 }
 291
 292 inline double Grego::julianDayToMillis(int32_t julian)
 293 {
 294   return (julian - kEpochStartAsJulianDay) * kOneDay;
 295 }
 296
 297 inline int32_t Grego::millisToJulianDay(double millis) {
 298   return (int32_t) (kEpochStartAsJulianDay + ClockMath::floorDivide(millis, (double)kOneDay));
 299 }
 300
 301 inline int32_t Grego::gregorianShift(int32_t eyear) {
 302   int64_t y = (int64_t)eyear-1;
 303   int32_t gregShift = static_cast<int32_t>(ClockMath::floorDivide(y, (int64_t)400) - ClockMath::floorDivide(y, (int64_t)100) + 2);
 304   return gregShift;
 305 }
 306
 307 U_NAMESPACE_END
 308
 309 #endif // !UCONFIG_NO_FORMATTING
 310 #endif // GREGOIMP_H
 311
 312 //eof