6 * Copyright (c) 2003 The SquirrelMail Project Team
7 * Licensed under the GNU GPL. For full terms see the file COPYING.
9 * This file contains cp10006 (MacGreek) decoding function that
10 * is needed to read cp10006 encoded mails in non-cp10006 locale.
12 * Original data taken from:
13 * ftp://ftp.unicode.org/Public/MAPPINGS/VENDORS/MICSFT/MAC/GREEK.TXT
15 * Name: cp10006_MacGreek to Unicode table
16 * Unicode version: 2.0
18 * Table format: Format A
20 * Authors: Lori Brownell <loribr@microsoft.com>
21 * K.D. Chang <a-kchang@microsoft.com>
22 * @package squirrelmail
27 * Decode cp10006 (MacGreek) string
28 * @param string $string String to decode
29 * @return string $string Decoded string
31 function charset_decode_cp10006 ($string) {
32 global $default_charset;
34 if (strtolower($default_charset) == 'x-mac-greek')
37 /* Only do the slow convert if there are 8-bit characters */
38 /* avoid using 0xA0 (\240) in ereg ranges. RH73 does not like that */
39 if (! ereg("[\200-\237]", $string) and ! ereg("[\241-\377]", $string) )
112 "\0xC5" => '≈',
116 "\0xC9" => '…',
123 "\0xD0" => '–',
124 "\0xD1" => '―',
125 "\0xD2" => '“',
126 "\0xD3" => '”',
127 "\0xD4" => '‘',
128 "\0xD5" => '’',
170 "\0xFF" => ''
173 $string = str_replace(array_keys($cp10006), array_values($cp10006), $string);