<?php
// +-----------------------------------------------------------------------+
// |                              update.php                               |
// +-----------------------------------------------------------------------+
// | application   : PhpWebGallery <http://phpwebgallery.net>              |
// | branch        : BSF (Best So Far)                                     |
// +-----------------------------------------------------------------------+
// | file          : $RCSfile$
// | last update   : $Date$
// | last modifier : $Author$
// | revision      : $Revision$
// +-----------------------------------------------------------------------+
// | 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.                                                                  |
// +-----------------------------------------------------------------------+

include_once( PHPWG_ROOT_PATH.'admin/include/isadmin.inc.php');
//------------------------------------------------------------------- functions
function ordering( $id_uppercat)
{
  $rank = 1;
		
  $query = 'SELECT id';
  $query.= ' FROM '.CATEGORIES_TABLE;
  if ( !is_numeric( $id_uppercat))
  {
    $query.= ' WHERE id_uppercat IS NULL';
  }
  else
  {
    $query.= ' WHERE id_uppercat = '.$id_uppercat;
  }
  $query.= ' ORDER BY rank ASC, dir ASC';
  $query.= ';';
  $result = mysql_query( $query);
  while ( $row = mysql_fetch_array( $result))
  {
    $query = 'UPDATE '.CATEGORIES_TABLE;
    $query.= ' SET rank = '.$rank;
    $query.= ' WHERE id = '.$row['id'];
    $query.= ';';
    mysql_query( $query);
    $rank++;
    ordering( $row['id']);
  }
}

function insert_local_category($id_uppercat)
{
  global $conf, $page, $user, $lang;
 
  $uppercats = '';
  $output = '';

  // 0. retrieving informations on the category to display
  $cat_directory = PHPWG_ROOT_PATH.'galleries';
  if (is_numeric($id_uppercat))
  {
    $query = 'SELECT name,uppercats,dir FROM '.CATEGORIES_TABLE;
    $query.= ' WHERE id = '.$id_uppercat;
    $query.= ';';
    $row = mysql_fetch_array( mysql_query( $query));
    $uppercats = $row['uppercats'];
    $name      = $row['name'];
    $dir       = $row['dir'];

    $upper_array = explode( ',', $uppercats);

    $local_dir = '';

    $database_dirs = array();
    $query = '
SELECT id,dir FROM '.CATEGORIES_TABLE.'
  WHERE id IN ('.$uppercats.')
;';
    $result = mysql_query( $query);
    while ($row = mysql_fetch_array($result))
    {
      $database_dirs[$row['id']] = $row['dir'];
    }
    foreach ($upper_array as $id)
    {
      $local_dir.= $database_dirs[$id].'/';
    }

    $cat_directory.= '/'.$local_dir;

    // 1. display the category name to update
    $output = '<ul class="menu">';
    $output.= '<li><strong>'.$name.'</strong>';
    $output.= ' [ '.$dir.' ]';
    $output.= '</li>';

    // 2. we search pictures of the category only if the update is for all
    //    or a cat_id is specified
    if (isset($page['cat']) or $_GET['update'] == 'all')
    {
      $output.= insert_local_element($cat_directory, $id_uppercat);
    }
  }

  $sub_dirs = get_category_directories($cat_directory);

  $sub_category_dirs = array();
  $query = '
SELECT id,dir FROM '.CATEGORIES_TABLE.'
  WHERE site_id = 1
';
  if (!is_numeric($id_uppercat))
  {
    $query.= ' AND id_uppercat IS NULL';
  }
  else
  {
    $query.= ' AND id_uppercat = '.$id_uppercat;
  }
  $query.= '
    AND dir IS NOT NULL'; // virtual categories not taken
  $query.= '
;';
  $result = mysql_query($query);
  while ($row = mysql_fetch_array($result))
  {
    $sub_category_dirs[$row['id']] = $row['dir'];
  }
  
  // 3. we have to remove the categories of the database not present anymore
  foreach ($sub_category_dirs as $id => $dir)
  {
    if (!in_array($dir, $sub_dirs))
    {
      delete_category($id);
    }
  }

  // array of new categories to insert
  $inserts = array();
  
  foreach ($sub_dirs as $sub_dir)
  {
    // 5. Is the category already existing ? we create a subcat if not
    //    existing
    $category_id = array_search($sub_dir, $sub_category_dirs);
    if (!is_numeric($category_id))
    {
      if (preg_match('/^[a-zA-Z0-9-_.]+$/', $sub_dir))
      {
        $name = str_replace('_', ' ', $sub_dir);

        $value = "('".$sub_dir."','".$name."',1";
        if (!is_numeric($id_uppercat))
        {
          $value.= ',NULL';
        }
        else
        {
          $value.= ','.$id_uppercat;
        }
        $value.= ",'undef'";
        $value.= ')';
        array_push($inserts, $value);
      }
      else
      {
        $output.= '<span style="color:red;">"'.$sub_dir.'" : ';
        $output.= $lang['update_wrong_dirname'].'</span><br />';
      }
    }
  }

  // we have to create the category
  if (count($inserts) > 0)
  {
    $query = '
INSERT INTO '.CATEGORIES_TABLE.'
  (dir,name,site_id,id_uppercat,uppercats) VALUES
';
    $query.= implode(',', $inserts);
    $query.= '
;';
    mysql_query($query);
    // updating uppercats field
    $query = '
UPDATE '.CATEGORIES_TABLE.'
  SET uppercats = ';
    if ($uppercats != '')
    {
      $query.= "CONCAT('".$uppercats."',',',id)";
    }
    else
    {
      $query.= 'id';
    }
    $query.= '
  WHERE id_uppercat ';
    if (!is_numeric($id_uppercat))
    {
      $query.= 'IS NULL';
    }
    else
    {
      $query.= '= '.$id_uppercat;
    }
    $query.= '
;';
    mysql_query($query);
  }

  // Recursive call on the sub-categories (not virtual ones)
  $query = '
SELECT id
  FROM '.CATEGORIES_TABLE.'
  WHERE site_id = 1
';
  if (!is_numeric($id_uppercat))
  {
    $query.= '    AND id_uppercat IS NULL';
  }
  else
  {
    $query.= '    AND id_uppercat = '.$id_uppercat;
  }
  $query.= '
    AND dir IS NOT NULL'; // virtual categories not taken
  $query.= '
;';
  $result = mysql_query($query);
  while ($row = mysql_fetch_array($result))
  {
    $output.= insert_local_category($row['id']);
  }

  if (is_numeric($id_uppercat))
  {
    $output.= '</ul>';
  }
  return $output;
}

function insert_local_element($dir, $category_id)
{
  global $lang,$conf,$count_new, $count_deleted;

  $output = '';

  // fs means FileSystem : $fs_files contains files in the filesystem found
  // in $dir that can be managed by PhpWebGallery (see get_pwg_files
  // function), $fs_thumbnails contains thumbnails, $fs_representatives
  // contains potentially representative pictures for non picture files
  $fs_files = get_pwg_files($dir);
  $fs_thumbnails = get_thumb_files($dir);
  $fs_representatives = get_representative_files($dir);

  // element deletion
  $to_delete_elements = array();
  // deletion of element if the correspond file doesn't exist anymore
  $query = '
SELECT id,file
  FROM '.IMAGES_TABLE.'
  WHERE storage_category_id = '.$category_id.'
;';
  $result = mysql_query($query);
  while ($row = mysql_fetch_array($result))
  {
    if (!in_array($row['file'], $fs_files))
    {
      $output.= $row['file'];
      $output.= ' <span style="font-weight:bold;">';
      $output.= $lang['update_disappeared'].'</span><br />';
      array_push($to_delete_elements, $row['id']);
    }
  }
  // in picture case, we also delete the element if the thumbnail doesn't
  // existe anymore
  $query = '
SELECT id,file,tn_ext
  FROM '.IMAGES_TABLE.'
  WHERE storage_category_id = '.$category_id.'
    AND ('.implode(' OR ',
                   array_map(
                     create_function('$s', 'return "file LIKE \'%".$s."\'";')
                     , $conf['picture_ext'])).')
;';
  $result = mysql_query($query);
  while ($row = mysql_fetch_array($result))
  {
    $thumbnail = $conf['prefix_thumbnail'];
    $thumbnail.= get_filename_wo_extension($row['file']);
    $thumbnail.= '.'.$row['tn_ext'];
    if (!in_array($thumbnail, $fs_thumbnails))
    {
      $output.= $row['file'];
      $output.= ' : <span style="font-weight:bold;">';
      $output.= $lang['update_disappeared_tn'].'</span><br />';
      array_push($to_delete_elements, $row['id']);
    }
  }

  $to_delete_elements = array_unique($to_delete_elements);
  $count_deleted+= count($to_delete_elements);
  if ($count_deleted > 0)
  {
    delete_elements($to_delete_elements);
  }
  
  $registered_elements = array();
  $query = '
SELECT file FROM '.IMAGES_TABLE.'
   WHERE storage_category_id = '.$category_id.'
;';
  $result = mysql_query($query);
  while ($row = mysql_fetch_array($result))
  {
    array_push($registered_elements, $row['file']);
  }

  // validated pictures are picture uploaded by users, validated by an admin
  // and not registered (visible) yet
  $validated_pictures    = array();
  $unvalidated_pictures  = array();
  
  $query = '
SELECT file,infos,validated
  FROM '.WAITING_TABLE.'
  WHERE storage_category_id = '.$category_id.'
;';
  $result = mysql_query($query);
  while ($row = mysql_fetch_array($result))
  {
    if ($row['validated'] == 'true')
    {
      $validated_pictures[$row['file']] = $row['infos'];
    }
    else
    {
      array_push($unvalidated_pictures, $row['file']);
    }
  }

  // we only search among the picture present in the filesystem and not
  // present in the database yet. If we know that this picture is known as
  // an uploaded one but not validated, it's not tested neither
  $unregistered_elements = array_diff($fs_files
                                      ,$registered_elements
                                      ,$unvalidated_pictures);

  $inserts = array();
  
  foreach ($unregistered_elements as $unregistered_element)
  {
    if (preg_match('/^[a-zA-Z0-9-_.]+$/', $unregistered_element))
    {
      $file_wo_ext = get_filename_wo_extension($unregistered_element);
      $tn_ext = '';
      foreach ($conf['picture_ext'] as $ext)
      {
        $test = $conf['prefix_thumbnail'].$file_wo_ext.'.'.$ext;
        if (!in_array($test, $fs_thumbnails))
        {
          continue;
        }
        else
        {
          $tn_ext = $ext;
          break;
        }
      }

      // 2 cases : the element is a picture or not. Indeed, for a picture
      // thumbnail is mandatory and for non picture element, thumbnail and
      // representative is optionnal
      if (in_array(get_extension($unregistered_element), $conf['picture_ext']))
      {
        // if we found a thumnbnail corresponding to our picture...
        if ($tn_ext != '')
        {
          $image_size = @getimagesize($dir.$unregistered_element);
          // (file, storage_category_id, date_available, tn_ext, filesize,
          // width, height, name, author, comment, date_creation,
          // representative_ext)'
          $value = '(';
          $value.= "'".$unregistered_element."'";
          $value.= ','.$category_id;
          $value.= ",'".date('Y-m-d')."'";
          $value.= ",'".$tn_ext."'";
          $value.= ','.floor(filesize($dir.$unregistered_element) / 1024);
          $value.= ','.$image_size[0];
          $value.= ','.$image_size[1];
          if (isset($validated_pictures[$unregistered_element]))
          {
            // retrieving infos from the XML description from waiting table
            $infos = nl2br($validated_pictures[$unregistered_element]);

            $unixtime = getAttribute($infos, 'date_creation');
            if ($unixtime != '')
            {
              $date_creation ="'".date('Y-m-d',$unixtime)."'";
            }
            else
            {
              $date_creation = 'NULL';
            }
          
            $value.= ",'".getAttribute($infos, 'name')."'";
            $value.= ",'".getAttribute($infos, 'author')."'";
            $value.= ",'".getAttribute($infos, 'comment')."'";
            $value.= ','.$date_creation;

            // deleting the waiting element
            $query = '
DELETE FROM '.WAITING_TABLE.'
  WHERE file = \''.$unregistered_element.'\'
    AND storage_category_id = '.$category_id.'
;';
            mysql_query($query);
          }
          else
          {
            $value.= ",'','','',NULL";
          }
          $value.= ',NULL'; // representative_ext
          $value.= ')';
        
          $count_new++;
          $output.= $unregistered_element;
          $output.= ' <span style="font-weight:bold;">';
          $output.= $lang['update_research_added'].'</span>';
          $output.= ' ('.$lang['update_research_tn_ext'].' '.$tn_ext.')';
          $output.= '<br />';
          array_push($inserts, $value);
        }
        else
        {
          $output.= '<span style="color:red;">';
          $output.= $lang['update_missing_tn'].' : '.$unregistered_element;
          $output.= ' (<span style="font-weight:bold;">';
          $output.= $conf['prefix_thumbnail'];
          $output.= get_filename_wo_extension($unregistered_element);
          $output.= '.XXX</span>';
          $output.= ', XXX = ';
          $output.= implode(', ', $conf['picture_ext']);
          $output.= ')</span><br />';
        }
      }
      else
      {
        $representative_ext = '';
        foreach ($conf['picture_ext'] as $ext)
        {
          $test = $conf['prefix_thumbnail'].$file_wo_ext.'.'.$ext;
          if (!in_array($test, $fs_thumbnails))
          {
            continue;
          }
          else
          {
            $representative_ext = $ext;
            break;
          }
        }

        // (file, storage_category_id, date_available, tn_ext, filesize,
        // width, height, name, author, comment, date_creation,
        // representative_ext)'
        $value = '(';
        $value.= "'".$unregistered_element."'";
        $value.= ','.$category_id;
        $value.= ",'".date('Y-m-d')."'";
        if ( $tn_ext != '' )
        {
          $value.= ",'".$tn_ext."'";
        }
        else
        {
          $value.= ',NULL';
        }
        $value.= ','.floor(filesize($dir.$unregistered_element) / 1024);
        $value.= ',NULL';
        $value.= ',NULL';
        $value.= ',NULL';
        $value.= ',NULL';
        $value.= ',NULL';
        $value.= ',NULL';
        if ( $representative_ext != '' )
        {
          $value.= ",'".$representative_ext."'";
        }
        else
        {
          $value.= ',NULL';
        }
        $value.= ')';

        $count_new++;
        $output.= $unregistered_element;
        $output.= ' <span style="font-weight:bold;">';
        $output.= $lang['update_research_added'].'</span>';
        $output.= '<br />';
        array_push($inserts, $value);
      }
    }
    else
    {
      $output.= '<span style="color:red;">"'.$unregistered_element.'" : ';
      $output.= $lang['update_wrong_dirname'].'</span><br />';
    }
  }
  
  if (count($inserts) > 0)
  {
    // inserts all found pictures
    $query = '
INSERT INTO '.IMAGES_TABLE.'
  (file,storage_category_id,date_available,tn_ext,filesize,width,height
   ,name,author,comment,date_creation,representative_ext)
   VALUES
   '.implode(',', $inserts).'
;';
    mysql_query($query);

    // what are the ids of the pictures in the $category_id ?
    $ids = array();

    $query = '
SELECT id
  FROM '.IMAGES_TABLE.'
  WHERE storage_category_id = '.$category_id.'
;';
    $result = mysql_query($query);
    while ($row = mysql_fetch_array($result))
    {
      array_push($ids, $row['id']);
    }

    // recreation of the links between this storage category pictures and
    // its storage category
    $query = '
DELETE FROM '.IMAGE_CATEGORY_TABLE.'
  WHERE category_id = '.$category_id.'
    AND image_id IN ('.implode(',', $ids).')
;';
    mysql_query($query);

    foreach ($ids as $num => $image_id)
    {
      $ids[$num] =  '('.$category_id.','.$image_id.')';
    }
    $query = '
INSERT INTO '.IMAGE_CATEGORY_TABLE.'
  (category_id,image_id) VALUES
  '.implode(',', $ids).'
;';
    mysql_query($query);
  }
  return $output;
}
//----------------------------------------------------- template initialization
$template->set_filenames(array('update'=>'admin/update.tpl'));

$template->assign_vars(array(
  'L_UPDATE_TITLE'=>$lang['update_default_title'],
  'L_CAT_UPDATE'=>$lang['update_only_cat'],
  'L_ALL_UPDATE'=>$lang['update_all'],
  'L_RESULT_UPDATE'=>$lang['update_part_research'],
  'L_NEW_CATEGORY'=>$lang['update_research_conclusion'],
  'L_DEL_CATEGORY'=>$lang['update_deletion_conclusion'],
  
  'U_CAT_UPDATE'=>add_session_id(PHPWG_ROOT_PATH.'admin.php?page=update&amp;update=cats'),
  'U_ALL_UPDATE'=>add_session_id(PHPWG_ROOT_PATH.'admin.php?page=update&amp;update=all')
 ));
  
//-------------------------------------------- introduction : choices of update
// Display choice if "update" var is not specified
if (!isset($_GET['update']))
{
 $template->assign_block_vars('introduction',array());
}
//-------------------------------------------------- local update : ./galleries
else
{
  check_cat_id($_GET['update']);
  $start = get_moment();
  $count_new = 0;
  $count_deleted = 0;
  
  if (isset($page['cat']))
  {
    $categories = insert_local_category($page['cat']);
  }
  else
  {
    $categories = insert_local_category('NULL');
  }
  $end = get_moment();
  //echo get_elapsed_time($start, $end).' for update <br />';
  $template->assign_block_vars('update',array(
    'CATEGORIES'=>$categories,
	'NEW_CAT'=>$count_new,
	'DEL_CAT'=>$count_deleted
   ));
}
//---------------------------------------- update informations about categories
if (isset($_GET['update'])
     or isset($page['cat'])
     or @is_file('./listing.xml') && DEBUG)
{
  $start = get_moment();
  update_category('all');
  ordering('NULL');
  $end = get_moment();
  echo get_elapsed_time($start, $end).' for update_category(all)<br />';
}
//----------------------------------------------------------- sending html code
$template->assign_var_from_handle('ADMIN_CONTENT', 'update');
?>