home *** CD-ROM | disk | FTP | other *** search
/ HTML Examples / WP.iso / wordpress / wp-includes / SimplePie / Misc.php < prev    next >
Encoding:
PHP Script  |  2013-07-08  |  50.3 KB  |  2,248 lines
  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.