<?php

/***********************************************************************

  Copyright (C) 2002-2008  PunBB.org

  This file is part of PunBB.

  PunBB 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; either version 2 of the License,

  or (at your option) any later version.

  PunBB 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

************************************************************************/

// Make sure no one attempts to run this script "directly"

if (!defined('PUN'))

	exit;

// Check for Enano authentication

global $db, $session, $paths, $template, $plugins; // Common objects

if ( $session->auth_level < USER_LEVEL_ADMIN )

{

  redirect(makeUrlComplete('Special', 'Login/' . $paths->fullpage, 'level=' . $session->user_level, false), 'Permission denied', 'Re-auth needed.', 0);

}

//

// Display the admin navigation menu

//

function generate_admin_menu()

{

	global $pun_config, $pun_url, $pun_user, $lang_admin, $db_type;

  global $db, $session, $paths, $template, $plugins; // Common objects

	$adnav_sublinks = array();

	if ($session->user_level < USER_LEVEL_ADMIN)

	{

		$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-information') ? ' class="li-first isactive">' : ' class="li-first">').'<a href="'.pun_link($pun_url['admin_index']).'">'.$lang_admin['Information'].'</span></a></li>';

		$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-users') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_users']).'">'.$lang_admin['User search'].'</a></li>';

		$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-censoring') ? ' class="isactive">' : '>').'<a href="'.pun_link($pun_url['admin_censoring']).'">'.$lang_admin['Censoring'].'</a></li>';

		$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-reports') ? ' class="isactive">' : '>').'<a href="'.pun_link($pun_url['admin_reports']).'">'.$lang_admin['Reports'].'</a></li>';

		if ($pun_user['g_mod_ban_users'] == '1')

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-bans') ? ' class="isactive">' : '>').'<a href="'.pun_link($pun_url['admin_bans']).'">'.$lang_admin['Bans'].'</a></li>';

	}

	else

	{

		if (PUN_PAGE_SECTION == 'start')

		{

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-information') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_index']).'">'.$lang_admin['Information'].'</a></li>';

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-categories') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_categories']).'">'.$lang_admin['Categories'].'</a></li>';

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-forums') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_forums']).'">'.$lang_admin['Forums'].'</a></li>';

		}

		else if (PUN_PAGE_SECTION == 'users')

		{

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-users') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_users']).'">'.$lang_admin['Searches'].'</a></li>';

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-groups') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_groups']).'">'.$lang_admin['Groups'].'</a></li>';

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-ranks') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_ranks']).'">'.$lang_admin['Ranks'].'</a></li>';

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-bans') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_bans']).'">'.$lang_admin['Bans'].'</a></li>';

		}

		else if (PUN_PAGE_SECTION == 'options')

		{

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-options-setup') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_options_setup']).'">'.$lang_admin['Setup'].'</a></li>';

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-options-features') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_options_features']).'">'.$lang_admin['Features'].'</a></li>';

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-options-email') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_options_email']).'">'.$lang_admin['E-mail'].'</a></li>';

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-options-registration') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_options_registration']).'">'.$lang_admin['Registration'].'</a></li>';

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-censoring') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_censoring']).'">'.$lang_admin['Censoring'].'</a></li>';

		}

		else if (PUN_PAGE_SECTION == 'management')

		{

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-reports') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_reports']).'">'.$lang_admin['Reports'].'</a></li>';

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-prune') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_prune']).'">'.$lang_admin['Prune topics'].'</a></li>';

			if ($db_type != 'mysql' && $db_type != 'mysqli')

				$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-reindex') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_reindex']).'">'.$lang_admin['Rebuild index'].'</a></li>';

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-options-maintenance') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_options_maintenance']).'">'.$lang_admin['Maintenance mode'].'</a></li>';

		}

		else if (PUN_PAGE_SECTION == 'extensions')

		{

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-extensions-manage') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_extensions_manage']).'">'.$lang_admin['Manage extensions'].'</a></li>';

			$adnav_sublinks[] = '<li'.((PUN_PAGE == 'admin-extensions-install') ? ' class="isactive"' : '').'><a href="'.pun_link($pun_url['admin_extensions_install']).'">'.$lang_admin['Install extensions'].'</a></li>';

		}

	}

	($hook = get_hook('ca_admin_menu_new_sublink')) ? eval($hook) : null;

	if (count($adnav_sublinks) > 1)

		$adnav_submenu = "\n\t\t\t\t".'<div><ul>'."\n\t\t\t\t\t".implode("\n\t\t\t\t\t", $adnav_sublinks)."\n\t\t\t\t".'</ul></div>';

	else

		$adnav_submenu = '';

	if ($session->user_level < USER_LEVEL_ADMIN)

		$adnav_links[] = '<li class="topactive"><a href="'.pun_link($pun_url['admin_index']).'"><span>'.$lang_admin['Moderate'].'</span></a>'.$adnav_submenu."\n\t\t\t".'</li>';

	else

	{

		$adnav_links[] = '<li'.((PUN_PAGE_SECTION == 'start') ? ' class="topactive"' : '').'><a href="'.pun_link($pun_url['admin_index']).'"><span>'.$lang_admin['Start'].'</span></a>'.(((PUN_PAGE_SECTION == 'start') && ($adnav_submenu != '')) ? $adnav_submenu."\n\t\t\t" : '').'</li>';

		$adnav_links[] = '<li'.((PUN_PAGE_SECTION == 'options') ? ' class="topactive"' : '').'><a href="'.pun_link($pun_url['admin_options_setup']).'"><span>'.$lang_admin['Settings'].'</span></a>'.(((PUN_PAGE_SECTION == 'options') && ($adnav_submenu != '')) ? $adnav_submenu."\n\t\t\t" : '').'</li>';

		$adnav_links[] = '<li'.((PUN_PAGE_SECTION == 'users') ? ' class="topactive"' : '').'><a href="'.pun_link($pun_url['admin_users']).'"><span>'.$lang_admin['Users'].'</span></a>'.(((PUN_PAGE_SECTION == 'users') && ($adnav_submenu != '')) ? $adnav_submenu."\n\t\t\t" : '').'</li>';

		$adnav_links[] = '<li'.((PUN_PAGE_SECTION == 'management') ? ' class="topactive"' : '').'><a href="'.pun_link($pun_url['admin_reports']).'"><span>'.$lang_admin['Management'].'</span></a>'.(((PUN_PAGE_SECTION == 'management') && ($adnav_submenu != '')) ? $adnav_submenu."\n\t\t\t" : '').'</li>';

		$adnav_links[] = '<li'.((PUN_PAGE_SECTION == 'extensions') ? ' class="topactive"' : '').'><a href="'.pun_link($pun_url['admin_extensions_manage']).'"><span>'.$lang_admin['Extensions'].'</span></a>'.(((PUN_PAGE_SECTION == 'extensions') && ($adnav_submenu != '')) ? $adnav_submenu."\n\t\t\t" : '').'</li>';

	}

?>

	<div class="main-nav<?php if ($adnav_submenu != '') echo ' submenu' ?>">

		<ul>

			<?php echo implode("\n\t\t\t", $adnav_links)."\n" ?>

		</ul>

	</div>

<?php

}

//

// Delete topics from $forum_id that are "older than" $prune_date (if $prune_sticky is 1, sticky topics will also be deleted)

//

function prune($forum_id, $prune_sticky, $prune_date)

{

	global $pun_db, $db_type;

	// Fetch topics to prune

	$query = array(

		'SELECT'	=> 't.id',

		'FROM'		=> 'topics AS t',

		'WHERE'		=> 't.forum_id='.$forum_id

	);

	if ($prune_date != -1)

		$query['WHERE'] .= ' AND last_post<'.$prune_date;

	if (!$prune_sticky)

		$query['WHERE'] .= ' AND sticky=\'0\'';

	($hook = get_hook('ca_qr_get_topics_to_prune')) ? eval($hook) : null;

	$result = $pun_db->query_build($query, true) or error(__FILE__, __LINE__);

	$topic_ids = '';

	while ($row = $pun_db->fetch_row($result))

		$topic_ids .= (($topic_ids != '') ? ',' : '').$row[0];

	if ($topic_ids != '')

	{

		// Fetch posts to prune (used lated for updating the search index)

		$query = array(

			'SELECT'	=> 'p.id',

			'FROM'		=> 'posts AS p',

			'WHERE'		=> 'p.topic_id IN('.$topic_ids.')'

		);

		($hook = get_hook('ca_qr_get_posts_to_prune')) ? eval($hook) : null;

		$result = $pun_db->query_build($query, true) or error(__FILE__, __LINE__);

		$post_ids = '';

		while ($row = $pun_db->fetch_row($result))

			$post_ids .= (($post_ids != '') ? ',' : '').$row[0];

		// Delete topics

		$query = array(

			'DELETE'	=> 'topics',

			'WHERE'		=> 'id IN('.$topic_ids.')'

		);

		($hook = get_hook('ca_qr_prune_topics')) ? eval($hook) : null;

		$pun_db->query_build($query) or error(__FILE__, __LINE__);

		// Delete posts

		$query = array(

			'DELETE'	=> 'posts',

			'WHERE'		=> 'topic_id IN('.$topic_ids.')'

		);

		($hook = get_hook('ca_qr_prune_posts')) ? eval($hook) : null;

		$pun_db->query_build($query) or error(__FILE__, __LINE__);

		// Delete subscriptions

		$query = array(

			'DELETE'	=> 'subscriptions',

			'WHERE'		=> 'topic_id IN('.$topic_ids.')'

		);

		($hook = get_hook('ca_qr_prune_subscriptions')) ? eval($hook) : null;

		$pun_db->query_build($query) or error(__FILE__, __LINE__);

		// We removed a bunch of posts, so now we have to update the search index

		if ($db_type != 'mysql' && $db_type != 'mysqli')

		{

			require_once PUN_ROOT.'include/search_idx.php';

			strip_search_index($post_ids);

		}

	}

}

($hook = get_hook('ca_new_function')) ? eval($hook) : null;