findDisplayEntity(array(), array('text/plain')); $body = ''; if ($trans_ar[0] != '') { for ($i = 0; $i < count($trans_ar); $i++) { $body .= formatBody($imapConnection, $message, $color, $wrap_at, $trans_ar[$i], $passed_id, $mailbox); } $hookResults = do_hook('message_body', $body); $body = $hookResults[1]; } else { $body = 'Message can\'t be translated'; } $new_body = $body; $pos = strpos($new_body, '">'. _("Download this as a file") . '
'); if (is_int($pos)) { $new_body = substr($new_body, 0, $pos); } $trans = get_html_translation_table(HTML_ENTITIES); $trans[' '] = ' '; $trans = array_flip($trans); $new_body = strtr($new_body, $trans); $new_body = urldecode($new_body); $new_body = strip_tags($new_body); /* I really don't like this next part ... */ $new_body = str_replace('"', "''", $new_body); $new_body = strtr($new_body, "\n", ' '); $function = 'translate_form_' . $translate_server; $function($new_body); } /** Closes translation engine form */ function translate_table_end() { ?> _("Translation Options"), 'url' => '../plugins/translate/options.php', 'desc' => _("Which translator should be used when you get messages in a different language?"), 'js' => false ); } /** gets translation preferences */ function translate_pref() { global $username, $data_dir; global $translate_server, $translate_location; global $translate_show_send, $translate_show_read; global $translate_same_window; $translate_server = getPref($data_dir, $username, 'translate_server'); if ($translate_server == '') { $translate_server = 'babelfish'; } $translate_location = getPref($data_dir, $username, 'translate_location'); if ($translate_location == '') { $translate_location = 'center'; } $translate_show_send = getPref($data_dir, $username, 'translate_show_send'); $translate_show_read = getPref($data_dir, $username, 'translate_show_read'); $translate_same_window = getPref($data_dir, $username, 'translate_same_window'); } /** * This function could be sped up. * It basically negates the process if a ! is found in the beginning and * matches a * at the end with 0 or more characters. */ function translate_does_it_match_language($test) { global $squirrelmail_language; $true = 1; $false = 0; $index = 0; $smindex = 0; if (! $test || ! $squirrelmail_language) { return $false; } if ($test[$index] == '!') { $index ++; $true = 0; $false = 1; } if (($index == 0) && ($test == $squirrelmail_language)) { return $true; } while (isset($test[$index]) && $test[$index]) { if ($test[$index] == '*') { return $true; } if ($test[$index] != $squirrelmail_language[$smindex]) { return $false; } $index ++; $smindex ++; } return $false; } /** creates translation engine language selection */ function translate_lang_opt($from, $to, $value, $text) { global $translate_dir; $ret = ' \n"; return( $ret ); } /** starts translation engine form */ function translate_new_form($action) { global $translate_dir, $translate_new_window, $translate_location; global $color, $translate_same_window; echo '

\n"; ?>

'. 'Babelfish: '; translate_table_end(); } /** * go.com translation engine (disabled) * * @param string $message text that has to be translated * @access private */ function translate_form_go($message) { translate_new_form('http://translator.go.com/cb/trans_entry'); ?> '. "". 'Go.com: '; translate_table_end(); } /** * intertran translation engine * * @param string $message text that has to be translated * @access private */ function translate_form_intertran($message) { translate_new_form('http://intertran.tranexp.com/Translate/result.shtml'); echo ''. ''. ''. ""; $left = '' . translate_lang_opt('pt_BR', '', 'pob', _("Brazilian Portuguese")). translate_lang_opt('bg_BG', '', 'bul', _("Bulgarian") . ' (CP 1251)'). translate_lang_opt('hr_HR', '', 'cro', _("Croatian") . ' (CP 1250)'). translate_lang_opt('cs_CZ', '', 'che', _("Czech") . ' (CP 1250)'). translate_lang_opt('da_DK', '', 'dan', _("Danish")). translate_lang_opt('nl_NL', '', 'dut', _("Dutch")). translate_lang_opt('en_US', '!en', 'eng', _("English")). translate_lang_opt('tl_PH', '', 'tag', _("Filipino (Tagalog)")). translate_lang_opt('fi_FI', '', 'fin', _("Finnish")). translate_lang_opt('fr_FR', '', 'fre', _("French")). translate_lang_opt('de_DE', '', 'ger', _("German")). translate_lang_opt('el_GR', '', 'grk', _("Greek")). translate_lang_opt('hu_HU', '', 'hun', _("Hungarian") . ' (CP 1250)'). translate_lang_opt('is_IS', '', 'ice', _("Icelandic")). translate_lang_opt('it_IT', '', 'ita', _("Italian")). translate_lang_opt('ja_JP', '', 'jpn', _("Japanese") . ' (Shift JIS)'). translate_lang_opt('la', '', 'ltt', _("Latin")). translate_lang_opt('es*', '', 'spl', _("Latin American Spanish")). translate_lang_opt('no*', '', 'nor', _("Norwegian")). translate_lang_opt('pl_PL', '', 'pol', _("Polish") . ' (ISO 8859-2)'). translate_lang_opt('pt*', '', 'poe', _("Portuguese")). translate_lang_opt('ro_RO', '', 'rom', _("Romanian") . ' (CP 1250)'). translate_lang_opt('ru_RU', '', 'rus', _("Russian") . ' (CP 1251)'). translate_lang_opt('sr_YU', '', 'sel', _("Serbian") . ' (CP 1250)'). translate_lang_opt('sl_SI', '', 'slo', _("Slovenian") . ' (CP 1250)'). translate_lang_opt('es_ES', '', 'spa', _("Spanish")). translate_lang_opt('sv_SE', '', 'swe', _("Swedish")). translate_lang_opt('tr_TR', '', 'tur', _("Turkish") . ' (CP 1254)'). translate_lang_opt('cy_GB', '', 'wel', _("Welsh")). ''; $right = ''. translate_lang_opt('', 'pt_BR', 'pob', _("Brazilian Portuguese")). translate_lang_opt('', 'bg_BG', 'bul', _("Bulgarian") . ' (CP 1251)'). translate_lang_opt('', 'hr_HR', 'cro', _("Croatian") . ' (CP 1250)'). translate_lang_opt('', 'cs_CZ', 'che', _("Czech") . ' (CP 1250)'). translate_lang_opt('', 'da_DK', 'dan', _("Danish")). translate_lang_opt('', 'nl_NL', 'dut', _("Dutch")). translate_lang_opt('!en', 'en_US', 'eng', _("English")). translate_lang_opt('', 'tl_PH', 'tag', _("Filipino (Tagalog)")). translate_lang_opt('', 'fi_FI', 'fin', _("Finnish")). translate_lang_opt('', 'fr_FR', 'fre', _("French")). translate_lang_opt('', 'de_DE', 'ger', _("German")). translate_lang_opt('', 'el_GR', 'grk', _("Greek")). translate_lang_opt('', 'hu_HU', 'hun', _("Hungarian") . ' (CP 1250)'). translate_lang_opt('', 'is_IS', 'ice', _("Icelandic")). translate_lang_opt('', 'it_IT', 'ita', _("Italian")). translate_lang_opt('', 'ja_JP', 'jpn', _("Japanese") . ' (Shift JIS)'). translate_lang_opt('', 'la', 'ltt', _("Latin")). translate_lang_opt('', 'es*', 'spl', _("Latin American Spanish")). translate_lang_opt('', 'no*', 'nor', _("Norwegian")). translate_lang_opt('', 'pl_PL', 'pol', _("Polish") . ' (ISO 8859-2)'). translate_lang_opt('', 'pt_PT', 'poe', _("Portuguese")). translate_lang_opt('', 'ro_RO', 'rom', _("Romanian") . ' (CP 1250)'). translate_lang_opt('', 'ru_RU', 'rus', _("Russian") . ' (CP 1251)'). translate_lang_opt('', 'sr_YU', 'sel', _("Serbian") . ' (CP 1250)'). translate_lang_opt('', 'sl_SI', 'slo', _("Slovenian") . ' (CP 1250)'). translate_lang_opt('', 'es_ES', 'spa', _("Spanish")). translate_lang_opt('', 'sv_SE', 'swe', _("Swedish")). translate_lang_opt('', 'tr_TR', 'tur', _("Turkish") . ' (CP 1254)'). translate_lang_opt('', 'cy_GB', 'wel', _("Welsh")). ''; printf( _("%s to %s"), $left, $right ); echo 'InterTran: '; translate_table_end(); } /** * gpltrans translation engine * * @param string $message text that has to be translated * @access private */ function translate_form_gpltrans($message) { translate_new_form('http://www.translator.cx/cgi-bin/gplTrans'); echo ''. translate_lang_opt('', 'nl_NL', 'dutch_dict', _("Dutch")). translate_lang_opt('', 'fr_FR', 'french_dict', _("French")). translate_lang_opt('', 'de_DE', 'german_dict', _("German")). translate_lang_opt('', 'id_ID', 'indonesian_dict', _("Indonesian")). translate_lang_opt('', 'it_IT', 'italian_dict', _("Italian")). translate_lang_opt('', 'la', 'latin_dict', _("Latin")). translate_lang_opt('', 'pt*', 'portuguese_dict', _("Portuguese")). translate_lang_opt('', 'es_ES', 'spanish_dict', _("Spanish")). ''; echo ''; echo ''. _("to English") . ''; echo '' . _("from English") . ''; echo "". 'GPLTrans: '; translate_table_end(); } /** * reference.com (dictionary) translation engine * * @param string $message text that has to be translated * @access private */ function translate_form_dictionary($message) { translate_new_form('http://dictionary.reference.com/translate/text.html'); list($usec, $sec) = explode(" ",microtime()); $time = $sec . (float)$usec*100000000; echo "". "". ''. translate_lang_opt('en_US', 'zh_CN', 'en_zh', sprintf( _("%s to %s"),_("English"),_("Chinese, Simplified"))) . translate_lang_opt('en_US', 'zh_TW', 'en_zt', sprintf( _("%s to %s"),_("English"),_("Chinese, Traditional"))) . translate_lang_opt('en_US', 'nl_NL', 'en_nl', sprintf( _("%s to %s"),_("English"),_("Dutch"))) . translate_lang_opt('en_US', 'fr_FR', 'en_fr', sprintf( _("%s to %s"),_("English"),_("French"))) . translate_lang_opt('en_US', 'de_DE', 'en_ge', sprintf( _("%s to %s"),_("English"),_("German"))) . translate_lang_opt('en_US', 'el_GR', 'en_el', sprintf( _("%s to %s"),_("English"),_("Greek"))) . translate_lang_opt('en_US', 'it_IT', 'en_it', sprintf( _("%s to %s"),_("English"),_("Italian"))) . translate_lang_opt('en_US', 'ja_JP', 'en_ja', sprintf( _("%s to %s"),_("English"),_("Japanese"))) . translate_lang_opt('en_US', 'ko_KR', 'en_ko', sprintf( _("%s to %s"),_("English"),_("Korean"))) . translate_lang_opt('en_US', 'pt*', 'en_pt', sprintf( _("%s to %s"),_("English"),_("Portuguese"))) . translate_lang_opt('en_US', 'ru_RU', 'en_ru', sprintf( _("%s to %s"),_("English"),_("Russian"))) . translate_lang_opt('en_US', 'es_ES', 'en_es', sprintf( _("%s to %s"),_("English"),_("Spanish"))) . translate_lang_opt('zh_CN', '', 'zh_en', sprintf( _("%s to %s"),_("Chinese, Simplified"),_("English"))) . translate_lang_opt('zh_TW', '', 'zt_en', sprintf( _("%s to %s"),_("Chinese, Traditional"),_("English"))) . translate_lang_opt('nl_NL', '', 'nl_en', sprintf( _("%s to %s"),_("Dutch"),_("English"))) . translate_lang_opt('fr_FR', '', 'fr_en', sprintf( _("%s to %s"),_("French"),_("English"))) . translate_lang_opt('de_DE', 'en_US', 'ge_en', sprintf( _("%s to %s"),_("German"),_("English"))) . translate_lang_opt('el_GR', '', 'el_en', sprintf( _("%s to %s"),_("Greek"),_("English"))) . translate_lang_opt('it_IT', '', 'it_en', sprintf( _("%s to %s"),_("Italian"),_("English"))) . translate_lang_opt('ja_JP', '', 'ja_en', sprintf( _("%s to %s"),_("Japanese"),_("English"))) . translate_lang_opt('ko_KR', '', 'ko_en', sprintf( _("%s to %s"),_("Korean"),_("English"))) . translate_lang_opt('pt*', '', 'pt_en', sprintf( _("%s to %s"),_("Portuguese"),_("English"))) . translate_lang_opt('ru_RU', '', 'ru_en', sprintf( _("%s to %s"),_("Russian"),_("English"))) . translate_lang_opt('es_ES', '', 'es_en', sprintf( _("%s to %s"),_("Spanish"),_("English"))) . ''. 'Dictionary.com: '; translate_table_end(); } /** * otenet translation engine * * @param string $message text that has to be translated * @access private */ function translate_form_otenet($message) { translate_new_form('http://trans.otenet.gr/systran/box'); ?> '. 'OTEnet: '; translate_table_end(); } /** * promt translation engine * * @param string $message text that has to be translated * @access private */ function translate_form_promt($message) { translate_new_form('http://www.online-translator.com/text.asp#tr_form'); echo ''; echo ""; echo _("Interface language")." : "; echo "\n"; echo "" . _("English") . "\n"; echo "" . _("Russian") . "\n"; echo "" . _("German") . "\n"; echo "" . _("French") . "\n"; echo "" . _("Spanish") . "\n"; echo " \n"; echo _("Translation direction")." : "; echo ''; echo translate_lang_opt('en_US', 'ru_RU', 'er', sprintf( _("%s to %s"),_("English"),_("Russian"))) . translate_lang_opt('ru_RU', 'en_US', 're', sprintf( _("%s to %s"),_("Russian"),_("English"))) . translate_lang_opt('de_DE', '', 'gr', sprintf( _("%s to %s"),_("German"),_("Russian"))) . translate_lang_opt('ru_RU', 'de_DE', 'rg', sprintf( _("%s to %s"),_("Russian"),_("German"))) . translate_lang_opt('fr_FR', '', 'fr', sprintf( _("%s to %s"),_("French"),_("Russian"))) . translate_lang_opt('ru_RU', 'fr_FR', 'rf', sprintf( _("%s to %s"),_("Russian"),_("French"))) . translate_lang_opt('es_ES', '', 'sr', sprintf( _("%s to %s"),_("Spanish"),_("Russian"))) . translate_lang_opt('ru_RU', 'es_ES', 'rs', sprintf( _("%s to %s"),_("Russian"),_("Spanish"))) . translate_lang_opt('it_IT', '', 'ir', sprintf( _("%s to %s"),_("Italian"),_("Russian"))) . translate_lang_opt('en_US', '', 'eg', sprintf( _("%s to %s"),_("English"),_("German"))) . translate_lang_opt('de_DE', '', 'ge', sprintf( _("%s to %s"),_("German"),_("English"))) . translate_lang_opt('en_US', '', 'es', sprintf( _("%s to %s"),_("English"),_("Spanish"))) . translate_lang_opt('es_ES', '', 'se', sprintf( _("%s to %s"),_("Spanish"),_("English"))) . translate_lang_opt('en_US', '', 'ef', sprintf( _("%s to %s"),_("English"),_("French"))) . translate_lang_opt('fr_FR', '', 'fe', sprintf( _("%s to %s"),_("French"),_("English"))) . translate_lang_opt('en_US', '', 'ep', sprintf( _("%s to %s"),_("English"),_("Portuguese"))); echo " \n"; echo "\n"; echo 'PROMT: '; translate_table_end(); } /** * google translation engine * * @param string $message text that has to be translated * @access private */ function translate_form_google($message) { translate_new_form('http://www.google.com/translate_t'); echo '' . '' . '' . ''; echo ''. translate_lang_opt('en_US', 'de_DE', 'en|de', sprintf( _("%s to %s"),_("English"),_("German"))) . translate_lang_opt('en_US', 'es_ES', 'en|es', sprintf( _("%s to %s"),_("English"),_("Spanish"))) . translate_lang_opt('en_US', 'fr_FR', 'en|fr', sprintf( _("%s to %s"),_("English"),_("French"))) . translate_lang_opt('en_US', 'it_IT', 'en|it', sprintf( _("%s to %s"),_("English"),_("Italian"))) . translate_lang_opt('en_US', 'pt*', 'en|pt', sprintf( _("%s to %s"),_("English"),_("Portuguese"))) . translate_lang_opt('de_DE', 'en_US', 'de|en', sprintf( _("%s to %s"),_("German"),_("English"))) . translate_lang_opt('de_DE', '', 'de|fr', sprintf( _("%s to %s"),_("German"),_("French"))) . translate_lang_opt('es_ES', '', 'es|en', sprintf( _("%s to %s"),_("Spanish"),_("English"))) . translate_lang_opt('fr_FR', '', 'fr|en', sprintf( _("%s to %s"),_("French"),_("English"))) . translate_lang_opt('fr_FR', '', 'fr|de', sprintf( _("%s to %s"),_("French"),_("German"))) . translate_lang_opt('it_IT', '', 'it|en', sprintf( _("%s to %s"),_("Italian"),_("English"))) . translate_lang_opt('pt*', '', 'pt|en', sprintf( _("%s to %s"),_("Portuguese"),_("English"))); echo ''. 'Google: '; translate_table_end(); } ?>