<?php

/*
Plugin Name: Event Cats
Version: 1.0.0
Description: A single URL can be enough to be identified, and a user can duplicate his account to create a new one getting immediately the same properties. / On peut être identifié grâce à un simple URL, et on peut dupliquer son compte pour créer un nouveau compte ayant immédiatement les mêmes propriétés.
Plugin URI: http://piwigo.org/svn/extensions/event_cats
Author: P@t, LucMorizur
Author URI: http://www.gauchon.fr, http://lucmorizur.free.fr
*/

// +-----------------------------------------------------------------------+
// | 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!');

// pour faciliter le debug - make debug easier :o)
//ini_set('error_reporting', E_ALL);
//ini_set('display_errors', true);

global
  $conf, $prefixeTable,
  $ec_ap_ok;   // whether Additional Pages is installed and activated

define('EVNTCATS_INFO_VERSION','1.0.0');
define('EVNTCATS_PATH',PHPWG_PLUGINS_PATH.basename(dirname(__FILE__)). '/');
define('EVNTCATS_TABLE',$prefixeTable.'event_cats');
define('ROOT_URL',get_absolute_root_url());

$ec_ap_ok = defined('AP_DIR');

if (!isset($ec_lists)) {
  $ec_lists = array();
}

include_once(EVNTCATS_PATH.'include/evntcats_funcs.inc.php');

class event_cats {
// Sets the administration panel of the plugin
  function plugin_admin_menu($menu) {
    array_push($menu,
      array(
        'NAME' => 'Event Cats',
        'URL'  => get_admin_plugin_menu_link(dirname(__FILE__).
                  '/admin/evntcats_admin.php')
      )
    );
    return $menu;
  }
} // End class

$obj = new event_cats();

// Admin help management
add_event_handler('get_popup_help_content', 'ec_popup_help_content',
 EVENT_HANDLER_PRIORITY_NEUTRAL, 2);

function ec_popup_help_content($popup_help_content, $page) {
  return (
   $help_content = ($page == 'event_cats' and is_admin()) ?
    load_language('help.html', EVNTCATS_PATH, array('return' => true)) : false
  ) ? $popup_help_content.$help_content : $popup_help_content;
}

//----------------------------------

/**
 *
 * auto_log_user()
 * the function uses the value of the argument "autolog" of the posted URL, as a code
 * to know which username has to be logged in.
 *
 * @param no parameter
 * @return no return value
 */

add_event_handler('init', 'auto_log_user');

function auto_log_user() {
  global $ec_lists;

  $ec_ap  = NULL;
  $ec_cat = NULL;
  $ec_img = NULL;

  if (isset($_GET['autolog']) and (read_ec_conf('activated') == 1)) {
    if (!is_a_guest()) {
      $url = '';
      foreach ($_GET as $item => $value) {
        $url.= '&'.$item.'='.$value;
      }
      logout_user();
      redirect(make_index_url().$url);
    }
    build_ec_lists();
    foreach ($ec_lists['ec_table'] as $ec_entry) {
      if ($code_exists = ($ec_entry['code'] == $_GET['autolog'])) break;
    }
    if ($code_exists) {
      if (is_in($ec_entry['action'], 'ec_ok')) {
        log_user($ec_entry['user_id'], false);
        if (isset($_GET['ap'])) $ec_ap = $_GET['ap'];
        if (isset($_GET['cat'])) $ec_cat = $_GET['cat'];
        if (isset($_GET['img'])) $ec_img = $_GET['img'];
        if (
         $ec_entry['forced'] == 'true' and
         !is_in($ec_entry['action'], '_f_pb')
        ) {
          if (empty($ec_entry['arg1']) and !empty($ec_entry['arg2'])) {
            $ec_ap = $ec_entry['arg2'];
          }
          elseif (!empty($ec_entry['arg1'])) {
            $ec_cat = $ec_entry['arg1'];
            if (!empty($ec_entry['arg2'])) $ec_img = $ec_entry['arg2'];
          }
        }
        if (isset($ec_ap)) {
          if (array_key_exists($ec_ap,$ec_lists['add_pages'])) {
            redirect(
             PHPWG_ROOT_PATH.'index.php?/additional_page/'.$ec_ap);
          }
        }
        elseif (isset($ec_cat)) {
          if (array_key_exists($ec_cat, $ec_lists['categories'])) {
            if (isset($ec_img)) {
              if (mysql_fetch_row(pwg_query('
               SELECT *
               FROM `'.IMAGE_CATEGORY_TABLE.'` 
               WHERE `category_id` = '.$ec_cat.'
                AND `image_id` = '.$ec_img
              ))) {
                redirect(PHPWG_ROOT_PATH.'picture.php?/'.$ec_img.'/category/'.$ec_cat);
              }
            }
            redirect(PHPWG_ROOT_PATH.'index.php?/category/'.$ec_cat);
          }
        }
        redirect(make_index_url());
      }
      else {
        if (
         $ec_entry['action'] == 'ec_nok' or
         $ec_entry['action'] == 'ec_nok_ap_pb'
        ) {
          if ($ec_entry['action'] == 'ec_nok_ap_pb') access_denied();
          $ec_ap = $ec_entry['arg2'];
          if (array_key_exists($ec_ap, $ec_lists['add_pages'])) {
            redirect(
             PHPWG_ROOT_PATH.'index.php?/additional_page/'.$ec_ap);
          }
          access_denied();
        }
        else {
          redirect(make_index_url());
        }
      }
    }
    else {
      if (
       read_ec_conf('unknown_code') == 2 and
        array_key_exists(
         read_ec_conf('unknown_code_ap_id'), $ec_lists['add_pages']
        )
       ) {
        redirect(
         PHPWG_ROOT_PATH.
         'index.php?/additional_page/'.read_ec_conf('unknown_code_ap_id')
        );
      }
      elseif (read_ec_conf('unknown_code') == 1 or
       read_ec_conf('unknown_code') == 2) {
        access_denied();
      }
      else {
        redirect(make_index_url());
      }
    }
  }
}

/**
 *
 * assign_perm_for_new_user()
 * copies/paste groups+access+properties associations of previously connected
 * username, to newly created username.
 *
 * @param no parameter
 * @return no return value
 */

add_event_handler('register_user', 'assign_perm_for_new_user');

function assign_perm_for_new_user($new_user)
{
  global $user;

  if (!is_a_guest() and !is_admin())
  {
    // User access
    $query = 'SELECT cat_id FROM '.USER_ACCESS_TABLE.' WHERE user_id = '.$user['id'].';';
    $result = pwg_query($query);
    $insert = array();
    while ($row = mysql_fetch_assoc($result))
    {
      $insert[] = '('.$new_user['id'].','.$row['cat_id'].')';
    }
    if (!empty($insert))
    {
      pwg_query('INSERT INTO '.USER_ACCESS_TABLE.' VALUES '.implode(',', $insert).';');
    }

    // User groups
    $query = 'SELECT group_id FROM '.USER_GROUP_TABLE.' WHERE user_id = '.$user['id'].';';
    $result = pwg_query($query);
    $insert = array();
    while ($row = mysql_fetch_assoc($result))
    {
      $insert[] = '('.$new_user['id'].','.$row['group_id'].')';
    }
    if (!empty($insert))
    {
      pwg_query('INSERT INTO '.USER_GROUP_TABLE.' VALUES '.implode(',', $insert).';');
    }

    // User infos
    $query = 'SELECT level FROM '.USER_INFOS_TABLE.' WHERE user_id = '.$user['id'].';';
    $result = pwg_query($query);
    $insert = array();
    while ($row = mysql_fetch_assoc($result))
    {
      $insert[] = '('.$new_user['id'].','.$row['level'].')';
    }
    if (!empty($insert))
    {
      $query = 'UPDATE '.USER_INFOS_TABLE.' SET level = '.$user['level'].' WHERE user_id = '.$new_user['id'].';';
      pwg_query($query);
    }
  }
}

/**
 *
 * duplicate_account_url()
 * adds a link "Duplicate" in Identification block menu.
 *
 * @param no parameter
 * @return no return value
 */

add_event_handler('blockmanager_apply', 'duplicate_account_url');

function duplicate_account_url() {
  global $lang, $template;

  if (!is_admin() and !is_a_guest()) {
    $template->assign( 'U_REGISTER', get_root_url().'register.php');
    $lang['Create a new account'] = l10n('Duplicate account');
    $lang['Register'] = l10n('Duplicate');
  }
}

add_event_handler('get_admin_plugin_menu_links', array(&$obj, 'plugin_admin_menu') );
set_plugin_data($plugin['id'], $obj);

?>