Page Menu
Home
Phorge
Search
Configure Global Search
Log In
Files
F117884074
kolab_date_recurrence.php
No One
Temporary
Actions
Download File
Edit File
Delete File
View Transforms
Subscribe
Flag For Later
Award Token
Authored By
Unknown
Size
7 KB
Referenced Files
None
Subscribers
None
kolab_date_recurrence.php
View Options
<?php
/**
* Recurrence computation class for xcal-based Kolab format objects
*
* Utility class to compute instances of recurring events.
* It requires the libcalendaring PHP module to be installed and loaded.
*
* @version @package_version@
* @author Thomas Bruederli <bruederli@kolabsys.com>
*
* Copyright (C) 2012-2016, Kolab Systems AG <contact@kolabsys.com>
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU Affero General Public License as
* published by the Free Software Foundation, either version 3 of the
* License, or (at your option) any later version.
*
* This program 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 Affero General Public License for more details.
*
* You should have received a copy of the GNU Affero General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*/
class
kolab_date_recurrence
{
private
/* EventCal */
$engine
;
private
/* kolab_format_xcal */
$object
;
private
/* DateTime */
$start
;
private
/* DateTime */
$next
;
private
/* cDateTime */
$cnext
;
private
/* DateInterval */
$duration
;
/**
* Default constructor
*
* @param kolab_format_xcal The Kolab object to operate on
*/
function
__construct
(
$object
)
{
$data
=
$object
->
to_array
();
$this
->
object
=
$object
;
$this
->
engine
=
$object
->
to_libcal
();
$this
->
start
=
$this
->
next
=
$data
[
'start'
];
$this
->
cnext
=
kolab_format
::
get_datetime
(
$this
->
next
);
if
(
is_object
(
$data
[
'start'
])
&&
is_object
(
$data
[
'end'
]))
{
$this
->
duration
=
$data
[
'start'
]->
diff
(
$data
[
'end'
]);
}
else
{
// Prevent from errors when end date is not set (#5307) RFC5545 3.6.1
$seconds
=
!
empty
(
$data
[
'end'
])
?
(
$data
[
'end'
]
-
$data
[
'start'
])
:
0
;
$this
->
duration
=
new
DateInterval
(
'PT'
.
$seconds
.
'S'
);
}
}
/**
* Get date/time of the next occurence of this event
*
* @param boolean Return a Unix timestamp instead of a DateTime object
* @return mixed DateTime object/unix timestamp or False if recurrence ended
*/
public
function
next_start
(
$timestamp
=
false
)
{
$time
=
false
;
if
(
$this
->
engine
&&
$this
->
next
)
{
if
((
$cnext
=
new
cDateTime
(
$this
->
engine
->
getNextOccurence
(
$this
->
cnext
)))
&&
$cnext
->
isValid
())
{
$next
=
kolab_format
::
php_datetime
(
$cnext
);
$time
=
$timestamp
?
$next
->
format
(
'U'
)
:
$next
;
$this
->
cnext
=
$cnext
;
$this
->
next
=
$next
;
}
}
return
$time
;
}
/**
* Get the next recurring instance of this event
*
* @return mixed Array with event properties or False if recurrence ended
*/
public
function
next_instance
()
{
if
(
$next_start
=
$this
->
next_start
())
{
$next_end
=
clone
$next_start
;
$next_end
->
add
(
$this
->
duration
);
$next
=
$this
->
object
->
to_array
();
$next
[
'start'
]
=
$next_start
;
$next
[
'end'
]
=
$next_end
;
$recurrence_id_format
=
libkolab
::
recurrence_id_format
(
$next
);
$next
[
'recurrence_date'
]
=
clone
$next_start
;
$next
[
'_instance'
]
=
$next_start
->
format
(
$recurrence_id_format
);
unset
(
$next
[
'_formatobj'
]);
return
$next
;
}
return
false
;
}
/**
* Get the end date of the occurence of this recurrence cycle
*
* @return DateTime|bool End datetime of the last event or False if recurrence exceeds limit
*/
public
function
end
()
{
$event
=
$this
->
object
->
to_array
();
// recurrence end date is given
if
(
$event
[
'recurrence'
][
'UNTIL'
]
instanceof
DateTime
)
{
return
$event
[
'recurrence'
][
'UNTIL'
];
}
// let libkolab do the work
if
(
$this
->
engine
&&
(
$cend
=
$this
->
engine
->
getLastOccurrence
())
&&
(
$end_dt
=
kolab_format
::
php_datetime
(
new
cDateTime
(
$cend
)))
)
{
return
$end_dt
;
}
// determine a reasonable end date if none given
if
(!
$event
[
'recurrence'
][
'COUNT'
]
&&
$event
[
'end'
]
instanceof
DateTime
)
{
$end_dt
=
clone
$event
[
'end'
];
$end_dt
->
add
(
new
DateInterval
(
'P100Y'
));
return
$end_dt
;
}
return
false
;
}
/**
* Find date/time of the first occurrence (excluding start date)
*/
public
function
first_occurrence
()
{
$event
=
$this
->
object
->
to_array
();
$start
=
clone
$this
->
start
;
$orig_start
=
clone
$this
->
start
;
$interval
=
intval
(
$event
[
'recurrence'
][
'INTERVAL'
]
?:
1
);
switch
(
$event
[
'recurrence'
][
'FREQ'
])
{
case
'WEEKLY'
:
if
(
empty
(
$event
[
'recurrence'
][
'BYDAY'
]))
{
return
$orig_start
;
}
$start
->
sub
(
new
DateInterval
(
"P{$interval}W"
));
break
;
case
'MONTHLY'
:
if
(
empty
(
$event
[
'recurrence'
][
'BYDAY'
])
&&
empty
(
$event
[
'recurrence'
][
'BYMONTHDAY'
]))
{
return
$orig_start
;
}
$start
->
sub
(
new
DateInterval
(
"P{$interval}M"
));
break
;
case
'YEARLY'
:
if
(
empty
(
$event
[
'recurrence'
][
'BYDAY'
])
&&
empty
(
$event
[
'recurrence'
][
'BYMONTH'
]))
{
return
$orig_start
;
}
$start
->
sub
(
new
DateInterval
(
"P{$interval}Y"
));
break
;
case
'DAILY'
:
if
(!
empty
(
$event
[
'recurrence'
][
'BYMONTH'
]))
{
break
;
}
default
:
return
$orig_start
;
}
$event
[
'start'
]
=
$start
;
$event
[
'recurrence'
][
'INTERVAL'
]
=
$interval
;
if
(
$event
[
'recurrence'
][
'COUNT'
])
{
// Increase count so we do not stop the loop to early
$event
[
'recurrence'
][
'COUNT'
]
+=
100
;
}
// Create recurrence that starts in the past
$object_type
=
$this
->
object
instanceof
kolab_format_task
?
'task'
:
'event'
;
$object
=
kolab_format
::
factory
(
$object_type
,
3.0
);
$object
->
set
(
$event
);
$recurrence
=
new
self
(
$object
);
// find the first occurrence
$found
=
false
;
while
(
$next
=
$recurrence
->
next_start
())
{
$start
=
$next
;
if
(
$next
>=
$orig_start
)
{
$found
=
true
;
break
;
}
}
if
(!
$found
)
{
rcube
::
raise_error
(
array
(
'file'
=>
__FILE__
,
'line'
=>
__LINE__
,
'message'
=>
sprintf
(
"Failed to find a first occurrence. Start: %s, Recurrence: %s"
,
$orig_start
->
format
(
DateTime
::
ISO8601
),
json_encode
(
$event
[
'recurrence'
])),
),
true
);
return
null
;
}
if
(
$orig_start
->
_dateonly
)
{
$start
->
_dateonly
=
true
;
}
return
$start
;
}
}
File Metadata
Details
Attached
Mime Type
text/x-php
Expires
Mon, Apr 6, 1:16 AM (9 h, 25 m ago)
Storage Engine
local-disk
Storage Format
Raw Data
Storage Handle
d3/02/58f739db17c3db995cd213438d83
Default Alt Text
kolab_date_recurrence.php (7 KB)
Attached To
Mode
rRPK roundcubemail-plugins-kolab
Attached
Detach File
Event Timeline