Search moodle.org's
Developer Documentation

See Release Notes

  • Bug fixes for general core bugs in 3.11.x will end 14 Nov 2022 (12 months plus 6 months extension).
  • Bug fixes for security issues in 3.11.x will end 13 Nov 2023 (18 months plus 12 months extension).
  • PHP version: minimum PHP 7.3.0 Note: minimum PHP version has increased since Moodle 3.10. PHP 7.4.x is supported too.

Differences Between: [Versions 310 and 311] [Versions 311 and 401] [Versions 311 and 402] [Versions 311 and 403] [Versions 39 and 311]

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