1 /*
2  * Copyright (C) 2020 Georg Zotti
3  *
4  * This program is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU General Public License
6  * as published by the Free Software Foundation; either version 2
7  * of the License, or (at your option) any later version.
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program; if not, write to the Free Software
16  * Foundation, Inc., 51 Franklin Street, Suite 500, Boston, MA  02110-1335, USA.
17  */
18 
19 #include "StelTranslator.hpp"
20 #include "ArmenianCalendar.hpp"
21 #include "JulianCalendar.hpp"
22 #include "StelUtils.hpp"
23 #include "StelApp.hpp"
24 #include "StelCore.hpp"
25 
26 const int ArmenianCalendar::armenianEpoch=JulianCalendar::fixedFromJulian({552, JulianCalendar::july, 11}); //! RD 201443.
27 
28 
ArmenianCalendar(double jd)29 ArmenianCalendar::ArmenianCalendar(double jd): EgyptianCalendar(jd)
30 {
31 	ArmenianCalendar::retranslate();
32 }
33 
34 QMap<int, QString> ArmenianCalendar::monthNames;
35 
retranslate()36 void ArmenianCalendar::retranslate()
37 {
38 	// fill the name lists with translated month and day names
39 	monthNames={
40 		{ 1, qc_("Nawasardi" , "Armenian month name")},
41 		{ 2, qc_("Hor̄i"      , "Armenian month name")},
42 		{ 3, qc_("Sahmi"     , "Armenian month name")},
43 		{ 4, qc_("Trē"       , "Armenian month name")},
44 		{ 5, qc_("K'aloch"   , "Armenian month name")},
45 		{ 6, qc_("Arach"     , "Armenian month name")},
46 		{ 7, qc_("Mehekani"  , "Armenian month name")},
47 		{ 8, qc_("Areg"      , "Armenian month name")},
48 		{ 9, qc_("Ahekani"   , "Armenian month name")},
49 		{10, qc_("Mareri"    , "Armenian month name")},
50 		{11, qc_("Margach"   , "Armenian month name")},
51 		{12, qc_("Hrotich"   , "Armenian month name")},
52 		{13, qc_("(aweleach)", "Armenian month name")}};
53 }
54 
55 // Set a calendar date from the Julian day number
setJD(double JD)56 void ArmenianCalendar::setJD(double JD)
57 {
58 	this->JD=JD;
59 
60 	int rd=fixedFromJD(JD, true);
61 	parts=armenianFromFixed(rd);
62 
63 	emit partsChanged(parts);
64 }
65 
66 // get a stringlist of calendar date elements sorted from the largest to the smallest.
67 // Year, Month, MonthName, Day
getDateStrings() const68 QStringList ArmenianCalendar::getDateStrings() const
69 {
70 	QStringList list;
71 	list << QString::number(parts.at(0));
72 	list << QString::number(parts.at(1));
73 	list << monthNames.value(parts.at(1));
74 	list << QString::number(parts.at(2));
75 
76 	return list;
77 }
78 
79 // get a formatted complete string for a date
getFormattedDateString() const80 QString ArmenianCalendar::getFormattedDateString() const
81 {
82 	QStringList str=getDateStrings();
83 	return QString("%1 - %2 (%3) - %4 %5")
84 			.arg(str.at(3)) // day
85 			.arg(str.at(1)) // month, numerical
86 			.arg(str.at(2)) // month, name
87 			.arg(str.at(0)) // year
88 			.arg(q_("Armenian Era"));// year
89 }
90 
91 // set date from a vector of calendar date elements sorted from the largest to the smallest.
92 // Year-Month[1...12]-Day[1...31]
93 // Time is not changed!
setDate(QVector<int> parts)94 void ArmenianCalendar::setDate(QVector<int> parts)
95 {
96 	this->parts=parts;
97 
98 	double rd=fixedFromArmenian(parts);
99 	// restore time from JD!
100 	double frac=StelUtils::fmodpos(JD+0.5+StelApp::getInstance().getCore()->getUTCOffset(JD)/24., 1.);
101 	JD=jdFromFixed(rd+frac, true);
102 
103 	emit jdChanged(JD);
104 }
105 
106 // actually implementation of alt-fixed-from-egyptian
fixedFromArmenian(QVector<int> armenian)107 int ArmenianCalendar::fixedFromArmenian(QVector<int> armenian)
108 {
109 	return armenianEpoch + fixedFromEgyptian(armenian)-EgyptianCalendar::egyptianEpoch;
110 }
111 
armenianFromFixed(int rd)112 QVector<int> ArmenianCalendar::armenianFromFixed(int rd)
113 {
114 	return EgyptianCalendar::egyptianFromFixed(rd+EgyptianCalendar::egyptianEpoch-armenianEpoch);
115 }
116