Index: trunk/admin/include/functions.php
===================================================================
--- trunk/admin/include/functions.php	(revision 5340)
+++ trunk/admin/include/functions.php	(revision 5357)
@@ -1950,4 +1950,5 @@
     case 'themes_new':
     case 'themes_installed':
+    case 'languages_installed':
       return 5;
   }
Index: trunk/admin/include/languages.class.php
===================================================================
--- trunk/admin/include/languages.class.php	(revision 5357)
+++ trunk/admin/include/languages.class.php	(revision 5357)
@@ -0,0 +1,228 @@
+<?php
+// +-----------------------------------------------------------------------+
+// | Piwigo - a PHP based picture gallery                                  |
+// +-----------------------------------------------------------------------+
+// | Copyright(C) 2008-2010 Piwigo Team                  http://piwigo.org |
+// | Copyright(C) 2003-2008 PhpWebGallery Team    http://phpwebgallery.net |
+// | Copyright(C) 2002-2003 Pierrick LE GALL   http://le-gall.net/pierrick |
+// +-----------------------------------------------------------------------+
+// | This program is free software; you can redistribute it and/or modify  |
+// | it under the terms of the GNU General Public License as published by  |
+// | the Free Software Foundation                                          |
+// |                                                                       |
+// | This program is distributed in the hope that it will be useful, but   |
+// | WITHOUT ANY WARRANTY; without even the implied warranty of            |
+// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU      |
+// | General Public License for more details.                              |
+// |                                                                       |
+// | You should have received a copy of the GNU General Public License     |
+// | along with this program; if not, write to the Free Software           |
+// | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, |
+// | USA.                                                                  |
+// +-----------------------------------------------------------------------+
+
+class languages
+{
+  var $fs_languages = array();
+  var $db_languages = array();
+  var $server_languages = array();
+
+  /**
+   * Initialize $fs_languages and $db_languages
+  */
+  function languages($target_charset = null)
+  {
+    $this->fs_languages = $this->get_fs_languages($target_charset);
+  }
+
+  /**
+   * Perform requested actions
+   * @param string - action
+   * @param string - language id
+   * @param array - errors
+   */
+  function perform_action($action, $language_id)
+  {
+    global $conf;
+
+    if (isset($this->db_languages[$language_id]))
+    {
+      $crt_db_language = $this->db_languages[$language_id];
+    }
+
+    $errors = array();
+
+    switch ($action)
+    {
+      case 'activate':
+        if (isset($crt_db_language))
+        {
+          array_push($errors, 'CANNOT ACTIVATE - LANGUAGE IS ALREADY ACTIVATED');
+          break;
+        }
+
+        $query = "
+INSERT INTO ".LANGUAGES_TABLE."
+  SET id = '".$language_id."',
+      name = '".$this->fs_languages[$language_id]."'
+;";
+        pwg_query($query);
+        break;
+
+      case 'deactivate':
+        if (!isset($crt_db_language))
+        {
+          array_push($errors, 'CANNOT DEACTIVATE - LANGUAGE IS ALREADY DEACTIVATED');
+          break;
+        }
+
+        if ($language_id == get_default_language())
+        {
+          array_push($errors, 'CANNOT DEACTIVATE - LANGUAGE IS DEFAULT LANGUAGE');
+          break;
+        }
+        
+        $query = "
+DELETE
+  FROM ".LANGUAGES_TABLE."
+  WHERE id= '".$language_id."'
+;";
+        pwg_query($query);
+        break;
+
+      case 'delete':
+        if (!empty($crt_db_language))
+        {
+          array_push($errors, 'CANNOT DELETE - LANGUAGE IS ACTIVATED');
+          break;
+        }
+        if (!isset($this->fs_languages[$language_id]))
+        {
+          array_push($errors, 'CANNOT DELETE - LANGUAGE DOES NOT EXIST');
+          break;
+        }
+
+        // Set default language to user who are using this language
+        $query = '
+UPDATE '.USER_INFOS_TABLE.'
+  SET language = "'.get_default_language().'"
+  WHERE language = "'.$language_id.'"
+;';
+        pwg_query($query);
+
+        if (!$this->deltree(PHPWG_ROOT_PATH.'language/'.$language_id))
+        {
+          $this->send_to_trash(PHPWG_ROOT_PATH.'language/'.$language_id);
+        }
+        break;
+
+      case 'set_default':
+        $query = '
+UPDATE '.USER_INFOS_TABLE.'
+  SET language = "'.$language_id.'"
+  WHERE user_id = '.$conf['default_user_id'].'
+;';
+        pwg_query($query);
+        break;
+    }
+    return $errors;
+  }
+
+  /**
+  *  Get languages defined in the language directory
+  */  
+  function get_fs_languages($target_charset = null)
+  {
+    if ( empty($target_charset) )
+    {
+      $target_charset = get_pwg_charset();
+    }
+    $target_charset = strtolower($target_charset);
+
+    $dir = opendir(PHPWG_ROOT_PATH.'language');
+
+    while ($file = readdir($dir))
+    {
+      $path = PHPWG_ROOT_PATH.'language/'.$file;
+      if (!is_link($path) and is_dir($path) and file_exists($path.'/iso.txt'))
+      {
+        list($language_name) = @file($path.'/iso.txt');
+
+        $languages[$file] = convert_charset($language_name, $target_charset);
+      }
+    }
+    closedir($dir);
+    @asort($languages);
+
+    return $languages;
+  }
+
+  function get_db_languages()
+  {
+    $query = '
+  SELECT id, name
+    FROM '.LANGUAGES_TABLE.'
+    ORDER BY name ASC
+  ;';
+    $result = pwg_query($query);
+
+    while ($row = pwg_db_fetch_assoc($result))
+    {
+      $this->db_languages[ $row['id'] ] = $row['name'];
+    }
+  }
+
+  /**
+   * delete $path directory
+   * @param string - path
+   */
+  function deltree($path)
+  {
+    if (is_dir($path))
+    {
+      $fh = opendir($path);
+      while ($file = readdir($fh))
+      {
+        if ($file != '.' and $file != '..')
+        {
+          $pathfile = $path . '/' . $file;
+          if (is_dir($pathfile))
+          {
+            $this->deltree($pathfile);
+          }
+          else
+          {
+            @unlink($pathfile);
+          }
+        }
+      }
+      closedir($fh);
+      return @rmdir($path);
+    }
+  }
+
+  /**
+   * send $path to trash directory
+   * @param string - path
+   */
+  function send_to_trash($path)
+  {
+    $trash_path = PHPWG_ROOT_PATH . 'language/trash';
+    if (!is_dir($trash_path))
+    {
+      @mkdir($trash_path);
+      $file = @fopen($trash_path . '/.htaccess', 'w');
+      @fwrite($file, 'deny from all');
+      @fclose($file);
+    }
+    while ($r = $trash_path . '/' . md5(uniqid(rand(), true)))
+    {
+      if (!is_dir($r))
+      {
+        @rename($path, $r);
+        break;
+      }
+    }
+  }
+}
+?>
Index: trunk/admin/languages_installed.php
===================================================================
--- trunk/admin/languages_installed.php	(revision 5357)
+++ trunk/admin/languages_installed.php	(revision 5357)
@@ -0,0 +1,90 @@
+<?php
+// +-----------------------------------------------------------------------+
+// | Piwigo - a PHP based picture gallery                                  |
+// +-----------------------------------------------------------------------+
+// | Copyright(C) 2008-2009 Piwigo Team                  http://piwigo.org |
+// | Copyright(C) 2003-2008 PhpWebGallery Team    http://phpwebgallery.net |
+// | Copyright(C) 2002-2003 Pierrick LE GALL   http://le-gall.net/pierrick |
+// +-----------------------------------------------------------------------+
+// | This program is free software; you can redistribute it and/or modify  |
+// | it under the terms of the GNU General Public License as published by  |
+// | the Free Software Foundation                                          |
+// |                                                                       |
+// | This program is distributed in the hope that it will be useful, but   |
+// | WITHOUT ANY WARRANTY; without even the implied warranty of            |
+// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU      |
+// | General Public License for more details.                              |
+// |                                                                       |
+// | You should have received a copy of the GNU General Public License     |
+// | along with this program; if not, write to the Free Software           |
+// | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, |
+// | USA.                                                                  |
+// +-----------------------------------------------------------------------+
+
+if( !defined("PHPWG_ROOT_PATH") )
+{
+  die ("Hacking attempt!");
+}
+
+include_once(PHPWG_ROOT_PATH.'admin/include/languages.class.php');
+
+$template->set_filenames(array('languages' => 'languages_installed.tpl'));
+
+$base_url = get_root_url().'admin.php?page='.$page['page'];
+
+$languages = new languages();
+$languages->get_db_languages();
+
+//--------------------------------------------------perform requested actions
+if (isset($_GET['action']) and isset($_GET['language']) and !is_adviser())
+{
+  $page['errors'] = $languages->perform_action($_GET['action'], $_GET['language']);
+
+  if (empty($page['errors']))
+  {
+    redirect($base_url);
+  }
+}
+
+// +-----------------------------------------------------------------------+
+// |                     start template output                             |
+// +-----------------------------------------------------------------------+
+$default_language = get_default_language();
+
+foreach($languages->fs_languages as $language_id => $language_name)
+{
+  $template->append('languages', array(
+    'ID' => $language_id,
+    'NAME' => $language_name,
+    'U_ACTION' => $base_url.'&amp;language='.$language_id,
+    'STATE' => isset($languages->db_languages[$language_id]) ? 'active' : '',
+    'IS_DEFAULT' => $language_id == $default_language,
+    )
+  );
+}
+
+
+$missing_language_ids = array_diff(
+    array_keys($languages->db_languages),
+    array_keys($languages->fs_languages)
+  );
+
+foreach($missing_language_ids as $language_id)
+{
+  $query = '
+UPDATE '.USER_INFOS_TABLE.'
+  SET language = "'.get_default_language().'"
+  WHERE language = "'.$language_id.'"
+;';
+  pwg_query($query);
+
+  $query = "
+DELETE
+  FROM ".LANGUAGES_TABLE."
+  WHERE id= '".$language_id."'
+;";
+  pwg_query($query);
+}
+
+$template->assign_var_from_handle('ADMIN_CONTENT', 'languages');
+?>
Index: trunk/admin/themes/default/default-layout.css
===================================================================
--- trunk/admin/themes/default/default-layout.css	(revision 5340)
+++ trunk/admin/themes/default/default-layout.css	(revision 5357)
@@ -37,5 +37,5 @@
 }
 
-/* Plugins tables */
+/* Plugins, languages tables */
 TABLE.plugins { min-width: 400px; }
 TABLE.plugins A { border: 0; }
@@ -43,5 +43,6 @@
 TABLE.plugins TR TD.pluginState { padding: 4px 16px; }
 
-TABLE.plugins TR TD.active {
+TABLE.plugins TR TD.active,
+TABLE.languages TR TD.active {
 	background: url(icon/plugin_active.gif) no-repeat center left;
 	background-color: inherit; /* IE need it */
@@ -63,4 +64,7 @@
 
 TABLE.plugins ul.pluginsActions li { display: inline; }
+
+TABLE.languages  { min-width: 400px; }
+TABLE.languages TR TD { text-align: center; padding: 4px 20px; }
 
 /* categoryOrdering */
Index: trunk/admin/themes/default/template/admin.tpl
===================================================================
--- trunk/admin/themes/default/template/admin.tpl	(revision 5340)
+++ trunk/admin/themes/default/template/admin.tpl	(revision 5357)
@@ -85,4 +85,5 @@
         <li><a href="{$U_CONFIG_MENUBAR}">{'Menu'|@translate}</a></li>
         <li><a href="{$U_CONFIG_EXTENTS}">{'Templates'|@translate}</a></li>
+        <li><a href="{$U_CONFIG_LANGUAGES}">{'Languages'|@translate}</a></li>
         <li><a href="{$U_CONFIG_THEMES}">{'Themes'|@translate}</a></li>
       </ul>
Index: trunk/admin/themes/default/template/languages_installed.tpl
===================================================================
--- trunk/admin/themes/default/template/languages_installed.tpl	(revision 5357)
+++ trunk/admin/themes/default/template/languages_installed.tpl	(revision 5357)
@@ -0,0 +1,34 @@
+<div class="titrePage">
+  <h2>{'Languages'|@translate}</h2>
+</div>
+
+<table class="table2 languages">
+<thead>
+  <tr class="throw">
+    <td>{'Language'|@translate}</td>
+    <td>{'Actions'|@translate}</td>
+  </tr>
+</thead>
+
+{foreach from=$languages item=language name=languages_loop}
+  <tr class="{if $smarty.foreach.languages_loop.index is odd}row1{else}row2{/if}">
+    <td class="{$language.STATE}" style="text-align: left;">
+      {$language.NAME}
+      {if $language.IS_DEFAULT}<i>({'Default'|@translate})</i>{/if}
+    </td>
+    <td>
+    {if !$language.IS_DEFAULT}
+      {if $language.STATE == 'active' or $language.STATE == 'missing'}
+        <a href="{$language.U_ACTION}&amp;action=deactivate">{'Deactivate'|@translate}</a> |
+        <a href="{$language.U_ACTION}&amp;action=set_default">{'Default'|@translate}</a>
+      {else}
+        <a href="{$language.U_ACTION}&amp;action=activate">{'Activate'|@translate}</a> |
+        <a href="{$language.U_ACTION}&amp;action=delete" onclick="return confirm('{'Are you sure?'|@translate|@escape:'javascript'}');">{'Delete'|@translate}</a>
+      {/if}
+    {else}
+      ---
+    {/if}
+    </td>
+  </tr>
+{/foreach}
+</table>
