|
1
|
|
|
<?php |
|
2
|
|
|
/** |
|
3
|
|
|
* vCard class for parsing a vCard and/or creating one |
|
4
|
|
|
* |
|
5
|
|
|
* @link https://github.com/nuovo/vCard-parser |
|
6
|
|
|
* @author Martins Pilsetnieks, Roberts Bruveris |
|
7
|
|
|
* @see RFC 2426, RFC 2425 |
|
8
|
|
|
* @version 0.4.8 |
|
9
|
|
|
*/ |
|
10
|
|
|
class vCard implements Countable, Iterator |
|
11
|
|
|
{ |
|
12
|
|
|
const MODE_ERROR = 'error'; |
|
13
|
|
|
const MODE_SINGLE = 'single'; |
|
14
|
|
|
const MODE_MULTIPLE = 'multiple'; |
|
15
|
|
|
|
|
16
|
|
|
const endl = "\n"; |
|
17
|
|
|
|
|
18
|
|
|
/** |
|
19
|
|
|
* @var string Current object mode - error, single or multiple (for a single vCard within a file and multiple combined vCards) |
|
20
|
|
|
*/ |
|
21
|
|
|
private $Mode; //single, multiple, error |
|
22
|
|
|
|
|
23
|
|
|
private $Path = ''; |
|
24
|
|
|
private $RawData = ''; |
|
25
|
|
|
|
|
26
|
|
|
/** |
|
27
|
|
|
* @var array Internal options container. Options: |
|
28
|
|
|
* bool Collapse: If true, elements that can have multiple values but have only a single value are returned as that value instead of an array |
|
29
|
|
|
* If false, an array is returned even if it has only one value. |
|
30
|
|
|
*/ |
|
31
|
|
|
private $Options = array( |
|
32
|
|
|
'Collapse' => false |
|
33
|
|
|
); |
|
34
|
|
|
|
|
35
|
|
|
/** |
|
36
|
|
|
* @var array Internal data container. Contains vCard objects for multiple vCards and just the data for single vCards. |
|
37
|
|
|
*/ |
|
38
|
|
|
private $Data = array(); |
|
39
|
|
|
|
|
40
|
|
|
/** |
|
41
|
|
|
* @static Parts of structured elements according to the spec. |
|
42
|
|
|
*/ |
|
43
|
|
|
private static $Spec_StructuredElements = array( |
|
44
|
|
|
'n' => array('lastname', 'firstname', 'additionalnames', 'prefixes', 'suffixes'), |
|
45
|
|
|
'adr' => array('pobox', 'extendedaddress', 'streetaddress', 'locality', 'region', 'postalcode', 'country'), |
|
46
|
|
|
'geo' => array('latitude', 'longitude'), |
|
47
|
|
|
'org' => array('name', 'unit1', 'unit2') |
|
48
|
|
|
); |
|
49
|
|
|
private static $Spec_MultipleValueElements = array('nickname', 'categories'); |
|
50
|
|
|
|
|
51
|
|
|
private static $Spec_ElementTypes = array( |
|
52
|
|
|
'email' => array('internet', 'x400', 'pref', 'home', 'work'), |
|
53
|
|
|
'adr' => array('dom', 'intl', 'postal', 'parcel', 'home', 'work', 'pref'), |
|
54
|
|
|
'label' => array('dom', 'intl', 'postal', 'parcel', 'home', 'work', 'pref'), |
|
55
|
|
|
'tel' => array('home', 'msg', 'work', 'pref', 'voice', 'fax', 'cell', 'video', 'pager', 'bbs', 'modem', 'car', 'isdn', 'pcs'), |
|
56
|
|
|
'impp' => array('personal', 'business', 'home', 'work', 'mobile', 'pref') |
|
57
|
|
|
); |
|
58
|
|
|
|
|
59
|
|
|
private static $Spec_FileElements = array('photo', 'logo', 'sound'); |
|
60
|
|
|
|
|
61
|
|
|
/** |
|
62
|
|
|
* vCard constructor |
|
63
|
|
|
* |
|
64
|
|
|
* @param string Path to file, optional. |
|
65
|
|
|
* @param string Raw data, optional. |
|
66
|
|
|
* @param array Additional options, optional. Currently supported options: |
|
67
|
|
|
* bool Collapse: If true, elements that can have multiple values but have only a single value are returned as that value instead of an array |
|
68
|
|
|
* If false, an array is returned even if it has only one value. |
|
69
|
|
|
* |
|
70
|
|
|
* One of these parameters must be provided, otherwise an exception is thrown. |
|
71
|
|
|
*/ |
|
72
|
|
|
public function __construct($Path = false, $RawData = false, array $Options = null) |
|
73
|
|
|
{ |
|
74
|
|
|
// Checking preconditions for the parser. |
|
75
|
|
|
// If path is given, the file should be accessible. |
|
76
|
|
|
// If raw data is given, it is taken as it is. |
|
77
|
|
|
// In both cases the real content is put in $this -> RawData |
|
78
|
|
|
if ($Path) |
|
79
|
|
|
{ |
|
80
|
|
|
if (!is_readable($Path)) |
|
81
|
|
|
{ |
|
82
|
|
|
throw new Exception('vCard: Path not accessible ('.$Path.')'); |
|
83
|
|
|
} |
|
84
|
|
|
|
|
85
|
|
|
$this -> Path = $Path; |
|
|
|
|
|
|
86
|
|
|
$this -> RawData = file_get_contents($this -> Path); |
|
87
|
|
|
} |
|
88
|
|
|
elseif ($RawData) |
|
89
|
|
|
{ |
|
90
|
|
|
$this -> RawData = $RawData; |
|
|
|
|
|
|
91
|
|
|
} |
|
92
|
|
|
else |
|
|
|
|
|
|
93
|
|
|
{ |
|
94
|
|
|
//throw new Exception('vCard: No content provided'); |
|
|
|
|
|
|
95
|
|
|
// Not necessary anymore as possibility to create vCards is added |
|
96
|
|
|
} |
|
97
|
|
|
|
|
98
|
|
|
if (!$this -> Path && !$this -> RawData) |
|
99
|
|
|
{ |
|
100
|
|
|
return true; |
|
|
|
|
|
|
101
|
|
|
} |
|
102
|
|
|
|
|
103
|
|
|
if ($Options) |
|
104
|
|
|
{ |
|
105
|
|
|
$this -> Options = array_merge($this -> Options, $Options); |
|
106
|
|
|
} |
|
107
|
|
|
|
|
108
|
|
|
// Counting the begin/end separators. If there aren't any or the count doesn't match, there is a problem with the file. |
|
109
|
|
|
// If there is only one, this is a single vCard, if more, multiple vCards are combined. |
|
110
|
|
|
$Matches = array(); |
|
111
|
|
|
$vCardBeginCount = preg_match_all('{^BEGIN\:VCARD}miS', $this -> RawData, $Matches); |
|
112
|
|
|
$vCardEndCount = preg_match_all('{^END\:VCARD}miS', $this -> RawData, $Matches); |
|
113
|
|
|
|
|
114
|
|
|
if (($vCardBeginCount != $vCardEndCount) || !$vCardBeginCount) |
|
115
|
|
|
{ |
|
116
|
|
|
$this -> Mode = vCard::MODE_ERROR; |
|
117
|
|
|
throw new Exception('vCard: invalid vCard'); |
|
118
|
|
|
} |
|
119
|
|
|
|
|
120
|
|
|
$this -> Mode = $vCardBeginCount == 1 ? vCard::MODE_SINGLE : vCard::MODE_MULTIPLE; |
|
121
|
|
|
|
|
122
|
|
|
// Removing/changing inappropriate newlines, i.e., all CRs or multiple newlines are changed to a single newline |
|
123
|
|
|
$this -> RawData = str_replace("\r", "\n", $this -> RawData); |
|
124
|
|
|
$this -> RawData = preg_replace('{(\n+)}', "\n", $this -> RawData); |
|
125
|
|
|
|
|
126
|
|
|
// In multiple card mode the raw text is split at card beginning markers and each |
|
127
|
|
|
// fragment is parsed in a separate vCard object. |
|
128
|
|
|
if ($this -> Mode == self::MODE_MULTIPLE) |
|
129
|
|
|
{ |
|
130
|
|
|
$this -> RawData = explode('BEGIN:VCARD', $this -> RawData); |
|
|
|
|
|
|
131
|
|
|
$this -> RawData = array_filter($this -> RawData); |
|
|
|
|
|
|
132
|
|
|
|
|
133
|
|
|
foreach ($this -> RawData as $SinglevCardRawData) |
|
134
|
|
|
{ |
|
135
|
|
|
// Prepending "BEGIN:VCARD" to the raw string because we exploded on that one. |
|
136
|
|
|
// If there won't be the BEGIN marker in the new object, it will fail. |
|
137
|
|
|
$SinglevCardRawData = 'BEGIN:VCARD'."\n".$SinglevCardRawData; |
|
138
|
|
|
|
|
139
|
|
|
$ClassName = get_class($this); |
|
140
|
|
|
$this -> Data[] = new $ClassName(false, $SinglevCardRawData); |
|
141
|
|
|
} |
|
142
|
|
|
} |
|
143
|
|
|
else |
|
144
|
|
|
{ |
|
145
|
|
|
// Protect the BASE64 final = sign (detected by the line beginning with whitespace), otherwise the next replace will get rid of it |
|
146
|
|
|
$this -> RawData = preg_replace('{(\n\s.+)=(\n)}', '$1-base64=-$2', $this -> RawData); |
|
147
|
|
|
|
|
148
|
|
|
// Joining multiple lines that are split with a hard wrap and indicated by an equals sign at the end of line |
|
149
|
|
|
// (quoted-printable-encoded values in v2.1 vCards) |
|
150
|
|
|
$this -> RawData = str_replace("=\n", '', $this -> RawData); |
|
151
|
|
|
|
|
152
|
|
|
// Joining multiple lines that are split with a soft wrap (space or tab on the beginning of the next line |
|
153
|
|
|
$this -> RawData = str_replace(array("\n ", "\n\t"), '-wrap-', $this -> RawData); |
|
154
|
|
|
|
|
155
|
|
|
// Restoring the BASE64 final equals sign (see a few lines above) |
|
156
|
|
|
$this -> RawData = str_replace("-base64=-\n", "=\n", $this -> RawData); |
|
157
|
|
|
|
|
158
|
|
|
$Lines = explode("\n", $this -> RawData); |
|
159
|
|
|
|
|
160
|
|
|
foreach ($Lines as $Line) |
|
161
|
|
|
{ |
|
162
|
|
|
// Lines without colons are skipped because, most likely, they contain no data. |
|
163
|
|
|
if (strpos($Line, ':') === false) |
|
164
|
|
|
{ |
|
165
|
|
|
continue; |
|
166
|
|
|
} |
|
167
|
|
|
|
|
168
|
|
|
// Each line is split into two parts. The key contains the element name and additional parameters, if present, |
|
169
|
|
|
// value is just the value |
|
170
|
|
|
list($Key, $Value) = explode(':', $Line, 2); |
|
171
|
|
|
|
|
172
|
|
|
// Key is transformed to lowercase because, even though the element and parameter names are written in uppercase, |
|
173
|
|
|
// it is quite possible that they will be in lower- or mixed case. |
|
174
|
|
|
// The key is trimmed to allow for non-significant WSP characters as allowed by v2.1 |
|
175
|
|
|
$Key = strtolower(trim(self::Unescape($Key))); |
|
176
|
|
|
|
|
177
|
|
|
// These two lines can be skipped as they aren't necessary at all. |
|
178
|
|
|
if ($Key == 'begin' || $Key == 'end') |
|
179
|
|
|
{ |
|
180
|
|
|
continue; |
|
181
|
|
|
} |
|
182
|
|
|
|
|
183
|
|
|
if ((strpos($Key, 'agent') === 0) && (stripos($Value, 'begin:vcard') !== false)) |
|
184
|
|
|
{ |
|
185
|
|
|
$ClassName = get_class($this); |
|
186
|
|
|
$Value = new $ClassName(false, str_replace('-wrap-', "\n", $Value)); |
|
187
|
|
|
if (!isset($this -> Data[$Key])) |
|
188
|
|
|
{ |
|
189
|
|
|
$this -> Data[$Key] = array(); |
|
190
|
|
|
} |
|
191
|
|
|
$this -> Data[$Key][] = $Value; |
|
192
|
|
|
continue; |
|
193
|
|
|
} |
|
194
|
|
|
else |
|
195
|
|
|
{ |
|
196
|
|
|
$Value = str_replace('-wrap-', '', $Value); |
|
197
|
|
|
} |
|
198
|
|
|
|
|
199
|
|
|
$Value = trim(self::Unescape($Value)); |
|
200
|
|
|
$Type = array(); |
|
201
|
|
|
|
|
202
|
|
|
// Here additional parameters are parsed |
|
203
|
|
|
$KeyParts = explode(';', $Key); |
|
204
|
|
|
$Key = $KeyParts[0]; |
|
205
|
|
|
$Encoding = false; |
|
206
|
|
|
|
|
207
|
|
|
if (strpos($Key, 'item') === 0) |
|
208
|
|
|
{ |
|
209
|
|
|
$TmpKey = explode('.', $Key, 2); |
|
210
|
|
|
$Key = $TmpKey[1]; |
|
211
|
|
|
$ItemIndex = (int)str_ireplace('item', '', $TmpKey[0]); |
|
|
|
|
|
|
212
|
|
|
} |
|
213
|
|
|
|
|
214
|
|
|
if (count($KeyParts) > 1) |
|
215
|
|
|
{ |
|
216
|
|
|
$Parameters = self::ParseParameters($Key, array_slice($KeyParts, 1)); |
|
217
|
|
|
|
|
218
|
|
|
foreach ($Parameters as $ParamKey => $ParamValue) |
|
219
|
|
|
{ |
|
220
|
|
|
switch ($ParamKey) |
|
221
|
|
|
{ |
|
222
|
|
|
case 'encoding': |
|
223
|
|
|
$Encoding = $ParamValue; |
|
224
|
|
|
if (in_array($ParamValue, array('b', 'base64'))) |
|
|
|
|
|
|
225
|
|
|
{ |
|
226
|
|
|
//$Value = base64_decode($Value); |
|
|
|
|
|
|
227
|
|
|
} |
|
228
|
|
|
elseif ($ParamValue == 'quoted-printable') // v2.1 |
|
229
|
|
|
{ |
|
230
|
|
|
$Value = quoted_printable_decode($Value); |
|
231
|
|
|
} |
|
232
|
|
|
break; |
|
233
|
|
|
case 'charset': // v2.1 |
|
234
|
|
|
if ($ParamValue != 'utf-8' && $ParamValue != 'utf8') |
|
235
|
|
|
{ |
|
236
|
|
|
$Value = mb_convert_encoding($Value, 'UTF-8', $ParamValue); |
|
237
|
|
|
} |
|
238
|
|
|
break; |
|
239
|
|
|
case 'type': |
|
240
|
|
|
$Type = $ParamValue; |
|
241
|
|
|
break; |
|
242
|
|
|
} |
|
243
|
|
|
} |
|
244
|
|
|
} |
|
245
|
|
|
|
|
246
|
|
|
// Checking files for colon-separated additional parameters (Apple's Address Book does this), for example, "X-ABCROP-RECTANGLE" for photos |
|
247
|
|
|
if (in_array($Key, self::$Spec_FileElements) && isset($Parameters['encoding']) && in_array($Parameters['encoding'], array('b', 'base64'))) |
|
248
|
|
|
{ |
|
249
|
|
|
// If colon is present in the value, it must contain Address Book parameters |
|
250
|
|
|
// (colon is an invalid character for base64 so it shouldn't appear in valid files) |
|
251
|
|
|
if (strpos($Value, ':') !== false) |
|
252
|
|
|
{ |
|
253
|
|
|
$Value = explode(':', $Value); |
|
254
|
|
|
$Value = array_pop($Value); |
|
255
|
|
|
} |
|
256
|
|
|
} |
|
257
|
|
|
|
|
258
|
|
|
// Values are parsed according to their type |
|
259
|
|
|
if (isset(self::$Spec_StructuredElements[$Key])) |
|
260
|
|
|
{ |
|
261
|
|
|
$Value = self::ParseStructuredValue($Value, $Key); |
|
262
|
|
|
if ($Type) |
|
263
|
|
|
{ |
|
264
|
|
|
$Value['type'] = $Type; |
|
265
|
|
|
} |
|
266
|
|
|
} |
|
267
|
|
|
else |
|
268
|
|
|
{ |
|
269
|
|
|
if (in_array($Key, self::$Spec_MultipleValueElements)) |
|
270
|
|
|
{ |
|
271
|
|
|
$Value = self::ParseMultipleTextValue($Value, $Key); |
|
|
|
|
|
|
272
|
|
|
} |
|
273
|
|
|
|
|
274
|
|
|
if ($Type) |
|
275
|
|
|
{ |
|
276
|
|
|
$Value = array( |
|
277
|
|
|
'value' => $Value, |
|
278
|
|
|
'type' => $Type |
|
279
|
|
|
); |
|
280
|
|
|
} |
|
281
|
|
|
} |
|
282
|
|
|
|
|
283
|
|
|
if (is_array($Value) && $Encoding) |
|
284
|
|
|
{ |
|
285
|
|
|
$Value['encoding'] = $Encoding; |
|
286
|
|
|
} |
|
287
|
|
|
|
|
288
|
|
|
if (!isset($this -> Data[$Key])) |
|
289
|
|
|
{ |
|
290
|
|
|
$this -> Data[$Key] = array(); |
|
291
|
|
|
} |
|
292
|
|
|
|
|
293
|
|
|
$this -> Data[$Key][] = $Value; |
|
294
|
|
|
} |
|
295
|
|
|
} |
|
296
|
|
|
} |
|
297
|
|
|
|
|
298
|
|
|
/** |
|
299
|
|
|
* Magic method to get the various vCard values as object members, e.g. |
|
300
|
|
|
* a call to $vCard -> N gets the "N" value |
|
301
|
|
|
* |
|
302
|
|
|
* @param string Key |
|
303
|
|
|
* |
|
304
|
|
|
* @return mixed Value |
|
305
|
|
|
*/ |
|
306
|
|
|
public function __get($Key) |
|
307
|
|
|
{ |
|
308
|
|
|
$Key = strtolower($Key); |
|
309
|
|
|
if (isset($this -> Data[$Key])) |
|
310
|
|
|
{ |
|
311
|
|
|
if ($Key == 'agent') |
|
312
|
|
|
{ |
|
313
|
|
|
return $this -> Data[$Key]; |
|
314
|
|
|
} |
|
315
|
|
|
elseif (in_array($Key, self::$Spec_FileElements)) |
|
316
|
|
|
{ |
|
317
|
|
|
$Value = $this -> Data[$Key]; |
|
318
|
|
|
foreach ($Value as $K => $V) |
|
319
|
|
|
{ |
|
320
|
|
|
if (stripos($V['value'], 'uri:') === 0) |
|
321
|
|
|
{ |
|
322
|
|
|
$Value[$K]['value'] = substr($V, 4); |
|
323
|
|
|
$Value[$K]['encoding'] = 'uri'; |
|
324
|
|
|
} |
|
325
|
|
|
} |
|
326
|
|
|
return $Value; |
|
327
|
|
|
} |
|
328
|
|
|
|
|
329
|
|
|
if ($this -> Options['Collapse'] && is_array($this -> Data[$Key]) && (count($this -> Data[$Key]) == 1)) |
|
330
|
|
|
{ |
|
331
|
|
|
return $this -> Data[$Key][0]; |
|
332
|
|
|
} |
|
333
|
|
|
return $this -> Data[$Key]; |
|
334
|
|
|
} |
|
335
|
|
|
elseif ($Key == 'Mode') |
|
336
|
|
|
{ |
|
337
|
|
|
return $this -> Mode; |
|
338
|
|
|
} |
|
339
|
|
|
return array(); |
|
340
|
|
|
} |
|
341
|
|
|
|
|
342
|
|
|
/** |
|
343
|
|
|
* Saves an embedded file |
|
344
|
|
|
* |
|
345
|
|
|
* @param string Key |
|
346
|
|
|
* @param int Index of the file, defaults to 0 |
|
347
|
|
|
* @param string Target path where the file should be saved, including the filename |
|
348
|
|
|
* |
|
349
|
|
|
* @return bool Operation status |
|
350
|
|
|
*/ |
|
351
|
|
|
public function SaveFile($Key, $Index = 0, $TargetPath = '') |
|
352
|
|
|
{ |
|
353
|
|
|
if (!isset($this -> Data[$Key])) |
|
354
|
|
|
{ |
|
355
|
|
|
return false; |
|
356
|
|
|
} |
|
357
|
|
|
if (!isset($this -> Data[$Key][$Index])) |
|
358
|
|
|
{ |
|
359
|
|
|
return false; |
|
360
|
|
|
} |
|
361
|
|
|
|
|
362
|
|
|
// Returing false if it is an image URL |
|
363
|
|
|
if (stripos($this -> Data[$Key][$Index]['value'], 'uri:') === 0) |
|
364
|
|
|
{ |
|
365
|
|
|
return false; |
|
366
|
|
|
} |
|
367
|
|
|
|
|
368
|
|
|
if (is_writable($TargetPath) || (!file_exists($TargetPath) && is_writable(dirname($TargetPath)))) |
|
369
|
|
|
{ |
|
370
|
|
|
$RawContent = $this -> Data[$Key][$Index]['value']; |
|
371
|
|
|
if (isset($this -> Data[$Key][$Index]['encoding']) && $this -> Data[$Key][$Index]['encoding'] == 'b') |
|
372
|
|
|
{ |
|
373
|
|
|
$RawContent = base64_decode($RawContent); |
|
374
|
|
|
} |
|
375
|
|
|
$Status = file_put_contents($TargetPath, $RawContent); |
|
376
|
|
|
return (bool)$Status; |
|
377
|
|
|
} |
|
378
|
|
|
else |
|
379
|
|
|
{ |
|
380
|
|
|
throw new Exception('vCard: Cannot save file ('.$Key.'), target path not writable ('.$TargetPath.')'); |
|
381
|
|
|
} |
|
382
|
|
|
return false; |
|
|
|
|
|
|
383
|
|
|
} |
|
384
|
|
|
|
|
385
|
|
|
/** |
|
386
|
|
|
* Magic method for adding data to the vCard |
|
387
|
|
|
* |
|
388
|
|
|
* @param string Key |
|
389
|
|
|
* @param string Method call arguments. First element is value. |
|
390
|
|
|
* |
|
391
|
|
|
* @return vCard Current object for method chaining |
|
392
|
|
|
*/ |
|
393
|
|
|
public function __call($Key, $Arguments) |
|
394
|
|
|
{ |
|
395
|
|
|
$Key = strtolower($Key); |
|
396
|
|
|
|
|
397
|
|
|
if (!isset($this -> Data[$Key])) |
|
398
|
|
|
{ |
|
399
|
|
|
$this -> Data[$Key] = array(); |
|
400
|
|
|
} |
|
401
|
|
|
|
|
402
|
|
|
$Value = isset($Arguments[0]) ? $Arguments[0] : false; |
|
403
|
|
|
|
|
404
|
|
|
if (count($Arguments) > 1) |
|
405
|
|
|
{ |
|
406
|
|
|
$Types = array_map('strtolower', array_values(array_slice($Arguments, 1))); |
|
407
|
|
|
|
|
408
|
|
|
if (isset(self::$Spec_StructuredElements[$Key]) && |
|
409
|
|
|
in_array(strtolower($Arguments[1]), self::$Spec_StructuredElements[$Key]) |
|
410
|
|
|
) |
|
411
|
|
|
{ |
|
412
|
|
|
$LastElementIndex = 0; |
|
413
|
|
|
|
|
414
|
|
|
if (count($this -> Data[$Key])) |
|
415
|
|
|
{ |
|
416
|
|
|
$LastElementIndex = count($this -> Data[$Key]) - 1; |
|
417
|
|
|
} |
|
418
|
|
|
|
|
419
|
|
|
if (isset($this -> Data[$Key][$LastElementIndex])) |
|
420
|
|
|
{ |
|
421
|
|
|
if (empty($this -> Data[$Key][$LastElementIndex][$Types[0]])) |
|
422
|
|
|
{ |
|
423
|
|
|
$this -> Data[$Key][$LastElementIndex][$Types[0]] = $Value; |
|
424
|
|
|
} |
|
425
|
|
|
else |
|
426
|
|
|
{ |
|
427
|
|
|
$LastElementIndex++; |
|
428
|
|
|
} |
|
429
|
|
|
} |
|
430
|
|
|
|
|
431
|
|
|
if (!isset($this -> Data[$Key][$LastElementIndex])) |
|
432
|
|
|
{ |
|
433
|
|
|
$this -> Data[$Key][$LastElementIndex] = array( |
|
434
|
|
|
$Types[0] => $Value |
|
435
|
|
|
); |
|
436
|
|
|
} |
|
437
|
|
|
} |
|
438
|
|
|
elseif (isset(self::$Spec_ElementTypes[$Key])) |
|
439
|
|
|
{ |
|
440
|
|
|
$this -> Data[$Key][] = array( |
|
441
|
|
|
'value' => $Value, |
|
442
|
|
|
'type' => $Types |
|
443
|
|
|
); |
|
444
|
|
|
} |
|
445
|
|
|
} |
|
446
|
|
|
elseif ($Value) |
|
447
|
|
|
{ |
|
448
|
|
|
$this -> Data[$Key][] = $Value; |
|
449
|
|
|
} |
|
450
|
|
|
|
|
451
|
|
|
return $this; |
|
452
|
|
|
} |
|
453
|
|
|
|
|
454
|
|
|
/** |
|
455
|
|
|
* Magic method for getting vCard content out |
|
456
|
|
|
* |
|
457
|
|
|
* @return string Raw vCard content |
|
458
|
|
|
*/ |
|
459
|
|
|
public function __toString() |
|
460
|
|
|
{ |
|
461
|
|
|
$Text = 'BEGIN:VCARD'.self::endl; |
|
462
|
|
|
$Text .= 'VERSION:3.0'.self::endl; |
|
463
|
|
|
|
|
464
|
|
|
foreach ($this -> Data as $Key => $Values) |
|
465
|
|
|
{ |
|
466
|
|
|
$KeyUC = strtoupper($Key); |
|
467
|
|
|
$Key = strtolower($Key); |
|
468
|
|
|
|
|
469
|
|
|
if (in_array($KeyUC, array('PHOTO', 'VERSION'))) |
|
470
|
|
|
{ |
|
471
|
|
|
continue; |
|
472
|
|
|
} |
|
473
|
|
|
|
|
474
|
|
|
foreach ($Values as $Index => $Value) |
|
475
|
|
|
{ |
|
476
|
|
|
$Text .= $KeyUC; |
|
477
|
|
|
if (is_array($Value) && isset($Value['type'])) |
|
478
|
|
|
{ |
|
479
|
|
|
$Text .= ';TYPE='.self::PrepareTypeStrForOutput($Value['type']); |
|
480
|
|
|
} |
|
481
|
|
|
$Text .= ':'; |
|
482
|
|
|
|
|
483
|
|
|
if (isset(self::$Spec_StructuredElements[$Key])) |
|
484
|
|
|
{ |
|
485
|
|
|
$PartArray = array(); |
|
486
|
|
|
foreach (self::$Spec_StructuredElements[$Key] as $Part) |
|
487
|
|
|
{ |
|
488
|
|
|
$PartArray[] = isset($Value[$Part]) ? $Value[$Part] : ''; |
|
489
|
|
|
} |
|
490
|
|
|
$Text .= implode(';', $PartArray); |
|
491
|
|
|
} |
|
492
|
|
|
elseif (is_array($Value) && isset(self::$Spec_ElementTypes[$Key])) |
|
493
|
|
|
{ |
|
494
|
|
|
$Text .= $Value['value']; |
|
495
|
|
|
} |
|
496
|
|
|
else |
|
497
|
|
|
{ |
|
498
|
|
|
$Text .= $Value; |
|
499
|
|
|
} |
|
500
|
|
|
|
|
501
|
|
|
$Text .= self::endl; |
|
502
|
|
|
} |
|
503
|
|
|
} |
|
504
|
|
|
|
|
505
|
|
|
$Text .= 'END:VCARD'.self::endl; |
|
506
|
|
|
return $Text; |
|
507
|
|
|
} |
|
508
|
|
|
|
|
509
|
|
|
// !Helper methods |
|
510
|
|
|
|
|
511
|
|
|
private static function PrepareTypeStrForOutput($Type) |
|
512
|
|
|
{ |
|
513
|
|
|
return implode(',', array_map('strtoupper', $Type)); |
|
514
|
|
|
} |
|
515
|
|
|
|
|
516
|
|
|
/** |
|
517
|
|
|
* Removes the escaping slashes from the text. |
|
518
|
|
|
* |
|
519
|
|
|
* @access private |
|
520
|
|
|
* |
|
521
|
|
|
* @param string Text to prepare. |
|
522
|
|
|
* |
|
523
|
|
|
* @return string Resulting text. |
|
524
|
|
|
*/ |
|
525
|
|
|
private static function Unescape($Text) |
|
526
|
|
|
{ |
|
527
|
|
|
return str_replace(array('\:', '\;', '\,', "\n"), array(':', ';', ',', ''), $Text); |
|
528
|
|
|
} |
|
529
|
|
|
|
|
530
|
|
|
/** |
|
531
|
|
|
* Separates the various parts of a structured value according to the spec. |
|
532
|
|
|
* |
|
533
|
|
|
* @access private |
|
534
|
|
|
* |
|
535
|
|
|
* @param string Raw text string |
|
536
|
|
|
* @param string Key (e.g., N, ADR, ORG, etc.) |
|
537
|
|
|
* |
|
538
|
|
|
* @return array Parts in an associative array. |
|
539
|
|
|
*/ |
|
540
|
|
|
private static function ParseStructuredValue($Text, $Key) |
|
541
|
|
|
{ |
|
542
|
|
|
$Text = array_map('trim', explode(';', $Text)); |
|
543
|
|
|
|
|
544
|
|
|
$Result = array(); |
|
545
|
|
|
$Ctr = 0; |
|
|
|
|
|
|
546
|
|
|
|
|
547
|
|
|
foreach (self::$Spec_StructuredElements[$Key] as $Index => $StructurePart) |
|
548
|
|
|
{ |
|
549
|
|
|
$Result[$StructurePart] = isset($Text[$Index]) ? $Text[$Index] : null; |
|
550
|
|
|
} |
|
551
|
|
|
return $Result; |
|
552
|
|
|
} |
|
553
|
|
|
|
|
554
|
|
|
/** |
|
555
|
|
|
* @access private |
|
556
|
|
|
*/ |
|
557
|
|
|
private static function ParseMultipleTextValue($Text) |
|
558
|
|
|
{ |
|
559
|
|
|
return explode(',', $Text); |
|
560
|
|
|
} |
|
561
|
|
|
|
|
562
|
|
|
/** |
|
563
|
|
|
* @access private |
|
564
|
|
|
*/ |
|
565
|
|
|
private static function ParseParameters($Key, array $RawParams = null) |
|
566
|
|
|
{ |
|
567
|
|
|
if (!$RawParams) |
|
568
|
|
|
{ |
|
569
|
|
|
return array(); |
|
570
|
|
|
} |
|
571
|
|
|
|
|
572
|
|
|
// Parameters are split into (key, value) pairs |
|
573
|
|
|
$Parameters = array(); |
|
574
|
|
|
foreach ($RawParams as $Item) |
|
575
|
|
|
{ |
|
576
|
|
|
$Parameters[] = explode('=', strtolower($Item)); |
|
577
|
|
|
} |
|
578
|
|
|
|
|
579
|
|
|
$Type = array(); |
|
580
|
|
|
$Result = array(); |
|
581
|
|
|
|
|
582
|
|
|
// And each parameter is checked whether anything can/should be done because of it |
|
583
|
|
|
foreach ($Parameters as $Index => $Parameter) |
|
584
|
|
|
{ |
|
585
|
|
|
// Skipping empty elements |
|
586
|
|
|
if (!$Parameter) |
|
587
|
|
|
{ |
|
588
|
|
|
continue; |
|
589
|
|
|
} |
|
590
|
|
|
|
|
591
|
|
|
// Handling type parameters without the explicit TYPE parameter name (2.1 valid) |
|
592
|
|
|
if (count($Parameter) == 1) |
|
593
|
|
|
{ |
|
594
|
|
|
// Checks if the type value is allowed for the specific element |
|
595
|
|
|
// The second part of the "if" statement means that email elements can have non-standard types (see the spec) |
|
596
|
|
|
if ( |
|
597
|
|
|
(isset(self::$Spec_ElementTypes[$Key]) && in_array($Parameter[0], self::$Spec_ElementTypes[$Key])) || |
|
598
|
|
|
($Key == 'email' && is_scalar($Parameter[0])) |
|
599
|
|
|
) |
|
600
|
|
|
{ |
|
601
|
|
|
$Type[] = $Parameter[0]; |
|
602
|
|
|
} |
|
603
|
|
|
} |
|
604
|
|
|
elseif (count($Parameter) > 2) |
|
605
|
|
|
{ |
|
606
|
|
|
if(count(explode(',', $RawParams[$Index], -1)) > 0) |
|
607
|
|
|
{ |
|
608
|
|
|
$TempTypeParams = self::ParseParameters($Key, explode(',', $RawParams[$Index])); |
|
609
|
|
|
if ($TempTypeParams['type']) |
|
610
|
|
|
{ |
|
611
|
|
|
$Type = array_merge($Type, $TempTypeParams['type']); |
|
612
|
|
|
} |
|
613
|
|
|
} |
|
614
|
|
|
} |
|
615
|
|
|
else |
|
616
|
|
|
{ |
|
617
|
|
|
switch ($Parameter[0]) |
|
618
|
|
|
{ |
|
619
|
|
|
case 'encoding': |
|
620
|
|
|
if (in_array($Parameter[1], array('quoted-printable', 'b', 'base64'))) |
|
621
|
|
|
{ |
|
622
|
|
|
$Result['encoding'] = $Parameter[1] == 'base64' ? 'b' : $Parameter[1]; |
|
623
|
|
|
} |
|
624
|
|
|
break; |
|
625
|
|
|
case 'charset': |
|
626
|
|
|
$Result['charset'] = $Parameter[1]; |
|
627
|
|
|
break; |
|
628
|
|
|
case 'type': |
|
629
|
|
|
$Type = array_merge($Type, explode(',', $Parameter[1])); |
|
630
|
|
|
break; |
|
631
|
|
|
case 'value': |
|
632
|
|
|
if (strtolower($Parameter[1]) == 'url') |
|
633
|
|
|
{ |
|
634
|
|
|
$Result['encoding'] = 'uri'; |
|
635
|
|
|
} |
|
636
|
|
|
break; |
|
637
|
|
|
} |
|
638
|
|
|
} |
|
639
|
|
|
} |
|
640
|
|
|
|
|
641
|
|
|
$Result['type'] = $Type; |
|
642
|
|
|
|
|
643
|
|
|
return $Result; |
|
644
|
|
|
} |
|
645
|
|
|
|
|
646
|
|
|
// !Interface methods |
|
647
|
|
|
|
|
648
|
|
|
// Countable interface |
|
649
|
|
|
public function count() |
|
650
|
|
|
{ |
|
651
|
|
|
switch ($this -> Mode) |
|
652
|
|
|
{ |
|
653
|
|
|
case self::MODE_ERROR: |
|
654
|
|
|
return 0; |
|
655
|
|
|
break; |
|
|
|
|
|
|
656
|
|
|
case self::MODE_SINGLE: |
|
657
|
|
|
return 1; |
|
658
|
|
|
break; |
|
|
|
|
|
|
659
|
|
|
case self::MODE_MULTIPLE: |
|
660
|
|
|
return count($this -> Data); |
|
661
|
|
|
break; |
|
|
|
|
|
|
662
|
|
|
} |
|
663
|
|
|
return 0; |
|
664
|
|
|
} |
|
665
|
|
|
|
|
666
|
|
|
// Iterator interface |
|
667
|
|
|
public function rewind() |
|
668
|
|
|
{ |
|
669
|
|
|
reset($this -> Data); |
|
670
|
|
|
} |
|
671
|
|
|
|
|
672
|
|
|
public function current() |
|
673
|
|
|
{ |
|
674
|
|
|
return current($this -> Data); |
|
675
|
|
|
} |
|
676
|
|
|
|
|
677
|
|
|
public function next() |
|
678
|
|
|
{ |
|
679
|
|
|
return next($this -> Data); |
|
680
|
|
|
} |
|
681
|
|
|
|
|
682
|
|
|
public function valid() |
|
683
|
|
|
{ |
|
684
|
|
|
return ($this -> current() !== false); |
|
685
|
|
|
} |
|
686
|
|
|
|
|
687
|
|
|
public function key() |
|
688
|
|
|
{ |
|
689
|
|
|
return key($this -> Data); |
|
690
|
|
|
} |
|
691
|
|
|
} |
|
692
|
|
|
?> |
|
|
|
|
|
|
693
|
|
|
|
This check looks for assignments to scalar types that may be of the wrong type.
To ensure the code behaves as expected, it may be a good idea to add an explicit type cast.