locale.module 21.9 KB
Newer Older
Dries's avatar
   
Dries committed
1
<?php
2
// $Id$
Dries's avatar
 
Dries committed
3

Dries's avatar
   
Dries committed
4
5
6
7
8
9
10
11
12
13
14
/**
 * @file
 * Enables administrators to manage the site interface languages.
 *
 * When enabled, the site interface can be displayed in different
 * languages. The setup of languages and translations is completely
 * we based. Gettext portable object files are supported.
 */

// ---------------------------------------------------------------------------------
// Hook implementations (needed on all page loads)
Dries's avatar
   
Dries committed
15

Dries's avatar
   
Dries committed
16
17
18
/**
 * Implementation of hook_help().
 */
Dries's avatar
   
Dries committed
19
function locale_help($section = "admin/help#locale") {
Dries's avatar
   
Dries committed
20
  switch ($section) {
Dries's avatar
   
Dries committed
21
22
23
24
25
26
27
28
    case 'admin/modules#description':
      return t('Enables the translation of the user interface to languages other than English.');
    case 'admin/locale':
    case 'admin/locale/language/overview':
      return t("<p>Drupal allows you to translate the interface to a language other than English. This page provides an overview of the installed languages. You can add more languages on the <a href=\"%add-language\">add language page</a>, or directly by <a href=\"%import\">importing a translation</a>. If there are multiple languages enabled, registered users will be able to set their preference. The site default will be used for users without their own settings, including anonymous visitors.</p><p>There are different approaches to translate the Drupal interface: either by <a href=\"%import\">importing</a> an existing translation, by <a href=\"%search\">translating everything</a> yourself, or by using a combination of these.</p>", array("%search" => url("admin/locale/string/search"), "%import" => url("admin/locale/language/import"), "%add-language" => url("admin/locale/language/add")));
    case 'admin/locale/language/add':
      return t("<p>You need to add all languages you would like to provide the site interface in. If you can't find the desired language in the quick add dropdown, then need to provide the proper language code yourself. The language code might be used to negotiate with browsers and present flags, so it is important to pick one that is standardised for the desired language. You can also add languages by <a href=\"%import\">importing translations</a> directly into a language not yet set up.</p>", array("%import" => url("admin/locale/language/import")));
    case 'admin/locale/language/import':
Dries's avatar
   
Dries committed
29
      return t("<p>This page allows you to import a translation provided in the gettext Portable Object (.po) format.  The easiest way to get your site translated is to grab an existing Drupal translation and to import it.  You can obtain translations from the <a href=\"%url\">Drupal translation page</a>. Note that importing a translation file might take a while.</p>", array('%url' => 'http://drupal.org/translations'));
Dries's avatar
   
Dries committed
30
31
32
33
    case 'admin/locale/language/export':
      return t("<p>This page allows you to export Drupal strings. The first option is to export a translation so it can be shared. The second option is to generate a translation template, which contains all Drupal strings, but without their translations. You can use this template to start a new translation using a specialized desktop application.</p>");
    case 'admin/locale/string/search':
      return t("<p>It is often more convinient to get the strings of your setup on the <a href=\"%export\">export page</a>, and start with a desktop Gettext translation editor though. Here you can search in the translated and untranslated strings, and the default English texts provided by Drupal.</p>", array("%export" => url("admin/locale/language/export")));
Dries's avatar
   
Dries committed
34

Dries's avatar
   
Dries committed
35
    case 'admin/help#locale':
Dries's avatar
   
Dries committed
36
      return t("
Dries's avatar
   
Dries committed
37
38
39
40
41
      <p>Most programs are written and documented in English, and primarily use English to interact with users. This is also true for a great deal of web sites. However, most people are less comfortable with English than with their native language, and would prefer to use their mother tongue as much as possible. Many people love to see their web site showing a lot less English, and far more of their own language. Therefore Drupal provides a framework to setup a multi-lingual web site, or to overwrite the default English texts.</p>
      <h3>How to interface translation works</h3>
      <p>Whenever Drupal encounters an interface string which needs to be displayed, it tries to translate it into the currently selected language. If a translation is not available, then the string is remembered, so you can look up untranslated strings easily.</p>
      <p>Drupal provides two options to translate these strings. First is the integrated web interface, where you can search for untranslated strings, and specify their translations via simple web forms. An easier, and much less time consuming method is to import translations already done for your language. This is achieved by the use of GNU gettext Portable Object files. These are editable with quite convinient desktop editors specifically architected for supporting your work with GNU Gettext files. The import feature allows you to add strings from such files into the site database. The export functionality enables you to share your translations with others, generating Portable Object files from your site strings.");
      break;
Dries's avatar
   
Dries committed
42

Dries's avatar
   
Dries committed
43
44
45
      // TODO: integrate a rewritten version of this help into the big help screen above
      /*
      "<p>To translate strings start at the <a href=\"%search\">search</a> page of the locale section in the administration pages. There you will see a list of the languages you have configured. Choose the appropriate settings and search for the strings you want to translate.</p>
Dries's avatar
   
Dries committed
46
      <p>At the locale page, users with the proper access rights will see the various texts that need translation on the left column of the table.</p>
Dries's avatar
   
Dries committed
47
      <p>Below the text you can see an example URI where this text shows up one your site or a file and the line number in the source code.  Chances are most of these texts will be used and displayed on more than one page, though only one example URI is presented.</p>
Dries's avatar
   
Dries committed
48
49
50
      <p>The second column displays the supported languages as defined in the configuration file.  See below for more information on how to support new languages.  If the symbol for a language is seen like <strike>this</strike>, it means that this entry still needs to be translated into that language.  If not, it has been translated already.</p>
      <p>To add or change a translation click the \"edit locale\" link in the third column, the \"operations\" column.  You'll be presented the original text and fields for translation in the supported languages.  Enter the translations and confirm by clicking the \"Save translations\" button.  The translations need not be accurate; they are for your site so you can choose what to show to your users.</p>
      <p>To delete a translation, click the \"delete locale\" link at the overview page and the translation will be immediately deleted without confirmation.  Deleting translations is convenient for removing texts that belonged to an obsolete module.</p>
Dries's avatar
   
Dries committed
51
52
53
54
55
56
57
58
      <p>In some texts special strings such as \"%a\" and \"%b\" show up.  Those get replaced by some string at run-time when Drupal dynamically generate pages.  You can find out which string this is by looking at the page where the text appears.  This is where the above mentioned URI and code line numbers can come in handy.</p>
      <h3>Uploading PO files</h3>
      <p>PO files are files containing translations as used by <a href=\"%gettext\">GNU gettext</a>.</p>
      <p>The Drupal project distributes user contributed PO files in a number of languages. These files can be obtained from the <a href=\"%translations\">Drupal translations</a> home page.</p>
      <p>If you want to provide a PO file for a not yet supported language or update an existing PO files, read about it in the <a href=\"%handbook\">Drupal handbook</a> home page.</p>
      <p>Once you got the appropriate PO file, all you have to do is to add the locale and upload it from the <a href=\"%addlocale\">manage locale</a> screen.</p>
      <p>Note that uploading and parsing the uploaded file can take quite some time, depending on the connection to the server and the server's power.</p>
       ", array("%search" => url("admin/locale/string/search"), "%addlocale" => url("admin/locale/languages/add"), "%translations" => 'http://www.Drupal.org/translations/', "%handbook" => 'http://www.Drupal.org/handbook/po-files', "%gettext" => 'http://www.gnu.org/software/gettext/gettext.html'));*/
Dries's avatar
   
Dries committed
59
  }
Dries's avatar
   
Dries committed
60
61
}

Dries's avatar
   
Dries committed
62
/**
Dries's avatar
   
Dries committed
63
 * Implementation of hook_menu().
Dries's avatar
   
Dries committed
64
 */
Dries's avatar
   
Dries committed
65
function locale_menu() {
Dries's avatar
   
Dries committed
66

Dries's avatar
   
Dries committed
67
68
  $items = array();
  $access = user_access('administer locales');
Dries's avatar
   
Dries committed
69

Dries's avatar
   
Dries committed
70
  // Main admin menu item
Dries's avatar
   
Dries committed
71
  $items[] = array('path' => 'admin/locale', 'title' => t('localization'),
Dries's avatar
   
Dries committed
72
    'callback' => 'locale_admin_manage', 'access' => $access);
Dries's avatar
   
Dries committed
73

Dries's avatar
   
Dries committed
74
75
76
77
78
79
  // Top level tabs
  $items[] = array('path' => 'admin/locale/language', 'title' => t('manage languages'),
    'access' => $access, 'weight' => -10, 'type' => MENU_DEFAULT_LOCAL_TASK);
  $items[] = array('path' => 'admin/locale/string/search', 'title' => t('manage strings'),
    'callback' => 'locale_admin_string', 'access' => $access, 'weight' => 10,
    'type' => MENU_LOCAL_TASK);
Dries's avatar
   
Dries committed
80

Dries's avatar
   
Dries committed
81
82
83
84
85
86
87
88
89
90
91
92
93
  // Manage languages subtabs
  $items[] = array('path' => 'admin/locale/language/overview', 'title' => t('list'),
    'callback' => 'locale_admin_manage', 'access' => $access, "weight" => 0,
    'type' => MENU_DEFAULT_LOCAL_TASK);
  $items[] = array('path' => 'admin/locale/language/add', 'title' => t('add language'),
    'callback' => 'locale_admin_manage_add', 'access' => $access, "weight" => 5,
    'type' => MENU_LOCAL_TASK);
  $items[] = array('path' => 'admin/locale/language/import', 'title' => t('import'),
    'callback' => 'locale_admin_import', 'access' => $access, 'weight' => 10,
    'type' => MENU_LOCAL_TASK);
  $items[] = array('path' => 'admin/locale/language/export', 'title' => t('export'),
    'callback' => 'locale_admin_export', 'access' => $access, 'weight' => 20,
    'type' => MENU_LOCAL_TASK);
Dries's avatar
   
Dries committed
94

Dries's avatar
   
Dries committed
95
96
97
  // Language related callbacks
  $items[] = array('path' => 'admin/locale/language/delete', 'title' => t('confirm'),
    'callback' => 'locale_admin_manage_delete_screen', 'access' => $access,
Dries's avatar
   
Dries committed
98
    'type' => MENU_CALLBACK);
Dries's avatar
   
Dries committed
99

Dries's avatar
   
Dries committed
100
101
102
103
104
  // String related callbacks
  $items[] = array('path' => 'admin/locale/string/edit', 'title' => t('edit'),
    'callback' => 'locale_admin_string', 'access' => $access, 'type' => MENU_CALLBACK);
  $items[] = array('path' => 'admin/locale/string/delete', 'title' => t('delete'),
    'callback' => 'locale_admin_string', 'access' => $access, 'type' => MENU_CALLBACK);
Dries's avatar
   
Dries committed
105
  return $items;
Dries's avatar
   
Dries committed
106
107
}

Dries's avatar
   
Dries committed
108
/**
Dries's avatar
   
Dries committed
109
 * Implementation of hook_perm().
Dries's avatar
   
Dries committed
110
 */
Dries's avatar
   
Dries committed
111
112
113
114
115
116
117
118
119
120
121
122
123
124
function locale_perm() {
  return array('administer locales');
}

/**
 * Implementation of hook_user().
 */
function locale_user($type, $edit, &$user, $category = NULL) {
  $languages = locale_supported_languages();
  if ($type == 'form' && $category == 'account' && count($languages['name']) > 1) {
    if ($user->language == '') {
      $user->language = key($languages['name']);
    }
    return array(array('title' => t('Interface language settings'), 'data' => form_radios(t("Language"), 'language', $user->language, $languages['name'], t("Selecting a different locale will change the interface language of the site."))));
Dries's avatar
   
Dries committed
125
126
127
  }
}

Dries's avatar
   
Dries committed
128
129
// ---------------------------------------------------------------------------------
// Locale core functionality (needed on all page loads)
Dries's avatar
   
Dries committed
130

Dries's avatar
   
Dries committed
131
132
133
134
135
136
137
138
/**
 * Provides interface translation services
 *
 * This function is called from t() to translate a string if needed.
 */
function locale($string) {
  global $locale;
  static $locale_t;
Dries's avatar
   
Dries committed
139

Dries's avatar
   
Dries committed
140
141
142
  // Store database cached translations in a static var
  if (!isset($locale_t)) {
    $cache = cache_get("locale:$locale");
Dries's avatar
   
Dries committed
143

Dries's avatar
   
Dries committed
144
145
146
147
148
    if ($cache == 0) {
      locale_refresh_cache();
      $cache = cache_get("locale:$locale");
    }
    $locale_t = unserialize($cache->data);
Dries's avatar
   
Dries committed
149
150
  }

Dries's avatar
   
Dries committed
151
152
153
154
155
  // We have the translation cached (if it is TRUE, then there is no
  // translation, so there is no point in checking the database)
  if (isset($locale_t[$string])) {
    $string = ($locale_t[$string] === TRUE ? $string : $locale_t[$string]);
  }
Dries's avatar
   
Dries committed
156

Dries's avatar
   
Dries committed
157
158
159
160
161
162
163
164
  // We don't have this translation cached, so get it from the DB
  else {
    $result = db_query("SELECT s.lid, t.translation FROM {locales_source} s INNER JOIN {locales_target} t ON s.lid = t.lid WHERE s.source = '%s' AND t.locale = '%s'", $string, $locale);
    // Translation found
    if ($trans = db_fetch_object($result)) {
      if (!empty($trans->translation)) {
        $locale_t[$string] = $trans->translation;
        $string = $trans->translation;
165
      }
Dries's avatar
   
Dries committed
166
    }
Dries's avatar
   
Dries committed
167

Dries's avatar
   
Dries committed
168
169
170
171
172
173
174
175
176
177
    // Either we have no such source string, or no translation
    else {
      $result = db_query("SELECT lid, source FROM {locales_source} WHERE source = '%s'", $string);
      // We have no such translation
      if ($obj = db_fetch_object($result)) {
        if ($locale) {
          db_query("INSERT INTO {locales_target} (lid, locale) VALUES (%d, '%s')", $obj->lid, $locale);
        }
      }
      // We have no such source string
178
      else {
Dries's avatar
   
Dries committed
179
180
        db_query("INSERT INTO {locales_source} (location, source) VALUES ('%s', '%s')", request_uri(), $string);
        if ($locale) {
181
          $lid = db_fetch_object(db_query("SELECT lid FROM {locales_source} WHERE source = '%s'", $string));
Dries's avatar
   
Dries committed
182
183
          db_query("INSERT INTO {locales_target} (lid, locale) VALUES (%d, '%s')", $lid->lid, $locale);
        }
184
      }
Dries's avatar
   
Dries committed
185
186
      // Clear locale cache in DB
      cache_clear_all("locale:$locale");
Dries's avatar
   
Dries committed
187
    }
Dries's avatar
   
Dries committed
188
189
  }

Dries's avatar
   
Dries committed
190
191
  return $string;
}
Dries's avatar
   
Dries committed
192

Dries's avatar
   
Dries committed
193
194
195
196
197
198
199
/**
 * Refreshes database stored cache of translations
 *
 * We only store short strings to improve performance and consume less memory.
 */
function locale_refresh_cache() {
  $languages = locale_supported_languages();
Dries's avatar
   
Dries committed
200

Dries's avatar
   
Dries committed
201
202
203
204
  foreach (array_keys($languages['name']) as $locale) {
    $result = db_query("SELECT s.source, t.translation, t.locale FROM {locales_source} s INNER JOIN {locales_target} t ON s.lid = t.lid WHERE t.locale = '%s' AND LENGTH(s.source) < 75", $locale);
    while ($data = db_fetch_object($result)) {
      $t[$data->source] = (empty($data->translation) ? TRUE : $data->translation);
Dries's avatar
   
Dries committed
205
    }
Dries's avatar
   
Dries committed
206
    cache_set("locale:$locale", serialize($t));
Dries's avatar
   
Dries committed
207
208
209
  }
}

Dries's avatar
   
Dries committed
210
211
212
213
214
215
216
217
218
/**
 * Returns list of languages supported on this site
 *
 * @param $reset Refresh cached language list
 * @param $getall Return all languages (even disabled ones)
 */
function locale_supported_languages($reset = FALSE, $getall = FALSE) {
  static $enabled = NULL;
  static $all = NULL;
Dries's avatar
   
Dries committed
219

Dries's avatar
   
Dries committed
220
221
  if ($reset) {
    unset($enabled); unset($all);
Dries's avatar
   
Dries committed
222
223
  }

Dries's avatar
   
Dries committed
224
225
226
227
228
229
  if (is_null($enabled)) {
    $enabled = $all = array();
    $all['name'] = $all['formula'] = $enabled['name'] = $enabled['formula'] = array();
    $result = db_query('SELECT locale, name, formula, enabled FROM {locales_meta} ORDER BY isdefault DESC, enabled DESC, name ASC');
    while ($row = db_fetch_object($result)) {
      $all['name'][$row->locale] = $row->name;
Dries's avatar
   
Dries committed
230
      $all['formula'][$row->locale] = $row->formula;
Dries's avatar
   
Dries committed
231
232
233
      if ($row->enabled) {
        $enabled['name'][$row->locale] = $row->name;
        $enabled['formula'][$row->locale] = $row->formula;
234
235
      }
    }
Kjartan's avatar
Kjartan committed
236
  }
Dries's avatar
   
Dries committed
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
  return $getall ? $all : $enabled;
}

/**
 * Returns plural form index for a specific number
 *
 * The index is computed from the formula of this language
 */
function locale_get_plural($count) {
  global $locale;
  static $locale_formula, $plurals = array();

  if (!isset($plurals[$count])) {
    if (!isset($locale_formula)) {
      $languages = locale_supported_languages();
      $locale_formula = $languages['formula'][$locale];
    }
    if ($locale_formula) {
      $n = $count;
      $plurals[$count] = @eval("return intval($locale_formula);");
      return $plurals[$count];
    }
    else {
      $plurals[$count] = -1;
      return -1;
262
    }
Dries's avatar
   
Dries committed
263
  }
Dries's avatar
   
Dries committed
264
  return $plurals[$count];
265
}
Dries's avatar
   
Dries committed
266

Dries's avatar
   
Dries committed
267
268
// ---------------------------------------------------------------------------------
// Language management functionality (admininstration only)
Dries's avatar
   
Dries committed
269

Dries's avatar
   
Dries committed
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
/**
 * Page handler for the language management screen
 */
function locale_admin_manage() {
  include_once 'includes/locale.inc';
  $edit = &$_POST['edit'];

  switch ($_POST['op']) {
    // Save changes to existing languages
    case t('Save configuration'):
      $languages = locale_supported_languages(FALSE, TRUE);
      foreach($languages['name'] as $key => $value) {
        if ($edit['sitedefault'] == $key) {
          $edit['enabled'][$key] = 1; // autoenable the default language
        }
        if ($key == 'en') {
          // Disallow name change for English locale
          db_query("UPDATE {locales_meta} SET isdefault = %d, enabled = %d WHERE locale = 'en'", ($edit['sitedefault'] == $key), $edit['enabled'][$key]);
Dries's avatar
   
Dries committed
288
289
        }
        else {
Dries's avatar
   
Dries committed
290
          db_query("UPDATE {locales_meta} SET name = '%s', isdefault = %d, enabled = %d WHERE locale = '%s'", $edit['name'][$key], ($edit['sitedefault'] == $key), $edit['enabled'][$key], $key);
Dries's avatar
   
Dries committed
291
292
        }
      }
Dries's avatar
   
Dries committed
293
      break;
Dries's avatar
   
Dries committed
294

Dries's avatar
   
Dries committed
295
296
297
298
299
300
    // Remove existing language
    case t('Delete'):
      $languages = locale_supported_languages(FALSE, TRUE);
      if (isset($languages['name'][$edit['langcode']])) {
        db_query("DELETE FROM {locales_meta} WHERE locale = '%s'", $edit['langcode']);
        db_query("DELETE FROM {locales_target} WHERE locale = '%s'", $edit['langcode']);
Dries's avatar
   
Dries committed
301
302
        drupal_set_message(t('%locale language removed.', array('%locale' => '<em>'. t($languages['name'][$edit['langcode']]) .'</em>')));
        watchdog('locale', t('%locale language removed.', array('%locale' => '<em>'. $edit['langcode'] .'</em>')));
Dries's avatar
   
Dries committed
303
304
305
306
307
      }
      break;
  }
  print theme('page', _locale_admin_manage_screen());
}
Dries's avatar
   
Dries committed
308

Dries's avatar
   
Dries committed
309
310
311
312
313
314
/**
 * User interface for the language deletion confirmation screen
 */
function locale_admin_manage_delete_screen() {
  include_once 'includes/locale.inc';
  $langcode = arg(4);
Dries's avatar
   
Dries committed
315

Dries's avatar
   
Dries committed
316
317
318
319
320
  // Do not allow deletion of English locale
  if ($langcode == 'en') {
    drupal_goto('admin/locale/language/overview');
    return;
  }
Dries's avatar
   
Dries committed
321

Dries's avatar
   
Dries committed
322
323
324
325
326
327
328
  // For other locales, warn user that data loss is ahead
  $form = form_hidden('langcode', $langcode);
  $form .= form_submit(t('Delete'));
  $form .= form_submit(t('Cancel'));
  $languages = locale_supported_languages(FALSE, TRUE);
  print theme('page', form(form_item(t("Delete language '%name'", array('%name' => t($languages['name'][$langcode]))), $form, t('Are you sure you want to delete the language and all data associated with it?')), 'POST', url('admin/locale/language/overview')));
}
Dries's avatar
   
Dries committed
329

Dries's avatar
   
Dries committed
330
331
332
333
334
335
336
337
338
339
340
341
/**
 * Page handler for the language addition screen
 */
function locale_admin_manage_add() {
  include_once 'includes/locale.inc';
  $edit = &$_POST['edit'];
  $isocodes = _locale_get_iso639_list();

  switch ($_POST['op']) {
    // Try to add new language
    case t('Add language'):
      // Check for duplicates
Dries's avatar
   
Dries committed
342
      if (db_num_rows(db_query("SELECT locale FROM {locales_meta} WHERE locale = '%s'", $edit['langcode'])) == 0) {
Dries's avatar
   
Dries committed
343
344
345
346
347
348
349
350
351
352
353
354

        // Set language name from the available list if needed
        if ($edit['langcode'] && !$edit['langname'] && isset($isocodes[$edit['langcode']])) {
          _locale_add_language($edit['langcode'], $isocodes[$edit['langcode']][0]);
          drupal_goto('admin/locale');
        }

        // Add language, if we have the details
        elseif ($edit['langcode'] && $edit['langname']) {
          _locale_add_language($edit['langcode'], $edit['langname']);
          drupal_goto('admin/locale');
        }
355

Dries's avatar
   
Dries committed
356
357
        // Seems like we have not received some data
        drupal_set_message(t('You need to specify both the language code and the English name of the new language.'), 'error');
358
      }
Dries's avatar
   
Dries committed
359
      else {
Dries's avatar
   
Dries committed
360
        drupal_set_message(t('The language %language (%code) is already set up.', array('%language' => '<em>'. $edit['langname'] .'</em>', '%code' => '<em>'. $edit['langcode'] .'</em>')), 'error');
Dries's avatar
   
Dries committed
361
362
363
364
365
      }
      break;
  }
  print theme('page', _locale_admin_manage_add_screen());
}
366

Dries's avatar
   
Dries committed
367
368
// ---------------------------------------------------------------------------------
// Gettext Portable Object import functionality (admininstration only)
Dries's avatar
   
Dries committed
369

Dries's avatar
   
Dries committed
370
371
372
373
374
375
376
377
/**
 * Page handler for the translation import screen
 */
function locale_admin_import() {
  include_once 'includes/locale.inc';
  $edit = &$_POST['edit'];
  switch ($_POST['op']) {
    case t('Import'):
Dries's avatar
   
Dries committed
378

Dries's avatar
   
Dries committed
379
380
381
382
383
384
      // Add language, if not yet supported
      $languages = locale_supported_languages(TRUE, TRUE);
      if (!isset($languages['name'][$edit['langcode']])) {
        $isocodes = _locale_get_iso639_list();
        _locale_add_language($edit['langcode'], $isocodes[$edit['langcode']][0], FALSE);
      }
Dries's avatar
   
Dries committed
385

Dries's avatar
   
Dries committed
386
387
      // Now import strings into the language
      $file = file_check_upload('file');
Steven Wittens's avatar
Locale:    
Steven Wittens committed
388
      if ($ret = _locale_import_po($file->filepath, $edit['langcode'], $edit['mode']) == FALSE) {
Dries's avatar
   
Dries committed
389
390
        watchdog('error', t('Translation import failed.'));
        watchdog('locale', t('Translation import failed.'));
Dries's avatar
   
Dries committed
391
      }
392

Dries's avatar
   
Dries committed
393
394
      drupal_goto('admin/locale');
      break;
Kjartan's avatar
Kjartan committed
395
  }
Dries's avatar
   
Dries committed
396
  print theme('page', _locale_admin_import_screen());
Dries's avatar
   
Dries committed
397
}
Dries's avatar
   
Dries committed
398

Dries's avatar
   
Dries committed
399

Dries's avatar
   
Dries committed
400
401
// ---------------------------------------------------------------------------------
// Gettext Portable Object export functionality (administration only)
Kjartan's avatar
Kjartan committed
402

Dries's avatar
   
Dries committed
403
404
405
406
407
408
409
410
411
412
413
/**
 * Page handler for the translation export screen
 */
function locale_admin_export() {
  include_once 'includes/locale.inc';
  switch ($_POST['op']) {
    case t('Export'):
      _locale_export_po($_POST['edit']['langcode']);
      break;
  }
  print theme('page', _locale_admin_export_screen());
Kjartan's avatar
Kjartan committed
414
415
}

Dries's avatar
   
Dries committed
416

Dries's avatar
   
Dries committed
417
418
419
420
421
422
423
424
425
426
// ---------------------------------------------------------------------------------
// String search and editing functionality (admininstration only)

/**
 * Page handler for the string search and administration screen
 */
function locale_admin_string() {
  include_once 'includes/locale.inc';
  $op = ($_POST['op'] ? $_POST['op'] : arg(3));
  $edit =& $_POST['edit'];
Dries's avatar
   
Dries committed
427

Dries's avatar
   
Dries committed
428
429
  switch ($op) {
    case 'delete':
Dries's avatar
   
Dries committed
430
431
      $output .= _locale_string_delete(check_query(arg(4)));
      $output .= _locale_string_seek();
Dries's avatar
   
Dries committed
432
433
      break;
    case 'edit':
Dries's avatar
   
Dries committed
434
435
      $output .= _locale_string_edit(check_query(arg(4)));
      $output .= _locale_string_seek();
Dries's avatar
   
Dries committed
436
437
      break;
    case t('Search'):
Dries's avatar
   
Dries committed
438
439
440
    case 'search':
      $output = _locale_string_seek();
      $output .= _locale_string_seek_form();
Dries's avatar
   
Dries committed
441
442
      break;
    case t('Save translations'):
Dries's avatar
   
Dries committed
443
444
      $output .= _locale_string_save(check_query(arg(4)));
      drupal_goto('admin/locale/string/search');
Dries's avatar
   
Dries committed
445
446
      break;
    default:
Dries's avatar
   
Dries committed
447
  }
Dries's avatar
   
Dries committed
448
  print theme('page', $output);
Dries's avatar
   
Dries committed
449
450
}

Dries's avatar
Dries committed
451
?>