functions/decode/iso_8859_6.php

   1 <?php
   2 /**
   3  * decode/iso8859-6.php
   4  *
   5  * Copyright (c) 2003-2004 The SquirrelMail Project Team
   6  * Licensed under the GNU GPL. For full terms see the file COPYING.
   7  *
   8  * This file contains iso-8859-6 decoding function that is needed to read
   9  * iso-8859-6 encoded mails in non-iso-8859-6 locale.
  10  *
  11  * Original data taken from:
  12  *  ftp://ftp.unicode.org/Public/MAPPINGS/ISO8859/8859-6.TXT
  13  *
  14  *   Name:             ISO 8859-6:1999 to Unicode
  15  *   Unicode version:  3.0
  16  *   Table version:    1.0
  17  *   Table format:     Format A
  18  *   Date:             1999 July 27
  19  *   Authors:          Ken Whistler <kenw@sybase.com>
  20  *
  21  * Original copyright:
  22  *  Copyright (c) 1999 Unicode, Inc.  All Rights reserved.
  23  *
  24  *  This file is provided as-is by Unicode, Inc. (The Unicode Consortium).
  25  *  No claims are made as to fitness for any particular purpose.  No
  26  *  warranties of any kind are expressed or implied.  The recipient
  27  *  agrees to determine applicability of information provided.  If this
  28  *  file has been provided on optical media by Unicode, Inc., the sole
  29  *  remedy for any claim will be exchange of defective media within 90
  30  *  days of receipt.
  31  *
  32  *  Unicode, Inc. hereby grants the right to freely use the information
  33  *  supplied in this file in the creation of products supporting the
  34  *  Unicode Standard, and to make copies of this file in any form for
  35  *  internal or external distribution as long as this notice remains
  36  *  attached.
  37  *
  38  * @version $Id$
  39  * @package squirrelmail
  40  * @subpackage decode
  41  */
  42
  43 /**
  44  * Decode iso8859-6 strings
  45  * @param string $string Encoded string
  46  * @return string $string Decoded string
  47  */
  48 function charset_decode_iso_8859_6 ($string) {
  49     global $default_charset;
  50
  51     if (strtolower($default_charset) == 'iso-8859-6')
  52         return $string;
  53
  54     // don't do decoding when there are no 8bit symbols
  55     if (! sq_is8bit($string,'iso-8859-6'))
  56         return $string;
  57
  58     $iso8859_6 = array(
  59         "\xA0" => '&#160;',
  60         "\xA4" => '&#164;',
  61         "\xAC" => '&#1548;',
  62         "\xAD" => '&#173;',
  63         "\xBB" => '&#1563;',
  64         "\xBF" => '&#1567;',
  65         "\xC1" => '&#1569;',
  66         "\xC2" => '&#1570;',
  67         "\xC3" => '&#1571;',
  68         "\xC4" => '&#1572;',
  69         "\xC5" => '&#1573;',
  70         "\xC6" => '&#1574;',
  71         "\xC7" => '&#1575;',
  72         "\xC8" => '&#1576;',
  73         "\xC9" => '&#1577;',
  74         "\xCA" => '&#1578;',
  75         "\xCB" => '&#1579;',
  76         "\xCC" => '&#1580;',
  77         "\xCD" => '&#1581;',
  78         "\xCE" => '&#1582;',
  79         "\xCF" => '&#1583;',
  80         "\xD0" => '&#1584;',
  81         "\xD1" => '&#1585;',
  82         "\xD2" => '&#1586;',
  83         "\xD3" => '&#1587;',
  84         "\xD4" => '&#1588;',
  85         "\xD5" => '&#1589;',
  86         "\xD6" => '&#1590;',
  87         "\xD7" => '&#1591;',
  88         "\xD8" => '&#1592;',
  89         "\xD9" => '&#1593;',
  90         "\xDA" => '&#1594;',
  91         "\xE0" => '&#1600;',
  92         "\xE1" => '&#1601;',
  93         "\xE2" => '&#1602;',
  94         "\xE3" => '&#1603;',
  95         "\xE4" => '&#1604;',
  96         "\xE5" => '&#1605;',
  97         "\xE6" => '&#1606;',
  98         "\xE7" => '&#1607;',
  99         "\xE8" => '&#1608;',
 100         "\xE9" => '&#1609;',
 101         "\xEA" => '&#1610;',
 102         "\xEB" => '&#1611;',
 103         "\xEC" => '&#1612;',
 104         "\xED" => '&#1613;',
 105         "\xEE" => '&#1614;',
 106         "\xEF" => '&#1615;',
 107         "\xF0" => '&#1616;',
 108         "\xF1" => '&#1617;',
 109         "\xF2" => '&#1618;'
 110     );
 111
 112     $string = str_replace(array_keys($iso8859_6), array_values($iso8859_6), $string);
 113
 114     return $string;
 115 }
 116 ?>