cacert-webdb/scripts/mailing archive/oa02-orgainformation.php.txt

#!/usr/bin/php -q
<? /*
    LibreSSL - CAcert web application
    Copyright (C) 2004-2009  CAcert Inc.

    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; version 2 of the License.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
*/
	include_once("../includes/mysql.php");
	include_once("../includes/lib/general.php");

	//default mail text
	$lines = "";
	$fp = fopen("oa02-mailingtextPoints.txt", "r");
	while(!feof($fp))
	{
		$line = trim(fgets($fp, 4096));
		$lines .= wordwrap($line, 75, "\n")."\n";
	}
	fclose($fp);

	//first variant of mail text
	$lines1 = "";
	$fp = fopen("oa02-mailingtextCats.txt", "r");
	while(!feof($fp))
	{
		$line = trim(fgets($fp, 4096));
		$lines1 .= wordwrap($line, 75, "\n")."\n";
	}
	fclose($fp);

	//second variant of mail text
	$lines2 = "";
	$fp = fopen("oa02-mailingtextPointsCats.txt", "r");
	while(!feof($fp))
	{
		$line = trim(fgets($fp, 4096));
		$lines2 .= wordwrap($line, 75, "\n")."\n";
	}
	fclose($fp);

	// comment next line when starting to send mail not only to me 
	//	$query = "select * from `users` where `email` like 'cacerttest%'";

	$query = "
	SELECT
		`users`.`email`,
		`users`.`fname`,
		`users`.`lname`,
		`orginfo`.`O`,
		`orginfo`.`id`,
		`org`.`memid`
	FROM
		`users`,
		`orginfo`,
		`org`
	WHERE	`org`.`orgid` = `orginfo`.`id`
	AND	`org`.`memid` = `users`.`id`
	AND	`users`.`assurer` = 0
	AND	`org`.`deleted` = 0
	ORDER BY
		`users`.`email`,
		`orginfo`.`O`
	";

	$res = mysql_query($query);
	$xrows = mysql_num_rows($res);

	$report = "";
	$report1 = "";
	$report2 = "";
	$report3 = "";

	while($row = mysql_fetch_assoc($res))
	{
		//    uncomment next line to send mails ...
		$fullname = $row['fname']." ".$row['lname'];
		$status = get_assurer_status($row['memid']);
		if (3 == $status) {
			$mail = str_replace("<name>",$fullname,$lines);
			sendmail($row['email'], "[CAcert.org] Assurer Status Requirement Check on Organisation Adminstrators", $mail, "support@cacert.org", "", "", "CAcert Organisation Assurer", "returns@cacert.org", 1);
			$report = $row['email'].", ".$fullname.", ".$row['O']."\n";
		} elseif (5 == $status) {
			$mail = str_replace("<name>",$fullname,$lines1);
			sendmail($row['email'], "[CAcert.org] Assurer Status Requirement Check on Organisation Adminstrators", $mail, "support@cacert.org", "", "", "CAcert Organisation Assurer", "returns@cacert.org", 1);
			$report1 = $row['email'].", ".$fullname.", ".$row['O']."\n";
		} elseif (7 == $status){
			$mail = str_replace("<name>",$fullname,$lines2);
			sendmail($row['email'], "[CAcert.org] Assurer Status Requirement Check on Organisation Adminstrators", $mail, "support@cacert.org", "", "", "CAcert Organisation Assurer", "returns@cacert.org", 1);
			$report2 = $row['email'].", ".$fullname.", ".$row['O']."\n";
		} else {
			$report3 = $row['email'].", ".$fullname.", ".$row['O']."\n";
		}
	}

	// 1x cc to oao.cacert.org
	sendmail("oao@cacert.org", "[CAcert.org] Assurer Status Requirement Check on Organisation Adminstrators", $lines."\n\n".$lines1."\n\n".$lines2, "oao@cacert.org", "", "", "CAcert OA Support", "returns@cacert.org", 1);

	// 1x mailing report to oao.cacert.org
	sendmail("oao@cacert.org", "[CAcert.org] Assurer Status Requirement Check on Organisation Adminstrators - Report", "oa-mailing sent to $xrows recipients.", "support@cacert.org", "", "", "CAcert OA Support", "returns@cacert.org", 1);

	// 1x detailed mailing report to OAO
	$reporttotal = "Result of the Mailing \n\n Organisation Administrators with missing points \n".$report."\n\n Organisation Adminstrators with missing points ".$report1."\n\n Organisation Adminstrators with missing points and CATS ".$report2."\n\n Organisation Adminstrators with blocked assurer ".$report3;
	sendmail("oao@cacert.org", "[CAcert.org] Assurer Status Requirement Check on Organisation Adminstrators - Report", $reporttotal, "support@cacert.org", "", "", "CAcert Organisation Assurer", "returns@cacert.org", 1);

	// 1x mailing report to Arbitrator of case http://wiki.cacert.org/wiki/Arbitrations/a20110608.1
	sendmail("bernhard@cacert.org", "[CAcert.org] Assurer Status Requirement Check on Organisation Adminstrators - Report", "oa-mailing sent to $xrows recipients.", "support@cacert.org", "", "", "CAcert OA Support", "returns@cacert.org", 1);

	echo "oa-mailing sent to $xrows recipients.\n";