00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033 #include "holidayparserdriverplan_p.h"
00034 #include "holidayscannerplan_p.h"
00035 #include "holidayparserplan.hpp"
00036
00037 #include <sstream>
00038
00039 #include <QFileInfo>
00040
00041 #include <kdebug.h>
00042
00043 #include "holiday_p.h"
00044
00045 #define LAST 99999
00046 #define ANY -99999
00047 #define BEFORE -1
00048 #define AFTER 1
00049
00050 using namespace KHolidays;
00051
00052 HolidayParserDriverPlan::HolidayParserDriverPlan( const QString &planFilePath )
00053 :HolidayParserDriver( planFilePath ),
00054 m_traceParsing( false ),
00055 m_traceScanning( false )
00056 {
00057 QFile holidayFile( filePath() );
00058 if ( holidayFile.open( QIODevice::ReadOnly ) ) {
00059 m_scanData = holidayFile.readAll();
00060 holidayFile.close();
00061 }
00062 m_scanner = new HolidayScannerPlan();
00063 m_scanner->set_debug( m_traceScanning );
00064 m_parser = new HolidayParserPlan( *this );
00065 m_parser->set_debug_level( m_traceParsing );
00066 parseMetadata();
00067 }
00068
00069 HolidayParserDriverPlan::~HolidayParserDriverPlan()
00070 {
00071 delete m_parser;
00072 delete m_scanner;
00073 }
00074
00075
00076 void HolidayParserDriverPlan::error( const KHolidays::location &errorLocation, const QString &errorMessage )
00077 {
00078 Q_UNUSED( errorLocation );
00079
00080
00081 kDebug() << errorMessage;
00082 }
00083
00084 void HolidayParserDriverPlan::error( const QString &errorMessage )
00085 {
00086 kDebug() << errorMessage;
00087 }
00088
00089
00090 void HolidayParserDriverPlan::parse()
00091 {
00092
00093
00094
00095 foreach( QString calendar, KCalendarSystem::calendarSystems() ) {
00096
00097
00098
00099 setParseCalendar( calendar );
00100 setParseStartEnd();
00101
00102
00103 for ( m_parseYear = m_parseStartYear; m_parseYear <= m_parseEndYear; ++m_parseYear ) {
00104
00105 m_parseCalendar->setDate( m_parseYearStart, m_parseYear, 1, 1 );
00106 m_parseYearEaster = easter( m_parseYear );
00107 m_parseYearPascha = pascha( m_parseYear );
00108
00109 std::istringstream iss2( std::string( m_scanData.data() ) );
00110 m_scanner->yyrestart( &iss2 );
00111
00112 m_parser->parse();
00113 }
00114
00115 }
00116 }
00117
00118 void HolidayParserDriverPlan::parseMetadata()
00119 {
00120 m_fileCountryCode.clear();
00121 m_fileLanguageCode.clear();
00122 m_fileName.clear();
00123 m_fileDescription.clear();
00124
00125
00126 setParseCalendar( "gregorian" );
00127 m_parseYear = QDate::currentDate().year();
00128 std::istringstream iss2( std::string( m_scanData.data() ) );
00129 m_scanner->yyrestart( &iss2 );
00130 m_parser->parse();
00131 m_resultList.clear();
00132
00133
00134
00135
00136 QFileInfo file( m_filePath );
00137 if ( file.exists() ) {
00138 QStringList metadata = file.fileName().split('_');
00139 if ( metadata[0] == "holiday" && metadata.count() > 2 ) {
00140 if ( m_fileCountryCode.isEmpty() ) {
00141 setFileCountryCode( metadata[1].toUpper() );
00142 }
00143 if ( m_fileLanguageCode.isEmpty() ) {
00144 QStringList language = metadata[2].split('-');
00145 m_fileLanguageCode = language[0];
00146 if ( language.count() > 1 ) {
00147 setFileLanguageCode( language[0].append( '_' ).append( language[1].toUpper() ) );
00148 } else {
00149 setFileLanguageCode( language[0] );
00150 }
00151 }
00152 if ( m_fileLanguageCode.isEmpty() && metadata.count() > 3 ) {
00153 m_fileName = metadata[3];
00154 }
00155 }
00156 }
00157
00158
00159 }
00160
00161 QString HolidayParserDriverPlan::filePath()
00162 {
00163 return m_filePath;
00164 }
00165
00166
00167
00168
00169
00170
00171
00172 int HolidayParserDriverPlan::adjustedMonthNumber( int month )
00173 {
00174 if ( m_eventCalendarType != "hebrew" ||
00175 m_parseCalendar->calendarType() != "hebrew" ||
00176 !m_parseCalendar->isLeapYear( m_parseYear ) ||
00177 month < 6 ) {
00178 return month;
00179 }
00180
00181 if ( month == 13 ) {
00182 return 6;
00183 }
00184
00185 if ( month == 14 ) {
00186 return 7;
00187 }
00188
00189 return month + 1;
00190 }
00191
00192 bool HolidayParserDriverPlan::isLeapYear( int year )
00193 {
00194 return m_parseCalendar->isLeapYear( year );
00195 }
00196
00197 int HolidayParserDriverPlan::parseYear()
00198 {
00199 return m_parseYear;
00200 }
00201
00202 int HolidayParserDriverPlan::monthsInYear( int year )
00203 {
00204 QDate tempDate;
00205 m_parseCalendar->setDate( tempDate, year, 1, 1 );
00206 return m_parseCalendar->monthsInYear( tempDate );
00207 }
00208
00209 int HolidayParserDriverPlan::daysInMonth( int year, int month )
00210 {
00211 QDate tempDate;
00212 m_parseCalendar->setDate( tempDate, year, month, 1 );
00213 return m_parseCalendar->daysInMonth( tempDate );
00214 }
00215
00216 int HolidayParserDriverPlan::julianDay( int year, int month, int day )
00217 {
00218 QDate tempDate;
00219 m_parseCalendar->setDate( tempDate, year, month, day );
00220 return tempDate.toJulianDay();
00221 }
00222
00223 void HolidayParserDriverPlan::julianDayToDate( int jd, int *year, int *month, int *day )
00224 {
00225 QDate tempDate = QDate::fromJulianDay( jd );
00226
00227 if ( year ) {
00228 *year = m_parseCalendar->year( tempDate );
00229 }
00230 if ( month ) {
00231 *month = m_parseCalendar->month( tempDate );
00232 }
00233 if ( day ) {
00234 *day = m_parseCalendar->day( tempDate );
00235 }
00236 }
00237
00238 QDate HolidayParserDriverPlan::easter( int year )
00239 {
00240 if ( m_parseCalendar->calendarType() != "gregorian" ) {
00241 return QDate();
00242 }
00243
00244
00245
00246 int g = year % 19;
00247 int c = year / 100;
00248 int h = ( c - ( c / 4 ) - ( ( ( 8 * c ) - 13 ) / 25 ) + ( 19 * g ) + 15 ) % 30;
00249 int i = h - ( ( h / 28 ) * ( 1 - ( ( 29 / ( h + 1 ) ) * ( ( 21 - g ) / 11 ) ) ) );
00250 int j = ( year + ( year / 4 ) + i + 2 - c + ( c / 4 ) ) % 7;
00251 int l = i - j;
00252 int month = 3 + ( ( l + 40 ) / 44 );
00253 int day = l + 28 - ( 31 * ( month / 4 ) );
00254
00255 return QDate::fromJulianDay( julianDay( year, month, day ) );
00256 }
00257
00258
00259 QDate HolidayParserDriverPlan::pascha( int year )
00260 {
00261 if ( m_parseCalendar->calendarType() == "gregorian" ||
00262 m_parseCalendar->calendarType() == "julian" ) {
00263
00264
00265
00266 int g = year % 19;
00267 int i = ( ( 19 * g ) + 15 ) % 30;
00268 int j = ( year + ( year / 4 ) + i ) % 7;
00269 int l = i - j;
00270 int month = 3 + ( ( l + 40 ) / 44 );
00271 int day = l + 28 - ( 31 * ( month / 4 ) );
00272
00273 if ( m_parseCalendar->calendarType() == "julian" ) {
00274 return QDate::fromJulianDay( julianDay( year, month, day ) );
00275 }
00276
00277 if ( m_parseCalendar->calendarType() == "gregorian" ) {
00278 setParseCalendar( "julian" );
00279 int paschaJd = julianDay( year, month, day );
00280 setParseCalendar( "gregorian" );
00281 return QDate::fromJulianDay( paschaJd );
00282 }
00283 }
00284
00285 return QDate();
00286 }
00287
00288
00289
00290
00291
00292
00293
00294 int HolidayParserDriverPlan::julianDayFromEventName( const QString &eventName )
00295 {
00296 foreach ( const KHolidays::Holiday &thisHoliday, m_resultList ) {
00297 if ( thisHoliday.text() == eventName ) {
00298 return thisHoliday.date().toJulianDay();
00299 }
00300 }
00301 return -1;
00302 }
00303
00304
00305 int HolidayParserDriverPlan::julianDayFromEaster( void )
00306 {
00307 if ( m_eventCalendarType == "gregorian" ) {
00308 return m_parseYearEaster.toJulianDay();
00309 } else {
00310 error( "Can only use Easter in Gregorian event rule" );
00311 return -1;
00312 }
00313 }
00314
00315
00316 int HolidayParserDriverPlan::julianDayFromPascha( void )
00317 {
00318 if ( m_eventCalendarType == "gregorian" || m_eventCalendarType == "julian" ) {
00319 return m_parseYearPascha.toJulianDay();
00320 } else {
00321 error( "Can only use Easter in Gregorian or Julian event rule" );
00322 return -1;
00323 }
00324 }
00325
00326
00327 int HolidayParserDriverPlan::julianDayFromMonthDay( int month, int day ) {
00328 return julianDay( m_parseYear, month, day );
00329 }
00330
00331
00332 int HolidayParserDriverPlan::julianDayFromRelativeWeekday( int occurrence, int weekday, int jd )
00333 {
00334 if ( occurrence == ANY ) {
00335 occurrence = AFTER;
00336 }
00337
00338 int thisWeekday = m_parseCalendar->dayOfWeek( QDate::fromJulianDay( jd ) );
00339
00340
00341
00342 if ( occurrence > 0 ) {
00343 occurrence = occurrence - 1;
00344 } else if ( occurrence < 0 && weekday == thisWeekday ) {
00345 occurrence = occurrence + 1;
00346 }
00347
00348 if ( weekday < thisWeekday ) {
00349 occurrence = occurrence + 1;
00350 }
00351
00352 return jd + weekday - thisWeekday + ( occurrence * 7 );
00353 }
00354
00355
00356 int HolidayParserDriverPlan::julianDayFromWeekdayInMonth( int occurrence, int weekday, int month )
00357 {
00358 if ( occurrence == LAST ) {
00359 return julianDayFromRelativeWeekday( BEFORE, weekday, julianDay( m_parseYear, month, daysInMonth( m_parseYear, month ) ) );
00360 } else {
00361 return julianDayFromRelativeWeekday( occurrence, weekday, julianDay( m_parseYear, month, 1 ) );
00362 }
00363 }
00364
00365
00366
00367
00368
00369
00370 void HolidayParserDriverPlan::setFileCountryCode( const QString &countryCode )
00371 {
00372 m_fileCountryCode = countryCode;
00373 }
00374
00375 void HolidayParserDriverPlan::setFileLanguageCode( const QString &languageCode )
00376 {
00377 m_fileLanguageCode = languageCode;
00378 }
00379
00380 void HolidayParserDriverPlan::setFileName( const QString &name )
00381 {
00382 m_fileName = name;
00383 }
00384
00385 void HolidayParserDriverPlan::setFileDescription( const QString &description )
00386 {
00387 m_fileDescription = description;
00388 }
00389
00390 void HolidayParserDriverPlan::setEventName( const QString &eventName )
00391 {
00392 m_eventName = eventName;
00393 }
00394
00395 void HolidayParserDriverPlan::setEventColorName( int nameColor )
00396 {
00397 m_eventColorName = nameColor;
00398 }
00399
00400 void HolidayParserDriverPlan::setEventColorDay( int dayColor )
00401 {
00402 m_eventColorDay = dayColor;
00403 }
00404
00405 void HolidayParserDriverPlan::setEventCalendarType( const QString &calendarType )
00406 {
00407 m_eventCalendarType = calendarType;
00408 }
00409
00410 void HolidayParserDriverPlan::setEventDate( int eventYear, int eventMonth, int eventDay )
00411 {
00412 m_eventYear = eventYear;
00413 m_eventMonth = eventMonth;
00414 m_eventDay = eventDay;
00415 }
00416
00417 void HolidayParserDriverPlan::setEventDate( int jd )
00418 {
00419 julianDayToDate( jd, &m_eventYear, &m_eventMonth, &m_eventDay );
00420 }
00421
00422
00423
00424
00425
00426
00427
00428
00429
00430
00431
00432 void HolidayParserDriverPlan::setFromWeekdayInMonth( int occurrence, int weekday, int month, int offset, int duration )
00433 {
00434
00435 if ( m_eventCalendarType != m_parseCalendar->calendarType() ) {
00436 return;
00437 }
00438
00439 int startMonth, endMonth;
00440 if ( month == LAST ) {
00441 startMonth = monthsInYear( m_parseYear );
00442 endMonth = startMonth;
00443 } else if ( month == ANY ) {
00444 startMonth = 1;
00445 endMonth = monthsInYear( m_parseYear );
00446 } else {
00447 startMonth = month;
00448 endMonth = month;
00449 }
00450
00451
00452 for ( int thisMonth = startMonth; thisMonth <= endMonth; ++thisMonth ) {
00453
00454 if ( m_parseCalendar->isValid( m_parseYear, thisMonth, 1 ) ) {
00455 int startOccurrence, endOccurrence;
00456 if ( occurrence == ANY ) {
00457 startOccurrence = 1;
00458 endOccurrence = 5;
00459 } else {
00460 startOccurrence = occurrence;
00461 endOccurrence = occurrence;
00462 }
00463
00464 int jdMonthStart = julianDay( m_parseYear, thisMonth, 1 );
00465 int jdMonthEnd = julianDay( m_parseYear, thisMonth, daysInMonth( m_parseYear, thisMonth ) );
00466
00467
00468 for ( int thisOccurrence = startOccurrence; thisOccurrence <= endOccurrence; ++thisOccurrence ) {
00469 int thisJd = julianDayFromWeekdayInMonth( thisOccurrence, weekday, thisMonth );
00470 if ( thisJd >= jdMonthStart && thisJd <= jdMonthEnd ) {
00471 setEvent( thisJd + offset, 0, duration );
00472 }
00473 }
00474 }
00475
00476 }
00477 }
00478
00479
00480
00481
00482
00483
00484
00485 void HolidayParserDriverPlan::setFromRelativeWeekday( int occurrence, int weekday, int offset, int duration )
00486 {
00487
00488 if ( m_eventCalendarType != m_parseCalendar->calendarType() ) {
00489 return;
00490 }
00491
00492 int thisYear;
00493 if ( m_eventYear == ANY ) {
00494 thisYear = m_parseYear;
00495 } else {
00496 thisYear = m_eventYear;
00497 }
00498
00499 int startMonth, endMonth;
00500 if ( m_eventMonth == LAST ) {
00501 startMonth = monthsInYear( thisYear );
00502 endMonth = startMonth;
00503 } else if ( m_eventMonth == ANY ) {
00504 startMonth = 1;
00505 endMonth = monthsInYear( thisYear );
00506 } else {
00507 startMonth = m_eventMonth;
00508 endMonth = m_eventMonth;
00509 }
00510
00511
00512 int thisMonth;
00513 for ( thisMonth = startMonth; thisMonth <= endMonth; ++thisMonth ) {
00514
00515 int startDay, endDay;
00516 if ( m_eventDay == LAST ) {
00517 startDay = daysInMonth( thisYear, thisMonth );
00518 endDay = startDay;
00519 } else if ( m_eventDay == ANY ) {
00520 startDay = 1;
00521 endDay = daysInMonth( thisYear, thisMonth );
00522 } else {
00523 startDay = m_eventDay;
00524 endDay = m_eventDay;
00525 }
00526
00527
00528 for ( int thisDay = startDay; thisDay <= endDay; ++thisDay ) {
00529 if ( m_parseCalendar->isValid( thisYear, thisMonth, thisDay ) ) {
00530 int relativeJd = julianDayFromRelativeWeekday( occurrence, weekday, julianDay( thisYear, thisMonth, thisDay ) );
00531 setEvent( relativeJd + offset, 0, duration );
00532 }
00533 }
00534
00535 }
00536 }
00537
00538
00539 int HolidayParserDriverPlan::conditionalOffset( int year, int month, int day, int condition )
00540 {
00546 int offset = 0;
00547
00548 QDate tempDate;
00549 m_parseCalendar->setDate( tempDate, year, month, day );
00550 int weekday = m_parseCalendar->dayOfWeek( tempDate );
00551
00552 if ( condition & ( 1 << weekday ) ) {
00553
00554 int to = ( condition >> 8 );
00555 while ( !( to & ( 1 << ( ( weekday + offset ) % 7 ) ) ) && ( offset < 8 ) ) {
00556 ++offset;
00557 }
00558 }
00559
00560 if ( offset >= 8 ) {
00561 offset = 0;
00562 }
00563
00564 return offset;
00565 }
00566
00567
00568
00569
00570
00571
00572
00573 void HolidayParserDriverPlan::setFromDate( int offset, int condition, int duration )
00574 {
00575
00576 if ( m_eventCalendarType != m_parseCalendar->calendarType() ) {
00577 return;
00578 }
00579
00580 int thisYear;
00581 if ( m_eventYear == ANY ) {
00582 thisYear = m_parseYear;
00583 } else {
00584 thisYear = m_eventYear;
00585 }
00586
00587 int startMonth, endMonth;
00588 if ( m_eventMonth == LAST ) {
00589 startMonth = monthsInYear( thisYear );
00590 endMonth = startMonth;
00591 } else if ( m_eventMonth == ANY ) {
00592 startMonth = 1;
00593 endMonth = monthsInYear( thisYear );
00594 } else {
00595 startMonth = m_eventMonth;
00596 endMonth = m_eventMonth;
00597 }
00598
00599
00600 for ( int thisMonth = startMonth; thisMonth <= endMonth; ++thisMonth ) {
00601
00602 int startDay, endDay;
00603 if ( m_eventDay == LAST ) {
00604 startDay = daysInMonth( thisYear, thisMonth );
00605 endDay = startDay;
00606 } else if ( m_eventDay == ANY ) {
00607 startDay = 1;
00608 endDay = daysInMonth( thisYear, thisMonth );
00609 } else {
00610 startDay = m_eventDay;
00611 endDay = m_eventDay;
00612 }
00613
00614
00615 for ( int thisDay = startDay; thisDay <= endDay; ++thisDay ) {
00616
00617 if ( m_parseCalendar->isValid( thisYear, thisMonth, thisDay ) ) {
00618 setEvent( julianDay( thisYear, thisMonth, thisDay ) + offset,
00619 conditionalOffset( thisYear, thisMonth, thisDay, condition ), duration );
00620 }
00621
00622 }
00623
00624 }
00625 }
00626
00627
00628
00629
00630
00631
00632
00633 void HolidayParserDriverPlan::setFromEaster( int offset, int duration )
00634 {
00635
00636 if ( m_eventCalendarType != m_parseCalendar->calendarType() ) {
00637 return;
00638 }
00639
00640 if ( m_eventCalendarType == "gregorian" ) {
00641 setEvent( m_parseYearEaster.toJulianDay() + offset, 0, duration );
00642 } else {
00643 error( "Can only use Easter in Gregorian event rule" );
00644 }
00645 }
00646
00647
00648
00649
00650
00651
00652
00653 void HolidayParserDriverPlan::setFromPascha( int offset, int duration )
00654 {
00655
00656 if ( m_eventCalendarType != m_parseCalendar->calendarType() ) {
00657 return;
00658 }
00659
00660 if ( m_eventCalendarType == "gregorian" || m_eventCalendarType == "julian" ) {
00661 setEvent( m_parseYearPascha.toJulianDay(), offset, duration );
00662 } else {
00663 error( "Can only use Pascha in Julian and Gregorian event rule" );
00664 }
00665 }
00666
00667
00668 void HolidayParserDriverPlan::setEvent( int jd, int observeOffset, int duration )
00669 {
00670
00671 if ( m_eventCalendarType != m_parseCalendar->calendarType() ) {
00672 return;
00673 }
00674
00675
00676 int observeJd = jd + observeOffset;
00677
00678
00679 for ( int dd = 0; dd < duration; ++dd ) {
00680
00681
00682 if ( m_parseCalendar->isValid( QDate::fromJulianDay( observeJd + dd ) ) &&
00683 observeJd + dd >= m_requestStart.toJulianDay() &&
00684 observeJd + dd <= m_requestEnd.toJulianDay() ) {
00685
00686 KHolidays::Holiday holiday;
00687 holiday.d->mDate = QDate::fromJulianDay( observeJd + dd );
00688 holiday.d->mText = m_eventName;
00689 holiday.d->mShortText = m_eventName;
00690 if ( m_eventColorName == 2 || m_eventColorName == 9 ||
00691 m_eventColorDay == 2 || m_eventColorDay == 9 ) {
00692 holiday.d->mDayType = KHolidays::Holiday::NonWorkday;
00693 } else {
00694 holiday.d->mDayType = KHolidays::Holiday::Workday;
00695 }
00696 m_resultList.append( holiday );
00697
00698 }
00699
00700 }
00701 }