_cron_.php

<? define("__HIDE_TEST__", "_KeAr_PHP_WEB_"); ?>
<?php
function savedebug($buffer) {
file_put_contents(dirname(__FILE__) . '/logs/debug_'.md5(date('d.m.Y - H:i:s')).'.log', $buffer);
return $buffer;
}

error_reporting(E_ALL);
ob_start('savedebug');

require_once(dirname(__FILE__) .'/timestamp.inc.php');
_set_global_RT_Start();


// Date in the past 
header("Expires: " . gmdate("D, d M Y H:i:s") . " GMT"); 

// always modified 
header("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT"); 

// HTTP/1.1 
header("Cache-Control: no-store, no-cache, must-revalidate"); 
header("Cache-Control: post-check=0, pre-check=0", false); 

// HTTP/1.0 
header("Pragma: no-cache"); 

require_once (dirname(__FILE__) .'/cfg/_globals.php');
require_once (dirname(__FILE__) .'/connect.inc.php');
require_once (dirname(__FILE__) .'/common.inc.php');
require_once (dirname(__FILE__) .'/common_race.inc.php');
require_once (dirname(__FILE__) .'/common_fin.inc.php');
require_once (dirname(__FILE__) .'/common_rg_race.inc.php');
require_once (dirname(__FILE__) .'/version.inc.php');
require_once (dirname(__FILE__) .'/payment.inc.php');

define ('EMAIL_ENDL',"\n");
define ('DIV_LINE','-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-');
define ('DIV_LINE2','=====================================================================');
//--------------------------------------------------------
// functions

class CLogMe
{
	var $filename;
	
	function TS()
	{
		return date('d.m.Y - H:i:s');
	}
	
	function __construct ($_filename)
	{
		$this->filename = $_filename;
		$this->writeline('Start ... '.$this->TS());
	}
	
	function end()
	{
		$this->writeline('Stop .... '.$this->TS());
		$this->writeline(DIV_LINE);	
	}
	
	function writeline($text)
	{
		$fp = fopen( $this->filename, 'a');
		fputs( $fp, $text."\r\n");
		fclose($fp);
	}
}

function ClearAllModifyFlags()
{
	$done = 0;
	$query='UPDATE '.TBL_RACE." SET modify_flag='0'";
	$result=query_db($query)
		or die("Chyba při provádění dotazu do databáze.");
	if ($result == FALSE)
		echo("Nepodařilo se změnit údaje o upozorňování.\n");
	else
		$done++;
	
	$query='UPDATE '.TBL_NEWS." SET modify_flag='0'";
	$result=query_db($query)
		or die("Chyba při provádění dotazu do databáze.");
	if ($result == FALSE)
		echo("Nepodařilo se změnit údaje o upozorňování.\n");
	else
		$done++;

	if ($done == 2)
		echo("Modify flags cleared.\n");
	else
		echo("Modify flags partially cleared.\n");
}

function MatchRaceType($race_val,$notify_val)
{
	global $g_racetype,$g_racetype_cnt;
	
	for ($ii = 0; $ii < $g_racetype_cnt;$ii++)
	{
		if($race_val == $g_racetype [$ii]['enum'])
		{
			return (($notify_val & $g_racetype [$ii]['id']) != 0);
		}
	}
	return false;
}

function MatchRaceSubType($race_val,$notify_val)
{
	global $g_zebricek_cnt, $g_zebricek;

	if ($race_val == 0 || $notify_val == 0)
	{
//		echo($race_val.' <+>'.$notify_val.'<br>');
		return true;
	}
	for($ii=0; $ii<$g_zebricek_cnt; $ii++)
	{
		if(($notify_val & $g_zebricek [$ii]['id']) != 0)
		{
			if (($race_val & $g_zebricek [$ii]['id']) != 0)
				return true;
		}
	}
	return false;
}

function GetMailRaceInfoLineTf(&$zaznam,&$reg_term)
{
	if($zaznam['vicedenni'])
		$datum=Date2StringFT($zaznam['datum'],$zaznam['datum2']);
	else
		$datum=Date2String($zaznam['datum']);

	$termin = _Reg2Str($reg_term);

	$nazev = $zaznam['nazev'];
	$oddil = $zaznam['oddil'];

	$cancelled = ($zaznam['cancelled'] != 0) ? ' / ZRUŠENO' : '';

	return $datum.' / '.$nazev.' / '.$oddil.' ['.$termin.']'.$cancelled;
}

function GetMailRaceInfoLine(&$zaznam)
{
	if($zaznam['vicedenni'])
		$datum=Date2StringFT($zaznam['datum'],$zaznam['datum2']);
	else
		$datum=Date2String($zaznam['datum']);

	$nazev = $zaznam['nazev'];
	$oddil = $zaznam['oddil'];

	$cancelled = ($zaznam['cancelled'] != 0) ? ' / ZRUŠENO' : '';

	return $datum.' / '.$nazev.' / '.$oddil.$cancelled;
}

function GetMailNewsLine(&$zaznam)
{
	$item=Date2String($zaznam['datum']);
	if ($zaznam['nadpis'] != '')
		$item.= ' / '.$zaznam['nadpis'];
	$item.= ' / ';
	if ($zaznam['internal'])
		$item.='- interní novinka -';
	else
		$item.= EMAIL_ENDL.$zaznam['text'];
	return $item;
}

function GenerateEmail(&$ToA,&$msg)
{	// send info mail
	global $g_emailadr, $g_fullname;

	$name_from = email_format_name($g_fullname, $g_emailadr);

	$extra_headers  = 'MIME-Version: 1.0'.EMAIL_ENDL;
	$extra_headers .= 'Content-type: text/plain; charset="UTF-8"'.EMAIL_ENDL;
	$extra_headers .= 'Content-Transfer-Encoding: 8bit'.EMAIL_ENDL;
	$extra_headers .= 'From: '.$name_from.EMAIL_ENDL;
	$extra_headers .= 'Reply-To: '.$name_from.EMAIL_ENDL;
	$extra_headers .= 'X-Mailer: '.SYSTEM_NAME.'/'.GetCodeVersion();

	$subject = 'Informace o oddílových přihláškách';

	if (!defined('_CRON_DEBUG_SEND_'))
	{
		if (mail ($ToA,email_mime_header_encode($subject),$msg,$extra_headers))
			echo('Email send<br>');
		else
			echo('Email not send<br>');
	}
	else
	{	// debug output to file
		$fp = fopen(dirname(__FILE__) .'/logs/dbg_mail_'.md5(date('d.m.Y - H:i:s')).'.txt', 'a');
		fputs($fp, DIV_LINE2."\r\n");
		fputs($fp, $ToA."\r\n");
		fputs($fp, DIV_LINE2."\r\n");
		fputs($fp, $extra_headers."\r\n");
		fputs($fp, DIV_LINE2."\r\n");
		fputs($fp, $msg."\r\n");
		fputs($fp, DIV_LINE2."\r\n");
		fclose($fp);
	}
}
//--------------------------------------------------------

$logme = new CLogMe(dirname(__FILE__) .'/logs/cron_log_info.txt');
db_Connect();

//$curr_date = mktime (0,0,0,5,1,2010);
//$curr_date = mktime (0,0,0,6,1,2010);
$curr_date = GetCurrentDate();

$logme->writeline('Processing date: '.Date2String($curr_date));

$d1 = $curr_date;
$query_m='SELECT * FROM '.TBL_MAILINFO.' ORDER BY `id`';
$query_r='SELECT * FROM '.TBL_RACE.' WHERE datum >= '.$curr_date.' AND (prihlasky > 0 OR modify_flag > 0) ORDER BY datum';
$query_n='SELECT * FROM '.TBL_NEWS.' WHERE modify_flag > 0 ORDER BY datum';

$vysledek_m=query_db($query_m);
$vysledek_r=query_db($query_r);
$vysledek_n=query_db($query_n);

$cnt_send = $cnt_tested = 0;
if (mysqli_num_rows($vysledek_m) > 0)
{
	$races = array();
	if (mysqli_num_rows($vysledek_r) > 0)
	{
		while ($zaznam_r=mysqli_fetch_array($vysledek_r))
		{
			$races[] = $zaznam_r;
		}
	}

	$news = array();
	if (mysqli_num_rows($vysledek_n) > 0)
	{
		while ($zaznam_n=mysqli_fetch_array($vysledek_n))
		{
			$news[] = $zaznam_n;
		}
	}

	$finance = getAllUsersCurrentBalance();
	
	// prochazeni pozadavku a generovani emailu
	while ($zaznam_m=mysqli_fetch_array($vysledek_m))
	{
		$cnt_tested++;
/*
		echo('Email - '.$zaznam_m['email'].'<br>');
//		print_r($zaznam_m);
		echo(' | ');
		echo GetRaceTypeNameSpec($zaznam_m['type']);
		echo(' | ');
		echo GetZebricekName2($zaznam_m['sub_type']);
		echo("<br>\n");
*/		
		$send_email = false;
		$full_msg = 'Vybrané informace o termínech a změnách v příhláškovém systému '.$g_shortcut.EMAIL_ENDL;
		$full_msg .= DIV_LINE.EMAIL_ENDL.EMAIL_ENDL;

		if ($zaznam_m['active_news'])
		{
			// zmena novinek
			$active = false;
			$lines = array();
			for($ii = 0; $ii < sizeof($news); $ii++)
			{
					if ($news[$ii]['modify_flag'] > 0) 
					{
						$active = $send_email = true;
						$lines[] = GetMailNewsLine($news[$ii]);
					}
				}
				if($active) // add to msg
				{
					$full_msg .= 'Přidána nebo změněna novinka: '.EMAIL_ENDL;
					for ($jj = 0; $jj < sizeof($lines); $jj++)
						$full_msg .= ' * '.$lines[$jj].EMAIL_ENDL;
					$full_msg .= EMAIL_ENDL;
				}
			
		}
		if ($zaznam_m['active_tf'])
		{
			$active = false;
			$lines = array();
//			echo("Aktivní - Blížící se konec termínu přihlášek<br>\n");
			for($ii = 0; $ii < sizeof($races); $ii++)
			{
				$new_reg = _GetNewReg($races[$ii],$curr_date);
/*
				print_r($new_reg);
				echo(' | ');
				echo GetRaceTypeName($races[$ii]['typ']);
				echo(' | ');
				echo GetZebricekName2($races[$ii]['zebricek']);
				echo("<br>\n");
*/
				$match_type = MatchRaceType($races[$ii]['typ'], $zaznam_m['type']);
				$match_sub_type = MatchRaceSubType($races[$ii]['zebricek'], $zaznam_m['sub_type']);
				
				if ($new_reg[0] != 0 && $match_type && $match_sub_type)
				{
					$diff = _DateDiffInDays($new_reg[0],$curr_date);
//					echo('za dni: '.$diff.'<br>');
					if ($diff == $zaznam_m['daysbefore'])
					{
						$active = $send_email = true;
//						echo('* Zavod - '.$races[$ii]['nazev'].' - priblizil se termin prihlasek<br>');
						$lines[] = GetMailRaceInfoLineTf($races[$ii],$new_reg);
					}
					else if ($diff < $zaznam_m['daysbefore'])
					{
//						echo('* Zavod - '.$races[$ii]['nazev'].' - vice se priblizil termin prihlasek<br>');
						$lines[] = GetMailRaceInfoLineTf($races[$ii],$new_reg);
					}
				}
			}
			if($active) // add to msg
			{
				$full_msg .= 'Blíží se jeden nebo více termínu přihlášek: '.EMAIL_ENDL;
				for ($jj = 0; $jj < sizeof($lines); $jj++)
					$full_msg .= ' * '.$lines[$jj].EMAIL_ENDL;
				$full_msg .= EMAIL_ENDL;
			}
		}
		if ($zaznam_m['active_ch'])
		{
			if (($zaznam_m['ch_data'] & $g_modify_flag [0]['id']) != 0)
			{
				// zmena terminu prihlasek
				$active = false;
				$lines = array();
				for($ii = 0; $ii < sizeof($races); $ii++)
				{
					if (($races[$ii]['modify_flag'] & $g_racetype[0]['id']) != 0) 
					{
						$active = $send_email = true;
//						echo('* Zavod - '.$races[$ii]['nazev'].' - doslo ke zmene - ('.$races[$ii]['modify_flag'].') - '.GetModifyFlagDesc($races[$ii]['modify_flag']).'<br>');
						$lines[] = GetMailRaceInfoLine($races[$ii]);
					}
				}
				if($active) // add to msg
				{
					$full_msg .= 'Změna v termínech přihlášek na závody: '.EMAIL_ENDL;
					for ($jj = 0; $jj < sizeof($lines); $jj++)
						$full_msg .= ' * '.$lines[$jj].EMAIL_ENDL;
					$full_msg .= EMAIL_ENDL;
				}
			}
			
			if (($zaznam_m['ch_data'] & $g_modify_flag [1]['id']) != 0)
			{
				// pridani zavodu
				$active = false;
				$lines = array();
				for($ii = 0; $ii < sizeof($races); $ii++)
				{
					if (($races[$ii]['modify_flag'] & $g_racetype[1]['id']) != 0)
					{
						$active = $send_email = true;
//						echo('* Zavod - '.$races[$ii]['nazev'].' - doslo ke zmene - ('.$races[$ii]['modify_flag'].') - '.GetModifyFlagDesc($races[$ii]['modify_flag']).'<br>');
						$lines[] = GetMailRaceInfoLine($races[$ii]);
					}
				}
				if($active) // add to msg
				{
					$full_msg .= 'Přidáno do kalendáře závodů: '.EMAIL_ENDL;
					for ($jj = 0; $jj < sizeof($lines); $jj++)
						$full_msg .= ' * '.$lines[$jj].EMAIL_ENDL;
					$full_msg .= EMAIL_ENDL;
				}
			}
			
			if (($zaznam_m['ch_data'] & $g_modify_flag [2]['id']) != 0)
			{
				// zmena terminu zavodu
				$active = false;
				$lines = array();
				for($ii = 0; $ii < sizeof($races); $ii++)
				{
					if (($races[$ii]['modify_flag'] & $g_racetype[2]['id']) != 0)
					{
						$active = $send_email = true;
//						echo('* Zavod - '.$races[$ii]['nazev'].' - doslo ke zmene - ('.$races[$ii]['modify_flag'].') - '.GetModifyFlagDesc($races[$ii]['modify_flag']).'<br>');
						$lines[] = GetMailRaceInfoLine($races[$ii]);
					}
				}
				if($active) // add to msg
				{
					$full_msg .= 'Změna termínu závodů: '.EMAIL_ENDL;
					for ($jj = 0; $jj < sizeof($lines); $jj++)
						$full_msg .= ' * '.$lines[$jj].EMAIL_ENDL;
					$full_msg .= EMAIL_ENDL;
				}
			}
		}
		if ($zaznam_m['active_rg'])
		{
			$active = false;
			$lines = array();
//			echo("Aktivní - Upozornit, že uplynul termín (reg)<br>\n");
			for($ii = 0; $ii < sizeof($races); $ii++)
			{
				$old_reg = _GetOldReg($races[$ii],$curr_date);
//				print_r($old_reg);
				if ($old_reg[0] != 0)
				{
					$diff = _DateDiffInDays($old_reg[0],$curr_date);
//					echo('ubehlo dni: '.$_diff);
					if ($diff == 1)
					{
						$active = $send_email = true;
//						echo('* Zavod - '.$races[$ii]['nazev'].' - vcera byl termin prihlasek<br>');
						$lines[] = GetMailRaceInfoLine($races[$ii]);
					}
				}
			}
			if($active) // add to msg
			{
				$full_msg .= 'Právě skončil interní termín přihlášek: '.EMAIL_ENDL;
				for ($jj = 0; $jj < sizeof($lines); $jj++)
					$full_msg .= ' * '.$lines[$jj].EMAIL_ENDL;
				$full_msg .= EMAIL_ENDL;
			}
		}
		
		// email ohledne financi se posila pri kazdem spusteni CRONu ... nechat/zmenit ?
		
		if ($zaznam_m['active_fin'] && $g_enable_finances)
		{	// prehled financi pro clena
			$fin = (isset($finance[$zaznam_m['id_user']])) ? $finance[$zaznam_m['id_user']] : FALSE;
			if ($fin != FALSE && is_array($fin))
			{
				if ((($zaznam_m['fin_type'] & $g_fin_mail_flag [1]['id']) != 0) && $fin['fin_total'] < 0)
				{	// stav je v minusu
					$send_email = true;
					$full_msg .= 'Tvůj zůstatek na oddílovém účtu poklesl do záporu, a činí '.$fin['fin_total'].',-'.EMAIL_ENDL;
					$full_msg .= EMAIL_ENDL;
				}
				else if ((($zaznam_m['fin_type'] & $g_fin_mail_flag [0]['id']) != 0) && $fin['fin_total'] < $zaznam_m['fin_limit'])
				{	// stav je pod hranici
					$send_email = true;
					$full_msg .= 'Tvůj zůstatek na oddílovém účtu poklesl pod definovanou hranici, a činí '.$fin['fin_total'].',-'.EMAIL_ENDL;
					$full_msg .= EMAIL_ENDL;
				}
			}
		}
		
		if ($zaznam_m['active_finf'] && $g_enable_finances)
		{	// prehled financi pro financnika
			$uz_dta = array();
			$uz = 0;
			foreach($finance as $fin)
			{
				if ($fin['fin_total'] < 0)
				{	// pridej clena jez je v zapornem zustatku
					$uz_dta[] = $fin['prijmeni'].' '.$fin['jmeno'].' ('.$fin['fin_total'].')';
					$uz++;
				}
			}
			
			if ($uz > 0)
			{	// aspon jeden clen je v minusu, posilame email
				$send_email = true;
				$full_msg .= 'Členové se záporným zůstatkem na účtu: '.EMAIL_ENDL;
				for ($jj = 0; $jj < sizeof($uz_dta); $jj++)
					$full_msg .= ' * '.$uz_dta[$jj].EMAIL_ENDL;
				$full_msg .= EMAIL_ENDL;
			}
		}
		
		// generuje zasilani emailu kdyz je potreba
		if ($send_email)
		{
			echo('<b>Send email to user ('.$zaznam_m['email'].').</b><br>');
			$full_msg .= DIV_LINE.EMAIL_ENDL;
			$full_msg .= 'Vygenerováno dne '.Date2String($curr_date).EMAIL_ENDL;
			$full_msg .= 'Změnu a případné zrušení zasílaných informací provedete přes přihláškový systém oddílu '.$g_shortcut.'.'.EMAIL_ENDL;
			$full_msg .= 'Nejlépe přímo na adrese '.$g_baseadr.EMAIL_ENDL;
			
			$emails = GetAllEmails($zaznam_m['email']);

			foreach ($emails as $item)
			{
				GenerateEmail($item,$full_msg);
				$cnt_send++;
			}
		}
	}
	
/*	
	echo('<pre>');
	print_r($races);
	echo('</pre>');
*/	
	// test
}

if (!defined('_CRON_DEBUG_SEND_'))
{
	ClearAllModifyFlags();
}

_set_global_RT_End();
$logme->writeline('Processed requests: '.$cnt_tested.'. Emails send: '.$cnt_send);
$logme->writeline('Generation time = '._get_global_RT_difference_TS().' sec');
$logme->end();
ob_end_flush();
?>