1 files changed, 351 insertions, 0 deletions
diff --git a/phpBB/includes/acp/acp_bots.php b/phpBB/includes/acp/acp_bots.php
new file mode 100644
index 0000000000..0dc1f8f148
--- /dev/null
+++ b/phpBB/includes/acp/acp_bots.php
@@ -0,0 +1,351 @@
+<?php
+/** 
+*
+* @package acp
+* @version $Id$
+* @copyright (c) 2005 phpBB Group 
+* @license http://opensource.org/licenses/gpl-license.php GNU Public License 
+*
+*/
+
+/**
+* @package acp
+*/
+class acp_bots
+{
+	function main($id, $mode)
+	{
+		global $config, $db, $user, $auth, $template, $cache;
+		global $SID, $phpbb_root_path, $phpbb_admin_path, $phpEx, $table_prefix;
+
+		$action = request_var('action', '');
+		$submit = (isset($_POST['submit'])) ? true : false;
+		$mark	= request_var('mark', array(0));
+		$bot_id	= request_var('id', 0);
+
+		if (isset($_POST['add']))
+		{
+			$action = 'add';
+		}
+
+		$error = array();
+
+		$user->add_lang('acp/bots');
+		$this->tpl_name = 'acp_bots';
+
+		$u_action = "{$phpbb_admin_path}index.$phpEx$SID&amp;i=$id&amp;mode=$mode";
+
+		// User wants to do something, how inconsiderate of them!
+		switch ($action)
+		{
+			case 'activate':
+				if ($bot_id || sizeof($mark))
+				{
+					$sql_id = ($bot_id) ? " = $bot_id" : ' IN (' . implode(', ', $mark) . ')';
+
+					$sql = 'UPDATE ' . BOTS_TABLE . " 
+						SET bot_active = 1
+						WHERE bot_id $sql_id";
+					$db->sql_query($sql);
+				}
+
+				$cache->destroy('bots');
+			break;
+
+			case 'deactivate':
+				if ($bot_id || sizeof($mark))
+				{
+					$sql_id = ($bot_id) ? " = $bot_id" : ' IN (' . implode(', ', $mark) . ')';
+
+					$sql = 'UPDATE ' . BOTS_TABLE . " 
+						SET bot_active = 0
+						WHERE bot_id $sql_id";
+					$db->sql_query($sql);
+				}
+
+				$cache->destroy('bots');
+			break;
+
+			case 'delete':
+				if ($bot_id || sizeof($mark))
+				{
+					// We need to delete the relevant user, usergroup and bot entries ...
+					$sql_id = ($bot_id) ? " = $bot_id" : ' IN (' . implode(', ', $mark) . ')';
+
+					$sql = 'SELECT bot_name, user_id 
+						FROM ' . BOTS_TABLE . " 
+						WHERE bot_id $sql_id";
+					$result = $db->sql_query($sql);
+
+					$user_id_ary = $bot_name_ary = array();
+					while ($row = $db->sql_fetchrow($result))
+					{
+						$user_id_ary[] = (int) $row['user_id'];
+						$bot_name_ary[] = $row['bot_name'];
+					}
+					$db->sql_freeresult($result);
+
+					$db->sql_transaction();
+
+					$sql = 'DELETE FROM ' . BOTS_TABLE . " 
+						WHERE bot_id $sql_id";
+					$db->sql_query($sql);
+
+					foreach (array(USERS_TABLE, USER_GROUP_TABLE) as $table)
+					{
+						$sql = "DELETE FROM $table
+							WHERE user_id IN (" . implode(', ', $user_id_ary) . ')';
+						$db->sql_query($sql);
+					}
+
+					$db->sql_transaction('commit');
+
+					$cache->destroy('bots');
+
+					add_log('admin', 'LOG_BOT_DELETE', implode(', ', $bot_name_ary));
+					trigger_error($user->lang['BOT_DELETED'] . adm_back_link($u_action));
+				}
+			break;
+
+			case 'edit':
+			case 'add':
+				$bot_row = array(
+					'bot_name'		=> request_var('bot_name', ''),
+					'bot_agent'		=> request_var('bot_agent', ''),
+					'bot_ip'		=> request_var('bot_ip', ''),
+					'bot_active'	=> request_var('bot_active', true),
+					'bot_lang'		=> request_var('bot_lang', $config['default_lang']),
+					'bot_style'		=> request_var('bot_style' , $config['default_style']),
+				);
+
+				if ($submit)
+				{
+					if (!$bot_row['bot_agent'] && !$bot_row['bot_ip'])
+					{
+						$error[] = $user->lang['ERR_BOT_NO_MATCHES'];
+					}
+			
+					if ($bot_row['bot_ip'] && !preg_match('#^[\d\.,:]+$#', $bot_row['bot_ip']))
+					{
+						if (!$ip_list = gethostbynamel($bot_row['bot_ip']))
+						{
+							$error[] = $user->lang['ERR_BOT_NO_IP'];
+						}
+						else
+						{
+							$bot_row['bot_ip'] = implode(',', $ip_list);
+						}
+					}
+					$bot_row['bot_ip'] = str_replace(' ', '', $bot_row['bot_ip']);
+
+					if (!sizeof($error))
+					{
+						$db->sql_transaction();
+
+						// New bot? Create a new user and group entry
+						if ($action == 'add')
+						{
+							$sql = 'SELECT group_id, group_colour 
+								FROM ' . GROUPS_TABLE . " 
+								WHERE group_name = 'BOTS' 
+									AND group_type = " . GROUP_SPECIAL;
+							$result = $db->sql_query($sql);
+							$group_row = $db->sql_fetchrow($result);
+							$db->sql_freeresult($result);
+
+							if (!$group_row)
+							{
+								trigger_error($user->lang['NO_GROUP'] . adm_back_link($u_action . "&amp;id=$bot_id&amp;action=$action"));
+							}
+
+							$sql = 'INSERT INTO ' . USERS_TABLE . ' ' . $db->sql_build_array('INSERT', array(
+								'group_id'		=> (int) $group_row['group_id'], 
+								'username'		=> (string) $bot_row['bot_name'], 
+								'user_type'		=> (int) USER_IGNORE, 
+								'user_colour'	=> (string) $group_row['group_colour'],
+								'user_lang'		=> (string) $bot_row['bot_lang'], 
+								'user_style'	=> (int) $bot_row['bot_style'],
+								'user_options'	=> 0)
+							);
+							$db->sql_query($sql);
+
+							$user_id = $db->sql_nextid();
+
+							// Add to Bots usergroup
+							$sql = 'INSERT INTO ' . USER_GROUP_TABLE . ' ' . $db->sql_build_array('INSERT', array(
+								'user_id'	=> $user_id, 
+								'group_id'	=> $group_row['group_id'])
+							);
+							$db->sql_query($sql);
+
+							$sql = 'INSERT INTO ' . BOTS_TABLE . ' ' . $db->sql_build_array('INSERT', array(
+								'user_id'		=> (int) $user_id,
+								'bot_name'		=> (string) $bot_row['bot_name'], 
+								'bot_active'	=> (int) $bot_row['bot_active'], 
+								'bot_agent'		=> (string) $bot_row['bot_agent'],
+								'bot_ip'		=> (string) $bot_row['bot_ip'])
+							);
+							$db->sql_query($sql);
+
+							$log = 'ADDED';
+						}
+						else if ($bot_id)
+						{
+							$sql = 'SELECT user_id 
+								FROM ' . BOTS_TABLE . " 
+								WHERE bot_id = $bot_id";
+							$result = $db->sql_query($sql);
+							$row = $db->sql_fetchrow($result);
+							$db->sql_freeresult($result);
+
+							if (!$row)
+							{
+								trigger_error($user->lang['NO_BOT'] . adm_back_link($u_action . "&amp;id=$bot_id&amp;action=$action"));
+							}
+
+							$sql = 'UPDATE ' . USERS_TABLE . ' SET ' . $db->sql_build_array('UPDATE', array(
+								'user_style'	=> (int) $bot_row['bot_style'],
+								'user_lang'		=> (string) $bot_row['bot_lang'])
+							) . " WHERE user_id = {$row['user_id']}";
+							$db->sql_query($sql);
+
+							$sql = 'UPDATE ' . BOTS_TABLE . ' SET ' . $db->sql_build_array('UPDATE', array(
+								'bot_name'		=> (string) $bot_row['bot_name'], 
+								'bot_active'	=> (int) $bot_row['bot_active'], 
+								'bot_agent'		=> (string) $bot_row['bot_agent'],
+								'bot_ip'		=> (string) $bot_row['bot_ip'])
+							) . " WHERE bot_id = $bot_id";
+							$db->sql_query($sql);
+
+							$log = 'UPDATED';
+						}
+
+						$db->sql_transaction('commit');
+
+						$cache->destroy('bots');
+				
+						add_log('admin', 'LOG_BOT_' . $log, $bot_row['bot_name']);
+						trigger_error($user->lang['BOT_' . $log] . adm_back_link($u_action . "&amp;id=$bot_id&amp;action=$action"));
+					}
+				}
+				else if ($bot_id)
+				{
+					$sql = 'SELECT b.*, u.user_lang, u.user_style 
+						FROM ' . BOTS_TABLE . ' b, ' . USERS_TABLE . " u
+						WHERE b.bot_id = $bot_id
+							AND u.user_id = b.user_id";
+					$result = $db->sql_query($sql);
+					$bot_row = $db->sql_fetchrow($result);
+					$db->sql_freeresult($result);
+
+					if (!$bot_row)
+					{
+						trigger_error($user->lang['NO_BOT'] . adm_back_link($u_action . "&amp;id=$bot_id&amp;action=$action"));
+					}
+
+					$bot_row['bot_lang'] = $bot_row['user_lang'];
+					$bot_row['bot_style'] = $bot_row['user_style'];
+					unset($bot_row['user_lang'], $bot_row['user_style']);
+				}
+
+				$s_active_options = '';
+				foreach (array('0' => 'NO', '1' => 'YES') as $value => $lang)
+				{
+					$selected = ($bot_row['bot_active'] == $value) ? ' selected="selected"' : '';
+					$s_active_options .= '<option value="' . $value . '"' . $selected . '>' . $user->lang[$lang] . '</option>';
+				}
+
+				$style_select = style_select($bot_row['bot_style'], true);
+				$lang_select = language_select($bot_row['bot_lang']);
+
+				$l_title = ($action == 'edit') ? 'EDIT' : 'ADD';
+
+				$template->assign_vars(array(
+					'L_TITLE'		=> $user->lang['BOT_' . $l_title],
+					'U_ACTION'		=> $u_action . "&amp;id=$bot_id&amp;action=$action",
+					'U_BACK'		=> $u_action,
+					'ERROR_MSG'		=> (sizeof($error)) ? implode('<br />', $error) : '',
+					
+					'BOT_NAME'		=> $bot_row['bot_name'],
+					'BOT_IP'		=> $bot_row['bot_ip'],
+					'BOT_AGENT'		=> $bot_row['bot_agent'],
+					
+					'S_EDIT_BOT'		=> true,
+					'S_ACTIVE_OPTIONS'	=> $s_active_options,
+					'S_STYLE_OPTIONS'	=> $style_select,
+					'S_LANG_OPTIONS'	=> $lang_select,
+					'S_ERROR'			=> (sizeof($error)) ? true : false,
+					)
+				);
+
+				return;
+
+			break;
+		}
+
+		$s_options = '';
+		foreach (array('activate' => 'BOT_ACTIVATE', 'deactivate' => 'BOT_DEACTIVATE', 'delete' => 'DELETE') as $value => $lang)
+		{
+			$s_options .= '<option value="' . $value . '">' . $user->lang[$lang] . '</option>';
+		}
+
+		$template->assign_vars(array(
+			'U_ACTION'		=> $u_action,
+			'S_BOT_OPTIONS'	=> $s_options)
+		);
+
+		$sql = 'SELECT b.bot_id, b.bot_name, b.bot_active, u.user_lastvisit 
+			FROM ' . BOTS_TABLE . ' b, ' . USERS_TABLE . ' u
+			WHERE u.user_id = b.user_id
+			ORDER BY u.user_lastvisit DESC';
+		$result = $db->sql_query($sql);
+
+		while ($row = $db->sql_fetchrow($result))
+		{
+			$active_lang = (!$row['bot_active']) ? 'BOT_ACTIVATE' : 'BOT_DEACTIVATE';
+			$active_value = (!$row['bot_active']) ? 'activate' : 'deactivate';
+
+			$template->assign_block_vars('bots', array(
+				'BOT_NAME'		=> $row['bot_name'],
+				'BOT_ID'		=> $row['bot_id'],
+				'LAST_VISIT'	=> ($row['user_lastvisit']) ? $user->format_date($row['user_lastvisit']) : $user->lang['BOT_NEVER'],
+
+				'U_ACTIVATE_DEACTIVATE'	=> $u_action . "&amp;id={$row['bot_id']}&amp;action=$active_value",
+				'L_ACTIVATE_DEACTIVATE'	=> $user->lang[$active_lang],
+				'U_EDIT'				=> $u_action . "&amp;id={$row['bot_id']}&amp;action=edit",
+				'U_DELETE'				=> $u_action . "&amp;id={$row['bot_id']}&amp;action=delete")
+			);
+		}
+		$db->sql_freeresult($result);
+
+	}
+}
+
+/**
+* @package module_install
+*/
+class acp_bots_info
+{
+	function module()
+	{
+		return array(
+			'filename'	=> 'acp_bots',
+			'title'		=> 'ACP_BOTS',
+			'version'	=> '1.0.0',
+			'modes'		=> array(
+				'bots'		=> array('title' => 'ACP_BOTS', 'auth' => 'acl_a_server'),
+			),
+		);
+	}
+
+	function install()
+	{
+	}
+
+	function uninstall()
+	{
+	}
+}
+
+
+?>
+\ No newline at end of file