--- /dev/null
+<?php
+/**
+ * iso-8859-7 encoding functions
+ *
+ * takes a string of unicode entities and converts it to a iso-8859-7 encoded string
+ * Unsupported characters are replaced with ?.
+ *
+ * @version $Id$
+ * @copyright Copyright © SquirrelMail Development Team, 2004
+ * @package squirrelmail
+ * @subpackage encode
+ */
+
+/**
+ * Converts string to iso-8859-7
+ * @param string $string text with numeric unicode entities
+ * @return string iso-8859-7 encoded text
+ */
+function charset_encode_iso_8859_7 ($string) {
+ // don't run encoding function, if there is no encoded characters
+ if (! preg_match("'&#[0-9]+;'",$string) ) return $string;
+
+ $string=preg_replace("/&#([0-9]+);/e","unicodetoiso88597('\\1')",$string);
+ // $string=preg_replace("/&#[xX]([0-9A-F]+);/e","unicodetoiso88597(hexdec('\\1'))",$string);
+
+ return $string;
+}
+
+/**
+ * Return iso-8859-7 symbol when unicode character number is provided
+ *
+ * This function is used internally by charset_encode_iso_8859_7
+ * function. It might be unavailable to other squirrelmail functions.
+ * Don't use it or make sure, that functions/encode/iso_8859_7.php is
+ * included.
+ *
+ * @param int $var decimal unicode value
+ * @return string iso-8859-7 character
+ */
+function unicodetoiso88597($var) {
+
+ $iso88597chars=array('160' => "\xA0",
+ '163' => "\xA3",
+ '166' => "\xA6",
+ '167' => "\xA7",
+ '168' => "\xA8",
+ '169' => "\xA9",
+ '171' => "\xAB",
+ '172' => "\xAC",
+ '173' => "\xAD",
+ '176' => "\xB0",
+ '177' => "\xB1",
+ '178' => "\xB2",
+ '179' => "\xB3",
+ '183' => "\xB7",
+ '187' => "\xBB",
+ '189' => "\xBD",
+ '900' => "\xB4",
+ '901' => "\xB5",
+ '902' => "\xB6",
+ '904' => "\xB8",
+ '905' => "\xB9",
+ '906' => "\xBA",
+ '908' => "\xBC",
+ '910' => "\xBE",
+ '911' => "\xBF",
+ '912' => "\xC0",
+ '913' => "\xC1",
+ '914' => "\xC2",
+ '915' => "\xC3",
+ '916' => "\xC4",
+ '917' => "\xC5",
+ '918' => "\xC6",
+ '919' => "\xC7",
+ '920' => "\xC8",
+ '921' => "\xC9",
+ '922' => "\xCA",
+ '923' => "\xCB",
+ '924' => "\xCC",
+ '925' => "\xCD",
+ '926' => "\xCE",
+ '927' => "\xCF",
+ '928' => "\xD0",
+ '929' => "\xD1",
+ '931' => "\xD3",
+ '932' => "\xD4",
+ '933' => "\xD5",
+ '934' => "\xD6",
+ '935' => "\xD7",
+ '936' => "\xD8",
+ '937' => "\xD9",
+ '938' => "\xDA",
+ '939' => "\xDB",
+ '940' => "\xDC",
+ '941' => "\xDD",
+ '942' => "\xDE",
+ '943' => "\xDF",
+ '944' => "\xE0",
+ '945' => "\xE1",
+ '946' => "\xE2",
+ '947' => "\xE3",
+ '948' => "\xE4",
+ '949' => "\xE5",
+ '950' => "\xE6",
+ '951' => "\xE7",
+ '952' => "\xE8",
+ '953' => "\xE9",
+ '954' => "\xEA",
+ '955' => "\xEB",
+ '956' => "\xEC",
+ '957' => "\xED",
+ '958' => "\xEE",
+ '959' => "\xEF",
+ '960' => "\xF0",
+ '961' => "\xF1",
+ '962' => "\xF2",
+ '963' => "\xF3",
+ '964' => "\xF4",
+ '965' => "\xF5",
+ '966' => "\xF6",
+ '967' => "\xF7",
+ '968' => "\xF8",
+ '969' => "\xF9",
+ '970' => "\xFA",
+ '971' => "\xFB",
+ '972' => "\xFC",
+ '973' => "\xFD",
+ '974' => "\xFE",
+ '8213' => "\xAF",
+ '8216' => "\xA1",
+ '8217' => "\xA2");
+
+
+ if (array_key_exists($var,$iso88597chars)) {
+ $ret=$iso88597chars[$var];
+ } else {
+ $ret='?';
+ }
+ return $ret;
+}
+?>
\ No newline at end of file
--- /dev/null
+<?php
+/**
+ * iso-8859-9 encoding functions
+ *
+ * takes a string of unicode entities and converts it to a iso-8859-9 encoded string
+ * Unsupported characters are replaced with ?.
+ *
+ * @version $Id$
+ * @copyright Copyright © SquirrelMail Development Team, 2004
+ * @package squirrelmail
+ * @subpackage encode
+ */
+
+/**
+ * Converts string to iso-8859-9
+ * @param string $string text with numeric unicode entities
+ * @return string iso-8859-9 encoded text
+ */
+function charset_encode_iso_8859_9 ($string) {
+ // don't run encoding function, if there is no encoded characters
+ if (! preg_match("'&#[0-9]+;'",$string) ) return $string;
+
+ $string=preg_replace("/&#([0-9]+);/e","unicodetoiso88599('\\1')",$string);
+ // $string=preg_replace("/&#[xX]([0-9A-F]+);/e","unicodetoiso88599(hexdec('\\1'))",$string);
+
+ return $string;
+}
+
+/**
+ * Return iso-8859-9 symbol when unicode character number is provided
+ *
+ * This function is used internally by charset_encode_iso_8859_9
+ * function. It might be unavailable to other squirrelmail functions.
+ * Don't use it or make sure, that functions/encode/iso_8859_9.php is
+ * included.
+ *
+ * @param int $var decimal unicode value
+ * @return string iso-8859-9 character
+ */
+function unicodetoiso88599($var) {
+
+ $iso88599chars=array('160' => "\xA0",
+ '161' => "\xA1",
+ '162' => "\xA2",
+ '163' => "\xA3",
+ '164' => "\xA4",
+ '165' => "\xA5",
+ '166' => "\xA6",
+ '167' => "\xA7",
+ '168' => "\xA8",
+ '169' => "\xA9",
+ '170' => "\xAA",
+ '171' => "\xAB",
+ '172' => "\xAC",
+ '173' => "\xAD",
+ '174' => "\xAE",
+ '175' => "\xAF",
+ '176' => "\xB0",
+ '177' => "\xB1",
+ '178' => "\xB2",
+ '179' => "\xB3",
+ '180' => "\xB4",
+ '181' => "\xB5",
+ '182' => "\xB6",
+ '183' => "\xB7",
+ '184' => "\xB8",
+ '185' => "\xB9",
+ '186' => "\xBA",
+ '187' => "\xBB",
+ '188' => "\xBC",
+ '189' => "\xBD",
+ '190' => "\xBE",
+ '191' => "\xBF",
+ '192' => "\xC0",
+ '193' => "\xC1",
+ '194' => "\xC2",
+ '195' => "\xC3",
+ '196' => "\xC4",
+ '197' => "\xC5",
+ '198' => "\xC6",
+ '199' => "\xC7",
+ '200' => "\xC8",
+ '201' => "\xC9",
+ '202' => "\xCA",
+ '203' => "\xCB",
+ '204' => "\xCC",
+ '205' => "\xCD",
+ '206' => "\xCE",
+ '207' => "\xCF",
+ '209' => "\xD1",
+ '210' => "\xD2",
+ '211' => "\xD3",
+ '212' => "\xD4",
+ '213' => "\xD5",
+ '214' => "\xD6",
+ '215' => "\xD7",
+ '216' => "\xD8",
+ '217' => "\xD9",
+ '218' => "\xDA",
+ '219' => "\xDB",
+ '220' => "\xDC",
+ '223' => "\xDF",
+ '224' => "\xE0",
+ '225' => "\xE1",
+ '226' => "\xE2",
+ '227' => "\xE3",
+ '228' => "\xE4",
+ '229' => "\xE5",
+ '230' => "\xE6",
+ '231' => "\xE7",
+ '232' => "\xE8",
+ '233' => "\xE9",
+ '234' => "\xEA",
+ '235' => "\xEB",
+ '236' => "\xEC",
+ '237' => "\xED",
+ '238' => "\xEE",
+ '239' => "\xEF",
+ '241' => "\xF1",
+ '242' => "\xF2",
+ '243' => "\xF3",
+ '244' => "\xF4",
+ '245' => "\xF5",
+ '246' => "\xF6",
+ '247' => "\xF7",
+ '248' => "\xF8",
+ '249' => "\xF9",
+ '250' => "\xFA",
+ '251' => "\xFB",
+ '252' => "\xFC",
+ '255' => "\xFF",
+ '286' => "\xD0",
+ '287' => "\xF0",
+ '304' => "\xDD",
+ '305' => "\xFD",
+ '350' => "\xDE",
+ '351' => "\xFE");
+
+
+ if (array_key_exists($var,$iso88599chars)) {
+ $ret=$iso88599chars[$var];
+ } else {
+ $ret='?';
+ }
+ return $ret;
+}
+?>
\ No newline at end of file