/**

*

* @package acp

* @version $Id: functions_admin.php 9065 2008-11-13 17:32:55Z toonarmy $

* @copyright (c) 2005 phpBB Group

* @license http://opensource.org/licenses/gpl-license.php GNU Public License

*

*/

/**

* @ignore

*/

if (!defined('IN_PHPBB'))

{

	exit;

}

/**

* Recalculate Binary Tree

function recalc_btree($sql_id, $sql_table, $module_class = '')

{

	global $db;

	if (!$sql_id || !$sql_table)

	{

		return;

	}

	$sql_where = ($module_class) ? " WHERE module_class = '" . $db->sql_escape($module_class) . "'" : '';

	// Reset to minimum possible left and right id

	$sql = "SELECT MIN(left_id) as min_left_id, MIN(right_id) as min_right_id

		FROM $sql_table

		$sql_where";

	$result = $db->sql_query($sql);

	$row = $db->sql_fetchrow($result);

	$db->sql_freeresult($result);

	$substract = (int) (min($row['min_left_id'], $row['min_right_id']) - 1);

	if ($substract > 0)

	{

		$sql = "UPDATE $sql_table

			SET left_id = left_id - $substract, right_id = right_id - $substract

			$sql_where";

		$db->sql_query($sql);

	}

	$sql = "SELECT $sql_id, parent_id, left_id, right_id

		FROM $sql_table

		$sql_where

		ORDER BY left_id ASC, parent_id ASC, $sql_id ASC";

	$f_result = $db->sql_query($sql);

	while ($item_data = $db->sql_fetchrow($f_result))

	{

		if ($item_data['parent_id'])

		{

			$sql = "SELECT left_id, right_id

				FROM $sql_table

				$sql_where " . (($sql_where) ? 'AND' : 'WHERE') . "

					$sql_id = {$item_data['parent_id']}";

			$result = $db->sql_query($sql);

			if (!$row = $db->sql_fetchrow($result))

			{

				$sql = "UPDATE $sql_table SET parent_id = 0 WHERE $sql_id = " . $item_data[$sql_id];

				$db->sql_query($sql);

			}

			$db->sql_freeresult($result);

			$sql = "UPDATE $sql_table

				SET left_id = left_id + 2, right_id = right_id + 2

				$sql_where " . (($sql_where) ? 'AND' : 'WHERE') . "

					left_id > {$row['right_id']}";

			$db->sql_query($sql);

			$sql = "UPDATE $sql_table

				SET right_id = right_id + 2

				$sql_where " . (($sql_where) ? 'AND' : 'WHERE') . "

					{$row['left_id']} BETWEEN left_id AND right_id";

			$db->sql_query($sql);

			$item_data['left_id'] = $row['right_id'];

			$item_data['right_id'] = $row['right_id'] + 1;

		}

		else

		{

			$sql = "SELECT MAX(right_id) AS right_id

				FROM $sql_table

				$sql_where";

			$result = $db->sql_query($sql);

			$row = $db->sql_fetchrow($result);

			$db->sql_freeresult($result);

			$item_data['left_id'] = $row['right_id'] + 1;

			$item_data['right_id'] = $row['right_id'] + 2;

		}

		$sql = "UPDATE $sql_table

			SET left_id = {$item_data['left_id']}, right_id = {$item_data['right_id']}

			WHERE $sql_id = " . $item_data[$sql_id];

		$db->sql_query($sql);

	}

	$db->sql_freeresult($f_result);

}

*/

/**

* Simple version of jumpbox, just lists authed forums

*/

function make_forum_select($select_id = false, $ignore_id = false, $ignore_acl = false, $ignore_nonpost = false, $ignore_emptycat = true, $only_acl_post = false, $return_array = false)

{

	global $db, $user, $auth;

	$acl = ($ignore_acl) ? '' : (($only_acl_post) ? 'f_post' : array('f_list', 'a_forum', 'a_forumadd', 'a_forumdel'));

	// This query is identical to the jumpbox one

	$sql = 'SELECT forum_id, forum_name, parent_id, forum_type, left_id, right_id

		FROM ' . FORUMS_TABLE . '

		ORDER BY left_id ASC';

	$result = $db->sql_query($sql, 600);

	$right = 0;

	$padding_store = array('0' => '');

	$padding = '';

	$forum_list = ($return_array) ? array() : '';

	// Sometimes it could happen that forums will be displayed here not be displayed within the index page

	// This is the result of forums not displayed at index, having list permissions and a parent of a forum with no permissions.

	// If this happens, the padding could be "broken"

	while ($row = $db->sql_fetchrow($result))

	{

		if ($row['left_id'] < $right)

		{

			$padding .= '   ';

			$padding_store[$row['parent_id']] = $padding;

		}

		else if ($row['left_id'] > $right + 1)

		{

			$padding = (isset($padding_store[$row['parent_id']])) ? $padding_store[$row['parent_id']] : '';

		}

		$right = $row['right_id'];

		$disabled = false;

		if ($acl && !$auth->acl_gets($acl, $row['forum_id']))

		{

			// List permission?

			if ($auth->acl_get('f_list', $row['forum_id']))

			{

				$disabled = true;

			}

			else

			{

				continue;

			}

		}

		if (

			((is_array($ignore_id) && in_array($row['forum_id'], $ignore_id)) || $row['forum_id'] == $ignore_id)

			||

			// Non-postable forum with no subforums, don't display

			($row['forum_type'] == FORUM_CAT && ($row['left_id'] + 1 == $row['right_id']) && $ignore_emptycat)

			||

			($row['forum_type'] != FORUM_POST && $ignore_nonpost)

			)

		{

			$disabled = true;

		}

		if ($return_array)

		{

			// Include some more information...

			$selected = (is_array($select_id)) ? ((in_array($row['forum_id'], $select_id)) ? true : false) : (($row['forum_id'] == $select_id) ? true : false);

			$forum_list[$row['forum_id']] = array_merge(array('padding' => $padding, 'selected' => ($selected && !$disabled), 'disabled' => $disabled), $row);

		}

		else

		{

			$selected = (is_array($select_id)) ? ((in_array($row['forum_id'], $select_id)) ? ' selected="selected"' : '') : (($row['forum_id'] == $select_id) ? ' selected="selected"' : '');

			$forum_list .= '<option value="' . $row['forum_id'] . '"' . (($disabled) ? ' disabled="disabled" class="disabled-option"' : $selected) . '>' . $padding . $row['forum_name'] . '</option>';

		}

	}

	$db->sql_freeresult($result);

	unset($padding_store);

	return $forum_list;

}

/**

* Generate size select options

*/

function size_select_options($size_compare)

{

	global $user;

	$size_types_text = array($user->lang['BYTES'], $user->lang['KIB'], $user->lang['MIB']);

	$size_types = array('b', 'kb', 'mb');

	$s_size_options = '';

	for ($i = 0, $size = sizeof($size_types_text); $i < $size; $i++)

	{

		$selected = ($size_compare == $size_types[$i]) ? ' selected="selected"' : '';

		$s_size_options .= '<option value="' . $size_types[$i] . '"' . $selected . '>' . $size_types_text[$i] . '</option>';

	}

	return $s_size_options;

}

/**

* Generate list of groups (option fields without select)

*

* @param int $group_id The default group id to mark as selected

* @param array $exclude_ids The group ids to exclude from the list, false (default) if you whish to exclude no id

* @param int $manage_founder If set to false (default) all groups are returned, if 0 only those groups returned not being managed by founders only, if 1 only those groups returned managed by founders only.

*

* @return string The list of options.

*/

function group_select_options($group_id, $exclude_ids = false, $manage_founder = false)

{

	global $db, $user, $config;

	$exclude_sql = ($exclude_ids !== false && sizeof($exclude_ids)) ? 'WHERE ' . $db->sql_in_set('group_id', array_map('intval', $exclude_ids), true) : '';

	$sql_and = (!$config['coppa_enable']) ? (($exclude_sql) ? ' AND ' : ' WHERE ') . "group_name <> 'REGISTERED_COPPA'" : '';

	$sql_founder = ($manage_founder !== false) ? (($exclude_sql || $sql_and) ? ' AND ' : ' WHERE ') . 'group_founder_manage = ' . (int) $manage_founder : '';

	$sql = 'SELECT group_id, group_name, group_type

		FROM ' . GROUPS_TABLE . "

		$exclude_sql

		$sql_and

		$sql_founder

		ORDER BY group_type DESC, group_name ASC";

	$result = $db->sql_query($sql);

	$s_group_options = '';

	while ($row = $db->sql_fetchrow($result))

	{

		$selected = ($row['group_id'] == $group_id) ? ' selected="selected"' : '';

		$s_group_options .= '<option' . (($row['group_type'] == GROUP_SPECIAL) ? ' class="sep"' : '') . ' value="' . $row['group_id'] . '"' . $selected . '>' . (($row['group_type'] == GROUP_SPECIAL) ? $user->lang['G_' . $row['group_name']] : $row['group_name']) . '</option>';

	}

	$db->sql_freeresult($result);

	return $s_group_options;

}

/**

* Obtain authed forums list

*/

function get_forum_list($acl_list = 'f_list', $id_only = true, $postable_only = false, $no_cache = false)

{

	global $db, $auth;

	static $forum_rows;

	if (!isset($forum_rows))

	{

		// This query is identical to the jumpbox one

		$expire_time = ($no_cache) ? 0 : 600;

		$sql = 'SELECT forum_id, forum_name, parent_id, forum_type, left_id, right_id

			FROM ' . FORUMS_TABLE . '

			ORDER BY left_id ASC';

		$result = $db->sql_query($sql, $expire_time);

		$forum_rows = array();

		$right = $padding = 0;

		$padding_store = array('0' => 0);

		while ($row = $db->sql_fetchrow($result))

		{

			if ($row['left_id'] < $right)

			{

				$padding++;

				$padding_store[$row['parent_id']] = $padding;

			}

			else if ($row['left_id'] > $right + 1)

			{

				// Ok, if the $padding_store for this parent is empty there is something wrong. For now we will skip over it.

				// @todo digging deep to find out "how" this can happen.

				$padding = (isset($padding_store[$row['parent_id']])) ? $padding_store[$row['parent_id']] : $padding;

			}

			$right = $row['right_id'];

			$row['padding'] = $padding;

			$forum_rows[] = $row;

		}

		$db->sql_freeresult($result);

		unset($padding_store);

	}

	$rowset = array();

	foreach ($forum_rows as $row)

	{

		if ($postable_only && $row['forum_type'] != FORUM_POST)

		{

			continue;

		}

		if ($acl_list == '' || ($acl_list != '' && $auth->acl_gets($acl_list, $row['forum_id'])))

		{

			$rowset[] = ($id_only) ? $row['forum_id'] : $row;

		}

	}

	return $rowset;

}

/**

* Get forum branch

*/

function get_forum_branch($forum_id, $type = 'all', $order = 'descending', $include_forum = true)

{

	global $db;

	switch ($type)

	{

		case 'parents':

			$condition = 'f1.left_id BETWEEN f2.left_id AND f2.right_id';

		break;

		case 'children':

			$condition = 'f2.left_id BETWEEN f1.left_id AND f1.right_id';

		break;

		default:

			$condition = 'f2.left_id BETWEEN f1.left_id AND f1.right_id OR f1.left_id BETWEEN f2.left_id AND f2.right_id';

		break;

	}

	$rows = array();

	$sql = 'SELECT f2.*

		FROM ' . FORUMS_TABLE . ' f1

		LEFT JOIN ' . FORUMS_TABLE . " f2 ON ($condition)

		WHERE f1.forum_id = $forum_id

		ORDER BY f2.left_id " . (($order == 'descending') ? 'ASC' : 'DESC');

	$result = $db->sql_query($sql);

	while ($row = $db->sql_fetchrow($result))

	{

		if (!$include_forum && $row['forum_id'] == $forum_id)

		{

			continue;

		}

		$rows[] = $row;

	}

	$db->sql_freeresult($result);

	return $rows;

}

/**

* Get physical file listing

*/

function filelist($rootdir, $dir = '', $type = 'gif|jpg|jpeg|png')

{

	$matches = array();

	// Remove initial / if present

	$rootdir = (substr($rootdir, 0, 1) == '/') ? substr($rootdir, 1) : $rootdir;

	// Add closing / if not present

	$rootdir = ($rootdir && substr($rootdir, -1) != '/') ? $rootdir . '/' : $rootdir;

	// Remove initial / if present

	$dir = (substr($dir, 0, 1) == '/') ? substr($dir, 1) : $dir;

	// Add closing / if not present

	$dir = ($dir && substr($dir, -1) != '/') ? $dir . '/' : $dir;

	if (!is_dir($rootdir . $dir))

	{

		return $matches;

	}

	$dh = @opendir($rootdir . $dir);

	if (!$dh)

	{

		return $matches;

	}

	while (($fname = readdir($dh)) !== false)

	{

		if (is_file("$rootdir$dir$fname"))

		{

			if (filesize("$rootdir$dir$fname") && preg_match('#\.' . $type . '$#i', $fname))

			{

				$matches[$dir][] = $fname;

			}

		}

		else if ($fname[0] != '.' && is_dir("$rootdir$dir$fname"))

		{

			$matches += filelist($rootdir, "$dir$fname", $type);

		}

	}

	closedir($dh);

	return $matches;

}

/**

* Move topic(s)

*/

function move_topics($topic_ids, $forum_id, $auto_sync = true)

{

	global $db;

	if (empty($topic_ids))

	{

		return;

	}

	$forum_ids = array($forum_id);

	if (!is_array($topic_ids))

	{

		$topic_ids = array($topic_ids);

	}

	$sql = 'DELETE FROM ' . TOPICS_TABLE . '

		WHERE ' . $db->sql_in_set('topic_moved_id', $topic_ids) . '

			AND forum_id = ' . $forum_id;

	$db->sql_query($sql);

	if ($auto_sync)

	{

		$sql = 'SELECT DISTINCT forum_id

			FROM ' . TOPICS_TABLE . '

			WHERE ' . $db->sql_in_set('topic_id', $topic_ids);

		$result = $db->sql_query($sql);

		while ($row = $db->sql_fetchrow($result))

		{

			$forum_ids[] = $row['forum_id'];

		}

		$db->sql_freeresult($result);

	}

	$table_ary = array(TOPICS_TABLE, POSTS_TABLE, LOG_TABLE, DRAFTS_TABLE, TOPICS_TRACK_TABLE);

	foreach ($table_ary as $table)

	{

		$sql = "UPDATE $table

			SET forum_id = $forum_id

			WHERE " . $db->sql_in_set('topic_id', $topic_ids);

		$db->sql_query($sql);

	}

	unset($table_ary);

	if ($auto_sync)

	{

		sync('forum', 'forum_id', $forum_ids, true, true);

		unset($forum_ids);

	}

}

/**

* Move post(s)

*/

function move_posts($post_ids, $topic_id, $auto_sync = true)

{

	global $db;

	if (!is_array($post_ids))

	{

		$post_ids = array($post_ids);

	}

	$forum_ids = array();

	$topic_ids = array($topic_id);

	$sql = 'SELECT DISTINCT topic_id, forum_id

		FROM ' . POSTS_TABLE . '

		WHERE ' . $db->sql_in_set('post_id', $post_ids);

	$result = $db->sql_query($sql);

	while ($row = $db->sql_fetchrow($result))

	{

		$forum_ids[] = $row['forum_id'];

		$topic_ids[] = $row['topic_id'];

	}

	$db->sql_freeresult($result);

	$sql = 'SELECT forum_id

		FROM ' . TOPICS_TABLE . '

		WHERE topic_id = ' . $topic_id;

	$result = $db->sql_query($sql);

	$forum_row = $db->sql_fetchrow($result);

	$db->sql_freeresult($result);

	if (!$forum_row)

	{

		trigger_error('NO_TOPIC');

	}

	$sql = 'UPDATE ' . POSTS_TABLE . '

		SET forum_id = ' . $forum_row['forum_id'] . ", topic_id = $topic_id

		WHERE " . $db->sql_in_set('post_id', $post_ids);

	$db->sql_query($sql);

	$sql = 'UPDATE ' . ATTACHMENTS_TABLE . "

		SET topic_id = $topic_id, in_message = 0

		WHERE " . $db->sql_in_set('post_msg_id', $post_ids);

	$db->sql_query($sql);

	if ($auto_sync)

	{

		$forum_ids[] = $forum_row['forum_id'];

		sync('topic_reported', 'topic_id', $topic_ids);

		sync('topic_attachment', 'topic_id', $topic_ids);

		sync('topic', 'topic_id', $topic_ids, true);

		sync('forum', 'forum_id', $forum_ids, true, true);

	}

	// Update posted information

	update_posted_info($topic_ids);

}

/**

* Remove topic(s)

*/

function delete_topics($where_type, $where_ids, $auto_sync = true, $post_count_sync = true, $call_delete_posts = true)

{

	global $db, $config;

	$approved_topics = 0;

	$forum_ids = $topic_ids = array();

	if ($where_type === 'range')

	{

		$where_clause = $where_ids;

	}

	else

	{

		$where_ids = (is_array($where_ids)) ? array_unique($where_ids) : array($where_ids);

		if (!sizeof($where_ids))

		{

			return array('topics' => 0, 'posts' => 0);

		}

		$where_clause = $db->sql_in_set($where_type, $where_ids);

	}

	// Making sure that delete_posts does not call delete_topics again...

	$return = array(

		'posts' => ($call_delete_posts) ? delete_posts($where_type, $where_ids, false, true, $post_count_sync, false) : 0,

	);

	$sql = 'SELECT topic_id, forum_id, topic_approved, topic_moved_id

		FROM ' . TOPICS_TABLE . '

		WHERE ' . $where_clause;

	$result = $db->sql_query($sql);

	while ($row = $db->sql_fetchrow($result))

	{

		$forum_ids[] = $row['forum_id'];

		$topic_ids[] = $row['topic_id'];

		if ($row['topic_approved'] && !$row['topic_moved_id'])

		{

			$approved_topics++;

		}

	}

	$db->sql_freeresult($result);

	$return['topics'] = sizeof($topic_ids);

	if (!sizeof($topic_ids))

	{

		return $return;

	}

	$db->sql_transaction('begin');

	$table_ary = array(TOPICS_TRACK_TABLE, TOPICS_POSTED_TABLE, POLL_VOTES_TABLE, POLL_OPTIONS_TABLE, TOPICS_WATCH_TABLE, TOPICS_TABLE);

	foreach ($table_ary as $table)

	{

		$sql = "DELETE FROM $table

			WHERE " . $db->sql_in_set('topic_id', $topic_ids);

		$db->sql_query($sql);

	}

	unset($table_ary);

	$moved_topic_ids = array();

	// update the other forums

	$sql = 'SELECT topic_id, forum_id

		FROM ' . TOPICS_TABLE . '

		WHERE ' . $db->sql_in_set('topic_moved_id', $topic_ids);

	$result = $db->sql_query($sql);

	while ($row = $db->sql_fetchrow($result))

	{

		$forum_ids[] = $row['forum_id'];

		$moved_topic_ids[] = $row['topic_id'];

	}

	$db->sql_freeresult($result);

	if (sizeof($moved_topic_ids))

	{

		$sql = 'DELETE FROM ' . TOPICS_TABLE . '

			WHERE ' . $db->sql_in_set('topic_id', $moved_topic_ids);

		$db->sql_query($sql);

	}

	$db->sql_transaction('commit');

	if ($auto_sync)

	{

		sync('forum', 'forum_id', array_unique($forum_ids), true, true);

		sync('topic_reported', $where_type, $where_ids);

	}

	if ($approved_topics)

	{

		set_config('num_topics', $config['num_topics'] - $approved_topics, true);

	}

	return $return;

}

/**

* Remove post(s)

*/

function delete_posts($where_type, $where_ids, $auto_sync = true, $posted_sync = true, $post_count_sync = true, $call_delete_topics = true)

{

	global $db, $config, $phpbb_root_path, $phpEx;

	if ($where_type === 'range')

	{

		$where_clause = $where_ids;

	}

	else

	{

		if (is_array($where_ids))

		{

			$where_ids = array_unique($where_ids);

		}

		else

		{

			$where_ids = array($where_ids);

		}

		if (!sizeof($where_ids))

		{

			return false;

		}

		$where_clause = $db->sql_in_set($where_type, array_map('intval', $where_ids));

	}

	$approved_posts = 0;

	$post_ids = $topic_ids = $forum_ids = $post_counts = $remove_topics = array();

	$sql = 'SELECT post_id, poster_id, post_approved, post_postcount, topic_id, forum_id

		FROM ' . POSTS_TABLE . '

		WHERE ' . $where_clause;

	$result = $db->sql_query($sql);

	while ($row = $db->sql_fetchrow($result))

	{

		$post_ids[] = $row['post_id'];

		$poster_ids[] = $row['poster_id'];

		$topic_ids[] = $row['topic_id'];

		$forum_ids[] = $row['forum_id'];

		if ($row['post_postcount'] && $post_count_sync && $row['post_approved'])

		{

			$post_counts[$row['poster_id']] = (!empty($post_counts[$row['poster_id']])) ? $post_counts[$row['poster_id']] + 1 : 1;

		}

		if ($row['post_approved'])

		{

			$approved_posts++;

		}

	}

	$db->sql_freeresult($result);

	if (!sizeof($post_ids))

	{

		return false;

	}

	$db->sql_transaction('begin');

	$table_ary = array(POSTS_TABLE, REPORTS_TABLE);

	foreach ($table_ary as $table)

	{

		$sql = "DELETE FROM $table

			WHERE " . $db->sql_in_set('post_id', $post_ids);

		$db->sql_query($sql);

	}

	unset($table_ary);

	// Adjust users post counts

	if (sizeof($post_counts) && $post_count_sync)

	{

		foreach ($post_counts as $poster_id => $substract)

		{

			$sql = 'UPDATE ' . USERS_TABLE . '

				SET user_posts = 0

				WHERE user_id = ' . $poster_id . '

				AND user_posts < ' . $substract;

			$db->sql_query($sql);

			$sql = 'UPDATE ' . USERS_TABLE . '

				SET user_posts = user_posts - ' . $substract . '

				WHERE user_id = ' . $poster_id . '

				AND user_posts >= ' . $substract;

			$db->sql_query($sql);

		}

	}