mailing.test2.php

<?php
/**
 * Copyright (C) 2005, 2006, 2007, 2008  Brice Burgess <bhb@iceburg.net>
 * 
 * This file is part of poMMo (http://www.pommo.org)
 * 
 * poMMo 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, or any later version.
 * 
 * poMMo 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 program; see the file docs/LICENSE. If not, write to the
 * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
 */
 
/**********************************
	INITIALIZATION METHODS
 *********************************/
define('_poMMo_support', TRUE);
require ('bootstrap.php');
Pommo::init(array('install' => TRUE));
$logger =& Pommo::$_logger;

// start error logging
Pommo::logErrors();

// ignore user abort
ignore_user_abort(true);
require_once(Pommo::$_baseDir.'classes/Pommo_Mail_Ctl.php');

$code = (empty($_GET['code'])) ? null : $_GET['code'];
$spawn = (!isset($_GET['spawn'])) ? 0 : ($_GET['spawn'] + 1);

trigger_error('Testing Log, Spawn #'.$spawn);

$fileContent = "<?php die(); ?>\n[code] = $code\n[spawn] = $spawn\n";

if (!$handle = fopen(Pommo::$_workDir . '/mailing.test.php', 'w')) 
	die('Unable to write to test file');

if (fwrite($handle, $fileContent) === FALSE) 
	die('Unable to write to test file');
	
fclose($handle);
	
	
if($spawn > 0)
	die();

sleep(1);

// respawn test
if (!Pommo_Mail_Ctl::spawn(Pommo::$_baseUrl.'mailing.test2.php?'.
	'code='.$code.
	'&spawn='.$spawn,true)) {

	$fileContent .= '[error] = true';
	$handle = fopen(Pommo::$_workDir . '/mailing.test.php', 'w');
	fwrite($handle, $fileContent);
	fclose($handle);
	
	$errors = $logger->getAll();
	
	$fileContent = print_r($errors,true);
	$handle = fopen(Pommo::$_workDir . '/MAILING_TEST', 'w');
	fwrite($handle, $fileContent);
	fclose($handle);
}

die();