You are here

public function DateRepeatTestCase::testDateRepeat in Date 7.3

Same name and namespace in other branches
  1. 6.2 tests/date_repeat.test \DateRepeatTestCase::testDateRepeat()
  2. 7 date_repeat/tests/date_repeat.test \DateRepeatTestCase::testDateRepeat()
  3. 7.2 date_repeat/tests/date_repeat.test \DateRepeatTestCase::testDateRepeat()

Test date_repeat functions.

File

date_repeat/tests/date_repeat.test, line 41
Test Date Repeat calculations.

Class

DateRepeatTestCase
Test date repeat functions.

Code

public function testDateRepeat() {

  // Examples adapted from https://www.faqs.org/rfcs/rfc2445.html and
  // https://www.kanzaki.com/docs/ical/rrule.html.
  // Invalid value:
  $start = "1997-09-02 09:00:00";
  $end = "1997-09-30 09:00:00";
  $rule = "RRULE:FREQ=NONE;INTERVAL=0;COUNT=10";
  $dates = date_repeat_calc($rule, $start, $end, array());

  // Should be (1997 9:00 AM EDT)September 2-11.
  $shouldbe = '';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Daily for 10 occurrences:
  $start = "1997-09-02 09:00:00";
  $end = "1997-09-30 09:00:00";
  $rule = "RRULE:FREQ=DAILY;COUNT=10";
  $dates = date_repeat_calc($rule, $start, $end, array());

  // Should be (1997 9:00 AM EDT)September 2-11.
  $shouldbe = '1997-09-02 09:00:00, 1997-09-03 09:00:00, 1997-09-04 09:00:00, 1997-09-05 09:00:00, 1997-09-06 09:00:00, 1997-09-07 09:00:00, 1997-09-08 09:00:00, 1997-09-09 09:00:00, 1997-09-10 09:00:00, 1997-09-11 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Daily until September 24, 1997:
  $start = "1997-09-02 09:00:00";
  $end = "1997-09-30 09:00:00";
  $rule = "RRULE:FREQ=DAILY;UNTIL=19970924T000000Z";
  $dates = date_repeat_calc($rule, $start, $end, array());

  // Should be (1997 9:00 AM EDT)September 2-23.
  $shouldbe = '1997-09-02 09:00:00, 1997-09-03 09:00:00, 1997-09-04 09:00:00, 1997-09-05 09:00:00, 1997-09-06 09:00:00, 1997-09-07 09:00:00, 1997-09-08 09:00:00, 1997-09-09 09:00:00, 1997-09-10 09:00:00, 1997-09-11 09:00:00, 1997-09-12 09:00:00, 1997-09-13 09:00:00, 1997-09-14 09:00:00, 1997-09-15 09:00:00, 1997-09-16 09:00:00, 1997-09-17 09:00:00, 1997-09-18 09:00:00, 1997-09-19 09:00:00, 1997-09-20 09:00:00, 1997-09-21 09:00:00, 1997-09-22 09:00:00, 1997-09-23 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Every other day - until September 30:
  $start = "1997-09-02 09:00:00";
  $end = "1997-09-30 09:00:00";
  $rule = "RRULE:FREQ=DAILY;INTERVAL=2";
  $dates = date_repeat_calc($rule, $start, $end, array());

  // Should be (1997 9:00 AM EDT)September2,4,6,8...24,26,28,30.
  $shouldbe = '1997-09-02 09:00:00, 1997-09-04 09:00:00, 1997-09-06 09:00:00, 1997-09-08 09:00:00, 1997-09-10 09:00:00, 1997-09-12 09:00:00, 1997-09-14 09:00:00, 1997-09-16 09:00:00, 1997-09-18 09:00:00, 1997-09-20 09:00:00, 1997-09-22 09:00:00, 1997-09-24 09:00:00, 1997-09-26 09:00:00, 1997-09-28 09:00:00, 1997-09-30 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Every 10 days, 2 occurrences:
  $start = "1997-09-02 09:00:00";
  $end = "1997-09-30 09:00:00";
  $rule = "RRULE:FREQ=DAILY;INTERVAL=10;COUNT=2";
  $dates = date_repeat_calc($rule, $start, $end, array());

  // Should be (1997 9:00 AM EDT)September 2,12.
  $shouldbe = '1997-09-02 09:00:00, 1997-09-12 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Weekly for 3 occurrences.
  $start = "1997-09-02 09:00:00";
  $end = "1997-09-30 09:00:00";
  $rule = "RRULE:FREQ=WEEKLY;COUNT=3";
  $dates = date_repeat_calc($rule, $start, $end, array());

  // Should be (1997 9:00 AM EDT)September 2,9,16.
  $shouldbe = '1997-09-02 09:00:00, 1997-09-09 09:00:00, 1997-09-16 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Weekly until September 24, 1997.
  $start = "1997-09-02 09:00:00";
  $end = "1997-09-30 09:00:00";
  $rule = "RRULE:FREQ=WEEKLY;UNTIL=19970924T000000Z";

  // ==> (1997 9:00 AM EDT)September 2,9,16,23.
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-09-02 09:00:00, 1997-09-09 09:00:00, 1997-09-16 09:00:00, 1997-09-23 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Every other week - forever:
  $start = "1997-09-02 09:00:00";
  $end = "1997-09-30 09:00:00";
  $rule = "RRULE:FREQ=WEEKLY;INTERVAL=2;WKST=SU";

  // Should be (1997 9:00 AM EDT)September 2,16,30.
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-09-02 09:00:00, 1997-09-16 09:00:00, 1997-09-30 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Weekly on Tuesday and Thursday for 4 weeks:
  $start = "1997-09-02 09:00:00";
  $end = "1997-09-30 09:00:00";
  $rule = "RRULE:FREQ=WEEKLY;COUNT=8;WKST=SU;BYDAY=TU,TH";

  // Should be(1997 9:00 AM EDT)September 2,4,9,11,16,18,23,25.
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-09-02 09:00:00, 1997-09-04 09:00:00, 1997-09-09 09:00:00, 1997-09-11 09:00:00, 1997-09-16 09:00:00, 1997-09-18 09:00:00, 1997-09-23 09:00:00, 1997-09-25 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Every other week on Tuesday and Thursday, for 5 occurrences:
  $start = "1997-09-02 09:00:00";
  $end = "1997-09-30 09:00:00";
  $rule = "RRULE:FREQ=WEEKLY;INTERVAL=2;COUNT=5;WKST=SU;BYDAY=TU,TH";

  // Should be  (1997 9:00 AM EDT)September 2,4,16,18,30.
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-09-02 09:00:00, 1997-09-04 09:00:00, 1997-09-16 09:00:00, 1997-09-18 09:00:00, 1997-09-30 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Every other week on Monday, Wednesday and Friday until
  // September 24, 1997.
  $start = "1997-09-02 09:00:00";
  $end = "1997-09-30 09:00:00";
  $rule = "RRULE:FREQ=WEEKLY;INTERVAL=2;UNTIL=19970924T000000Z;WKST=SU;BYDAY=MO,WE,FR";

  // Should be (1997 9:00 AM EDT)September 2,3,5,15,17,19.
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-09-02 09:00:00, 1997-09-03 09:00:00, 1997-09-05 09:00:00, 1997-09-15 09:00:00, 1997-09-17 09:00:00, 1997-09-19 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Monthly on the 1st Friday for 2 occurrences:
  $start = "1997-09-05 09:00:00";
  $end = "1997-10-31 09:00:00";
  $rule = "RRULE:FREQ=MONTHLY;COUNT=2;BYDAY=1FR";

  // Should be (1997 9:00 AM EDT)September 5;October 3.
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-09-05 09:00:00, 1997-10-03 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Monthly on the 1st Friday until December 24, 1997:
  $start = "1997-09-05 09:00:00";
  $end = "1998-10-01 09:00:00";
  $rule = "RRULE:FREQ=MONTHLY;UNTIL=19971224T000000Z;BYDAY=1FR";
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-09-05 09:00:00, 1997-10-03 09:00:00, 1997-11-07 09:00:00, 1997-12-05 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Every other month on the 1st and last Sunday of the month for 10
  // occurrences:
  $start = "1997-09-07 09:00:00";
  $end = "1998-10-01 09:00:00";
  $rule = "RRULE:FREQ=MONTHLY;INTERVAL=2;COUNT=10;BYDAY=1SU,-1SU";

  // ==> (1997 9:00 AM EDT)September 7,28
  // (1997 9:00 AM EST)November 2,30
  // (1998 9:00 AM EST)January 4,25;March 1,29
  // (1998 9:00 AM EDT)May 3,31
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-09-07 09:00:00, 1997-09-28 09:00:00, 1997-11-02 09:00:00, 1997-11-30 09:00:00, 1998-01-04 09:00:00, 1998-01-25 09:00:00, 1998-03-01 09:00:00, 1998-03-29 09:00:00, 1998-05-03 09:00:00, 1998-05-31 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Monthly on the second to last Monday of the month for 6 months:
  $start = "1997-09-22 09:00:00";
  $end = "1998-10-01 09:00:00";
  $rule = "RRULE:FREQ=MONTHLY;COUNT=6;BYDAY=-2MO";

  // ==> (1997 9:00 AM EDT)September 22;October 20
  // (1997 9:00 AM EST)November 17;December 22
  // (1998 9:00 AM EST)January 19;February 16
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-09-22 09:00:00, 1997-10-20 09:00:00, 1997-11-17 09:00:00, 1997-12-22 09:00:00, 1998-01-19 09:00:00, 1998-02-16 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Every Tuesday, every other month:
  $start = "1997-09-02 09:00:00";
  $end = "1998-02-01 09:00:00";
  $rule = "RRULE:FREQ=MONTHLY;INTERVAL=2;BYDAY=TU";

  // ==> (1997 9:00 AM EDT)September 2,9,16,23,30
  // (1997 9:00 AM EST)November 4,11,18,25
  // (1998 9:00 AM EST)January 6,13,20,27;March 3,10,17,24,31
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-09-02 09:00:00, 1997-09-09 09:00:00, 1997-09-16 09:00:00, 1997-09-23 09:00:00, 1997-09-30 09:00:00, 1997-11-04 09:00:00, 1997-11-11 09:00:00, 1997-11-18 09:00:00, 1997-11-25 09:00:00, 1998-01-06 09:00:00, 1998-01-13 09:00:00, 1998-01-20 09:00:00, 1998-01-27 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Yearly in June and July for 10 occurrences:
  $start = "1997-06-10 09:00:00";
  $end = "2002-01-01 09:00:00";
  $rule = "RRULE:FREQ=YEARLY;COUNT=10;BYMONTH=6,7";

  // @code
  // ==> (1997 9:00 AM EDT)June 10;July 10
  // (1998 9:00 AM EDT)June 10;July 10
  // (1999 9:00 AM EDT)June 10;July 10
  // (2000 9:00 AM EDT)June 10;July 10
  // (2001 9:00 AM EDT)June 10;July 10
  // @endcode
  // Note: Since none of the BYDAY, BYMONTHDAY or BYYEARDAY components
  // are specified, the day is gotten from DTSTART.
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-06-10 09:00:00, 1997-07-10 09:00:00, 1998-06-10 09:00:00, 1998-07-10 09:00:00, 1999-06-10 09:00:00, 1999-07-10 09:00:00, 2000-06-10 09:00:00, 2000-07-10 09:00:00, 2001-06-10 09:00:00, 2001-07-10 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Every other year on January, February, and March for 10 occurrences:
  $start = "1997-03-10 09:00:00";
  $end = "2004-01-01 09:00:00";
  $rule = "RRULE:FREQ=YEARLY;INTERVAL=2;COUNT=10;BYMONTH=1,2,3";

  // @code
  // ==> (1997 9:00 AM EST)March 10
  // (1999 9:00 AM EST)January 10;February 10;March 10
  // (2001 9:00 AM EST)January 10;February 10;March 10
  // (2003 9:00 AM EST)January 10;February 10;March 10
  // @endcode
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-03-10 09:00:00, 1999-01-10 09:00:00, 1999-02-10 09:00:00, 1999-03-10 09:00:00, 2001-01-10 09:00:00, 2001-02-10 09:00:00, 2001-03-10 09:00:00, 2003-01-10 09:00:00, 2003-02-10 09:00:00, 2003-03-10 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // An example where the days generated makes a difference because of WKST:
  $start = "1997-08-05 09:00:00";
  $end = "2004-01-01 09:00:00";
  $rule = "RRULE:FREQ=WEEKLY;INTERVAL=2;COUNT=4;BYDAY=TU,SU;WKST=MO";

  // ==> (1997 EDT)Aug 5,10,19,24
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-08-05 09:00:00, 1997-08-10 09:00:00, 1997-08-19 09:00:00, 1997-08-24 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Changing only WKST from MO to SU, yields different results...
  $start = "1997-08-05 09:00:00";
  $end = "2004-01-01 09:00:00";
  $rule = "RRULE:FREQ=WEEKLY;INTERVAL=2;COUNT=4;BYDAY=TU,SU;WKST=SU";

  // Result:
  // @code
  // 1997 EDT August 5,17,19,31;
  // @endcode
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-08-05 09:00:00, 1997-08-17 09:00:00, 1997-08-19 09:00:00, 1997-08-31 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Every 18 months on the 10th thru 15th of the month for 10 occurrences:
  $start = "1997-09-10 09:00:00";
  $end = "2004-01-01 09:00:00";
  $rule = "RRULE:FREQ=MONTHLY;INTERVAL=18;COUNT=10;BYMONTHDAY=10,11,12,13,14,15";

  // ==> (1997 9:00 AM EDT)September 10,11,12,13,14,15
  // (1999 9:00 AM EST)March 10,11,12,13
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-09-10 09:00:00, 1997-09-11 09:00:00, 1997-09-12 09:00:00, 1997-09-13 09:00:00, 1997-09-14 09:00:00, 1997-09-15 09:00:00, 1999-03-10 09:00:00, 1999-03-11 09:00:00, 1999-03-12 09:00:00, 1999-03-13 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Monthly on the third to the last day of the month, forever:
  $start = "1997-09-28 09:00:00";
  $end = "1998-03-01 09:00:00";
  $rule = "RRULE:FREQ=MONTHLY;BYMONTHDAY=-3";

  // ==> (1997 9:00 AM EDT)September 28
  // (1997 9:00 AM EST)October 29;November 28;December 29
  // (1998 9:00 AM EST)January 29;February 26
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-09-28 09:00:00, 1997-10-29 09:00:00, 1997-11-28 09:00:00, 1997-12-29 09:00:00, 1998-01-29 09:00:00, 1998-02-26 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Every Thursday in March, forever:
  // ==> (1997 9:00 AM EST)March 13,20,27
  // (1998 9:00 AM EST)March 5,12,19,26
  // (1999 9:00 AM EST)March 4,11,18,25.
  $start = "1997-03-13 09:00:00";
  $end = "1999-03-31 09:00:00";
  $rule = "RRULE:FREQ=YEARLY;BYMONTH=3;BYDAY=TH";
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-03-13 09:00:00, 1997-03-20 09:00:00, 1997-03-27 09:00:00, 1998-03-05 09:00:00, 1998-03-12 09:00:00, 1998-03-19 09:00:00, 1998-03-26 09:00:00, 1999-03-04 09:00:00, 1999-03-11 09:00:00, 1999-03-18 09:00:00, 1999-03-25 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Every Thursday, but only during June, July, and August, forever:
  // (1997 9:00 AM EDT)June 5,12,19,26;July 3,10,17,24,31;August 7,14,21,28
  // (1998 9:00 AM EDT)June 4,11,18,25;July 2,9,16,23,30;August 6,13,20,27
  // (1999 9:00 AM EDT)June 3,10,17,24;July 1,8,15,22,29;August 5,12,19,26.
  $start = "1997-06-05 09:00:00";
  $end = "1999-08-31 09:00:00";
  $rule = "RRULE:FREQ=YEARLY;BYDAY=TH;BYMONTH=6,7,8";
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-06-05 09:00:00, 1997-06-12 09:00:00, 1997-06-19 09:00:00, 1997-06-26 09:00:00, 1997-07-03 09:00:00, 1997-07-10 09:00:00, 1997-07-17 09:00:00, 1997-07-24 09:00:00, 1997-07-31 09:00:00, 1997-08-07 09:00:00, 1997-08-14 09:00:00, 1997-08-21 09:00:00, 1997-08-28 09:00:00, 1998-06-04 09:00:00, 1998-06-11 09:00:00, 1998-06-18 09:00:00, 1998-06-25 09:00:00, 1998-07-02 09:00:00, 1998-07-09 09:00:00, 1998-07-16 09:00:00, 1998-07-23 09:00:00, 1998-07-30 09:00:00, 1998-08-06 09:00:00, 1998-08-13 09:00:00, 1998-08-20 09:00:00, 1998-08-27 09:00:00, 1999-06-03 09:00:00, 1999-06-10 09:00:00, 1999-06-17 09:00:00, 1999-06-24 09:00:00, 1999-07-01 09:00:00, 1999-07-08 09:00:00, 1999-07-15 09:00:00, 1999-07-22 09:00:00, 1999-07-29 09:00:00, 1999-08-05 09:00:00, 1999-08-12 09:00:00, 1999-08-19 09:00:00, 1999-08-26 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Monthly on the 2nd and 15th of the month for 10 occurrences:
  // ==> (1997 9:00 AM EDT)September 2,15;October 2,15
  // (1997 9:00 AM EST)November 2,15;December 2,15
  // (1998 9:00 AM EST)January 2,15.
  $start = "1997-09-02 09:00:00";
  $end = "1998-01-31 09:00:00";
  $rule = "RRULE:FREQ=MONTHLY;COUNT=10;BYMONTHDAY=2,15";
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-09-02 09:00:00, 1997-09-15 09:00:00, 1997-10-02 09:00:00, 1997-10-15 09:00:00, 1997-11-02 09:00:00, 1997-11-15 09:00:00, 1997-12-02 09:00:00, 1997-12-15 09:00:00, 1998-01-02 09:00:00, 1998-01-15 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Monthly on the first and last day of the month for 10 occurrences:
  // ==> (1997 9:00 AM EDT)September 30;October 1
  // (1997 9:00 AM EST)October 31;November 1,30;December 1,31
  // (1998 9:00 AM EST)January 1,31;February 1.
  $start = "1997-09-30 09:00:00";
  $end = "1998-03-31 09:00:00";
  $rule = "RRULE:FREQ=MONTHLY;COUNT=10;BYMONTHDAY=1,-1";
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-09-30 09:00:00, 1997-10-01 09:00:00, 1997-10-31 09:00:00, 1997-11-01 09:00:00, 1997-11-30 09:00:00, 1997-12-01 09:00:00, 1997-12-31 09:00:00, 1998-01-01 09:00:00, 1998-01-31 09:00:00, 1998-02-01 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Every Friday the 13th, forever:
  $rule = "EXDATE;TZID=US-Eastern:19970902T090000";

  // ==> (1998 9:00 AM EST)February 13;March 13;November 13
  // (1999 9:00 AM EDT)August 13
  // (2000 9:00 AM EDT)October 13
  $start = "1997-09-02 09:00:00";
  $end = "2000-12-31 09:00:00";
  $rule = "RRULE:FREQ=MONTHLY;BYDAY=FR;BYMONTHDAY=13";
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-09-02 09:00:00, 1998-02-13 09:00:00, 1998-03-13 09:00:00, 1998-11-13 09:00:00, 1999-08-13 09:00:00, 2000-10-13 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // The first Saturday that follows the first Sunday of the month, forever:
  // ==> (1997 9:00 AM EDT)September 13;October 11
  // (1997 9:00 AM EST)November 8;December 13
  // (1998 9:00 AM EST)January 10;February 7;March 7
  // (1998 9:00 AM EDT)April 11;May 9;June 13...
  $start = "1997-09-13 09:00:00";
  $end = "1998-06-30 09:00:00";
  $rule = "RRULE:FREQ=MONTHLY;BYDAY=SA;BYMONTHDAY=7,8,9,10,11,12,13";
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-09-13 09:00:00, 1997-10-11 09:00:00, 1997-11-08 09:00:00, 1997-12-13 09:00:00, 1998-01-10 09:00:00, 1998-02-07 09:00:00, 1998-03-07 09:00:00, 1998-04-11 09:00:00, 1998-05-09 09:00:00, 1998-06-13 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Every four years, the first Tuesday after a Monday in November,
  // forever (U.S. Presidential Election day):
  // ==> (1996 9:00 AM EST)November 5
  // (2000 9:00 AM EST)November 7
  // (2004 9:00 AM EST)November 2.
  $start = "1996-11-05 09:00:00";
  $end = "2004-11-30 09:00:00";
  $rule = "RRULE:FREQ=YEARLY;INTERVAL=4;BYMONTH=11;BYDAY=TU;BYMONTHDAY=2,3,4,5,6,7,8";
  $shouldbe = '1996-11-05 09:00:00, 2000-11-07 09:00:00, 2004-11-02 09:00:00';
  $dates = date_repeat_calc($rule, $start, $end, array());
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Every 20th Monday of the year, forever:
  $start = "1997-05-19 09:00:00";
  $end = "2000-01-01 09:00:00";
  $rule = "RRULE:FREQ=YEARLY;BYDAY=20MO";

  // ==> (1997 9:00 AM EDT)May 19
  // (1998 9:00 AM EDT)May 18
  // (1999 9:00 AM EDT)May 17
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-05-19 09:00:00, 1998-05-18 09:00:00, 1999-05-17 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Every Sunday in January, every other year, forever:
  $start = "1997-01-05 09:00:00";
  $end = "2001-02-01 09:00:00";
  $rule = 'RRULE:FREQ=YEARLY;INTERVAL=2;BYMONTH=1;BYDAY=SU';

  // ==> (1997 9:00 AM EDT)January 5,12,19,26
  // (1999 9:00 AM EDT)January 3,10,17,24,31
  // (2001 9:00 AM EDT)January 7,14,21,28
  $dates = date_repeat_calc($rule, $start, $end, array());
  $shouldbe = '1997-01-05 09:00:00, 1997-01-12 09:00:00, 1997-01-19 09:00:00, 1997-01-26 09:00:00, 1999-01-03 09:00:00, 1999-01-10 09:00:00, 1999-01-17 09:00:00, 1999-01-24 09:00:00, 1999-01-31 09:00:00, 2001-01-07 09:00:00, 2001-01-14 09:00:00, 2001-01-21 09:00:00, 2001-01-28 09:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);

  // Every Last Thursday in November, every year, five times:
  $start = "2014-11-27 00:00:00";
  $rule = 'FREQ=YEARLY;INTERVAL=1;BYDAY=-1TH;BYMONTH=11;COUNT=5;WKST=SU';

  // ==> (2014 00:00 AM EDT)November 27
  // (2015 00:00 AM EDT)November 26
  // (2016 00:00 AM EDT)November 24
  // (2017 00:00 AM EDT)November 30
  // (2018 00:00 AM EDT)November 29
  $dates = date_repeat_calc($rule, $start, NULL, array());
  $shouldbe = '2014-11-27 00:00:00, 2015-11-26 00:00:00, 2016-11-24 00:00:00, 2017-11-30 00:00:00, 2018-11-29 00:00:00';
  $result = implode(', ', $dates);
  $this
    ->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . ';  results: ' . $result);
}