ILIAS  release_4-3 Revision
 All Data Structures Namespaces Files Functions Variables Groups Pages
class.ilICalWriter.php
Go to the documentation of this file.
1 <?php
2 /*
3  +-----------------------------------------------------------------------------+
4  | ILIAS open source |
5  +-----------------------------------------------------------------------------+
6  | Copyright (c) 1998-2001 ILIAS open source, University of Cologne |
7  | |
8  | This program is free software; you can redistribute it and/or |
9  | modify it under the terms of the GNU General Public License |
10  | as published by the Free Software Foundation; either version 2 |
11  | of the License, or (at your option) any later version. |
12  | |
13  | This program is distributed in the hope that it will be useful, |
14  | but WITHOUT ANY WARRANTY; without even the implied warranty of |
15  | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
16  | GNU General Public License for more details. |
17  | |
18  | You should have received a copy of the GNU General Public License |
19  | along with this program; if not, write to the Free Software |
20  | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
21  +-----------------------------------------------------------------------------+
22 */
23 
25 {
26  const LINEBREAK = "\r\n";
27  #const LINEBREAK = '<br />';
28  const LINE_SIZE = 75;
29  const BEGIN_LINE_WHITESPACE = ' ';
30 
31  private $ical = '';
32 
33  public function __construct()
34  {
35  $this->ical = '';
36  }
37 
38  public static function escapeText($a_text)
39  {
40  $a_text = str_replace("\r\n", '\\n', $a_text);
41 
42  return preg_replace(
43  array(
44  '/\\\/',
45  '/;/',
46  '/,/',
47  ),
48  array(
49  '\\',
50  '\;',
51  '\,',
52  ),
53  $a_text
54  );
55  }
56 
62  public function addLine($a_line)
63  {
64  //$chunks = str_split($a_line, self::LINE_SIZE);
65 
66  include_once './Services/Utilities/classes/class.ilStr.php';
67 
68  // use multibyte split
69  $chunks = array();
70  $len = ilStr::strLen($a_line);
71  while($len)
72  {
73  $chunks[] = ilStr::subStr($a_line,0,self::LINE_SIZE);
74  $a_line = ilStr::subStr($a_line, self::LINE_SIZE, $len);
75  $len = ilStr::strLen($a_line);
76  }
77 
78  for($i = 0; $i < count($chunks); $i++)
79  {
80  $this->ical .= $chunks[$i];
81  if(isset($chunks[$i+1]))
82  {
83  $this->ical .= self::LINEBREAK;
84  $this->ical .= self::BEGIN_LINE_WHITESPACE;
85  }
86  }
87  $this->ical .= self::LINEBREAK;
88  }
89 
94  public function __toString()
95  {
96  return $this->ical;
97  }
98 }