You are here

date_ical_plugin_style_ical_feed.inc in Date iCal 7.2

Same filename and directory in other branches
  1. 7.3 includes/date_ical_plugin_style_ical_feed.inc

Views style plugin for the Date iCal module.

File

includes/date_ical_plugin_style_ical_feed.inc
View source
<?php

/**
 * @file
 * Views style plugin for the Date iCal module.
 */

/**
 * Default style plugin to render an iCal feed.
 */
class date_ical_plugin_style_ical_feed extends views_plugin_style {
  protected function _get_option($option_name) {
    return isset($this->options[$option_name]) ? $this->options[$option_name] : '';
  }

  // Sets up the iCal feed icon on calendar pages.
  function attach_to($display_id, $path, $title) {
    $display = $this->view->display[$display_id]->handler;
    $url_options = array();
    $input = $this->view
      ->get_exposed_input();
    if ($input) {
      $url_options['query'] = $input;
    }
    $url_options['absolute'] = TRUE;
    $url = url($this->view
      ->get_url(NULL, $path), $url_options);

    // If the user didn't disable the option, change the scheme to webcal:// so
    // that calendar clients can automatically subscribe via the iCal link.
    if (!$this
      ->_get_option('disable_webcal')) {
      $url = str_replace(array(
        'http://',
        'https://',
      ), 'webcal://', $url);
    }

    // Render the feed icon and header tag (except during a View Preview).
    if (empty($this->view->live_preview)) {
      $tooltip = t('Add to My Calendar');
      if (!isset($this->view->feed_icon)) {

        // In PHP 5.5, you're no longer allowed to concatinate onto a not-yet-existent property.
        $this->view->feed_icon = '';
      }
      $this->view->feed_icon .= theme('date_ical_icon', array(
        'url' => check_url($url),
        'tooltip' => $tooltip,
        'view' => $this->view,
      ));
      drupal_add_html_head_link(array(
        'rel' => 'alternate',
        'type' => 'text/calendar',
        'title' => $tooltip,
        'href' => $url,
      ));
    }
  }
  function option_definition() {
    $options = parent::option_definition();
    $options['cal_name'] = array(
      'default' => array(),
    );
    $options['no_calname'] = array(
      'default' => FALSE,
      'bool' => TRUE,
    );
    $options['disable_webcal'] = array(
      'default' => FALSE,
      'bool' => TRUE,
    );
    $options['exclude_dtstamp'] = array(
      'default' => FALSE,
      'bool' => TRUE,
    );
    return $options;
  }
  function options_form(&$form, &$form_state) {
    parent::options_form($form, $form_state);

    // Allow users to override the default Calendar name (X-WR-CALNAME).
    $form['cal_name'] = array(
      '#type' => 'textfield',
      '#title' => t('iCal Calendar Name'),
      '#default_value' => $this
        ->_get_option('cal_name'),
      '#description' => t('This will appear as the title of the iCal feed. If left blank, the View Title will be used.
        If that is also blank, the site name will be inserted as the iCal feed title.'),
    );
    $form['no_calname'] = array(
      '#type' => 'checkbox',
      '#title' => t('Exclude Calendar Name'),
      '#default_value' => $this
        ->_get_option('no_calname'),
      '#description' => t("Excluding the X-WR-CALNAME value from the iCal Feed causes\n        some calendar clients to add the events in the feed to an existing calendar, rather\n        than creating a whole new calendar for them."),
    );
    $form['disable_webcal'] = array(
      '#type' => 'checkbox',
      '#title' => t('Disable webcal://'),
      '#default_value' => $this
        ->_get_option('disable_webcal'),
      '#description' => t("By default, the feed URL will use the webcal:// scheme, which allows calendar\n        clients to easily subscribe to the feed. If you want your users to instead download this iCal\n        feed as a file, activate this option."),
    );
    $form['exclude_dtstamp'] = array(
      '#type' => 'checkbox',
      '#title' => t('Exclude DTSTAMP'),
      '#default_value' => $this
        ->_get_option('exclude_dtstamp'),
      '#description' => t("By default, the feed will set each event's DTSTAMP property to the time at which the feed got downloaded.\n        Some feed readers will (incorrectly) look at the DTSTAMP value when they compare different downloads of the same feed, and\n        conclcude that the event has been updated (even though it hasn't actually changed). Enable this option to exclude the DTSTAMP\n        field from your feeds, so that these buggy feed readers won't mark every event as updated every time they check."),
    );
  }
  function render() {
    if (empty($this->row_plugin) || !in_array($this->row_plugin->plugin_name, array(
      'date_ical',
      'date_ical_fields',
    ))) {
      debug('date_ical_plugin_style_ical_feed: This style plugin supports only the "iCal Entity" and "iCal Fields" row plugins.', NULL, TRUE);
      return t('To enable iCal output, this view\'s Format must be configured to Show: iCal Entity or iCal Fields.');
    }
    if ($this->row_plugin->plugin_name == 'date_ical_fields' && empty($this->row_plugin->options['date_field'])) {

      // Because the Date field is required by the form, this error state will rarely occur. But I ran across it during
      // testing, and the error that resulted was totally non-sensical, so I'm adding this in case it does ever happen.
      return t("When using the iCal Fields row plugin, the Date field is required. Please set it up using the Settings link under 'Format -> Show: iCal Fields'.");
    }
    $events = array();
    foreach ($this->view->result as $row_index => $row) {
      $this->view->row_index = $row_index;
      try {
        $events[] = $this->row_plugin
          ->render($row, $row_index);
      } catch (Exception $e) {
        debug($e
          ->getMessage(), NULL, TRUE);
        return $e
          ->getMessage();
      }
    }
    unset($this->view->row_index);

    // Try to load the iCalcreator library.
    $library = libraries_load('iCalcreator');
    if (!$library['loaded']) {

      // The iCalcreator library isn't available, so we can't output anything.
      $output = t('Please install the iCalcreator library to enable iCal output.');
    }
    else {

      // Create a vcalendar object using the iCalcreator library.
      $config = array(
        'unique_id' => 'Date iCal v' . DATE_ICAL_VERSION,
      );
      $vcalendar = new vcalendar($config);
      $vcalendar
        ->setMethod('PUBLISH');

      // If the iCal Calendar Name has been set in the Feed Style options, it's used as the
      // title in the iCal feed. If not, the View Title is used. If that is also blank, then
      // the Site Name is used.
      $cal_name = $this
        ->_get_option('cal_name');
      if (empty($cal_name)) {
        $view_title = $this->view
          ->get_title();
        if (!empty($view_title)) {
          $cal_name = $view_title;
        }
        else {
          $cal_name = variable_get('site_name', 'Drupal');
        }
      }

      // Only include the X-WR-CALNAME property if the user didn't check "Exclude Calendar Name".
      if (!$this
        ->_get_option('no_calname')) {
        $vcalendar
          ->setProperty('x-wr-calname', $cal_name, array(
          'VALUE' => 'TEXT',
        ));
      }

      // Now add the VEVENTs.
      $timezones = array();
      foreach ($events as $event) {
        if (empty($event)) {

          // The row plugin returned NULL for this row, which can happen due to
          // either various error conditions, or because an RRULE is involved.
          // When this happens, just skip it.
          continue;
        }
        $vevent = $vcalendar
          ->newComponent('vevent');

        // Get the start date as an array.
        $start = $event['start']
          ->toArray();
        $timezone = $event['start']
          ->getTimezone()
          ->getName();
        $timezones[$timezone] = $timezone;
        if ($event['all_day']) {

          // All day events need to be specified as DATE, rather than DATE-TIME, or they get interpretted wrong.
          $vevent
            ->setDtstart($start['year'], $start['month'], $start['day'], FALSE, FALSE, FALSE, FALSE, array(
            'VALUE' => 'DATE',
          ));
        }
        else {
          $vevent
            ->setDtstart($start['year'], $start['month'], $start['day'], $start['hour'], $start['minute'], $start['second'], $timezone);
        }

        // Add the Timezone info to the start date, for use later.
        $start['tz'] = $event['start']
          ->getTimezone();

        // Only add the end date if there is one.
        if (!empty($event['end'])) {
          $end = $event['end']
            ->toArray();
          $timezone = $event['end']
            ->getTimezone()
            ->getName();
          $timezones[$timezone] = $timezone;
          if ($event['all_day']) {
            $vevent
              ->setDtend($end['year'], $end['month'], $end['day'], FALSE, FALSE, FALSE, FALSE, array(
              'VALUE' => 'DATE',
            ));
          }
          else {
            $vevent
              ->setDtend($end['year'], $end['month'], $end['day'], $end['hour'], $end['minute'], $end['second'], $timezone);
          }
          $end['tz'] = $event['end']
            ->getTimezone();
        }
        $vevent
          ->setProperty('uid', $event['uid']);
        $vevent
          ->setProperty('summary', $event['summary']);

        // Handle repeating dates from the date_repeat module.
        if (!empty($event['rrule']) && module_exists('date_repeat')) {

          // Split the rrule into an RRULE and any additions and exceptions.
          module_load_include('inc', 'date_api', 'date_api_ical');
          module_load_include('inc', 'date_repeat', 'date_repeat_calc');
          list($rrule, $exceptions, $additions) = date_repeat_split_rrule($event['rrule']);

          // Add the RRULE itself. We need to massage the data a bit, since
          // iCalcreator expects RRULEs to be in a different format than how
          // Date API gives them to us.
          $vevent
            ->setRrule(self::convert_rrule_for_icalcreator($rrule));

          // Convert any exceptions to EXDATE properties.
          if (!empty($exceptions)) {
            $exdates = array();
            foreach ($exceptions as $exception) {
              $except = date_ical_date($exception, 'UTC');
              date_timezone_set($except, $start['tz']);
              $exception_array = $except
                ->toArray();
              $exdates[] = array(
                'year' => $exception_array['year'],
                'month' => $exception_array['month'],
                'day' => $exception_array['day'],
                // Use the time information from the start date, since Date
                // doesn't store time info for EXDATEs.
                'hour' => $start['hour'],
                'min' => $start['minute'],
                'second' => $start['second'],
                'tz' => $start['tz']
                  ->getName(),
              );
            }

            // Add each exclusion as a separate EXDATE property.
            // The spec supports putting multiple date values into one EXDATE,
            // but several popular calendar clients (*cough* Apple *cough*)
            // are bugged, and do not recognize multi-value EXDATEs.
            foreach ($exdates as $exdate) {
              $vevent
                ->setExdate(array(
                $exdate,
              ));
            }
          }

          // Convert any additions to RDATE properties.
          if (!empty($additions)) {
            $rdates = array();
            foreach ($additions as $addition) {
              $add = date_ical_date($addition, 'UTC');
              date_timezone_set($add, $start['tz']);
              $addition_array = $add
                ->toArray();
              $rdate = array(
                'year' => $addition_array['year'],
                'month' => $addition_array['month'],
                'day' => $addition_array['day'],
                // Use the time information from the start date, since Date
                // doesn't store time info for RDATEs.
                'hour' => $start['hour'],
                'min' => $start['minute'],
                'second' => $start['second'],
                'tz' => $start['tz']
                  ->getName(),
              );

              // If an end date was was calculated above, use that too.
              // iCalcreator expects RDATEs that have end dates to be
              // specified as array($start_rdate, $end_rdate).
              if (isset($end)) {
                $rdate_with_end = array(
                  $rdate,
                );
                $rdate_with_end[] = array(
                  'year' => $addition_array['year'],
                  'month' => $addition_array['month'],
                  'day' => $addition_array['day'],
                  // Use the time information from the end date.
                  'hour' => $end['hour'],
                  'min' => $end['minute'],
                  'second' => $end['second'],
                  'tz' => $end['tz']
                    ->getName(),
                );
                $rdate = $rdate_with_end;
              }
              $rdates[] = $rdate;
            }

            // Add each addition as a separate RDATE property.
            // The spec supports putting multiple date values into one RDATE,
            // but several popular calendar clients (*cough* Apple *cough*)
            // are bugged, and do not recognize multi-value RDATEs.
            foreach ($rdates as $rdate) {
              $vevent
                ->setRdate(array(
                $rdate,
              ));
            }
          }
        }
        if (!empty($event['url'])) {
          $vevent
            ->setUrl($event['url'], array(
            'type' => 'URI',
          ));
        }
        if (!empty($event['location'])) {
          $vevent
            ->setProperty('location', $event['location']);
        }
        if (!empty($event['description'])) {
          $vevent
            ->setProperty('description', $event['description']);
        }
        if (!empty($event['last-modified'])) {
          $lm = $event['last-modified']
            ->toArray();
          $vevent
            ->setLastModified($lm['year'], $lm['month'], $lm['day'], $lm['hour'], $lm['minute'], $lm['second'], $lm['timezone']);
        }
        if (!empty($event['created'])) {
          $created = $event['created']
            ->toArray();
          $vevent
            ->setCreated($created['year'], $created['month'], $created['day'], $created['hour'], $created['minute'], $created['second'], $created['timezone']);
        }

        // Allow other modules to alter the VEVENT object.
        drupal_alter('date_ical_feed_ical_vevent_render', $vevent, $this->view, $event);
      }

      // Now add to the calendar all the timezones used by the events.
      foreach ($timezones as $timezone) {
        if (strtoupper($timezone) != 'UTC') {
          iCalUtilityFunctions::createTimezone($vcalendar, $timezone);
        }
      }

      // Allow other modules to alter the calendar as a whole.
      drupal_alter('date_ical_feed_ical_vcalendar_render', $vcalendar, $this->view);
      $output = $vcalendar
        ->createCalendar();

      // For some unknown reason (overzealous spec compliance?), iCalcreator
      // escapes all commas and semicolons in the strings that it outputs.
      // This unescapes them, though it does it with a pretty big hammer. This
      // might be going too far.
      $output = str_replace('\\,', ',', $output);
      $output = str_replace('\\;', ';', $output);

      // In order to respect the Exclude DTSTAMP option, we unfortunately have
      // to parse out the DTSTAMP properties after they get rendered. Simply
      // using deleteProperty('DTSTAMP') doesn't work, because iCalcreator
      // considers the DTSTAMP to be essential, and will re-create it when
      // createCalendar() is called.
      if ($this
        ->_get_option('exclude_dtstamp')) {
        $filtered_lines = array();
        foreach (explode("\r\n", $output) as $line) {
          if (strpos($line, 'DTSTAMP') === 0) {
            continue;
          }
          $filtered_lines[] = $line;
        }
        $output = implode("\r\n", $filtered_lines);
      }
    }

    // These steps shouldn't be run when doing a Preview on the View config page.
    if (empty($this->view->live_preview)) {

      // Prevent devel module from appending queries to ical export.
      $GLOBALS['devel_shutdown'] = FALSE;
      drupal_add_http_header('Content-Type', 'text/calendar; charset=utf-8');

      // For sites with Clean URLs disabled, the "path" value in the view Display
      // doesn't actually get applied to the URL of the calendar feed. So, we
      // need to manually instruct browsers to download a .ics file.
      if (!variable_get('clean_url', FALSE)) {
        $path_array = explode('/', $this->display->display_options['path']);
        $filename = array_pop($path_array);
        drupal_add_http_header('Content-Disposition', "attachment; filename=\"{$filename}\"");
      }
    }

    // Allow other modules to alter the rendered calendar, just before it gets sent out.
    drupal_alter('date_ical_post_render', $output, $this->view);
    return $output;
  }

  /**
   * This function converts an rrule array to the iCalcreator format.
   *
   * iCalcreator expects the BYDAY element to be an array like this:
   * (array) ( [([plus] ordwk / minus ordwk)], "DAY" => weekday )
   *
   * But the way that the Date API gives it to us is like this:
   * (array) ( [([plus] ordwk / minus ordwk)]weekday )
   */
  public static function convert_rrule_for_icalcreator($rrule) {
    $new_rrule = array();
    foreach ($rrule as $key => $value) {
      if (strtoupper($key) == 'DATA') {

        // iCalcreator doesn't expect the 'DATA' key that the Date API gives us.
        continue;
      }
      if (strtoupper($key) == 'UNTIL') {

        // iCalcreator expects the 'timestamp' to be array key for UNTIL
        $value['timestamp'] = strtotime($value['datetime']);
      }
      if (strtoupper($key) == 'BYDAY') {
        $new_byday = array();
        foreach ($value as $day) {

          // Fortunately, the weekday values are always 2 characters, so it's easy to
          // split off the ordwk part, even though it could be 1 or 2 characters.
          $weekday = substr($day, -2);
          $ordwk = substr($day, 0, -2);
          $new_byday[] = array(
            $ordwk,
            'DAY' => $weekday,
          );
        }
        $value = $new_byday;
      }
      $new_rrule[$key] = $value;
    }
    return $new_rrule;
  }

}

Classes

Namesort descending Description
date_ical_plugin_style_ical_feed Default style plugin to render an iCal feed.