CRM/Event/ICalendar.php

   1 <?php
   2 /*
   3  +--------------------------------------------------------------------+
   4  | Copyright CiviCRM LLC. All rights reserved.                        |
   5  |                                                                    |
   6  | This work is published under the GNU AGPLv3 license with some      |
   7  | permitted exceptions and without any warranty. For full license    |
   8  | and copyright information, see https://civicrm.org/licensing       |
   9  +--------------------------------------------------------------------+
  10  */
  11
  12 /**
  13  * Class to generate various "icalendar" type event feeds
  14  */
  15 class CRM_Event_ICalendar extends CRM_Core_Page {
  16
  17   /**
  18    * Heart of the iCalendar data assignment process. The runner gets all the meta
  19    * data for the event and calls the  method to output the iCalendar
  20    * to the user. If gData param is passed on the URL, outputs gData XML format.
  21    * Else outputs iCalendar format per IETF RFC2445. Page param true means send
  22    * to browser as inline content. Else, we send .ics file as attachment.
  23    */
  24   public function run() {
  25     $id = CRM_Utils_Request::retrieveValue('id', 'Positive', NULL, FALSE, 'GET');
  26     $type = CRM_Utils_Request::retrieveValue('type', 'Positive', 0);
  27     $start = CRM_Utils_Request::retrieveValue('start', 'Positive', 0);
  28     $end = CRM_Utils_Request::retrieveValue('end', 'Positive', 0);
  29
  30     // We used to handle the event list as a html page at civicrm/event/ical - redirect to the new URL if that was what we requested.
  31     if (CRM_Utils_Request::retrieveValue('html', 'Positive', 0)) {
  32       $urlParams = [
  33         'reset' => 1,
  34       ];
  35       $id ? $urlParams['id'] = $id : NULL;
  36       $type ? $urlParams['type'] = $type : NULL;
  37       $start ? $urlParams['start'] = $start : NULL;
  38       $end ? $urlParams['end'] = $end : NULL;
  39       CRM_Utils_System::redirect(CRM_Utils_System::url('civicrm/event/list', $urlParams, FALSE, NULL, FALSE, TRUE));
  40     }
  41
  42     $iCalPage = CRM_Utils_Request::retrieveValue('list', 'Positive', 0);
  43     $gData = CRM_Utils_Request::retrieveValue('gData', 'Positive', 0);
  44     $rss = CRM_Utils_Request::retrieveValue('rss', 'Positive', 0);
  45
  46     $template = CRM_Core_Smarty::singleton();
  47     $config = CRM_Core_Config::singleton();
  48
  49     $info = CRM_Event_BAO_Event::getCompleteInfo($start, $type, $id, $end);
  50     $template->assign('events', $info);
  51     $template->assign('timezone', @date_default_timezone_get());
  52
  53     // Send data to the correct template for formatting (iCal vs. gData)
  54     if ($rss) {
  55       // rss 2.0 requires lower case dash delimited locale
  56       $template->assign('rssLang', str_replace('_', '-', strtolower($config->lcMessages)));
  57       $calendar = $template->fetch('CRM/Core/Calendar/Rss.tpl');
  58     }
  59     elseif ($gData) {
  60       $calendar = $template->fetch('CRM/Core/Calendar/GData.tpl');
  61     }
  62     else {
  63       $calendar = $template->fetch('CRM/Core/Calendar/ICal.tpl');
  64       $calendar = preg_replace('/(?<!\r)\n/', "\r\n", $calendar);
  65     }
  66
  67     // Push output for feed or download
  68     if ($iCalPage == 1) {
  69       if ($gData || $rss) {
  70         CRM_Utils_ICalendar::send($calendar, 'text/xml', 'utf-8');
  71       }
  72       else {
  73         CRM_Utils_ICalendar::send($calendar, 'text/plain', 'utf-8');
  74       }
  75     }
  76     else {
  77       CRM_Utils_ICalendar::send($calendar, 'text/calendar', 'utf-8', 'civicrm_ical.ics', 'attachment');
  78     }
  79     CRM_Utils_System::civiExit();
  80   }
  81
  82 }