791 lines
30 KiB
PHP
791 lines
30 KiB
PHP
|
<?php
|
||
|
|
/**
|
||
|
|
* iCalcreator, the PHP class package managing iCal (rfc2445/rfc5445) calendar information.
|
||
|
|
*
|
||
|
|
* This file is a part of iCalcreator.
|
||
|
|
*
|
||
|
|
* @author Kjell-Inge Gustafsson, kigkonsult <ical@kigkonsult.se>
|
||
|
|
* @copyright 2007-2022 Kjell-Inge Gustafsson, kigkonsult, All rights reserved
|
||
|
|
* @link https://kigkonsult.se
|
||
|
|
* @license Subject matter of licence is the software iCalcreator.
|
||
|
|
* The above copyright, link, package and version notices,
|
||
|
|
* this licence notice and the invariant [rfc5545] PRODID result use
|
||
|
|
* as implemented and invoked in iCalcreator shall be included in
|
||
|
|
* all copies or substantial portions of the iCalcreator.
|
||
|
|
*
|
||
|
|
* iCalcreator is free software: you can redistribute it and/or modify
|
||
|
|
* it under the terms of the GNU Lesser General Public License as
|
||
|
|
* published by the Free Software Foundation, either version 3 of
|
||
|
|
* the License, or (at your option) any later version.
|
||
|
|
*
|
||
|
|
* iCalcreator is distributed in the hope that it will be useful,
|
||
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
|
|
* GNU Lesser General Public License for more details.
|
||
|
|
*
|
||
|
|
* You should have received a copy of the GNU Lesser General Public License
|
||
|
|
* along with iCalcreator. If not, see <https://www.gnu.org/licenses/>.
|
||
|
|
*/
|
||
|
|
namespace Kigkonsult\Icalcreator;
|
||
|
|
|
||
|
|
use Kigkonsult\Icalcreator\Util\DateTimeFactory;
|
||
|
|
use Kigkonsult\Icalcreator\Util\RecurFactory;
|
||
|
|
use Kigkonsult\Icalcreator\Util\RecurFactory2;
|
||
|
|
use DateTime;
|
||
|
|
use Exception;
|
||
|
|
|
||
|
|
/**
|
||
|
|
* class RecurTest, testing selectComponents
|
||
|
|
*
|
||
|
|
* @since 2.27.20 - 2019-05-20
|
||
|
|
*/
|
||
|
|
class RecurDayTest extends RecurBaseTest
|
||
|
|
{
|
||
|
|
/**
|
||
|
|
* recurDaily1Test provider
|
||
|
|
*
|
||
|
|
* @return mixed[]
|
||
|
|
* @throws Exception
|
||
|
|
*/
|
||
|
|
public function recurDaily1TestProvider() : array
|
||
|
|
{
|
||
|
|
|
||
|
|
$dataArr = [];
|
||
|
|
$dataSetNo = 0;
|
||
|
|
$DATASET = 'DATASET';
|
||
|
|
|
||
|
|
// - BYDAY, - BYMONTH, - BYDAYMONTH
|
||
|
|
$interval = 1;
|
||
|
|
for( $ix = 411; $ix <= 419; $ix++ ) {
|
||
|
|
$time = microtime( true );
|
||
|
|
$start = DateTimeFactory::factory( '20190101T0900', 'Europe/Stockholm' );
|
||
|
|
$wDate = clone $start;
|
||
|
|
$expects = [];
|
||
|
|
$count = 10;
|
||
|
|
$x = 1;
|
||
|
|
while( $x < $count ) {
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
$expects[] = $wDate->format( 'Ymd' );
|
||
|
|
++$x;
|
||
|
|
} // end while
|
||
|
|
$execTime = microtime( true ) - $time;
|
||
|
|
$dataArr[] = [
|
||
|
|
$ix . '-' . $interval,
|
||
|
|
$start,
|
||
|
|
(clone $start)->modify( RecurFactory::EXTENDYEAR . ' year' ),
|
||
|
|
[
|
||
|
|
IcalInterface::FREQ => IcalInterface::DAILY,
|
||
|
|
IcalInterface::COUNT => $count,
|
||
|
|
IcalInterface::INTERVAL => $interval,
|
||
|
|
$DATASET => $dataSetNo++
|
||
|
|
],
|
||
|
|
$expects,
|
||
|
|
$execTime,
|
||
|
|
];
|
||
|
|
$interval += 2;
|
||
|
|
} // end for
|
||
|
|
|
||
|
|
// + BYDAY, - BYMONTH, - BYDAYMONTH
|
||
|
|
$interval = 1; // NOT 7 !!
|
||
|
|
for( $ix = 421; $ix <= 429; $ix++ ) {
|
||
|
|
if( 7 === $interval ) {
|
||
|
|
++$interval;
|
||
|
|
continue;
|
||
|
|
}
|
||
|
|
$time = microtime( true );
|
||
|
|
$start = DateTimeFactory::factory( '20190101T0900', 'Europe/Stockholm' );
|
||
|
|
$wDate = clone $start;
|
||
|
|
$expects = [];
|
||
|
|
$count = 10;
|
||
|
|
$x = 1;
|
||
|
|
while( $x < $count ) {
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
if( 4 === (int) $wDate->format( 'w' )) { //TH
|
||
|
|
$expects[] = $wDate->format( 'Ymd' );
|
||
|
|
++$x;
|
||
|
|
}
|
||
|
|
} // end while
|
||
|
|
$execTime = microtime( true ) - $time;
|
||
|
|
$dataArr[] = [
|
||
|
|
$ix . '-' . $interval,
|
||
|
|
$start,
|
||
|
|
(clone $start)->modify( RecurFactory::EXTENDYEAR . ' year' ),
|
||
|
|
[
|
||
|
|
IcalInterface::FREQ => IcalInterface::DAILY,
|
||
|
|
IcalInterface::COUNT => $count,
|
||
|
|
IcalInterface::INTERVAL => $interval,
|
||
|
|
IcalInterface::BYDAY => [ IcalInterface::DAY => IcalInterface::TH ],
|
||
|
|
$DATASET => $dataSetNo++
|
||
|
|
],
|
||
|
|
$expects,
|
||
|
|
$execTime,
|
||
|
|
];
|
||
|
|
++$interval;
|
||
|
|
} // end for
|
||
|
|
|
||
|
|
// + BYDAY, - BYMONTH, - BYDAYMONTH
|
||
|
|
$interval = 1; // NOT 7 !!
|
||
|
|
for( $ix = 421; $ix <= 429; $ix++ ) { // same as above but two days
|
||
|
|
if( 7 === $interval ) {
|
||
|
|
++$interval;
|
||
|
|
continue;
|
||
|
|
}
|
||
|
|
$time = microtime( true );
|
||
|
|
$start = DateTimeFactory::factory( '20190101T0900', 'Europe/Stockholm' );
|
||
|
|
$wDate = clone $start;
|
||
|
|
$expects = [];
|
||
|
|
$count = 10;
|
||
|
|
$x = 1;
|
||
|
|
while( $x < $count ) {
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
if( in_array((int) $wDate->format( 'w' ), [ 4, 5 ] )) {
|
||
|
|
$expects[] = $wDate->format( 'Ymd' );
|
||
|
|
++$x;
|
||
|
|
}
|
||
|
|
} // end while
|
||
|
|
$execTime = microtime( true ) - $time;
|
||
|
|
$dataArr[] = [
|
||
|
|
$ix . '-2-' . $interval,
|
||
|
|
$start,
|
||
|
|
(clone $start)->modify( RecurFactory::EXTENDYEAR . ' year' ),
|
||
|
|
[
|
||
|
|
IcalInterface::FREQ => IcalInterface::DAILY,
|
||
|
|
IcalInterface::COUNT => $count,
|
||
|
|
IcalInterface::INTERVAL => $interval,
|
||
|
|
IcalInterface::BYDAY => [
|
||
|
|
[ IcalInterface::DAY => IcalInterface::TH ],
|
||
|
|
[ IcalInterface::DAY => IcalInterface::FR ],
|
||
|
|
],
|
||
|
|
$DATASET => $dataSetNo++
|
||
|
|
],
|
||
|
|
$expects,
|
||
|
|
$execTime,
|
||
|
|
];
|
||
|
|
++$interval;
|
||
|
|
} // end for
|
||
|
|
|
||
|
|
// - BYDAY, + BYMONTH, - BYDAYMONTH
|
||
|
|
$interval = 1;
|
||
|
|
$byMonth = [ 2, 4, 6 ];
|
||
|
|
for( $ix = 431; $ix <= 439; $ix++ ) {
|
||
|
|
if( 7 === $interval ) {
|
||
|
|
++$interval;
|
||
|
|
continue;
|
||
|
|
}
|
||
|
|
$time = microtime( true );
|
||
|
|
$start = DateTimeFactory::factory( '20190101T0900', 'Europe/Stockholm' );
|
||
|
|
$end = (clone $start)->modify( RecurFactory::EXTENDYEAR . ' years' );
|
||
|
|
$endYmd = $end->format( 'Ymd' );
|
||
|
|
$wDate = clone $start;
|
||
|
|
$expects = [];
|
||
|
|
$count = 20;
|
||
|
|
$x = 1;
|
||
|
|
$saveMonth = null;
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
while( $x < $count ) {
|
||
|
|
if( $endYmd < $wDate->format( 'Ymd' )) {
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
$currMonth = (int) $wDate->format( 'm' );
|
||
|
|
if( $saveMonth !== $currMonth ) {
|
||
|
|
while( ! in_array( $currMonth, $byMonth )) {
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
$currMonth = (int) $wDate->format( 'm' );
|
||
|
|
} // end while
|
||
|
|
$saveMonth = $currMonth;
|
||
|
|
}
|
||
|
|
$expects[] = $wDate->format( 'Ymd' );
|
||
|
|
++$x;
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
} // end while
|
||
|
|
$execTime = microtime( true ) - $time;
|
||
|
|
$dataArr[] = [
|
||
|
|
$ix . '-' . $interval,
|
||
|
|
$start,
|
||
|
|
$end,
|
||
|
|
[
|
||
|
|
IcalInterface::FREQ => IcalInterface::DAILY,
|
||
|
|
IcalInterface::COUNT => $count,
|
||
|
|
IcalInterface::INTERVAL => $interval,
|
||
|
|
IcalInterface::BYMONTH => $byMonth,
|
||
|
|
$DATASET => $dataSetNo++
|
||
|
|
],
|
||
|
|
$expects,
|
||
|
|
$execTime,
|
||
|
|
];
|
||
|
|
++$interval;
|
||
|
|
} // end for
|
||
|
|
|
||
|
|
// + BYDAY, + BYMONTH, - BYDAYMONTH
|
||
|
|
$interval = 1;
|
||
|
|
$byMonth = [ 2, 4, 6, 8, 10, 12 ];
|
||
|
|
for( $ix = 441; $ix <= 449; $ix++ ) {
|
||
|
|
if( 7 === $interval ) {
|
||
|
|
++$interval;
|
||
|
|
continue;
|
||
|
|
}
|
||
|
|
$time = microtime( true );
|
||
|
|
$start = DateTimeFactory::factory( '20190101T0900', 'Europe/Stockholm' );
|
||
|
|
$end = (clone $start)->modify( RecurFactory::EXTENDYEAR . ' years' );
|
||
|
|
$endYmd = $end->format( 'Ymd' );
|
||
|
|
$wDate = clone $start;
|
||
|
|
$expects = [];
|
||
|
|
$count = 10;
|
||
|
|
$x = 1;
|
||
|
|
$saveMonth = null;
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
while( $x < $count ) {
|
||
|
|
if( $endYmd < $wDate->format( 'Ymd' )) {
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
$currMonth = (int) $wDate->format( 'm' );
|
||
|
|
if( $saveMonth !== $currMonth ) {
|
||
|
|
while( ! in_array( $currMonth, $byMonth )) {
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
$currMonth = (int) $wDate->format( 'm' );
|
||
|
|
} // end while
|
||
|
|
$saveMonth = $currMonth;
|
||
|
|
}
|
||
|
|
if( 4 === (int) $wDate->format( 'w' )) { //TH
|
||
|
|
$expects[] = $wDate->format( 'Ymd' );
|
||
|
|
++$x;
|
||
|
|
}
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
} // end while
|
||
|
|
$execTime = microtime( true ) - $time;
|
||
|
|
$dataArr[] = [
|
||
|
|
$ix . '-' . $interval,
|
||
|
|
$start,
|
||
|
|
$end,
|
||
|
|
[
|
||
|
|
IcalInterface::FREQ => IcalInterface::DAILY,
|
||
|
|
IcalInterface::COUNT => $count,
|
||
|
|
IcalInterface::INTERVAL => $interval,
|
||
|
|
IcalInterface::BYMONTH => $byMonth,
|
||
|
|
IcalInterface::BYDAY => [ IcalInterface::DAY => IcalInterface::TH ],
|
||
|
|
$DATASET => $dataSetNo++
|
||
|
|
],
|
||
|
|
$expects,
|
||
|
|
$execTime,
|
||
|
|
];
|
||
|
|
++$interval;
|
||
|
|
} // end for
|
||
|
|
|
||
|
|
// - BYDAY, - BYMONTH, + BYDAYMONTH
|
||
|
|
$interval = 1;
|
||
|
|
for( $ix = 451; $ix <= 459; $ix++ ) {
|
||
|
|
if( 7 === $interval ) {
|
||
|
|
++$interval;
|
||
|
|
continue;
|
||
|
|
}
|
||
|
|
$time = microtime( true );
|
||
|
|
$start = DateTimeFactory::factory( '20190101T0900', 'Europe/Stockholm' );
|
||
|
|
$end = (clone $start)->modify( RecurFactory::EXTENDYEAR . ' years' );
|
||
|
|
$endYmd = $end->format( 'Ymd' );
|
||
|
|
$wDate = clone $start;
|
||
|
|
$byMonthDay = range( 10,15 );
|
||
|
|
$expects = [];
|
||
|
|
$count = 10;
|
||
|
|
$x = 1;
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
while( $x < $count ) {
|
||
|
|
if( $endYmd < $wDate->format( 'Ymd' )) {
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
if( in_array( (int)$wDate->format( 'd' ), $byMonthDay, true ) ) {
|
||
|
|
$expects[] = $wDate->format( 'Ymd' );
|
||
|
|
++$x;
|
||
|
|
}
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
} // end while
|
||
|
|
$execTime = microtime( true ) - $time;
|
||
|
|
$dataArr[] = [
|
||
|
|
$ix . '-' . $interval,
|
||
|
|
$start,
|
||
|
|
$end,
|
||
|
|
[
|
||
|
|
IcalInterface::FREQ => IcalInterface::DAILY,
|
||
|
|
IcalInterface::COUNT => $count,
|
||
|
|
IcalInterface::INTERVAL => $interval,
|
||
|
|
IcalInterface::BYMONTHDAY => $byMonthDay,
|
||
|
|
$DATASET => $dataSetNo++
|
||
|
|
],
|
||
|
|
$expects,
|
||
|
|
$execTime,
|
||
|
|
];
|
||
|
|
++$interval;
|
||
|
|
} // end for
|
||
|
|
|
||
|
|
// + BYDAY, - BYMONTH, + BYDAYMONTH
|
||
|
|
$interval = 1;
|
||
|
|
for( $ix = 461; $ix <= 469; $ix++ ) {
|
||
|
|
if( 7 === $interval ) {
|
||
|
|
++$interval;
|
||
|
|
continue;
|
||
|
|
}
|
||
|
|
$time = microtime( true );
|
||
|
|
$start = DateTimeFactory::factory( '20190101T0900', 'Europe/Stockholm' );
|
||
|
|
$end = (clone $start)->modify( RecurFactory::EXTENDYEAR . ' years' );
|
||
|
|
$endYmd = $end->format( 'Ymd' );
|
||
|
|
$wDate = clone $start;
|
||
|
|
$byMonthDay = range( 10,15 );
|
||
|
|
$expects = [];
|
||
|
|
$count = 10;
|
||
|
|
$x = 1;
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
while( $x < $count ) {
|
||
|
|
if( $endYmd < $wDate->format( 'Ymd' )) {
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
if(( 4 === (int) $wDate->format( 'w' )) && // TH
|
||
|
|
in_array((int) $wDate->format( 'd' ), $byMonthDay, true )) {
|
||
|
|
$expects[] = $wDate->format( 'Ymd' );
|
||
|
|
++$x;
|
||
|
|
}
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
} // end while
|
||
|
|
$execTime = microtime( true ) - $time;
|
||
|
|
$dataArr[] = [
|
||
|
|
$ix . '-' . $interval,
|
||
|
|
$start,
|
||
|
|
$end,
|
||
|
|
[
|
||
|
|
IcalInterface::FREQ => IcalInterface::DAILY,
|
||
|
|
IcalInterface::COUNT => $count,
|
||
|
|
IcalInterface::INTERVAL => $interval,
|
||
|
|
IcalInterface::BYMONTHDAY => $byMonthDay,
|
||
|
|
IcalInterface::BYDAY => [ IcalInterface::DAY => IcalInterface::TH ],
|
||
|
|
$DATASET => $dataSetNo++
|
||
|
|
],
|
||
|
|
$expects,
|
||
|
|
$execTime,
|
||
|
|
];
|
||
|
|
++$interval;
|
||
|
|
} // end for
|
||
|
|
|
||
|
|
// - BYDAY, + BYMONTH, + BYDAYMONTH
|
||
|
|
$interval = 1;
|
||
|
|
$byMonth = [ 2, 4, 6 ];
|
||
|
|
for( $ix = 471; $ix <= 479; $ix++ ) {
|
||
|
|
if( 7 === $interval ) {
|
||
|
|
++$interval;
|
||
|
|
continue;
|
||
|
|
}
|
||
|
|
$time = microtime( true );
|
||
|
|
$start = DateTimeFactory::factory( '20190101T0900', 'Europe/Stockholm' );
|
||
|
|
$end = (clone $start)->modify( RecurFactory::EXTENDYEAR . ' years' );
|
||
|
|
$endYmd = $end->format( 'Ymd' );
|
||
|
|
$wDate = clone $start;
|
||
|
|
$byMonthDay = range( 10,15 );
|
||
|
|
$expects = [];
|
||
|
|
$count = 10;
|
||
|
|
$x = 1;
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
while( $x < $count ) {
|
||
|
|
if( $endYmd < $wDate->format( 'Ymd' )) {
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
while( ! in_array((int) $wDate->format( 'm' ), $byMonth, true ) ) {
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
}
|
||
|
|
if( in_array((int) $wDate->format( 'd' ), $byMonthDay, true ) ) {
|
||
|
|
$expects[] = $wDate->format( 'Ymd' );
|
||
|
|
++$x;
|
||
|
|
}
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
} // end while
|
||
|
|
$execTime = microtime( true ) - $time;
|
||
|
|
$dataArr[] = [
|
||
|
|
$ix . '-' . $interval,
|
||
|
|
$start,
|
||
|
|
$end,
|
||
|
|
[
|
||
|
|
IcalInterface::FREQ => IcalInterface::DAILY,
|
||
|
|
IcalInterface::COUNT => $count,
|
||
|
|
IcalInterface::INTERVAL => $interval,
|
||
|
|
IcalInterface::BYMONTH => $byMonth,
|
||
|
|
IcalInterface::BYMONTHDAY => $byMonthDay,
|
||
|
|
$DATASET => $dataSetNo++
|
||
|
|
],
|
||
|
|
$expects,
|
||
|
|
$execTime,
|
||
|
|
];
|
||
|
|
++$interval;
|
||
|
|
} // end for
|
||
|
|
|
||
|
|
// + BYDAY, + BYMONTH, + BYDAYMONTH
|
||
|
|
$interval = 1;
|
||
|
|
$byMonth = [ 2, 4, 6, 8, 10, 12 ];
|
||
|
|
for( $ix = 481; $ix <= 489; $ix++ ) {
|
||
|
|
if( 7 === $interval ) {
|
||
|
|
++$interval;
|
||
|
|
continue;
|
||
|
|
}
|
||
|
|
$time = microtime( true );
|
||
|
|
$start = DateTimeFactory::factory( '20190101T0900', 'Europe/Stockholm' );
|
||
|
|
$end = (clone $start)->modify( RecurFactory::EXTENDYEAR . ' years' );
|
||
|
|
$endYmd = $end->format( 'Ymd' );
|
||
|
|
$wDate = clone $start;
|
||
|
|
$byMonthDay = range( 10,15 );
|
||
|
|
$expects = [];
|
||
|
|
$count = 10;
|
||
|
|
$x = 1;
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
while( $x < $count ) {
|
||
|
|
if( $endYmd < $wDate->format( 'Ymd' )) {
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
while( ! in_array((int) $wDate->format( 'm' ), $byMonth, true ) ) {
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
}
|
||
|
|
if(( 4 === (int) $wDate->format( 'w' )) && // TH
|
||
|
|
in_array((int) $wDate->format( 'd' ), $byMonthDay, true )) {
|
||
|
|
$expects[] = $wDate->format( 'Ymd' );
|
||
|
|
++$x;
|
||
|
|
}
|
||
|
|
$wDate = $wDate->modify( $interval . ' days' );
|
||
|
|
} // end while
|
||
|
|
$execTime = microtime( true ) - $time;
|
||
|
|
$dataArr[] = [
|
||
|
|
$ix . '-' . $interval,
|
||
|
|
$start,
|
||
|
|
$end,
|
||
|
|
[
|
||
|
|
IcalInterface::FREQ => IcalInterface::DAILY,
|
||
|
|
IcalInterface::COUNT => $count,
|
||
|
|
IcalInterface::INTERVAL => $interval,
|
||
|
|
IcalInterface::BYMONTH => $byMonth,
|
||
|
|
IcalInterface::BYMONTHDAY => $byMonthDay,
|
||
|
|
IcalInterface::BYDAY => [ IcalInterface::DAY => IcalInterface::TH ],
|
||
|
|
$DATASET => $dataSetNo++
|
||
|
|
],
|
||
|
|
$expects,
|
||
|
|
$execTime,
|
||
|
|
];
|
||
|
|
++$interval;
|
||
|
|
} // end for
|
||
|
|
|
||
|
|
return $dataArr;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Testing recur2date Daily without BYSETPOS
|
||
|
|
*
|
||
|
|
* @test
|
||
|
|
* @dataProvider recurDaily1TestProvider
|
||
|
|
* @param string $case
|
||
|
|
* @param DateTime $start
|
||
|
|
* @param DateTime|mixed[] $end
|
||
|
|
* @param mixed[] $recur
|
||
|
|
* @param mixed[] $expects
|
||
|
|
* @param float $prepTime
|
||
|
|
* @throws Exception
|
||
|
|
*/
|
||
|
|
public function recurDaily1Test(
|
||
|
|
string $case,
|
||
|
|
DateTime $start,
|
||
|
|
DateTime | array $end,
|
||
|
|
array $recur,
|
||
|
|
array $expects,
|
||
|
|
float $prepTime
|
||
|
|
) : void
|
||
|
|
{
|
||
|
|
$saveStartDate = clone $start;
|
||
|
|
|
||
|
|
$result = $this->recur2dateTest(
|
||
|
|
$case,
|
||
|
|
$start,
|
||
|
|
$end,
|
||
|
|
$recur,
|
||
|
|
$expects,
|
||
|
|
$prepTime
|
||
|
|
);
|
||
|
|
|
||
|
|
if( ! isset( $recur[IcalInterface::INTERVAL] )) {
|
||
|
|
$recur[IcalInterface::INTERVAL] = 1;
|
||
|
|
}
|
||
|
|
$strCase = str_pad( $case, 12 );
|
||
|
|
$recurDisp = str_replace( [PHP_EOL, ' ' ], '', var_export( $recur, true ));
|
||
|
|
if( ! RecurFactory2::isRecurDaily1( $recur )) {
|
||
|
|
if( defined( 'DISPRECUR' ) && ( '1' === DISPRECUR )) {
|
||
|
|
echo $strCase . ' NO isRecurDaily1' . $recurDisp . PHP_EOL;
|
||
|
|
}
|
||
|
|
$this->fail();
|
||
|
|
} // end if
|
||
|
|
$time = microtime( true );
|
||
|
|
$resultX = RecurFactory2::recurDaily1( $recur, $start, clone $start, $end );
|
||
|
|
$execTime = microtime( true ) - $time;
|
||
|
|
if( defined( 'DISPRECUR' ) && ( '1' === DISPRECUR )) {
|
||
|
|
echo $strCase . 'rcrDaily1 time:' . number_format( $execTime, 6 ) . ' : ' .
|
||
|
|
implode( ' - ', array_keys( $resultX ) ) . PHP_EOL; // test ###
|
||
|
|
}
|
||
|
|
if( defined( 'DISPRECUR' ) && ( '1' === DISPRECUR )) {
|
||
|
|
echo $recurDisp . PHP_EOL; // test ###
|
||
|
|
}
|
||
|
|
$this->assertEquals(
|
||
|
|
array_keys( $result ),
|
||
|
|
array_keys( $resultX ),
|
||
|
|
sprintf( self::$ERRFMT, __FUNCTION__, $case . '-41',
|
||
|
|
$saveStartDate->format( 'Ymd' ),
|
||
|
|
$end->format( 'Ymd' ),
|
||
|
|
var_export( $recur, true )
|
||
|
|
)
|
||
|
|
);
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* recurDaily11Test provider
|
||
|
|
*
|
||
|
|
* @return mixed[]
|
||
|
|
* @throws Exception
|
||
|
|
*/
|
||
|
|
public function recurDaily11TestProvider() : array
|
||
|
|
{
|
||
|
|
$dataArr = [];
|
||
|
|
$dataSetNo = 0;
|
||
|
|
$DATASET = 'DATASET';
|
||
|
|
|
||
|
|
// + BYDAY, - BYMONTH, + BYDAYMONTH same as recurDaily2 BUT no BYSETPOS
|
||
|
|
$start = DateTimeFactory::factory( '20190101T0900', 'Europe/Stockholm' );
|
||
|
|
$end = ( clone $start )->modify( RecurFactory::EXTENDYEAR . ' years' );
|
||
|
|
$dataArr[] = [
|
||
|
|
'2001-1',
|
||
|
|
$start,
|
||
|
|
$end,
|
||
|
|
[
|
||
|
|
IcalInterface::FREQ => IcalInterface::DAILY,
|
||
|
|
IcalInterface::COUNT => 20,
|
||
|
|
IcalInterface::INTERVAL => 1,
|
||
|
|
// Vcalendar::BYMONTH => [ 2, 4, 6, 8, 10, 12 ],
|
||
|
|
IcalInterface::BYMONTHDAY => range( -1,-14 ),
|
||
|
|
IcalInterface::BYDAY => [ IcalInterface::DAY => IcalInterface::TH ],
|
||
|
|
$DATASET => $dataSetNo++,
|
||
|
|
],
|
||
|
|
[
|
||
|
|
20190124, 20190131, 20190221, 20190228, 20190321, 20190328, 20190418, 20190425, 20190523,
|
||
|
|
20190530, 20190620, 20190627, 20190718, 20190725, 20190822, 20190829, 20190919, 20190926, 20191024
|
||
|
|
],
|
||
|
|
0.0,
|
||
|
|
];
|
||
|
|
|
||
|
|
// + BYDAY, + BYMONTH, + BYDAYMONTH same as recurDaily2 BUT no BYSETPOS
|
||
|
|
$start = DateTimeFactory::factory( '20190101T0900', 'Europe/Stockholm' );
|
||
|
|
$end = ( clone $start )->modify( RecurFactory::EXTENDYEAR . ' years' );
|
||
|
|
$dataArr[] = [
|
||
|
|
'2001-2',
|
||
|
|
$start,
|
||
|
|
$end,
|
||
|
|
[
|
||
|
|
IcalInterface::FREQ => IcalInterface::DAILY,
|
||
|
|
IcalInterface::COUNT => 20,
|
||
|
|
IcalInterface::INTERVAL => 1,
|
||
|
|
IcalInterface::BYMONTH => [ 2, 4, 6, 8, 10, 12 ],
|
||
|
|
IcalInterface::BYMONTHDAY => range( -1,-14 ),
|
||
|
|
IcalInterface::BYDAY => [ IcalInterface::DAY => IcalInterface::TH ],
|
||
|
|
$DATASET => $dataSetNo++,
|
||
|
|
],
|
||
|
|
[
|
||
|
|
20190221, 20190228, 20190418, 20190425, 20190620, 20190627, 20190822, 20190829,
|
||
|
|
20191024, 20191031, 20191219, 20191226, 20200220, 20200227, 20200423, 20200430,
|
||
|
|
20200618, 20200625, 20200820
|
||
|
|
],
|
||
|
|
0.0,
|
||
|
|
];
|
||
|
|
|
||
|
|
// + BYDAY, + BYMONTH, - BYDAYMONTH same as recurDaily2 BUT no BYSETPOS
|
||
|
|
$start = DateTimeFactory::factory( '20190101T0900', 'Europe/Stockholm' );
|
||
|
|
$end = ( clone $start )->modify( RecurFactory::EXTENDYEAR . ' years' );
|
||
|
|
$dataArr[] = [
|
||
|
|
'2001-3',
|
||
|
|
$start,
|
||
|
|
$end,
|
||
|
|
[
|
||
|
|
IcalInterface::FREQ => IcalInterface::DAILY,
|
||
|
|
IcalInterface::COUNT => 20,
|
||
|
|
IcalInterface::INTERVAL => 1,
|
||
|
|
IcalInterface::BYMONTH => [ 2, 4, 6, 8, 10, 12 ],
|
||
|
|
IcalInterface::BYDAY => [ IcalInterface::DAY => IcalInterface::TH ],
|
||
|
|
$DATASET => $dataSetNo++,
|
||
|
|
],
|
||
|
|
[
|
||
|
|
20190207, 20190214, 20190221, 20190228,
|
||
|
|
20190404, 20190411, 20190418, 20190425,
|
||
|
|
20190606, 20190613, 20190620, 20190627,
|
||
|
|
20190801, 20190808, 20190815, 20190822, 20190829,
|
||
|
|
20191003, 20191010
|
||
|
|
],
|
||
|
|
0.0,
|
||
|
|
];
|
||
|
|
|
||
|
|
return $dataArr;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Testing recur1date Daily without BYSETPOS for cmp with recurDaily2Test output
|
||
|
|
*
|
||
|
|
* @test
|
||
|
|
* @dataProvider recurDaily11TestProvider
|
||
|
|
* @param string $case
|
||
|
|
* @param DateTime $start
|
||
|
|
* @param DateTime|mixed[] $end
|
||
|
|
* @param mixed[] $recur
|
||
|
|
* @param mixed[] $expects
|
||
|
|
* @param float $prepTime
|
||
|
|
* @throws Exception
|
||
|
|
*/
|
||
|
|
public function recurDaily11Test(
|
||
|
|
string $case,
|
||
|
|
DateTime $start,
|
||
|
|
DateTime | array $end,
|
||
|
|
array $recur,
|
||
|
|
array $expects,
|
||
|
|
float $prepTime
|
||
|
|
) : void
|
||
|
|
{
|
||
|
|
$this->recurDaily1Test( $case, $start, $end, $recur, $expects, $prepTime );
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* recurDaily2Test provider
|
||
|
|
*
|
||
|
|
* @return mixed[]
|
||
|
|
* @throws Exception
|
||
|
|
*/
|
||
|
|
public function recurDaily2TestProvider() : array
|
||
|
|
{
|
||
|
|
$dataArr = [];
|
||
|
|
$dataSetNo = 0;
|
||
|
|
$DATASET = 'DATASET';
|
||
|
|
|
||
|
|
// + BYDAY, - BYMONTH, + BYDAYMONTH same as recurDaily11 BUT with BYSETPOS
|
||
|
|
$start = DateTimeFactory::factory( '20190101T0900', 'Europe/Stockholm' );
|
||
|
|
$end = ( clone $start )->modify( RecurFactory::EXTENDYEAR . ' years' );
|
||
|
|
$dataArr[] = [
|
||
|
|
'2001-1',
|
||
|
|
$start,
|
||
|
|
$end,
|
||
|
|
[
|
||
|
|
IcalInterface::FREQ => IcalInterface::DAILY,
|
||
|
|
IcalInterface::COUNT => 10,
|
||
|
|
IcalInterface::INTERVAL => 1,
|
||
|
|
// Vcalendar::BYMONTH => [ 2, 4, 6, 8, 10, 12 ],
|
||
|
|
IcalInterface::BYMONTHDAY => range( -1,-14 ),
|
||
|
|
IcalInterface::BYDAY => [ IcalInterface::DAY => IcalInterface::TH ],
|
||
|
|
IcalInterface::BYSETPOS => -2,
|
||
|
|
$DATASET => $dataSetNo++,
|
||
|
|
],
|
||
|
|
[
|
||
|
|
20190124,20190221,20190321,20190418,20190523,20190620,20190718,20190822,20190919
|
||
|
|
],
|
||
|
|
0.0,
|
||
|
|
];
|
||
|
|
|
||
|
|
// + BYDAY, + BYMONTH, + BYDAYMONTH same as recurDaily11 BUT with BYSETPOS
|
||
|
|
$start = DateTimeFactory::factory( '20190101T0900', 'Europe/Stockholm' );
|
||
|
|
$end = ( clone $start )->modify( RecurFactory::EXTENDYEAR . ' years' );
|
||
|
|
$dataArr[] = [
|
||
|
|
'2001-2',
|
||
|
|
$start,
|
||
|
|
$end,
|
||
|
|
[
|
||
|
|
IcalInterface::FREQ => IcalInterface::DAILY,
|
||
|
|
IcalInterface::COUNT => 10,
|
||
|
|
IcalInterface::INTERVAL => 1,
|
||
|
|
IcalInterface::BYMONTH => [ 2, 4, 6, 8, 10, 12 ],
|
||
|
|
IcalInterface::BYMONTHDAY => range( -1,-14 ),
|
||
|
|
IcalInterface::BYDAY => [ IcalInterface::DAY => IcalInterface::TH ],
|
||
|
|
IcalInterface::BYSETPOS => -2,
|
||
|
|
$DATASET => $dataSetNo++,
|
||
|
|
],
|
||
|
|
[
|
||
|
|
20190221, 20190418, 20190620, 20190822,
|
||
|
|
20191024, 20191219, 20200220, 20200423,
|
||
|
|
20200618
|
||
|
|
],
|
||
|
|
0.0,
|
||
|
|
];
|
||
|
|
|
||
|
|
// + BYDAY, + BYMONTH, - BYDAYMONTH same as recurDaily11 BUT with BYSETPOS
|
||
|
|
$start = DateTimeFactory::factory( '20190101T0900', 'Europe/Stockholm' );
|
||
|
|
$end = ( clone $start )->modify( RecurFactory::EXTENDYEAR . ' years' );
|
||
|
|
$dataArr[] = [
|
||
|
|
'2001-3',
|
||
|
|
$start,
|
||
|
|
$end,
|
||
|
|
[
|
||
|
|
IcalInterface::FREQ => IcalInterface::DAILY,
|
||
|
|
IcalInterface::COUNT => 10,
|
||
|
|
IcalInterface::INTERVAL => 1,
|
||
|
|
IcalInterface::BYMONTH => [ 2, 4, 6, 8, 10, 12 ],
|
||
|
|
IcalInterface::BYDAY => [ IcalInterface::DAY => IcalInterface::TH ],
|
||
|
|
IcalInterface::BYSETPOS => [ -3, -2 ],
|
||
|
|
$DATASET => $dataSetNo++,
|
||
|
|
],
|
||
|
|
[
|
||
|
|
20190214, 20190221,
|
||
|
|
20190411, 20190418,
|
||
|
|
20190613, 20190620,
|
||
|
|
20190815, 20190822,
|
||
|
|
20191017
|
||
|
|
],
|
||
|
|
0.0,
|
||
|
|
];
|
||
|
|
|
||
|
|
return $dataArr;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Testing recur2date Daily, same recur as recurDaily2Test BUT with BYSETPOS
|
||
|
|
*
|
||
|
|
* @test
|
||
|
|
* @dataProvider recurDaily2TestProvider
|
||
|
|
* @param string $case
|
||
|
|
* @param DateTime $start
|
||
|
|
* @param DateTime|mixed[] $end
|
||
|
|
* @param mixed[] $recur
|
||
|
|
* @param mixed[] $expects
|
||
|
|
* @param float $prepTime
|
||
|
|
* @throws Exception
|
||
|
|
*/
|
||
|
|
public function recurDaily2Test(
|
||
|
|
string $case,
|
||
|
|
DateTime $start,
|
||
|
|
DateTime | array $end,
|
||
|
|
array $recur,
|
||
|
|
array $expects,
|
||
|
|
float $prepTime
|
||
|
|
) : void
|
||
|
|
{
|
||
|
|
$saveStartDate = clone $start;
|
||
|
|
|
||
|
|
if( ! isset( $recur[IcalInterface::INTERVAL] )) {
|
||
|
|
$recur[IcalInterface::INTERVAL] = 1;
|
||
|
|
}
|
||
|
|
$strCase = str_pad( $case, 12 );
|
||
|
|
$recurDisp = str_replace( [PHP_EOL, ' ' ], '', var_export( $recur, true ));
|
||
|
|
if( ! RecurFactory2::isRecurDaily2( $recur )) {
|
||
|
|
if( defined( 'DISPRECUR' ) && ( '1' === DISPRECUR )) {
|
||
|
|
echo $strCase . ' NO isRecurDaily1' . $recurDisp . PHP_EOL;
|
||
|
|
}
|
||
|
|
$this->fail();
|
||
|
|
} // end if
|
||
|
|
$time = microtime( true );
|
||
|
|
$resultX = RecurFactory2::recurDaily2( $recur, $start, clone $start, $end );
|
||
|
|
$execTime = microtime( true ) - $time;
|
||
|
|
if( defined( 'DISPRECUR' ) && ( '1' === DISPRECUR )) {
|
||
|
|
echo $strCase . 'rcrDaily2 time:' . number_format( $execTime, 6 ) . ' : ' .
|
||
|
|
implode( ' - ', array_keys( $resultX ) ) . PHP_EOL; // test ###
|
||
|
|
echo $recurDisp . PHP_EOL; // test ###
|
||
|
|
}
|
||
|
|
$this->assertEquals(
|
||
|
|
$expects,
|
||
|
|
array_keys( $resultX ),
|
||
|
|
sprintf( self::$ERRFMT, __FUNCTION__, $case . '-41',
|
||
|
|
$saveStartDate->format( 'Ymd' ),
|
||
|
|
$end->format( 'Ymd' ),
|
||
|
|
var_export( $recur, true )
|
||
|
|
)
|
||
|
|
);
|
||
|
|
}
|
||
|
|
}
|