// ===================================== // File : Date_tool.h // Author : Babak // // Created : January 11, 2018, 6:47 PM // Modified : January 14, 2018, 5:00 PM // ===================================== #include #include #include #include using namespace std; #pragma once class Date_tool { public: Date_tool(); string getDate(); int getYear(); int getMonth(); int getDay(); // Converts perisan date to gregorian date. void persian2gregorian(int year, int month, int day); // Converts gregorian date to persian date. void gregorian2persian(int year, int month, int day); // Returns 1 if the persian year is leap year. bool persian_isLeapYear(int year); // Returns 1 if the gregorian year is leap year. bool gregorian_isLeapYear(int year); private: time_t gregorian2julian(int year, int month, int day); time_t persian2julian(int year, int month, int day); void julian2gregorian(time_t jd); void julian2persian(time_t jd); bool gregorian_isValid(int y, int m, int d); bool persian_isValid(int y, int m, int d); void setDate(int y, int m, int d); // Changed from public to private (Why we would user set date?!) void getSystemDate(); //int year, month, day; int o_year, o_month, o_day; }; const double GREGORIAN_EPOCH = 1721425.0; const double PERSIAN_EPOCH = 1948320.0; // March 22, 622 AD = Farvardin 1, 1 Solar-Hijiri Date_tool::Date_tool() { getSystemDate(); } void Date_tool::getSystemDate() { // https://stackoverflow.com/questions/997946/how-to-get-current-time-and-date-in-c time_t t = time(0); // get time now struct tm *now = localtime(&t); o_year = now->tm_year + 1900; o_month = now->tm_mon + 1; o_day = now->tm_mday; } string Date_tool::getDate() { string str_date = std::to_string((unsigned long long)(o_month)) + "/" + std::to_string((unsigned long long)(o_day)) + "/" + std::to_string((unsigned long long)(o_year)); return str_date; } int Date_tool::getYear() { return o_year; } int Date_tool::getMonth() { return o_month; } int Date_tool::getDay() { return o_day; } void Date_tool::setDate(int y, int m, int d) { o_year = y; o_month = m; o_day = d; } void Date_tool::persian2gregorian(int year, int month, int day) { time_t pr_time = persian2julian(year, month, day); if (persian_isValid(year, month, day)) julian2gregorian(pr_time); else setDate(0, 0, 0); } void Date_tool::gregorian2persian(int year, int month, int day) { time_t pr_time = gregorian2julian(year, month, day); if (gregorian_isValid(year, month, day)) // change to persian_isValid(...) julian2persian(pr_time); else setDate(0, 0, 0); } bool Date_tool::gregorian_isLeapYear(int year) { if (year % 4 != 0) return false; else { if (year % 100 != 0) return true; else { if (year % 400 != 0) return false; else return true; } } } bool Date_tool::persian_isLeapYear(int year) { // winner (Musa Akrami method) ! ;D const double QUARTER_DAY = 0.24219858156; double testLeap = (year + 2346) * QUARTER_DAY; testLeap -= static_cast(testLeap); if (testLeap < QUARTER_DAY) return true; else return false; } bool Date_tool::gregorian_isValid(int y, int m, int d) { bool isLeap = gregorian_isLeapYear(y); int num_of_days[] = { 0, 31, (28 + isLeap), 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 }; bool year = false; bool month = false; bool day = false; if (y >= 622 && y < 10000) { year = true; if (m >= 1 && m <= 12) { month = true; if (d >= 1 && d <= num_of_days[m]) day = true; else std::cerr << "Invalid day. Day must be 1-" << num_of_days[m] << ".\n"; } else std::cerr << "Invalid month. Month must be 1-12.\n"; } else std::cerr << "Invalid year. Year must be 622-9999.\n"; return (year && month && day); } bool Date_tool::persian_isValid(int y, int m, int d) { bool isLeap = persian_isLeapYear(y); int num_of_days[] = { 0, 31, 31, 31, 31, 31, 31, 30, 30, 30, 30, 30, (29 + isLeap) }; bool year = false; bool month = false; bool day = false; if (y >= 1 && y < 10000) { year = true; if (m >= 1 && m <= 12) { month = true; if (d >= 1 && d <= num_of_days[m]) day = true; else std::cerr << "Invalid day. Day must be 1-" << num_of_days[m] << ".\n"; } else std::cerr << "Invalid month. Month must be 1-12.\n"; } else std::cerr << "Invalid year. Year must be 1-9999.\n"; return (year && month && day); } time_t Date_tool::gregorian2julian(int year, int month, int day) { int leap_adj = -2; if (month <= 2) { leap_adj = 0; } else if (gregorian_isLeapYear(year)) { leap_adj = -1; } return ((static_cast(GREGORIAN_EPOCH) - 1) + (365 * (year - 1)) + ((year - 1) / 4) + (-((year - 1) / 100)) + ((year - 1) / 400) + ((((367 * month) - 362) / 12) + leap_adj + day)); } time_t Date_tool::persian2julian(int year, int month, int day) { int epbase; double epyear; int m; int y = 473; if (year >= 0) { y = 474; } epbase = year - y; epyear = 474 + epbase % 2820; m = (month - 1) * 30 + 6; if (month <= 7) { m = (month - 1) * 31; } return (day + m + (static_cast((epyear * 682) - 110) / 2816) + static_cast(epyear - 1) * 365 + (epbase / 2820) * 1029983 + (static_cast(PERSIAN_EPOCH) - 1)); } void Date_tool::julian2gregorian(time_t jd) { double depoch = jd - GREGORIAN_EPOCH; int quadricent = static_cast(depoch / 146097); double dqc = static_cast(depoch) % 146097; int cent = static_cast(dqc / 36524); double dcent = static_cast(dqc) % 36524; int quad = static_cast(dcent / 1461); double dquad = static_cast(dcent) % 1461; int yindex = static_cast(dquad / 365); int year = (quadricent * 400) + (cent * 100) + (quad * 4) + yindex; int month = 0; int day = 0; double yearday = 0; int leap_adj = 0; if (!(cent == 4 || yindex == 4)); { year += 1; } yearday = jd - gregorian2julian(year, 1, 1); leap_adj = 2; if (jd < gregorian2julian(year, 3, 1)) { leap_adj = 0; } else if (gregorian_isLeapYear(year)) { leap_adj = 1; } month = floor((((yearday + leap_adj) * 12) + 373) / 367); day = (int)(jd - gregorian2julian(year, month, 1)) + 1; if (month == 0 && day == 30) { --year; month = 12; day = 31; } setDate(year, month, day); } void Date_tool::julian2persian(time_t jd) { int year; int month; int day; double yday; double depoch = jd - persian2julian(475, 1, 1); //int cycle = floor(depoch / 1029983); int cycle = depoch / 1029983; double cyear = static_cast(depoch) % 1029983; int aux1 = floor(cyear / 366); double aux2 = static_cast(cyear) % 366; int ycycle = (((2134 * aux1) + (2816 * aux2) + 2815) / 1028522) + aux1 + 1; if (cyear == 1029982) { ycycle = 2820; } year = ycycle + (2820 * cycle) + 474; if (year <= 0) { year -= 1; } yday = (jd - persian2julian(year, 1, 1)) + 1; month = ceil((yday - 6) / 30); if (yday <= 186) { month = ceil(yday / 31); } day = (int)(jd - persian2julian(year, month, 1)) + 1; setDate(year, month, day); } int main() { Date_tool date0; cout << "Today's date (Gregorian): " << date0.getDate() << endl; cout << "Was 1997 a leap year? " << date0.gregorian_isLeapYear(1997) << endl; date0.gregorian2persian(date0.getYear(), date0.getMonth(), date0.getDay()); cout << "Today's date (Hijri): " << date0.getDate() << endl; }

Gregorian to Solar Hijri Calendar