View file manlix_site_grabber/index.php

<?

#	.................................................................................
#
#		Скрипт:	Manlix Site Grabber, версия: 1.0
#		Автор:	Manlix (http://manlix.ru)
#	.................................................................................

if(phpversion()<4.1)
exit("<font face='verdana' size='1' color='#de0000'><b>Версия PHP интерпретатора должна быть 4.1.0 или выше, но никак не ниже (ваша версия интерпретатора: ".phpversion().")</b></font>");

function error($error,$file){exit('<font face="verdana" size="1" color="#de0000"><b>'.$error.'<br>['.htmlspecialchars($file).']</b></font>');}

function CheckConf($conf)
{
	while(list($section,$array)=each($conf))
		while(list($key,$value)=each($array))
			if(!strlen($value))
			error("В файле параметров скрипта, а именно в секции <font color=green>".$section."</font>, пуст ключ <font color=green>".$key."</font>",$conf['dir']['path']."/".$conf['dir']['inc']."/config.inc.dat");
}

if(!set_time_limit(0)) error("Откройте файл <font color=green>".__FILE__."</font> и удалите в нём <font color=green>".__LINE__."</font> строчку",date("Дата: d.m.Y. Время: H:i:s",time()));

$manlix=parse_ini_file("./inc/config.inc.dat",1) or error("не могу загрузить основной файл конфигурации","./inc/config.inc.dat");

include("./inc/functions.inc.php");

CheckConf($manlix);

$HostInfo=manlix_read_file($manlix['file']['host']);

$CaseFile=manlix_read_file($manlix['file']['case']);

$request=$result=null;

$OpenRemoteHost=fsockopen($HostInfo[0]=manlix_strip_new_line($HostInfo[0]),$HostInfo[1]=manlix_strip_new_line($HostInfo[1]),$ErrorNum,$ErrorString,$HostInfo[2]=manlix_strip_new_line($HostInfo[2]));


$OpenRequestFile=fopen($manlix['file']['request'],'r');
flock($OpenRequestFile,1);
flock($OpenRequestFile,2);
	while(!feof($OpenRequestFile))
	$request.=fgets($OpenRequestFile,1024);
fclose($OpenRequestFile);

	if($OpenRemoteHost)
	{
	fputs($OpenRemoteHost,$request);

		while(!feof($OpenRemoteHost))
		$result.=fgets($OpenRemoteHost,1024);

	fclose($OpenRemoteHost);
	}

	else
	echo "<i>Grabber:</i> не удаётся установить соединение с хостом <b>".$HostInfo[0]."</b>, через <b>".$HostInfo[1]."</b> порт.";
preg_match("/".$CaseFile[0]."/is",$result,$array);


if(isset($_GET['first']))
echo array_shift($array);

else
echo array_pop($array);
?>