<?php
// +-----------------------------------------------------------------------+
// | PhpWebGallery - a PHP based picture gallery                           |
// | Copyright (C) 2002-2003 Pierrick LE GALL - pierrick@phpwebgallery.net |
// | Copyright (C) 2003-2007 PhpWebGallery Team - http://phpwebgallery.net |
// +-----------------------------------------------------------------------+
// | file          : $Id$
// | 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.                                                                  |
// +-----------------------------------------------------------------------+

/**
 * Check integrity
 *
 * @param void
 * @return void
 */
function check_integrity()
{
  global $page, $header_notes;

  add_event_handler('get_check_integrity', 'c13y_exif');
  add_event_handler('get_check_integrity', 'c13y_user');

  $page['check_integrity'] = array();
  $page['check_integrity'] = trigger_event('get_check_integrity',
                                $page['check_integrity']);

  if (count($page['check_integrity']) > 0)
  {
    $header_notes[] =
      l10n_dec('c13y_anomaly_count', 'c13y_anomalies_count',
        count($page['check_integrity']));
  }

  if (!is_adviser())
  {
    if (isset($_POST['c13y_submit']) and isset($_POST['c13y_selection']))
    {
      $corrected_count = 0;
      $not_corrected_count = 0;

      foreach ($page['check_integrity'] as $i => $c13y)
      {
        if (!empty($c13y['correction_fct']) and 
            $c13y['is_callable'] and
            in_array($c13y['id'], $_POST['c13y_selection']))
        {
          if (is_array($c13y['correction_fct_args']))
          {
            $args = $c13y['correction_fct_args'];
          }
          else
          if (!is_null($c13y['correction_fct_args']))
          {
            $args = array($c13y['correction_fct_args']);
          }
          else
          {
            $args = array();
          }
          $page['check_integrity'][$i]['corrected'] = call_user_func_array($c13y['correction_fct'], $args);
          
          if ($page['check_integrity'][$i]['corrected'])
          {
            $corrected_count += 1;
          }
          else
          {
            $not_corrected_count += 1;
          }
        }
      }

      if ($corrected_count > 0)
      {
        $page['infos'][] =
          l10n_dec('c13y_anomaly_corrected_count', 'c13y_anomalies_corrected_count',
            $corrected_count);
      }
      if ($not_corrected_count > 0)
      {
        $page['errors'][] =
          l10n_dec('c13y_anomaly_not_corrected_count', 'c13y_anomalies_not_corrected_count',
            $not_corrected_count);
      }
    }
  }
}

/**
 * Display anomalies list
 *
 * @param void
 * @return void
 */
function display_check_integrity()
{
  global $template, $page;

  $show_submit = false;

  if (isset($page['check_integrity']) and count($page['check_integrity']) > 0)
  {
    $template->set_filenames(array('check_integrity' => 'admin/check_integrity.tpl'));

    foreach ($page['check_integrity'] as $i => $c13y)
    {
      $template->assign_block_vars('c13y',
        array(
         'CLASS' => ($i % 2 == 1) ? 'row2' : 'row1',
         'ID' => $c13y['id'],
         'ANOMALY' => $c13y['anomaly']
        ));

      if (!empty($c13y['correction_fct']))
      {
        if (isset($c13y['corrected']))
        {
          if ($c13y['corrected'])
          {
            $template->assign_block_vars('c13y.correction_success_fct', array());
          }
          else
          {
            $template->assign_block_vars('c13y.correction_error_fct',
              array('WIKI_FOROM_LINKS' => get_htlm_links_more_info()));
          }
        }
        else if ($c13y['is_callable'])
        {
          $template->assign_block_vars('c13y.correction_fct', array());
          $show_submit = true;
        }
        else
        {
          $template->assign_block_vars('c13y.correction_bad_fct', array());
        }
      }

      if (!empty($c13y['correction_fct']) and !empty($c13y['correction_msg']))
      {
        $template->assign_block_vars('c13y.br', array());
      }

      if (!empty($c13y['correction_msg']) and !isset($c13y['corrected']))
      {
        $template->assign_block_vars('c13y.correction_msg',
          array(
           'DATA' => nl2br($c13y['correction_msg'])
          ));
      }
    }

    if ($show_submit)
    {
      $template->assign_block_vars('c13y_submit', array());
    }

    $template->concat_var_from_handle('ADMIN_CONTENT', 'check_integrity');
  }
}

/**
 * Returns structured anomaly data
 *
 * @param anomaly arguments
 * @return c13y anomaly array
 */
function get_c13y($anomaly, $correction_fct = null, $correction_fct_args = null, $correction_msg = null)
{
  return
    array(
      'id' => md5($anomaly.$correction_fct.serialize($correction_fct_args).$correction_msg),
      'anomaly' => $anomaly,
      'correction_fct' => $correction_fct,
      'correction_fct_args' => $correction_fct_args,
      'correction_msg' => $correction_msg,
      'is_callable' => is_callable($correction_fct));
}

/**
 * Returns links more informations
 *
 * @param void
 * @return html links
 */
function get_htlm_links_more_info()
{
  $pwg_links = pwg_URL();
  $link_fmt = '<a href="%s" onclick="window.open(this.href, \'\'); return false;">%s</a>';
  return
    sprintf
    (
      l10n('c13y_more_info'),
      sprintf($link_fmt, $pwg_links['FORUM'], l10n('c13y_more_info_forum')),
      sprintf($link_fmt, $pwg_links['WIKI'], l10n('c13y_more_info_wiki'))
    );
}

/**
 * Check exif
 *
 * @param c13y anomalies array
 * @return c13y anomalies array
 */
function c13y_exif($c13y_array)
{
  global $conf;

  foreach (array('show_exif', 'use_exif') as $value)
  {
    if (($conf[$value]) and (!function_exists('read_exif_data')))
    {
      $c13y_array[] = get_c13y(
        sprintf(l10n('c13y_exif_anomaly'), '$conf[\''.$value.'\']'),
        null,
        null,
        sprintf(l10n('c13y_exif_correction'), '$conf[\''.$value.'\']')
        .'<BR />'.
        get_htlm_links_more_info());
    }
  }

  return $c13y_array;
}

/**
 * Check user
 *
 * @param c13y anomalies array
 * @return c13y anomalies array
 */
function c13y_user($c13y_array)
{
  global $conf;

  $c13y_users = array();
  $c13y_users[$conf['guest_id']] = array(
    'status' => 'guest',
    'l10n_non_existent' => 'c13y_guest_non_existent',
    'l10n_bad_status' => 'c13y_bad_guest_status');

  if ($conf['guest_id'] != $conf['default_user_id'])
  {
    $c13y_users[$conf['default_user_id']] = array(
      'password' => null,
      'l10n_non_existent' => 'c13y_default_non_existent');
  }
  
  $c13y_users[$conf['webmaster_id']] = array(
    'status' => 'webmaster',
    'l10n_non_existent' => 'c13y_webmaster_non_existent',
    'l10n_bad_status' => 'c13y_bad_webmaster_status');

    $query = '
select u.'.$conf['user_fields']['id'].' as id, ui.status
from '.USERS_TABLE.' as u
  left join '.USER_INFOS_TABLE.' as ui
      on u.'.$conf['user_fields']['id'].' = ui.user_id
where 
  u.'.$conf['user_fields']['id'].' in ('.implode(',', array_keys($c13y_users)).')
;';


  $status = array();

  $result = pwg_query($query);
  while ($row = mysql_fetch_array($result))
  {
    $status[$row['id']] = $row['status'];
  }

  foreach ($c13y_users as $id => $data)
  {
    if (!array_key_exists($id, $status))
    {
      $c13y_array[] = get_c13y(l10n($data['l10n_non_existent']), 'c13y_correction_user',
        array('id' => $id, 'action' => 'creation'));
    }
    else
    if (!empty($data['status']) and $status[$id] != $data['status'])
    {
      $c13y_array[] = get_c13y(l10n($data['l10n_bad_status']), 'c13y_correction_user',
        array('id' => $id, 'action' => 'status'));
    }
  }

  return $c13y_array;
}

/**
 * Check exif
 *
 * @param user_id, action
 * @return boolean true if ok else false
 */
function c13y_correction_user($id, $action)
{
  global $conf, $page;

  $result = false;

  if (!empty($id))
  {
    switch ($action)
    {
      case 'creation':
        if ($id == $conf['guest_id'])
        {
          $name = 'guest';
          $password = null;
        }
        else if  ($id == $conf['default_user_id'])
        {
          $name = 'guest';
          $password = null;
        }
        else if  ($id == $conf['webmaster_id'])
        {
          $name = 'webmaster';
          $password = generate_key(6);
        }

        if (isset($name))
        {
          $name_ok = false;
          while (!$name_ok)
          {
            $name_ok = (get_userid($name) === false);
            if (!$name_ok)
            {
              $name .= generate_key(1);
            }
          }
          
          $inserts = array(
            array(
              'id'       => $id,
              'username' => $name,
              'password' => $password
              ),
            );
          mass_inserts(USERS_TABLE, array_keys($inserts[0]), $inserts);

          create_user_infos($id);

          $page['infos'][] = sprintf(l10n('c13y_user_created'), $name, $password);

          $result = true;
        }
        break;
      case 'status':
        if ($id == $conf['guest_id'])
        {
          $status = 'guest';
        }
        else if  ($id == $conf['default_user_id'])
        {
          $status = 'guest';
        }
        else if  ($id == $conf['webmaster_id'])
        {
          $status = 'webmaster';
        }

        if (isset($status))
        {
          $updates = array(
            array(
              'user_id' => $id,
              'status'  => $status
              ),
            );
          mass_updates(USER_INFOS_TABLE,
            array('primary' => array('user_id'),'update' => array('status')),
            $updates);

          $page['infos'][] = sprintf(l10n('c13y_user_status_updated'), get_username($id));

          $result = true;
        }
        break;
    }
  }

  return $result;
}

?>