/**

*

* @package acp

* @version $Id: acp_email.php 8479 2008-03-29 00:22:48Z naderman $

* @copyright (c) 2005 phpBB Group

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

*

*/

/**

* @ignore

*/

if (!defined('IN_PHPBB'))

{

	exit;

}

/**

* @package acp

*/

class acp_email

{

	var $u_action;

	function main($id, $mode)

	{

		global $config, $db, $user, $auth, $template, $cache;

		global $phpbb_root_path, $phpbb_admin_path, $phpEx, $table_prefix;

		$user->add_lang('acp/email');

		$this->tpl_name = 'acp_email';

		$this->page_title = 'ACP_MASS_EMAIL';

		$form_key = 'acp_email';

		add_form_key($form_key);

		// Set some vars

		$submit = (isset($_POST['submit'])) ? true : false;

		$error = array();

		$usernames	= request_var('usernames', '', true);

		$group_id	= request_var('g', 0);

		$subject	= utf8_normalize_nfc(request_var('subject', '', true));

		$message	= utf8_normalize_nfc(request_var('message', '', true));

		// Do the job ...

		if ($submit)

		{

			// Error checking needs to go here ... if no subject and/or no message then skip

			// over the send and return to the form

			$use_queue		= (isset($_POST['send_immediately'])) ? false : true;

			$priority		= request_var('mail_priority_flag', MAIL_NORMAL_PRIORITY);

			if (!check_form_key($form_key))

			{

				$error[] = $user->lang['FORM_INVALID'];

			}

			if (!$subject)

			{

				$error[] = $user->lang['NO_EMAIL_SUBJECT'];

			}

			if (!$message)

			{

				$error[] = $user->lang['NO_EMAIL_MESSAGE'];

			}

			if (!sizeof($error))

			{

				if ($usernames)

				{

					// If giving usernames the admin is able to email inactive users too...

					$sql = 'SELECT username, user_email, user_jabber, user_notify_type, user_lang

						FROM ' . USERS_TABLE . '

						WHERE ' . $db->sql_in_set('username_clean', array_map('utf8_clean_string', explode("\n", $usernames))) . '

							AND user_allow_massemail = 1

						ORDER BY user_lang, user_notify_type'; // , SUBSTRING(user_email FROM INSTR(user_email, '@'))

				}

				else

				{

					if ($group_id)

					{

						$sql = 'SELECT u.user_email, u.username, u.username_clean, u.user_lang, u.user_jabber, u.user_notify_type

							FROM ' . USERS_TABLE . ' u, ' . USER_GROUP_TABLE . ' ug

							WHERE ug.group_id = ' . $group_id . '

								AND ug.user_pending = 0

								AND u.user_id = ug.user_id

								AND u.user_allow_massemail = 1

								AND u.user_type IN (' . USER_NORMAL . ', ' . USER_FOUNDER . ')

							ORDER BY u.user_lang, u.user_notify_type';

					}

					else

					{

						$sql = 'SELECT username, username_clean, user_email, user_jabber, user_notify_type, user_lang

							FROM ' . USERS_TABLE . '

							WHERE user_allow_massemail = 1

								AND user_type IN (' . USER_NORMAL . ', ' . USER_FOUNDER . ')

							ORDER BY user_lang, user_notify_type';

					}

				}

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

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

				if (!$row)

				{

					$db->sql_freeresult($result);

					trigger_error($user->lang['NO_USER'] . adm_back_link($this->u_action), E_USER_WARNING);

				}

				$i = $j = 0;

				// Send with BCC, no more than 50 recipients for one mail (to not exceed the limit)

				$max_chunk_size = 50;

				$email_list = array();

				$old_lang = $row['user_lang'];

				$old_notify_type = $row['user_notify_type'];

				do

				{

					if (($row['user_notify_type'] == NOTIFY_EMAIL && $row['user_email']) ||

						($row['user_notify_type'] == NOTIFY_IM && $row['user_jabber']) ||

						($row['user_notify_type'] == NOTIFY_BOTH && $row['user_email'] && $row['user_jabber']))

					{

						if ($i == $max_chunk_size || $row['user_lang'] != $old_lang || $row['user_notify_type'] != $old_notify_type)

						{

							$i = 0;

							if (sizeof($email_list))

							{

								$j++;

							}

							$old_lang = $row['user_lang'];

							$old_notify_type = $row['user_notify_type'];

						}

						$email_list[$j][$i]['lang']		= $row['user_lang'];

						$email_list[$j][$i]['method']	= $row['user_notify_type'];

						$email_list[$j][$i]['email']	= $row['user_email'];

						$email_list[$j][$i]['name']		= $row['username'];

						$email_list[$j][$i]['jabber']	= $row['user_jabber'];

						$i++;

					}

				}

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

				$db->sql_freeresult($result);

				// Send the messages

				include_once($phpbb_root_path . 'includes/functions_messenger.' . $phpEx);

				include_once($phpbb_root_path . 'includes/functions_user.' . $phpEx);

				$messenger = new messenger($use_queue);

				$errored = false;

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

				{

					$used_lang = $email_list[$i][0]['lang'];

					$used_method = $email_list[$i][0]['method'];

					for ($j = 0, $list_size = sizeof($email_list[$i]); $j < $list_size; $j++)

					{

						$email_row = $email_list[$i][$j];

						$messenger->{((sizeof($email_list[$i]) == 1) ? 'to' : 'bcc')}($email_row['email'], $email_row['name']);

						$messenger->im($email_row['jabber'], $email_row['name']);

					}

					$messenger->template('admin_send_email', $used_lang);

					$messenger->headers('X-AntiAbuse: Board servername - ' . $config['server_name']);

					$messenger->headers('X-AntiAbuse: User_id - ' . $user->data['user_id']);

					$messenger->headers('X-AntiAbuse: Username - ' . $user->data['username']);

					$messenger->headers('X-AntiAbuse: User IP - ' . $user->ip);

					$messenger->subject(htmlspecialchars_decode($subject));

					$messenger->set_mail_priority($priority);

					$messenger->assign_vars(array(

						'CONTACT_EMAIL' => $config['board_contact'],

						'MESSAGE'		=> htmlspecialchars_decode($message))

					);

					if (!($messenger->send($used_method)))

					{

						$errored = true;

					}

				}

				unset($email_list);

				$messenger->save_queue();

				if ($usernames)

				{

					$usernames = explode("\n", $usernames);

					add_log('admin', 'LOG_MASS_EMAIL', implode(', ', utf8_normalize_nfc($usernames)));

				}

				else

				{

					if ($group_id)

					{

						$group_name = get_group_name($group_id);

					}

					else

					{

						// Not great but the logging routine doesn't cope well with localising on the fly

						$group_name = $user->lang['ALL_USERS'];

					}

					add_log('admin', 'LOG_MASS_EMAIL', $group_name);

				}

				if (!$errored)

				{

					$message = ($use_queue) ? $user->lang['EMAIL_SENT_QUEUE'] : $user->lang['EMAIL_SENT'];

					trigger_error($message . adm_back_link($this->u_action));

				}

				else

				{

					$message = sprintf($user->lang['EMAIL_SEND_ERROR'], '', '');

					trigger_error($message . adm_back_link($this->u_action), E_USER_WARNING);

				}

			}

		}

		// Exclude bots and guests...

		$sql = 'SELECT group_id

			FROM ' . GROUPS_TABLE . "

			WHERE group_name IN ('BOTS', 'GUESTS')";

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

		$exclude = array();

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

		{

			$exclude[] = $row['group_id'];

		}

		$db->sql_freeresult($result);

		$select_list = '<option value="0"' . ((!$group_id) ? ' selected="selected"' : '') . '>' . $user->lang['ALL_USERS'] . '</option>';

		$select_list .= group_select_options($group_id, $exclude);

		$s_priority_options = '<option value="' . MAIL_LOW_PRIORITY . '">' . $user->lang['MAIL_LOW_PRIORITY'] . '</option>';

		$s_priority_options .= '<option value="' . MAIL_NORMAL_PRIORITY . '" selected="selected">' . $user->lang['MAIL_NORMAL_PRIORITY'] . '</option>';

		$s_priority_options .= '<option value="' . MAIL_HIGH_PRIORITY . '">' . $user->lang['MAIL_HIGH_PRIORITY'] . '</option>';

		$template->assign_vars(array(

			'S_WARNING'				=> (sizeof($error)) ? true : false,

			'WARNING_MSG'			=> (sizeof($error)) ? implode('
', $error) : '',

			'U_ACTION'				=> $this->u_action,

			'S_GROUP_OPTIONS'		=> $select_list,

			'USERNAMES'				=> $usernames,

			'U_FIND_USERNAME'		=> append_sid("{$phpbb_root_path}memberlist.$phpEx", 'mode=searchuser&form=acp_email&field=usernames'),

			'SUBJECT'				=> $subject,

			'MESSAGE'				=> $message,

			'S_PRIORITY_OPTIONS'	=> $s_priority_options)

		);

	}

}

?>