<?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.                                                                  |
// +-----------------------------------------------------------------------+

// ***************************************************************************
// ** evntcats_admin_funcs.php : Admin functions (include)                  **
// ** for Piwigo plugin Event Cats                                          **
// ***************************************************************************

// +-----------------------------------------------------------------------+
// | Header                                                                |
// +-----------------------------------------------------------------------+

global $conf, $page;

// +-----------------------------------------------------------------------+
// | Utilities functions                                                   |
// +-----------------------------------------------------------------------+

/*
 * ec_end1()
 * Process repetitive task when error in database modifying functions.
 *
 * @param
 *   $pst : $_POST argument
 *   $msg : message
 * @return
 *   false as this function is used when there is a problem
 */
function ec_end1($pst, $msg) {
  global $page;
  if (isset($_POST[$pst]))
   $page['errors'][] =
    l10n($msg).
    '$_POST[\''.$pst.'\'] = '.
    $_POST[$pst];
  else
    $page['errors'][] =
    l10n($msg).
    '$_POST[\''.$pst.'\'] unset';
  return false;
}

/*
 * ec_create_user_OK()
 * Creates new generic user and eventually new group as described in $_POST.
 *
 * @param
 *   no param needed
 * @return
 *   the created user_id or false whether all operations suceeded or not
 */
function ec_create_user_OK() {
  global $page;
  
  // This function assumes that the validity of the different indexes it uses,
  // have been checked before it is used.
  
  // User creation, as generic
  $ec_user_id = false;
  $page['errors'] = register_user(
   $_POST['login'], $_POST['password'], '', false
  );
  if (
    count($page['errors']) != 0 or
    !($ec_user_id = get_userid($_POST['login']))
  ) {
    array_unshift($page['errors'], l10n('ec_user_create_pb'));
    return false;
  }
  else
   $page['infos'][] = l10n('ec_user_create_OK').$_POST['login'];
  if (
    pwg_query("
      UPDATE `".USER_INFOS_TABLE."`
      SET `status` = 'generic'
      WHERE `user_id` = ".$ec_user_id.";
    ") !== false
  )
   $page['infos'][] = l10n('ec_user_generic_OK').$_POST['login'];
  else
   $page['errors'][] =l10n('ec_user_generic_pb').$_POST['login'];
  
  // New group creation if required,
  // and association with user_id at the same time
  if (
    isset($_POST['ec_in_up_newgroup']) and
    isset($_POST['groupname']) and
    $_POST['groupname'] != ''
  ) {
    $t2 = 0; $t3 = false; $t4 = false;
    while (
      !($t3 = mysql_fetch_row(pwg_query("
        SELECT `id`
        FROM `".GROUPS_TABLE."`
        WHERE `name` = '".$_POST['groupname']."';
      "))) and
      $t2++ == 0
    ) $t4 = pwg_query("
        INSERT INTO `".GROUPS_TABLE."` (`name`, `is_default`)
        VALUES ('".$_POST['groupname']."', 'false');
      ");
    if ($t4)
     $page['infos'][]=l10n('ec_group_create_OK').$_POST['groupname'];
    if (!$t3)
     $page['errors'][] =
      l10n('ec_group_create_pb').' (1) ; '.
      'MySQL error '.mysql_errno().', "'.mysql_error().'"';
    if (
      pwg_query("
        INSERT INTO `".USER_GROUP_TABLE."` (`user_id`, `group_id`)
        VALUES ('".$ec_user_id."', '".$t3[0]."');
      ") === false
    ) $page['errors'][] =
     l10n('ec_group_create_pb').' (2) ; '.
     'MySQL error '.mysql_errno().', "'.mysql_error().'"';
    else
     $page['infos'][] =
      $_POST['login'].
      l10n('ec_group_create_OK2').
      $_POST['groupname']
     ;
  }
  return $ec_user_id;
}

// +-----------------------------------------------------------------------+
// | Tables building functions                                             |
// +-----------------------------------------------------------------------+

/*
 * build_ec_duplicable_codes()
 * 
 *
 * @param
 *   no parameter passed, the main material on which works the function, is
 *   the global array variable $ec_lists.
 * @return
 *   (no return value)
 */
function build_ec_duplicable_codes() {
  global $ec_lists, $template;
  $ec_lists['duplicable_codes'] = array();
  $t                            = array();
  foreach ($ec_lists['ec_table'] as $ec_entry) {
    if (
      is_in($ec_entry['action'], 'ec_ok') and
      $ec_entry['forced'] == 'false'
    ) {
      $t[$ec_entry['id']] = $ec_entry['code'];
      $ec_lists['duplicable_codes']['codes'][$ec_entry['code']]['id'] =
       $ec_entry['id'];
      $ec_lists['duplicable_codes']['codes'][$ec_entry['code']]['user_id'] =
       $ec_entry['user_id'];
    }
  }
  foreach ($t as $ec_id => $ec_code) {
    $ec_lists['duplicable_codes']['ids'][$ec_id] =
     $ec_lists['duplicable_codes']['codes'][$ec_code]['id'];
  }
  
  // Builds a category list displayed a best way
  build_ec_categories(false);
}

// +-----------------------------------------------------------------------+
// | Database modifying functions                                          |
// +-----------------------------------------------------------------------+

/*
 * ec_create_entry_OK()
 * returns true or false whether the creation of a new entry described by
 * $_POST was OK or not.
 *
 * @param
 *   no param
 * @return
 *   true if creation was OK ; false if not
 */
function ec_create_entry_OK() {
  global $page, $ec_lists;
  
  // $_POST validity checks : creation prevented in case of bad arguments
  if (
    !isset($_POST['ec_in_up_code']) or
    !ereg('^[a-zA-Z0-9_-]{4,32}$', $_POST['ec_in_up_code'])
  ) return ec_end1('ec_in_up_code', 'ec_bad_argument7');
  
  foreach ($ec_lists['ec_table'] as $ec_entry)
   if ($_POST['ec_in_up_code'] == $ec_entry['code'])
    return ec_end1('ec_in_up_code', 'ec_bad_argument2');
  
  if (
    !isset($_POST['ec_sel_user']) or (
      $_POST['ec_sel_user'] != 'new' and
      $_POST['ec_sel_user'] != 'old'
    )
  ) return ec_end1('ec_sel_user', 'ec_bad_argument1');
  
  if ($_POST['ec_sel_user'] == 'new') {
    if (
      !isset($_POST['login']) or
      $_POST['login'] == ''
    ) return ec_end1('login', 'ec_bad_argument1');
    if (in_array($_POST['login'], $ec_lists['user_ids']))
     return ec_end1('login', 'ec_bad_argument3');
  }
  else {
    if (!isset($_POST['ec_in_up_usr_list']))
     return ec_end1('login', 'ec_bad_argument1');
    $ec_user_id = $_POST['ec_in_up_usr_list'];
    if (!array_key_exists($ec_user_id, $ec_lists['user_ids']))
     return ec_end1('ec_in_up_usr_list', 'ec_bad_argument6');
  }
  
  // code and user_id (if needed) are OK, creation can be done
  
  // User and eventually group creation, if needed
  if ($_POST['ec_sel_user'] == 'new')
   if (!($ec_user_id = ec_create_user_OK())) return false;
  
  // Preparation of $arg1, $arg2 and $forced
  $arg1 = ''; $arg2 = '';
  if (isset($_POST['ec_input_action'])) switch ($_POST['ec_input_action']) {
    // case 'home':  // Home : nothing to do : "arg"s are ''
    case 'add_p': // Additional Page
      if (isset($_POST['ec_in_up_aps'])) $arg2 = $_POST['ec_in_up_aps'];
      else ec_end1('ec_in_up_aps', 'ec_bad_argument1');
    break;
    case 'cat':   // Category
    case 'img':   // Image
      if (isset($_POST['ec_in_up_cat'])) {
        $arg1 = $_POST['ec_in_up_cat'];
        if ($_POST['ec_input_action'] == 'img') {
          if (isset($_POST['ec_in_up_img'])) $arg2 = $_POST['ec_in_up_img'];
          else ec_end1('ec_in_up_img', 'ec_bad_argument1');
        }
      }
      else ec_end1('ec_in_up_cat', 'ec_bad_argument1');
    break;
    default: ec_end1('ec_input_action', 'ec_bad_argument1');
  }
  else ec_end1('ec_input_action', 'ec_bad_argument1');
  $forced = (isset($_POST['ec_in_up_forced'])) ? 'true' : 'false';
  
  // Now we have the code, the user_id, arg1, arg2, and forced arguments
  if (
    pwg_query("
      INSERT INTO `".EVNTCATS_TABLE."` (
        `code`,
        `user_id`,
        `action`,
        `arg1`, `arg2`, `forced`
      )
      VALUES (
        '".$_POST['ec_in_up_code']."',
        '".$ec_user_id."',
        'ec_ok',
        '".$arg1."', '".$arg2."', '".$forced."'
      );
    ") === false
  ) {
    $page['errors'][] =
     l10n('ec_entry_create_pb').
     'MySQL error '.mysql_errno().', "'.mysql_error().'"'
    ;
    return false;
  }
  else {
    build_ec_lists();
    $forced = ($forced == 'false') ? '' : l10n('ec_cnfrm_forced');
    $page['infos'][] =
     l10n('ec_entry_create_OK').mysql_insert_id().' : '.
     $_POST['ec_in_up_code'].' => '.
     $ec_lists['user_ids'][$ec_user_id].$forced
    ;
    return true;
  }
}

/*
 * ec_duplicate_entry_OK()
 * returns true or false whether the duplication of an existing entry which #
 * is given by $_POST['ec_entry_sel'] was OK or not.
 *
 * @param
 *   no param
 * @return
 *   true if creation was OK ; false if not
 */
function ec_duplicate_entry_OK() {
  global $page, $ec_lists;
  
  build_ec_duplicable_codes();
  if (array_key_exists($_POST['ec_entry_sel'],
   $ec_lists['duplicable_codes']['ids'])) {
    $arg1 = ''; $arg2 = '';
    switch ($_POST['ec_input_action']) {
      // case 'home':  // Home : nothing to do : "arg"s are ''
      case 'add_p':
        if (array_key_exists($_POST['ec_in_up_aps'],$ec_lists['add_pages'])) {
         $arg2 = $_POST['ec_in_up_aps']; }
        else return ec_end1('ec_in_up_aps', 'ec_bad_argument4');
      case 'img':
      case 'cat':
        if (array_key_exists($_POST['ec_in_up_cat'],
         $ec_lists['categories'])) {
          if ($_POST['ec_input_action'] == 'img') {
            if (
             ec_image_exists($_POST['ec_in_up_cat'], $_POST['ec_in_up_img'])
            ) $arg2 = $_POST['ec_in_up_img'];
            else return ec_end1('ec_in_up_img', 'ec_bad_argument4');
          }
          $arg1 = $_POST['ec_in_up_cat'];
        }
        else return ec_end1('ec_in_up_cat', 'ec_bad_argument4');
      break;
      default: return ec_end1('ec_input_action', 'ec_bad_argument1');
    }
    if (
      pwg_query("
        INSERT INTO `".EVNTCATS_TABLE."`
         (`code`, `user_id`, `action`, `arg1`, `arg2`)
        VALUES (
          '".$ec_lists['ec_table'][$_POST['ec_entry_sel']]['code']."',
          '".$ec_lists['ec_table'][$_POST['ec_entry_sel']]['user_id']."',
          'ec_ok',
          '".$arg1."',
          '".$arg2."'
        );
      ") === false
    ) {
      $page['errors'][] =
       l10n('ec_entry_dup_nok_pre1').
       $_POST['ec_entry_sel'].
       l10n('ec_entry_dup_nok_end1').
       'MySQL error '.mysql_errno().', "'.mysql_error().'"'
      ;
      return false;
    }
    else {
      $page['infos'][] =
       l10n('ec_entry_dup_ok_pre').
       $_POST['ec_entry_sel'].' ('.
       $ec_lists['ec_table'][$_POST['ec_entry_sel']]['code'].')'.
       l10n('ec_entry_dup_ok_end')
      ;
      build_ec_table();
      return true;
    }
  }
  else return ec_end1('ec_entry_sel', 'ec_bad_argument5');
}

/*
 * ec_modify_entry_OK()
 * returns true or false whether the modification of an existing entry which #
 * is given by $_POST['ec_entry_sel'] was OK or not.
 *
 * @param
 *   no param
 * @return
 *   true if modification was OK ; false if not
 */
function ec_modify_entry_OK() {
  global $page;
  $page['errors'][] = 'Y\'a pas eu une erreur ?...';
  return false;
}

/*
 * ec_toggle_forced_entry()
 * Toggles the 'forced' property of an entry, provided it complies to the
 * rules.
 *
 * @param
 *   no param
 * @return
 *   no return value
 */
function ec_toggle_forced_entry() {
  global $page;
  $page['errors'][] = 'ec_toggle_forced_entry';
}

/*
 * ec_delete_entry()
 * tries to delete an existing entry which # is given by
 * $_POST['ec_entry_sel'].
 *
 * @param
 *   no param
 * @return
 *   no return value : modifies $page['errors'] or $page['infos']
 */
function ec_delete_entry() {
  global $page, $ec_lists;
  if (array_key_exists($_POST['ec_entry_sel'], $ec_lists['ec_table'])) {
    if (!pwg_query('
      DELETE FROM `'.EVNTCATS_TABLE.'`
      WHERE `id` = '.$_POST['ec_entry_sel']
    )) {
      $page['errors'][] =
        l10n('ec_entry_del_nok_pre').
        $_POST['ec_entry_sel'].
        l10n('ec_entry_del_nok_end').
        'MySQL error '.mysql_errno().', "'.mysql_error().'"'
      ;
    }
    else {
      $page['infos'][] =
        l10n('ec_entry_del_ok_pre').
        $_POST['ec_entry_sel'].
        l10n('ec_entry_del_ok_end');
      build_ec_table();
    }
  }
  else ec_end1('ec_entry_sel', 'ec_bad_argument1');
}

?>