Passed
Pull Request — master (#2)
by Stephen
05:45
created

SimplePie_Misc::encoding()   F

Complexity

Conditions 808
Paths 808

Size

Total Lines 1312
Code Lines 1059

Duplication

Lines 0
Ratio 0 %

Importance

Changes 0
Metric Value
cc 808
eloc 1059
nc 808
nop 1
dl 0
loc 1312
rs 2
c 0
b 0
f 0

How to fix   Long Method    Complexity   

Long Method

Small methods make your code easier to understand, in particular if combined with a good name. Besides, if your method is small, finding a good name is usually much easier.

For example, if you find yourself adding comments to a method's body, this is usually a good sign to extract the commented part to a new method, and use the comment as a starting point when coming up with a good name for this new method.

Commonly applied refactorings include:

1
<?php
2
/**
3
 * SimplePie
4
 *
5
 * A PHP-Based RSS and Atom Feed Framework.
6
 * Takes the hard work out of managing a complete RSS/Atom solution.
7
 *
8
 * Copyright (c) 2004-2012, Ryan Parman, Geoffrey Sneddon, Ryan McCue, and contributors
9
 * All rights reserved.
10
 *
11
 * Redistribution and use in source and binary forms, with or without modification, are
12
 * permitted provided that the following conditions are met:
13
 *
14
 * 	* Redistributions of source code must retain the above copyright notice, this list of
15
 * 	  conditions and the following disclaimer.
16
 *
17
 * 	* Redistributions in binary form must reproduce the above copyright notice, this list
18
 * 	  of conditions and the following disclaimer in the documentation and/or other materials
19
 * 	  provided with the distribution.
20
 *
21
 * 	* Neither the name of the SimplePie Team nor the names of its contributors may be used
22
 * 	  to endorse or promote products derived from this software without specific prior
23
 * 	  written permission.
24
 *
25
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS
26
 * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
27
 * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS
28
 * AND CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
29
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
30
 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
31
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
32
 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
33
 * POSSIBILITY OF SUCH DAMAGE.
34
 *
35
 * @package SimplePie
36
 * @version 1.3.1
37
 * @copyright 2004-2012 Ryan Parman, Geoffrey Sneddon, Ryan McCue
38
 * @author Ryan Parman
39
 * @author Geoffrey Sneddon
40
 * @author Ryan McCue
41
 * @link http://simplepie.org/ SimplePie
42
 * @license http://www.opensource.org/licenses/bsd-license.php BSD License
43
 */
44
45
/**
46
 * Miscellanous utilities
47
 *
48
 * @package SimplePie
49
 */
50
class SimplePie_Misc
51
{
52
	public static function time_hms($seconds)
53
	{
54
		$time = '';
55
56
		$hours = floor($seconds / 3600);
57
		$remainder = $seconds % 3600;
58
		if ($hours > 0)
59
		{
60
			$time .= $hours.':';
61
		}
62
63
		$minutes = floor($remainder / 60);
64
		$seconds = $remainder % 60;
65
		if ($minutes < 10 && $hours > 0)
66
		{
67
			$minutes = '0' . $minutes;
68
		}
69
		if ($seconds < 10)
70
		{
71
			$seconds = '0' . $seconds;
72
		}
73
74
		$time .= $minutes.':';
75
		$time .= $seconds;
76
77
		return $time;
78
	}
79
80
	public static function absolutize_url($relative, $base)
81
	{
82
		$iri = SimplePie_IRI::absolutize(new SimplePie_IRI($base), $relative);
83
		if ($iri === false)
84
		{
85
			return false;
86
		}
87
		return $iri->get_uri();
88
	}
89
90
	/**
91
	 * Get a HTML/XML element from a HTML string
92
	 *
93
	 * @deprecated Use DOMDocument instead (parsing HTML with regex is bad!)
94
	 * @param string $realname Element name (including namespace prefix if applicable)
95
	 * @param string $string HTML document
96
	 * @return array
97
	 */
98
	public static function get_element($realname, $string)
99
	{
100
		$return = array();
101
		$name = preg_quote($realname, '/');
102
		if (preg_match_all("/<($name)" . SIMPLEPIE_PCRE_HTML_ATTRIBUTE . "(>(.*)<\/$name>|(\/)?>)/siU", $string, $matches, PREG_SET_ORDER | PREG_OFFSET_CAPTURE))
103
		{
104
			for ($i = 0, $total_matches = count($matches); $i < $total_matches; $i++)
105
			{
106
				$return[$i]['tag'] = $realname;
107
				$return[$i]['full'] = $matches[$i][0][0];
108
				$return[$i]['offset'] = $matches[$i][0][1];
109
				if (strlen($matches[$i][3][0]) <= 2)
110
				{
111
					$return[$i]['self_closing'] = true;
112
				}
113
				else
114
				{
115
					$return[$i]['self_closing'] = false;
116
					$return[$i]['content'] = $matches[$i][4][0];
117
				}
118
				$return[$i]['attribs'] = array();
119
				if (isset($matches[$i][2][0]) && preg_match_all('/[\x09\x0A\x0B\x0C\x0D\x20]+([^\x09\x0A\x0B\x0C\x0D\x20\x2F\x3E][^\x09\x0A\x0B\x0C\x0D\x20\x2F\x3D\x3E]*)(?:[\x09\x0A\x0B\x0C\x0D\x20]*=[\x09\x0A\x0B\x0C\x0D\x20]*(?:"([^"]*)"|\'([^\']*)\'|([^\x09\x0A\x0B\x0C\x0D\x20\x22\x27\x3E][^\x09\x0A\x0B\x0C\x0D\x20\x3E]*)?))?/', ' ' . $matches[$i][2][0] . ' ', $attribs, PREG_SET_ORDER))
120
				{
121
					for ($j = 0, $total_attribs = count($attribs); $j < $total_attribs; $j++)
122
					{
123
						if (count($attribs[$j]) === 2)
124
						{
125
							$attribs[$j][2] = $attribs[$j][1];
126
						}
127
						$return[$i]['attribs'][strtolower($attribs[$j][1])]['data'] = SimplePie_Misc::entities_decode(end($attribs[$j]));
128
					}
129
				}
130
			}
131
		}
132
		return $return;
133
	}
134
135
	public static function element_implode($element)
136
	{
137
		$full = "<$element[tag]";
138
		foreach ($element['attribs'] as $key => $value)
139
		{
140
			$key = strtolower($key);
141
			$full .= " $key=\"" . htmlspecialchars($value['data']) . '"';
142
		}
143
		if ($element['self_closing'])
144
		{
145
			$full .= ' />';
146
		}
147
		else
148
		{
149
			$full .= ">$element[content]</$element[tag]>";
150
		}
151
		return $full;
152
	}
153
154
	public static function error($message, $level, $file, $line)
155
	{
156
		if ((ini_get('error_reporting') & $level) > 0)
157
		{
158
			switch ($level)
159
			{
160
				case E_USER_ERROR:
161
					$note = 'PHP Error';
162
					break;
163
				case E_USER_WARNING:
164
					$note = 'PHP Warning';
165
					break;
166
				case E_USER_NOTICE:
167
					$note = 'PHP Notice';
168
					break;
169
				default:
170
					$note = 'Unknown Error';
171
					break;
172
			}
173
174
			$log_error = true;
175
			if (!function_exists('error_log'))
176
			{
177
				$log_error = false;
178
			}
179
180
			$log_file = @ini_get('error_log');
181
			if (!empty($log_file) && ('syslog' !== $log_file) && !@is_writable($log_file))
182
			{
183
				$log_error = false;
184
			}
185
186
			if ($log_error)
187
			{
188
				@error_log("$note: $message in $file on line $line", 0);
189
			}
190
		}
191
192
		return $message;
193
	}
194
195
	public static function fix_protocol($url, $http = 1)
196
	{
197
		$url = SimplePie_Misc::normalize_url($url);
198
		$parsed = SimplePie_Misc::parse_url($url);
199
		if ($parsed['scheme'] !== '' && $parsed['scheme'] !== 'http' && $parsed['scheme'] !== 'https')
200
		{
201
			return SimplePie_Misc::fix_protocol(SimplePie_Misc::compress_parse_url('http', $parsed['authority'], $parsed['path'], $parsed['query'], $parsed['fragment']), $http);
202
		}
203
204
		if ($parsed['scheme'] === '' && $parsed['authority'] === '' && !file_exists($url))
205
		{
206
			return SimplePie_Misc::fix_protocol(SimplePie_Misc::compress_parse_url('http', $parsed['path'], '', $parsed['query'], $parsed['fragment']), $http);
207
		}
208
209
		if ($http === 2 && $parsed['scheme'] !== '')
210
		{
211
			return "feed:$url";
212
		}
213
		elseif ($http === 3 && strtolower($parsed['scheme']) === 'http')
214
		{
215
			return substr_replace($url, 'podcast', 0, 4);
216
		}
217
		elseif ($http === 4 && strtolower($parsed['scheme']) === 'http')
218
		{
219
			return substr_replace($url, 'itpc', 0, 4);
220
		}
221
		else
222
		{
223
			return $url;
224
		}
225
	}
226
227
	public static function parse_url($url)
228
	{
229
		$iri = new SimplePie_IRI($url);
230
		return array(
231
			'scheme' => (string) $iri->scheme,
232
			'authority' => (string) $iri->authority,
233
			'path' => (string) $iri->path,
234
			'query' => (string) $iri->query,
235
			'fragment' => (string) $iri->fragment
236
		);
237
	}
238
239
	public static function compress_parse_url($scheme = '', $authority = '', $path = '', $query = '', $fragment = '')
240
	{
241
		$iri = new SimplePie_IRI('');
242
		$iri->scheme = $scheme;
243
		$iri->authority = $authority;
244
		$iri->path = $path;
245
		$iri->query = $query;
246
		$iri->fragment = $fragment;
247
		return $iri->get_uri();
248
	}
249
250
	public static function normalize_url($url)
251
	{
252
		$iri = new SimplePie_IRI($url);
253
		return $iri->get_uri();
254
	}
255
256
	public static function percent_encoding_normalization($match)
257
	{
258
		$integer = hexdec($match[1]);
259
		if ($integer >= 0x41 && $integer <= 0x5A || $integer >= 0x61 && $integer <= 0x7A || $integer >= 0x30 && $integer <= 0x39 || $integer === 0x2D || $integer === 0x2E || $integer === 0x5F || $integer === 0x7E)
260
		{
261
			return chr($integer);
262
		}
263
		else
264
		{
265
			return strtoupper($match[0]);
266
		}
267
	}
268
269
	/**
270
	 * Converts a Windows-1252 encoded string to a UTF-8 encoded string
271
	 *
272
	 * @static
273
	 * @param string $string Windows-1252 encoded string
274
	 * @return string UTF-8 encoded string
275
	 */
276
	public static function windows_1252_to_utf8($string)
277
	{
278
		static $convert_table = array("\x80" => "\xE2\x82\xAC", "\x81" => "\xEF\xBF\xBD", "\x82" => "\xE2\x80\x9A", "\x83" => "\xC6\x92", "\x84" => "\xE2\x80\x9E", "\x85" => "\xE2\x80\xA6", "\x86" => "\xE2\x80\xA0", "\x87" => "\xE2\x80\xA1", "\x88" => "\xCB\x86", "\x89" => "\xE2\x80\xB0", "\x8A" => "\xC5\xA0", "\x8B" => "\xE2\x80\xB9", "\x8C" => "\xC5\x92", "\x8D" => "\xEF\xBF\xBD", "\x8E" => "\xC5\xBD", "\x8F" => "\xEF\xBF\xBD", "\x90" => "\xEF\xBF\xBD", "\x91" => "\xE2\x80\x98", "\x92" => "\xE2\x80\x99", "\x93" => "\xE2\x80\x9C", "\x94" => "\xE2\x80\x9D", "\x95" => "\xE2\x80\xA2", "\x96" => "\xE2\x80\x93", "\x97" => "\xE2\x80\x94", "\x98" => "\xCB\x9C", "\x99" => "\xE2\x84\xA2", "\x9A" => "\xC5\xA1", "\x9B" => "\xE2\x80\xBA", "\x9C" => "\xC5\x93", "\x9D" => "\xEF\xBF\xBD", "\x9E" => "\xC5\xBE", "\x9F" => "\xC5\xB8", "\xA0" => "\xC2\xA0", "\xA1" => "\xC2\xA1", "\xA2" => "\xC2\xA2", "\xA3" => "\xC2\xA3", "\xA4" => "\xC2\xA4", "\xA5" => "\xC2\xA5", "\xA6" => "\xC2\xA6", "\xA7" => "\xC2\xA7", "\xA8" => "\xC2\xA8", "\xA9" => "\xC2\xA9", "\xAA" => "\xC2\xAA", "\xAB" => "\xC2\xAB", "\xAC" => "\xC2\xAC", "\xAD" => "\xC2\xAD", "\xAE" => "\xC2\xAE", "\xAF" => "\xC2\xAF", "\xB0" => "\xC2\xB0", "\xB1" => "\xC2\xB1", "\xB2" => "\xC2\xB2", "\xB3" => "\xC2\xB3", "\xB4" => "\xC2\xB4", "\xB5" => "\xC2\xB5", "\xB6" => "\xC2\xB6", "\xB7" => "\xC2\xB7", "\xB8" => "\xC2\xB8", "\xB9" => "\xC2\xB9", "\xBA" => "\xC2\xBA", "\xBB" => "\xC2\xBB", "\xBC" => "\xC2\xBC", "\xBD" => "\xC2\xBD", "\xBE" => "\xC2\xBE", "\xBF" => "\xC2\xBF", "\xC0" => "\xC3\x80", "\xC1" => "\xC3\x81", "\xC2" => "\xC3\x82", "\xC3" => "\xC3\x83", "\xC4" => "\xC3\x84", "\xC5" => "\xC3\x85", "\xC6" => "\xC3\x86", "\xC7" => "\xC3\x87", "\xC8" => "\xC3\x88", "\xC9" => "\xC3\x89", "\xCA" => "\xC3\x8A", "\xCB" => "\xC3\x8B", "\xCC" => "\xC3\x8C", "\xCD" => "\xC3\x8D", "\xCE" => "\xC3\x8E", "\xCF" => "\xC3\x8F", "\xD0" => "\xC3\x90", "\xD1" => "\xC3\x91", "\xD2" => "\xC3\x92", "\xD3" => "\xC3\x93", "\xD4" => "\xC3\x94", "\xD5" => "\xC3\x95", "\xD6" => "\xC3\x96", "\xD7" => "\xC3\x97", "\xD8" => "\xC3\x98", "\xD9" => "\xC3\x99", "\xDA" => "\xC3\x9A", "\xDB" => "\xC3\x9B", "\xDC" => "\xC3\x9C", "\xDD" => "\xC3\x9D", "\xDE" => "\xC3\x9E", "\xDF" => "\xC3\x9F", "\xE0" => "\xC3\xA0", "\xE1" => "\xC3\xA1", "\xE2" => "\xC3\xA2", "\xE3" => "\xC3\xA3", "\xE4" => "\xC3\xA4", "\xE5" => "\xC3\xA5", "\xE6" => "\xC3\xA6", "\xE7" => "\xC3\xA7", "\xE8" => "\xC3\xA8", "\xE9" => "\xC3\xA9", "\xEA" => "\xC3\xAA", "\xEB" => "\xC3\xAB", "\xEC" => "\xC3\xAC", "\xED" => "\xC3\xAD", "\xEE" => "\xC3\xAE", "\xEF" => "\xC3\xAF", "\xF0" => "\xC3\xB0", "\xF1" => "\xC3\xB1", "\xF2" => "\xC3\xB2", "\xF3" => "\xC3\xB3", "\xF4" => "\xC3\xB4", "\xF5" => "\xC3\xB5", "\xF6" => "\xC3\xB6", "\xF7" => "\xC3\xB7", "\xF8" => "\xC3\xB8", "\xF9" => "\xC3\xB9", "\xFA" => "\xC3\xBA", "\xFB" => "\xC3\xBB", "\xFC" => "\xC3\xBC", "\xFD" => "\xC3\xBD", "\xFE" => "\xC3\xBE", "\xFF" => "\xC3\xBF");
279
280
		return strtr($string, $convert_table);
281
	}
282
283
	/**
284
	 * Change a string from one encoding to another
285
	 *
286
	 * @param string $data Raw data in $input encoding
287
	 * @param string $input Encoding of $data
288
	 * @param string $output Encoding you want
289
	 * @return string|boolean False if we can't convert it
290
	 */
291
	public static function change_encoding($data, $input, $output)
292
	{
293
		$input = SimplePie_Misc::encoding($input);
294
		$output = SimplePie_Misc::encoding($output);
295
296
		// We fail to fail on non US-ASCII bytes
297
		if ($input === 'US-ASCII')
298
		{
299
			static $non_ascii_octects = '';
300
			if (!$non_ascii_octects)
301
			{
302
				for ($i = 0x80; $i <= 0xFF; $i++)
303
				{
304
					$non_ascii_octects .= chr($i);
305
				}
306
			}
307
			$data = substr($data, 0, strcspn($data, $non_ascii_octects));
308
		}
309
310
		// This is first, as behaviour of this is completely predictable
311
		if ($input === 'windows-1252' && $output === 'UTF-8')
312
		{
313
			return SimplePie_Misc::windows_1252_to_utf8($data);
314
		}
315
		// This is second, as behaviour of this varies only with PHP version (the middle part of this expression checks the encoding is supported).
316
		elseif (function_exists('mb_convert_encoding') && ($return = SimplePie_Misc::change_encoding_mbstring($data, $input, $output)))
317
		{
318
			return $return;
319
 		}
320
		// This is last, as behaviour of this varies with OS userland and PHP version
321
		elseif (function_exists('iconv') && ($return = SimplePie_Misc::change_encoding_iconv($data, $input, $output)))
322
		{
323
			return $return;
324
		}
325
		// If we can't do anything, just fail
326
		else
327
		{
328
			return false;
329
		}
330
	}
331
332
	protected static function change_encoding_mbstring($data, $input, $output)
333
	{
334
		if ($input === 'windows-949')
335
		{
336
			$input = 'EUC-KR';
337
		}
338
		if ($output === 'windows-949')
339
		{
340
			$output = 'EUC-KR';
341
		}
342
		if ($input === 'Windows-31J')
343
		{
344
			$input = 'SJIS';
345
		}
346
		if ($output === 'Windows-31J')
347
		{
348
			$output = 'SJIS';
349
		}
350
351
		// Check that the encoding is supported
352
		if (@mb_convert_encoding("\x80", 'UTF-16BE', $input) === "\x00\x80")
353
		{
354
			return false;
355
		}
356
		if (!in_array($input, mb_list_encodings()))
357
		{
358
			return false;
359
		}
360
361
		// Let's do some conversion
362
		if ($return = @mb_convert_encoding($data, $output, $input))
363
		{
364
			return $return;
365
		}
366
367
		return false;
368
	}
369
370
	protected static function change_encoding_iconv($data, $input, $output)
371
	{
372
		return @iconv($input, $output, $data);
373
	}
374
375
	/**
376
	 * Normalize an encoding name
377
	 *
378
	 * This is automatically generated by create.php
379
	 *
380
	 * To generate it, run `php create.php` on the command line, and copy the
381
	 * output to replace this function.
382
	 *
383
	 * @param string $charset Character set to standardise
384
	 * @return string Standardised name
385
	 */
386
	public static function encoding($charset)
387
	{
388
		// Normalization from UTS #22
389
		switch (strtolower(preg_replace('/(?:[^a-zA-Z0-9]+|([^0-9])0+)/', '\1', $charset)))
390
		{
391
			case 'adobestandardencoding':
392
			case 'csadobestandardencoding':
393
				return 'Adobe-Standard-Encoding';
394
395
			case 'adobesymbolencoding':
396
			case 'cshppsmath':
397
				return 'Adobe-Symbol-Encoding';
398
399
			case 'ami1251':
400
			case 'amiga1251':
401
				return 'Amiga-1251';
402
403
			case 'ansix31101983':
404
			case 'csat5001983':
405
			case 'csiso99naplps':
406
			case 'isoir99':
407
			case 'naplps':
408
				return 'ANSI_X3.110-1983';
409
410
			case 'arabic7':
411
			case 'asmo449':
412
			case 'csiso89asmo449':
413
			case 'iso9036':
414
			case 'isoir89':
415
				return 'ASMO_449';
416
417
			case 'big5':
418
			case 'csbig5':
419
				return 'Big5';
420
421
			case 'big5hkscs':
422
				return 'Big5-HKSCS';
423
424
			case 'bocu1':
425
			case 'csbocu1':
426
				return 'BOCU-1';
427
428
			case 'brf':
429
			case 'csbrf':
430
				return 'BRF';
431
432
			case 'bs4730':
433
			case 'csiso4unitedkingdom':
434
			case 'gb':
435
			case 'iso646gb':
436
			case 'isoir4':
437
			case 'uk':
438
				return 'BS_4730';
439
440
			case 'bsviewdata':
441
			case 'csiso47bsviewdata':
442
			case 'isoir47':
443
				return 'BS_viewdata';
444
445
			case 'cesu8':
446
			case 'cscesu8':
447
				return 'CESU-8';
448
449
			case 'ca':
450
			case 'csa71':
451
			case 'csaz243419851':
452
			case 'csiso121canadian1':
453
			case 'iso646ca':
454
			case 'isoir121':
455
				return 'CSA_Z243.4-1985-1';
456
457
			case 'csa72':
458
			case 'csaz243419852':
459
			case 'csiso122canadian2':
460
			case 'iso646ca2':
461
			case 'isoir122':
462
				return 'CSA_Z243.4-1985-2';
463
464
			case 'csaz24341985gr':
465
			case 'csiso123csaz24341985gr':
466
			case 'isoir123':
467
				return 'CSA_Z243.4-1985-gr';
468
469
			case 'csiso139csn369103':
470
			case 'csn369103':
471
			case 'isoir139':
472
				return 'CSN_369103';
473
474
			case 'csdecmcs':
475
			case 'dec':
476
			case 'decmcs':
477
				return 'DEC-MCS';
478
479
			case 'csiso21german':
480
			case 'de':
481
			case 'din66003':
482
			case 'iso646de':
483
			case 'isoir21':
484
				return 'DIN_66003';
485
486
			case 'csdkus':
487
			case 'dkus':
488
				return 'dk-us';
489
490
			case 'csiso646danish':
491
			case 'dk':
492
			case 'ds2089':
493
			case 'iso646dk':
494
				return 'DS_2089';
495
496
			case 'csibmebcdicatde':
497
			case 'ebcdicatde':
498
				return 'EBCDIC-AT-DE';
499
500
			case 'csebcdicatdea':
501
			case 'ebcdicatdea':
502
				return 'EBCDIC-AT-DE-A';
503
504
			case 'csebcdiccafr':
505
			case 'ebcdiccafr':
506
				return 'EBCDIC-CA-FR';
507
508
			case 'csebcdicdkno':
509
			case 'ebcdicdkno':
510
				return 'EBCDIC-DK-NO';
511
512
			case 'csebcdicdknoa':
513
			case 'ebcdicdknoa':
514
				return 'EBCDIC-DK-NO-A';
515
516
			case 'csebcdices':
517
			case 'ebcdices':
518
				return 'EBCDIC-ES';
519
520
			case 'csebcdicesa':
521
			case 'ebcdicesa':
522
				return 'EBCDIC-ES-A';
523
524
			case 'csebcdicess':
525
			case 'ebcdicess':
526
				return 'EBCDIC-ES-S';
527
528
			case 'csebcdicfise':
529
			case 'ebcdicfise':
530
				return 'EBCDIC-FI-SE';
531
532
			case 'csebcdicfisea':
533
			case 'ebcdicfisea':
534
				return 'EBCDIC-FI-SE-A';
535
536
			case 'csebcdicfr':
537
			case 'ebcdicfr':
538
				return 'EBCDIC-FR';
539
540
			case 'csebcdicit':
541
			case 'ebcdicit':
542
				return 'EBCDIC-IT';
543
544
			case 'csebcdicpt':
545
			case 'ebcdicpt':
546
				return 'EBCDIC-PT';
547
548
			case 'csebcdicuk':
549
			case 'ebcdicuk':
550
				return 'EBCDIC-UK';
551
552
			case 'csebcdicus':
553
			case 'ebcdicus':
554
				return 'EBCDIC-US';
555
556
			case 'csiso111ecmacyrillic':
557
			case 'ecmacyrillic':
558
			case 'isoir111':
559
			case 'koi8e':
560
				return 'ECMA-cyrillic';
561
562
			case 'csiso17spanish':
563
			case 'es':
564
			case 'iso646es':
565
			case 'isoir17':
566
				return 'ES';
567
568
			case 'csiso85spanish2':
569
			case 'es2':
570
			case 'iso646es2':
571
			case 'isoir85':
572
				return 'ES2';
573
574
			case 'cseucpkdfmtjapanese':
575
			case 'eucjp':
576
			case 'extendedunixcodepackedformatforjapanese':
577
				return 'EUC-JP';
578
579
			case 'cseucfixwidjapanese':
580
			case 'extendedunixcodefixedwidthforjapanese':
581
				return 'Extended_UNIX_Code_Fixed_Width_for_Japanese';
582
583
			case 'gb18030':
584
				return 'GB18030';
585
586
			case 'chinese':
587
			case 'cp936':
588
			case 'csgb2312':
589
			case 'csiso58gb231280':
590
			case 'gb2312':
591
			case 'gb231280':
592
			case 'gbk':
593
			case 'isoir58':
594
			case 'ms936':
595
			case 'windows936':
596
				return 'GBK';
597
598
			case 'cn':
599
			case 'csiso57gb1988':
600
			case 'gb198880':
601
			case 'iso646cn':
602
			case 'isoir57':
603
				return 'GB_1988-80';
604
605
			case 'csiso153gost1976874':
606
			case 'gost1976874':
607
			case 'isoir153':
608
			case 'stsev35888':
609
				return 'GOST_19768-74';
610
611
			case 'csiso150':
612
			case 'csiso150greekccitt':
613
			case 'greekccitt':
614
			case 'isoir150':
615
				return 'greek-ccitt';
616
617
			case 'csiso88greek7':
618
			case 'greek7':
619
			case 'isoir88':
620
				return 'greek7';
621
622
			case 'csiso18greek7old':
623
			case 'greek7old':
624
			case 'isoir18':
625
				return 'greek7-old';
626
627
			case 'cshpdesktop':
628
			case 'hpdesktop':
629
				return 'HP-DeskTop';
630
631
			case 'cshplegal':
632
			case 'hplegal':
633
				return 'HP-Legal';
634
635
			case 'cshpmath8':
636
			case 'hpmath8':
637
				return 'HP-Math8';
638
639
			case 'cshppifont':
640
			case 'hppifont':
641
				return 'HP-Pi-font';
642
643
			case 'cshproman8':
644
			case 'hproman8':
645
			case 'r8':
646
			case 'roman8':
647
				return 'hp-roman8';
648
649
			case 'hzgb2312':
650
				return 'HZ-GB-2312';
651
652
			case 'csibmsymbols':
653
			case 'ibmsymbols':
654
				return 'IBM-Symbols';
655
656
			case 'csibmthai':
657
			case 'ibmthai':
658
				return 'IBM-Thai';
659
660
			case 'cp37':
661
			case 'csibm37':
662
			case 'ebcdiccpca':
663
			case 'ebcdiccpnl':
664
			case 'ebcdiccpus':
665
			case 'ebcdiccpwt':
666
			case 'ibm37':
667
				return 'IBM037';
668
669
			case 'cp38':
670
			case 'csibm38':
671
			case 'ebcdicint':
672
			case 'ibm38':
673
				return 'IBM038';
674
675
			case 'cp273':
676
			case 'csibm273':
677
			case 'ibm273':
678
				return 'IBM273';
679
680
			case 'cp274':
681
			case 'csibm274':
682
			case 'ebcdicbe':
683
			case 'ibm274':
684
				return 'IBM274';
685
686
			case 'cp275':
687
			case 'csibm275':
688
			case 'ebcdicbr':
689
			case 'ibm275':
690
				return 'IBM275';
691
692
			case 'csibm277':
693
			case 'ebcdiccpdk':
694
			case 'ebcdiccpno':
695
			case 'ibm277':
696
				return 'IBM277';
697
698
			case 'cp278':
699
			case 'csibm278':
700
			case 'ebcdiccpfi':
701
			case 'ebcdiccpse':
702
			case 'ibm278':
703
				return 'IBM278';
704
705
			case 'cp280':
706
			case 'csibm280':
707
			case 'ebcdiccpit':
708
			case 'ibm280':
709
				return 'IBM280';
710
711
			case 'cp281':
712
			case 'csibm281':
713
			case 'ebcdicjpe':
714
			case 'ibm281':
715
				return 'IBM281';
716
717
			case 'cp284':
718
			case 'csibm284':
719
			case 'ebcdiccpes':
720
			case 'ibm284':
721
				return 'IBM284';
722
723
			case 'cp285':
724
			case 'csibm285':
725
			case 'ebcdiccpgb':
726
			case 'ibm285':
727
				return 'IBM285';
728
729
			case 'cp290':
730
			case 'csibm290':
731
			case 'ebcdicjpkana':
732
			case 'ibm290':
733
				return 'IBM290';
734
735
			case 'cp297':
736
			case 'csibm297':
737
			case 'ebcdiccpfr':
738
			case 'ibm297':
739
				return 'IBM297';
740
741
			case 'cp420':
742
			case 'csibm420':
743
			case 'ebcdiccpar1':
744
			case 'ibm420':
745
				return 'IBM420';
746
747
			case 'cp423':
748
			case 'csibm423':
749
			case 'ebcdiccpgr':
750
			case 'ibm423':
751
				return 'IBM423';
752
753
			case 'cp424':
754
			case 'csibm424':
755
			case 'ebcdiccphe':
756
			case 'ibm424':
757
				return 'IBM424';
758
759
			case '437':
760
			case 'cp437':
761
			case 'cspc8codepage437':
762
			case 'ibm437':
763
				return 'IBM437';
764
765
			case 'cp500':
766
			case 'csibm500':
767
			case 'ebcdiccpbe':
768
			case 'ebcdiccpch':
769
			case 'ibm500':
770
				return 'IBM500';
771
772
			case 'cp775':
773
			case 'cspc775baltic':
774
			case 'ibm775':
775
				return 'IBM775';
776
777
			case '850':
778
			case 'cp850':
779
			case 'cspc850multilingual':
780
			case 'ibm850':
781
				return 'IBM850';
782
783
			case '851':
784
			case 'cp851':
785
			case 'csibm851':
786
			case 'ibm851':
787
				return 'IBM851';
788
789
			case '852':
790
			case 'cp852':
791
			case 'cspcp852':
792
			case 'ibm852':
793
				return 'IBM852';
794
795
			case '855':
796
			case 'cp855':
797
			case 'csibm855':
798
			case 'ibm855':
799
				return 'IBM855';
800
801
			case '857':
802
			case 'cp857':
803
			case 'csibm857':
804
			case 'ibm857':
805
				return 'IBM857';
806
807
			case 'ccsid858':
808
			case 'cp858':
809
			case 'ibm858':
810
			case 'pcmultilingual850euro':
811
				return 'IBM00858';
812
813
			case '860':
814
			case 'cp860':
815
			case 'csibm860':
816
			case 'ibm860':
817
				return 'IBM860';
818
819
			case '861':
820
			case 'cp861':
821
			case 'cpis':
822
			case 'csibm861':
823
			case 'ibm861':
824
				return 'IBM861';
825
826
			case '862':
827
			case 'cp862':
828
			case 'cspc862latinhebrew':
829
			case 'ibm862':
830
				return 'IBM862';
831
832
			case '863':
833
			case 'cp863':
834
			case 'csibm863':
835
			case 'ibm863':
836
				return 'IBM863';
837
838
			case 'cp864':
839
			case 'csibm864':
840
			case 'ibm864':
841
				return 'IBM864';
842
843
			case '865':
844
			case 'cp865':
845
			case 'csibm865':
846
			case 'ibm865':
847
				return 'IBM865';
848
849
			case '866':
850
			case 'cp866':
851
			case 'csibm866':
852
			case 'ibm866':
853
				return 'IBM866';
854
855
			case 'cp868':
856
			case 'cpar':
857
			case 'csibm868':
858
			case 'ibm868':
859
				return 'IBM868';
860
861
			case '869':
862
			case 'cp869':
863
			case 'cpgr':
864
			case 'csibm869':
865
			case 'ibm869':
866
				return 'IBM869';
867
868
			case 'cp870':
869
			case 'csibm870':
870
			case 'ebcdiccproece':
871
			case 'ebcdiccpyu':
872
			case 'ibm870':
873
				return 'IBM870';
874
875
			case 'cp871':
876
			case 'csibm871':
877
			case 'ebcdiccpis':
878
			case 'ibm871':
879
				return 'IBM871';
880
881
			case 'cp880':
882
			case 'csibm880':
883
			case 'ebcdiccyrillic':
884
			case 'ibm880':
885
				return 'IBM880';
886
887
			case 'cp891':
888
			case 'csibm891':
889
			case 'ibm891':
890
				return 'IBM891';
891
892
			case 'cp903':
893
			case 'csibm903':
894
			case 'ibm903':
895
				return 'IBM903';
896
897
			case '904':
898
			case 'cp904':
899
			case 'csibbm904':
900
			case 'ibm904':
901
				return 'IBM904';
902
903
			case 'cp905':
904
			case 'csibm905':
905
			case 'ebcdiccptr':
906
			case 'ibm905':
907
				return 'IBM905';
908
909
			case 'cp918':
910
			case 'csibm918':
911
			case 'ebcdiccpar2':
912
			case 'ibm918':
913
				return 'IBM918';
914
915
			case 'ccsid924':
916
			case 'cp924':
917
			case 'ebcdiclatin9euro':
918
			case 'ibm924':
919
				return 'IBM00924';
920
921
			case 'cp1026':
922
			case 'csibm1026':
923
			case 'ibm1026':
924
				return 'IBM1026';
925
926
			case 'ibm1047':
927
				return 'IBM1047';
928
929
			case 'ccsid1140':
930
			case 'cp1140':
931
			case 'ebcdicus37euro':
932
			case 'ibm1140':
933
				return 'IBM01140';
934
935
			case 'ccsid1141':
936
			case 'cp1141':
937
			case 'ebcdicde273euro':
938
			case 'ibm1141':
939
				return 'IBM01141';
940
941
			case 'ccsid1142':
942
			case 'cp1142':
943
			case 'ebcdicdk277euro':
944
			case 'ebcdicno277euro':
945
			case 'ibm1142':
946
				return 'IBM01142';
947
948
			case 'ccsid1143':
949
			case 'cp1143':
950
			case 'ebcdicfi278euro':
951
			case 'ebcdicse278euro':
952
			case 'ibm1143':
953
				return 'IBM01143';
954
955
			case 'ccsid1144':
956
			case 'cp1144':
957
			case 'ebcdicit280euro':
958
			case 'ibm1144':
959
				return 'IBM01144';
960
961
			case 'ccsid1145':
962
			case 'cp1145':
963
			case 'ebcdices284euro':
964
			case 'ibm1145':
965
				return 'IBM01145';
966
967
			case 'ccsid1146':
968
			case 'cp1146':
969
			case 'ebcdicgb285euro':
970
			case 'ibm1146':
971
				return 'IBM01146';
972
973
			case 'ccsid1147':
974
			case 'cp1147':
975
			case 'ebcdicfr297euro':
976
			case 'ibm1147':
977
				return 'IBM01147';
978
979
			case 'ccsid1148':
980
			case 'cp1148':
981
			case 'ebcdicinternational500euro':
982
			case 'ibm1148':
983
				return 'IBM01148';
984
985
			case 'ccsid1149':
986
			case 'cp1149':
987
			case 'ebcdicis871euro':
988
			case 'ibm1149':
989
				return 'IBM01149';
990
991
			case 'csiso143iecp271':
992
			case 'iecp271':
993
			case 'isoir143':
994
				return 'IEC_P27-1';
995
996
			case 'csiso49inis':
997
			case 'inis':
998
			case 'isoir49':
999
				return 'INIS';
1000
1001
			case 'csiso50inis8':
1002
			case 'inis8':
1003
			case 'isoir50':
1004
				return 'INIS-8';
1005
1006
			case 'csiso51iniscyrillic':
1007
			case 'iniscyrillic':
1008
			case 'isoir51':
1009
				return 'INIS-cyrillic';
1010
1011
			case 'csinvariant':
1012
			case 'invariant':
1013
				return 'INVARIANT';
1014
1015
			case 'iso2022cn':
1016
				return 'ISO-2022-CN';
1017
1018
			case 'iso2022cnext':
1019
				return 'ISO-2022-CN-EXT';
1020
1021
			case 'csiso2022jp':
1022
			case 'iso2022jp':
1023
				return 'ISO-2022-JP';
1024
1025
			case 'csiso2022jp2':
1026
			case 'iso2022jp2':
1027
				return 'ISO-2022-JP-2';
1028
1029
			case 'csiso2022kr':
1030
			case 'iso2022kr':
1031
				return 'ISO-2022-KR';
1032
1033
			case 'cswindows30latin1':
1034
			case 'iso88591windows30latin1':
1035
				return 'ISO-8859-1-Windows-3.0-Latin-1';
1036
1037
			case 'cswindows31latin1':
1038
			case 'iso88591windows31latin1':
1039
				return 'ISO-8859-1-Windows-3.1-Latin-1';
1040
1041
			case 'csisolatin2':
1042
			case 'iso88592':
1043
			case 'iso885921987':
1044
			case 'isoir101':
1045
			case 'l2':
1046
			case 'latin2':
1047
				return 'ISO-8859-2';
1048
1049
			case 'cswindows31latin2':
1050
			case 'iso88592windowslatin2':
1051
				return 'ISO-8859-2-Windows-Latin-2';
1052
1053
			case 'csisolatin3':
1054
			case 'iso88593':
1055
			case 'iso885931988':
1056
			case 'isoir109':
1057
			case 'l3':
1058
			case 'latin3':
1059
				return 'ISO-8859-3';
1060
1061
			case 'csisolatin4':
1062
			case 'iso88594':
1063
			case 'iso885941988':
1064
			case 'isoir110':
1065
			case 'l4':
1066
			case 'latin4':
1067
				return 'ISO-8859-4';
1068
1069
			case 'csisolatincyrillic':
1070
			case 'cyrillic':
1071
			case 'iso88595':
1072
			case 'iso885951988':
1073
			case 'isoir144':
1074
				return 'ISO-8859-5';
1075
1076
			case 'arabic':
1077
			case 'asmo708':
1078
			case 'csisolatinarabic':
1079
			case 'ecma114':
1080
			case 'iso88596':
1081
			case 'iso885961987':
1082
			case 'isoir127':
1083
				return 'ISO-8859-6';
1084
1085
			case 'csiso88596e':
1086
			case 'iso88596e':
1087
				return 'ISO-8859-6-E';
1088
1089
			case 'csiso88596i':
1090
			case 'iso88596i':
1091
				return 'ISO-8859-6-I';
1092
1093
			case 'csisolatingreek':
1094
			case 'ecma118':
1095
			case 'elot928':
1096
			case 'greek':
1097
			case 'greek8':
1098
			case 'iso88597':
1099
			case 'iso885971987':
1100
			case 'isoir126':
1101
				return 'ISO-8859-7';
1102
1103
			case 'csisolatinhebrew':
1104
			case 'hebrew':
1105
			case 'iso88598':
1106
			case 'iso885981988':
1107
			case 'isoir138':
1108
				return 'ISO-8859-8';
1109
1110
			case 'csiso88598e':
1111
			case 'iso88598e':
1112
				return 'ISO-8859-8-E';
1113
1114
			case 'csiso88598i':
1115
			case 'iso88598i':
1116
				return 'ISO-8859-8-I';
1117
1118
			case 'cswindows31latin5':
1119
			case 'iso88599windowslatin5':
1120
				return 'ISO-8859-9-Windows-Latin-5';
1121
1122
			case 'csisolatin6':
1123
			case 'iso885910':
1124
			case 'iso8859101992':
1125
			case 'isoir157':
1126
			case 'l6':
1127
			case 'latin6':
1128
				return 'ISO-8859-10';
1129
1130
			case 'iso885913':
1131
				return 'ISO-8859-13';
1132
1133
			case 'iso885914':
1134
			case 'iso8859141998':
1135
			case 'isoceltic':
1136
			case 'isoir199':
1137
			case 'l8':
1138
			case 'latin8':
1139
				return 'ISO-8859-14';
1140
1141
			case 'iso885915':
1142
			case 'latin9':
1143
				return 'ISO-8859-15';
1144
1145
			case 'iso885916':
1146
			case 'iso8859162001':
1147
			case 'isoir226':
1148
			case 'l10':
1149
			case 'latin10':
1150
				return 'ISO-8859-16';
1151
1152
			case 'iso10646j1':
1153
				return 'ISO-10646-J-1';
1154
1155
			case 'csunicode':
1156
			case 'iso10646ucs2':
1157
				return 'ISO-10646-UCS-2';
1158
1159
			case 'csucs4':
1160
			case 'iso10646ucs4':
1161
				return 'ISO-10646-UCS-4';
1162
1163
			case 'csunicodeascii':
1164
			case 'iso10646ucsbasic':
1165
				return 'ISO-10646-UCS-Basic';
1166
1167
			case 'csunicodelatin1':
1168
			case 'iso10646':
1169
			case 'iso10646unicodelatin1':
1170
				return 'ISO-10646-Unicode-Latin1';
1171
1172
			case 'csiso10646utf1':
1173
			case 'iso10646utf1':
1174
				return 'ISO-10646-UTF-1';
1175
1176
			case 'csiso115481':
1177
			case 'iso115481':
1178
			case 'isotr115481':
1179
				return 'ISO-11548-1';
1180
1181
			case 'csiso90':
1182
			case 'isoir90':
1183
				return 'iso-ir-90';
1184
1185
			case 'csunicodeibm1261':
1186
			case 'isounicodeibm1261':
1187
				return 'ISO-Unicode-IBM-1261';
1188
1189
			case 'csunicodeibm1264':
1190
			case 'isounicodeibm1264':
1191
				return 'ISO-Unicode-IBM-1264';
1192
1193
			case 'csunicodeibm1265':
1194
			case 'isounicodeibm1265':
1195
				return 'ISO-Unicode-IBM-1265';
1196
1197
			case 'csunicodeibm1268':
1198
			case 'isounicodeibm1268':
1199
				return 'ISO-Unicode-IBM-1268';
1200
1201
			case 'csunicodeibm1276':
1202
			case 'isounicodeibm1276':
1203
				return 'ISO-Unicode-IBM-1276';
1204
1205
			case 'csiso646basic1983':
1206
			case 'iso646basic1983':
1207
			case 'ref':
1208
				return 'ISO_646.basic:1983';
1209
1210
			case 'csiso2intlrefversion':
1211
			case 'irv':
1212
			case 'iso646irv1983':
1213
			case 'isoir2':
1214
				return 'ISO_646.irv:1983';
1215
1216
			case 'csiso2033':
1217
			case 'e13b':
1218
			case 'iso20331983':
1219
			case 'isoir98':
1220
				return 'ISO_2033-1983';
1221
1222
			case 'csiso5427cyrillic':
1223
			case 'iso5427':
1224
			case 'isoir37':
1225
				return 'ISO_5427';
1226
1227
			case 'iso5427cyrillic1981':
1228
			case 'iso54271981':
1229
			case 'isoir54':
1230
				return 'ISO_5427:1981';
1231
1232
			case 'csiso5428greek':
1233
			case 'iso54281980':
1234
			case 'isoir55':
1235
				return 'ISO_5428:1980';
1236
1237
			case 'csiso6937add':
1238
			case 'iso6937225':
1239
			case 'isoir152':
1240
				return 'ISO_6937-2-25';
1241
1242
			case 'csisotextcomm':
1243
			case 'iso69372add':
1244
			case 'isoir142':
1245
				return 'ISO_6937-2-add';
1246
1247
			case 'csiso8859supp':
1248
			case 'iso8859supp':
1249
			case 'isoir154':
1250
			case 'latin125':
1251
				return 'ISO_8859-supp';
1252
1253
			case 'csiso10367box':
1254
			case 'iso10367box':
1255
			case 'isoir155':
1256
				return 'ISO_10367-box';
1257
1258
			case 'csiso15italian':
1259
			case 'iso646it':
1260
			case 'isoir15':
1261
			case 'it':
1262
				return 'IT';
1263
1264
			case 'csiso13jisc6220jp':
1265
			case 'isoir13':
1266
			case 'jisc62201969':
1267
			case 'jisc62201969jp':
1268
			case 'katakana':
1269
			case 'x2017':
1270
				return 'JIS_C6220-1969-jp';
1271
1272
			case 'csiso14jisc6220ro':
1273
			case 'iso646jp':
1274
			case 'isoir14':
1275
			case 'jisc62201969ro':
1276
			case 'jp':
1277
				return 'JIS_C6220-1969-ro';
1278
1279
			case 'csiso42jisc62261978':
1280
			case 'isoir42':
1281
			case 'jisc62261978':
1282
				return 'JIS_C6226-1978';
1283
1284
			case 'csiso87jisx208':
1285
			case 'isoir87':
1286
			case 'jisc62261983':
1287
			case 'jisx2081983':
1288
			case 'x208':
1289
				return 'JIS_C6226-1983';
1290
1291
			case 'csiso91jisc62291984a':
1292
			case 'isoir91':
1293
			case 'jisc62291984a':
1294
			case 'jpocra':
1295
				return 'JIS_C6229-1984-a';
1296
1297
			case 'csiso92jisc62991984b':
1298
			case 'iso646jpocrb':
1299
			case 'isoir92':
1300
			case 'jisc62291984b':
1301
			case 'jpocrb':
1302
				return 'JIS_C6229-1984-b';
1303
1304
			case 'csiso93jis62291984badd':
1305
			case 'isoir93':
1306
			case 'jisc62291984badd':
1307
			case 'jpocrbadd':
1308
				return 'JIS_C6229-1984-b-add';
1309
1310
			case 'csiso94jis62291984hand':
1311
			case 'isoir94':
1312
			case 'jisc62291984hand':
1313
			case 'jpocrhand':
1314
				return 'JIS_C6229-1984-hand';
1315
1316
			case 'csiso95jis62291984handadd':
1317
			case 'isoir95':
1318
			case 'jisc62291984handadd':
1319
			case 'jpocrhandadd':
1320
				return 'JIS_C6229-1984-hand-add';
1321
1322
			case 'csiso96jisc62291984kana':
1323
			case 'isoir96':
1324
			case 'jisc62291984kana':
1325
				return 'JIS_C6229-1984-kana';
1326
1327
			case 'csjisencoding':
1328
			case 'jisencoding':
1329
				return 'JIS_Encoding';
1330
1331
			case 'cshalfwidthkatakana':
1332
			case 'jisx201':
1333
			case 'x201':
1334
				return 'JIS_X0201';
1335
1336
			case 'csiso159jisx2121990':
1337
			case 'isoir159':
1338
			case 'jisx2121990':
1339
			case 'x212':
1340
				return 'JIS_X0212-1990';
1341
1342
			case 'csiso141jusib1002':
1343
			case 'iso646yu':
1344
			case 'isoir141':
1345
			case 'js':
1346
			case 'jusib1002':
1347
			case 'yu':
1348
				return 'JUS_I.B1.002';
1349
1350
			case 'csiso147macedonian':
1351
			case 'isoir147':
1352
			case 'jusib1003mac':
1353
			case 'macedonian':
1354
				return 'JUS_I.B1.003-mac';
1355
1356
			case 'csiso146serbian':
1357
			case 'isoir146':
1358
			case 'jusib1003serb':
1359
			case 'serbian':
1360
				return 'JUS_I.B1.003-serb';
1361
1362
			case 'koi7switched':
1363
				return 'KOI7-switched';
1364
1365
			case 'cskoi8r':
1366
			case 'koi8r':
1367
				return 'KOI8-R';
1368
1369
			case 'koi8u':
1370
				return 'KOI8-U';
1371
1372
			case 'csksc5636':
1373
			case 'iso646kr':
1374
			case 'ksc5636':
1375
				return 'KSC5636';
1376
1377
			case 'cskz1048':
1378
			case 'kz1048':
1379
			case 'rk1048':
1380
			case 'strk10482002':
1381
				return 'KZ-1048';
1382
1383
			case 'csiso19latingreek':
1384
			case 'isoir19':
1385
			case 'latingreek':
1386
				return 'latin-greek';
1387
1388
			case 'csiso27latingreek1':
1389
			case 'isoir27':
1390
			case 'latingreek1':
1391
				return 'Latin-greek-1';
1392
1393
			case 'csiso158lap':
1394
			case 'isoir158':
1395
			case 'lap':
1396
			case 'latinlap':
1397
				return 'latin-lap';
1398
1399
			case 'csmacintosh':
1400
			case 'mac':
1401
			case 'macintosh':
1402
				return 'macintosh';
1403
1404
			case 'csmicrosoftpublishing':
1405
			case 'microsoftpublishing':
1406
				return 'Microsoft-Publishing';
1407
1408
			case 'csmnem':
1409
			case 'mnem':
1410
				return 'MNEM';
1411
1412
			case 'csmnemonic':
1413
			case 'mnemonic':
1414
				return 'MNEMONIC';
1415
1416
			case 'csiso86hungarian':
1417
			case 'hu':
1418
			case 'iso646hu':
1419
			case 'isoir86':
1420
			case 'msz77953':
1421
				return 'MSZ_7795.3';
1422
1423
			case 'csnatsdano':
1424
			case 'isoir91':
1425
			case 'natsdano':
1426
				return 'NATS-DANO';
1427
1428
			case 'csnatsdanoadd':
1429
			case 'isoir92':
1430
			case 'natsdanoadd':
1431
				return 'NATS-DANO-ADD';
1432
1433
			case 'csnatssefi':
1434
			case 'isoir81':
1435
			case 'natssefi':
1436
				return 'NATS-SEFI';
1437
1438
			case 'csnatssefiadd':
1439
			case 'isoir82':
1440
			case 'natssefiadd':
1441
				return 'NATS-SEFI-ADD';
1442
1443
			case 'csiso151cuba':
1444
			case 'cuba':
1445
			case 'iso646cu':
1446
			case 'isoir151':
1447
			case 'ncnc1081':
1448
				return 'NC_NC00-10:81';
1449
1450
			case 'csiso69french':
1451
			case 'fr':
1452
			case 'iso646fr':
1453
			case 'isoir69':
1454
			case 'nfz62010':
1455
				return 'NF_Z_62-010';
1456
1457
			case 'csiso25french':
1458
			case 'iso646fr1':
1459
			case 'isoir25':
1460
			case 'nfz620101973':
1461
				return 'NF_Z_62-010_(1973)';
1462
1463
			case 'csiso60danishnorwegian':
1464
			case 'csiso60norwegian1':
1465
			case 'iso646no':
1466
			case 'isoir60':
1467
			case 'no':
1468
			case 'ns45511':
1469
				return 'NS_4551-1';
1470
1471
			case 'csiso61norwegian2':
1472
			case 'iso646no2':
1473
			case 'isoir61':
1474
			case 'no2':
1475
			case 'ns45512':
1476
				return 'NS_4551-2';
1477
1478
			case 'osdebcdicdf3irv':
1479
				return 'OSD_EBCDIC_DF03_IRV';
1480
1481
			case 'osdebcdicdf41':
1482
				return 'OSD_EBCDIC_DF04_1';
1483
1484
			case 'osdebcdicdf415':
1485
				return 'OSD_EBCDIC_DF04_15';
1486
1487
			case 'cspc8danishnorwegian':
1488
			case 'pc8danishnorwegian':
1489
				return 'PC8-Danish-Norwegian';
1490
1491
			case 'cspc8turkish':
1492
			case 'pc8turkish':
1493
				return 'PC8-Turkish';
1494
1495
			case 'csiso16portuguese':
1496
			case 'iso646pt':
1497
			case 'isoir16':
1498
			case 'pt':
1499
				return 'PT';
1500
1501
			case 'csiso84portuguese2':
1502
			case 'iso646pt2':
1503
			case 'isoir84':
1504
			case 'pt2':
1505
				return 'PT2';
1506
1507
			case 'cp154':
1508
			case 'csptcp154':
1509
			case 'cyrillicasian':
1510
			case 'pt154':
1511
			case 'ptcp154':
1512
				return 'PTCP154';
1513
1514
			case 'scsu':
1515
				return 'SCSU';
1516
1517
			case 'csiso10swedish':
1518
			case 'fi':
1519
			case 'iso646fi':
1520
			case 'iso646se':
1521
			case 'isoir10':
1522
			case 'se':
1523
			case 'sen850200b':
1524
				return 'SEN_850200_B';
1525
1526
			case 'csiso11swedishfornames':
1527
			case 'iso646se2':
1528
			case 'isoir11':
1529
			case 'se2':
1530
			case 'sen850200c':
1531
				return 'SEN_850200_C';
1532
1533
			case 'csiso102t617bit':
1534
			case 'isoir102':
1535
			case 't617bit':
1536
				return 'T.61-7bit';
1537
1538
			case 'csiso103t618bit':
1539
			case 'isoir103':
1540
			case 't61':
1541
			case 't618bit':
1542
				return 'T.61-8bit';
1543
1544
			case 'csiso128t101g2':
1545
			case 'isoir128':
1546
			case 't101g2':
1547
				return 'T.101-G2';
1548
1549
			case 'cstscii':
1550
			case 'tscii':
1551
				return 'TSCII';
1552
1553
			case 'csunicode11':
1554
			case 'unicode11':
1555
				return 'UNICODE-1-1';
1556
1557
			case 'csunicode11utf7':
1558
			case 'unicode11utf7':
1559
				return 'UNICODE-1-1-UTF-7';
1560
1561
			case 'csunknown8bit':
1562
			case 'unknown8bit':
1563
				return 'UNKNOWN-8BIT';
1564
1565
			case 'ansix341968':
1566
			case 'ansix341986':
1567
			case 'ascii':
1568
			case 'cp367':
1569
			case 'csascii':
1570
			case 'ibm367':
1571
			case 'iso646irv1991':
1572
			case 'iso646us':
1573
			case 'isoir6':
1574
			case 'us':
1575
			case 'usascii':
1576
				return 'US-ASCII';
1577
1578
			case 'csusdk':
1579
			case 'usdk':
1580
				return 'us-dk';
1581
1582
			case 'utf7':
1583
				return 'UTF-7';
1584
1585
			case 'utf8':
1586
				return 'UTF-8';
1587
1588
			case 'utf16':
1589
				return 'UTF-16';
1590
1591
			case 'utf16be':
1592
				return 'UTF-16BE';
1593
1594
			case 'utf16le':
1595
				return 'UTF-16LE';
1596
1597
			case 'utf32':
1598
				return 'UTF-32';
1599
1600
			case 'utf32be':
1601
				return 'UTF-32BE';
1602
1603
			case 'utf32le':
1604
				return 'UTF-32LE';
1605
1606
			case 'csventurainternational':
1607
			case 'venturainternational':
1608
				return 'Ventura-International';
1609
1610
			case 'csventuramath':
1611
			case 'venturamath':
1612
				return 'Ventura-Math';
1613
1614
			case 'csventuraus':
1615
			case 'venturaus':
1616
				return 'Ventura-US';
1617
1618
			case 'csiso70videotexsupp1':
1619
			case 'isoir70':
1620
			case 'videotexsuppl':
1621
				return 'videotex-suppl';
1622
1623
			case 'csviqr':
1624
			case 'viqr':
1625
				return 'VIQR';
1626
1627
			case 'csviscii':
1628
			case 'viscii':
1629
				return 'VISCII';
1630
1631
			case 'csshiftjis':
1632
			case 'cswindows31j':
1633
			case 'mskanji':
1634
			case 'shiftjis':
1635
			case 'windows31j':
1636
				return 'Windows-31J';
1637
1638
			case 'iso885911':
1639
			case 'tis620':
1640
				return 'windows-874';
1641
1642
			case 'cseuckr':
1643
			case 'csksc56011987':
1644
			case 'euckr':
1645
			case 'isoir149':
1646
			case 'korean':
1647
			case 'ksc5601':
1648
			case 'ksc56011987':
1649
			case 'ksc56011989':
1650
			case 'windows949':
1651
				return 'windows-949';
1652
1653
			case 'windows1250':
1654
				return 'windows-1250';
1655
1656
			case 'windows1251':
1657
				return 'windows-1251';
1658
1659
			case 'cp819':
1660
			case 'csisolatin1':
1661
			case 'ibm819':
1662
			case 'iso88591':
1663
			case 'iso885911987':
1664
			case 'isoir100':
1665
			case 'l1':
1666
			case 'latin1':
1667
			case 'windows1252':
1668
				return 'windows-1252';
1669
1670
			case 'windows1253':
1671
				return 'windows-1253';
1672
1673
			case 'csisolatin5':
1674
			case 'iso88599':
1675
			case 'iso885991989':
1676
			case 'isoir148':
1677
			case 'l5':
1678
			case 'latin5':
1679
			case 'windows1254':
1680
				return 'windows-1254';
1681
1682
			case 'windows1255':
1683
				return 'windows-1255';
1684
1685
			case 'windows1256':
1686
				return 'windows-1256';
1687
1688
			case 'windows1257':
1689
				return 'windows-1257';
1690
1691
			case 'windows1258':
1692
				return 'windows-1258';
1693
1694
			default:
1695
				return $charset;
1696
		}
1697
	}
1698
1699
	public static function get_curl_version()
1700
	{
1701
		if (is_array($curl = curl_version()))
1702
		{
1703
			$curl = $curl['version'];
1704
		}
1705
		elseif (substr($curl, 0, 5) === 'curl/')
1706
		{
1707
			$curl = substr($curl, 5, strcspn($curl, "\x09\x0A\x0B\x0C\x0D", 5));
1708
		}
1709
		elseif (substr($curl, 0, 8) === 'libcurl/')
1710
		{
1711
			$curl = substr($curl, 8, strcspn($curl, "\x09\x0A\x0B\x0C\x0D", 8));
1712
		}
1713
		else
1714
		{
1715
			$curl = 0;
1716
		}
1717
		return $curl;
1718
	}
1719
1720
	/**
1721
	 * Strip HTML comments
1722
	 *
1723
	 * @param string $data Data to strip comments from
1724
	 * @return string Comment stripped string
1725
	 */
1726
	public static function strip_comments($data)
1727
	{
1728
		$output = '';
1729
		while (($start = strpos($data, '<!--')) !== false)
1730
		{
1731
			$output .= substr($data, 0, $start);
1732
			if (($end = strpos($data, '-->', $start)) !== false)
1733
			{
1734
				$data = substr_replace($data, '', 0, $end + 3);
1735
			}
1736
			else
1737
			{
1738
				$data = '';
1739
			}
1740
		}
1741
		return $output . $data;
1742
	}
1743
1744
	public static function parse_date($dt)
1745
	{
1746
		$parser = SimplePie_Parse_Date::get();
1747
		return $parser->parse($dt);
1748
	}
1749
1750
	/**
1751
	 * Decode HTML entities
1752
	 *
1753
	 * @deprecated Use DOMDocument instead
1754
	 * @param string $data Input data
1755
	 * @return string Output data
1756
	 */
1757
	public static function entities_decode($data)
1758
	{
1759
		$decoder = new SimplePie_Decode_HTML_Entities($data);
1760
		return $decoder->parse();
1761
	}
1762
1763
	/**
1764
	 * Remove RFC822 comments
1765
	 *
1766
	 * @param string $data Data to strip comments from
1767
	 * @return string Comment stripped string
1768
	 */
1769
	public static function uncomment_rfc822($string)
1770
	{
1771
		$string = (string) $string;
1772
		$position = 0;
1773
		$length = strlen($string);
1774
		$depth = 0;
1775
1776
		$output = '';
1777
1778
		while ($position < $length && ($pos = strpos($string, '(', $position)) !== false)
1779
		{
1780
			$output .= substr($string, $position, $pos - $position);
1781
			$position = $pos + 1;
1782
			if ($string[$pos - 1] !== '\\')
1783
			{
1784
				$depth++;
1785
				while ($depth && $position < $length)
1786
				{
1787
					$position += strcspn($string, '()', $position);
1788
					if ($string[$position - 1] === '\\')
1789
					{
1790
						$position++;
1791
						continue;
1792
					}
1793
					elseif (isset($string[$position]))
1794
					{
1795
						switch ($string[$position])
1796
						{
1797
							case '(':
1798
								$depth++;
1799
								break;
1800
1801
							case ')':
1802
								$depth--;
1803
								break;
1804
						}
1805
						$position++;
1806
					}
1807
					else
1808
					{
1809
						break;
1810
					}
1811
				}
1812
			}
1813
			else
1814
			{
1815
				$output .= '(';
1816
			}
1817
		}
1818
		$output .= substr($string, $position);
1819
1820
		return $output;
1821
	}
1822
1823
	public static function parse_mime($mime)
1824
	{
1825
		if (($pos = strpos($mime, ';')) === false)
1826
		{
1827
			return trim($mime);
1828
		}
1829
		else
1830
		{
1831
			return trim(substr($mime, 0, $pos));
1832
		}
1833
	}
1834
1835
	public static function atom_03_construct_type($attribs)
1836
	{
1837
		if (isset($attribs['']['mode']) && strtolower(trim($attribs['']['mode']) === 'base64'))
1838
		{
1839
			$mode = SIMPLEPIE_CONSTRUCT_BASE64;
1840
		}
1841
		else
1842
		{
1843
			$mode = SIMPLEPIE_CONSTRUCT_NONE;
1844
		}
1845
		if (isset($attribs['']['type']))
1846
		{
1847
			switch (strtolower(trim($attribs['']['type'])))
1848
			{
1849
				case 'text':
1850
				case 'text/plain':
1851
					return SIMPLEPIE_CONSTRUCT_TEXT | $mode;
1852
1853
				case 'html':
1854
				case 'text/html':
1855
					return SIMPLEPIE_CONSTRUCT_HTML | $mode;
1856
1857
				case 'xhtml':
1858
				case 'application/xhtml+xml':
1859
					return SIMPLEPIE_CONSTRUCT_XHTML | $mode;
1860
1861
				default:
1862
					return SIMPLEPIE_CONSTRUCT_NONE | $mode;
1863
			}
1864
		}
1865
		else
1866
		{
1867
			return SIMPLEPIE_CONSTRUCT_TEXT | $mode;
1868
		}
1869
	}
1870
1871
	public static function atom_10_construct_type($attribs)
1872
	{
1873
		if (isset($attribs['']['type']))
1874
		{
1875
			switch (strtolower(trim($attribs['']['type'])))
1876
			{
1877
				case 'text':
1878
					return SIMPLEPIE_CONSTRUCT_TEXT;
1879
1880
				case 'html':
1881
					return SIMPLEPIE_CONSTRUCT_HTML;
1882
1883
				case 'xhtml':
1884
					return SIMPLEPIE_CONSTRUCT_XHTML;
1885
1886
				default:
1887
					return SIMPLEPIE_CONSTRUCT_NONE;
1888
			}
1889
		}
1890
		return SIMPLEPIE_CONSTRUCT_TEXT;
1891
	}
1892
1893
	public static function atom_10_content_construct_type($attribs)
1894
	{
1895
		if (isset($attribs['']['type']))
1896
		{
1897
			$type = strtolower(trim($attribs['']['type']));
1898
			switch ($type)
1899
			{
1900
				case 'text':
1901
					return SIMPLEPIE_CONSTRUCT_TEXT;
1902
1903
				case 'html':
1904
					return SIMPLEPIE_CONSTRUCT_HTML;
1905
1906
				case 'xhtml':
1907
					return SIMPLEPIE_CONSTRUCT_XHTML;
1908
			}
1909
			if (in_array(substr($type, -4), array('+xml', '/xml')) || substr($type, 0, 5) === 'text/')
1910
			{
1911
				return SIMPLEPIE_CONSTRUCT_NONE;
1912
			}
1913
			else
1914
			{
1915
				return SIMPLEPIE_CONSTRUCT_BASE64;
1916
			}
1917
		}
1918
		else
1919
		{
1920
			return SIMPLEPIE_CONSTRUCT_TEXT;
1921
		}
1922
	}
1923
1924
	public static function is_isegment_nz_nc($string)
1925
	{
1926
		return (bool) preg_match('/^([A-Za-z0-9\-._~\x{A0}-\x{D7FF}\x{F900}-\x{FDCF}\x{FDF0}-\x{FFEF}\x{10000}-\x{1FFFD}\x{20000}-\x{2FFFD}\x{30000}-\x{3FFFD}\x{40000}-\x{4FFFD}\x{50000}-\x{5FFFD}\x{60000}-\x{6FFFD}\x{70000}-\x{7FFFD}\x{80000}-\x{8FFFD}\x{90000}-\x{9FFFD}\x{A0000}-\x{AFFFD}\x{B0000}-\x{BFFFD}\x{C0000}-\x{CFFFD}\x{D0000}-\x{DFFFD}\x{E1000}-\x{EFFFD}!$&\'()*+,;=@]|(%[0-9ABCDEF]{2}))+$/u', $string);
1927
	}
1928
1929
	public static function space_seperated_tokens($string)
1930
	{
1931
		$space_characters = "\x20\x09\x0A\x0B\x0C\x0D";
1932
		$string_length = strlen($string);
1933
1934
		$position = strspn($string, $space_characters);
1935
		$tokens = array();
1936
1937
		while ($position < $string_length)
1938
		{
1939
			$len = strcspn($string, $space_characters, $position);
1940
			$tokens[] = substr($string, $position, $len);
1941
			$position += $len;
1942
			$position += strspn($string, $space_characters, $position);
1943
		}
1944
1945
		return $tokens;
1946
	}
1947
1948
	/**
1949
	 * Converts a unicode codepoint to a UTF-8 character
1950
	 *
1951
	 * @static
1952
	 * @param int $codepoint Unicode codepoint
1953
	 * @return string UTF-8 character
1954
	 */
1955
	public static function codepoint_to_utf8($codepoint)
1956
	{
1957
		$codepoint = (int) $codepoint;
1958
		if ($codepoint < 0)
1959
		{
1960
			return false;
1961
		}
1962
		else if ($codepoint <= 0x7f)
1963
		{
1964
			return chr($codepoint);
1965
		}
1966
		else if ($codepoint <= 0x7ff)
1967
		{
1968
			return chr(0xc0 | ($codepoint >> 6)) . chr(0x80 | ($codepoint & 0x3f));
1969
		}
1970
		else if ($codepoint <= 0xffff)
1971
		{
1972
			return chr(0xe0 | ($codepoint >> 12)) . chr(0x80 | (($codepoint >> 6) & 0x3f)) . chr(0x80 | ($codepoint & 0x3f));
1973
		}
1974
		else if ($codepoint <= 0x10ffff)
1975
		{
1976
			return chr(0xf0 | ($codepoint >> 18)) . chr(0x80 | (($codepoint >> 12) & 0x3f)) . chr(0x80 | (($codepoint >> 6) & 0x3f)) . chr(0x80 | ($codepoint & 0x3f));
1977
		}
1978
		else
1979
		{
1980
			// U+FFFD REPLACEMENT CHARACTER
1981
			return "\xEF\xBF\xBD";
1982
		}
1983
	}
1984
1985
	/**
1986
	 * Similar to parse_str()
1987
	 *
1988
	 * Returns an associative array of name/value pairs, where the value is an
1989
	 * array of values that have used the same name
1990
	 *
1991
	 * @static
1992
	 * @param string $str The input string.
1993
	 * @return array
1994
	 */
1995
	public static function parse_str($str)
1996
	{
1997
		$return = array();
1998
		$str = explode('&', $str);
1999
2000
		foreach ($str as $section)
2001
		{
2002
			if (strpos($section, '=') !== false)
2003
			{
2004
				list($name, $value) = explode('=', $section, 2);
2005
				$return[urldecode($name)][] = urldecode($value);
2006
			}
2007
			else
2008
			{
2009
				$return[urldecode($section)][] = null;
2010
			}
2011
		}
2012
2013
		return $return;
2014
	}
2015
2016
	/**
2017
	 * Detect XML encoding, as per XML 1.0 Appendix F.1
2018
	 *
2019
	 * @todo Add support for EBCDIC
2020
	 * @param string $data XML data
2021
	 * @param SimplePie_Registry $registry Class registry
2022
	 * @return array Possible encodings
2023
	 */
2024
	public static function xml_encoding($data, $registry)
2025
	{
2026
		// UTF-32 Big Endian BOM
2027
		if (substr($data, 0, 4) === "\x00\x00\xFE\xFF")
2028
		{
2029
			$encoding[] = 'UTF-32BE';
2030
		}
2031
		// UTF-32 Little Endian BOM
2032
		elseif (substr($data, 0, 4) === "\xFF\xFE\x00\x00")
2033
		{
2034
			$encoding[] = 'UTF-32LE';
2035
		}
2036
		// UTF-16 Big Endian BOM
2037
		elseif (substr($data, 0, 2) === "\xFE\xFF")
2038
		{
2039
			$encoding[] = 'UTF-16BE';
2040
		}
2041
		// UTF-16 Little Endian BOM
2042
		elseif (substr($data, 0, 2) === "\xFF\xFE")
2043
		{
2044
			$encoding[] = 'UTF-16LE';
2045
		}
2046
		// UTF-8 BOM
2047
		elseif (substr($data, 0, 3) === "\xEF\xBB\xBF")
2048
		{
2049
			$encoding[] = 'UTF-8';
2050
		}
2051
		// UTF-32 Big Endian Without BOM
2052
		elseif (substr($data, 0, 20) === "\x00\x00\x00\x3C\x00\x00\x00\x3F\x00\x00\x00\x78\x00\x00\x00\x6D\x00\x00\x00\x6C")
2053
		{
2054
			if ($pos = strpos($data, "\x00\x00\x00\x3F\x00\x00\x00\x3E"))
2055
			{
2056
				$parser = $registry->create('XML_Declaration_Parser', array(SimplePie_Misc::change_encoding(substr($data, 20, $pos - 20), 'UTF-32BE', 'UTF-8')));
2057
				if ($parser->parse())
2058
				{
2059
					$encoding[] = $parser->encoding;
2060
				}
2061
			}
2062
			$encoding[] = 'UTF-32BE';
2063
		}
2064
		// UTF-32 Little Endian Without BOM
2065
		elseif (substr($data, 0, 20) === "\x3C\x00\x00\x00\x3F\x00\x00\x00\x78\x00\x00\x00\x6D\x00\x00\x00\x6C\x00\x00\x00")
2066
		{
2067
			if ($pos = strpos($data, "\x3F\x00\x00\x00\x3E\x00\x00\x00"))
2068
			{
2069
				$parser = $registry->create('XML_Declaration_Parser', array(SimplePie_Misc::change_encoding(substr($data, 20, $pos - 20), 'UTF-32LE', 'UTF-8')));
2070
				if ($parser->parse())
2071
				{
2072
					$encoding[] = $parser->encoding;
2073
				}
2074
			}
2075
			$encoding[] = 'UTF-32LE';
2076
		}
2077
		// UTF-16 Big Endian Without BOM
2078
		elseif (substr($data, 0, 10) === "\x00\x3C\x00\x3F\x00\x78\x00\x6D\x00\x6C")
2079
		{
2080
			if ($pos = strpos($data, "\x00\x3F\x00\x3E"))
2081
			{
2082
				$parser = $registry->create('XML_Declaration_Parser', array(SimplePie_Misc::change_encoding(substr($data, 20, $pos - 10), 'UTF-16BE', 'UTF-8')));
2083
				if ($parser->parse())
2084
				{
2085
					$encoding[] = $parser->encoding;
2086
				}
2087
			}
2088
			$encoding[] = 'UTF-16BE';
2089
		}
2090
		// UTF-16 Little Endian Without BOM
2091
		elseif (substr($data, 0, 10) === "\x3C\x00\x3F\x00\x78\x00\x6D\x00\x6C\x00")
2092
		{
2093
			if ($pos = strpos($data, "\x3F\x00\x3E\x00"))
2094
			{
2095
				$parser = $registry->create('XML_Declaration_Parser', array(SimplePie_Misc::change_encoding(substr($data, 20, $pos - 10), 'UTF-16LE', 'UTF-8')));
2096
				if ($parser->parse())
2097
				{
2098
					$encoding[] = $parser->encoding;
2099
				}
2100
			}
2101
			$encoding[] = 'UTF-16LE';
2102
		}
2103
		// US-ASCII (or superset)
2104
		elseif (substr($data, 0, 5) === "\x3C\x3F\x78\x6D\x6C")
2105
		{
2106
			if ($pos = strpos($data, "\x3F\x3E"))
2107
			{
2108
				$parser = $registry->create('XML_Declaration_Parser', array(substr($data, 5, $pos - 5)));
2109
				if ($parser->parse())
2110
				{
2111
					$encoding[] = $parser->encoding;
2112
				}
2113
			}
2114
			$encoding[] = 'UTF-8';
2115
		}
2116
		// Fallback to UTF-8
2117
		else
2118
		{
2119
			$encoding[] = 'UTF-8';
2120
		}
2121
		return $encoding;
2122
	}
2123
2124
	public static function output_javascript()
2125
	{
2126
		if (function_exists('ob_gzhandler'))
2127
		{
2128
			ob_start('ob_gzhandler');
2129
		}
2130
		header('Content-type: text/javascript; charset: UTF-8');
2131
		header('Cache-Control: must-revalidate');
2132
		header('Expires: ' . gmdate('D, d M Y H:i:s', time() + 604800) . ' GMT'); // 7 days
2133
		?>
2134
function embed_quicktime(type, bgcolor, width, height, link, placeholder, loop) {
2135
	if (placeholder != '') {
2136
		document.writeln('<embed type="'+type+'" style="cursor:hand; cursor:pointer;" href="'+link+'" src="'+placeholder+'" width="'+width+'" height="'+height+'" autoplay="false" target="myself" controller="false" loop="'+loop+'" scale="aspect" bgcolor="'+bgcolor+'" pluginspage="http://www.apple.com/quicktime/download/"></embed>');
2137
	}
2138
	else {
2139
		document.writeln('<embed type="'+type+'" style="cursor:hand; cursor:pointer;" src="'+link+'" width="'+width+'" height="'+height+'" autoplay="false" target="myself" controller="true" loop="'+loop+'" scale="aspect" bgcolor="'+bgcolor+'" pluginspage="http://www.apple.com/quicktime/download/"></embed>');
2140
	}
2141
}
2142
2143
function embed_flash(bgcolor, width, height, link, loop, type) {
2144
	document.writeln('<embed src="'+link+'" pluginspage="http://www.macromedia.com/go/getflashplayer" type="'+type+'" quality="high" width="'+width+'" height="'+height+'" bgcolor="'+bgcolor+'" loop="'+loop+'"></embed>');
2145
}
2146
2147
function embed_flv(width, height, link, placeholder, loop, player) {
2148
	document.writeln('<embed src="'+player+'" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" quality="high" width="'+width+'" height="'+height+'" wmode="transparent" flashvars="file='+link+'&autostart=false&repeat='+loop+'&showdigits=true&showfsbutton=false"></embed>');
2149
}
2150
2151
function embed_wmedia(width, height, link) {
2152
	document.writeln('<embed type="application/x-mplayer2" src="'+link+'" autosize="1" width="'+width+'" height="'+height+'" showcontrols="1" showstatusbar="0" showdisplay="0" autostart="0"></embed>');
2153
}
2154
		<?php
2155
	}
2156
2157
	/**
2158
	 * Get the SimplePie build timestamp
2159
	 *
2160
	 * Uses the git index if it exists, otherwise uses the modification time
2161
	 * of the newest file.
2162
	 */
2163
	public static function get_build()
2164
	{
2165
		$root = dirname(dirname(__FILE__));
2166
		if (file_exists($root . '/.git/index'))
2167
		{
2168
			return filemtime($root . '/.git/index');
2169
		}
2170
		elseif (file_exists($root . '/SimplePie'))
2171
		{
2172
			$time = 0;
2173
			foreach (glob($root . '/SimplePie/*.php') as $file)
2174
			{
2175
				if (($mtime = filemtime($file)) > $time)
2176
				{
2177
					$time = $mtime;
2178
				}
2179
			}
2180
			return $time;
2181
		}
2182
		elseif (file_exists(dirname(__FILE__) . '/Core.php'))
2183
		{
2184
			return filemtime(dirname(__FILE__) . '/Core.php');
2185
		}
2186
		else
2187
		{
2188
			return filemtime(__FILE__);
2189
		}
2190
	}
2191
2192
	/**
2193
	 * Format debugging information
2194
	 */
2195
	public static function debug(&$sp)
2196
	{
2197
		$info = 'SimplePie ' . SIMPLEPIE_VERSION . ' Build ' . SIMPLEPIE_BUILD . "\n";
2198
		$info .= 'PHP ' . PHP_VERSION . "\n";
2199
		if ($sp->error() !== null)
2200
		{
2201
			$info .= 'Error occurred: ' . $sp->error() . "\n";
2202
		}
2203
		else
2204
		{
2205
			$info .= "No error found.\n";
2206
		}
2207
		$info .= "Extensions:\n";
2208
		$extensions = array('pcre', 'curl', 'zlib', 'mbstring', 'iconv', 'xmlreader', 'xml');
2209
		foreach ($extensions as $ext)
2210
		{
2211
			if (extension_loaded($ext))
2212
			{
2213
				$info .= "    $ext loaded\n";
2214
				switch ($ext)
2215
				{
2216
					case 'pcre':
2217
						$info .= '      Version ' . PCRE_VERSION . "\n";
2218
						break;
2219
					case 'curl':
2220
						$version = curl_version();
2221
						$info .= '      Version ' . $version['version'] . "\n";
2222
						break;
2223
					case 'mbstring':
2224
						$info .= '      Overloading: ' . mb_get_info('func_overload') . "\n";
2225
						break;
2226
					case 'iconv':
2227
						$info .= '      Version ' . ICONV_VERSION . "\n";
2228
						break;
2229
					case 'xml':
2230
						$info .= '      Version ' . LIBXML_DOTTED_VERSION . "\n";
2231
						break;
2232
				}
2233
			}
2234
			else
2235
			{
2236
				$info .= "    $ext not loaded\n";
2237
			}
2238
		}
2239
		return $info;
2240
	}
2241
2242
	public static function silence_errors($num, $str)
2243
	{
2244
		// No-op
2245
	}
2246
}
2247
2248