annotate vendor/sabre/vobject/lib/Parser/MimeDir.php @ 7:430dbd5346f7

vendor sabre as distributed
author Charlie Root
date Sat, 13 Jan 2018 09:06:10 -0500
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
7
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
1 <?php
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
2
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
3 namespace Sabre\VObject\Parser;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
4
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
5 use
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
6 Sabre\VObject\ParseException,
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
7 Sabre\VObject\EofException,
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
8 Sabre\VObject\Component,
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
9 Sabre\VObject\Property,
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
10 Sabre\VObject\Component\VCalendar,
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
11 Sabre\VObject\Component\VCard;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
12
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
13 /**
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
14 * MimeDir parser.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
15 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
16 * This class parses iCalendar 2.0 and vCard 2.1, 3.0 and 4.0 files. This
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
17 * parser will return one of the following two objects from the parse method:
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
18 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
19 * Sabre\VObject\Component\VCalendar
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
20 * Sabre\VObject\Component\VCard
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
21 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
22 * @copyright Copyright (C) 2011-2015 fruux GmbH (https://fruux.com/).
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
23 * @author Evert Pot (http://evertpot.com/)
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
24 * @license http://sabre.io/license/ Modified BSD License
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
25 */
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
26 class MimeDir extends Parser {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
27
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
28 /**
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
29 * The input stream.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
30 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
31 * @var resource
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
32 */
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
33 protected $input;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
34
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
35 /**
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
36 * Root component
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
37 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
38 * @var Component
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
39 */
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
40 protected $root;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
41
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
42 /**
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
43 * Parses an iCalendar or vCard file
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
44 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
45 * Pass a stream or a string. If null is parsed, the existing buffer is
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
46 * used.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
47 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
48 * @param string|resource|null $input
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
49 * @param int|null $options
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
50 * @return array
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
51 */
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
52 public function parse($input = null, $options = null) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
53
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
54 $this->root = null;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
55 if (!is_null($input)) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
56
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
57 $this->setInput($input);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
58
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
59 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
60
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
61 if (!is_null($options)) $this->options = $options;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
62
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
63 $this->parseDocument();
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
64
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
65 return $this->root;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
66
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
67 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
68
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
69 /**
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
70 * Sets the input buffer. Must be a string or stream.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
71 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
72 * @param resource|string $input
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
73 * @return void
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
74 */
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
75 public function setInput($input) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
76
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
77 // Resetting the parser
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
78 $this->lineIndex = 0;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
79 $this->startLine = 0;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
80
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
81 if (is_string($input)) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
82 // Convering to a stream.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
83 $stream = fopen('php://temp', 'r+');
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
84 fwrite($stream, $input);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
85 rewind($stream);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
86 $this->input = $stream;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
87 } elseif (is_resource($input)) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
88 $this->input = $input;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
89 } else {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
90 throw new \InvalidArgumentException('This parser can only read from strings or streams.');
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
91 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
92
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
93 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
94
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
95 /**
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
96 * Parses an entire document.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
97 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
98 * @return void
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
99 */
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
100 protected function parseDocument() {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
101
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
102 $line = $this->readLine();
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
103
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
104 // BOM is ZERO WIDTH NO-BREAK SPACE (U+FEFF).
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
105 // It's 0xEF 0xBB 0xBF in UTF-8 hex.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
106 if ( 3 <= strlen($line)
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
107 && ord($line[0]) === 0xef
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
108 && ord($line[1]) === 0xbb
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
109 && ord($line[2]) === 0xbf) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
110 $line = substr($line, 3);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
111 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
112
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
113 switch(strtoupper($line)) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
114 case 'BEGIN:VCALENDAR' :
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
115 $class = isset(VCalendar::$componentMap['VCALENDAR'])
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
116 ? VCalendar::$componentMap[$name]
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
117 : 'Sabre\\VObject\\Component\\VCalendar';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
118 break;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
119 case 'BEGIN:VCARD' :
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
120 $class = isset(VCard::$componentMap['VCARD'])
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
121 ? VCard::$componentMap['VCARD']
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
122 : 'Sabre\\VObject\\Component\\VCard';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
123 break;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
124 default :
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
125 throw new ParseException('This parser only supports VCARD and VCALENDAR files');
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
126 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
127
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
128 $this->root = new $class(array(), false);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
129
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
130 while(true) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
131
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
132 // Reading until we hit END:
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
133 $line = $this->readLine();
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
134 if (strtoupper(substr($line,0,4)) === 'END:') {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
135 break;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
136 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
137 $result = $this->parseLine($line);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
138 if ($result) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
139 $this->root->add($result);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
140 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
141
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
142 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
143
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
144 $name = strtoupper(substr($line, 4));
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
145 if ($name!==$this->root->name) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
146 throw new ParseException('Invalid MimeDir file. expected: "END:' . $this->root->name . '" got: "END:' . $name . '"');
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
147 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
148
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
149 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
150
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
151 /**
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
152 * Parses a line, and if it hits a component, it will also attempt to parse
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
153 * the entire component
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
154 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
155 * @param string $line Unfolded line
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
156 * @return Node
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
157 */
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
158 protected function parseLine($line) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
159
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
160 // Start of a new component
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
161 if (strtoupper(substr($line, 0, 6)) === 'BEGIN:') {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
162
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
163 $component = $this->root->createComponent(substr($line,6), array(), false);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
164
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
165 while(true) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
166
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
167 // Reading until we hit END:
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
168 $line = $this->readLine();
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
169 if (strtoupper(substr($line,0,4)) === 'END:') {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
170 break;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
171 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
172 $result = $this->parseLine($line);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
173 if ($result) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
174 $component->add($result);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
175 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
176
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
177 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
178
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
179 $name = strtoupper(substr($line, 4));
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
180 if ($name!==$component->name) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
181 throw new ParseException('Invalid MimeDir file. expected: "END:' . $component->name . '" got: "END:' . $name . '"');
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
182 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
183
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
184 return $component;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
185
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
186 } else {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
187
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
188 // Property reader
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
189 $property = $this->readProperty($line);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
190 if (!$property) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
191 // Ignored line
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
192 return false;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
193 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
194 return $property;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
195
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
196 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
197
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
198 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
199
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
200 /**
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
201 * We need to look ahead 1 line every time to see if we need to 'unfold'
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
202 * the next line.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
203 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
204 * If that was not the case, we store it here.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
205 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
206 * @var null|string
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
207 */
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
208 protected $lineBuffer;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
209
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
210 /**
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
211 * The real current line number.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
212 */
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
213 protected $lineIndex = 0;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
214
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
215 /**
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
216 * In the case of unfolded lines, this property holds the line number for
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
217 * the start of the line.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
218 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
219 * @var int
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
220 */
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
221 protected $startLine = 0;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
222
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
223 /**
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
224 * Contains a 'raw' representation of the current line.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
225 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
226 * @var string
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
227 */
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
228 protected $rawLine;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
229
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
230 /**
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
231 * Reads a single line from the buffer.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
232 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
233 * This method strips any newlines and also takes care of unfolding.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
234 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
235 * @throws \Sabre\VObject\EofException
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
236 * @return string
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
237 */
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
238 protected function readLine() {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
239
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
240 if (!is_null($this->lineBuffer)) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
241 $rawLine = $this->lineBuffer;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
242 $this->lineBuffer = null;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
243 } else {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
244 do {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
245 $eof = feof($this->input);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
246
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
247 $rawLine = fgets($this->input);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
248
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
249 if ($eof || (feof($this->input) && $rawLine===false)) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
250 throw new EofException('End of document reached prematurely');
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
251 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
252 if ($rawLine === false) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
253 throw new ParseException('Error reading from input stream');
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
254 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
255 $rawLine = rtrim($rawLine, "\r\n");
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
256 } while ($rawLine === ''); // Skipping empty lines
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
257 $this->lineIndex++;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
258 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
259 $line = $rawLine;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
260
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
261 $this->startLine = $this->lineIndex;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
262
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
263 // Looking ahead for folded lines.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
264 while (true) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
265
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
266 $nextLine = rtrim(fgets($this->input), "\r\n");
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
267 $this->lineIndex++;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
268 if (!$nextLine) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
269 break;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
270 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
271 if ($nextLine[0] === "\t" || $nextLine[0] === " ") {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
272 $line .= substr($nextLine, 1);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
273 $rawLine .= "\n " . substr($nextLine, 1);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
274 } else {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
275 $this->lineBuffer = $nextLine;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
276 break;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
277 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
278
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
279 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
280 $this->rawLine = $rawLine;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
281 return $line;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
282
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
283 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
284
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
285 /**
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
286 * Reads a property or component from a line.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
287 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
288 * @return void
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
289 */
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
290 protected function readProperty($line) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
291
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
292 if ($this->options & self::OPTION_FORGIVING) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
293 $propNameToken = 'A-Z0-9\-\._\\/';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
294 } else {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
295 $propNameToken = 'A-Z0-9\-\.';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
296 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
297
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
298 $paramNameToken = 'A-Z0-9\-';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
299 $safeChar = '^";:,';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
300 $qSafeChar = '^"';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
301
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
302 $regex = "/
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
303 ^(?P<name> [$propNameToken]+ ) (?=[;:]) # property name
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
304 |
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
305 (?<=:)(?P<propValue> .+)$ # property value
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
306 |
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
307 ;(?P<paramName> [$paramNameToken]+) (?=[=;:]) # parameter name
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
308 |
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
309 (=|,)(?P<paramValue> # parameter value
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
310 (?: [$safeChar]*) |
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
311 \"(?: [$qSafeChar]+)\"
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
312 ) (?=[;:,])
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
313 /xi";
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
314
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
315 //echo $regex, "\n"; die();
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
316 preg_match_all($regex, $line, $matches, PREG_SET_ORDER);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
317
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
318 $property = array(
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
319 'name' => null,
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
320 'parameters' => array(),
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
321 'value' => null
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
322 );
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
323
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
324 $lastParam = null;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
325
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
326 /**
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
327 * Looping through all the tokens.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
328 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
329 * Note that we are looping through them in reverse order, because if a
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
330 * sub-pattern matched, the subsequent named patterns will not show up
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
331 * in the result.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
332 */
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
333 foreach($matches as $match) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
334
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
335 if (isset($match['paramValue'])) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
336 if ($match['paramValue'] && $match['paramValue'][0] === '"') {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
337 $value = substr($match['paramValue'], 1, -1);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
338 } else {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
339 $value = $match['paramValue'];
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
340 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
341
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
342 $value = $this->unescapeParam($value);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
343
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
344 if (is_null($property['parameters'][$lastParam])) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
345 $property['parameters'][$lastParam] = $value;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
346 } elseif (is_array($property['parameters'][$lastParam])) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
347 $property['parameters'][$lastParam][] = $value;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
348 } else {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
349 $property['parameters'][$lastParam] = array(
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
350 $property['parameters'][$lastParam],
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
351 $value
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
352 );
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
353 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
354 continue;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
355 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
356 if (isset($match['paramName'])) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
357 $lastParam = strtoupper($match['paramName']);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
358 if (!isset($property['parameters'][$lastParam])) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
359 $property['parameters'][$lastParam] = null;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
360 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
361 continue;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
362 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
363 if (isset($match['propValue'])) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
364 $property['value'] = $match['propValue'];
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
365 continue;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
366 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
367 if (isset($match['name']) && $match['name']) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
368 $property['name'] = strtoupper($match['name']);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
369 continue;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
370 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
371
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
372 // @codeCoverageIgnoreStart
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
373 throw new \LogicException('This code should not be reachable');
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
374 // @codeCoverageIgnoreEnd
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
375
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
376 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
377
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
378 if (is_null($property['value'])) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
379 $property['value'] = '';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
380 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
381 if (!$property['name']) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
382 if ($this->options & self::OPTION_IGNORE_INVALID_LINES) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
383 return false;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
384 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
385 throw new ParseException('Invalid Mimedir file. Line starting at ' . $this->startLine . ' did not follow iCalendar/vCard conventions');
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
386 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
387
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
388 // vCard 2.1 states that parameters may appear without a name, and only
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
389 // a value. We can deduce the value based on it's name.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
390 //
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
391 // Our parser will get those as parameters without a value instead, so
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
392 // we're filtering these parameters out first.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
393 $namedParameters = array();
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
394 $namelessParameters = array();
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
395
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
396 foreach($property['parameters'] as $name=>$value) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
397 if (!is_null($value)) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
398 $namedParameters[$name] = $value;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
399 } else {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
400 $namelessParameters[] = $name;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
401 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
402 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
403
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
404 $propObj = $this->root->createProperty($property['name'], null, $namedParameters);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
405
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
406 foreach($namelessParameters as $namelessParameter) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
407 $propObj->add(null, $namelessParameter);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
408 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
409
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
410 if (strtoupper($propObj['ENCODING']) === 'QUOTED-PRINTABLE') {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
411 $propObj->setQuotedPrintableValue($this->extractQuotedPrintableValue());
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
412 } else {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
413 $propObj->setRawMimeDirValue($property['value']);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
414 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
415
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
416 return $propObj;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
417
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
418 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
419
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
420 /**
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
421 * Unescapes a property value.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
422 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
423 * vCard 2.1 says:
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
424 * * Semi-colons must be escaped in some property values, specifically
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
425 * ADR, ORG and N.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
426 * * Semi-colons must be escaped in parameter values, because semi-colons
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
427 * are also use to separate values.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
428 * * No mention of escaping backslashes with another backslash.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
429 * * newlines are not escaped either, instead QUOTED-PRINTABLE is used to
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
430 * span values over more than 1 line.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
431 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
432 * vCard 3.0 says:
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
433 * * (rfc2425) Backslashes, newlines (\n or \N) and comma's must be
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
434 * escaped, all time time.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
435 * * Comma's are used for delimeters in multiple values
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
436 * * (rfc2426) Adds to to this that the semi-colon MUST also be escaped,
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
437 * as in some properties semi-colon is used for separators.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
438 * * Properties using semi-colons: N, ADR, GEO, ORG
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
439 * * Both ADR and N's individual parts may be broken up further with a
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
440 * comma.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
441 * * Properties using commas: NICKNAME, CATEGORIES
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
442 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
443 * vCard 4.0 (rfc6350) says:
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
444 * * Commas must be escaped.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
445 * * Semi-colons may be escaped, an unescaped semi-colon _may_ be a
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
446 * delimiter, depending on the property.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
447 * * Backslashes must be escaped
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
448 * * Newlines must be escaped as either \N or \n.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
449 * * Some compound properties may contain multiple parts themselves, so a
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
450 * comma within a semi-colon delimited property may also be unescaped
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
451 * to denote multiple parts _within_ the compound property.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
452 * * Text-properties using semi-colons: N, ADR, ORG, CLIENTPIDMAP.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
453 * * Text-properties using commas: NICKNAME, RELATED, CATEGORIES, PID.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
454 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
455 * Even though the spec says that commas must always be escaped, the
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
456 * example for GEO in Section 6.5.2 seems to violate this.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
457 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
458 * iCalendar 2.0 (rfc5545) says:
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
459 * * Commas or semi-colons may be used as delimiters, depending on the
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
460 * property.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
461 * * Commas, semi-colons, backslashes, newline (\N or \n) are always
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
462 * escaped, unless they are delimiters.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
463 * * Colons shall not be escaped.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
464 * * Commas can be considered the 'default delimiter' and is described as
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
465 * the delimiter in cases where the order of the multiple values is
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
466 * insignificant.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
467 * * Semi-colons are described as the delimiter for 'structured values'.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
468 * They are specifically used in Semi-colons are used as a delimiter in
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
469 * REQUEST-STATUS, RRULE, GEO and EXRULE. EXRULE is deprecated however.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
470 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
471 * Now for the parameters
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
472 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
473 * If delimiter is not set (null) this method will just return a string.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
474 * If it's a comma or a semi-colon the string will be split on those
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
475 * characters, and always return an array.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
476 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
477 * @param string $input
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
478 * @param string $delimiter
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
479 * @return string|string[]
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
480 */
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
481 static public function unescapeValue($input, $delimiter = ';') {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
482
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
483 $regex = '# (?: (\\\\ (?: \\\\ | N | n | ; | , ) )';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
484 if ($delimiter) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
485 $regex .= ' | (' . $delimiter . ')';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
486 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
487 $regex .= ') #x';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
488
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
489 $matches = preg_split($regex, $input, -1, PREG_SPLIT_DELIM_CAPTURE | PREG_SPLIT_NO_EMPTY);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
490
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
491 $resultArray = array();
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
492 $result = '';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
493
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
494 foreach($matches as $match) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
495
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
496 switch ($match) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
497 case '\\\\' :
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
498 $result .='\\';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
499 break;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
500 case '\N' :
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
501 case '\n' :
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
502 $result .="\n";
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
503 break;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
504 case '\;' :
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
505 $result .=';';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
506 break;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
507 case '\,' :
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
508 $result .=',';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
509 break;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
510 case $delimiter :
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
511 $resultArray[] = $result;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
512 $result = '';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
513 break;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
514 default :
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
515 $result .= $match;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
516 break;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
517
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
518 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
519
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
520 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
521
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
522 $resultArray[] = $result;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
523 return $delimiter ? $resultArray : $result;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
524
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
525 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
526
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
527 /**
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
528 * Unescapes a parameter value.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
529 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
530 * vCard 2.1:
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
531 * * Does not mention a mechanism for this. In addition, double quotes
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
532 * are never used to wrap values.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
533 * * This means that parameters can simply not contain colons or
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
534 * semi-colons.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
535 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
536 * vCard 3.0 (rfc2425, rfc2426):
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
537 * * Parameters _may_ be surrounded by double quotes.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
538 * * If this is not the case, semi-colon, colon and comma may simply not
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
539 * occur (the comma used for multiple parameter values though).
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
540 * * If it is surrounded by double-quotes, it may simply not contain
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
541 * double-quotes.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
542 * * This means that a parameter can in no case encode double-quotes, or
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
543 * newlines.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
544 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
545 * vCard 4.0 (rfc6350)
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
546 * * Behavior seems to be identical to vCard 3.0
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
547 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
548 * iCalendar 2.0 (rfc5545)
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
549 * * Behavior seems to be identical to vCard 3.0
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
550 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
551 * Parameter escaping mechanism (rfc6868) :
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
552 * * This rfc describes a new way to escape parameter values.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
553 * * New-line is encoded as ^n
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
554 * * ^ is encoded as ^^.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
555 * * " is encoded as ^'
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
556 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
557 * @param string $input
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
558 * @return void
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
559 */
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
560 private function unescapeParam($input) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
561
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
562 return
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
563 preg_replace_callback(
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
564 '#(\^(\^|n|\'))#',
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
565 function($matches) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
566 switch($matches[2]) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
567 case 'n' :
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
568 return "\n";
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
569 case '^' :
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
570 return '^';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
571 case '\'' :
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
572 return '"';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
573
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
574 // @codeCoverageIgnoreStart
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
575 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
576 // @codeCoverageIgnoreEnd
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
577 },
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
578 $input
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
579 );
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
580 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
581
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
582 /**
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
583 * Gets the full quoted printable value.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
584 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
585 * We need a special method for this, because newlines have both a meaning
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
586 * in vCards, and in QuotedPrintable.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
587 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
588 * This method does not do any decoding.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
589 *
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
590 * @return string
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
591 */
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
592 private function extractQuotedPrintableValue() {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
593
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
594 // We need to parse the raw line again to get the start of the value.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
595 //
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
596 // We are basically looking for the first colon (:), but we need to
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
597 // skip over the parameters first, as they may contain one.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
598 $regex = '/^
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
599 (?: [^:])+ # Anything but a colon
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
600 (?: "[^"]")* # A parameter in double quotes
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
601 : # start of the value we really care about
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
602 (.*)$
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
603 /xs';
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
604
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
605 preg_match($regex, $this->rawLine, $matches);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
606
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
607 $value = $matches[1];
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
608 // Removing the first whitespace character from every line. Kind of
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
609 // like unfolding, but we keep the newline.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
610 $value = str_replace("\n ", "\n", $value);
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
611
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
612 // Microsoft products don't always correctly fold lines, they may be
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
613 // missing a whitespace. So if 'forgiving' is turned on, we will take
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
614 // those as well.
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
615 if ($this->options & self::OPTION_FORGIVING) {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
616 while(substr($value,-1) === '=') {
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
617 // Reading the line
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
618 $this->readLine();
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
619 // Grabbing the raw form
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
620 $value.="\n" . $this->rawLine;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
621 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
622 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
623
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
624 return $value;
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
625
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
626 }
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
627
430dbd5346f7 vendor sabre as distributed
Charlie Root
parents:
diff changeset
628 }