'. t('Start') .': '. $node->event['start_format'] .'
'."\n";
$body .= ''. t('End') .': '. $node->event['end_format'] .'
'."\n";
$body .= check_markup($node->teaser, $node->format);
$link = url("node/$node->nid", NULL, NULL, 1);
// Allow modules to add additional item fields
$extra = node_invoke_nodeapi($node, 'rss item');
$extra = array_merge($extra, array(array('key' => 'pubDate', 'value' => date('r', $node->changed))));
$items .= format_rss_item($node->title, $link, $body, $extra);
}
$description = $headertitle . ($title ? ' | '. $title : '');
$output = "\n";
if (module_exists('location')) {
$output .= "\n";
}
else {
$output .= "\n";
}
$output .= format_rss_channel(variable_get('site_name', 'drupal') . t(' - Events Feed'), url('event/feed', NULL, NULL, TRUE), $description, $items, $locale);
$output .= "\n";
return $output;
}
/**
* Creates an ical feed of events.
*
* @ingroup event_view
* @param $date The date for the feed.
* @param $duration The number of days the feeds duration is.
* @param $types The content types to filter the feed by.
* @param $terms The taxonomy term tids to filter the feed by.
* @param $title The filter title to append to the channel description.
* @param $rewrite_parameter optional array that will be passed on to queries
* in event_database.*.inc files and merged into the
* fourth argument of db_rewrite_sql.
*
* @return A formatted ical feed.
*/
function event_calendar_ical($date, $duration, $types = NULL, $terms = NULL, $title = NULL, $rewrite_parameter = array()) {
global $base_url, $locale;
include_once(EVENT_PATH .'/ical.inc');
$end_date = event_date_later($date, $duration);
$headertitle = event_format_date($date, 'custom', 'F d Y') .'-'. event_format_date($end_date, 'custom', 'F d Y');
$result = event_get_events(event_implode_date($date), event_implode_date($end_date), 'ASC', $rewrite_parameter);
$events = array();
while ($nid = db_fetch_object($result)) {
$node = node_load($nid->nid);
if (event_filter_node($node, $types, $terms)) {
$events[] = _event_node_ical($node);
}
}
$description = $headertitle . ($title ? ' | '. $title : '');
return ical_export($events, $description);
}
/**
* Return an ical for a specific event
*/
function event_node_ical() {
$node = node_load(arg(1));
$event = _event_node_ical($node);
drupal_set_header('Content-Type: text/calendar; charset=utf-8');
drupal_set_header('Content-Disposition: attachment; filename="calendar.ics"; ');
print ical_export(array($event), $event['summary']);
}
function _event_node_ical($node) {
include_once(EVENT_PATH .'/ical.inc');
$event = array();
// Allow modules to affect item fields
node_invoke_nodeapi($node, 'ical item');
$event['start'] = $node->event['start'];
$event['end'] = $node->event['end'];
$event['start_utc'] = $node->event['start_utc'];
$event['end_utc'] = $node->event['end_utc'];
$event['has_time'] = $node->event['has_time'];
if (module_exists('location')) {
if (isset($node->locations[0])) {
$posted_locations[0] = location_form2api($node->locations[0]);
if (!isset($posted_locations[0]['city']) || strlen(trim($posted_locations[0]['city'])) == 0) {
$postal_data = location_get_postalcode_data($posted_locations[0]);
$posted_locations[0]['city'] = isset($postal_data['city']) ? $postal_data['city'] : '';
}
if (!isset($posted_locations[0]['province']) || strlen(trim($posted_locations[0]['province'])) == 0) {
$postal_data = isset($postal_data) ? $postal_data : location_get_postalcode_data($posted_locations[0]);
$posted_locations[0]['province'] = isset($postal_data['province']) ? $postal_data['province'] : '';
}
if ($output = theme('locations', $posted_locations, variable_get('location_suppress_country', 0) ? array('country') : array())) {
$event['location'] = $output;
}
}
}
$event['summary'] = $node->title;
$event['description'] = check_markup($node->teaser ? $node->teaser : $node->body, $node->format);
$event['uid'] = url("node/$node->nid", NULL, NULL, 1);
$event['url'] = url("node/$node->nid", NULL, NULL, 1);
return $event;
}
/**
* @defgroup event_support Functions that support the event system
*/
/**
* Returns an array of nodes that occur on a given date.
* Handles content type and taxonomy filters.
*
* @ingroup event_support
* @param $date A date array.
* @param $view Who's calling this
* @param $types Limit to nodes of these types
* @param $terms Limit to events with these taxonomy terms
* @param $type 'prepopulate' or 'lookup', default 'lookup', whether
* to prepopulate the data array or return nodes.
* @param $end_date optional end date for list and table views
* @param $rewrite_parameter optional array that will be passed on to queries
* in event_database.*.inc files and merged into the
* fourth argument of db_rewrite_sql.
*
* @return An array containing all of the events taking place on the
* specified date, or an empty array if none exist or $type is
* 'prepopulate'.
*/
function event_calendar_data($date, $view = NULL, $types = NULL, $terms = NULL, $type = 'lookup', $end_date = array(), $rewrite_parameter = array()) {
static $data;
// This key is used so modules can implement private calendars.
$rewrite_key = serialize($rewrite_parameter);
if ($type == 'prepopulate') {
// keep dates as strings
$year = $date['year'];
$month = $date['month'];
$day = $date['day'];
$node_load = TRUE;
if (variable_get('event_save_memory', FALSE)) {
$node_load = FALSE;
}
switch ($view) {
case 'block':
$node_load = FALSE;
// fall through
case 'month':
$first = "$year-$month-01 00:00:00";
$last_day = date('t', mktime(0, 0, 0, $month, 1, $year));
$last = "$year-$month-$last_day 23:59:59";
break;
case 'week':
$dow = _event_day_of_week($date);
$first = date('Y-m-d 00:00:00', mktime(0, 0, 0, $month, $day - $dow, $year));
$last = date('Y-m-d 23:59:59', mktime(12, 0, 0, $month, $day + (7 - $dow), $year));
break;
case 'day':
$first = "$year-$month-$day 00:00:00";
$last = "$year-$month-$day 23:59:59";
break;
case 'list':
case 'table':
$first = "$year-$month-01 00:00:00";
$last = $end_date['year'] .'-'. $end_date['month'] .'-'. $end_date['day'] .' 23:59:59';
break;
default:
$first = "$year-$month-01 00:00:00";
$last_day = date('t', mktime(0, 0, 0, $month, 1, $year));
$last = "$year-$month-$last_day 23:59:59";
break;
}
$first_exploded = event_explode_date($first);
$last_exploded = event_explode_date($last);
//call the event_load function in all modules
module_invoke_all('event_load', $first_exploded, $last_exploded, $view, $types, $terms);
$data[$rewrite_key][$first_exploded['year']] = array();
$data[$rewrite_key][$last_exploded['year']] = array();
$data[$rewrite_key][$first_exploded['year']][$first_exploded['month']] = array();
$data[$rewrite_key][$last_exploded['year']][$last_exploded['month']] = array();
$result = event_get_events($first, $last, 'ASC', $rewrite_parameter);
while ($nid = db_fetch_object($result)) {
if ($node_load) {
// we don't want to cache the nodes, we do our own caching
$node = node_load($nid->nid, NULL, TRUE);
node_invoke_nodeapi($node, 'view', FALSE, FALSE);
}
// don't do node_load for calendar block
else {
$event = array(
'start' => $nid->event_start,
'end' => $nid->event_end,
'start_orig' => $nid->event_start_orig,
'end_orig' => $nid->event_end_orig,
'timezone' => $nid->timezone,
'offset' => $nid->offset,
'offset_dst' => $nid->offset_dst,
'has_time' => $nid->has_time,
'has_end_date' => $nid->has_end_date,
'dst_region' => $nid->dst_region,
'start_utc' => $nid->event_start_utc,
'start_user' => $nid->event_start_user,
'start_site' => $nid->event_start_site,
'end_utc' => $nid->event_end_utc,
'end_user' => $nid->event_end_user,
'end_site' => $nid->event_end_site,
);
$node = new stdClass();
$node->nid = $nid->nid;
$node->title = $nid->title;
$node->type = $nid->type;
$node->event = $event;
$node->event['start_exploded'] = event_explode_date($node->event['start']);
$node->event['end_exploded'] = event_explode_date($node->event['end']);
$node->event['start_format'] = event_format_date($node->event['start_exploded'], 'small');
$node->event['start_time_format'] = event_format_date($node->event['start_exploded'], 'custom', (variable_get('event_ampm', '0') ? 'g:i a' : 'H:i'));
$node->event['end_format'] = event_format_date($node->event['end_exploded'], 'small');
$node->event['end_time_format'] = event_format_date($node->event['end_exploded'], 'custom', (variable_get('event_ampm', '0') ? 'g:i a' : 'H:i'));
}
// this array contains the loaded nodes, so we
// dont have them stored for every day they occur
$data[$rewrite_key]['nodes'][$nid->nid] = $node;
// we have to load these here since there is no way to pass the
// $view parameter to nodeapi through node_load :/
$node->event['links'] = module_invoke_all('link', 'event_node_'. $view, $node, TRUE);
if (event_is_later($node->event['start_exploded'], $first_exploded)) {
$node_start = $node->event['start_exploded'];
}
else {
$node_start = $first_exploded;
}
if (event_is_later($node->event['end_exploded'], $last_exploded)) {
$node_end = $last_exploded;
}
else {
$node_end = $node->event['end_exploded'];
}
if ((event_same_day($node->event['start_exploded'], $node->event['end_exploded']))) {
if (event_all_day($node)) {
$nid->state = 'allday';
}
else {
$nid->state = 'singleday';
}
$data[$rewrite_key][$node->event['start_exploded']['year']][(int)$node->event['start_exploded']['month']][(int)$node->event['start_exploded']['day']][] = drupal_clone($nid);
}
else {
// roll through each day the event occurs and set an entry for each
$cur_date = $node_start;
// We set the time to the start of the day so we don't miss
// events ending on an earlier hour.
$cur_date['hour'] = '00';
$cur_date['minute'] = '00';
while (event_is_later($node_end, $cur_date)) {
if (event_same_day($cur_date, $node->event['end_exploded'])) {
if ($node->event['end_exploded']['hour'] = '23' && $node->event['end_exploded']['minute'] = '59') {
$nid->state = 'allday';
}
else {
$nid->state = 'end';
}
$data[$rewrite_key][$node->event['end_exploded']['year']][(int)$node->event['end_exploded']['month']][(int)$node->event['end_exploded']['day']][] = drupal_clone($nid);
break;
}
elseif (event_same_day($cur_date, $node->event['start_exploded'])) {
if ($node->event['start_exploded']['hour'] = '00' && $node->event['start_exploded']['minute'] = '00') {
$nid->state = 'allday';
}
else {
$nid->state = 'start';
}
$data[$rewrite_key][$node->event['start_exploded']['year']][(int)$node->event['start_exploded']['month']][(int)$node->event['start_exploded']['day']][] = drupal_clone($nid);
}
else {
$nid->state = 'ongoing';
$data[$rewrite_key][$cur_date['year']][(int)$cur_date['month']][(int)$cur_date['day']][] = drupal_clone($nid);
}
$cur_date = event_date_later($cur_date, 1);
}
}
}
return array();
}
$day_start = $date;
$day_start['hour'] = $day_start['minute'] = $day_start['second'] = '00';
// dates as ints.
$year = (int)$date['year'];
$month = (int)$date['month'];
$day = (int)$date['day'];
$nodes = array();
$event_types = event_get_types();
if (isset($data[$rewrite_key][$year][$month][$day])) {
if (isset($types)) {
// content type filters set
if (isset($terms)) {
// taxonomy and content type filters set
foreach ($data[$rewrite_key][$year][$month][$day] as $nid) {
$node = $data[$rewrite_key]['nodes'][$nid->nid];
if (in_array($node->type, $types) && event_taxonomy_filter($node, $terms)) {
// this node is the content type and taxonomy term requested
if (count($types) == 1 && in_array($node->type, $event_types['solo'])) {
// only display solo types if there is only one event type requested
$node->event['current_date'] = $day_start;
$node->event['state'] = $nid->state;
$nodes[] = $node;
}
elseif (in_array($node->type, $event_types['all'])) {
$node->event['current_date'] = $day_start;
$node->event['state'] = $nid->state;
$nodes[] = $node;
}
}
}
}
else {
// only content type filters
foreach ($data[$rewrite_key][$year][$month][$day] as $nid) {
$node = $data[$rewrite_key]['nodes'][$nid->nid];
if (in_array($node->type, $types)) {
if (count($types) == 1 && in_array($node->type, $event_types['solo'])) {
// only display solo types if there is only one event type requested
$node->event['current_date'] = $day_start;
$node->event['state'] = $nid->state;
$nodes[] = $node;
}
elseif (in_array($node->type, $event_types['all'])) {
$node->event['current_date'] = $day_start;
$node->event['state'] = $nid->state;
$nodes[] = $node;
}
}
}
}
}
elseif (isset($terms)) {
// no types, only taxonomy filters
foreach ($data[$rewrite_key][$year][$month][$day] as $nid) {
$node = $data[$rewrite_key]['nodes'][$nid->nid];
if (event_taxonomy_filter($node, $terms) && in_array($node->type, $event_types['all'])) {
$node->event['current_date'] = $day_start;
$node->event['state'] = $nid->state;
$nodes[] = $node;
}
}
}
else {
foreach ($data[$rewrite_key][$year][$month][$day] as $nid) {
// no filters set, only show events with content types states of 'all'
$node = $data[$rewrite_key]['nodes'][$nid->nid];
if (in_array($node->type, $event_types['all'])) {
$node->event['current_date'] = $day_start;
$node->event['state'] = $nid->state;
$nodes[] = $node;
}
}
}
}
return $nodes;
}
/**
* Get events between two specified dates
* MySQL and Postgres handle time intervals incompatibly. The changes
* that need to happen from MySQL -> Postgres are:
* INTERVAL %d SECOND -> '%d seconds'
* INTERVAL foo SECOND -> foo
* INTERVAL foo HOUR_SECOND -> foo
* %d SECOND -> '%d seconds'
* INTERVAL foo -> foo
* offset -> "offset"
* See also the table definitions in event.install to understand the
* differences between the two.
*
*
* @ingroup event_support
* @param $first start date of interval as a date string
* @param $last end date of interval as a date string
* @param Whether to order the result set on the starting date.
* Valid values: FALSE, 'DESC', 'ASC'
* @param $rewrite_parameter optional array that will be passed on to queries
* in event_database.*.inc files and merged into the
* fourth argument of db_rewrite_sql.
*
* @return a database resource
*/
function event_get_events($first, $last, $order = 'ASC', $rewrite_parameter = array()) {
event_include_files();
switch (variable_get('event_timezone_display', 'event')) {
case 'user':
$result = event_get_events_user($first, $last, $order, $rewrite_parameter);
break;
case 'site':
$result = event_get_events_site($first, $last, $order, $rewrite_parameter);
break;
case 'event':
$result = event_get_events_event($first, $last, $order, $rewrite_parameter);
}
return $result;
}
/**
* Return SQL string for SELECT statement
*
* The returned string will make sure your event dates are correctly
* returned according to the site setting for
* "event_timezone_display". event_$type will be available from the
* query.
*
* @ingroup event_support
* @param $type either 'start' or 'end'
*/
function event_select($type = 'start') {
event_include_files();
switch (variable_get('event_timezone_display', 'event')) {
case 'user':
$result = event_where_user($type) .' AS event_'. $type;
break;
case 'site':
$result = event_where_site($type) .' AS event_'. $type;
break;
case 'event':
$result = event_where_event($type) .' AS event_'. $type;
}
return $result;
}
/**
* Return SQL string for WHERE statement
*
* The returned string will make sure your event dates are correctly
* returned according to the site setting for
* "event_timezone_display".
*
* @ingroup event_support
* @param $type either 'start' or 'end'
*/
function event_where($type = 'start') {
event_include_files();
switch (variable_get('event_timezone_display', 'event')) {
case 'user':
$result = event_where_user($type);
break;
case 'site':
$result = event_where_site($type);
break;
case 'event':
$result = event_where_event($type);
}
return $result;
}
/**
* Returns SQL JOIN statement to use for event queries
*
* @ingroup event_support
* @param $prefix prefix of the node table, "n" is the default
* @param $type 'INNER' OR 'LEFT', default 'INNER'
*/
function event_join($prefix = 'n', $type = 'INNER') {
return "$type JOIN {event} e ON $prefix.nid = e.nid $type JOIN {event_timezones} tz ON e.timezone = tz.timezone";
}
/**
* @param $node
* @param $types
* @param $terms
* @return boolean
*/
function event_filter_node($node, $types, $terms) {
$event_types = event_get_types();
if (isset($types)) {
// content type filters set
if (isset($terms)) {
// taxonomy and content type filters set
if (in_array($node->type, $types) && event_taxonomy_filter($node, $terms)) {
// this node is the content type and taxonomy term requested
if (count($types) == 1 && in_array($node->type, $event_types['solo'])) {
// only display solo types if there is only one event type requested
return TRUE;
}
elseif (in_array($node->type, $event_types['all'])) {
return TRUE;
}
}
}
else {
// only content type filters
if (in_array($node->type, $types)) {
if (count($types) == 1 && in_array($node->type, $event_types['solo'])) {
// only display solo types if there is only one event type requested
return TRUE;
}
elseif (in_array($node->type, $event_types['all'])) {
return TRUE;
}
}
}
}
elseif (isset($terms)) {
// no types, only taxonomy filters
if (event_taxonomy_filter($node, $terms) && in_array($node->type, $event_types['all'])) {
return TRUE;
}
}
else {
// no filters set, only show events with content types states of 'all'
if (in_array($node->type, $event_types['all'])) {
RETURN TRUE;
}
}
return FALSE;
}
function event_filter_nodes($nodes, $types, $terms) {
$event_types = event_get_types();
$results = array();
if (isset($types)) {
// content type filters set
if (isset($terms)) {
// taxonomy and content type filters set
foreach ($nodes as $node) {
if (in_array($node->type, $types) && event_taxonomy_filter($node, $terms)) {
// this node is the content type and taxonomy term requested
if (count($types) == 1 && in_array($node->type, $event_types['solo'])) {
// only display solo types if there is only one event type requested
$results[] = $node;
}
elseif (in_array($node->type, $event_types['all'])) {
$results[] = $node;
}
}
}
}
else {
// only content type filters
foreach ($nodes as $node) {
if (in_array($node->type, $types)) {
if (count($types) == 1 && in_array($node->type, $event_types['solo'])) {
// only display solo types if there is only one event type requested
$results[] = $node;
}
elseif (in_array($node->type, $event_types['all'])) {
$results[] = $node;
}
}
}
}
}
elseif (isset($terms)) {
// no types, only taxonomy filters
foreach ($nodes as $node) {
if (event_taxonomy_filter($node, $terms) && in_array($node->type, $event_types['all'])) {
$results[] = $node;
}
}
}
else {
// no filters set, only show events with content types states of 'all'
foreach ($nodes as $node) {
if (in_array($node->type, $event_types['all'])) {
return $nodes;
}
}
}
return $results;
}
function event_taxonomy_filter($node, $terms) {
if ($tids = taxonomy_node_get_terms($node->nid)) {
foreach ($tids as $tid => $term) {
if (in_array($tid, $terms)) {
return TRUE;
}
}
}
return FALSE;
}
/**
* Returns a link to the event page for a single day.
*
* @ingroup event_support
* @param $year The year the event is taking place.
* @param $month The month the event is taking place.
* @param $day The day the event is taking place. No leading zeroes
* @param $types Limit to nodes of these types
* @param $terms Limit to events with these taxonomy terms
* @param $rewrite_parameter optional array that will be passed on to queries
* in event_database.*.inc files and merged into the
* fourth argument of db_rewrite_sql.
*
* @return The value of the day requested. If the day has events, the value will be a link to a more detailed page of that day's events.
*/
function event_render_day_single($date, $view, $types, $terms, $rewrite_parameter = array()) {
return count(event_calendar_data($date, $view, $types, $terms, 'lookup', array(), $rewrite_parameter)) ? l((int)$date['day'], 'event/'. _event_format_url($date) .'/day') : (int)$date['day'];
}
/**
* Returns an day of events for a calendar.
*
* @ingroup event_support
* @param $date A date array when the event is taking place.
* @param $types Limit to nodes of these types
* @param $terms Limit to events with these taxonomy terms
* @param $rewrite_parameter optional array that will be passed on to queries
* in event_database.*.inc files and merged into the
* fourth argument of db_rewrite_sql.
*
* @return A string containing all of the events taking place.
*/
function event_render_day($date, $view, $types, $terms, $rewrite_parameter = array()) {
$nodes = event_calendar_data($date, $view, $types, $terms, 'lookup', array(), $rewrite_parameter);
if (count($nodes)) {
$output = theme('event_calendar_date_box', $date, $view);
foreach ($nodes as $node) {
$output .= theme('event_node_'. $view, $node);
}
}
else {
$output .= theme('event_empty_day', $date, $view);
}
return $output;
}
/**
* Returns week day names and their translated values, corrected for
* the start of week day settings (mon or sun).
*
* @ingroup event_support
* @return an associative array containing weekday names
*/
function event_week_days() {
static $weekdays;
if (!$weekdays) {
if (variable_get('date_first_day', 1)) {
$weekdays = array(array('day' => 'Mon', 't' => t('Mon')), array('day' => 'Tue', 't' => t('Tue')), array('day' => 'Wed', 't' => t('Wed')), array('day' => 'Thu', 't' => t('Thu')), array('day' => 'Fri', 't' => t('Fri')), array('day' => 'Sat', 't' => t('Sat')), array('day' => 'Sun', 't' => t('Sun')));
}
else {
$weekdays = array(array('day' => 'Sun', 't' => t('Sun')), array('day' => 'Mon', 't' => t('Mon')), array('day' => 'Tue', 't' => t('Tue')), array('day' => 'Wed', 't' => t('Wed')), array('day' => 'Thu', 't' => t('Thu')), array('day' => 'Fri', 't' => t('Fri')), array('day' => 'Sat', 't' => t('Sat')));
}
}
return $weekdays;
}
/**
* Formats the weekday information into table header format
*
* @ingroup event_support
* @return array with weekday table header data
*/
function event_week_header() {
// create week header
$days = event_week_days();
foreach ($days as $day) {
$row[] = array('class' => strtolower($day['day']), 'data' => $day['t']);
}
return $row;
}
/**
* Return the day of week with start of week offset applied
* @param $date date array
* @return integer day of the week
*/
function _event_day_of_week($date) {
$dow = gmdate('w', gmmktime(12, 0, 0, $date['month'], $date['day'], $date['year']));
$dow = (variable_get('date_first_day', 1) ? ($dow == 0 ? 6 : --$dow ) : $dow);
return $dow;
}
/**
* Returns local date + time based on the user or site time zone.
* @return array
*/
function _event_user_time() {
global $user;
if (variable_get('configurable_timezones', 1) && $user->uid && strlen($user->timezone)) {
$time = (time() - date("Z")) + $user->timezone;
}
else {
$time = (time() - date("Z")) + variable_get('date_default_timezone', 0);
}
$return = explode('|', date('Y|m|d|H|i|s', $time));
return array('year' => $return[0], 'month' => $return[1], 'day' => $return[2], 'hour' => $return[3], 'minute' => $return[4], 'second' => $return[5]);
}
/**
* Returns a local time (as defined by the user or site's timezone) for
* midnight GMT.
* @return array
*/
function _event_user_date() {
static $now;
if (!$now) {
$now = _event_user_time();
$now['hour'] = '00';
$now['minute'] = '00';
}
return $now;
}
/**
* Are two dates on the same day?
*
* @ingroup event_support
* @param $date_1 The first date array
* @param $date_2 The second date array
*
* @return TRUE or FALSE
*/
function event_same_day($date_1, $date_2) {
return ($date_1['year'] == $date_2['year'] && $date_1['month'] == $date_2['month'] && $date_1['day'] == $date_2['day']);
}
/**
* Does an event run all day?
*
* @ingroup event_support
* @param $node fully loaded event node
*
* @return TRUE or FALSE
*/
function event_all_day(&$node) {
return $node->event['has_time'] ? FALSE : TRUE;
}
/**
* Constructs the time select boxes.
*
* @ingroup event_support
* @param $date The date string or date array of the event to use as the default value.
* @param $prefix The value to prepend to the select element names ('start' or
* 'end').
*
* @return An array of form elements for month, day, year, hour, and minute
*/
function event_form_date($date, $prefix = 'start') {
$date = is_string($date) ? event_explode_date($date) : $date;
// populate drop down values...
// ...months
$months = _event_months();
// ...hours
if (variable_get('event_ampm', '0')) {
$hour_format = t('g');
for ($i = 0; $i <= 12; $i++) $hours[$i] = $i < 10 ? "0$i" : $i;
$am_pms = array('am' => t('am'), 'pm' => t('pm'));
if ($date['hour'] < 12) {
$date['ampm'] = 'am';
}
else {
$date['ampm'] = 'pm';
}
$date['hour'] = $date['hour'] % 12;
if ($date['hour'] == 0) {
$date['hour'] = 12;
}
}
else {
$hour_format = t('H');
for ($i = 0; $i <= 23; $i++) $hours[$i] = ($i < 10) ? "0$i" : $i;
}
// ...minutes (with leading 0s)
for ($i = 0; $i <= 59; $i++) $minutes[$i] = ($i < 10) ? "0$i" : $i;
$form[$prefix .'_day'] = array(
'#prefix' => '',
'#type' => 'textfield',
'#default_value' => $date['day'],
'#maxlength' => 2,
'#size' => 2,
'#required' => TRUE);
$form[$prefix .'_month'] = array(
'#type' => 'select',
'#default_value' => $date['month'],
'#options' => $months,
'#required' => TRUE);
$form[$prefix .'_year'] = array(
'#type' => 'textfield',
'#default_value' => $date['year'],
'#maxlength' => 4,
'#size' => 4,
'#required' => TRUE);
$form[$prefix .'_hour'] = array(
'#prefix' => '
—',
'#type' => 'select',
'#default_value' => (int) $date['hour'],
'#options' => $hours,
'#required' => TRUE);
$form[$prefix .'_minute'] = array(
'#prefix' => ':',
'#type' => 'select',
'#default_value' => (int) $date['minute'],
'#options' => $minutes,
'#required' => TRUE);
if (isset($am_pms)) {
$form[$prefix .'_ampm'] = array(
'#type' => 'radios',
'#default_value' => $date['ampm'],
'#options' => $am_pms,
'#required' => TRUE);
}
$form[$prefix .'_close'] = array(
'#type' => 'markup',
'#value' => '
Only in views for this type: This content type will only appear in calendar views specific to this type and never with other events.
Never: This content type will not be associated with the events calendar.')
);
break;
// node edit form
case $form['type']['#value'] .'_node_form':
if (variable_get('event_nodeapi_'. $form['type']['#value'], 'never') != 'never') {
$form['event']['has_time'] = array(
'#type' => 'checkbox',
'#title' => t('Event has time'),
'#default_value' => !isset($node->event['has_time']) ? 1 : $node->event['has_time'],
'#weight' => -16,
'#description' => t('Is time important for this event? Uncheck if event takes all day.')
);
$form['event']['has_end_date'] = array(
'#type' => 'checkbox',
'#title' => t('Event has end date'),
'#default_value' => $node->event['has_end_date'],
'#weight' => -14,
'#description' => t('Check if you want to specify end date for this event, then choose end date below.')
);
// We need to check if the timezone ID was set
if (variable_get('date_default_timezone_id', 0) === 0) {
drupal_set_message(t('Please select the default timezone for your website before creating events.', array('!url' => url('admin/settings/date-time'))), 'error');
}
/**
* Check to see if jscalendar is installed
* If so, display it, otherwise default to normal drop-down list selectors
*/
if (module_exists('jscalendar')) {
if (isset($node->event)) {
$start_default = $node->event['start_orig'];
$end_default = $node->event['end_orig'];
}
else {
$start_default = _event_user_time();
$start_default = $start_default['year'] .'-'. $start_default['month'] .'-'. $start_default['day'] .' '. $start_default['hour'] .':'. $start_default['minute'];
$end_default = $start_default;
}
$form['event']['event_start'] = array(
'#title' => t('Start date'),
'#type' => 'textfield',
'#default_value' => $start_default,
'#attributes' => array('class' => 'jscalendar'),
'#jscalendar_ifFormat' => '%Y-%m-%d %H:%M',
'#jscalendar_showsTime' => 'true',
'#jscalendar_timeFormat' => variable_get('event_ampm', '0') == 0 ? '24' : '12',
'#size' => 19,
'#maxlength' => 19,
'#weight' => -15,
'#description' => t('YYYY-MM-DD HH:MM'),
);
$form['event']['event_end'] = array(
'#title' => t('End Date'),
'#type' => 'textfield',
'#default_value' => $end_default,
'#attributes' => array('class' => 'jscalendar'),
'#jscalendar_ifFormat' => '%Y-%m-%d %H:%M',
'#jscalendar_showsTime' => 'true',
'#jscalendar_timeFormat' => variable_get('event_ampm', '0') == 0 ? '24' : '12',
'#size' => 19,
'#maxlength' => 19,
'#weight' => -13,
'#description' => t('YYYY-MM-DD HH:MM'),
);
}
else {
$form['event']['start'] = array(
'#type' => 'fieldset',
'#title' => t('Start date'),
'#weight' => -15
);
$form['event']['start']['date'] = event_form_date(isset($node->event['start_orig']) ? $node->event['start_orig'] : _event_user_time(), 'start', $node->event['start_offset']);
$form['event']['end'] = array(
'#type' => 'fieldset',
'#title' => t('End date'),
'#weight' => -13
);
$form['event']['end']['date'] = event_form_date(isset($node->event['end_orig']) ? $node->event['end_orig'] : _event_user_time(), 'end', $node->event['end_offset']);
}
if (variable_get('event_timezone_input', 'site') == 'input') {
$form['event']['timezone'] = array(
'#type' => 'select',
'#title' => t('Time zone'),
'#default_value' => ($node->event['timezone'] ? $node->event['timezone'] : variable_get('date_default_timezone_id', 0)),
'#options' => event_zonelist(),
'#description' => t('Select the time zone this event occurs in.'),
'#weight' => -12
);
}
elseif (variable_get('configurable_timezones', 1) && $user->uid && strlen($user->timezone) && (variable_get('event_timezone_input', 'site') == 'user')) {
$form['event']['timezone'] = array(
'#type' => 'hidden',
'#value' => $user->timezone_id,
);
}
else {
$form['event']['timezone'] = array(
'#type' => 'hidden',
'#value' => variable_get('date_default_timezone_id', 0),
);
}
if (isset($form['#validate'])) {
$form['#validate'] = array('event_form_validate' => array()) + $form['#validate'];
}
}
break;
case 'system_date_time_settings':
$zones = event_zonelist('offset');
$form['date_default_timezone'] = array(
'#type' => 'select',
'#title' => t('Default time zone'),
'#default_value' => variable_get('date_default_timezone_id', 0) .'|'. variable_get('date_default_timezone', 0),
'#options' => $zones,
'#description' => t('Select the default site time zone.')
);
$submit['event_extra_setting_form_submit'] = array();
$form['#submit'] = $form['#submit'] + $submit;
break;
case 'user_edit':
if (variable_get('configurable_timezones', 1) && !arg(3)) {
$account = user_load(array('uid' => arg(1)));
$zones = event_zonelist('offset');
$form['timezone']['timezone'] = array(
'#type' => 'select',
'#title' => t('Time zone'),
'#default_value' => strlen($account->timezone) ? ($account->timezone_id .'|'. $account->timezone) : (variable_get('date_default_timezone_id', 0) .'|'. variable_get('date_default_timezone', 0)),
'#options' => $zones,
'#description' => t('Select your current local time. Dates and times throughout this site will be displayed using this time zone.'),
);
$submit['event_extra_user_form_submit'] = array();
$form['#submit'] = $form['#submit'] + $submit;
}
}
}
function event_form_validate($form_id, $form_values, $form) {
event_validate_form_date($form_values, 'start');
event_validate_form_date($form_values, 'end');
if (!module_exists('jscalendar')) {
if (variable_get('event_ampm', '0') == 1) {
if ($form_values['start_ampm'] == 'pm' && $form_values['start_hour'] != 12) {
$form_values['start_hour'] += 12;
}
if ($form_values['end_ampm'] == 'pm' && $form_values['end_hour'] != 12) {
$form_values['end_hour'] += 12;
}
}
$start_datetime = array(
'year' => $form_values['start_year'],
'month' => $form_values['start_month'],
'day' => $form_values['start_day'],
'hour' => $form_values['start_hour'],
'minute' => $form_values['start_minute'],
);
$end_datetime = array(
'year' => $form_values['end_year'],
'month' => $form_values['end_month'],
'day' => $form_values['end_day'],
'hour' => $form_values['end_hour'],
'minute' => $form_values['end_minute'],
);
if (isset($form_values['start_year']) && event_is_later($start_datetime, $end_datetime, 'array')) {
form_set_value($form['event']['end']['date']['end_year'], $form_values['start_year']);
form_set_value($form['event']['end']['date']['end_month'], $form_values['start_month']);
form_set_value($form['event']['end']['date']['end_day'], $form_values['start_day']);
form_set_value($form['event']['end']['date']['end_hour'], $form_values['start_hour']);
form_set_value($form['event']['end']['date']['end_minute'], $form_values['start_minute']);
if (variable_get('event_ampm', '0') == 1) {
form_set_value($form['event']['end']['date']['end_ampm'], $form_values['start_ampm']);
}
}
}
else {
if (isset($form_values['event_start']) && event_is_later($form_values['event_start'], $form_values['event_end'], 'string')) {
form_set_value($form['event']['event_end'], $form_values['event_start']);
}
}
}
/**
* hook_nodeapi implementation
*
* @ingroup event_nodeapi
*/
function event_nodeapi(&$node, $op, $teaser = NULL, $page = NULL) {
// make sure it's an event enabled node
if (variable_get('event_nodeapi_'. $node->type, 'never') != 'never') {
switch ($op) {
case 'load':
global $user;
event_include_files();
$object = event_get_event_load($node->nid);
return array('event' => array(
'start' => $object->event_start,
'end' => $object->event_end,
'start_orig' => $object->event_start,
'end_orig' => $object->event_end,
'timezone' => $object->timezone,
'offset' => $object->offset,
'offset_dst' => $object->offset_dst,
'dst_region' => $object->dst_region,
'has_time' => $object->has_time,
'has_end_date' => $object->has_end_date,
'start_utc' => $object->event_start_utc,
'start_user' => $object->event_start_user,
'start_site' => $object->event_start_site,
'end_utc' => $object->event_end_utc,
'end_user' => $object->event_end_user,
'end_site' => $object->event_end_site,
'node_type' => $node->type));
break;
case 'view':
if (isset($node->in_preview) && $node->in_preview) {
global $user;
event_nodeapi($node, 'submit');
$node->event['start'] = $node->event_start;
$node->event['end'] = $node->event_end;
$node->event['start_exploded'] = event_explode_date($node->event_start);
$node->event['end_exploded'] = event_explode_date($node->event_end);
$node->event['start_user'] = event_date_later($node->event['start_exploded'], $user->timezone, 'seconds');
$node->event['end_user'] = event_date_later($node->event['end_exploded'], $user->timezone, 'seconds');
$node->event['start_site'] = event_date_later($node->event['start_exploded'], variable_get('date_default_timezone', 0), 'seconds');
$node->event['end_site'] = event_date_later($node->event['end_exploded'], variable_get('date_default_timezone', 0), 'seconds');
$node->event['timezone'] = $node->timezone;
}
switch (variable_get('event_timezone_display', 'event')) {
case 'site':
if (variable_get('date_default_timezone_id', 0) != $node->timezone) {
$node->event['start'] = $node->event['start_site'];
$node->event['end'] = $node->event['end_site'];
break;
}
// no break
case 'event':
break;
case 'user':
$node->event['start'] = $node->event['start_user'];
$node->event['end'] = $node->event['end_user'];
break;
}
$node->event['start_exploded'] = event_explode_date($node->event['start']);
$node->event['end_exploded'] = event_explode_date($node->event['end']);
$node->event['start_format'] = event_format_date($node->event['start_exploded'], 'small');
$node->event['start_time_format'] = event_format_date($node->event['start_exploded'], 'custom', (variable_get('event_ampm', '0') ? 'g:i a' : 'H:i'));
$node->event['end_format'] = event_format_date($node->event['end_exploded'], 'small');
$node->event['end_time_format'] = event_format_date($node->event['end_exploded'], 'custom', (variable_get('event_ampm', '0') ? 'g:i a' : 'H:i'));
$node->content['event'] = array(
'#value' => theme('event_nodeapi', $node),
'#weight' => -10,
);
break;
case 'rss item':
$node->body = theme('event_nodeapi', $node) . $node->body;
$node->teaser = theme('event_nodeapi', $node) . $node->teaser;
break;
case 'submit':
// $node->event_start is set for jscalendar and eventrepeat module
if (!isset($node->event_start)) {
if (variable_get('event_ampm', '0')) {
if ($node->start_ampm == 'pm' && $node->start_hour < 12) {
$node->start_hour += 12;
}
if ($node->end_ampm == 'pm' && $node->end_hour < 12) {
$node->end_hour += 12;
}
}
$node->event_start = $node->start_year .'-'. $node->start_month .'-'. $node->start_day .' '. str_pad($node->start_hour, 2, '0', STR_PAD_LEFT) .':'. str_pad($node->start_minute, 2, '0', STR_PAD_LEFT) .':00';
$node->event_end = $node->end_year .'-'. $node->end_month .'-'. $node->end_day .' '. str_pad($node->end_hour, 2, '0', STR_PAD_LEFT) .':'. str_pad($node->end_minute, 2, '0', STR_PAD_LEFT) .':00';
}
$node->start_in_dst = event_is_dst($node->timezone, $node->event_start);
$node->end_in_dst = event_is_dst($node->timezone, $node->event_end);
break;
case 'update':
// While the DELETE/INSERT is less efficient than single UPDATE, the
// UPDATE only works if there's an existing record in the events
// table. I.e. if you create a node and then enable the event module,
// there will be no record in the event table, so the dates cannot be
// changed.
db_query('DELETE FROM {event} WHERE nid = %d', $node->nid);
// no break
case 'insert':
db_query("INSERT INTO {event} (nid, event_start, event_end, timezone, start_in_dst, end_in_dst, has_time, has_end_date) VALUES (%d, '%s', '%s', %d, %d, %d, %d, %d)", $node->nid, $node->event_start, $node->event_end, $node->timezone, $node->start_in_dst, $node->end_in_dst, $node->has_time, $node->has_end_date);
event_set_range();
break;
case 'delete':
db_query('DELETE FROM {event} WHERE nid = %d', $node->nid);
event_set_range();
break;
}
}
}
/**
* Implementation of hook_cron
*/
function event_cron() {
// 1) Check all DST regions for a recent change in DST
$time = _event_user_time();
$time_old = event_date_later($time, -1);
$changed_regions = array();
for ($i = 1; $i <= 20; $i++) {
$before = event_is_dst($i, $time_old);
$now = event_is_dst($i, $time);
if ($before != $now) {
$changed_regions[$i] = array($before, $now);
}
}
$site_timezone = variable_get('date_default_timezone_id', 0);
// 2) Change user tz offset
foreach ($changed_regions as $key => $values) {
$result = db_query('SELECT * FROM {event_timezones} WHERE dst_region = %d', $key);
if ($values[1] == 1) {
db_query('UPDATE {event_timezones} SET is_dst = 1 WHERE dst_region = %d', $key);
}
else {
db_query('UPDATE {event_timezones} SET is_dst = 0 WHERE dst_region = %d', $key);
}
while ($zone = db_fetch_object($result)) {
if ($values[1] == 1) {
$offset = explode(':', $zone->offset_dst);
}
else {
$offset = explode(':', $zone->offset);
}
$offset = $offset[0] * 3600 + $offset[1] * 60 + $offset[2];
db_query('UPDATE {users} SET timezone = %d WHERE timezone_id = %d', $offset, $zone->timezone);
if ($site_timezone == $zone->timezone) {
variable_set('date_default_timezone', $offset);
}
}
}
}
/**
* Get an array of nodes with a given state. If no state is provided an array
* with all nodes keyed by state will be returned. The possible states are:
* 'all' Always shown in the calendar.
* 'solo' Only shown with nodes of its type.
* 'never' Never show in the calendar.
*
* @param $state string state name
* @return array of node types
*/
function event_get_types($state = NULL) {
static $types;
if (!is_array($types)) {
$types['all'] = array();
$types['solo'] = array();
$types['never'] = array();
$result = db_query("SELECT * FROM {variable} WHERE name like 'event_nodeapi_%'");
while ($type = db_fetch_object($result)) {
$types[unserialize($type->value)][] = substr($type->name, 14);
}
}
switch ($state) {
case 'all':
return $types['all'];
break;
case 'solo':
return $types['solo'];
break;
case 'never':
return $types['never'];
break;
default:
return $types;
break;
}
}
/**
* Find the state of a node type. The state determines if and how those nodes
* will be displayed in the calendar. The state values are:
* 'all' Always shown in the calendar.
* 'solo' Only shown with nodes of its type.
* 'never' Never show in the calendar.
*
* @param $type node type
* @return state value
*/
function event_enabled_state($type) {
$states = event_get_types();
foreach ($states as $key => $state) {
if (in_array($type, $state)) {
return $key;
}
}
}
/**
* Find out if a node type is shown in all calendars.
* @param $type node type
* @return boolean
*/
function event_is_enabled($type) {
$states = event_get_types();
return in_array($type, $states['all']);
}
/**
* Update the variables the module uses to track the first and last events.
*/
function event_set_range() {
$range = db_fetch_object(db_query('SELECT MIN(e.event_start) AS event_start, MAX(e.event_end) AS event_end FROM {event} e'));
variable_set('event_range_prev', event_explode_date($range->event_start));
variable_set('event_range_next', event_explode_date($range->event_end));
}
/**
* Display a page with the timezone and daylight savings time regions.
* @ingroup event_support
*/
function event_dst() {
$timestamp = time();
$zones = event_get_timezones();
foreach ($zones as $key => $zone) {
if ($zone['dst_region']) {
$list[$zone['dst_region']][] = $zone['timezone'] .', '. (event_is_dst($zone['dst_region'], $timestamp) ? 'In DST' : 'Not in DST') .': '. event_check_dst($key, $timestamp);
}
else {
$list[$zone['dst_region']][] = $zone['timezone'] .': '. event_check_dst($key, $timestamp);
}
}
$regions = event_get_dst_regions();
foreach ($list as $key => $region) {
$output .= theme('box', $regions[$key], theme('item_list', $region));
}
drupal_set_title(t('Daylight Savings Regions | Current GMT: !date', array('!date' => gmdate('m-d-Y, H:i', $timestamp))));
return $output;
}
/**
* Get DST and TZ induced offset of event
* @ingroup event_support
*
* @param $event event array part of a node object
* @param $time time
*
* @return the offset
*/
function event_check_dst($event, $time) {
if ($event->event['dst_region']) {
// zone is a region which obeys dst, return correct offset
return (event_is_dst($event) ? $event->event['offset_dst'] : $event->event['offset']);
}
else {
// no dst offset for this region
return $event->event['offset'];
}
}
/**
* Check if time is in Daylight Savings Time
*
* @ingroup event_support
* @param $dst_region the DST region as defined in event_timezones.inc
* @param $time a time string, format "YYYY-MM-DD HH:mm:ss" or date array
*
* @return
* 0 or 1
*/
function event_is_dst($dst_region, $time) {
if (is_string($time)) {
$time = event_explode_date($time);
}
$year = $time['year'];
$timestamp = strtotime($time['year'] .'-'. $time['month'] .'-'. $time['day'] .' '. $time['hour'] .':'. $time['minute'] .':'. $time['second']);
// Information on Daylight Saving time was obtained from http://webexhibits.org/daylightsaving/g.html
switch ($dst_region) {
case 0:
return 0;
case 1: // Egypt
// start of DST (last Friday in April)
$dststart = strtotime("-1 week friday GMT", strtotime("1 may $year GMT"));
// end of DST (last Thursday in September)
$dstend = strtotime("-1 week thursday GMT", strtotime("1 october $year GMT"));
break;
case 2: // Namibia
// start of DST (first Sunday in September)
$dststart = strtotime("1 week sunday GMT", strtotime("1 september $year GMT"));
// end of DST (first Sunday April)
$dstend = strtotime("1 week sunday GMT", strtotime("1 april $year GMT"));
break;
case 3: // Former USSR
// start of DST (last Sunday in March)
$dststart = strtotime("-1 week sunday GMT", strtotime("1 april $year GMT"));
// end of DST (last Sunday October)
$dstend = strtotime("-1 week sunday GMT", strtotime("1 november $year GMT"));
break;
case 4: // Iraq, Syria
// start of DST (April 1st)
$dststart = strtotime("1 april $year GMT");
// end of DST (October 1st)
$dstend = strtotime("1 october $year GMT");
break;
case 5: // Israel
// start of DST (last Friday befor April 2nd, 2am)
$dststart = strtotime("-1 week friday GMT", strtotime("2 april $year GMT"));
// end of DST (Saturday between Rosh Hashana (Oct. 4-5) and Yom Kippur (Oct. 13))
$dstend = strtotime("-1 saturday $year GMT", strtotime("13 october $year GMT"));
switch ($year) {
case '2007':
$dstend = strtotime("-1 saturday $year GMT", strtotime("16 september $year GMT"));
break;
case '2008':
$dstend = strtotime("-1 saturday $year GMT", strtotime("5 october $year GMT"));
break;
case '2009':
$dstend = strtotime("-1 saturday $year GMT", strtotime("27 september $year GMT"));
break;
case '2010':
$dstend = strtotime("-1 saturday $year GMT", strtotime("12 september $year GMT"));
break;
case '2011':
$dstend = strtotime("-1 saturday $year GMT", strtotime("2 october $year GMT"));
break;
case '2012':
$dstend = strtotime("-1 saturday $year GMT", strtotime("23 september $year GMT"));
break;
case '2013':
$dstend = strtotime("-1 saturday $year GMT", strtotime("8 september $year GMT"));
break;
case '2014':
$dstend = strtotime("-1 saturday $year GMT", strtotime("28 september $year GMT"));
break;
case '2015':
$dstend = strtotime("-1 saturday $year GMT", strtotime("20 september $year GMT"));
break;
case '2016':
$dstend = strtotime("-1 saturday $year GMT", strtotime("9 october $year GMT"));
break;
default:
// strictly speaking for 2005/6 only
$dstend = strtotime("-1 saturday $year GMT", strtotime("13 october $year GMT"));
}
break;
case 6: // Lebanon, Kirgizstan
// start of DST (Last Sunday in March)
$dststart = strtotime("-1 week sunday GMT", strtotime("1 april $year GMT"));
// end of DST (Last Sunday in October)
$dstend = strtotime("-1 week sunday GMT", strtotime("1 november $year GMT"));
break;
case 7: // Palestine
// start of DST (First Friday on or after April 15th)
$dststart = strtotime("next friday GMT", strtotime("14 april $year GMT"));
// end of DST (First Friday on or after October 15th)
$dstend = strtotime("next friday GMT", strtotime("14 october $year GMT"));
break;
case 8: // Iran
// start of DST (the first day of Farvardin (March 21))
$dststart = strtotime("21 march $year GMT");
// end of DST (the first day of Mehr (September 23))
$dstend = strtotime("23 september $year GMT");
break;
case 9: // South Australia
// start of DST (last Sunday in October)
$dststart = strtotime("-1 week sunday GMT", strtotime("1 november $year GMT"));
// end of DST (first Sunday in April)
$dstend = strtotime("1 week sunday GMT", strtotime("1 april $year GMT"));
break;
case 10: // Australia, Tasmania
// start of DST (first Sunday in October)
$dststart = strtotime("1 week sunday GMT", strtotime("1 october $year GMT"));
// end of DST (first Sunday in April)
$dstend = strtotime("1 week sunday GMT", strtotime("1 april $year GMT"));
break;
case 11: // New Zealand
// start of DST (first Sunday in October)
$dststart = strtotime("1 week sunday GMT", strtotime("1 october $year GMT"));
// end of DST (third Sunday in March)
$dstend = strtotime("3 week sunday GMT", strtotime("1 march $year GMT"));
break;
case 12: // Tonga
// start of DST (first Sunday in November)
$dststart = strtotime("1 week sunday GMT", strtotime("1 november $year GMT"));
// end of DST (last Sunday in January)
$dstend = strtotime("-1 week sunday GMT", strtotime("1 february $year GMT"));
break;
case 13: // EU and other European countries
// start of DST (last Sunday in March 1 am GMT)
$dststart = strtotime("-1 week sunday GMT", strtotime("1 april $year GMT")) + 3600;
// end of DST in Europe (last Sunday in October 1 am GMT)
$dstend = strtotime("-1 week sunday GMT", strtotime("1 november $year GMT")) + 3600;
break;
case 14: // Russian Federation
// start of DST (last Sunday in March 2 am local time)
$dststart = strtotime("-1 week sunday GMT", strtotime("1 april $year GMT")) + 7200;
// end of DST (last Sunday in October 2 am local time)
$dstend = strtotime("-1 week sunday GMT", strtotime("1 november $year GMT")) + 7200;
break;
case 15: // Northern America (where applicable)
// start of DST (where applicable) (first Sunday in April before 2007,
// after that second Sunday in March, 2 am local time)
$dststart = strtotime("1 week sunday GMT", strtotime("1 april $year GMT")) + 7200;
if ($year < 2007) {
$dststart = strtotime("0 week sunday GMT", strtotime("1 april $year GMT")) + 7200;
}
else {
$dststart = strtotime("1 week sunday GMT", strtotime("1 march $year GMT")) + 7200;
}
// end of DST (where applicable) (last Sunday in October 2 am local time)
$dstend = strtotime("-1 week sunday GMT", strtotime("1 november $year GMT")) + 7200;
break;
case 16: // Cuba
// start of DST (April 1st)
$dststart = strtotime("1 april $year GMT");
// end of DST (last Sunday in October)
$dstend = strtotime("-1 week sunday GMT", strtotime("1 november $year GMT"));
break;
case 17: // Brazil
// start of DST (first Sunday in November)
$dststart = strtotime("1 week sunday GMT", strtotime("1 november $year GMT"));
// end of DST (third Sunday in February)
$dstend = strtotime("3 week sunday GMT", strtotime("1 february $year GMT"));
break;
case 18: // Chile
// start of DST (Second Saturday of October - at midnight)
$dststart = strtotime("2 week saturday GMT", strtotime("1 october $year GMT"));
// end of DST (Second Saturday of March - at midnight)
$dstend = strtotime("2 week sunday GMT", strtotime("1 march $year GMT"));
break;
case 19: // Falklands
// start of DST (First Sunday on or after 8 September)
$dststart = strtotime("next sunday GMT", strtotime("7 september $year GMT"));
// end of DST (First Sunday on or after 6 April)
$dstend = strtotime("next sunday GMT", strtotime("5 april $year GMT"));
break;
case 20: // Paraguay
// start of DST (first Sunday in September)
$dststart = strtotime("1 week sunday GMT", strtotime("1 september $year GMT"));
// end of DST (first Sunday in April)
$dstend = strtotime("1 week sunday GMT", strtotime("1 april $year GMT"));
break;
}
return (int) ($dststart <= $timestamp && $timestamp <= $dstend);
}
/**
* Compares two dates in format YYYY-MM-DD HH:mm:ss or as a date array
*
* @param $date_a first date
* @param $date_b second date
* @param $type either "string" or "array"
*
* @return TRUE if $date_a >= $date_b
* FALSE else
*/
function event_is_later($date_a, $date_b, $type = 'array') {
if ($type == 'string') {
$date_a = event_explode_date($date_a);
$date_b = event_explode_date($date_b);
}
$date_a = mktime((int)$date_a['hour'], (int)$date_a['minute'], (int)$date_a['second'], (int)$date_a['month'], (int)$date_a['day'], (int)$date_a['year']);
$date_b = mktime((int)$date_b['hour'], (int)$date_b['minute'], (int)$date_b['second'], (int)$date_b['month'], (int)$date_b['day'], (int)$date_b['year']);
if ($date_a >= $date_b) {
return TRUE;
}
return FALSE;
}
/**
* Check date string for consistency, values are not checked
*
* dddd-dd-dd dd:dd and dddd-dd-dd dd:dd:dd are both valid.
*
* @param $date datetime string
*
* @return TRUE or FALSE
*/
function event_check_date($date) {
return (bool) preg_match('/^\d\d\d\d-\d\d-\d\d \d\d:\d\d(:\d\d)?$/', $date);
}
/**
* Format datetime string as an array
*
* @param $date datetime string
*
* @return an array containing the event info.
*/
function event_explode_date($date) {
if (function_exists('date_parse')) {
$date = date_parse($date);
$return = array();
$return['year'] = $date['year'];
$return['month'] = str_pad($date['month'], 2, '0', STR_PAD_LEFT);
$return['day'] = str_pad($date['day'], 2, '0', STR_PAD_LEFT);
$return['hour'] = str_pad($date['hour'], 2, '0', STR_PAD_LEFT);
$return['minute'] = str_pad($date['minute'], 2, '0', STR_PAD_LEFT);
$return['second'] = str_pad($date['second'], 2, '0', STR_PAD_LEFT);
return $return;
}
else {
list($date, $time) = explode(' ', $date);
// make it work for "time only" and "date only" values as well
if (!isset($time)) {
if (strpos($date, '-') ) {
$time = '00:00:00';
}
else {
$time = $date;
$date = '--';
}
}
list($year, $month, $day) = explode('-', $date);
list($hours, $minutes, $seconds) = explode(':', $time);
return array('year' => $year, 'month' => $month, 'day' => $day, 'hour' => $hours, 'minute' => $minutes, 'second' => $seconds);
}
}
/**
* Format datetime array as a string
*
* @param $date datetime array
*
* @return a string containing the event info.
*/
function event_implode_date($date) {
return $date['year'] .'-'. $date['month'] .'-'. $date['day'] .' '. $date['hour'] .':'. $date['minute'] .':'. $date['second'];
}
/**
* Special submit handler for the site timezone form.
*/
function event_extra_setting_form_submit($form_id, &$form_values){
$values = explode('|', $form_values['date_default_timezone']);
variable_set('date_default_timezone', $values[1]);
variable_set('date_default_timezone_id', $values[0]);
}
/**
* Special submit handler for the user timezone form.
*/
function event_extra_user_form_submit($form_id, &$form_values){
$values = explode('|', $form_values['timezone']);
db_query('UPDATE {users} SET timezone = %d, timezone_id = %d WHERE uid = %d', $values[1], $values[0], arg(1));
}
/**
* Format a date with the given configured format or a custom format string.
*
* Drupal allows administrators to select formatting strings for 'small',
* 'medium' and 'large' date formats. This function can handle these formats,
* as well as any custom format.
*
* This version of this function was adapted to be used with date
* strings of format: YYYY-MM-DD HH:mm:ss
*
* @param $date
* The exact date to format, as a date array or string.
* @param $type
* The format to use. Can be "small", "medium" or "large" for the preconfigured
* date formats. If "custom" is specified, then $format is required as well.
* @param $format
* A PHP date format string as required by date(). A backslash should be used
* before a character to avoid interpreting the character as part of a date
* format. 'r', 'O', and 'Z' aren't implemented.
* @return
* A translated date string in the requested format.
*/
function event_format_date($date, $type = 'medium', $format = '') {
if (!is_array($date)) {
$date = event_explode_date($date);
}
switch ($type) {
case 'small':
$format = variable_get('date_format_short', 'm/d/Y - H:i');
break;
case 'large':
$format = variable_get('date_format_long', 'l, F j, Y - H:i');
break;
case 'custom':
// No change to format
break;
case 'medium':
default:
$format = variable_get('date_format_medium', 'D, m/d/Y - H:i');
}
$max = strlen($format);
$ret = '';
for ($i = 0; $i < $max; $i++) {
$c = $format[$i];
switch ($c) {
case 'a':
if ($date['hour'] < 12) {
$ret .= t('am');
}
else {
$ret .= t('pm');
}
break;
case 'A':
if ($date['hour'] < 12) {
$ret .= t('AM');
}
else {
$ret .= t('PM');
}
break;
case 'Y':
$ret .= $date['year'];
break;
case 'y':
$ret .= substr($date['year'], 2);
break;
case 'F':
$months = _event_months();
$ret .= t($months[$date['month']]);
break;
case 'm':
$ret .= $date['month'];
break;
case 'M':
$months = _event_months_abbrev();
$ret .= t($months[$date['month']]);
break;
case 'n':
$ret .= (int) $date['month'];
break;
case 'd':
$ret .= $date['day'];
break;
case 'j':
$ret .= (int) $date['day'];
break;
case 'S':
$values = array('01' => t('st'), '02' => t('nd'), '03' => t('rd'));
if (isset($values[$date['day']])) {
$ret .= $values[$date['day']];
break;
}
$ret .= t('th');
break;
case 'g':
$result = $date['hour'] % 12;
if ($result == 0) {
$result = 12;
}
$ret .= $result;
break;
case 'G':
$ret .= (int) $date['hour'];
break;
case 'h':
$result = $date['hour'] % 12;
if ($result == 0) {
$result = 12;
}
$ret .= str_pad($result, 2, '0', STR_PAD_LEFT);
break;
case 'H':
$ret .= $date['hour'];
break;
case 'i':
$ret .= $date['minute'];
break;
case 's':
$ret .= $date['second'];
break;
case 'l':
$ret .= t(gmdate('l', strtotime($date['year'] .'-'. $date['month'] .'-'. $date['day'] .' 12:00:00')));
break;
case 'D':
$ret .= t(gmdate('D', strtotime($date['year'] .'-'. $date['month'] .'-'. $date['day'] .' 12:00:00')));
break;
case 'w':
$ret .= t(gmdate('w', strtotime($date['year'] .'-'. $date['month'] .'-'. $date['day'] .' 12:00:00')));
break;
case 't':
$ret .= gmdate('t', strtotime($date['year'] .'-'. $date['month'] .'-'. $date['day'] .' 12:00:00'));
break;
case 'r':
$ret .= 'r is not implemented by event_format_date';
break;
case 'O':
$ret .= 'O is not implemented by event_format_date';
break;
case 'Z':
$ret .= 'Z is not implemented by event_format_date';
break;
case '\\':
$ret .= $format[++$i];
break;
default:
$ret .= $c;
}
}
return $ret;
}
function event_get_dst_regions() {
static $regions;
if (!is_array($regions)) {
$regions = array(0 => t('None'),
1 => t('Egypt'),
2 => t('Namibia'),
3 => t('Asia - Former USSR'),
4 => t('Iraq, Syria'),
5 => t('Israel'),
6 => t('Lebanon, Kirgizstan'),
7 => t('Palestine'),
8 => t('Iran'),
9 => t('South Australia'),
10 => t('Australia, Tasmania'),
11 => t('New Zealand'),
12 => t('Tonga'),
13 => t('EU and other European countries'),
14 => t('Russian Federation'),
15 => t('North America'),
16 => t('Cuba'),
17 => t('Brazil'),
18 => t('Chile'),
19 => t('Falklands'),
20 => t('Paraguay')
);
}
return $regions;
}
/**
* Returns a single timezone
*
* @param $id timezone id
*
* @return
*/
function event_zonelist_by_id($id) {
static $zones = array();
if (!isset($zones[$id])) {
$zone = db_fetch_array(db_query('SELECT * FROM {event_timezones} WHERE timezone = %d', $id));
$zones[$id] = $zone;
}
return $zones[$id];
}
/**
* Returns an array of timezones, either keyed by the zones's numeric
* ID or by a composite key of ID and offset in seconds.
*
* @param $key a string, either 'id' or 'offset', 'id' is default
*/
function event_zonelist($key = 'id') {
static $zones;
if (!is_array($zones)) {
$result = db_query('SELECT * FROM {event_timezones} ORDER BY timezone');
$tz_array = array();
while ($tz = db_fetch_array($result)) {
$tz_array[$tz['timezone']] = $tz;
}
$zones = array();
$zones['offset'] = array();
$zones['id'] = array();
foreach ($tz_array as $id => $zone) {
$zones['id'][$id] = t($zone['name']);
if (event_is_dst($zone['dst_region'], _event_user_time())) {
$offset = explode(':', $zone['offset_dst']);
}
else {
$offset = explode(':', $zone['offset']);
}
$offset = $offset[0] * 3600 + $offset[1] * 60 + $offset[2];
$zones['offset']["$id|$offset"] = t($zone['name']);
}
}
return $zones[$key];
}
/**
* Format event date for use in URL
*
* @param $array Array as output from event_explode_date
*
* @return a string formatted as Y/m/d
*/
function _event_format_url($array) {
return $array['year'] .'/'. $array['month'] .'/'. $array['day'];
}
/**
* Return a date $duration days or months after $date
*
* @param $date The date
* @param $duration The number of days, months, or seconds
* @param $type Optional, either "days", "months", "seconds", default "days"
*
* @return The later date as a date array.
*/
function event_date_later($date, $duration, $type = 'days') {
switch ($type) {
case 'days':
$end = explode('-', gmdate('Y-m-d', gmmktime(12, 0, 0, (int)$date['month'], (int)$date['day'] + $duration, (int)$date['year'])));
break;
case 'months':
$end = explode('-', gmdate('Y-m-d', gmmktime(12, 0, 0, (int)$date['month'] + $duration, (int)$date['day'], (int)$date['year'])));
// We need to validate that the resulting date will be in the
// $duration next month. Otherwise the 31st of February will be
// the 2nd of March.
// Check the number of months that we advanced and try again
// with a lesser day if it fails.
static $iteration;
if ($date['day'] > 28 && $iteration < 5 && abs(abs($date['year'] - $end[0]) * 12 - abs($date['month'] - $end[1]) != abs($duration))) {
$date['day']--;
$iteration++;
return event_date_later($date, $duration, 'months');
}
break;
case 'seconds':
$end = explode('-', gmdate('H-i-s-Y-m-d', gmmktime((int)$date['hour'], (int)$date['minute'], (int)$date['second'] + $duration, (int)$date['month'], (int)$date['day'], (int)$date['year'])));
break;
}
$end_date = array();
switch ($type) {
case 'days':
case 'months':
$end_date['year'] = $end['0'];
$end_date['month'] = $end['1'];
$end_date['day'] = $end['2'];
$end_date['hour'] = $date['hour'];
$end_date['minute'] = $date['minute'];
$end_date['second'] = $date['second'];
break;
case 'seconds':
$end_date['hour'] = $end['0'];
$end_date['minute'] = $end['1'];
$end_date['second'] = $end['2'];
$end_date['year'] = $end['3'];
$end_date['month'] = $end['4'];
$end_date['day'] = $end['5'];
break;
}
return $end_date;
}
/**
* Return a timespan (in days) between two dates
*
* @param $start The first date
* @param $end The second date
* @parem $type Type of results
*
* @return The duration in days (if $type = days) or seconds if ($type = 'seconds').
*/
function event_duration($start, $end, $type = 'days') {
switch ($type) {
case 'seconds':
return mktime($end['hour'], $end['minute'], $end['second'], $end['month'], $end['day'], $end['year']) - mktime($start['hour'], $start['minute'], $start['second'], $start['month'], $start['day'], $start['year']);
break;
default:
return floor((mktime(12, 0, 0, $end['month'], $end['day'], $end['year']) - mktime(12, 0, 0, $start['month'], $start['day'], $start['year'])) / 86400);
}
}
/**
* @return array of translated month names with numeric index.
*/
function _event_months() {
return array('01' => t('January'), '02' => t('February'), '03' => t('March'), '04' => t('April'), '05' => t('May'), '06' => t('June'), '07' => t('July'), '08' => t('August'), '09' => t('September'), '10' => t('October'), '11' => t('November'), '12' => t('December'));
}
/**
* @return array of abbreviated translated month names with numeric index.
*/
function _event_months_abbrev() {
return array('01' => t('Jan'), '02' => t('Feb'), '03' => t('Mar'), '04' => t('Apr'), '05' => t('May'), '06' => t('Jun'), '07' => t('Jul'), '08' => t('Aug'), '09' => t('Sep'), '10' => t('Oct'), '11' => t('Nov'), '12' => t('Dec'));
}
/**
* Translates offset in seconds to a timezone ID
* @param $offset timezone offset in seconds
*
* @return numeric ID of timezone
*/
function event_timezone_map($offset) {
static $map;
if (!is_array($map)) {
$map = array('-43200' => '305',
'-39600' => '304',
'-36000' => '303',
'-34200' => '486',
'-32400' => '313',
'-28800' => '312',
'-25200' => '311',
'-21600' => '310',
'-18000' => '309',
'-14400' => '308',
'-12600' => '143',
'-10800' => '307',
'-7200' => '306',
'-3600' => '302',
'0' => '487',
'3600' => '314',
'7200' => '320',
'10800' => '321',
'12600' => '235',
'14400' => '322',
'18000' => '323',
'19800' => '185',
'20700' => '207',
'21600' => '324',
'23400' => '387',
'25200' => '325',
'28800' => '326',
'32400' => '327',
'34200' => '270',
'36000' => '315',
'37800' => '267',
'39600' => '316',
'41400' => '438',
'43200' => '317',
'45900' => '417',
'46800' => '318',
'50400' => '319');
}
return $map[$offset];
}
/**
* Displays the help text for this module.
*
* @ingroup event_core
* @param $section the page which is requesting help
* @return the help text
*/
function event_help($section) {
switch ($section) {
case 'admin/help#event':
$output = ''. t('The event module allows for any type of content to be event enabled, meaning content can have a start and end time, and appear in calendars. The ability to event enable any content type combined with the ability to create new types of content make it possible to create unlimited types of calendars. The ability to broadly event enable content will allow for creative applications combining information and real world events.') .'
';
$output .= ''. t('The administrator can decide which content types should be events for their site. In content type configuration, administrators can select the calendar view options: never, all views, or only views for this type. For example, this makes it possible to have a general calendar which shows all meetups and house parties in the same calendar, and have a separate calendar for rallies which only contains the rallies content type. Calendars can be customized to view a specific content type or a category of content, using taxonomies.') .'
';
$output .= ''. t('Administrators can also set two types of options for events; general event options, and event overview options. General event options are for timezone configuration, time notation formats, and event block configuration. Event overview options allow calendar and table event default views. Administrators can also set general filter controls for content types and categories, via the event taxonomy controls.') .'
';
$output .= t('You can
- enable content types to be event enabled at administer >> content >> content types then click configure for a content type.
- administer general event options administer >> settings >> events.
- create content and set a start and end time, if the administrator has set that content type to be event enabled.
- use RSVP or signup module to invite users to events.
', array('!admin-node-configure-types' => url('admin/content/types'), '!admin-settings-event' => url('admin/event/event'), '!node-add' => url('node/add'), '!external-http-drupal-org-handbook-modules-signup' => 'http://drupal.org/project/signup', '!external-http-drupal-org-handbook-modules-rsvp' => 'http://drupal.org/project/rsvp')) .'
';
$output .= ''. t('For more information please read the configuration and customization handbook Event page.', array('!event' => 'http://www.drupal.org/handbook/modules/event/')) .'
';
return $output;
case 'event/dst':
return t('This is a listing of all the event system\'s time zones, sorted by daylight savings time regions, and their respective offsets from GMT in seconds. Time zones in the \'None\' region do not observe daylight savings time. If you believe there is an error, please first search for the locale on !timeanddate and confirm it. If there is indeed an error please submit a !bugreport on drupal.org so we can fix it.', array('!timeanddate' => l('http://timeanddate.com/worldclock/search.html', 'http://timeanddate.com/worldclock/search.html'), '!bugreport' => l('bug report', 'http://drupal.org/node/add/project-issue/event')));
}
}
/*
* Implementation of hook_token_list()
*/
function event_token_list($type = 'all') {
if ($type == 'node' || $type == 'all') {
$tokens['node']['eventyyyy'] = t("The year the event starts.");
$tokens['node']['eventmm'] = t("The two-digit month (01-12) the event starts.");
$tokens['node']['eventmon'] = t("The three-letter month (jan-dec) the event starts.");
$tokens['node']['eventdd'] = t("The two-digit day of the month (01-31) the event starts.");
$tokens['node']['eventday'] = t("The three-letter day of the week (sun-sat) the event starts.");
$tokens['node']['eventweek'] = t("The week number (1-52) of the year the event starts.");
return $tokens;
}
}
/*
* Implementation of hook_token_values()
*/
function event_token_values($type, $object = NULL) {
if ($type == 'node') {
// Get the event start time as a Unix timestamp
$eventstart = $object->event_start;
if (is_numeric($eventstart)) $eventstart = (int)$eventstart;
elseif (is_string($eventstart)) $eventstart = strtotime($object->event_start);
$tokens['eventyyyy'] = date('Y', $eventstart);
$tokens['eventmm'] = date('m', $eventstart);
$tokens['eventmon'] = date('M', $eventstart);
$tokens['eventdd'] = date('d', $eventstart);
$tokens['eventday'] = date('D', $eventstart);
$tokens['eventweek'] = date('W', $eventstart);
return $tokens;
}
}