.
// This is a script for sending mass email to project participants.
// Test it first and use it with care, to avoid alienating your
// project's volunteers.
// Note also that the queries such as the one to find lapsed users
// assume that the project keeps the results in the DB for some interval
// such as a week, before purging them. So active users will always
// have at least one result in the database.
require_once("../inc/util_ops.inc");
require_once("../inc/email.inc");
function exit_error($message) {
echo "Error: $message ";
exit();
}
// These are set to large values because otherwise the script has
// a tendency to just stop after some time.
//
ini_set ("memory_limit", "20M");
set_time_limit(3600);
$receiver = 0;
$receiver = post_int('receiver', true);
$subject = post_str('subject', true);
$body = post_str('body', true);
$body = stripslashes($body);
admin_page_head("Send mass email");
if ($receiver > 0) {
db_init();
switch ($receiver) {
case 1:
// all users
$query = "select * from user where send_email > 0";
break;
case 2:
// unsuccessful users
$week_ago = time(0) - 7*86400;
$query = "select user.id,user.name,user.email_addr from user left join result on user.id=result.userid where send_email>0 and total_credit=0 and user.create_time<$week_ago and isnull(result.id)";
break;
case 3:
// successful users
$query = "select * from user where send_email>0 and total_credit>0";
break;
case 4:
// currently contributing users
$query = "select distinct user.id,user.name,user.email_addr from user left join result on user.id=result.userid where send_email>0 and !isnull(result.id)";
break;
case 5:
// lapsed users
$query = "select user.id,user.name,user.email_addr from user left join result on user.id=result.userid where send_email>0 and total_credit>0 and isnull(result.id)";
break;
default:
// should never happen!
exit_error("Got impossible value of receiver from selection!");
}
// FOR DEBUGGING
$query .= " LIMIT 10";
$result = mysql_query($query);
while ($user = mysql_fetch_object($result)) {
// TODO: might want to also replace TOTAL_CREDIT, RAC, and similar.
$body_to_send = str_replace(USERNAME, $user->name, $body);
$body_to_send .= "\n\nTo opt out of future emails from ".PROJECT.", please edit your project preferences at ".URL_BASE."prefs.php?subset=project\n";
$retval = send_email($user, $subject, $body_to_send);
if ($retval) {
// send_email returns TRUE on success
echo "Sent email to $user->name [$user->id] at $user->email_addr ";
} else {
echo "send_email() to $user->name [$user->id] at $user->email_addr failed with error $retval ";
}
// try to get output on the screen for feedback. May not help...
flush();
}
exit();
}
echo "\n";
?>