[mxbb-commits] mx_contact/admin admin_mass_mail.php, NONE, 1.1 admin_mass_newsletter.php, NONE, 1.1

[FlorinCB <ory...@us...>]

Update of /cvsroot/mxbb/mx_contact/admin
In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv842/admin

Added Files:
	admin_mass_mail.php admin_mass_newsletter.php 
Log Message:
new version of contact module

--- NEW FILE: admin_mass_mail.php ---
<?php
/***************************************************************************
*                             admin_mass_email.php
*                              -------------------
*     begin                : Thu May 31, 2001
*     copyright            : (C) 2001 The phpBB Group
*     email                : su...@ph...
*
*     $Id: admin_mass_mail.php,v 1.1 2008/10/04 08:03:18 orynider Exp $
*    --------->     Modified by R. U. Serious to 'Megmail'. :D <-------------
*
****************************************************************************/

/***************************************************************************
 *
 *   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; either version 2 of the License, or
 *   (at your option) any later version.
 *
 ***************************************************************************/
$def_wait = 5;
$def_size = 2;

define('IN_PHPBB', 1);
define('IN_PORTAL', 1);

if( !empty($setmodules) )
{
	$file = basename(__FILE__);
	$module['Contact_Form']['Mass_Mails'] = 'modules/mx_contact/admin/' . $file;	
	return;
}

//
// Load default header
//
$no_page_header = TRUE;
$mx_root_path = './../../../';
$module_root_path = "./../";
$phpEx = substr(strrchr(__FILE__, '.'), 1);
require($mx_root_path . 'admin/pagestart.' . $phpEx);

include_once($module_root_path . 'includes/contact_constants.' . $phpEx);
include_once($module_root_path . 'includes/functions_newsletter.' . $phpEx);

// **********************************************************************
//  Read language definition
// **********************************************************************

if ( !file_exists($module_root_path . 'language/lang_' . $board_config['default_lang'] . '/lang_main.' . $phpEx) )
{
  	include($module_root_path . 'language/lang_english/lang_main.' . $phpEx );
}	
else
{
  	include($module_root_path . 'language/lang_' . $board_config['default_lang'] . '/lang_main.' . $phpEx);
}

//
// Increase maximum execution time in case of a lot of users, but don't complain about it if it isn't
// allowed.
//
@set_time_limit(1200);

$message = '';
$subject = '';

if ($mx_request_vars->is_get('mode'))
{
	$sql = "CREATE TABLE ".CONTACT_MASS_TABLE ."(
			mail_id SMALLINT UNSIGNED NOT NULL AUTO_INCREMENT PRIMARY KEY, 
			mailsession_id VARCHAR(32) NOT NULL, 
			group_id MEDIUMINT(8) NOT NULL,			
			email_subject VARCHAR(60) NOT NULL,	
			email_body TEXT NOT NULL, 
			batch_start MEDIUMINT(8) NOT NULL, 
			batch_size SMALLINT UNSIGNED NOT NULL, 
			batch_wait SMALLINT NOT NULL, 
			status SMALLINT NOT NULL,
			user_id MEDIUMINT(8) NOT NULL			
			)";
	if ( !($result = $db->sql_query($sql)) ) 
	{
		mx_message_die(GENERAL_ERROR, 'Could not create tables. Are you sure you are using mySQL? Are you sure the table does not already exist?', '', __LINE__, __FILE__, $sql);
	}
}

//
// Do the job ...
//
if ( $mx_request_vars->is_post('message') || $mx_request_vars->is_post('subject') )
{
	$batchsize = (is_numeric($HTTP_POST_VARS['batchsize'])) ? intval($HTTP_POST_VARS['batchsize']) : $def_size;
	$batchwait = (is_numeric($HTTP_POST_VARS['batchwait'])) ? intval($HTTP_POST_VARS['batchwait']) : $def_wait;
	
	$mail_session_id = md5(uniqid(''));
	
	$sql_array = array(					
		'mailsession_id' => $mail_session_id,
		'group_id'		=> '-1',		
		'email_subject'	=> str_replace("\'","''",trim($HTTP_POST_VARS['subject'])),
		'email_body'	=> str_replace("\'","''",trim($HTTP_POST_VARS['message'])),
		'batch_start'	=> '0',
		'batch_size'	=> $batchsize,
		'batch_wait'	=> $batchwait,
		'status'		=> '0',
		'user_id'		=> $userdata['user_id'],		
	);
		
	$sql = "INSERT INTO " . CONTACT_MASS_TABLE . $db->sql_build_array('INSERT', $sql_array);
			
	if (!($result = $db->sql_query($sql))) 
	{
		mx_message_die(GENERAL_ERROR, 'Could not insert the data into '. CONTACT_MASS_TABLE, '', __LINE__, __FILE__, $sql);
	}
	$mail_id = $db->sql_nextid();
	$url= mx_append_sid("admin_mass_mail.$phpEx?mail_id=".$mail_id."&amp;mail_session_id=".$mail_session_id);
	$template->assign_vars(array(
		"META" => '<meta http-equiv="refresh" content="'.$batchwait.';url=' . $url . '">')
	);
	$message =  sprintf($lang['newsletter_mass_created_message'],  '<a href="' . $url . '">', '</a>');
	mx_message_die(GENERAL_MESSAGE, $message);
}

if ( isset($HTTP_GET_VARS['mail_id']) && isset($HTTP_GET_VARS['mail_session_id']) )
{
	@ignore_user_abort(true); 
	$mail_id = intval($HTTP_GET_VARS['mail_id']);
	$mail_session_id = stripslashes(trim($HTTP_GET_VARS['mail_session_id']));
	// Let's see if that session exists
	$sql = "SELECT *
			FROM ".CONTACT_MASS_TABLE."
			WHERE mail_id = $mail_id AND mailsession_id LIKE '$mail_session_id'";
	if ( !($result = $db->sql_query($sql)) ) 
	{
		mx_message_die(GENERAL_ERROR, 'Could not query '. CONTACT_MASS_TABLE , '', __LINE__, __FILE__, $sql);
	}
	$mail_data = $db->sql_fetchrow($result);

	if ( !($mail_data) ) 
	{
		mx_message_die(GENERAL_MESSAGE, 'Mail ID and Mail Session ID do not match.', '', __LINE__, __FILE__, $sql);
	}
	//Ok, the session exists

	$subject = $mail_data['email_subject'];
	$message = $mail_data['email_body'];
	$group_id = $mail_data['group_id'];

	//Now, let's see if we reached the upperlimit, if yes adjust the batch_size
	$sql = ( $group_id != -1 ) ? "SELECT COUNT(u.user_email) FROM " . USERS_TABLE . " u, " . USER_GROUP_TABLE . " ug WHERE ug.group_id = $group_id AND ug.user_pending <> " . TRUE . " AND u.user_id = ug.user_id" : "SELECT COUNT(u.user_email) FROM " . USERS_TABLE. " u";

	if ( !($result = $db->sql_query($sql)) )
	{
		mx_message_die(GENERAL_ERROR, 'Could not select group members', '', __LINE__, __FILE__, $sql);
	}
	$totalrecipients = $db->sql_fetchrow($result);
	$totalrecipients = $totalrecipients['COUNT(u.user_email)'];
	
	$is_done ='';
	if (($mail_data['batch_start']+$mail_data['batch_size']) > $totalrecipients)
	{
		$mail_data['batch_size'] = $totalrecipients-$mail_data['batch_start'];
		$is_done = ', status = 1';
	}
	
	// Create new mail session
	$mail_session_id = md5(uniqid(''));	
	$sql = "UPDATE ".CONTACT_MASS_TABLE ." SET
			mailsession_id = '".$mail_session_id."', batch_start= ".($mail_data['batch_start']+$mail_data['batch_size'])
		  .$is_done." WHERE mail_id = $mail_id";
			
	if ( !($result = $db->sql_query($sql)) ) 
	{
		mx_message_die(GENERAL_ERROR, 'Could not insert the data into '. CONTACT_MASS_TABLE, '', __LINE__, __FILE__, $sql);
	}

	// OK, now let's start sending

	$error = FALSE;
	$error_msg = '';

	$sql = ( $group_id != -1 ) ? "SELECT u.user_email FROM " . USERS_TABLE . " u, " . USER_GROUP_TABLE . " ug WHERE ug.group_id = $group_id AND ug.user_pending <> " . TRUE . " AND u.user_id = ug.user_id" : "SELECT user_email FROM " . USERS_TABLE;
	$sql .= " LIMIT ".$mail_data['batch_start'].", ".$mail_data['batch_size'];
	
	if ( !($result = $db->sql_query($sql)) )
	{
		mx_message_die(GENERAL_ERROR, 'Could not select group members', '', __LINE__, __FILE__, $sql);
	}

	if ( $row = $db->sql_fetchrow($result) )
	{
		$bcc_list = '';
		do
		{
			$bcc_list .= ( ( $bcc_list != '' ) ? ', ' : '' ) . $row['user_email'];
		}
		while ( $row = $db->sql_fetchrow($result) );
		$db->sql_freeresult($result);
	}
	else
	{
		$message = ( $group_id != -1 ) ? $lang['Group_not_exist'] : $lang['No_such_user'];

		$error = true;
		$error_msg .= ( !empty($error_msg) ) ? '<br />' . $message : $message;
	}

	if ( !$error )
	{
		include($module_root_path . 'includes/contact_emailer.'.$phpEx);

		//
		// Let's do some checking to make sure that mass mail functions
		// are working in win32 versions of php.
		//
		if ( preg_match('/[c-z]:\\\.*/i', getenv('PATH')) && !$board_config['smtp_delivery'])
		{
			$ini_val = ( @phpversion() >= '4.0.0' ) ? 'ini_get' : 'get_cfg_var';

			// We are running on windows, force delivery to use our smtp functions
			// since php's are broken by default
			$board_config['smtp_delivery'] = 1;
			$board_config['smtp_host'] = @$ini_val('SMTP');
		}

		
		$emailer = new emailer($board_config['smtp_delivery']);
	
		$email_headers = 'Return-Path: ' . $userdata['board_email'] . "\nFrom: " . $board_config['board_email'] . "\n";
		$email_headers .= 'X-AntiAbuse: Board servername - ' . $board_config['server_name'] . "\n";
		$email_headers .= 'X-AntiAbuse: User_id - ' . $userdata['user_id'] . "\n";
		$email_headers .= 'X-AntiAbuse: Username - ' . $userdata['username'] . "\n";
		$email_headers .= 'X-AntiAbuse: User IP - ' . contact_decode_ip($user_ip) . "\n";
		$email_headers .= "Bcc: $bcc_list\n";
	
		$emailer->set_mail_html(true);	
		$emailer->use_template('contact_send_email');
		$emailer->email_address($board_config['board_email']);
		$emailer->set_subject(htmlspecialchars_decode($subject));
		$emailer->extra_headers($email_headers);
	
		$emailer->assign_vars(array(
			'SITENAME' => $board_config['sitename'], 
			'BOARD_EMAIL' => $board_config['board_email'], 
			'MESSAGE' => $message)
		);

		$emailer->send();
		$emailer->reset();

		if ($is_done =='')
		{	
			$url= mx_append_sid("admin_mass_mail.$phpEx?mail_id=".$mail_id."&amp;mail_session_id=".$mail_session_id);
			$template->assign_vars(array(
				"META" => '<meta http-equiv="refresh" content="'.$mail_data['batch_wait'].';url=' . $url . '">')
			);
			$message =  sprintf($lang['megamail_send_message'] ,$mail_data['batch_start'], ($mail_data['batch_start']+$mail_data['batch_size']), '<a href="' . $url . '">', '</a>');
		}
		else
		{
			$url= mx_append_sid("admin_mass_mail.$phpEx");
			$template->assign_vars(array(
				"META" => '<meta http-equiv="refresh" content="'.$mail_data['batch_wait'].';url=' . $url . '">')
			);
			$message =  $lang['megamail_done']. '<br />' . sprintf($lang['megamail_proceed'],  '<a href="' . $url . '">', '</a>');
		}
		mx_message_die(GENERAL_MESSAGE, $message);

//		mx_message_die(GENERAL_MESSAGE, $lang['Email_sent'] . '<br /><br />' . sprintf($lang['Click_return_admin_index'],  '<a href="' . mx_append_sid("index.$phpEx?pane=right") . '">', '</a>'));
	}
}	

if ( $error )
{
	$template->set_filenames(array(
		'reg_header' => 'error_body.'.$tplEx)
	);
	$template->assign_vars(array(
		'ERROR_MESSAGE' => $error_msg)
	);
	$template->assign_var_from_handle('ERROR_BOX', 'reg_header');
}

//
// Initial selection
//

$sql = "SELECT m.*, u.username, g.group_name
	FROM ".CONTACT_MASS_TABLE." m
	LEFT JOIN ". USERS_TABLE." u ON (m.user_id=u.user_id)
	LEFT JOIN ". GROUPS_TABLE." g ON (m.group_id=g.group_id)";
if ( !($result = $db->sql_query($sql)) ) 
{
	mx_message_die(GENERAL_MESSAGE, sprintf('Could not obtain list of email-sessions. If you want to create the table, click <a href=%s>here to install</a>', mx_append_sid('admin_mass_mail.php?mode=install')), '', __LINE__, __FILE__, $sql);
}
$row_class=0;
if ( $mail_data = $db->sql_fetchrow($result) )
	do
	{
		$url= mx_append_sid("admin_mass_mail.$phpEx?mail_id=".$mail_data['mail_id']."&amp;mail_session_id=".$mail_data['mailsession_id']);
		$template->assign_block_vars('mail_sessions',array(
			'ROW' => ($row_class % 2) ? 'row2' : 'row1',
			'ID' => $mail_data['mail_id'],
			'GROUP' => ($mail_data['group_id'] != -1) ? $mail_data['group_name'] : $lang['All_users'],
			'SUBJECT' => $mail_data['email_subject'],
			'BATCHSTART' => $mail_data['batch_start'],
			'BATCHSIZE' => $mail_data['batch_size'],
			'BATCHWAIT' => $mail_data['batch_wait'].' s.',
			'SENDER' => $mail_data['username'],
			'STATUS' => ($mail_data['status']==0) ? sprintf($lang['megamail_proceed'],  '<a href="' . $url . '">', '</a>') : 'Done',
		));
	}
	while( $mail_data = $db->sql_fetchrow($result) );
else
	$template->assign_block_vars('switch_no_sessions',array(
		'EMPTY' => $lang['megamail_none'],
	));



$sql = "SELECT group_id, group_name 
	FROM ".GROUPS_TABLE . "  
	WHERE group_id <> 1";
if ( !($result = $db->sql_query($sql)) ) 
{
	mx_message_die(GENERAL_ERROR, 'Could not obtain list of groups', '', __LINE__, __FILE__, $sql);
}

$select_list = '<select name = "' . POST_GROUPS_URL . '"><option value = "-1">' . $lang['All_users'] . '</option>';
if ( $row = $db->sql_fetchrow($result) )
{
	do
	{
		$select_list .= '<option value = "' . $row['group_id'] . '">' . $row['group_name'] . '</option>';
	}
	while ( $row = $db->sql_fetchrow($result) );
}
$select_list .= '</select>';

//
// Generate page
//
if (file_exists($mx_root_path . '/modules/mx_shared/tinymce/jscripts/tiny_mce/tiny_mce.js'))
{
	$module_root_path_tmp = $module_root_path;
	$module_root_path = $mx_root_path . '/modules/mx_shared/';
	$mx_page->add_js_file('tinymce/jscripts/tiny_mce/tiny_mce.js'); // Relative to module_root
	$module_root_path = $module_root_path_tmp;	
}

$gen_simple_header = true;
require($mx_root_path . 'admin/page_header_admin.'.$phpEx);
	
$template->set_filenames(array(
	'body' => 'admin/contact_newsletters.'.$tplEx)
);

$template->assign_vars(array(
	'MESSAGE' => $message,
	'SUBJECT' => $subject, 
	'L_VERSION' => sprintf($contact_config['contact_version']),
	'L_EMAIL_TITLE' => $lang['Email'],
	'L_EMAIL_EXPLAIN' => $lang['Megamail_Explain'],
	'L_COMPOSE' => $lang['Compose'],
	'L_RECIPIENTS' => $lang['Recipients'],
	'L_EMAIL_SUBJECT' => $lang['Subject'],
	'L_EMAIL_MSG' => $lang['Message'],
	'L_EMAIL' => $lang['Email'],
	'L_NOTICE' => $notice,

	'S_USER_ACTION' => mx_append_sid("admin_mass_mail.$phpEx"),
	'S_GROUP_SELECT' => $select_list,

	'L_TINY_MCE_LANGUAGE' => $board_config['default_lang'] ? $mx_user->encode_lang($board_config['default_lang']) : 'en',
	
	'L_MAIL_SESSION_HEADER' => $lang['megamail_mass_header'],	
	'L_ID' => 'Id',
	'L_GROUP' => $lang['group_name'],
	'L_BATCH_START' => $lang['megamail_batchstart'],
	'L_BATCH_SIZE'  => $lang['megamail_batchsize'],
	'L_BATCH_WAIT'  => $lang['megamail_batchwait'],
	'L_SENDER' => $lang['Auth_Admin'],
	'L_STATUS' => $lang['megamail_status'],
	'DEFAULT_SIZE' => $def_size,
	'DEFAULT_WAIT' => $def_wait,
));

$template->pparse('body');

require_once( $mx_root_path . 'admin/page_footer_admin.' . $phpEx );


?>
--- NEW FILE: admin_mass_newsletter.php ---
<?php
/***************************************************************************
*                             admin_contact_newsletter.php
*                              -------------------
*     begin                : Thu May 31, 2001
*     copyright            : (C) 2001 The phpBB Group
*     email                : su...@ph...
*
*     $Id: admin_mass_newsletter.php,v 1.1 2008/10/04 08:03:18 orynider Exp $
*    --------->     Modified by R. U. Serious to 'Megmail'. :D <-------------
*    --------->     Modified by OryNider to 'Newsletter'. :D <-------------
*
****************************************************************************/

/***************************************************************************
 *
 *   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; either version 2 of the License, or
 *   (at your option) any later version.
 *
 ***************************************************************************/
$def_wait = 5;
$def_size = 1;

define('IN_PHPBB', 1);
define('IN_PORTAL', 1);

if( !empty($setmodules) )
{
	$file = basename(__FILE__);
	$module['Contact_Form']['Mass_Newsletters'] = 'modules/mx_contact/admin/' . $file;	
	return;
}

//
// Load default header
//
$no_page_header = TRUE;
$mx_root_path = './../../../';
$module_root_path = "./../";
$phpEx = substr(strrchr(__FILE__, '.'), 1);
require($mx_root_path . 'admin/pagestart.' . $phpEx);

include_once($module_root_path . 'includes/contact_constants.' . $phpEx);
include_once($module_root_path . 'includes/functions_newsletter.' . $phpEx);

// **********************************************************************
//  Read language definition
// **********************************************************************

if ( !file_exists($module_root_path . 'language/lang_' . $board_config['default_lang'] . '/lang_main.' . $phpEx) )
{
  	include($module_root_path . 'language/lang_english/lang_main.' . $phpEx );
}	
else
{
  	include($module_root_path . 'language/lang_' . $board_config['default_lang'] . '/lang_main.' . $phpEx);
}

//
// Increase maximum execution time in case of a lot of users, but don't complain about it if it isn't
// allowed.
//
@set_time_limit(1200);

$message = '';
$subject = '';

if ($mx_request_vars->is_get('mode'))
{
	$sql = "CREATE TABLE ".CONTACT_MASS_TABLE ."(
			mail_id SMALLINT UNSIGNED NOT NULL AUTO_INCREMENT PRIMARY KEY, 
			mailsession_id VARCHAR(32) NOT NULL, 
			group_id MEDIUMINT(8) NOT NULL,			
			email_subject VARCHAR(60) NOT NULL,	
			email_body TEXT NOT NULL, 
			batch_start MEDIUMINT(8) NOT NULL, 
			batch_size SMALLINT UNSIGNED NOT NULL, 
			batch_wait SMALLINT NOT NULL, 
			status SMALLINT NOT NULL,
			user_id MEDIUMINT(8) NOT NULL			
			)";
	if ( !($result = $db->sql_query($sql)) ) 
	{
		mx_message_die(GENERAL_ERROR, 'Could not create tables. Are you sure you are using mySQL? Are you sure the table does not already exist?', '', __LINE__, __FILE__, $sql);
	}
}

//
// Do the job ...
//
if ( $mx_request_vars->is_post('message') || $mx_request_vars->is_post('subject') )
{
	$batchsize = (is_numeric($HTTP_POST_VARS['batchsize'])) ? intval($HTTP_POST_VARS['batchsize']) : $def_size;
	$batchwait = (is_numeric($HTTP_POST_VARS['batchwait'])) ? intval($HTTP_POST_VARS['batchwait']) : $def_wait;
	
	$mail_session_id = md5(uniqid(''));
	
	$sql_array = array(					
		'mailsession_id' => $mail_session_id,
		'group_id'		=> '-1',		
		'email_subject'	=> str_replace("\'","''",trim($HTTP_POST_VARS['subject'])),
		'email_body'	=> str_replace("\'","''",trim($HTTP_POST_VARS['message'])),
		'batch_start'	=> '0',
		'batch_size'	=> $batchsize,
		'batch_wait'	=> $batchwait,
		'status'		=> '0',
		'user_id'		=> $userdata['user_id'],		
	);
		
	$sql = "INSERT INTO " . CONTACT_MASS_TABLE . $db->sql_build_array('INSERT', $sql_array);
			
	if (!($result = $db->sql_query($sql))) 
	{
		mx_message_die(GENERAL_ERROR, 'Could not insert the data into '. CONTACT_MASS_TABLE, '', __LINE__, __FILE__, $sql);
	}
	$mail_id = $db->sql_nextid();
	$url= mx_append_sid("admin_mass_newsletter.$phpEx?mail_id=".$mail_id."&amp;mail_session_id=".$mail_session_id);
	$template->assign_vars(array(
		"META" => '<meta http-equiv="refresh" content="'.$batchwait.';url=' . $url . '">')
	);
	$message =  sprintf($lang['newsletter_mass_created_message'],  '<a href="' . $url . '">', '</a>');
	mx_message_die(GENERAL_MESSAGE, $message);
}

if ( isset($HTTP_GET_VARS['mail_id']) && isset($HTTP_GET_VARS['mail_session_id']) )
{
	@ignore_user_abort(true); 
	$mail_id = intval($HTTP_GET_VARS['mail_id']);
	$mail_session_id = stripslashes(trim($HTTP_GET_VARS['mail_session_id']));
	// Let's see if that session exists
	$sql = "SELECT *
			FROM ".CONTACT_MASS_TABLE."
			WHERE mail_id = $mail_id AND mailsession_id LIKE '$mail_session_id'";
	if ( !($result = $db->sql_query($sql)) ) 
	{
		mx_message_die(GENERAL_ERROR, 'Could not query '. CONTACT_MASS_TABLE , '', __LINE__, __FILE__, $sql);
	}
	$mail_data = $db->sql_fetchrow($result);

	if ( !($mail_data) ) 
	{
		mx_message_die(GENERAL_MESSAGE, 'Mail ID and Mail Session ID do not match.', '', __LINE__, __FILE__, $sql);
	}
	//Ok, the session exists

	$subject = $mail_data['email_subject'];
	$message = $mail_data['email_body'];
	$group_id = '-1'; //$mail_data['group_id'];

	//Now, let's see if we reached the upperlimit, if yes adjust the batch_size
	$sql = "SELECT COUNT(email) FROM " . CONTACT_MSGS_TABLE . " WHERE newsletter = 1";

	if ( !($result = $db->sql_query($sql)) )
	{
		mx_message_die(GENERAL_ERROR, 'Could not select count subscribers', '', __LINE__, __FILE__, $sql);
	}
	$totalrecipients = $db->sql_fetchrow($result);
	$totalrecipients = $totalrecipients['COUNT(email)'];
	
	$is_done = '';
	if (($mail_data['batch_start'] + $mail_data['batch_size']) > $totalrecipients)
	{
		$mail_data['batch_size'] = $totalrecipients - $mail_data['batch_start'];
		$is_done = ', status = 1';
	}
	
	// Create new mail session
	$mail_session_id = md5(uniqid(''));	
	$sql = "UPDATE ".CONTACT_MASS_TABLE ." SET
			mailsession_id = '".$mail_session_id."', batch_start= ".($mail_data['batch_start'] + $mail_data['batch_size'])
		  .$is_done." WHERE mail_id = $mail_id";
			
	if ( !($result = $db->sql_query($sql)) ) 
	{
		mx_message_die(GENERAL_ERROR, 'Could not insert the data into '. CONTACT_MASS_TABLE, '', __LINE__, __FILE__, $sql);
	}

	// OK, now let's start sending

	$error = FALSE;
	$error_msg = '';

	$sql = "SELECT email FROM " . CONTACT_MSGS_TABLE . " WHERE newsletter = 1";
	//$sql .= " LIMIT ".$mail_data['batch_start'].", ".$mail_data['batch_size'];
	
	if ( !($result = $db->sql_query_limit($sql, $mail_data['batch_start'], $mail_data['batch_size'])) )
	{
		mx_message_die(GENERAL_ERROR, 'Could not select subscribers', '', __LINE__, __FILE__, $sql);
	}

	if ( $row = $db->sql_fetchrow($result) )
	{
		$bcc_list = '';
		do
		{
			$bcc_list .= ( ( $bcc_list != '' ) ? ', ' : '' ) . $row['email'];
		}
		while ( $row = $db->sql_fetchrow($result) );
		$db->sql_freeresult($result);
	}
	else
	{
		$message = "Users: " . count($row); //$lang['No_such_user'];

		$error = true;
		$error_msg .= ( !empty($error_msg) ) ? '<br />' . $message : $message;
	}

	if ( !$error )
	{
		include($module_root_path . 'includes/contact_emailer.'.$phpEx);

		//
		// Let's do some checking to make sure that mass mail functions
		// are working in win32 versions of php.
		//
		if ( preg_match('/[c-z]:\\\.*/i', getenv('PATH')) && !$board_config['smtp_delivery'])
		{
			$ini_val = ( @phpversion() >= '4.0.0' ) ? 'ini_get' : 'get_cfg_var';

			// We are running on windows, force delivery to use our smtp functions
			// since php's are broken by default
			$board_config['smtp_delivery'] = 1;
			$board_config['smtp_host'] = @$ini_val('SMTP');
		}

		/*
		$sendloops = ceil((count($bcc_list)-1)/500); 
		$sendstart = 0; 
		for ($j = 0; $j <= $sendloops; $j++) 
		{ 
			$emailer = new emailer($board_config['smtp_delivery']);
		
			$emailer->from($board_config['board_email']);
			$emailer->replyto($board_config['board_email']);
	
			for ($i = $sendstart; ($i < count($bcc_list)) && ($i < ($sendstart + 500)); $i++) 
			{
				$emailer->bcc($bcc_list[$i]);
			}
			
			$sendstart = $sendstart + 500; 
		} 
		*/
		
		$email_headers = 'Return-Path: ' . $userdata['board_email'] . "\nFrom: " . $board_config['board_email'] . "\n";
		$email_headers .= 'X-AntiAbuse: Board servername - ' . $board_config['server_name'] . "\n";
		$email_headers .= 'X-AntiAbuse: User_id - ' . $userdata['user_id'] . "\n";
		$email_headers .= 'X-AntiAbuse: Username - ' . $userdata['username'] . "\n";
		$email_headers .= 'X-AntiAbuse: User IP - ' . contact_decode_ip($user_ip) . "\n";
		$email_headers .= "Bcc: $bcc_list\n";
		
		$emailer->set_mail_html(true);

		//$emailer->from($board_config['board_email']);
		//$emailer->replyto($userdata['board_email']);
		
		$emailer->use_template('contact_send_email');
		$emailer->email_address($board_config['board_email']);
		$emailer->set_subject(htmlspecialchars_decode($subject));
		$emailer->extra_headers($email_headers);
	
		$emailer->assign_vars(array(
			'SITENAME'		=> $board_config['sitename'], 
			'BOARD_EMAIL'	=> $board_config['board_email'], 
			'MESSAGE'		=> htmlspecialchars_decode($message))
		);

		$emailer->send();
		$emailer->reset();

		if ($is_done =='')
		{	
			$url= mx_append_sid("admin_mass_newsletter.$phpEx?mail_id=".$mail_id."&amp;mail_session_id=".$mail_session_id);
			$template->assign_vars(array(
				"META" => '<meta http-equiv="refresh" content="'.$mail_data['batch_wait'].';url=' . $url . '">')
			);
			$message =  sprintf($lang['newsletter_mass_send_message'] ,$mail_data['batch_start'], ($mail_data['batch_start']+$mail_data['batch_size']), '<a href="' . $url . '">', '</a>');
		}
		else
		{
			$url= mx_append_sid("admin_mass_newsletter.$phpEx");
			$template->assign_vars(array(
				"META" => '<meta http-equiv="refresh" content="'.$mail_data['batch_wait'].';url=' . $url . '">')
			);
			$message =  $lang['newsletter_mass_done']. '<br />' . sprintf($lang['newsletter_mass_proceed'],  '<a href="' . $url . '">', '</a>');
		}
		mx_message_die(GENERAL_MESSAGE, $message);

//		mx_message_die(GENERAL_MESSAGE, $lang['Email_sent'] . '<br /><br />' . sprintf($lang['Click_return_admin_index'],  '<a href="' . mx_append_sid("index.$phpEx?pane=right") . '">', '</a>'));
	}
}	

if ( $error )
{
	$template->set_filenames(array(
		'reg_header' => 'error_body.'.$tplEx)
	);
	$template->assign_vars(array(
		'ERROR_MESSAGE' => $error_msg)
	);
	$template->assign_var_from_handle('ERROR_BOX', 'reg_header');
}

//
// Initial selection
//
$sql = "SELECT * FROM " . CONTACT_MASS_TABLE;

if ( !($result = $db->sql_query($sql)) ) 
{
	mx_message_die(GENERAL_MESSAGE, sprintf('Could not obtain list of email-sessions. If you want to create the table, click <a href=%s>here to install</a>', mx_append_sid('admin_mass_newsletter.php?mode=install')), '', __LINE__, __FILE__, $sql);
}
$row_class = 0;
if ( $mail_data = $db->sql_fetchrow($result) )
	do
	{
		$url= mx_append_sid("admin_mass_newsletter.$phpEx?mail_id=".$mail_data['mail_id']."&amp;mail_session_id=".$mail_data['mailsession_id']);
		$template->assign_block_vars('mail_sessions',array(
			'ROW' => ($row_class % 2) ? 'row2' : 'row1',
			'ID' => $mail_data['mail_id'],
			'GROUP' => $lang['All_subcribers'],
			'SUBJECT' => $mail_data['email_subject'],
			'BATCHSTART' => $mail_data['batch_start'],
			'BATCHSIZE' => $mail_data['batch_size'],
			'BATCHWAIT' => $mail_data['batch_wait'].' s.',
			'SENDER' => $mail_data['username'],
			'STATUS' => ($mail_data['status'] == 0) ? sprintf($lang['newsletter_mass_proceed'],  '<a href="' . $url . '">', '</a>') : 'Done',
		));
	}
	while( $mail_data = $db->sql_fetchrow($result) );
else
	$template->assign_block_vars('switch_no_sessions', array(
		'EMPTY' => $lang['newsletter_mass_none'],
	));



$select_list = '<select name = "' . POST_GROUPS_URL . '"><option value = "-1">' . $lang['All_subcribers'] . '</option>';
$select_list .= '</select>';

//
// Generate page
//
if (file_exists($mx_root_path . '/modules/mx_shared/tinymce/jscripts/tiny_mce/tiny_mce.js'))
{
	$module_root_path_tmp = $module_root_path;
	$module_root_path = $mx_root_path . '/modules/mx_shared/';
	$mx_page->add_js_file('tinymce/jscripts/tiny_mce/tiny_mce.js'); // Relative to module_root
	$module_root_path = $module_root_path_tmp;	
}

$gen_simple_header = true;
require($mx_root_path . 'admin/page_header_admin.'.$phpEx);
	
$template->set_filenames(array(
	'body' => 'admin/contact_newsletters.'.$tplEx)
);

$template->assign_vars(array(
	"S_CONTACT_ACTION" => mx_append_sid("admin_mass_newsletter.$phpEx"),
	'S_GROUP_SELECT' => $select_list,
	
	'L_VERSION' => sprintf($contact_config['newsletter_version']),	
	
	'MESSAGE' => $message,
	'SUBJECT' => $subject, 

	'L_EMAIL_TITLE' => $lang['Email'],
	'L_EMAIL_EXPLAIN' => $lang['newsletter_mass_Explain'],
	'L_COMPOSE' => $lang['Compose'],
	'L_RECIPIENTS' => $lang['Recipients'],
	'L_EMAIL_SUBJECT' => $lang['Subject'],
	'L_EMAIL_MSG' => $lang['Message'],
	'L_EMAIL' => $lang['Email'],
	'L_NOTICE' => $notice,
	
	'L_TINY_MCE_LANGUAGE' => $board_config['default_lang'] ? $mx_user->encode_lang($board_config['default_lang']) : 'en',
	
	'L_MAIL_SESSION_HEADER' => $lang['newsletter_mass_header'],
	
	'L_ID' => 'Id',
	'L_GROUP' => $lang['group_name'],
	'L_BATCH_START' => $lang['newsletter_mass_batchstart'],
	'L_BATCH_SIZE'  => $lang['newsletter_mass_batchsize'],
	'L_BATCH_WAIT'  => $lang['newsletter_mass_batchwait'],
	'L_SENDER' => $lang['Auth_Admin'],
	'L_STATUS' => $lang['newsletter_mass_status'],
	'DEFAULT_SIZE' => $def_size,
	'DEFAULT_WAIT' => $def_wait,
));

$template->pparse('body');

require_once( $mx_root_path . 'admin/page_footer_admin.' . $phpEx );


?>