FINAL suepr merge step : added all modules to this super repos
This commit is contained in:
Bachir Soussi Chiadmi
@@ -0,0 +1,15 @@
|
||||
name = Date Repeat API
|
||||
description = A Date Repeat API to calculate repeating dates and times from iCal rules.
|
||||
dependencies[] = date_api
|
||||
package = Date/Time
|
||||
core = 7.x
|
||||
php = 5.2
|
||||
files[] = tests/date_repeat.test
|
||||
files[] = tests/date_repeat_form.test
|
||||
|
||||
; Information added by drupal.org packaging script on 2012-08-13
|
||||
version = "7.x-2.6"
|
||||
core = "7.x"
|
||||
project = "date"
|
||||
datestamp = "1344850024"
|
||||
|
||||
@@ -0,0 +1,32 @@
|
||||
<?php
|
||||
|
||||
/**
|
||||
* @file
|
||||
* Install, update and uninstall functions for the Date Repeat module.
|
||||
*/
|
||||
|
||||
/**
|
||||
* Implements hook_install().
|
||||
*/
|
||||
function date_repeat_install() {
|
||||
// Make sure this module loads after date_api.
|
||||
db_query("UPDATE {system} SET weight = 1 WHERE name = 'date_repeat'");
|
||||
}
|
||||
|
||||
/**
|
||||
* Implements hook_uninstall().
|
||||
*/
|
||||
function date_repeat_uninstall() {
|
||||
}
|
||||
|
||||
/**
|
||||
* Implements hook_enable().
|
||||
*/
|
||||
function date_repeat_enable() {
|
||||
}
|
||||
|
||||
/**
|
||||
* Implements hook_disable().
|
||||
*/
|
||||
function date_repeat_disable() {
|
||||
}
|
||||
@@ -0,0 +1,419 @@
|
||||
<?php
|
||||
/**
|
||||
* @file
|
||||
*
|
||||
* This module creates a form element that allows users to select
|
||||
* repeat rules for a date, and reworks the result into an iCal
|
||||
* RRULE string that can be stored in the database.
|
||||
*
|
||||
* The module also parses iCal RRULEs to create an array of dates
|
||||
* that meet their criteria.
|
||||
*
|
||||
* Other modules can use this API to add self-validating form elements
|
||||
* to their dates, and identify dates that meet the RRULE criteria.
|
||||
*
|
||||
*/
|
||||
/**
|
||||
* Implements hook_element_info().
|
||||
*/
|
||||
function date_repeat_element_info() {
|
||||
$type['date_repeat_rrule'] = array(
|
||||
'#input' => TRUE,
|
||||
'#process' => array('date_repeat_rrule_process'),
|
||||
'#element_validate' => array('date_repeat_rrule_validate'),
|
||||
'#theme_wrappers' => array('date_repeat_rrule'),
|
||||
);
|
||||
$type['date_repeat_form_element_radios'] = array(
|
||||
'#input' => TRUE,
|
||||
'#process' => array('date_repeat_form_element_radios_process'),
|
||||
'#theme_wrappers' => array('radios'),
|
||||
'#pre_render' => array('form_pre_render_conditional_form_element'),
|
||||
);
|
||||
if (module_exists('ctools')) {
|
||||
$type['date_repeat_rrule']['#pre_render'] = array('ctools_dependent_pre_render');
|
||||
}
|
||||
return $type;
|
||||
}
|
||||
|
||||
function date_repeat_theme() {
|
||||
return array(
|
||||
'date_repeat_current_exceptions' => array('render element' => 'element'),
|
||||
'date_repeat_current_additions' => array('render element' => 'element'),
|
||||
'date_repeat_rrule' => array('render element' => 'element'),
|
||||
);
|
||||
}
|
||||
|
||||
/**
|
||||
* Helper function for FREQ options.
|
||||
*/
|
||||
function date_repeat_freq_options() {
|
||||
return array(
|
||||
'DAILY' => t('Daily', array(), array('context' => 'datetime_singular')),
|
||||
'WEEKLY' => t('Weekly', array(), array('context' => 'datetime_singular')),
|
||||
'MONTHLY' => t('Monthly', array(), array('context' => 'datetime_singular')),
|
||||
'YEARLY' => t('Yearly', array(), array('context' => 'datetime_singular')),
|
||||
);
|
||||
}
|
||||
|
||||
function date_repeat_interval_options() {
|
||||
$options = range(0, 366);
|
||||
unset($options[0]);
|
||||
|
||||
return $options;
|
||||
}
|
||||
|
||||
/**
|
||||
* Helper function for FREQ options.
|
||||
*
|
||||
* Translated and untranslated arrays of the iCal day of week names.
|
||||
* We need the untranslated values for date_modify(), translated
|
||||
* values when displayed to user.
|
||||
*/
|
||||
function date_repeat_dow_day_options($translated = TRUE) {
|
||||
return array(
|
||||
'SU' => $translated ? t('Sunday', array(), array('context' => 'day_name')) : 'Sunday',
|
||||
'MO' => $translated ? t('Monday', array(), array('context' => 'day_name')) : 'Monday',
|
||||
'TU' => $translated ? t('Tuesday', array(), array('context' => 'day_name')) : 'Tuesday',
|
||||
'WE' => $translated ? t('Wednesday', array(), array('context' => 'day_name')) : 'Wednesday',
|
||||
'TH' => $translated ? t('Thursday', array(), array('context' => 'day_name')) : 'Thursday',
|
||||
'FR' => $translated ? t('Friday', array(), array('context' => 'day_name')) : 'Friday',
|
||||
'SA' => $translated ? t('Saturday', array(), array('context' => 'day_name')) : 'Saturday',
|
||||
);
|
||||
}
|
||||
|
||||
/**
|
||||
* Helper function for FREQ options.
|
||||
*
|
||||
* Translated and untranslated arrays of the iCal abbreviated day of week names.
|
||||
*/
|
||||
function date_repeat_dow_day_options_abbr($translated = TRUE, $length = 3) {
|
||||
$return = array();
|
||||
switch ($length) {
|
||||
case 1:
|
||||
$context = 'day_abbr1';
|
||||
break;
|
||||
case 2:
|
||||
$context = 'day_abbr2';
|
||||
break;
|
||||
default:
|
||||
$context = '';
|
||||
break;
|
||||
}
|
||||
foreach (date_repeat_dow_day_untranslated() as $key => $day) {
|
||||
$return[$key] = $translated ? t(substr($day, 0, $length), array(), array('context' => $context)) : substr($day, 0, $length);
|
||||
}
|
||||
return $return;
|
||||
}
|
||||
|
||||
function date_repeat_dow_day_untranslated() {
|
||||
static $date_repeat_weekdays;
|
||||
if (empty($date_repeat_weekdays)) {
|
||||
$date_repeat_weekdays = array('SU' => 'Sunday', 'MO' => 'Monday', 'TU' => 'Tuesday',
|
||||
'WE' => 'Wednesday', 'TH' => 'Thursday', 'FR' => 'Friday',
|
||||
'SA' => 'Saturday');
|
||||
}
|
||||
return $date_repeat_weekdays;
|
||||
}
|
||||
|
||||
function date_repeat_dow_day_options_ordered($weekdays) {
|
||||
$day_keys = array_keys($weekdays);
|
||||
$day_values = array_values($weekdays);
|
||||
for ($i = 1; $i <= variable_get('date_first_day', 0); $i++) {
|
||||
$last_key = array_shift($day_keys);
|
||||
array_push($day_keys, $last_key);
|
||||
$last_value = array_shift($day_values);
|
||||
array_push($day_values, $last_value);
|
||||
}
|
||||
$weekdays = array_combine($day_keys, $day_values);
|
||||
return $weekdays;
|
||||
}
|
||||
|
||||
/**
|
||||
* Helper function for BYDAY options.
|
||||
*/
|
||||
function date_repeat_dow_count_options() {
|
||||
return array('' => t('Every', array(), array('context' => 'date_order'))) + date_order_translated();
|
||||
}
|
||||
|
||||
/**
|
||||
* Helper function for BYDAY options.
|
||||
*
|
||||
* Creates options like -1SU and 2TU
|
||||
*/
|
||||
function date_repeat_dow_options() {
|
||||
$options = array();
|
||||
foreach (date_repeat_dow_count_options() as $count_key => $count_value) {
|
||||
foreach (date_repeat_dow_day_options() as $dow_key => $dow_value) {
|
||||
$options[$count_key . $dow_key] = $count_value . ' ' . $dow_value;
|
||||
}
|
||||
}
|
||||
return $options;
|
||||
}
|
||||
|
||||
/**
|
||||
* Translate a day of week position to the iCal day name.
|
||||
*
|
||||
* Used with date_format($date, 'w') or get_variable('date_first_day'),
|
||||
* which return 0 for Sunday, 1 for Monday, etc.
|
||||
*
|
||||
* dow 2 becomes 'TU', dow 3 becomes 'WE', and so on.
|
||||
*/
|
||||
function date_repeat_dow2day($dow) {
|
||||
$days_of_week = array_keys(date_repeat_dow_day_options(FALSE));
|
||||
return $days_of_week[$dow];
|
||||
}
|
||||
|
||||
/**
|
||||
* Shift the array of iCal day names into the right order
|
||||
* for a specific week start day.
|
||||
*/
|
||||
function date_repeat_days_ordered($week_start_day) {
|
||||
$days = array_flip(array_keys(date_repeat_dow_day_options(FALSE)));
|
||||
$start_position = $days[$week_start_day];
|
||||
$keys = array_flip($days);
|
||||
if ($start_position > 0) {
|
||||
for ($i = 1; $i <= $start_position; $i++) {
|
||||
$last = array_shift($keys);
|
||||
array_push($keys, $last);
|
||||
}
|
||||
}
|
||||
return $keys;
|
||||
}
|
||||
|
||||
/**
|
||||
* Build a description of an iCal rule.
|
||||
*
|
||||
* Constructs a human-readable description of the rule.
|
||||
*/
|
||||
function date_repeat_rrule_description($rrule, $format = 'D M d Y') {
|
||||
// Empty or invalid value.
|
||||
if (empty($rrule) || !strstr($rrule, 'RRULE')) {
|
||||
return;
|
||||
}
|
||||
|
||||
module_load_include('inc', 'date_api', 'date_api_ical');
|
||||
module_load_include('inc', 'date_repeat', 'date_repeat_calc');
|
||||
|
||||
$parts = date_repeat_split_rrule($rrule);
|
||||
$additions = $parts[2];
|
||||
$exceptions = $parts[1];
|
||||
$rrule = $parts[0];
|
||||
if ($rrule['FREQ'] == 'NONE') {
|
||||
return;
|
||||
}
|
||||
|
||||
// Make sure there will be an empty description for any unused parts.
|
||||
$description = array(
|
||||
'!interval' => '',
|
||||
'!byday' => '',
|
||||
'!bymonth' => '',
|
||||
'!count' => '',
|
||||
'!until' => '',
|
||||
'!except' => '',
|
||||
'!additional' => '',
|
||||
'!week_starts_on' => '',
|
||||
);
|
||||
$interval = date_repeat_interval_options();
|
||||
switch ($rrule['FREQ']) {
|
||||
case 'WEEKLY':
|
||||
$description['!interval'] = format_plural($rrule['INTERVAL'], 'every week', 'every @count weeks') . ' ';
|
||||
break;
|
||||
case 'MONTHLY':
|
||||
$description['!interval'] = format_plural($rrule['INTERVAL'], 'every month', 'every @count months') . ' ';
|
||||
break;
|
||||
case 'YEARLY':
|
||||
$description['!interval'] = format_plural($rrule['INTERVAL'], 'every year', 'every @count years') . ' ';
|
||||
break;
|
||||
default:
|
||||
$description['!interval'] = format_plural($rrule['INTERVAL'], 'every day', 'every @count days') . ' ';
|
||||
break;
|
||||
}
|
||||
|
||||
if (!empty($rrule['BYDAY'])) {
|
||||
$days = date_repeat_dow_day_options();
|
||||
$counts = date_repeat_dow_count_options();
|
||||
$results = array();
|
||||
foreach ($rrule['BYDAY'] as $byday) {
|
||||
// Get the numeric part of the BYDAY option, i.e. +3 from +3MO.
|
||||
$day = substr($byday, -2);
|
||||
$count = str_replace($day, '', $byday);
|
||||
if (!empty($count)) {
|
||||
// See if there is a 'pretty' option for this count, i.e. +1 => First.
|
||||
$order = array_key_exists($count, $counts) ? strtolower($counts[$count]) : $count;
|
||||
$results[] = trim(t('!repeats_every_interval on the !date_order !day_of_week', array('!repeats_every_interval ' => '', '!date_order' => $order, '!day_of_week' => $days[$day])));
|
||||
}
|
||||
else {
|
||||
$results[] = trim(t('!repeats_every_interval every !day_of_week', array('!repeats_every_interval ' => '', '!day_of_week' => $days[$day])));
|
||||
}
|
||||
}
|
||||
$description['!byday'] = implode(' ' . t('and') . ' ', $results);
|
||||
}
|
||||
if (!empty($rrule['BYMONTH'])) {
|
||||
if (sizeof($rrule['BYMONTH']) < 12) {
|
||||
$results = array();
|
||||
$months = date_month_names();
|
||||
foreach ($rrule['BYMONTH'] as $month) {
|
||||
$results[] = $months[$month];
|
||||
}
|
||||
if (!empty($rrule['BYMONTHDAY'])) {
|
||||
$description['!bymonth'] = trim(t('!repeats_every_interval on the !month_days of !month_names', array('!repeats_every_interval ' => '', '!month_days' => implode(', ', $rrule['BYMONTHDAY']), '!month_names' => implode(', ', $results))));
|
||||
}
|
||||
else {
|
||||
$description['!bymonth'] = trim(t('!repeats_every_interval on !month_names', array('!repeats_every_interval ' => '', '!month_names' => implode(', ', $results))));
|
||||
}
|
||||
}
|
||||
}
|
||||
if ($rrule['INTERVAL'] < 1) {
|
||||
$rrule['INTERVAL'] = 1;
|
||||
}
|
||||
if (!empty($rrule['COUNT'])) {
|
||||
$description['!count'] = trim(t('!repeats_every_interval !count times', array('!repeats_every_interval ' => '', '!count' => $rrule['COUNT'])));
|
||||
}
|
||||
if (!empty($rrule['UNTIL'])) {
|
||||
$until = date_ical_date($rrule['UNTIL'], 'UTC');
|
||||
date_timezone_set($until, date_default_timezone_object());
|
||||
$description['!until'] = trim(t('!repeats_every_interval until !until_date', array('!repeats_every_interval ' => '', '!until_date' => date_format_date($until, 'custom', $format))));
|
||||
}
|
||||
if ($exceptions) {
|
||||
$values = array();
|
||||
foreach ($exceptions as $exception) {
|
||||
$except = date_ical_date($exception, 'UTC');
|
||||
date_timezone_set($except, date_default_timezone_object());
|
||||
$values[] = date_format_date($except, 'custom', $format);
|
||||
}
|
||||
$description['!except'] = trim(t('!repeats_every_interval except !except_dates', array('!repeats_every_interval ' => '', '!except_dates' => implode(', ', $values))));
|
||||
}
|
||||
if (!empty($rrule['WKST'])) {
|
||||
$day_names = date_repeat_dow_day_options();
|
||||
$description['!week_starts_on'] = trim(t('!repeats_every_interval where the week start on !day_of_week', array('!repeats_every_interval ' => '', '!day_of_week' => $day_names[trim($rrule['WKST'])])));
|
||||
}
|
||||
if ($additions) {
|
||||
$values = array();
|
||||
foreach ($additions as $addition) {
|
||||
$add = date_ical_date($addition, 'UTC');
|
||||
date_timezone_set($add, date_default_timezone_object());
|
||||
$values[] = date_format_date($add, 'custom', $format);
|
||||
}
|
||||
$description['!additional'] = trim(t('Also includes !additional_dates.', array('!additional_dates' => implode(', ', $values))));
|
||||
}
|
||||
return t('Repeats !interval !bymonth !byday !count !until !except. !additional', $description);
|
||||
}
|
||||
|
||||
/**
|
||||
* Parse an iCal rule into a parsed RRULE array and an EXDATE array.
|
||||
*/
|
||||
function date_repeat_split_rrule($rrule) {
|
||||
$parts = explode("\n", str_replace("\r\n", "\n", $rrule));
|
||||
$rrule = array();
|
||||
$exceptions = array();
|
||||
$additions = array();
|
||||
$additions = array();
|
||||
foreach ($parts as $part) {
|
||||
if (strstr($part, 'RRULE')) {
|
||||
$RRULE = str_replace('RRULE:', '', $part);
|
||||
$rrule = (array) date_ical_parse_rrule('RRULE:', $RRULE);
|
||||
}
|
||||
elseif (strstr($part, 'EXDATE')) {
|
||||
$EXDATE = str_replace('EXDATE:', '', $part);
|
||||
$exceptions = (array) date_ical_parse_exceptions('EXDATE:', $EXDATE);
|
||||
unset($exceptions['DATA']);
|
||||
}
|
||||
elseif (strstr($part, 'RDATE')) {
|
||||
$RDATE = str_replace('RDATE:', '', $part);
|
||||
$additions = (array) date_ical_parse_exceptions('RDATE:', $RDATE);
|
||||
unset($additions['DATA']);
|
||||
}
|
||||
}
|
||||
return array($rrule, $exceptions, $additions);
|
||||
}
|
||||
|
||||
/**
|
||||
* Analyze a RRULE and return dates that match it.
|
||||
*/
|
||||
function date_repeat_calc($rrule, $start, $end, $exceptions = array(), $timezone = NULL, $additions = array()) {
|
||||
module_load_include('inc', 'date_repeat', 'date_repeat_calc');
|
||||
return _date_repeat_calc($rrule, $start, $end, $exceptions, $timezone, $additions);
|
||||
}
|
||||
|
||||
/**
|
||||
* Generate the repeat rule setting form.
|
||||
*/
|
||||
function date_repeat_rrule_process($element, &$form_state, $form) {
|
||||
module_load_include('inc', 'date_repeat', 'date_repeat_form');
|
||||
return _date_repeat_rrule_process($element, $form_state, $form);
|
||||
}
|
||||
|
||||
/**
|
||||
* Process function for 'date_repeat_form_element_radios'.
|
||||
*/
|
||||
function date_repeat_form_element_radios_process($element) {
|
||||
$childrenkeys = element_children($element);
|
||||
|
||||
if (count($element['#options']) &&
|
||||
count($element['#options']) == count($childrenkeys)) {
|
||||
$weight = 0;
|
||||
$children = array();
|
||||
$classes = isset($element['#div_classes']) ?
|
||||
$element['#div_classes'] : array();
|
||||
foreach ($childrenkeys as $childkey) {
|
||||
$children[$childkey] = $element[$childkey];
|
||||
unset($element[$childkey]);
|
||||
}
|
||||
foreach ($element['#options'] as $key => $choice) {
|
||||
$currentchildkey = array_shift($childrenkeys);
|
||||
$weight += 0.001;
|
||||
$class = array_shift($classes);
|
||||
$element += array($key => array());
|
||||
$parents_for_id = array_merge($element['#parents'], array($key));
|
||||
$element[$key] += array(
|
||||
'#prefix' => '<div' . ($class ? " class=\"{$class}\"" : '') . '>',
|
||||
'#type' => 'radio',
|
||||
'#title' => $choice,
|
||||
'#title_display' => 'invisible',
|
||||
'#return_value' => $key,
|
||||
'#default_value' => isset($element['#default_value']) ?
|
||||
$element['#default_value'] : NULL,
|
||||
'#attributes' => $element['#attributes'],
|
||||
'#parents' => $element['#parents'],
|
||||
'#id' => drupal_html_id('edit-' . implode('-', $parents_for_id)),
|
||||
'#ajax' => isset($element['#ajax']) ? $element['ajax'] : NULL,
|
||||
'#weight' => $weight,
|
||||
'#theme_wrappers' => array(),
|
||||
'#suffix' => ' ',
|
||||
);
|
||||
|
||||
$child = $children[$currentchildkey];
|
||||
|
||||
$weight += 0.001;
|
||||
|
||||
$child['#weight'] = $weight;
|
||||
$child['#title_display'] = 'invisible';
|
||||
$child['#suffix'] = (!empty($child['#suffix']) ? $child['#suffix'] : '') .
|
||||
'</div>';
|
||||
$child['#parents'] = $element['#parents'];
|
||||
array_pop($child['#parents']);
|
||||
array_push($child['#parents'], $currentchildkey);
|
||||
|
||||
$element_prototype = element_info($child['#type']);
|
||||
$old_wrappers = array();
|
||||
if (isset($child['#theme_wrappers'])) {
|
||||
$old_wrappers += $child['#theme_wrappers'];
|
||||
}
|
||||
if (isset($element_prototype['#theme_wrappers'])) {
|
||||
$old_wrappers += $element_prototype['#theme_wrappers'];
|
||||
}
|
||||
|
||||
$child['#theme_wrappers'] = array();
|
||||
|
||||
foreach ($old_wrappers as $wrapper) {
|
||||
if ($wrapper != 'form_element') {
|
||||
$child['#theme_wrappers'][] = $wrapper;
|
||||
}
|
||||
}
|
||||
|
||||
$element[$currentchildkey] = $child;
|
||||
}
|
||||
}
|
||||
|
||||
return $element;
|
||||
}
|
||||
@@ -0,0 +1,581 @@
|
||||
<?php
|
||||
/**
|
||||
* @file
|
||||
* Code to compute the dates that match an iCal RRULE.
|
||||
*
|
||||
* Moved to a separate file since it is not used on most pages
|
||||
* so the code is not parsed unless needed.
|
||||
*
|
||||
* Extensive simpletests have been created to test the RRULE calculation
|
||||
* results against official examples from RFC 2445.
|
||||
*
|
||||
* These calculations are expensive and results should be stored or cached
|
||||
* so the calculation code is not called more often than necessary.
|
||||
*
|
||||
* Currently implemented:
|
||||
* INTERVAL, UNTIL, COUNT, EXDATE, RDATE, BYDAY, BYMONTHDAY, BYMONTH,
|
||||
* YEARLY, MONTHLY, WEEKLY, DAILY
|
||||
*
|
||||
* Currently not implemented:
|
||||
*
|
||||
* BYYEARDAY, MINUTELY, HOURLY, SECONDLY, BYMINUTE, BYHOUR, BYSECOND
|
||||
* These could be implemented in the future.
|
||||
*
|
||||
* BYSETPOS
|
||||
* Seldom used anywhere, so no reason to complicated the code.
|
||||
*/
|
||||
|
||||
/**
|
||||
* Private implementation of date_repeat_calc().
|
||||
*
|
||||
* Compute dates that match the requested rule, within a specified date range.
|
||||
*/
|
||||
function _date_repeat_calc($rrule, $start, $end, $exceptions, $timezone, $additions) {
|
||||
module_load_include('inc', 'date_api', 'date_api_ical');
|
||||
|
||||
if (empty($timezone)) {
|
||||
$timezone = date_default_timezone();
|
||||
}
|
||||
|
||||
// Make sure the 'EXCEPTIONS' string isn't appended to the rule.
|
||||
$parts = explode("\n", $rrule);
|
||||
if (count($parts)) {
|
||||
$rrule = $parts[0];
|
||||
}
|
||||
// Get the parsed array of rule values.
|
||||
$rrule = date_ical_parse_rrule('RRULE:', $rrule);
|
||||
|
||||
// These default values indicate there is no RRULE here.
|
||||
if ($rrule['FREQ'] == 'NONE' || (isset($rrule['INTERVAL']) && $rrule['INTERVAL'] == 0)) {
|
||||
return array();
|
||||
}
|
||||
|
||||
// Create a date object for the start and end dates.
|
||||
$start_date = new DateObject($start, $timezone);
|
||||
|
||||
// Versions of PHP greater than PHP 5.3.5 require that we set an explicit time when
|
||||
// using date_modify() or the time may not match the original value. Adding this
|
||||
// modifier gives us the same results in both older and newer versions of PHP.
|
||||
$modify_time = ' ' . $start_date->format('g:ia');
|
||||
|
||||
// If the rule has an UNTIL, see if that is earlier than the end date.
|
||||
if (!empty($rrule['UNTIL'])) {
|
||||
$end_date = new DateObject($end, $timezone);
|
||||
$until_date = date_ical_date($rrule['UNTIL'], $timezone);
|
||||
if (date_format($until_date, 'U') < date_format($end_date, 'U')) {
|
||||
$end_date = $until_date;
|
||||
}
|
||||
}
|
||||
// The only valid option for an empty end date is when we have a count.
|
||||
elseif (empty($end)) {
|
||||
if (!empty($rrule['COUNT'])) {
|
||||
$end_date = NULL;
|
||||
}
|
||||
else {
|
||||
return array();
|
||||
}
|
||||
}
|
||||
else {
|
||||
$end_date = new DateObject($end, $timezone);
|
||||
}
|
||||
|
||||
// Get an integer value for the interval, if none given, '1' is implied.
|
||||
if (empty($rrule['INTERVAL'])) {
|
||||
$rrule['INTERVAL'] = 1;
|
||||
}
|
||||
$interval = max(1, $rrule['INTERVAL']);
|
||||
$count = isset($rrule['COUNT']) ? $rrule['COUNT'] : NULL;
|
||||
|
||||
if (empty($rrule['FREQ'])) {
|
||||
$rrule['FREQ'] = 'DAILY';
|
||||
}
|
||||
|
||||
// Make sure DAILY frequency isn't used in places it won't work;
|
||||
if (!empty($rrule['BYMONTHDAY']) && !in_array($rrule['FREQ'], array('MONTHLY', 'YEARLY'))) {
|
||||
$rrule['FREQ'] = 'MONTHLY';
|
||||
}
|
||||
elseif (!empty($rrule['BYDAY']) && !in_array($rrule['FREQ'], array('MONTHLY', 'WEEKLY', 'YEARLY'))) {
|
||||
$rrule['FREQ'] = 'WEEKLY';
|
||||
}
|
||||
|
||||
// Find the time period to jump forward between dates.
|
||||
switch ($rrule['FREQ']) {
|
||||
case 'DAILY':
|
||||
$jump = $interval . ' days';
|
||||
break;
|
||||
case 'WEEKLY':
|
||||
$jump = $interval . ' weeks';
|
||||
break;
|
||||
case 'MONTHLY':
|
||||
$jump = $interval . ' months';
|
||||
break;
|
||||
case 'YEARLY':
|
||||
$jump = $interval . ' years';
|
||||
break;
|
||||
}
|
||||
$rrule = date_repeat_adjust_rrule($rrule, $start_date);
|
||||
|
||||
// The start date always goes into the results, whether or not it meets
|
||||
// the rules. RFC 2445 includes examples where the start date DOES NOT
|
||||
// meet the rules, but the expected results always include the start date.
|
||||
$days = array(date_format($start_date, DATE_FORMAT_DATETIME));
|
||||
|
||||
// BYMONTHDAY will look for specific days of the month in one or more months.
|
||||
// This process is only valid when frequency is monthly or yearly.
|
||||
|
||||
if (!empty($rrule['BYMONTHDAY'])) {
|
||||
$finished = FALSE;
|
||||
$current_day = clone($start_date);
|
||||
$direction_days = array();
|
||||
// Deconstruct the day in case it has a negative modifier.
|
||||
foreach ($rrule['BYMONTHDAY'] as $day) {
|
||||
preg_match("@(-)?([0-9]{1,2})@", $day, $regs);
|
||||
if (!empty($regs[2])) {
|
||||
// Convert parameters into full day name, count, and direction.
|
||||
$direction_days[$day] = array(
|
||||
'direction' => !empty($regs[1]) ? $regs[1] : '+',
|
||||
'direction_count' => $regs[2],
|
||||
);
|
||||
}
|
||||
}
|
||||
while (!$finished) {
|
||||
$period_finished = FALSE;
|
||||
while (!$period_finished) {
|
||||
foreach ($rrule['BYMONTHDAY'] as $monthday) {
|
||||
$day = $direction_days[$monthday];
|
||||
$current_day = date_repeat_set_month_day($current_day, NULL, $day['direction_count'], $day['direction'], $timezone, $modify_time);
|
||||
date_repeat_add_dates($days, $current_day, $start_date, $end_date, $exceptions, $rrule);
|
||||
if ($finished = date_repeat_is_finished($current_day, $days, $count, $end_date)) {
|
||||
$period_finished = TRUE;
|
||||
}
|
||||
}
|
||||
// If it's monthly, keep looping through months, one INTERVAL at a time.
|
||||
if ($rrule['FREQ'] == 'MONTHLY') {
|
||||
if ($finished = date_repeat_is_finished($current_day, $days, $count, $end_date)) {
|
||||
$period_finished = TRUE;
|
||||
}
|
||||
// Back up to first of month and jump.
|
||||
$current_day = date_repeat_set_month_day($current_day, NULL, 1, '+', $timezone, $modify_time);
|
||||
date_modify($current_day, '+' . $jump . $modify_time);
|
||||
}
|
||||
// If it's yearly, break out of the loop at the
|
||||
// end of every year, and jump one INTERVAL in years.
|
||||
else {
|
||||
if (date_format($current_day, 'n') == 12) {
|
||||
$period_finished = TRUE;
|
||||
}
|
||||
else {
|
||||
// Back up to first of month and jump.
|
||||
$current_day = date_repeat_set_month_day($current_day, NULL, 1, '+', $timezone, $modify_time);
|
||||
date_modify($current_day, '+1 month' . $modify_time);
|
||||
}
|
||||
}
|
||||
}
|
||||
if ($rrule['FREQ'] == 'YEARLY') {
|
||||
// Back up to first of year and jump.
|
||||
$current_day = date_repeat_set_year_day($current_day, NULL, 1, '+', $timezone, $modify_time);
|
||||
date_modify($current_day, '+' . $jump . $modify_time);
|
||||
}
|
||||
$finished = date_repeat_is_finished($current_day, $days, $count, $end_date);
|
||||
}
|
||||
}
|
||||
|
||||
// This is the simple fallback case, not looking for any BYDAY,
|
||||
// just repeating the start date. Because of imputed BYDAY above, this
|
||||
// will only test TRUE for a DAILY or less frequency (like HOURLY).
|
||||
|
||||
elseif (empty($rrule['BYDAY'])) {
|
||||
// $current_day will keep track of where we are in the calculation.
|
||||
$current_day = clone($start_date);
|
||||
$finished = FALSE;
|
||||
$months = !empty($rrule['BYMONTH']) ? $rrule['BYMONTH'] : array();
|
||||
while (!$finished) {
|
||||
date_repeat_add_dates($days, $current_day, $start_date, $end_date, $exceptions, $rrule);
|
||||
$finished = date_repeat_is_finished($current_day, $days, $count, $end_date);
|
||||
date_modify($current_day, '+' . $jump . $modify_time);
|
||||
}
|
||||
}
|
||||
|
||||
else {
|
||||
|
||||
// More complex searches for day names and criteria like '-1SU' or '2TU,2TH',
|
||||
// require that we interate through the whole time period checking each BYDAY.
|
||||
|
||||
// Create helper array to pull day names out of iCal day strings.
|
||||
$day_names = date_repeat_dow_day_options(FALSE);
|
||||
$days_of_week = array_keys($day_names);
|
||||
|
||||
// Parse out information about the BYDAYs and separate them
|
||||
// depending on whether they have directional parameters like -1SU or 2TH.
|
||||
$month_days = array();
|
||||
$week_days = array();
|
||||
|
||||
// Find the right first day of the week to use, iCal rules say Monday
|
||||
// should be used if none is specified.
|
||||
$week_start_rule = !empty($rrule['WKST']) ? trim($rrule['WKST']) : 'MO';
|
||||
$week_start_day = $day_names[$week_start_rule];
|
||||
|
||||
// Make sure the week days array is sorted into week order,
|
||||
// we use the $ordered_keys to get the right values into the key
|
||||
// and force the array to that order. Needed later when we
|
||||
// iterate through each week looking for days so we don't
|
||||
// jump to the next week when we hit a day out of order.
|
||||
$ordered = date_repeat_days_ordered($week_start_rule);
|
||||
$ordered_keys = array_flip($ordered);
|
||||
|
||||
foreach ($rrule['BYDAY'] as $day) {
|
||||
preg_match("@(-)?([0-9]+)?([SU|MO|TU|WE|TH|FR|SA]{2})@", trim($day), $regs);
|
||||
if (!empty($regs[2])) {
|
||||
// Convert parameters into full day name, count, and direction.
|
||||
$direction_days[] = array(
|
||||
'day' => $day_names[$regs[3]],
|
||||
'direction' => !empty($regs[1]) ? $regs[1] : '+',
|
||||
'direction_count' => $regs[2],
|
||||
);
|
||||
}
|
||||
else {
|
||||
$week_days[$ordered_keys[$regs[3]]] = $day_names[$regs[3]];
|
||||
}
|
||||
}
|
||||
ksort($week_days);
|
||||
|
||||
// BYDAYs with parameters like -1SU (last Sun) or 2TH (second Thur)
|
||||
// need to be processed one month or year at a time.
|
||||
if (!empty($direction_days) && in_array($rrule['FREQ'], array('MONTHLY', 'YEARLY'))) {
|
||||
$finished = FALSE;
|
||||
$current_day = clone($start_date);
|
||||
while (!$finished) {
|
||||
foreach ($direction_days as $day) {
|
||||
// Find the BYDAY date in the current month.
|
||||
if ($rrule['FREQ'] == 'MONTHLY') {
|
||||
$current_day = date_repeat_set_month_day($current_day, $day['day'], $day['direction_count'], $day['direction'], $timezone, $modify_time);
|
||||
}
|
||||
else {
|
||||
$current_day = date_repeat_set_year_day($current_day, $day['day'], $day['direction_count'], $day['direction'], $timezone, $modify_time);
|
||||
}
|
||||
date_repeat_add_dates($days, $current_day, $start_date, $end_date, $exceptions, $rrule);
|
||||
}
|
||||
$finished = date_repeat_is_finished($current_day, $days, $count, $end_date);
|
||||
// Reset to beginning of period before jumping to next period.
|
||||
// Needed especially when working with values like 'last Saturday'
|
||||
// to be sure we don't skip months like February.
|
||||
$year = date_format($current_day, 'Y');
|
||||
$month = date_format($current_day, 'n');
|
||||
if ($rrule['FREQ'] == 'MONTHLY') {
|
||||
date_date_set($current_day, $year, $month, 1);
|
||||
}
|
||||
else {
|
||||
date_date_set($current_day, $year, 1, 1);
|
||||
}
|
||||
// Jump to the next period.
|
||||
date_modify($current_day, '+' . $jump . $modify_time);
|
||||
}
|
||||
}
|
||||
|
||||
// For BYDAYs without parameters,like TU,TH (every Tues and Thur),
|
||||
// we look for every one of those days during the frequency period.
|
||||
// Iterate through periods of a WEEK, MONTH, or YEAR, checking for
|
||||
// the days of the week that match our criteria for each week in the
|
||||
// period, then jumping ahead to the next week, month, or year,
|
||||
// an INTERVAL at a time.
|
||||
|
||||
if (!empty($week_days) && in_array($rrule['FREQ'], array('MONTHLY', 'WEEKLY', 'YEARLY'))) {
|
||||
$finished = FALSE;
|
||||
$current_day = clone($start_date);
|
||||
$format = $rrule['FREQ'] == 'YEARLY' ? 'Y' : 'n';
|
||||
$current_period = date_format($current_day, $format);
|
||||
|
||||
// Back up to the beginning of the week in case we are somewhere in the
|
||||
// middle of the possible week days, needed so we don't prematurely
|
||||
// jump to the next week. The date_repeat_add_dates() function will
|
||||
// keep dates outside the range from getting added.
|
||||
if (date_format($current_day, 'l') != $day_names[$day]) {
|
||||
date_modify($current_day, '-1 ' . $week_start_day . $modify_time);
|
||||
}
|
||||
while (!$finished) {
|
||||
$period_finished = FALSE;
|
||||
while (!$period_finished) {
|
||||
$moved = FALSE;
|
||||
foreach ($week_days as $delta => $day) {
|
||||
// Find the next occurence of each day in this week, only add it
|
||||
// if we are still in the current month or year. The date_repeat_add_dates
|
||||
// function is insufficient to test whether to include this date
|
||||
// if we are using a rule like 'every other month', so we must
|
||||
// explicitly test it here.
|
||||
|
||||
// If we're already on the right day, don't jump or we
|
||||
// will prematurely move into the next week.
|
||||
if (date_format($current_day, 'l') != $day) {
|
||||
date_modify($current_day, '+1 ' . $day . $modify_time);
|
||||
$moved = TRUE;
|
||||
}
|
||||
if ($rrule['FREQ'] == 'WEEKLY' || date_format($current_day, $format) == $current_period) {
|
||||
date_repeat_add_dates($days, $current_day, $start_date, $end_date, $exceptions, $rrule);
|
||||
}
|
||||
}
|
||||
$finished = date_repeat_is_finished($current_day, $days, $count, $end_date);
|
||||
|
||||
// Make sure we don't get stuck in endless loop if the current
|
||||
// day never got changed above.
|
||||
if (!$moved) {
|
||||
date_modify($current_day, '+1 day' . $modify_time);
|
||||
}
|
||||
|
||||
// If this is a WEEKLY frequency, stop after each week,
|
||||
// otherwise, stop when we've moved outside the current period.
|
||||
// Jump to the end of the week, then test the period.
|
||||
if ($finished || $rrule['FREQ'] == 'WEEKLY') {
|
||||
$period_finished = TRUE;
|
||||
}
|
||||
elseif ($rrule['FREQ'] != 'WEEKLY' && date_format($current_day, $format) != $current_period) {
|
||||
$period_finished = TRUE;
|
||||
}
|
||||
}
|
||||
|
||||
if ($finished) {
|
||||
continue;
|
||||
}
|
||||
|
||||
// We'll be at the end of a week, month, or year when
|
||||
// we get to this point in the code.
|
||||
|
||||
// Go back to the beginning of this period before we jump, to
|
||||
// ensure we jump to the first day of the next period.
|
||||
switch ($rrule['FREQ']) {
|
||||
case 'WEEKLY':
|
||||
date_modify($current_day, '+1 ' . $week_start_day . $modify_time);
|
||||
date_modify($current_day, '-1 week' . $modify_time);
|
||||
break;
|
||||
case 'MONTHLY':
|
||||
date_modify($current_day, '-' . (date_format($current_day, 'j') - 1) . ' days' . $modify_time);
|
||||
date_modify($current_day, '-1 month' . $modify_time);
|
||||
break;
|
||||
case 'YEARLY':
|
||||
date_modify($current_day, '-' . date_format($current_day, 'z') . ' days' . $modify_time);
|
||||
date_modify($current_day, '-1 year' . $modify_time);
|
||||
break;
|
||||
}
|
||||
// Jump ahead to the next period to be evaluated.
|
||||
date_modify($current_day, '+' . $jump . $modify_time);
|
||||
$current_period = date_format($current_day, $format);
|
||||
$finished = date_repeat_is_finished($current_day, $days, $count, $end_date);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
// add additional dates
|
||||
foreach ($additions as $addition) {
|
||||
$date = new dateObject($addition . ' ' . $start_date->format('H:i:s'), $timezone);
|
||||
$days[] = date_format($date, DATE_FORMAT_DATETIME);
|
||||
}
|
||||
|
||||
sort($days);
|
||||
return $days;
|
||||
}
|
||||
|
||||
/**
|
||||
* See if the RRULE needs some imputed values added to it.
|
||||
*/
|
||||
function date_repeat_adjust_rrule($rrule, $start_date) {
|
||||
// If this is not a valid value, do nothing;
|
||||
if (empty($rrule) || empty($rrule['FREQ'])) {
|
||||
return array();
|
||||
}
|
||||
|
||||
// RFC 2445 says if no day or monthday is specified when creating repeats for
|
||||
// weeks, months, or years, impute the value from the start date.
|
||||
|
||||
if (empty($rrule['BYDAY']) && $rrule['FREQ'] == 'WEEKLY') {
|
||||
$rrule['BYDAY'] = array(date_repeat_dow2day(date_format($start_date, 'w')));
|
||||
}
|
||||
elseif (empty($rrule['BYDAY']) && empty($rrule['BYMONTHDAY']) && $rrule['FREQ'] == 'MONTHLY') {
|
||||
$rrule['BYMONTHDAY'] = array(date_format($start_date, 'j'));
|
||||
}
|
||||
elseif (empty($rrule['BYDAY']) && empty($rrule['BYMONTHDAY']) && empty($rrule['BYYEARDAY']) && $rrule['FREQ'] == 'YEARLY') {
|
||||
$rrule['BYMONTHDAY'] = array(date_format($start_date, 'j'));
|
||||
if (empty($rrule['BYMONTH'])) {
|
||||
$rrule['BYMONTH'] = array(date_format($start_date, 'n'));
|
||||
}
|
||||
}
|
||||
// If we are processing rules for period other than YEARLY or MONTHLY
|
||||
// and have BYDAYS like 2SU or -1SA, simplify them to SU or SA since the
|
||||
// position rules make no sense in other periods and just add complexity.
|
||||
|
||||
elseif (!empty($rrule['BYDAY']) && !in_array($rrule['FREQ'], array('MONTHLY', 'YEARLY'))) {
|
||||
foreach ($rrule['BYDAY'] as $delta => $BYDAY) {
|
||||
$rrule['BYDAY'][$delta] = substr($BYDAY, -2);
|
||||
}
|
||||
}
|
||||
|
||||
return $rrule;
|
||||
}
|
||||
|
||||
/**
|
||||
* Helper function to add found date to the $dates array.
|
||||
*
|
||||
* Check that the date to be added is between the start and end date
|
||||
* and that it is not in the $exceptions, nor already in the $days array,
|
||||
* and that it meets other criteria in the RRULE.
|
||||
*/
|
||||
function date_repeat_add_dates(&$days, $current_day, $start_date, $end_date, $exceptions, $rrule) {
|
||||
if (isset($rrule['COUNT']) && sizeof($days) >= $rrule['COUNT']) {
|
||||
return FALSE;
|
||||
}
|
||||
$formatted = date_format($current_day, DATE_FORMAT_DATETIME);
|
||||
if (!empty($end_date) && $formatted > date_format($end_date, DATE_FORMAT_DATETIME)) {
|
||||
return FALSE;
|
||||
}
|
||||
if ($formatted < date_format($start_date, DATE_FORMAT_DATETIME)) {
|
||||
return FALSE;
|
||||
}
|
||||
if (in_array(date_format($current_day, 'Y-m-d'), $exceptions)) {
|
||||
return FALSE;
|
||||
}
|
||||
if (!empty($rrule['BYDAY'])) {
|
||||
$BYDAYS = $rrule['BYDAY'];
|
||||
foreach ($BYDAYS as $delta => $BYDAY) {
|
||||
$BYDAYS[$delta] = substr($BYDAY, -2);
|
||||
}
|
||||
if (!in_array(date_repeat_dow2day(date_format($current_day, 'w')), $BYDAYS)) {
|
||||
return FALSE;
|
||||
}}
|
||||
if (!empty($rrule['BYYEAR']) && !in_array(date_format($current_day, 'Y'), $rrule['BYYEAR'])) {
|
||||
return FALSE;
|
||||
}
|
||||
if (!empty($rrule['BYMONTH']) && !in_array(date_format($current_day, 'n'), $rrule['BYMONTH'])) {
|
||||
return FALSE;
|
||||
}
|
||||
if (!empty($rrule['BYMONTHDAY'])) {
|
||||
// Test month days, but only if there are no negative numbers.
|
||||
$test = TRUE;
|
||||
$BYMONTHDAYS = array();
|
||||
foreach ($rrule['BYMONTHDAY'] as $day) {
|
||||
if ($day > 0) {
|
||||
$BYMONTHDAYS[] = $day;
|
||||
}
|
||||
else {
|
||||
$test = FALSE;
|
||||
break;
|
||||
}
|
||||
}
|
||||
if ($test && !empty($BYMONTHDAYS) && !in_array(date_format($current_day, 'j'), $BYMONTHDAYS)) {
|
||||
return FALSE;
|
||||
}
|
||||
}
|
||||
// Don't add a day if it is already saved so we don't throw the count off.
|
||||
if (in_array($formatted, $days)) {
|
||||
return TRUE;
|
||||
}
|
||||
else {
|
||||
$days[] = $formatted;
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Stop when $current_day is greater than $end_date or $count is reached.
|
||||
*/
|
||||
function date_repeat_is_finished($current_day, $days, $count, $end_date) {
|
||||
if (($count && sizeof($days) >= $count)
|
||||
|| (!empty($end_date) && date_format($current_day, 'U') > date_format($end_date, 'U'))) {
|
||||
return TRUE;
|
||||
}
|
||||
else {
|
||||
return FALSE;
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Set a date object to a specific day of the month.
|
||||
*
|
||||
* Example,
|
||||
* date_set_month_day($date, 'Sunday', 2, '-')
|
||||
* will reset $date to the second to last Sunday in the month.
|
||||
* If $day is empty, will set to the number of days from the
|
||||
* beginning or end of the month.
|
||||
*/
|
||||
function date_repeat_set_month_day($date_in, $day, $count = 1, $direction = '+', $timezone = 'UTC', $modify_time) {
|
||||
if (is_object($date_in)) {
|
||||
$current_month = date_format($date_in, 'n');
|
||||
|
||||
// Reset to the start of the month.
|
||||
// We should be able to do this with date_date_set(), but
|
||||
// for some reason the date occasionally gets confused if run
|
||||
// through this function multiple times. It seems to work
|
||||
// reliably if we create a new object each time.
|
||||
$datetime = date_format($date_in, DATE_FORMAT_DATETIME);
|
||||
$datetime = substr_replace($datetime, '01', 8, 2);
|
||||
$date = new DateObject($datetime, $timezone);
|
||||
if ($direction == '-') {
|
||||
// For negative search, start from the end of the month.
|
||||
date_modify($date, '+1 month' . $modify_time);
|
||||
}
|
||||
else {
|
||||
// For positive search, back up one day to get outside the
|
||||
// current month, so we can catch the first of the month.
|
||||
date_modify($date, '-1 day' . $modify_time);
|
||||
}
|
||||
|
||||
if (empty($day)) {
|
||||
date_modify($date, $direction . $count . ' days' . $modify_time);
|
||||
}
|
||||
else {
|
||||
// Use the English text for order, like First Sunday
|
||||
// instead of +1 Sunday to overcome PHP5 bug, (see #369020).
|
||||
$order = date_order();
|
||||
$step = $count <= 5 ? $order[$direction . $count] : $count;
|
||||
date_modify($date, $step . ' ' . $day . $modify_time);
|
||||
}
|
||||
|
||||
// If that takes us outside the current month, don't go there.
|
||||
if (date_format($date, 'n') == $current_month) {
|
||||
return $date;
|
||||
}
|
||||
}
|
||||
return $date_in;
|
||||
}
|
||||
|
||||
/**
|
||||
* Set a date object to a specific day of the year.
|
||||
*
|
||||
* Example,
|
||||
* date_set_year_day($date, 'Sunday', 2, '-')
|
||||
* will reset $date to the second to last Sunday in the year.
|
||||
* If $day is empty, will set to the number of days from the
|
||||
* beginning or end of the year.
|
||||
*/
|
||||
function date_repeat_set_year_day($date_in, $day, $count = 1, $direction = '+', $timezone = 'UTC', $modify_time) {
|
||||
if (is_object($date_in)) {
|
||||
$current_year = date_format($date_in, 'Y');
|
||||
|
||||
// Reset to the start of the month.
|
||||
// See note above.
|
||||
$datetime = date_format($date_in, DATE_FORMAT_DATETIME);
|
||||
$datetime = substr_replace($datetime, '01-01', 5, 5);
|
||||
$date = new DateObject($datetime, $timezone);
|
||||
if ($direction == '-') {
|
||||
// For negative search, start from the end of the year.
|
||||
date_modify($date, '+1 year' . $modify_time);
|
||||
}
|
||||
else {
|
||||
// For positive search, back up one day to get outside the
|
||||
// current year, so we can catch the first of the year.
|
||||
date_modify($date, '-1 day' . $modify_time);
|
||||
}
|
||||
if (empty($day)) {
|
||||
date_modify($date, $direction . $count . ' days' . $modify_time);
|
||||
}
|
||||
else {
|
||||
// Use the English text for order, like First Sunday
|
||||
// instead of +1 Sunday to overcome PHP5 bug, (see #369020).
|
||||
$order = date_order();
|
||||
$step = $count <= 5 ? $order[$direction . $count] : $count;
|
||||
date_modify($date, $step . ' ' . $day . $modify_time);
|
||||
}
|
||||
|
||||
// If that takes us outside the current year, don't go there.
|
||||
if (date_format($date, 'Y') == $current_year) {
|
||||
return $date;
|
||||
}
|
||||
}
|
||||
return $date_in;
|
||||
}
|
||||
@@ -0,0 +1,977 @@
|
||||
<?php
|
||||
/**
|
||||
* @file
|
||||
* Code to add a date repeat selection form to a date field and create
|
||||
* an iCal RRULE from the chosen selections.
|
||||
*
|
||||
* Moved to a separate file since it is not used on most pages
|
||||
* so the code is not parsed unless needed.
|
||||
*
|
||||
* Currently implemented:
|
||||
* INTERVAL, UNTIL, EXDATE, RDATE, BYDAY, BYMONTHDAY, BYMONTH,
|
||||
* YEARLY, MONTHLY, WEEKLY, DAILY
|
||||
*
|
||||
* Currently not implemented:
|
||||
*
|
||||
* BYYEARDAY, MINUTELY, HOURLY, SECONDLY, BYMINUTE, BYHOUR, BYSECOND
|
||||
* These could be implemented in the future.
|
||||
*
|
||||
* COUNT
|
||||
* The goal of this module is to create a way we can parse an iCal
|
||||
* RRULE and pull out just dates for a specified date range, for
|
||||
* instance with a date that repeats daily for several years, we might
|
||||
* want to only be able to pull out the dates for the current year.
|
||||
*
|
||||
* Adding COUNT to the rules we create makes it impossible to do that
|
||||
* without parsing and computing the whole range of dates that the rule
|
||||
* will create. COUNT is left off of the user form completely for this
|
||||
* reason.
|
||||
*
|
||||
* BYSETPOS
|
||||
* Seldom used anywhere, so no reason to complicated the code.
|
||||
*/
|
||||
/**
|
||||
* Generate the repeat setting form.
|
||||
*/
|
||||
function _date_repeat_rrule_process($element, &$form_state, $form) {
|
||||
|
||||
// If the RRULE field is not visible to the user, needs no processing or validation.
|
||||
// The Date field module is not adding this element to forms if the field is hidden,
|
||||
// this test is just in case some other module attempts to do so.
|
||||
|
||||
if (date_hidden_element($element)) {
|
||||
return $element;
|
||||
}
|
||||
|
||||
module_load_include('inc', 'date_api', 'date_api_ical');
|
||||
if (empty($element['#date_repeat_widget'])) {
|
||||
$element['#date_repeat_widget'] = module_exists('date_popup') ? 'date_popup' : 'date_select';
|
||||
}
|
||||
if (is_array($element['#default_value'])) {
|
||||
$element['#value'] = date_repeat_merge($element['#value'], $element);
|
||||
$rrule = date_api_ical_build_rrule($element['#value']);
|
||||
}
|
||||
else {
|
||||
$rrule = $element['#default_value'];
|
||||
}
|
||||
|
||||
// Empty the original string value of the RRULE so we can create
|
||||
// an array of values for the form from the RRULE's contents.
|
||||
$element['#value'] = '';
|
||||
|
||||
$parts = date_repeat_split_rrule($rrule);
|
||||
$rrule = $parts[0];
|
||||
|
||||
$exceptions = $parts[1];
|
||||
$additions = $parts[2];
|
||||
$timezone = !empty($element['#date_timezone']) ? $element['#date_timezone'] : date_default_timezone();
|
||||
$merged_values = date_repeat_merge($rrule, $element);
|
||||
|
||||
$UNTIL = '';
|
||||
if (!empty($merged_values['UNTIL']['datetime'])) {
|
||||
$until_date = new DateObject($merged_values['UNTIL']['datetime'], $merged_values['UNTIL']['tz']);
|
||||
date_timezone_set($until_date, timezone_open($timezone));
|
||||
$UNTIL = date_format($until_date, DATE_FORMAT_DATETIME);
|
||||
}
|
||||
|
||||
$COUNT = '';
|
||||
if (!empty($merged_values['COUNT'])) {
|
||||
$COUNT = $merged_values['COUNT'];
|
||||
}
|
||||
|
||||
$element['FREQ'] = array(
|
||||
'#type' => 'select',
|
||||
'#title' => t('Repeats', array(), array('context' => 'Date repeat')),
|
||||
'#default_value' => !empty($rrule['FREQ']) ? $rrule['FREQ'] : 'WEEKLY',
|
||||
'#options' => date_repeat_freq_options(),
|
||||
'#prefix' => '<div class="date-repeat-input">',
|
||||
'#suffix' => '</div>',
|
||||
);
|
||||
|
||||
$element['daily'] = array(
|
||||
'#type' => 'container',
|
||||
'#tree' => TRUE,
|
||||
'#prefix' => '<div class="date-clear daily">',
|
||||
'#suffix' => '</div>',
|
||||
'#states' => array(
|
||||
'visible' => array(
|
||||
":input[name=\"{$element['#name']}[FREQ]\"]" => array('value' => 'DAILY'),
|
||||
),
|
||||
),
|
||||
);
|
||||
|
||||
$element['weekly'] = array(
|
||||
'#type' => 'container',
|
||||
'#tree' => TRUE,
|
||||
'#prefix' => '<div class="date-clear weekly">',
|
||||
'#suffix' => '</div>',
|
||||
'#states' => array(
|
||||
'visible' => array(
|
||||
":input[name=\"{$element['#name']}[FREQ]\"]" => array('value' => 'WEEKLY'),
|
||||
),
|
||||
),
|
||||
);
|
||||
|
||||
$element['monthly'] = array(
|
||||
'#type' => 'container',
|
||||
'#tree' => TRUE,
|
||||
'#prefix' => '<div class="date-clear monthly">',
|
||||
'#suffix' => '</div>',
|
||||
'#states' => array(
|
||||
'visible' => array(
|
||||
":input[name=\"{$element['#name']}[FREQ]\"]" => array('value' => 'MONTHLY'),
|
||||
),
|
||||
),
|
||||
);
|
||||
|
||||
$element['yearly'] = array(
|
||||
'#type' => 'container',
|
||||
'#tree' => TRUE,
|
||||
'#prefix' => '<div class="date-clear yearly">',
|
||||
'#suffix' => '</div>',
|
||||
'#states' => array(
|
||||
'visible' => array(
|
||||
":input[name=\"{$element['#name']}[FREQ]\"]" => array('value' => 'YEARLY'),
|
||||
),
|
||||
),
|
||||
);
|
||||
|
||||
list($prefix, $suffix) = explode('@interval', t('Every @interval days', array(), array('context' => 'Date repeat')));
|
||||
$DAILY_INTERVAL = array(
|
||||
'#type' => 'textfield',
|
||||
'#title' => t('Repeats', array(), array('context' => 'Date repeat')),
|
||||
'#title_display' => 'invisible',
|
||||
'#default_value' => (!empty($rrule['INTERVAL']) ? $rrule['INTERVAL'] : 1),
|
||||
'#element_validate' => array('element_validate_integer_positive'),
|
||||
'#attributes' => array('placeholder' => array('#')),
|
||||
'#size' => 3,
|
||||
'#maxlength' => 3,
|
||||
'#prefix' => '<div class="date-clear">',
|
||||
'#suffix' => t('days') . '</div>',
|
||||
'#field_prefix' => $prefix,
|
||||
'#field_suffix' => $suffix,
|
||||
);
|
||||
|
||||
list($prefix, $suffix) = explode('@interval', t('Every @interval weeks', array(), array('context' => 'Date repeat')));
|
||||
$element['weekly']['INTERVAL'] = array(
|
||||
'#type' => 'textfield',
|
||||
'#title' => t('Repeats', array(), array('context' => 'Date repeat')),
|
||||
'#default_value' => (!empty($rrule['INTERVAL']) ? $rrule['INTERVAL'] : 1),
|
||||
'#element_validate' => array('element_validate_integer_positive'),
|
||||
'#attributes' => array('placeholder' => array('#')),
|
||||
'#size' => 3,
|
||||
'#maxlength' => 3,
|
||||
'#prefix' => '<div class="date-clear">',
|
||||
'#suffix' => '</div>',
|
||||
'#field_prefix' => $prefix,
|
||||
'#field_suffix' => $suffix,
|
||||
);
|
||||
|
||||
list($prefix, $suffix) = explode('@interval', t('Every @interval months', array(), array('context' => 'Date repeat')));
|
||||
$element['monthly']['INTERVAL'] = array(
|
||||
'#access' => FALSE,
|
||||
'#type' => 'textfield',
|
||||
'#title' => t('Repeats', array(), array('context' => 'Date repeat')),
|
||||
'#default_value' => (!empty($rrule['INTERVAL']) ? $rrule['INTERVAL'] : 1),
|
||||
'#element_validate' => array('element_validate_integer_positive'),
|
||||
'#attributes' => array('placeholder' => array('#')),
|
||||
'#size' => 3,
|
||||
'#maxlength' => 3,
|
||||
'#prefix' => '<div class="date-clear">',
|
||||
'#suffix' => '</div>',
|
||||
'#field_prefix' => $prefix,
|
||||
'#field_suffix' => $suffix,
|
||||
);
|
||||
|
||||
list($prefix, $suffix) = explode('@interval', t('Every @interval years', array(), array('context' => 'Date repeat')));
|
||||
$element['yearly']['INTERVAL'] = array(
|
||||
'#type' => 'textfield',
|
||||
'#title' => t('Repeats', array(), array('context' => 'Date repeat')),
|
||||
'#default_value' => (!empty($rrule['INTERVAL']) ? $rrule['INTERVAL'] : 1),
|
||||
'#element_validate' => array('element_validate_integer_positive'),
|
||||
'#attributes' => array('placeholder' => array('#')),
|
||||
'#size' => 3,
|
||||
'#maxlength' => 3,
|
||||
'#prefix' => '<div class="date-clear">',
|
||||
'#suffix' => '</div>',
|
||||
'#field_prefix' => $prefix,
|
||||
'#field_suffix' => $suffix,
|
||||
);
|
||||
$options = date_repeat_dow_day_options_abbr(TRUE);
|
||||
$options = date_repeat_dow_day_options_ordered($options);
|
||||
$element['weekly']['BYDAY'] = array(
|
||||
'#type' => 'checkboxes',
|
||||
'#title' => t('Repeat on', array(), array('context' => 'Date repeat')),
|
||||
'#default_value' => !empty($rrule['BYDAY']) && $rrule['FREQ'] === 'WEEKLY' ? $rrule['BYDAY'] : array(),
|
||||
'#options' => $options,
|
||||
'#attributes' => array('class' => array('container-inline byday')),
|
||||
'#multiple' => TRUE,
|
||||
'#prefix' => '<div class="date-clear">',
|
||||
'#suffix' => '</div>',
|
||||
);
|
||||
|
||||
$DAILY_radios_default = 'INTERVAL';
|
||||
if (isset($rrule['FREQ']) && $rrule['FREQ'] === 'DAILY' && !empty($rrule['BYDAY'])) {
|
||||
switch (count($rrule['BYDAY'])) {
|
||||
case 2:
|
||||
$DAILY_radios_default = 'every_tu_th';
|
||||
break;
|
||||
case 3:
|
||||
$DAILY_radios_default = 'every_mo_we_fr';
|
||||
break;
|
||||
case 5:
|
||||
$DAILY_radios_default = 'every_weekday';
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
$DAILY_every_weekday = array(
|
||||
'#type' => 'item',
|
||||
'#markup' => '<div>' . t('Every weekday', array(), array('context' => 'Date repeat')) . '</div>',
|
||||
);
|
||||
|
||||
$DAILY_mo_we_fr = array(
|
||||
'#type' => 'item',
|
||||
'#markup' => '<div>' . t('Every Mon, Wed, Fri', array(), array('context' => 'Date repeat')) . '</div>',
|
||||
);
|
||||
|
||||
$DAILY_tu_th = array(
|
||||
'#type' => 'item',
|
||||
'#markup' => '<div>' . t('Every Tue, Thu', array(), array('context' => 'Date repeat')) . '</div>',
|
||||
);
|
||||
|
||||
$element['daily']['byday_radios'] = array(
|
||||
'#type' => 'date_repeat_form_element_radios',
|
||||
'#tree' => TRUE,
|
||||
'#title' => t('Repeats every', array(), array('context' => 'Date repeat')),
|
||||
'#prefix' => '<div class="date-clear">',
|
||||
'#suffix' => '</div>',
|
||||
'#states' => array(
|
||||
'visible' => array(
|
||||
":input[name=\"{$element['#name']}[FREQ]\"]" => array('value' => 'DAILY'),
|
||||
),
|
||||
),
|
||||
'#default_value' => $DAILY_radios_default,
|
||||
'#options' => array(
|
||||
'INTERVAL' => t('interval'),
|
||||
'every_weekday' => t('every weekday'),
|
||||
'every_mo_we_fr' => t('monday wednesday friday'),
|
||||
'every_tu_th' => t('tuesday thursday'),
|
||||
),
|
||||
'INTERVAL_child' => $DAILY_INTERVAL,
|
||||
'every_weekday_child' => $DAILY_every_weekday,
|
||||
'mo_we_fr_child' => $DAILY_mo_we_fr,
|
||||
'tu_th_child' => $DAILY_tu_th,
|
||||
'#div_classes' => array(
|
||||
'container-inline interval',
|
||||
'container-inline weekday',
|
||||
'container-inline mo-we-fr',
|
||||
'container-inline tu-th',
|
||||
),
|
||||
);
|
||||
|
||||
$MONTHLY_day_month_default = 'BYMONTHDAY_BYMONTH';
|
||||
if (isset($rrule['FREQ']) && $rrule['FREQ'] === 'MONTHLY' && !empty($rrule['BYDAY'])) {
|
||||
$MONTHLY_day_month_default = 'BYDAY_BYMONTH';
|
||||
}
|
||||
|
||||
$MONTHLY_on_day_BYMONTHDAY_of_BYMONTH = array(
|
||||
'#type' => 'container',
|
||||
'#tree' => TRUE,
|
||||
);
|
||||
|
||||
list($bymonthday_title, $bymonthday_suffix) = explode('@bymonthday', t('On day @bymonthday of', array(), array('context' => 'Date repeat')));
|
||||
$MONTHLY_on_day_BYMONTHDAY_of_BYMONTH['BYMONTHDAY'] = array(
|
||||
'#type' => 'select',
|
||||
'#title' => $bymonthday_title,
|
||||
'#default_value' => !empty($rrule['BYMONTHDAY']) && $rrule['FREQ'] === 'MONTHLY' ? $rrule['BYMONTHDAY'] : '',
|
||||
'#options' => drupal_map_assoc(range(1, 31)) + drupal_map_assoc(range(-1, -31)),
|
||||
'#multiple' => FALSE,
|
||||
'#prefix' => '<div class="date-clear bymonthday">',
|
||||
'#suffix' => '</div>',
|
||||
'#field_suffix' => $bymonthday_suffix,
|
||||
);
|
||||
|
||||
$MONTHLY_on_day_BYMONTHDAY_of_BYMONTH['BYMONTH'] = array(
|
||||
'#type' => 'checkboxes',
|
||||
'#title' => t('Bymonth', array(), array('context' => 'Date repeat')),
|
||||
'#title_display' => 'invisible',
|
||||
'#default_value' => !empty($rrule['BYMONTH']) && $rrule['FREQ'] === 'MONTHLY' && $MONTHLY_day_month_default === 'BYMONTHDAY_BYMONTH' ? $rrule['BYMONTH'] : array(),
|
||||
'#options' => date_month_names_abbr(TRUE),
|
||||
'#attributes' => array('class' => array('container-inline')),
|
||||
'#multiple' => TRUE,
|
||||
'#prefix' => '<div class="date-clear bymonth">',
|
||||
'#suffix' => '</div>',
|
||||
);
|
||||
|
||||
$MONTHLY_on_the_BYDAY_of_BYMONTH = array(
|
||||
'#type' => 'container',
|
||||
'#tree' => TRUE,
|
||||
);
|
||||
|
||||
$MONTHLY_BYDAY_COUNT = '';
|
||||
$MONTHLY_BYDAY_DAY = '';
|
||||
if (isset($rrule['BYDAY']) && !empty($rrule['BYDAY']) && $rrule['FREQ'] === 'MONTHLY') {
|
||||
$MONTHLY_BYDAY_COUNT = substr($rrule['BYDAY'][0], 0, -2);
|
||||
$MONTHLY_BYDAY_DAY = substr($rrule['BYDAY'][0], -2);;
|
||||
}
|
||||
|
||||
list($byday_count_title, $byday_day_title) = explode('@byday', t('On the @byday of', array(), array('context' => 'Date repeat')));
|
||||
$MONTHLY_on_the_BYDAY_of_BYMONTH['BYDAY_COUNT'] = array(
|
||||
'#type' => 'select',
|
||||
'#title' => $byday_count_title,
|
||||
'#default_value' => !empty($MONTHLY_BYDAY_COUNT) ? $MONTHLY_BYDAY_COUNT : '',
|
||||
'#options' => date_order_translated(),
|
||||
'#multiple' => FALSE,
|
||||
'#prefix' => '<div class="date-repeat-input byday-count">',
|
||||
'#suffix' => '</div>',
|
||||
);
|
||||
|
||||
$MONTHLY_on_the_BYDAY_of_BYMONTH['BYDAY_DAY'] = array(
|
||||
'#type' => 'select',
|
||||
'#title' => $byday_day_title,
|
||||
'#title_display' => 'after',
|
||||
'#default_value' => !empty($MONTHLY_BYDAY_DAY) ? $MONTHLY_BYDAY_DAY : '',
|
||||
'#options' => date_repeat_dow_day_options(TRUE),
|
||||
'#multiple' => FALSE,
|
||||
'#prefix' => '<div class="date-repeat-input byday-day">',
|
||||
'#suffix' => '</div>',
|
||||
);
|
||||
|
||||
$MONTHLY_on_the_BYDAY_of_BYMONTH['BYMONTH'] = array(
|
||||
'#type' => 'checkboxes',
|
||||
'#title' => t('Bymonth', array(), array('context' => 'Date repeat')),
|
||||
'#title_display' => 'invisible',
|
||||
'#default_value' => !empty($rrule['BYMONTH']) && $rrule['FREQ'] === 'MONTHLY' && $MONTHLY_day_month_default === 'BYDAY_BYMONTH' ? $rrule['BYMONTH'] : array(),
|
||||
'#options' => date_month_names_abbr(TRUE),
|
||||
'#attributes' => array('class' => array('container-inline')),
|
||||
'#multiple' => TRUE,
|
||||
'#prefix' => '<div class="date-clear bymonth">',
|
||||
'#suffix' => '</div>',
|
||||
);
|
||||
|
||||
$element['monthly']['day_month'] = array(
|
||||
'#type' => 'date_repeat_form_element_radios',
|
||||
'#tree' => TRUE,
|
||||
'#prefix' => '<div class="date-clear">',
|
||||
'#suffix' => '</div>',
|
||||
'#states' => array(
|
||||
'visible' => array(
|
||||
":input[name=\"{$element['#name']}[FREQ]\"]" => array('value' => 'MONTHLY'),
|
||||
),
|
||||
),
|
||||
'#attributes' => array('class' => array('date-repeat-radios clearfix')),
|
||||
'#default_value' => $MONTHLY_day_month_default,
|
||||
'#options' => array(
|
||||
'BYMONTHDAY_BYMONTH' => t('On day ... of ...'),
|
||||
'BYDAY_BYMONTH' => t('On the ... of ...'),
|
||||
),
|
||||
'BYMONTHDAY_BYMONTH_child' => $MONTHLY_on_day_BYMONTHDAY_of_BYMONTH,
|
||||
'BYDAY_BYMONTH_child' => $MONTHLY_on_the_BYDAY_of_BYMONTH,
|
||||
'#div_classes' => array(
|
||||
'date-repeat-radios-item date-clear clearfix bymonthday-bymonth',
|
||||
'date-repeat-radios-item date-clear clearfix byday-bymonth',
|
||||
),
|
||||
);
|
||||
|
||||
$YEARLY_day_month_default = 'BYMONTHDAY_BYMONTH';
|
||||
if (isset($rrule['FREQ']) && $rrule['FREQ'] === 'YEARLY' && !empty($rrule['BYDAY'])) {
|
||||
$YEARLY_day_month_default = 'BYDAY_BYMONTH';
|
||||
}
|
||||
|
||||
$YEARLY_on_day_BYMONTHDAY_of_BYMONTH = array(
|
||||
'#type' => 'container',
|
||||
'#tree' => TRUE,
|
||||
);
|
||||
|
||||
list($bymonthday_title, $bymonthday_suffix) = explode('@bymonthday', t('On day @bymonthday of', array(), array('context' => 'Date repeat')));
|
||||
$YEARLY_on_day_BYMONTHDAY_of_BYMONTH['BYMONTHDAY'] = array(
|
||||
'#type' => 'select',
|
||||
'#title' => $bymonthday_title,
|
||||
'#default_value' => !empty($rrule['BYMONTHDAY']) && $rrule['FREQ'] === 'YEARLY' ? $rrule['BYMONTHDAY'] : '',
|
||||
'#options' => drupal_map_assoc(range(1, 31)) + drupal_map_assoc(range(-1, -31)),
|
||||
'#multiple' => FALSE,
|
||||
'#prefix' => '<div class="date-clear bymonthday">',
|
||||
'#suffix' => '</div>',
|
||||
'#field_suffix' => $bymonthday_suffix,
|
||||
);
|
||||
|
||||
$YEARLY_on_day_BYMONTHDAY_of_BYMONTH['BYMONTH'] = array(
|
||||
'#type' => 'checkboxes',
|
||||
'#title' => t('Bymonth', array(), array('context' => 'Date repeat')),
|
||||
'#title_display' => 'invisible',
|
||||
'#default_value' => !empty($rrule['BYMONTH']) && $rrule['FREQ'] === 'YEARLY' && $YEARLY_day_month_default === 'BYMONTHDAY_BYMONTH' ? $rrule['BYMONTH'] : array(),
|
||||
'#options' => date_month_names_abbr(TRUE),
|
||||
'#attributes' => array('class' => array('container-inline')),
|
||||
'#multiple' => TRUE,
|
||||
'#prefix' => '<div class="date-clear bymonth">',
|
||||
'#suffix' => '</div>',
|
||||
);
|
||||
|
||||
$YEARLY_on_the_BYDAY_of_BYMONTH = array(
|
||||
'#type' => 'container',
|
||||
'#tree' => TRUE,
|
||||
);
|
||||
|
||||
$YEARLY_BYDAY_COUNT = '';
|
||||
$YEARLY_BYDAY_DAY = '';
|
||||
if (isset($rrule['BYDAY']) && !empty($rrule['BYDAY']) && $rrule['FREQ'] === 'YEARLY') {
|
||||
$YEARLY_BYDAY_COUNT = substr($rrule['BYDAY'][0], 0, -2);
|
||||
$YEARLY_BYDAY_DAY = substr($rrule['BYDAY'][0], -2);;
|
||||
}
|
||||
|
||||
list($byday_count_title, $byday_day_title) = explode('@byday', t('On the @byday of', array(), array('context' => 'Date repeat')));
|
||||
$YEARLY_on_the_BYDAY_of_BYMONTH['BYDAY_COUNT'] = array(
|
||||
'#type' => 'select',
|
||||
'#title' => $byday_count_title,
|
||||
'#default_value' => !empty($YEARLY_BYDAY_COUNT) ? $YEARLY_BYDAY_COUNT : '',
|
||||
'#options' => date_order_translated(),
|
||||
'#multiple' => FALSE,
|
||||
'#prefix' => '<div class="date-repeat-input byday-count">',
|
||||
'#suffix' => '</div>',
|
||||
);
|
||||
|
||||
$YEARLY_on_the_BYDAY_of_BYMONTH['BYDAY_DAY'] = array(
|
||||
'#type' => 'select',
|
||||
'#title' => $byday_day_title,
|
||||
'#title_display' => 'after',
|
||||
'#default_value' => !empty($YEARLY_BYDAY_DAY) ? $YEARLY_BYDAY_DAY : '',
|
||||
'#options' => date_repeat_dow_day_options(TRUE),
|
||||
'#multiple' => FALSE,
|
||||
'#prefix' => '<div class="date-repeat-input byday-day">',
|
||||
'#suffix' => '</div>',
|
||||
);
|
||||
|
||||
$YEARLY_on_the_BYDAY_of_BYMONTH['BYMONTH'] = array(
|
||||
'#type' => 'checkboxes',
|
||||
'#title' => t('Bymonth', array(), array('context' => 'Date repeat')),
|
||||
'#title_display' => 'invisible',
|
||||
'#default_value' => !empty($rrule['BYMONTH']) && $rrule['FREQ'] === 'YEARLY' && $YEARLY_day_month_default === 'BYDAY_BYMONTH' ? $rrule['BYMONTH'] : array(),
|
||||
'#options' => date_month_names_abbr(TRUE),
|
||||
'#attributes' => array('class' => array('container-inline')),
|
||||
'#multiple' => TRUE,
|
||||
'#prefix' => '<div class="date-clear bymonth">',
|
||||
'#suffix' => '</div>',
|
||||
);
|
||||
|
||||
$element['yearly']['day_month'] = array(
|
||||
'#type' => 'date_repeat_form_element_radios',
|
||||
'#tree' => TRUE,
|
||||
'#prefix' => '<div class="date-clear">',
|
||||
'#suffix' => '</div>',
|
||||
'#states' => array(
|
||||
'visible' => array(
|
||||
":input[name=\"{$element['#name']}[FREQ]\"]" => array('value' => 'YEARLY'),
|
||||
),
|
||||
),
|
||||
'#attributes' => array('class' => array('date-repeat-radios clearfix')),
|
||||
'#default_value' => $YEARLY_day_month_default,
|
||||
'#options' => array(
|
||||
'BYMONTHDAY_BYMONTH' => t('On day ... of ...'),
|
||||
'BYDAY_BYMONTH' => t('On the ... of ...'),
|
||||
),
|
||||
'BYMONTHDAY_BYMONTH_child' => $YEARLY_on_day_BYMONTHDAY_of_BYMONTH,
|
||||
'BYDAY_BYMONTH_child' => $YEARLY_on_the_BYDAY_of_BYMONTH,
|
||||
'#div_classes' => array(
|
||||
'date-repeat-radios-item date-clear clearfix bymonthday-bymonth',
|
||||
'date-repeat-radios-item date-clear clearfix byday-bymonth',
|
||||
),
|
||||
);
|
||||
|
||||
list($prefix, $suffix) = explode('@count', t('After @count occurrences', array(), array('context' => 'Date repeat')));
|
||||
$count_form_element = array(
|
||||
'#type' => 'textfield',
|
||||
'#title' => t('Count', array(), array('context' => 'Date repeat')),
|
||||
'#default_value' => $COUNT,
|
||||
'#element_validate' => array('element_validate_integer_positive'),
|
||||
'#attributes' => array('placeholder' => array('#')),
|
||||
'#prefix' => $prefix,
|
||||
'#suffix' => $suffix,
|
||||
'#size' => 10,
|
||||
'#maxlength' => 10,
|
||||
);
|
||||
|
||||
$until_form_element = array(
|
||||
'#type' => 'container',
|
||||
'#tree' => TRUE,
|
||||
'#prefix' => '<div class="date-prefix-inline">' . t('On', array(), array('context' => 'Date repeat')) . '</div>',
|
||||
'datetime' => array(
|
||||
'#type' => $element['#date_repeat_widget'],
|
||||
'#title' => t('Until', array(), array('context' => 'Date repeat')),
|
||||
'#title_display' => 'invisible',
|
||||
'#default_value' => $UNTIL,
|
||||
'#date_format' => !empty($element['#date_format']) ? date_limit_format($element['#date_format'], array('year', 'month', 'day')) : 'Y-m-d',
|
||||
'#date_timezone' => $timezone,
|
||||
'#date_text_parts' => !empty($element['#date_text_parts']) ? $element['#date_text_parts'] : array(),
|
||||
'#date_year_range' => !empty($element['#date_year_range']) ? $element['#date_year_range'] : '-3:+3',
|
||||
'#date_label_position' => !empty($element['#date_label_position']) ? $element['#date_label_position'] : 'within',
|
||||
'#date_flexible' => 0,
|
||||
),
|
||||
'tz' => array('#type' => 'hidden', '#value' => $element['#date_timezone']),
|
||||
'all_day' => array('#type' => 'hidden', '#value' => 1),
|
||||
'granularity' => array('#type' => 'hidden', '#value' => serialize(array('year', 'month', 'day'))),
|
||||
);
|
||||
|
||||
$range_of_repeat_default = 'COUNT';
|
||||
if (!empty($UNTIL)) {
|
||||
$range_of_repeat_default = 'UNTIL';
|
||||
}
|
||||
$element['range_of_repeat'] = array(
|
||||
'#type' => 'date_repeat_form_element_radios',
|
||||
'#tree' => TRUE,
|
||||
'#title' => t('Stop repeating', array(), array('context' => 'Date repeat')),
|
||||
'#title_display' => 'before',
|
||||
'#prefix' => '<div class="date-clear range-of-repeat">',
|
||||
'#suffix' => '</div>',
|
||||
'#states' => array(
|
||||
'invisible' => array(
|
||||
":input[name=\"{$element['#name']}[FREQ]\"]" => array('value' => 'NONE'),
|
||||
),
|
||||
),
|
||||
'#default_value' => $range_of_repeat_default,
|
||||
'#options' => array(
|
||||
'COUNT' => t('Count'),
|
||||
'UNTIL' => t('Until'),
|
||||
),
|
||||
'count_child' => $count_form_element,
|
||||
'until_child' => $until_form_element,
|
||||
'#div_classes' => array(
|
||||
'container-inline count',
|
||||
"until widget-{$element['#date_repeat_widget']} label-{$element['#date_label_position']}",
|
||||
),
|
||||
);
|
||||
|
||||
$parents = $element['#array_parents'];
|
||||
$instance = implode('-', $parents);
|
||||
|
||||
// Make sure this will work right either in the normal form or in an ajax callback from the 'Add more' button.
|
||||
if (empty($form_state['num_exceptions'][$instance])) {
|
||||
$form_state['num_exceptions'][$instance] = count($exceptions);
|
||||
}
|
||||
if ($form_state['num_exceptions'][$instance] == 0) {
|
||||
$collapsed = TRUE;
|
||||
}
|
||||
else {
|
||||
$collapsed = FALSE;
|
||||
}
|
||||
|
||||
$element['show_exceptions'] = array(
|
||||
'#type' => 'checkbox',
|
||||
'#title' => t('Exclude dates', array(), array('context' => 'Date repeat')),
|
||||
'#states' => array(
|
||||
'invisible' => array(
|
||||
":input[name=\"{$element['#name']}[FREQ]\"]" => array('value' => 'NONE'),
|
||||
),
|
||||
),
|
||||
'#default_value' => empty($form_state['num_exceptions'][$instance]) ? 0 : 1,
|
||||
);
|
||||
|
||||
$element['exceptions'] = array(
|
||||
'#type' => 'container',
|
||||
'#prefix' => '<div id="date-repeat-exceptions-' . $instance . '" class="date-repeat">',
|
||||
'#suffix' => '</div>',
|
||||
'#states' => array(
|
||||
'visible' => array(
|
||||
":input[name=\"{$element['#name']}[show_exceptions]\"]" => array('checked' => TRUE),
|
||||
),
|
||||
),
|
||||
);
|
||||
for ($i = 0; $i < max($form_state['num_exceptions'][$instance], 1) ; $i++) {
|
||||
$EXCEPT = '';
|
||||
if (!empty($exceptions[$i]['datetime'])) {
|
||||
$ex_date = new DateObject($exceptions[$i]['datetime'], $exceptions[$i]['tz']);
|
||||
date_timezone_set($ex_date, timezone_open($timezone));
|
||||
$EXCEPT = date_format($ex_date, DATE_FORMAT_DATETIME);
|
||||
}
|
||||
$element['exceptions']['EXDATE'][$i] = array(
|
||||
'#tree' => TRUE,
|
||||
'datetime' => array(
|
||||
'#name' => 'exceptions|' . $instance,
|
||||
'#type' => $element['#date_repeat_widget'],
|
||||
'#default_value' => $EXCEPT,
|
||||
'#date_timezone' => !empty($element['#date_timezone']) ? $element['#date_timezone'] : date_default_timezone(),
|
||||
'#date_format' => !empty($element['#date_format']) ? date_limit_format($element['#date_format'], array('year', 'month', 'day')) : 'Y-m-d',
|
||||
'#date_text_parts' => !empty($element['#date_text_parts']) ? $element['#date_text_parts'] : array(),
|
||||
'#date_year_range' => !empty($element['#date_year_range']) ? $element['#date_year_range'] : '-3:+3',
|
||||
'#date_label_position' => !empty($element['#date_label_position']) ? $element['#date_label_position'] : 'within',
|
||||
'#date_flexible' => 0,
|
||||
),
|
||||
'tz' => array('#type' => 'hidden', '#value' => $element['#date_timezone']),
|
||||
'all_day' => array('#type' => 'hidden', '#value' => 1),
|
||||
'granularity' => array('#type' => 'hidden', '#value' => serialize(array('year', 'month', 'day'))),
|
||||
);
|
||||
}
|
||||
|
||||
// collect additions in the same way as exceptions - implements RDATE.
|
||||
if (empty($form_state['num_additions'][$instance])) {
|
||||
$form_state['num_additions'][$instance] = count($additions);
|
||||
}
|
||||
if ($form_state['num_additions'][$instance] == 0) {
|
||||
$collapsed = TRUE;
|
||||
}
|
||||
else {
|
||||
$collapsed = FALSE;
|
||||
}
|
||||
|
||||
$element['show_additions'] = array(
|
||||
'#type' => 'checkbox',
|
||||
'#title' => t('Include dates', array(), array('context' => 'Date repeat')),
|
||||
'#states' => array(
|
||||
'invisible' => array(
|
||||
":input[name=\"{$element['#name']}[FREQ]\"]" => array('value' => 'NONE'),
|
||||
),
|
||||
),
|
||||
'#default_value' => empty($form_state['num_additions'][$instance]) ? 0 : 1,
|
||||
);
|
||||
|
||||
$element['additions'] = array(
|
||||
'#type' => 'container',
|
||||
'#prefix' => '<div id="date-repeat-additions-' . $instance . '" class="date-repeat">',
|
||||
'#suffix' => '</div>',
|
||||
'#states' => array(
|
||||
'visible' => array(
|
||||
":input[name=\"{$element['#name']}[show_additions]\"]" => array('checked' => TRUE),
|
||||
),
|
||||
),
|
||||
);
|
||||
for ($i = 0; $i < max($form_state['num_additions'][$instance], 1) ; $i++) {
|
||||
$RDATE = '';
|
||||
if (!empty($additions[$i]['datetime'])) {
|
||||
$rdate = new DateObject($additions[$i]['datetime'], $additions[$i]['tz']);
|
||||
date_timezone_set($rdate, timezone_open($timezone));
|
||||
$RDATE = date_format($rdate, DATE_FORMAT_DATETIME);
|
||||
}
|
||||
$element['additions']['RDATE'][$i] = array(
|
||||
'#tree' => TRUE,
|
||||
'datetime' => array(
|
||||
'#type' => $element['#date_repeat_widget'],
|
||||
'#name' => 'additions|' . $instance,
|
||||
'#default_value' => $RDATE,
|
||||
'#date_timezone' => !empty($element['#date_timezone']) ? $element['#date_timezone'] : date_default_timezone(),
|
||||
'#date_format' => !empty($element['#date_format']) ? date_limit_format($element['#date_format'], array('year', 'month', 'day')) : 'Y-m-d',
|
||||
'#date_text_parts' => !empty($element['#date_text_parts']) ? $element['#date_text_parts'] : array(),
|
||||
'#date_year_range' => !empty($element['#date_year_range']) ? $element['#date_year_range'] : '-3:+3',
|
||||
'#date_label_position' => !empty($element['#date_label_position']) ? $element['#date_label_position'] : 'within',
|
||||
'#date_flexible' => 0,
|
||||
),
|
||||
'tz' => array('#type' => 'hidden', '#value' => $element['#date_timezone']),
|
||||
'all_day' => array('#type' => 'hidden', '#value' => 1),
|
||||
'granularity' => array('#type' => 'hidden', '#value' => serialize(array('year', 'month', 'day'))),
|
||||
);
|
||||
}
|
||||
|
||||
$element['exceptions']['exceptions_add'] = array(
|
||||
'#type' => 'submit',
|
||||
'#name' => 'exceptions_add|' . $instance,
|
||||
'#value' => t('Add exception'),
|
||||
'#submit' => array('date_repeat_add_exception'),
|
||||
'#limit_validation_errors' => array(),
|
||||
'#ajax' => array(
|
||||
'callback' => 'date_repeat_add_exception_callback',
|
||||
'wrapper' => 'date-repeat-exceptions-' . $instance,
|
||||
),
|
||||
);
|
||||
$element['additions']['additions_add'] = array(
|
||||
'#type' => 'submit',
|
||||
'#name' => 'additions_add|' . $instance,
|
||||
'#value' => t('Add addition'),
|
||||
'#submit' => array('date_repeat_add_addition'),
|
||||
'#limit_validation_errors' => array(),
|
||||
'#ajax' => array(
|
||||
'callback' => 'date_repeat_add_addition_callback',
|
||||
'wrapper' => 'date-repeat-additions-' . $instance,
|
||||
),
|
||||
);
|
||||
|
||||
$element['#date_repeat_collapsed'] = !empty($rrule['INTERVAL']) || !empty($rrule['FREQ']) ? 0 : (!empty($element['#date_repeat_collapsed']) ? $element['#date_repeat_collapsed'] : 0);
|
||||
return $element;
|
||||
}
|
||||
|
||||
function date_repeat_add_exception_callback($form, &$form_state) {
|
||||
$parents = $form_state['triggering_element']['#array_parents'];
|
||||
$button_key = array_pop($parents);
|
||||
$element = drupal_array_get_nested_value($form, $parents);
|
||||
return $element;
|
||||
}
|
||||
|
||||
function date_repeat_add_addition_callback($form, &$form_state) {
|
||||
$parents = $form_state['triggering_element']['#array_parents'];
|
||||
$button_key = array_pop($parents);
|
||||
$element = drupal_array_get_nested_value($form, $parents);
|
||||
return $element;
|
||||
}
|
||||
|
||||
function date_repeat_add_exception($form, &$form_state) {
|
||||
$parents = $form_state['triggering_element']['#array_parents'];
|
||||
$instance = implode('-', array_slice($parents, 0, count($parents) - 2));
|
||||
$form_state['num_exceptions'][$instance]++;
|
||||
$form_state['rebuild'] = TRUE;
|
||||
}
|
||||
|
||||
function date_repeat_add_addition($form, &$form_state) {
|
||||
$parents = $form_state['triggering_element']['#array_parents'];
|
||||
$instance = implode('-', array_slice($parents, 0, count($parents) - 2));
|
||||
$form_state['num_additions'][$instance]++;
|
||||
$form_state['rebuild'] = TRUE;
|
||||
}
|
||||
|
||||
/**
|
||||
* Regroup values back into a consistant array, no matter what state it is in.
|
||||
*/
|
||||
function date_repeat_merge($form_values, $element) {
|
||||
if (empty($form_values) || !is_array($form_values)) {
|
||||
return $form_values;
|
||||
}
|
||||
if (array_key_exists('exceptions', $form_values) || array_key_exists('additions', $form_values)) {
|
||||
if (!array_key_exists('exceptions', $form_values)) $form_values['exceptions'] = array();
|
||||
if (!array_key_exists('additions', $form_values)) $form_values['additions'] = array();
|
||||
$form_values = array_merge($form_values, (array) $form_values['exceptions'], (array) $form_values['additions']);
|
||||
unset($form_values['exceptions']);
|
||||
unset($form_values['additions']);
|
||||
}
|
||||
|
||||
if (array_key_exists('FREQ', $form_values)) {
|
||||
switch ($form_values['FREQ']) {
|
||||
case 'DAILY':
|
||||
if (array_key_exists('daily', $form_values)) {
|
||||
switch ($form_values['daily']['byday_radios']) {
|
||||
case 'INTERVAL':
|
||||
$form_values['INTERVAL'] = $form_values['daily']['INTERVAL_child'];
|
||||
break;
|
||||
case 'every_weekday':
|
||||
$form_values['BYDAY'] = array('MO', 'TU', 'WE', 'TH', 'FR');
|
||||
break;
|
||||
case 'every_mo_we_fr':
|
||||
$form_values['BYDAY'] = array('MO', 'WE', 'FR');
|
||||
break;
|
||||
case 'every_tu_th':
|
||||
$form_values['BYDAY'] = array('TU', 'TH');
|
||||
break;
|
||||
}
|
||||
}
|
||||
break;
|
||||
case 'WEEKLY':
|
||||
if (array_key_exists('weekly', $form_values)) {
|
||||
$form_values = array_merge($form_values, (array) $form_values['weekly']);
|
||||
if (array_key_exists('BYDAY', $form_values)) {
|
||||
$form_values['BYDAY'] = date_repeat_transform_checkbox_values_to_select_values($form_values['BYDAY']);
|
||||
}
|
||||
}
|
||||
break;
|
||||
case 'MONTHLY':
|
||||
if (array_key_exists('monthly', $form_values)) {
|
||||
switch ($form_values['monthly']['day_month']) {
|
||||
case 'BYMONTHDAY_BYMONTH':
|
||||
$form_values['monthly'] = array_merge($form_values['monthly'], (array) $form_values['monthly']['BYMONTHDAY_BYMONTH_child']);
|
||||
break;
|
||||
case 'BYDAY_BYMONTH':
|
||||
$form_values['monthly']['BYDAY_BYMONTH_child']['BYDAY'] = $form_values['monthly']['BYDAY_BYMONTH_child']['BYDAY_COUNT'] . $form_values['monthly']['BYDAY_BYMONTH_child']['BYDAY_DAY'];
|
||||
$form_values['monthly'] = array_merge($form_values['monthly'], (array) $form_values['monthly']['BYDAY_BYMONTH_child']);
|
||||
break;
|
||||
}
|
||||
unset($form_values['monthly']['BYDAY_BYMONTH_child']);
|
||||
unset($form_values['monthly']['BYMONTHDAY_BYMONTH_child']);
|
||||
$form_values = array_merge($form_values, (array) $form_values['monthly']);
|
||||
if (array_key_exists('BYMONTH', $form_values)) {
|
||||
$form_values['BYMONTH'] = date_repeat_transform_checkbox_values_to_select_values($form_values['BYMONTH']);
|
||||
}
|
||||
if (array_key_exists('BYMONTHDAY', $form_values) && !is_array($form_values['BYMONTHDAY'])) {
|
||||
$form_values['BYMONTHDAY'] = (array) $form_values['BYMONTHDAY'];
|
||||
}
|
||||
if (array_key_exists('BYDAY', $form_values) && !is_array($form_values['BYDAY'])) {
|
||||
$form_values['BYDAY'] = (array) $form_values['BYDAY'];
|
||||
}
|
||||
}
|
||||
break;
|
||||
case 'YEARLY':
|
||||
if (array_key_exists('yearly', $form_values)) {
|
||||
switch ($form_values['yearly']['day_month']) {
|
||||
case 'BYMONTHDAY_BYMONTH':
|
||||
$form_values['yearly'] = array_merge($form_values['yearly'], (array) $form_values['yearly']['BYMONTHDAY_BYMONTH_child']);
|
||||
break;
|
||||
case 'BYDAY_BYMONTH':
|
||||
$form_values['yearly']['BYDAY_BYMONTH_child']['BYDAY'] = $form_values['yearly']['BYDAY_BYMONTH_child']['BYDAY_COUNT'] . $form_values['yearly']['BYDAY_BYMONTH_child']['BYDAY_DAY'];
|
||||
$form_values['yearly'] = array_merge($form_values['yearly'], (array) $form_values['yearly']['BYDAY_BYMONTH_child']);
|
||||
break;
|
||||
}
|
||||
unset($form_values['yearly']['BYDAY_BYMONTH_child']);
|
||||
unset($form_values['yearly']['BYMONTHDAY_BYMONTH_child']);
|
||||
$form_values = array_merge($form_values, (array) $form_values['yearly']);
|
||||
if (array_key_exists('BYMONTH', $form_values)) {
|
||||
$form_values['BYMONTH'] = date_repeat_transform_checkbox_values_to_select_values($form_values['BYMONTH']);
|
||||
}
|
||||
if (array_key_exists('BYMONTHDAY', $form_values) && !is_array($form_values['BYMONTHDAY'])) {
|
||||
$form_values['BYMONTHDAY'] = (array) $form_values['BYMONTHDAY'];
|
||||
}
|
||||
if (array_key_exists('BYDAY', $form_values) && !is_array($form_values['BYDAY'])) {
|
||||
$form_values['BYDAY'] = (array) $form_values['BYDAY'];
|
||||
}
|
||||
}
|
||||
break;
|
||||
default:
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
unset($form_values['daily']);
|
||||
unset($form_values['weekly']);
|
||||
unset($form_values['monthly']);
|
||||
unset($form_values['yearly']);
|
||||
|
||||
if (array_key_exists('range_of_repeat', $form_values)) {
|
||||
switch ($form_values['range_of_repeat']) {
|
||||
case 'COUNT':
|
||||
$form_values['COUNT'] = $form_values['count_child'];
|
||||
break;
|
||||
case 'UNTIL':
|
||||
$form_values['UNTIL'] = $form_values['until_child'];
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
unset($form_values['count_child']);
|
||||
unset($form_values['until_child']);
|
||||
|
||||
if (array_key_exists('BYDAY', $form_values) && is_array($form_values['BYDAY'])) unset($form_values['BYDAY']['']);
|
||||
if (array_key_exists('BYMONTH', $form_values) && is_array($form_values['BYMONTH'])) unset($form_values['BYMONTH']['']);
|
||||
if (array_key_exists('BYMONTHDAY', $form_values) && is_array($form_values['BYMONTHDAY'])) unset($form_values['BYMONTHDAY']['']);
|
||||
|
||||
if (array_key_exists('UNTIL', $form_values) && is_array($form_values['UNTIL']['datetime'])) {
|
||||
$function = $element['#date_repeat_widget'] . '_input_date';
|
||||
$until_element = $element;
|
||||
$until_element['#date_format'] = !empty($element['#date_format']) ? date_limit_format($element['#date_format'], array('year', 'month', 'day')) : 'Y-m-d';
|
||||
$date = $function($until_element, $form_values['UNTIL']['datetime']);
|
||||
$form_values['UNTIL']['datetime'] = is_object($date) ? $date->format(DATE_FORMAT_DATETIME) : '';
|
||||
}
|
||||
if (array_key_exists('show_exceptions', $form_values) && $form_values['show_exceptions'] === 0) {
|
||||
unset($form_values['EXDATE']);
|
||||
}
|
||||
if (array_key_exists('EXDATE', $form_values) && is_array($form_values['EXDATE'])) {
|
||||
$function = $element['#date_repeat_widget'] . '_input_date';
|
||||
$exdate_element = $element;
|
||||
foreach ($form_values['EXDATE'] as $delta => $value) {
|
||||
if (is_array($value['datetime'])) {
|
||||
$exdate_element['#date_format'] = !empty($element['#date_format']) ? date_limit_format($element['#date_format'], array('year', 'month', 'day')) : 'Y-m-d';
|
||||
$date = $function($exdate_element, $form_values['EXDATE'][$delta]['datetime']);
|
||||
$form_values['EXDATE'][$delta]['datetime'] = is_object($date) ? $date->format(DATE_FORMAT_DATETIME) : '';
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
if (array_key_exists('show_additions', $form_values) && $form_values['show_additions'] === 0) {
|
||||
unset($form_values['RDATE']);
|
||||
}
|
||||
if (array_key_exists('RDATE', $form_values) && is_array($form_values['RDATE'])) {
|
||||
$function = $element['#date_repeat_widget'] . '_input_date';
|
||||
$rdate_element = $element;
|
||||
foreach ($form_values['RDATE'] as $delta => $value) {
|
||||
if (is_array($value['datetime'])) {
|
||||
$rdate_element['#date_format'] = !empty($element['#date_format']) ? date_limit_format($element['#date_format'], array('year', 'month', 'day')) : 'Y-m-d';
|
||||
$date = $function($rdate_element, $form_values['RDATE'][$delta]['datetime']);
|
||||
$form_values['RDATE'][$delta]['datetime'] = is_object($date) ? $date->format(DATE_FORMAT_DATETIME) : '';
|
||||
}
|
||||
}
|
||||
}
|
||||
return $form_values;
|
||||
}
|
||||
|
||||
/**
|
||||
* Build a RRULE out of the form values.
|
||||
*/
|
||||
function date_repeat_rrule_validate($element, &$form_state) {
|
||||
|
||||
if (date_hidden_element($element)) {
|
||||
return;
|
||||
}
|
||||
|
||||
$parents = $element['#parents'];
|
||||
array_pop($parents);
|
||||
$field_values = drupal_array_get_nested_value($form_state['values'], $parents);
|
||||
if ($field_values['show_repeat_settings'] === 0 || $field_values['rrule']['FREQ'] === 'NONE') {
|
||||
form_set_value($element, NULL, $form_state);
|
||||
return;
|
||||
}
|
||||
|
||||
// Clean the buttons off of the form. Needed to avoid errors when
|
||||
// the date is used on a user object, which then passes the form
|
||||
// through form_state_values_clean().
|
||||
foreach ($form_state['buttons'] as $delta => $item) {
|
||||
if (!empty($item['#ajax']['callback']) && in_array($item['#ajax']['callback'], array('date_repeat_add_exception_callback', 'date_repeat_add_addition_callback'))) {
|
||||
unset($form_state['buttons'][$delta]);
|
||||
}
|
||||
}
|
||||
|
||||
module_load_include('inc', 'date_api', 'date_api_ical');
|
||||
|
||||
$item = drupal_array_get_nested_value($form_state['values'], $element['#parents']);
|
||||
$item = date_repeat_merge($item, $element);
|
||||
$rrule = date_api_ical_build_rrule($item);
|
||||
form_set_value($element, $rrule, $form_state);
|
||||
}
|
||||
|
||||
/**
|
||||
* Theme the exception list as a table so the buttons line up
|
||||
*/
|
||||
function theme_date_repeat_current_exceptions($vars) {
|
||||
$rows = $vars['rows'];
|
||||
$rows_info = array();
|
||||
foreach ($rows as $key => $value) {
|
||||
if (substr($key, 0, 1) != '#') {
|
||||
$rows_info[] = array(drupal_render($value['action']), drupal_render($value['display']));
|
||||
}
|
||||
}
|
||||
return theme('table', array('header' => array(t('Delete'), t('Current exceptions')), 'rows' => $rows_info));
|
||||
}
|
||||
|
||||
/**
|
||||
* Theme the exception list as a table so the buttons line up
|
||||
*/
|
||||
function theme_date_repeat_current_additions($rows = array()) {
|
||||
$rows_info = array();
|
||||
foreach ($rows as $key => $value) {
|
||||
if (substr($key, 0, 1) != '#') {
|
||||
$rows_info[] = array(drupal_render($value['action']), drupal_render($value['display']));
|
||||
}
|
||||
}
|
||||
return theme('table', array('header' => array(t('Delete'), t('Current additions')), 'rows' => $rows_info));
|
||||
}
|
||||
|
||||
/**
|
||||
* Wrapper fieldset for repeat rule.
|
||||
*/
|
||||
function theme_date_repeat_rrule($vars) {
|
||||
$element = $vars['element'];
|
||||
$class = $element['#date_repeat_collapsed'] ? array('date-no-float', 'collapsible', 'collapsed') : array('date-no-float', 'collapsible');
|
||||
$id = drupal_html_id('repeat-settings-fieldset');
|
||||
$parents = $element['#parents'];
|
||||
$selector = "{$parents[0]}[{$parents[1]}][{$parents[2]}][show_repeat_settings]";
|
||||
$fieldset = array(
|
||||
'#type' => 'item',
|
||||
'#title' => t('Repeat settings'),
|
||||
'#title_display' => 'invisible',
|
||||
'#attributes' => array('class' => $class),
|
||||
'#markup' => $element['#children'],
|
||||
'#states' => array(
|
||||
'visible' => array(
|
||||
":input[name=\"{$selector}\"]" => array('checked' => TRUE),
|
||||
),
|
||||
),
|
||||
'#id' => $id,
|
||||
);
|
||||
|
||||
return drupal_render($fieldset);
|
||||
}
|
||||
|
||||
function date_repeat_filter_non_zero_value($value) {
|
||||
return $value !== 0;
|
||||
}
|
||||
|
||||
/**
|
||||
* Helper function for transforming the return value of checkbox(es) element.
|
||||
*
|
||||
* Can be used for transforming the returned value of checkbox(es) element
|
||||
* to the format of returned value of multiple select element.
|
||||
*/
|
||||
function date_repeat_transform_checkbox_values_to_select_values($values) {
|
||||
return array_filter($values, 'date_repeat_filter_non_zero_value');
|
||||
}
|
||||
@@ -0,0 +1,455 @@
|
||||
<?php
|
||||
|
||||
/**
|
||||
* @file
|
||||
* Test Date Repeat calculations.
|
||||
*/
|
||||
|
||||
class DateRepeatTestCase extends DrupalWebTestCase {
|
||||
public static function getInfo() {
|
||||
return array(
|
||||
'name' => t('Date Repeat'),
|
||||
'description' => t('Test Date Repeat functions to create arrays of dates from iCal rules.') ,
|
||||
'group' => t('Date'),
|
||||
);
|
||||
}
|
||||
|
||||
/**
|
||||
* Implements setUp().
|
||||
*/
|
||||
public function setUp() {
|
||||
// Load the date_repeat module.
|
||||
parent::setUp('date_api', 'date_repeat');
|
||||
}
|
||||
|
||||
public function testDateRepeat() {
|
||||
require_once('./' . drupal_get_path('module', 'date_api') . '/date_api_ical.inc');
|
||||
require_once('./' . drupal_get_path('module', 'date_repeat') . '/date_repeat_calc.inc');
|
||||
// Examples adapted from http://www.faqs.org/rfcs/rfc2445.html and
|
||||
// http://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";
|
||||
// ==> (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
|
||||
// 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";
|
||||
// ==> (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
|
||||
$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: 1997 EDT August 5,17,19,31;
|
||||
$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);
|
||||
|
||||
return;
|
||||
|
||||
//Every Thanksgiving, forever:
|
||||
$start = "1997-01-01 09:00:00";
|
||||
$end = "2001-02-01 09:00:00";
|
||||
$rule = 'RRULE:FREQ=YEARLY;INTERVAL=1;BYMONTH=11;BYDAY=4TH';
|
||||
// ==> (1997 9:00 AM EDT)Nov
|
||||
// (1999 9:00 AM EDT)Nov
|
||||
// (2001 9:00 AM EDT)Nov
|
||||
$dates = date_repeat_calc($rule, $start, $end, array());
|
||||
$shouldbe = '';
|
||||
$result = implode(', ', $dates);
|
||||
$this->assertEqual($result, $shouldbe, $rule . '; Starting ' . $start . '; results: ' . $result);
|
||||
|
||||
// TODO:
|
||||
// BYYEARDAY, BYSETPOS,
|
||||
// BYHOUR, BYMINUTE, HOURLY, MINUTELY, SECONDLY
|
||||
// have not yet been implemented in date_repeat.
|
||||
|
||||
//Every 3rd year on the 1st, 100th and 200th day for 10 occurrences:
|
||||
$date = "DTSTART;TZID=US-Eastern:19970101T090000";
|
||||
$rule = "RRULE:FREQ=YEARLY;INTERVAL=3;COUNT=10;BYYEARDAY=1,100,200";
|
||||
// ==> (1997 9:00 AM EST)January 1
|
||||
// (1997 9:00 AM EDT)April 10;July 19
|
||||
// (2000 9:00 AM EST)January 1
|
||||
// (2000 9:00 AM EDT)April 9;July 18
|
||||
// (2003 9:00 AM EST)January 1
|
||||
// (2003 9:00 AM EDT)April 10;July 19
|
||||
// (2006 9:00 AM EST)January 1
|
||||
|
||||
//Monday of week number 20 (where the default start of the week is Monday), forever:
|
||||
$date = "DTSTART;TZID=US-Eastern:19970512T090000";
|
||||
$rule = "RRULE:FREQ=YEARLY;BYWEEKNO=20;BYDAY=MO";
|
||||
// ==> (1997 9:00 AM EDT)May 12
|
||||
// (1998 9:00 AM EDT)May 11
|
||||
// (1999 9:00 AM EDT)May 17
|
||||
|
||||
//The 3rd instance into the month of one of Tuesday, Wednesday or
|
||||
//Thursday, for the next 3 months:
|
||||
$date = "DTSTART;TZID=US-Eastern:19970904T090000";
|
||||
$rule = "RRULE:FREQ=MONTHLY;COUNT=3;BYDAY=TU,WE,TH;BYSETPOS=3";
|
||||
// ==> (1997 9:00 AM EDT)September 4;October 7
|
||||
// (1997 9:00 AM EST)November 6
|
||||
|
||||
//The 2nd to last weekday of the month:
|
||||
$date = "DTSTART;TZID=US-Eastern:19970929T090000";
|
||||
$rule = "RRULE:FREQ=MONTHLY;BYDAY=MO,TU,WE,TH,FR;BYSETPOS=-2";
|
||||
// ==> (1997 9:00 AM EDT)September 29
|
||||
// (1997 9:00 AM EST)October 30;November 27;December 30
|
||||
// (1998 9:00 AM EST)January 29;February 26;March 30
|
||||
|
||||
//Every 3 hours from 9:00 AM to 5:00 PM on a specific day:
|
||||
$date = "DTSTART;TZID=US-Eastern:19970902T090000";
|
||||
$rule = "RRULE:FREQ=HOURLY;INTERVAL=3;UNTIL=19970902T170000Z";
|
||||
// ==> (September 2, 1997 EDT)09:00,12:00,15:00
|
||||
|
||||
//Every 15 minutes for 6 occurrences:
|
||||
$date = "DTSTART;TZID=US-Eastern:19970902T090000";
|
||||
$rule = "RRULE:FREQ=MINUTELY;INTERVAL=15;COUNT=6";
|
||||
// ==> (September 2, 1997 EDT)09:00,09:15,09:30,09:45,10:00,10:15
|
||||
|
||||
//Every hour and a half for 4 occurrences:
|
||||
$date = "DTSTART;TZID=US-Eastern:19970902T090000";
|
||||
$rule = "RRULE:FREQ=MINUTELY;INTERVAL=90;COUNT=4";
|
||||
// ==> (September 2, 1997 EDT)09:00,10:30;12:00;13:30
|
||||
|
||||
//Every 20 minutes from 9:00 AM to 4:40 PM every day:
|
||||
$date = "DTSTART;TZID=US-Eastern:19970902T090000";
|
||||
$rule = "RRULE:FREQ=DAILY;BYHOUR=9,10,11,12,13,14,15,16;BYMINUTE=0,20,40";
|
||||
// or
|
||||
$rule = "RRULE:FREQ=MINUTELY;INTERVAL=20;BYHOUR=9,10,11,12,13,14,15,16";
|
||||
// ==> (September 2, 1997 EDT)9:00,9:20,9:40,10:00,10:20,16:00,16:20,16:40
|
||||
// (September 3, 1997 EDT)9:00,9:20,9:40,10:00,10:20,16:00,16:20,16:40
|
||||
|
||||
}
|
||||
}
|
||||
@@ -0,0 +1,520 @@
|
||||
<?php
|
||||
|
||||
/**
|
||||
* @file
|
||||
* Test Date Repeat form.
|
||||
*/
|
||||
|
||||
class DateRepeatFormTestCase extends DrupalWebTestCase {
|
||||
protected $privileged_user;
|
||||
|
||||
public static function getInfo() {
|
||||
return array(
|
||||
'name' => t('Date Repeat Form'),
|
||||
'description' => t('Test Date Repeat form.') ,
|
||||
'group' => t('Date'),
|
||||
);
|
||||
}
|
||||
|
||||
/**
|
||||
* Implements setUp().
|
||||
*/
|
||||
public function setUp() {
|
||||
// Load the date_repeat module.
|
||||
parent::setUp('field', 'field_ui', 'date_api', 'date_repeat', 'date', 'date_popup', 'date_repeat_field');
|
||||
|
||||
// Create and log in our privileged user.
|
||||
$this->privileged_user = $this->drupalCreateUser(array(
|
||||
'administer content types', 'administer nodes', 'bypass node access', 'view date repeats'
|
||||
));
|
||||
$this->drupalLogin($this->privileged_user);
|
||||
|
||||
variable_set('date_format_short', 'Y-m-d H:i');
|
||||
}
|
||||
|
||||
public function testDateRepeatForm() {
|
||||
$edit = array();
|
||||
$edit['name'] = 'Date';
|
||||
$edit['type'] = 'date';
|
||||
$this->drupalPost('admin/structure/types/add', $edit, t('Save content type'));
|
||||
$this->assertText('The content type Date has been added.', 'Content type added.');
|
||||
$display_all_day = FALSE;
|
||||
|
||||
// Testing options.
|
||||
$widget_options = array(
|
||||
'date_select' => 'select',
|
||||
'date_text' => 'text',
|
||||
'date_popup' => 'popup');
|
||||
|
||||
foreach ($widget_options as $widget => $options) {
|
||||
// Daily tests
|
||||
// Creates date field stored as a datetime.
|
||||
$this->createDateField($type = 'datetime', $widget, $display_all_day);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'daily_1');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'daily_2');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'daily_3');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'daily_4');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'daily_1', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'daily_2', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'daily_3', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'daily_4', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'daily_1', FALSE, 'exclude');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'daily_1', FALSE, 'include');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'daily_1', FALSE, 'exclude_include');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
// Weekly tests
|
||||
|
||||
$form_edit = $this->dateForm($options, 'weekly_1');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'weekly_2');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'weekly_3');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'weekly_4');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'weekly_1', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'weekly_2', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'weekly_3', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'weekly_4', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
// Monthly tests
|
||||
|
||||
$form_edit = $this->dateForm($options, 'monthly_1');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'monthly_2');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'monthly_3');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'monthly_4');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'monthly_5');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'monthly_6');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'monthly_1', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'monthly_2', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'monthly_3', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'monthly_4', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'monthly_5', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'monthly_6', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
// Yearly tests
|
||||
|
||||
$form_edit = $this->dateForm($options, 'yearly_1');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'yearly_2');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'yearly_3');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'yearly_4');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'yearly_5');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'yearly_6');
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'yearly_1', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'yearly_2', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'yearly_3', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'yearly_4', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'yearly_5', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$form_edit = $this->dateForm($options, 'yearly_6', TRUE);
|
||||
$this->verifyDateForm($form_edit);
|
||||
|
||||
$this->deleteDateField();
|
||||
}
|
||||
}
|
||||
|
||||
function dateForm($options, $test_id = NULL, $is_count = FALSE, $exclude_include = NULL) {
|
||||
// Tests that date field functions properly.
|
||||
$edit = array();
|
||||
$edit['title'] = $this->randomName(8);
|
||||
$edit['body[und][0][value]'] = $this->randomName(16);
|
||||
|
||||
switch ($options) {
|
||||
case 'select':
|
||||
$edit['field_test[und][0][value][year]'] = '2010';
|
||||
$edit['field_test[und][0][value][month]'] = '10';
|
||||
$edit['field_test[und][0][value][day]'] = '7';
|
||||
$edit['field_test[und][0][value][hour]'] = '10';
|
||||
$edit['field_test[und][0][value][minute]'] = '30';
|
||||
break;
|
||||
case 'text':
|
||||
$edit['field_test[und][0][value][date]'] = '2010-10-07 10:30';
|
||||
break;
|
||||
case 'popup':
|
||||
$edit['field_test[und][0][value][date]'] = '2010-10-07';
|
||||
$edit['field_test[und][0][value][time]'] = '10:30';
|
||||
break;
|
||||
}
|
||||
|
||||
// Tests that Date repeat settings function properly
|
||||
if ($test_id !== NULL) {
|
||||
$edit['field_test[und][0][show_repeat_settings]'] = TRUE;
|
||||
$count = 5;
|
||||
|
||||
switch ($test_id) {
|
||||
// Daily test cases
|
||||
case 'daily_1':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'DAILY';
|
||||
$edit['field_test[und][0][rrule][daily][byday_radios]'] = 'INTERVAL';
|
||||
$edit['field_test[und][0][rrule][daily][INTERVAL_child]'] = 2;
|
||||
break;
|
||||
case 'daily_2':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'DAILY';
|
||||
$edit['field_test[und][0][rrule][daily][byday_radios]'] = 'every_weekday';
|
||||
break;
|
||||
case 'daily_3':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'DAILY';
|
||||
$edit['field_test[und][0][rrule][daily][byday_radios]'] = 'every_mo_we_fr';
|
||||
break;
|
||||
case 'daily_4':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'DAILY';
|
||||
$edit['field_test[und][0][rrule][daily][byday_radios]'] = 'every_tu_th';
|
||||
break;
|
||||
|
||||
// Weekly test cases
|
||||
case 'weekly_1':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'WEEKLY';
|
||||
$edit['field_test[und][0][rrule][weekly][BYDAY][MO]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][weekly][BYDAY][WE]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][weekly][BYDAY][TH]'] = TRUE;
|
||||
break;
|
||||
case 'weekly_2':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'WEEKLY';
|
||||
$edit['field_test[und][0][rrule][weekly][INTERVAL]'] = 1;
|
||||
$edit['field_test[und][0][rrule][weekly][BYDAY][MO]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][weekly][BYDAY][FR]'] = TRUE;
|
||||
break;
|
||||
case 'weekly_3':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'WEEKLY';
|
||||
$edit['field_test[und][0][rrule][weekly][INTERVAL]'] = 2;
|
||||
$edit['field_test[und][0][rrule][weekly][BYDAY][TU]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][weekly][BYDAY][TH]'] = TRUE;
|
||||
break;
|
||||
case 'weekly_4':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'WEEKLY';
|
||||
$edit['field_test[und][0][rrule][weekly][INTERVAL]'] = 10;
|
||||
$edit['field_test[und][0][rrule][weekly][BYDAY][MO]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][weekly][BYDAY][TU]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][weekly][BYDAY][WE]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][weekly][BYDAY][TH]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][weekly][BYDAY][FR]'] = TRUE;
|
||||
break;
|
||||
|
||||
// Monthly test cases
|
||||
case 'monthly_1':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'MONTHLY';
|
||||
$edit['field_test[und][0][rrule][monthly][day_month]'] = 'BYDAY_BYMONTH';
|
||||
$edit['field_test[und][0][rrule][monthly][BYDAY_BYMONTH_child][BYDAY_COUNT]'] = '+1';
|
||||
$edit['field_test[und][0][rrule][monthly][BYDAY_BYMONTH_child][BYDAY_DAY]'] = 'FR';
|
||||
break;
|
||||
case 'monthly_2':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'MONTHLY';
|
||||
$edit['field_test[und][0][rrule][monthly][day_month]'] = 'BYDAY_BYMONTH';
|
||||
$edit['field_test[und][0][rrule][monthly][BYDAY_BYMONTH_child][BYDAY_COUNT]'] = '+1';
|
||||
$edit['field_test[und][0][rrule][monthly][BYDAY_BYMONTH_child][BYDAY_DAY]'] = 'SU';
|
||||
$edit['field_test[und][0][rrule][monthly][BYDAY_BYMONTH_child][BYMONTH][1]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][monthly][BYDAY_BYMONTH_child][BYMONTH][3]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][monthly][BYDAY_BYMONTH_child][BYMONTH][5]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][monthly][BYDAY_BYMONTH_child][BYMONTH][7]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][monthly][BYDAY_BYMONTH_child][BYMONTH][9]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][monthly][BYDAY_BYMONTH_child][BYMONTH][11]'] = TRUE;
|
||||
break;
|
||||
case 'monthly_3':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'MONTHLY';
|
||||
$edit['field_test[und][0][rrule][monthly][day_month]'] = 'BYDAY_BYMONTH';
|
||||
$edit['field_test[und][0][rrule][monthly][BYDAY_BYMONTH_child][BYDAY_COUNT]'] = '-2';
|
||||
$edit['field_test[und][0][rrule][monthly][BYDAY_BYMONTH_child][BYDAY_DAY]'] = 'MO';
|
||||
$edit['field_test[und][0][rrule][monthly][BYDAY_BYMONTH_child][BYMONTH][6]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][monthly][BYDAY_BYMONTH_child][BYMONTH][12]'] = TRUE;
|
||||
break;
|
||||
case 'monthly_4':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'MONTHLY';
|
||||
$edit['field_test[und][0][rrule][monthly][day_month]'] = 'BYMONTHDAY_BYMONTH';
|
||||
$edit['field_test[und][0][rrule][monthly][BYMONTHDAY_BYMONTH_child][BYMONTHDAY]'] = '10';
|
||||
break;
|
||||
case 'monthly_5':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'MONTHLY';
|
||||
$edit['field_test[und][0][rrule][monthly][day_month]'] = 'BYMONTHDAY_BYMONTH';
|
||||
$edit['field_test[und][0][rrule][monthly][BYMONTHDAY_BYMONTH_child][BYMONTHDAY]'] = '10';
|
||||
$edit['field_test[und][0][rrule][monthly][BYMONTHDAY_BYMONTH_child][BYMONTH][1]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][monthly][BYMONTHDAY_BYMONTH_child][BYMONTH][2]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][monthly][BYMONTHDAY_BYMONTH_child][BYMONTH][3]'] = TRUE;
|
||||
break;
|
||||
case 'monthly_6':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'MONTHLY';
|
||||
$edit['field_test[und][0][rrule][monthly][day_month]'] = 'BYMONTHDAY_BYMONTH';
|
||||
$edit['field_test[und][0][rrule][monthly][BYMONTHDAY_BYMONTH_child][BYMONTHDAY]'] = '-5';
|
||||
$edit['field_test[und][0][rrule][monthly][BYMONTHDAY_BYMONTH_child][BYMONTH][2]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][monthly][BYMONTHDAY_BYMONTH_child][BYMONTH][4]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][monthly][BYMONTHDAY_BYMONTH_child][BYMONTH][6]'] = TRUE;
|
||||
break;
|
||||
|
||||
// Yearly test cases
|
||||
case 'yearly_1':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'YEARLY';
|
||||
$edit['field_test[und][0][rrule][yearly][day_month]'] = 'BYDAY_BYMONTH';
|
||||
$edit['field_test[und][0][rrule][yearly][BYDAY_BYMONTH_child][BYDAY_COUNT]'] = '+1';
|
||||
$edit['field_test[und][0][rrule][yearly][BYDAY_BYMONTH_child][BYDAY_DAY]'] = 'FR';
|
||||
break;
|
||||
case 'yearly_2':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'YEARLY';
|
||||
$edit['field_test[und][0][rrule][yearly][INTERVAL]'] = 2;
|
||||
$edit['field_test[und][0][rrule][yearly][day_month]'] = 'BYDAY_BYMONTH';
|
||||
$edit['field_test[und][0][rrule][yearly][BYDAY_BYMONTH_child][BYDAY_COUNT]'] = '+1';
|
||||
$edit['field_test[und][0][rrule][yearly][BYDAY_BYMONTH_child][BYDAY_DAY]'] = 'SU';
|
||||
$edit['field_test[und][0][rrule][yearly][BYDAY_BYMONTH_child][BYMONTH][1]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][yearly][BYDAY_BYMONTH_child][BYMONTH][3]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][yearly][BYDAY_BYMONTH_child][BYMONTH][5]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][yearly][BYDAY_BYMONTH_child][BYMONTH][7]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][yearly][BYDAY_BYMONTH_child][BYMONTH][9]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][yearly][BYDAY_BYMONTH_child][BYMONTH][11]'] = TRUE;
|
||||
break;
|
||||
case 'yearly_3':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'YEARLY';
|
||||
$edit['field_test[und][0][rrule][yearly][INTERVAL]'] = 3;
|
||||
$edit['field_test[und][0][rrule][yearly][day_month]'] = 'BYDAY_BYMONTH';
|
||||
$edit['field_test[und][0][rrule][yearly][BYDAY_BYMONTH_child][BYDAY_COUNT]'] = '-2';
|
||||
$edit['field_test[und][0][rrule][yearly][BYDAY_BYMONTH_child][BYDAY_DAY]'] = 'MO';
|
||||
$edit['field_test[und][0][rrule][yearly][BYDAY_BYMONTH_child][BYMONTH][6]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][yearly][BYDAY_BYMONTH_child][BYMONTH][12]'] = TRUE;
|
||||
break;
|
||||
case 'yearly_4':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'YEARLY';
|
||||
$edit['field_test[und][0][rrule][yearly][day_month]'] = 'BYMONTHDAY_BYMONTH';
|
||||
$edit['field_test[und][0][rrule][yearly][BYMONTHDAY_BYMONTH_child][BYMONTHDAY]'] = '10';
|
||||
break;
|
||||
case 'yearly_5':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'YEARLY';
|
||||
$edit['field_test[und][0][rrule][yearly][INTERVAL]'] = 2;
|
||||
$edit['field_test[und][0][rrule][yearly][day_month]'] = 'BYMONTHDAY_BYMONTH';
|
||||
$edit['field_test[und][0][rrule][yearly][BYMONTHDAY_BYMONTH_child][BYMONTHDAY]'] = '10';
|
||||
$edit['field_test[und][0][rrule][yearly][BYMONTHDAY_BYMONTH_child][BYMONTH][1]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][yearly][BYMONTHDAY_BYMONTH_child][BYMONTH][2]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][yearly][BYMONTHDAY_BYMONTH_child][BYMONTH][3]'] = TRUE;
|
||||
break;
|
||||
case 'yearly_6':
|
||||
$edit['field_test[und][0][rrule][FREQ]'] = 'YEARLY';
|
||||
$edit['field_test[und][0][rrule][yearly][INTERVAL]'] = 3;
|
||||
$edit['field_test[und][0][rrule][yearly][day_month]'] = 'BYMONTHDAY_BYMONTH';
|
||||
$edit['field_test[und][0][rrule][yearly][BYMONTHDAY_BYMONTH_child][BYMONTHDAY]'] = '-5';
|
||||
$edit['field_test[und][0][rrule][yearly][BYMONTHDAY_BYMONTH_child][BYMONTH][2]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][yearly][BYMONTHDAY_BYMONTH_child][BYMONTH][4]'] = TRUE;
|
||||
$edit['field_test[und][0][rrule][yearly][BYMONTHDAY_BYMONTH_child][BYMONTH][6]'] = TRUE;
|
||||
break;
|
||||
}
|
||||
|
||||
// Test COUNT or UNTIL (default)
|
||||
if ($is_count) {
|
||||
$edit['field_test[und][0][rrule][range_of_repeat]'] = 'COUNT';
|
||||
$edit['field_test[und][0][rrule][count_child]'] = $count;
|
||||
}
|
||||
else {
|
||||
$edit['field_test[und][0][rrule][range_of_repeat]'] = 'UNTIL';
|
||||
$date = array(
|
||||
'year' => '2011',
|
||||
'month' => '10',
|
||||
'day' => '07'
|
||||
);
|
||||
$edit += $this->formatDateForRRULEInputs('field_test[und][0][rrule][until_child]', $options, $date);
|
||||
}
|
||||
|
||||
// Test date exceptions and/or additions
|
||||
if ($exclude_include !== NULL) {
|
||||
$exclude_include_edit = array();
|
||||
switch ($exclude_include) {
|
||||
case 'exclude':
|
||||
$exclude_include_edit['field_test[und][0][rrule][show_exceptions]'] = TRUE;
|
||||
$date = array(
|
||||
'year' => '2010',
|
||||
'month' => '10',
|
||||
'day' => '07'
|
||||
);
|
||||
$exclude_include_edit += $this->formatDateForRRULEInputs('field_test[und][0][rrule][exceptions][EXDATE][0]', $options, $date);
|
||||
break;
|
||||
case 'include':
|
||||
$exclude_include_edit['field_test[und][0][rrule][show_additions]'] = TRUE;
|
||||
$date = array(
|
||||
'year' => '2013',
|
||||
'month' => '10',
|
||||
'day' => '07'
|
||||
);
|
||||
$exclude_include_edit += $this->formatDateForRRULEInputs('field_test[und][0][rrule][additions][RDATE][0]', $options, $date);
|
||||
break;
|
||||
case 'exclude_include':
|
||||
$exclude_include_edit['field_test[und][0][rrule][show_exceptions]'] = TRUE;
|
||||
$date = array(
|
||||
'year' => '2010',
|
||||
'month' => '10',
|
||||
'day' => '07'
|
||||
);
|
||||
$exclude_include_edit += $this->formatDateForRRULEInputs('field_test[und][0][rrule][exceptions][EXDATE][0]', $options, $date);
|
||||
|
||||
$exclude_include_edit['field_test[und][0][rrule][show_additions]'] = TRUE;
|
||||
$date = array(
|
||||
'year' => '2013',
|
||||
'month' => '10',
|
||||
'day' => '07'
|
||||
);
|
||||
$exclude_include_edit += $this->formatDateForRRULEInputs('field_test[und][0][rrule][additions][RDATE][0]', $options, $date);
|
||||
break;
|
||||
}
|
||||
$edit += $exclude_include_edit;
|
||||
}
|
||||
}
|
||||
|
||||
$this->drupalPost('node/add/date', $edit, t('Save'));
|
||||
$this->assertText($edit['body[und][0][value]'], 'Test node has been created');
|
||||
|
||||
// Return the settings for later use in verification
|
||||
return $edit;
|
||||
}
|
||||
|
||||
function verifyDateForm($edit) {
|
||||
$title = $edit['title'];
|
||||
$node = $this->drupalGetNodeByTitle($title);
|
||||
|
||||
$this->drupalGet("node/{$node->nid}/edit");
|
||||
|
||||
foreach ($edit as $field => $value) {
|
||||
$this->assertFieldByName($field, $value);
|
||||
}
|
||||
|
||||
$this->drupalPost("node/{$node->nid}/delete", NULL, t('Delete'));
|
||||
$this->assertRaw(t('Date %title has been deleted.', array('%title' => $title)), t('Deleted Date content.'));
|
||||
}
|
||||
|
||||
function createDateField($type, $widget, $display_all_day = FALSE) {
|
||||
$edit = array();
|
||||
$edit['fields[_add_new_field][label]'] = 'Test';
|
||||
$edit['fields[_add_new_field][field_name]'] = 'test';
|
||||
$edit['fields[_add_new_field][weight]'] = '-4';
|
||||
$edit['fields[_add_new_field][type]'] = $type;
|
||||
$edit['fields[_add_new_field][widget_type]'] = $widget;
|
||||
|
||||
$label = $edit['fields[_add_new_field][label]'];
|
||||
|
||||
$field_edit = array();
|
||||
$field_edit['field[settings][repeat]'] = 1;
|
||||
|
||||
$instance_edit = array();
|
||||
switch ($widget) {
|
||||
case 'select':
|
||||
case 'popup':
|
||||
$instance_edit['instance[widget][settings][year_range][years_back]'] = '-5';
|
||||
$instance_edit['instance[widget][settings][year_range][years_forward]'] = '+5';
|
||||
break;
|
||||
}
|
||||
|
||||
if ($display_all_day) {
|
||||
$instance_edit['instance[widget][settings][display_all_day]'] = TRUE;
|
||||
}
|
||||
|
||||
// First step : 'Add new field' on the 'Manage fields' page.
|
||||
$this->drupalPost('admin/structure/types/manage/date/fields', $edit, t('Save'));
|
||||
$this->assertRaw(t('These settings apply to the %label field everywhere it is used.', array('%label' => $label)), t('Field settings page was displayed.'));
|
||||
|
||||
// Second step : 'Field settings' form.
|
||||
$this->drupalPost(NULL, $field_edit, t('Save field settings'));
|
||||
$this->assertRaw(t('Updated field %label field settings.', array('%label' => $label)), t('Redirected to instance and widget settings page.'));
|
||||
|
||||
// Third step : 'Instance settings' form.
|
||||
$this->drupalPost(NULL, $instance_edit, t('Save settings'));
|
||||
$this->assertRaw(t('Saved %label configuration.', array('%label' => $label)), t('Redirected to "Manage fields" page.'));
|
||||
|
||||
// Check that the field appears in the overview form.
|
||||
$this->assertFieldByXPath('//table[@id="field-overview"]//td[1]', $label, t('Field was created and appears in the overview page.'));
|
||||
}
|
||||
|
||||
function deleteDateField() {
|
||||
$this->drupalGet('admin/structure/types/manage/date/fields');
|
||||
$this->clickLink('delete');
|
||||
$this->drupalPost(NULL, NULL, t('Delete'));
|
||||
$this->assertText(t('The field Test has been deleted from the Date content type.'), t('Removed date field.'));
|
||||
}
|
||||
|
||||
function formatDateForRRULEInputs($form_field_name, $date_widget_type, $date) {
|
||||
$return = array();
|
||||
|
||||
switch ($date_widget_type) {
|
||||
case 'select':
|
||||
$return["{$form_field_name}[datetime][year]"] = $date['year'];
|
||||
$return["{$form_field_name}[datetime][month]"] = $date['month'];
|
||||
$return["{$form_field_name}[datetime][day]"] = ltrim($date['day'], '0');
|
||||
break;
|
||||
case 'text':
|
||||
case 'popup':
|
||||
//$return["{$field_name}[datetime][date]"] = '2011-10-07';
|
||||
$return["{$form_field_name}[datetime][date]"] = "{$date['year']}-{$date['month']}-{$date['day']}";
|
||||
break;
|
||||
}
|
||||
|
||||
return $return;
|
||||
}
|
||||
}
|
||||
Reference in New Issue
Block a user