Просмотр файла www/task_explorer.php

Свежие Креативы и море позитива !!!
Размер файла: 5.81Kb
<?php
set_time_limit(300);
header('Content-Type: text/plain');
print "---===:::{START}::===---\n";
$sitespath="/home/kmx/www/sites";

array($sites);
$d=dir($sitespath);
while ($directory=$d->read())
	{
	if (filetype($sitespath.'/'.$directory)!='dir') continue;
#	if ($directory=='_default') continue;
	if (($directory=='..')||($directory=='.')) continue;
	$sites[]=$directory;
	}
$d->close();
@sort($sites, SORT_STRING);

$cntsite=$cntpage=0;

while ($_site=@each($sites))
	{
	$cntsite++;
	$site=$_site[1];
#if ($site!='test') continue;

	unset($files);
	array($files);
	$d=dir($sitespath.'/'.$site);
	while ($currentfile=$d->read())
	    {
	    if (filetype($sitespath.'/'.$site.'/'.$currentfile)!='file') continue;
#	    if ($currentfile!='index.wml') continue;
	    if (substr($currentfile,-4)!='.wml') continue;
#	    if (substr($currentfile,-4)=='.dat') continue;
	    if (($currentfile=='..')||($currentfile=='.')) continue;
	    $files[]=$currentfile;
	    }
	$d->close();
	@sort($files, SORT_STRING);

	while ($_file=@each($files))
	    {
	    $wmlfile=$_file[1];

#=-.,.-="=-.,.-="=-.,.-="=-.,.-="=-.,.-="=-.,.-="=-.,.-="=-.,.-="=-.,.-="=-.,.-=
# ЗАДАНИЕ ДЛЯ ОБРАБОТКИ WML-файлов

		$found=false;
		$npage='';
		$page=file($sitespath.'/'.$site.'/'.$wmlfile);

/*-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=*/
/**/# Замена пролога у всех
		$found=true;
		for ($i=0;$i<sizeof($page);$i++)
			{
			if ($i==0) {$found=true; $page[$i]='<?xml version="1.0" encoding="Utf-8"?><!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.2//EN" "http://www.wapforum.org/DTD/wml_1.2.xml"><wml><head><meta forua="true" http-equiv="Cache-Control" content="max-age=0,proxy-revalidate,must-revalidate"/></head>';}
			if (trim($page[$i])!='<!-- delete -->') $npage.=trim($page[$i])."\n";
			if (trim($page[$j])=='</p></card></wml>') break;
			}
/*-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=*/

/*-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=*/
/*/# Удаление рекламы
		$found=true;
		for ($i=0;$i<sizeof($page);$i++)
			{
			if (strpos(' '.$page[$i],'<!-- * -->') && (strlen(trim($page[$i]))>10)) {$found=true; $page[$i]='<!-- * -->';}
			if (trim($page[$i])!='<!-- delete -->') $npage.=trim($page[$i])."\n";
			if (trim($page[$j])=='</p></card></wml>') break;
			}
/*-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=*/

/*-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=*/
/*/# Установка на все рекламы с кодом 130
		for ($j=0;$j<sizeof($page);$j++)
			{
			if (substr(trim($page[$j]),0,10)=='<!-- * -->')
				{
				$reklama='';
	            $random = ('0.'.substr(mt_rand(),1))+0;
	                if ($random<=0.1)   $reklama='<a href="http://mag.su/java.php?pi=130">Р›СѓС‡С€РёРµ Java</a>';
	            elseif ($random<=0.35)  $reklama='<a href="http://mag.su/poly.php?pi=130">РњРµР»РѕРґРёРё</a>';
	            elseif ($random<=0.50)  $reklama='<a href="http://mag.su/javalist.php?pi=130&amp;g=7">"Р”Р»СЏ РІР·СЂРѕСЃР»С‹С…"</a>';
	            elseif ($random<=0.65)  $reklama='<a href="http://mag.su/javalist.php?pi=130&amp;g=dol">Р›СѓС‡С€Рµ Рё РґРµС€РµРІР»Рµ!</a>';
	            elseif ($random<=0.7)   $reklama='<a href="http://mag.su/javalist.php?pi=130&amp;g=10">РќРѕРІРѕРіРѕРґРЅРёРµ</a>';
	            elseif ($random<=0.735) $reklama='<a href="http://mag.su/javalist.php?pi=130&amp;g=1">РђСЂРєР°РґС‹</a>';
	            elseif ($random<=0.77)  $reklama='<a href="http://mag.su/javalist.php?pi=130&amp;g=2">РЎРёРјСѓР»СЏС‚РѕСЂС‹</a>';
	            elseif ($random<=0.805) $reklama='<a href="http://mag.su/javalist.php?pi=130&amp;g=3">Р“РѕР»РѕРІРѕР»РѕРјРєРё</a>';
	            elseif ($random<=0.84)  $reklama='<a href="http://mag.su/javalist.php?pi=130&amp;g=4">Р РѕР»РµРІС‹Рµ Java-РёРіСЂС‹</a>';
	            elseif ($random<=0.875) $reklama='<a href="http://mag.su/javalist.php?pi=130&amp;g=5">РЎС‚СЂР°С‚РµРіРёРё</a>';
	            elseif ($random<=0.91)  $reklama='<a href="http://mag.su/javalist.php?pi=130&amp;g=6">Java-РЎРїРѕСЂС‚</a>';
	            elseif ($random<=0.945) $reklama='<a href="http://mag.su/javalist.php?pi=130&amp;g=8">РџСЂРёРєР»СЋС‡РµРЅРёСЏ</a>';
	            elseif ($random<=0.98)  $reklama='<a href="http://mag.su/javalist.php?pi=130&amp;g=9">РџРѕР»РµР·РЅС‹Рµ Java-РїСЂРёР»РѕР¶РµРЅРёСЏ</a>';
	            elseif ($random<=1.0)   $reklama='<a href="http://mag.su/javalist.php?pi=130&amp;g=new">РќРѕРІРёРЅРєРё</a>';

                $reklama='<small><b>'.$reklama.'</b></small><br/>';
				$npage.='<!-- * -->'.$reklama."\n";

				$found=true;
				}
			else $npage.=trim($page[$j])."\n";
			if (trim($page[$j])=='</p></card></wml>') break;
			}
/*-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=*/

/*-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=*/
/*/# Удаление левых счетчиков
         for ($i=0;$i<sizeof($page);$i++)
             {
             if ((substr(trim($page[$i]),0,12)!='<!-- cnt -->')&&(strpos(trim($page[$i]),'/cnt.kmx.ru/')))
                 {
                 $npage.=str_replace('http://cnt.kmx.ru/','http://ERROR/',trim($page[$i]))."\n";
                 $found=true;
                 }
             else $npage.=trim($page[$i])."\n";
             if (trim($page[$i])=='</p></card></wml>') break;
             }
/*-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=*/


#-=:=-.-=:=-.-=:=-.-=:=-.-=:=-.-=:=-.-=:=-.-=:=-.-=:=-.-=:=-.-=:=-.-=:=-.-=:=-.-
		if ($found)
	        {
#	        print $site."/".$wmlfile."\n";
	        $fp = fopen ($sitespath.'/'.$site.'/'.$wmlfile, "w+");
	        fwrite ($fp, $npage);
	        fclose ($fp);
	        $cntpage++;
	        }
		}

	}

print "Sites=$cntsite / Pages=$cntpage\n---===:::{STOP}::===---";
exit;
?>