source: branches/2.5/admin/include/languages.class.php @ 29905

Last change on this file since 29905 was 20449, checked in by mistic100, 12 years ago

feature:2826
  • Property svn:eol-style set to LF
File size: 13.6 KB
Line 
1<?php
2// +-----------------------------------------------------------------------+
3// | Piwigo - a PHP based photo gallery                                    |
4// +-----------------------------------------------------------------------+
5// | Copyright(C) 2008-2013 Piwigo Team                  http://piwigo.org |
6// | Copyright(C) 2003-2008 PhpWebGallery Team    http://phpwebgallery.net |
7// | Copyright(C) 2002-2003 Pierrick LE GALL   http://le-gall.net/pierrick |
8// +-----------------------------------------------------------------------+
9// | This program is free software; you can redistribute it and/or modify  |
10// | it under the terms of the GNU General Public License as published by  |
11// | the Free Software Foundation                                          |
12// |                                                                       |
13// | This program is distributed in the hope that it will be useful, but   |
14// | WITHOUT ANY WARRANTY; without even the implied warranty of            |
15// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU      |
16// | General Public License for more details.                              |
17// |                                                                       |
18// | You should have received a copy of the GNU General Public License     |
19// | along with this program; if not, write to the Free Software           |
20// | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, |
21// | USA.                                                                  |
22// +-----------------------------------------------------------------------+
23
24class languages
25{
26  var $fs_languages = array();
27  var $db_languages = array();
28  var $server_languages = array();
29
30  /**
31   * Initialize $fs_languages and $db_languages
32  */
33  function languages($target_charset = null)
34  {
35    $this->get_fs_languages($target_charset);
36  }
37
38  /**
39   * Perform requested actions
40   * @param string - action
41   * @param string - language id
42   * @param array - errors
43   */
44  function perform_action($action, $language_id)
45  {
46    global $conf;
47
48    if (isset($this->db_languages[$language_id]))
49    {
50      $crt_db_language = $this->db_languages[$language_id];
51    }
52
53    $errors = array();
54
55    switch ($action)
56    {
57      case 'activate':
58        if (isset($crt_db_language))
59        {
60          array_push($errors, 'CANNOT ACTIVATE - LANGUAGE IS ALREADY ACTIVATED');
61          break;
62        }
63
64        $query = '
65INSERT INTO '.LANGUAGES_TABLE.'
66  (id, version, name)
67  VALUES(\''.$language_id.'\',
68         \''.$this->fs_languages[$language_id]['version'].'\',
69         \''.$this->fs_languages[$language_id]['name'].'\')
70;';
71        pwg_query($query);
72        break;
73
74      case 'deactivate':
75        if (!isset($crt_db_language))
76        {
77          array_push($errors, 'CANNOT DEACTIVATE - LANGUAGE IS ALREADY DEACTIVATED');
78          break;
79        }
80
81        if ($language_id == get_default_language())
82        {
83          array_push($errors, 'CANNOT DEACTIVATE - LANGUAGE IS DEFAULT LANGUAGE');
84          break;
85        }
86
87        $query = '
88DELETE
89  FROM '.LANGUAGES_TABLE.'
90  WHERE id= \''.$language_id.'\'
91;';
92        pwg_query($query);
93        break;
94
95      case 'delete':
96        if (!empty($crt_db_language))
97        {
98          array_push($errors, 'CANNOT DELETE - LANGUAGE IS ACTIVATED');
99          break;
100        }
101        if (!isset($this->fs_languages[$language_id]))
102        {
103          array_push($errors, 'CANNOT DELETE - LANGUAGE DOES NOT EXIST');
104          break;
105        }
106
107        // Set default language to user who are using this language
108        $query = '
109UPDATE '.USER_INFOS_TABLE.'
110  SET language = \''.get_default_language().'\'
111  WHERE language = \''.$language_id.'\'
112;';
113        pwg_query($query);
114
115        if (!$this->deltree(PHPWG_ROOT_PATH.'language/'.$language_id))
116        {
117          $this->send_to_trash(PHPWG_ROOT_PATH.'language/'.$language_id);
118        }
119        break;
120
121      case 'set_default':
122        $query = '
123UPDATE '.USER_INFOS_TABLE.'
124  SET language = \''.$language_id.'\'
125  WHERE user_id IN ('.$conf['default_user_id'].', '.$conf['guest_id'].')
126;';
127        pwg_query($query);
128        break;
129    }
130    return $errors;
131  }
132
133  /**
134  *  Get languages defined in the language directory
135  */
136  function get_fs_languages($target_charset = null)
137  {
138    if ( empty($target_charset) )
139    {
140      $target_charset = get_pwg_charset();
141    }
142    $target_charset = strtolower($target_charset);
143
144    $dir = opendir(PHPWG_ROOT_PATH.'language');
145    while ($file = readdir($dir))
146    {
147      if ($file!='.' and $file!='..')
148      {
149        $path = PHPWG_ROOT_PATH.'language/'.$file;
150        if (is_dir($path) and !is_link($path)
151            and preg_match('/^[a-zA-Z0-9-_]+$/', $file )
152            and file_exists($path.'/common.lang.php')
153            )
154        {
155          $language = array(
156              'name'=>$file,
157              'code'=>$file,
158              'version'=>'0',
159              'uri'=>'',
160              'author'=>'',
161            );
162          $plg_data = implode( '', file($path.'/common.lang.php') );
163
164          if ( preg_match("|Language Name: (.*)|", $plg_data, $val) )
165          {
166            $language['name'] = trim( $val[1] );
167            $language['name'] = convert_charset($language['name'], 'utf-8', $target_charset);
168          }
169          if (preg_match("|Version: (.*)|", $plg_data, $val))
170          {
171            $language['version'] = trim($val[1]);
172          }
173          if ( preg_match("|Language URI: (.*)|", $plg_data, $val) )
174          {
175            $language['uri'] = trim($val[1]);
176          }
177          if ( preg_match("|Author: (.*)|", $plg_data, $val) )
178          {
179            $language['author'] = trim($val[1]);
180          }
181          if ( preg_match("|Author URI: (.*)|", $plg_data, $val) )
182          {
183            $language['author uri'] = trim($val[1]);
184          }
185          if (!empty($language['uri']) and strpos($language['uri'] , 'extension_view.php?eid='))
186          {
187            list( , $extension) = explode('extension_view.php?eid=', $language['uri']);
188            if (is_numeric($extension)) $language['extension'] = $extension;
189          }
190          // IMPORTANT SECURITY !
191          $language = array_map('htmlspecialchars', $language);
192          $this->fs_languages[$file] = $language;
193        }
194      }
195    }
196    closedir($dir);
197    @uasort($this->fs_languages, 'name_compare');
198  }
199
200  function get_db_languages()
201  {
202    $query = '
203  SELECT id, name
204    FROM '.LANGUAGES_TABLE.'
205    ORDER BY name ASC
206  ;';
207    $result = pwg_query($query);
208
209    while ($row = pwg_db_fetch_assoc($result))
210    {
211      $this->db_languages[ $row['id'] ] = $row['name'];
212    }
213  }
214
215  /**
216   * Retrieve PEM server datas to $server_languages
217   */
218  function get_server_languages($new=false)
219  {
220    global $user, $conf;
221
222    $get_data = array(
223      'category_id' => $conf['pem_languages_category'],
224      'format' => 'php',
225    );
226
227    // Retrieve PEM versions
228    $version = PHPWG_VERSION;
229    $versions_to_check = array();
230    $url = PEM_URL . '/api/get_version_list.php';
231    if (fetchRemote($url, $result, $get_data) and $pem_versions = @unserialize($result))
232    {
233      if (!preg_match('/^\d+\.\d+\.\d+$/', $version))
234      {
235        $version = $pem_versions[0]['name'];
236      }
237      $branch = get_branch_from_version($version);
238      foreach ($pem_versions as $pem_version)
239      {
240        if (strpos($pem_version['name'], $branch) === 0)
241        {
242          $versions_to_check[] = $pem_version['id'];
243        }
244      }
245    }
246    if (empty($versions_to_check))
247    {
248      return false;
249    }
250
251    // Languages to check
252    $languages_to_check = array();
253    foreach($this->fs_languages as $fs_language)
254    {
255      if (isset($fs_language['extension']))
256      {
257        $languages_to_check[] = $fs_language['extension'];
258      }
259    }
260
261    // Retrieve PEM languages infos
262    $url = PEM_URL . '/api/get_revision_list.php';
263    $get_data = array_merge($get_data, array(
264      'last_revision_only' => 'true',
265      'version' => implode(',', $versions_to_check),
266      'lang' => $user['language'],
267      'get_nb_downloads' => 'true',
268      )
269    );
270    if (!empty($languages_to_check))
271    {
272      if ($new)
273      {
274        $get_data['extension_exclude'] = implode(',', $languages_to_check);
275      }
276      else
277      {
278        $get_data['extension_include'] = implode(',', $languages_to_check);
279      }
280    }
281
282    if (fetchRemote($url, $result, $get_data))
283    {
284      $pem_languages = @unserialize($result);
285      if (!is_array($pem_languages))
286      {
287        return false;
288      }
289      foreach ($pem_languages as $language)
290      {
291        if (preg_match('/^.*? \[[A-Z]{2}\]$/', $language['extension_name']))
292        {
293          $this->server_languages[$language['extension_id']] = $language;
294        }
295      }
296      @uasort($this->server_languages, array($this, 'extension_name_compare'));
297      return true;
298    }
299    return false;
300  }
301
302  /**
303   * Extract language files from archive
304   *
305   * @param string - install or upgrade
306   * @param string - remote revision identifier (numeric)
307   * @param string - language id or extension id
308   */
309  function extract_language_files($action, $revision, $dest='')
310  {
311    if ($archive = tempnam( PHPWG_ROOT_PATH.'language', 'zip'))
312    {
313      $url = PEM_URL . '/download.php';
314      $get_data = array(
315        'rid' => $revision,
316        'origin' => 'piwigo_'.$action,
317      );
318
319      if ($handle = @fopen($archive, 'wb') and fetchRemote($url, $handle, $get_data))
320      {
321        fclose($handle);
322        include_once(PHPWG_ROOT_PATH.'admin/include/pclzip.lib.php');
323        $zip = new PclZip($archive);
324        if ($list = $zip->listContent())
325        {
326          foreach ($list as $file)
327          {
328            // we search common.lang.php in archive
329            if (basename($file['filename']) == 'common.lang.php'
330              and (!isset($main_filepath)
331              or strlen($file['filename']) < strlen($main_filepath)))
332            {
333              $main_filepath = $file['filename'];
334            }
335          }
336          if (isset($main_filepath))
337          {
338            $root = basename(dirname($main_filepath)); // common.lang.php path in archive
339            if (preg_match('/^[a-z]{2}_[A-Z]{2}$/', $root))
340            {
341              if ($action == 'install')
342              {
343                $dest = $root;
344              }
345              $extract_path = PHPWG_ROOT_PATH.'language/'.$dest;
346              if (
347                $result = $zip->extract(
348                  PCLZIP_OPT_PATH, $extract_path,
349                  PCLZIP_OPT_REMOVE_PATH, $root,
350                  PCLZIP_OPT_REPLACE_NEWER
351                  )
352                )
353              {
354                foreach ($result as $file)
355                {
356                  if ($file['stored_filename'] == $main_filepath)
357                  {
358                    $status = $file['status'];
359                    break;
360                  }
361                }
362                if ($status == 'ok')
363                {
364                  $this->get_fs_languages();
365                  if ($action == 'install')
366                  {
367                    $this->perform_action('activate', $dest);
368                  }
369                }
370                if (file_exists($extract_path.'/obsolete.list')
371                  and $old_files = file($extract_path.'/obsolete.list', FILE_IGNORE_NEW_LINES)
372                  and !empty($old_files))
373                {
374                  array_push($old_files, 'obsolete.list');
375                  foreach($old_files as $old_file)
376                  {
377                    $path = $extract_path.'/'.$old_file;
378                    if (is_file($path))
379                    {
380                      @unlink($path);
381                    }
382                    elseif (is_dir($path))
383                    {
384                      if (!$this->deltree($path))
385                      {
386                        $this->send_to_trash($path);
387                      }
388                    }
389                  }
390                }
391              }
392              else $status = 'extract_error';
393            }
394            else $status = 'archive_error';
395          }
396          else $status = 'archive_error';
397        }
398        else $status = 'archive_error';
399      }
400      else $status = 'dl_archive_error';
401    }
402    else $status = 'temp_path_error';
403
404    @unlink($archive);
405    return $status;
406  }
407
408  /**
409   * delete $path directory
410   * @param string - path
411   */
412  function deltree($path)
413  {
414    if (is_dir($path))
415    {
416      $fh = opendir($path);
417      while ($file = readdir($fh))
418      {
419        if ($file != '.' and $file != '..')
420        {
421          $pathfile = $path . '/' . $file;
422          if (is_dir($pathfile))
423          {
424            $this->deltree($pathfile);
425          }
426          else
427          {
428            @unlink($pathfile);
429          }
430        }
431      }
432      closedir($fh);
433      return @rmdir($path);
434    }
435  }
436
437  /**
438   * send $path to trash directory
439   * @param string - path
440   */
441  function send_to_trash($path)
442  {
443    $trash_path = PHPWG_ROOT_PATH . 'language/trash';
444    if (!is_dir($trash_path))
445    {
446      @mkdir($trash_path);
447      $file = @fopen($trash_path . '/.htaccess', 'w');
448      @fwrite($file, 'deny from all');
449      @fclose($file);
450    }
451    while ($r = $trash_path . '/' . md5(uniqid(rand(), true)))
452    {
453      if (!is_dir($r))
454      {
455        @rename($path, $r);
456        break;
457      }
458    }
459  }
460
461  /**
462   * Sort functions
463   */
464  function language_version_compare($a, $b)
465  {
466    $pattern = array('/([a-z])/ei', '/\.+/', '/\.\Z|\A\./');
467    $replacement = array( "'.'.intval('\\1', 36).'.'", '.', '');
468
469    $array = preg_replace($pattern, $replacement, array($a, $b));
470
471    return version_compare($array[0], $array[1], '>=');
472  }
473
474  function extension_name_compare($a, $b)
475  {
476    return strcmp(strtolower($a['extension_name']), strtolower($b['extension_name']));
477  }
478}
479?>
Note: See TracBrowser for help on using the repository browser.