<?php
header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");
header("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
header("Cache-Control: no-store, no-cache, must-revalidate");
header("Cache-Control: post-check=0, pre-check=0", false);
header("Pragma: no-cache");
/*
	Руслан
	http://artriva.ru/
*/

$md5_file          = "mdcache.txt";                        // укажите имя кеш файла

$allowExt          = ".php|.html|.tpl|.htm|.htaccess";     // типы файлов которые обрабатывать( вписывать с точкой вначале и разделять знаком | )
$allowDir          = "";      // папки которые обрабатывать (разделять знаком | ), оставить пустым, если все

$skipDir           = "style_images|uploads";  // папки которые НЕобрабатывать (разделять знаком | ), оставить пустым, если не нужно ничего пропускать
$skipFileGlobal    = "somefile.html|otherfile.php";        // имена файлов которые пропускать. Будут пропускаться все файлы с таким именем в любой папке
$skipFile          = "";  
                                                           // пропускать конкретные файлы. указать полный путь. разделять "|"
                                                           // чтобы определить полный путь: делаем первое обновление хеша
                                                           // открываем файл с хешом, находим нужный файл во второй колонке и копируем полный путь
$adminMail         = "some_mail@mail.ru";                  // почта на которую уйдет отчет об измененных файлах
$mail_subject      = "From Iframe-Detector script";        // тема для письма с отчетом
$adminPassword     = "свой_пассворд";   // пароль(1) для сброса хеша файлов в md5.

$scriptDir         = "некоторая_директория";                           // папка в которой расположен скрипт относительно корня сайта. без слешей на концах пр. "folder", "folder1/folder2"
                                                           // оставить пустым, если скрипт в корне



$xmail = array();
$xmail['subject']  = $mail_subject;
$xmail['headers']  = 'MIME-Version: 1.0' . "\r\n".
					'Content-type: text/html; charset=windows-1251' . "\r\n".
					'From: '.$adminMail. "\r\n" .
					'Reply-To: '.$adminMail. "\r\n" .
					'X-Mailer: PHP/' . phpversion();
$xmail['adminMail'] = $adminMail;

$allowExt           = str_replace(".","\.",$allowExt);
$skipFile           = explode("|",$skipFile);
$skipFileGlobal     = explode("|",$skipFileGlobal);


if (trim($scriptDir) != ""){
$ex                 = "-".(strlen($scriptDir) + 1);
$BASE               = substr(dirname(__FILE__),0,$ex);
$md5_file           = $BASE."/".$scriptDir."/".$md5_file;
} else {
$BASE               = dirname(__FILE__);
$md5_file           = $BASE."/".$md5_file;
}
if (!is_dir($BASE."/".$scriptDir)) die("Папка \"$scriptDir\" отсутсвует - создайте ее, или измените параметр \"$ sсriptDir\" в настройках");

define("ABSPATH",$BASE);


function write_md5(){
	global $md5_file;
	$md5 = dir_md5();
	$md5_from_file = @fopen($md5_file, 'w');
	foreach ($md5 as $key=>$val) @fwrite($md5_from_file, "$val\t$key\n");
}

function checker(){
	global $md5_file,$xmail,$adminPassword;
	$i = 1;

	if (!file_exists($md5_file)) {
		write_md5();
	}
	
	if ( $_POST['updatemd5'] ) {
		if ( $_POST['password'] == $adminPassword  ) {
			write_md5();
		} else {
			echo "Неверный пароль";
		}
	}
	
	$md5 = dir_md5();
	if (file_exists($md5_file)) {
		$md5_from_file = file($md5_file);
		
		if ( !$md5_from_file ) {
			write_md5();
			$md5_from_file = file($md5_file);
		}
		
		$mailBody = "";
		$error = "";
		while (list($ln, $line) = each($md5_from_file))
		{	
			list($md, $ff) = explode("\t", trim($line));
				if ($md != $md5[$ff]) {
					$ff = str_replace(ABSPATH, '/', $ff);
					$ff = str_replace('//', '/', $ff);
					$error .= "<br />$i. $ff - <font color='red'>изменен</font>";
					$mailBody .= "<br />$i. $ff - изменен" . "\r\n";
					$i++;
				}
		}
		if($mailBody != "" && $_GET['send'] == 1) @mail($xmail['adminMail'], $xmail['subject'], $mailBody, $xmail['headers']);
	}
	
	if ($_GET['send'] != 1) {
		if ( $i == 1 ) {
			echo "<br /><font color='green'>Всё ок!</font>";
		} else {
			echo $error;
		}
		
		echo '<br />
			<br />
			<form method="post" action="">
			пароль: <input type="text" id="" name="password" value="">
			<input type="submit" id="updatemd5" name="updatemd5" value="Сбросить/обновить хэш файлов">
			</form>';
	}
}

function dir_md5() {
	global $md5,$allowDir;
	if($allowDir != ""){
		find_md5(ABSPATH, 0);
		$aDir = explode("|",$allowDir);
		while (list($key, $dir) = each($aDir)){
			find_md5(ABSPATH .'/'. $dir, 1);
		}
	}else{
		find_md5(ABSPATH, 1);
	}
	return $md5;
}

function find_md5($path, $recurs) {
	global $md5,$allowExt,$skipDir,$skipFile,$skipFileGlobal;
	
	if ($skipDir != "" and  preg_match("#$skipDir$#i", $path)) $skip = 1;

	if ($dir = @opendir($path)  and $skip != 1 ) {

		while($file = readdir($dir)) {
			if ($file == '.' or $file == '..' ) continue;

			if (!in_array($file,$skipFileGlobal)) {
			
				$file = $path . '/' . $file;
				if (is_dir($file) && $recurs)  {
					find_md5($file, 1);
				}
			

				if (!in_array($file,$skipFile)) {
					if (is_file($file) && preg_match("/$allowExt/i", $file)) {
						$md5[$file] = md5(join ('', file($file)));
					}
				}
			}
		}
		closedir($dir);
 	}
}

checker();

?>