New files from unstable branch
[fa-stable.git] / admin / inst_lang.php
1 <?php
2 /**********************************************************************
3     Copyright (C) FrontAccounting, LLC.
4         Released under the terms of the GNU General Public License, GPL, 
5         as published by the Free Software Foundation, either version 3 
6         of the License, or (at your option) any later version.
7     This program is distributed in the hope that it will be useful,
8     but WITHOUT ANY WARRANTY; without even the implied warranty of
9     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  
10     See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
11 ***********************************************************************/
12 $page_security = 'SA_CREATELANGUAGE';
13 $path_to_root="..";
14 include_once($path_to_root . "/includes/session.inc");
15
16 include_once($path_to_root."/includes/packages.inc");
17 include_once($path_to_root . "/admin/db/maintenance_db.inc");
18 include_once($path_to_root . "/includes/ui.inc");
19
20 if ($use_popup_windows)
21         $js = get_js_open_window(900, 500);
22
23 page(_($help_context = "Install/Update Languages"), false, false, "", $js);
24
25 simple_page_mode(true);
26
27 //---------------------------------------------------------------------------------------------
28 //
29 // Display all packages - both already installed and available from repository
30 //
31 function display_languages()
32 {
33         global $table_style, $installed_languages, $dflt_lang;
34         
35         $th = array(_("Language"), _("Name"), _("Encoding"), _("Right To Left"),
36                 _("Installed"), _("Available"), _("Default"), "", "");
37         $currlang = $_SESSION["language"]->code;
38
39         div_start('lang_tbl');
40         start_form();
41         //
42         // select/display system locales support for sites using native gettext
43         //
44         if (function_exists('gettext'))
45         {
46                 if (check_value('DisplayAll'))
47                          array_insert($th, 7, _("Supported"));
48                 start_table();
49                 check_row(_('Display also languages not supported by server locales'), 'DisplayAll', null, true);
50                 end_table();
51         }
52
53         start_table(TABLESTYLE);
54         table_header($th);
55
56         $k = 0;
57
58         // get list of all (available and installed) langauges
59         $langs = get_languages_list();
60         foreach ($langs as $pkg_name => $lng)
61         {
62                 if ($lng == 'C') // skip default locale (aka no translation)
63                         continue;
64
65                 $lang = $lng['code'];
66                 $lang_name = $lng['name'];
67                 $charset = $lng['encoding'];
68                 $rtl = @$lng['rtl'] == 'yes' || @$lng['rtl'] === true;
69                 $available = @$lng['available'];
70                 $installed = @$lng['version'];
71                 $id = @$lng['local_id'];
72                 
73                 if ($lang == $currlang)
74                         start_row("class='stockmankobg'");
75                 else
76                         alt_table_row_color($k);
77
78                 $support = $_SESSION['get_text']->check_support($lang, $charset);
79
80                 if (function_exists('gettext') && !$support && !get_post('DisplayAll')) continue;
81
82                 label_cell($lang);
83                 label_cell($available ? get_package_view_str($lang, $lang_name) : $lang_name);
84                 label_cell($charset);
85                 label_cell($rtl ? _("Yes") : _("No"));
86                 
87                 label_cell($id === null ? _("None") :
88                         ($available && $installed ? $installed : _("Unknown")));
89
90                 label_cell($available ? $available : _("None"));
91
92                 label_cell($id === null ? '' :
93                         radio(null, 'CurDflt', $id, $dflt_lang == $lang, true),
94                         "align='center'");
95                 
96                 if (function_exists('gettext') && check_value('DisplayAll'))
97                         label_cell($support ? _("Yes") :_("No"));
98
99                 if (!$available && ($lang != 'C'))      // manually installed language
100                         button_cell('Edit'.$id, _("Edit"), _('Edit non standard language configuration'), 
101                                 ICON_EDIT);
102                 elseif (check_pkg_upgrade($installed, $available)) // outdated or not installed language in repo
103                         button_cell('Update'.$pkg_name, $installed ? _("Update") : _("Install"),
104                                 _('Upload and install latest language package'), ICON_DOWN);
105                 else
106                         label_cell('');
107
108                 if (($id !== null) && ($lang != $currlang) && ($lang != 'C')) {
109                         delete_button_cell('Delete'.$id, _('Delete'));
110                         submit_js_confirm('Delete'.$id, 
111                                 sprintf(_("You are about to remove language \'%s\'.\nDo you want to continue ?"), 
112                                         $lang_name));
113                 } else
114                         label_cell('');
115                 end_row();
116         }
117         end_table();
118         display_note(_("The marked language is the current language which cannot be deleted."), 0, 0, "class='currentfg'");
119         br();
120         submit_center_first('Refresh', _("Update default"), '', null);
121
122         submit_center_last('Add', _("Add new language manually"), '', false);
123
124         end_form();
125         div_end();
126 }
127 //---------------------------------------------------------------------------------------------
128 // Non standard (manually entered) languages support.
129 //
130 function check_data()
131 {
132         global $installed_languages;
133
134         if (get_post('code') == '' || get_post('name') == '' || get_post('encoding') == '') {
135                 display_error(_("Language name, code nor encoding cannot be empty"));
136                 return false;
137         }
138         $id = array_search_value($_POST['code'], $installed_languages, 'code');
139         if ($id !== null && $installed_languages[$id]['package'] != null) {
140                 display_error(_('Standard package for this language is already installed. If you want to install this language manually, uninstall standard language package first.'));
141                 return false;
142         }
143         return true;
144 }
145
146 function handle_submit($id)
147 {
148         global $path_to_root, $installed_languages, $dflt_lang, $Mode;
149
150         if ($_POST['dflt']) {
151                         $dflt_lang = $_POST['code'];
152         }
153         
154         $installed_languages[$id]['code'] = $_POST['code'];
155         $installed_languages[$id]['name'] = $_POST['name'];
156         $installed_languages[$id]['path'] = 'lang/' . $_POST['code'];
157         $installed_languages[$id]['encoding'] = $_POST['encoding'];
158         $installed_languages[$id]['rtl'] = (bool)$_POST['rtl'];
159         $installed_languages[$id]['package'] = '';
160         $installed_languages[$id]['version'] = '';
161         if (!write_lang())
162                 return false;
163         $directory = $path_to_root . "/lang/" . $_POST['code'];
164         if (!file_exists($directory))
165         {
166                 mkdir($directory);
167                 mkdir($directory . "/LC_MESSAGES");
168         }
169         if (is_uploaded_file($_FILES['uploadfile']['tmp_name']))
170         {
171                 $file1 = $_FILES['uploadfile']['tmp_name'];
172                 $file2 = $directory . "/LC_MESSAGES/".$_POST['code'].".po";
173                 if (file_exists($file2))
174                         unlink($file2);
175                 move_uploaded_file($file1, $file2);
176         }
177         if (is_uploaded_file($_FILES['uploadfile2']['tmp_name']))
178         {
179                 $file1 = $_FILES['uploadfile2']['tmp_name'];
180                 $file2 = $directory . "/LC_MESSAGES/".$_POST['code'].".mo";
181                 if (file_exists($file2))
182                         unlink($file2);
183                 move_uploaded_file($file1, $file2);
184         }
185         return true;
186 }
187
188 //---------------------------------------------------------------------------------------------
189
190 function display_language_edit($selected_id)
191 {
192         global $installed_languages, $dflt_lang;
193
194         if ($selected_id == -1)
195                 $n = count($installed_languages);
196         else
197                 $n = $selected_id;
198         
199         start_form(true);
200
201         start_table(TABLESTYLE2);
202
203         if ($selected_id != -1)
204         {
205                 $lang = $installed_languages[$n];
206                 $_POST['code'] = $lang['code'];
207                 $_POST['name']  = $lang['name'];
208                 $_POST['encoding']  = $lang['encoding'];
209                 if (isset($lang['rtl']) && $lang['rtl'] === true)
210                         $_POST['rtl']  = $lang['rtl'];
211                 else
212                         $_POST['rtl'] = false;
213                 $_POST['dflt'] = $dflt_lang == $lang['code'];
214                 hidden('selected_id', $selected_id);
215         }
216         text_row_ex(_("Language Code"), 'code', 20);
217         text_row_ex(_("Language Name"), 'name', 20);
218         text_row_ex(_("Encoding"), 'encoding', 20);
219
220         yesno_list_row(_("Right To Left"), 'rtl', null, "", "", false);
221         yesno_list_row(_("Default Language"), 'dflt', null, "", "", false);
222
223         file_row(_("Language File") . " (PO)", 'uploadfile');
224         file_row(_("Language File") . " (MO)", 'uploadfile2');
225
226         end_table(0);
227         display_note(_("Select your language files from your local harddisk."), 0, 1);
228
229         submit_add_or_update_center(false, '', 'both');
230
231         end_form();
232 }
233
234 function handle_delete($id)
235 {
236         global  $path_to_root, $installed_languages, $dflt_lang;
237
238         $lang = $installed_languages[$id]['code'];
239         if ($installed_languages[$id]['package'])
240                 if (!uninstall_package($installed_languages[$id]['package']))
241                         return;
242                         
243         if ($lang == $dflt_lang ) { 
244                 // on delete set default to current.
245                 $dflt_lang = $_SESSION['language']->code;
246         }
247         
248         unset($installed_languages[$id]);
249         $installed_languages = array_values($installed_languages);
250
251         if (!write_lang())
252                 return;
253
254         $dirname = "$path_to_root/lang/$lang";
255         if ($lang && is_dir($dirname)) {        // remove nonstadard language dir
256                 flush_dir($dirname, true);
257                 rmdir($dirname);
258         }
259 }
260
261 //---------------------------------------------------------------------------------------------
262
263 if ($Mode == 'Delete')
264         handle_delete($selected_id);
265
266 if ($Mode == 'ADD_ITEM' || $Mode == 'UPDATE_ITEM')
267         if (check_data() && handle_submit($selected_id))
268                 $Mode = 'RESET';
269
270 if ($id = find_submit('Update', false))
271         install_language($id);
272
273 if (get_post('_CurDflt_update') || (get_post('Refresh') && get_post('CurDflt', -1) != -1)) {
274         $new_lang = $installed_languages[get_post('CurDflt', 0)]['code'];
275         if ($new_lang != $dflt_lang) {
276                 $dflt_lang = $new_lang;
277                 write_lang();
278                 $Ajax->activate('lang_tbl');
279         }
280 }
281 if (get_post('_DisplayAll_update')) {
282         $Ajax->activate('lang_tbl');
283 }
284         
285 //---------------------------------------------------------------------------------------------
286
287 if (isset($_GET['popup']) || get_post('Add') || $Mode == 'Edit' || $Mode == 'ADD_ITEM' || $Mode == 'UPDATE_ITEM') {
288         display_language_edit($selected_id);
289 } else
290         display_languages();
291
292 //---------------------------------------------------------------------------------------------
293 end_page();
294
295 ?>