6 * Copyright (c) 1999-2002 The SquirrelMail Project Team
7 * Licensed under the GNU GPL. For full terms see the file COPYING.
9 * Pick your translator to translate the body of incoming mail messages
14 /* Path for SquirrelMail required files. */
15 define('SM_PATH','../../');
17 /* SquirrelMail required files. */
18 require_once(SM_PATH
. 'include/validate.php');
19 require_once(SM_PATH
. 'functions/strings.php');
20 require_once(SM_PATH
. 'functions/page_header.php');
21 require_once(SM_PATH
. 'functions/display_messages.php');
22 require_once(SM_PATH
. 'functions/imap.php');
23 require_once(SM_PATH
. 'functions/array.php');
24 require_once(SM_PATH
. 'functions/i18n.php');
25 require_once(SM_PATH
. 'include/load_prefs.php');
27 displayPageHeader($color, 'None');
29 if (isset($_POST['submit_translate']) && $_POST['submit_translate'] ) {
30 if (isset($_POST['translate_translate_server'])) {
31 setPref($data_dir, $username, 'translate_server', $_POST['translate_translate_server']);
33 setPref($data_dir, $username, 'translate_server', 'babelfish');
36 if (isset($_POST['translate_translate_location'])) {
37 setPref($data_dir, $username, 'translate_location', $_POST['translate_translate_location']);
39 setPref($data_dir, $username, 'translate_location', 'center');
42 if (isset($_POST['translate_translate_show_read'])) {
43 setPref($data_dir, $username, 'translate_show_read', '1');
45 setPref($data_dir, $username, 'translate_show_read', '');
48 if (isset($_POST['translate_translate_show_send'])) {
49 setPref($data_dir, $username, 'translate_show_send', '1');
51 setPref($data_dir, $username, 'translate_show_send', '');
54 if (isset($_POST['translate_translate_same_window'])) {
55 setPref($data_dir, $username, 'translate_same_window', '1');
57 setPref($data_dir, $username, 'translate_same_window', '');
61 $translate_server = getPref($data_dir, $username, 'translate_server');
62 if ($translate_server == '') {
63 $translate_server = 'babelfish';
65 $translate_location = getPref($data_dir, $username, 'translate_location');
66 if ($translate_location == '') {
67 $translate_location = 'center';
69 $translate_show_read = getPref($data_dir, $username, 'translate_show_read');
70 $translate_show_send = getPref($data_dir, $username, 'translate_show_send');
71 $translate_same_window = getPref($data_dir, $username, 'translate_same_window');
74 function ShowOption($Var, $value, $Desc)
76 $Var = 'translate_' . $Var;
80 echo '<option value="' . $value . '"';
85 echo '>' . $Desc . "</option>\n";
88 function ShowTrad( $tit, $com, $url ) {
90 echo "<li><b>$tit</b> - ".
92 "[ <a href=\"$url\" target=\"_blank\">$tit</a> ]</li>";
97 <table width
="95%" align
=center border
=0 cellpadding
=1 cellspacing
=0><tr
><td bgcolor
="<?php echo $color[0] ?>">
98 <center
><b
><?php
echo _("Options") . ' - '. _("Translator"); ?
></b
></center
>
101 <?php
if (isset($_POST['submit_translate']) && $_POST['submit_translate'] ) {
102 print "<center><h4>"._("Saved Translation Options")."</h4></center>\n";
105 <p
><?php
echo _("Your server options are as follows:"); ?
></p
>
109 ShowTrad( 'Babelfish',
110 _("13 language pairs, maximum of 1000 characters translated, powered by Systran"),
111 'http://babelfish.altavista.com/' );
112 ShowTrad( 'Translator.Go.com',
113 _("10 language pairs, maximum of 25 kilobytes translated, powered by Systran"),
114 'http://translator.go.com/' );
115 ShowTrad( 'Dictionary.com',
116 _("12 language pairs, no known limits, powered by Systran"),
117 'http://www.dictionary.com/translate' );
118 ShowTrad( 'InterTran',
119 _("767 language pairs, no known limits, powered by Translation Experts's InterTran"),
120 'http://www.tranexp.com/' );
121 ShowTrad( 'GPLTrans',
122 _("8 language pairs, no known limits, powered by GPLTrans (free, open source)"),
123 'http://www.translator.cx/' );
128 echo _("You also decide if you want the translation box displayed, and where it will be located.") .
129 "<form action=\"$PHP_SELF\" method=post>".
130 '<table border=0 cellpadding=0 cellspacing=2>'.
131 '<tr><td align=right nowrap>' .
132 _("Select your translator:") .
134 '<td><select name="translate_translate_server">';
136 ShowOption('server', 'babelfish', 'Babelfish');
137 ShowOption('server', 'go', 'Go.com');
138 ShowOption('server', 'dictionary', 'Dictionary.com');
139 ShowOption('server', 'intertran', 'Intertran');
140 ShowOption('server', 'gpltrans', 'GPLTrans');
143 '<tr><td align=right nowrap>' .
146 '<td><input type=checkbox name="translate_translate_show_read"';
147 if ($translate_show_read)
149 echo '> - ' . _("Show translation box") .
150 ' <select name="translate_translate_location">';
151 ShowOption('location', 'left', _("to the left"));
152 ShowOption('location', 'center', _("in the center"));
153 ShowOption('location', 'right', _("to the right"));
154 echo '</select><br>'.
155 '<input type=checkbox name="translate_translate_same_window"';
156 if ($translate_same_window)
158 echo '> - ' . _("Translate inside the SquirrelMail frames").
160 '<tr><td align=right nowrap>'.
161 _("When composing:") . '</td>'.
162 '<td><input type=checkbox name="translate_translate_show_send"';
163 if ($translate_show_send)
165 echo '> - ' . _("Not yet functional, currently does nothing") .
168 '<input type="submit" value="' . _("Submit") . '" name="submit_translate">'.