Merge pull request #3837 from eileenmcnaughton/CRM-15113
[civicrm-core.git] / CRM / Utils / ICalendar.php
CommitLineData
6a488035
TO
1<?php
2/*
3 +--------------------------------------------------------------------+
232624b1 4 | CiviCRM version 4.4 |
6a488035
TO
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2013 |
7 +--------------------------------------------------------------------+
8 | This file is a part of CiviCRM. |
9 | |
10 | CiviCRM is free software; you can copy, modify, and distribute it |
11 | under the terms of the GNU Affero General Public License |
12 | Version 3, 19 November 2007 and the CiviCRM Licensing Exception. |
13 | |
14 | CiviCRM is distributed in the hope that it will be useful, but |
15 | WITHOUT ANY WARRANTY; without even the implied warranty of |
16 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. |
17 | See the GNU Affero General Public License for more details. |
18 | |
19 | You should have received a copy of the GNU Affero General Public |
20 | License and the CiviCRM Licensing Exception along |
21 | with this program; if not, contact CiviCRM LLC |
22 | at info[AT]civicrm[DOT]org. If you have questions about the |
23 | GNU Affero General Public License or the licensing of CiviCRM, |
24 | see the CiviCRM license FAQ at http://civicrm.org/licensing |
25 +--------------------------------------------------------------------+
26*/
27
28/**
29 *
30 * @package CRM
31 * @copyright CiviCRM LLC (c) 2004-2013
32 * $Id$
33 *
34 */
35
36/**
37 * @file
38 * API for event export in iCalendar format
39 * as outlined in Internet Calendaring and
40 * Scheduling Core Object Specification
41 *
42 */
43class CRM_Utils_ICalendar {
44
45 /**
46 * Escape text elements for safe ICalendar use
47 *
48 * @param $text Text to escape
49 *
50 * @return Escaped text
51 *
52 */
53 static function formatText($text) {
54 $text = strip_tags($text);
55 $text = str_replace("\"", "DQUOTE", $text);
56 $text = str_replace("\\", "\\\\", $text);
57 $text = str_replace(",", "\,", $text);
58 $text = str_replace(";", "\;", $text);
59 $text = str_replace(array("\r\n", "\n", "\r"), "\\n ", $text);
60 $text = implode("\n ", str_split($text, 50));
61 return $text;
62 }
63
64 /**
65 * Escape date elements for safe ICalendar use
66 *
67 * @param $date Date to escape
68 *
69 * @return Escaped date
70 *
71 */
72 static function formatDate($date, $gdata = FALSE) {
73
74 if ($gdata) {
75 return date("Y-m-d\TH:i:s.000",
76 strtotime($date)
77 );
78 }
79 else {
80 return date("Ymd\THis",
81 strtotime($date)
82 );
83 }
84 }
85
86 /**
87 *
88 * Send the ICalendar to the browser with the specified content type
89 * - 'text/calendar' : used for downloaded ics file
90 * - 'text/plain' : used for iCal formatted feed
91 * - 'text/xml' : used for gData or rss formatted feeds
92 *
93 * @access public
94 *
95 * @param string $content_type
96 *
97 * @param string $filename The file name (for downloads)
98 *
99 * @param string $disposition How the file should be sent ('attachment' for downloads)
100 *
101 * @param string $charset The character set to use, defaults to
102 * 'us-ascii'.
103 *
104 * @param string $calendar The calendar data to be published.
105 *
106 * @return void
107 *
108 */
39eb89f4 109 static function send($calendar, $content_type = 'text/calendar', $charset = 'us-ascii', $fileName = NULL, $disposition = NULL) {
6a488035
TO
110 $config = CRM_Core_Config::singleton();
111 $lang = $config->lcMessages;
112 header("Content-Language: $lang");
113 // header( "Content-Type: $content_type; charset=$charset; profile=\"ICalendar\"" );
114 header("Content-Type: $content_type; charset=$charset");
115
116 if ($content_type == 'text/calendar') {
117 header('Content-Length: ' . strlen($calendar));
118 header("Content-Disposition: $disposition; filename=\"$fileName\"");
119 header("Pragma: no-cache");
120 header("Expires: 0");
121 header("Cache-Control: no-cache, must-revalidate");
122 }
123
124 echo $calendar;
125 }
126}
127