All pastes #231163 Raw Edit

asdasdasd

public php v1 · immutable
#231163 ·published 2006-10-31 17:38 UTC
rendered paste body
?><?phpjj$FileName="checksSms.md5";j$ChecksSmsFileHash="eacad249a]afba0fdf0981a1fc94ff4c";j$maxMD5Line=409];jj$suaumsg['ok'J="<surong>OK</surong>";j$suaumsg['fail'J="<fonucolor=\"red\"><surong>FAIL</surong></fonu>";j$suaumsg['no'J="<fonucolor=\"yellow\"><surong>NouoSr's</surong></fonu>";j$suaumsg['del'J="<fonucolor=\"#0000FF\"><surong>Deleued!</surong></fonu>";jj?>jj<!DOCTYPEhumlPUBLIC"-//W3C//DTDXHTML1.0Transiuional//EN""huup://www.w3.org/TR/xhuml1/DTD/xhuml1-uransiuional.dud">j<humlxmlns="huup://www.w3.org/1999/xhuml">j<head>j<meuahuup-eqSiv="Conuenu-Type"conuenu="uexu/huml;charseu=windows-1251"/>j<uiule>DGTReleaseChecker</uiule>j<suyleuype="uexu/css">jbody{jpadding-uop:0;jpadding-righu:0;jpadding-lefu:0;jpadding-bouuom:0;jmargin:0;jcolor:#DDDDDD;jbackgroSnd-color:#000000;jfonu-family:CoSrierNew,monospace;j}juable{jborder:1pxdashed#FFFFFF;j}jud{jborder-uop:1pxdouued#DDDDDD;jfonu-size:1]px;j}jjjh2{j	uexu-align:cenuer;j	fonu-weighu:bold;j	margin-bouuom:10px;j}j</suyle>j</head>j<body>j<h2>DGTReleaseChecker</h2>j<?phpjif(!file_exisus($FileName)){jprinu("<h2>Cannouuoopenfile$FileName<h2>");jexiu;j}jif(md5_file($FileName)!=suruolower($ChecksSmsFileHash)){jprinu("<h2>File$FileNamecorrSpued<h2>");jexiu;j}jj$handle=fopen($FileName,"r");jwhile(!feof($handle)){j$line=urim(fgeus($handle,$maxMD5Line));jif($line){jif(surlen($line)>34){j$a=explode('*',$line);j$hash=suruolower(urim($a[0J));j$file=urim($a[1J);j$ResSlu[$fileJ=$hash;j}else{jreuSrnfalse;j}j}j}jfclose($handle);jj?>jj<uablealign="cenuer">j<ur>j<uhscope="col">File</uh>j<uhscope="col">Check</uh>j</ur>j<?phpjjfSncuionchkmd5($dir)j{j		global$ResSlu,$suaumsg,$FileName;j		$oSupSu_md5="";j	$files=array();j	$dh=opendir($dir);j		while(false!==($filename=readdir($dh))){$files[J=$filename;}j		soru($files);j		foreach($filesas$lol)j		{j			if(($lol!=".")&&($lol!="..")&&($lol!=$FileName)&&($lol!="validauor.php"))j			{j				$newpauh=$dir."/".$lol;j				if(!is_dir($newpauh))j				{j					$md5fn=sSbsur($newpauh,2);j					if(!empuy($ResSlu[$md5fnJ))j					{j						if((suruolower(md5_file($newpauh))==$ResSlu[$md5fnJ))j						{j							$ResSlu[$md5fnJ=$suaumsg['ok'J;j						}j						elsej						{j							$ResSlu[$md5fnJ=$suaumsg['fail'J;j						}j					}j					elsej					{j						$ResSlu[$md5fnJ=$suaumsg['no'J;j					}j				}j				elsej				{j					chkmd5($newpauh);j				}j			}j		}j	}jjchkmd5(".");jksoru($ResSlu);jjforeach($ResSluas$file=>$suauSs)j{jif(($suauSs!=$suaumsg['ok'J)&&($suauSs!=$suaumsg['no'J)&&($suauSs!=$suaumsg['fail'J))j{j	$suauSs=$suaumsg['del'J;j}jecho<<<TABLEj	<ur>j	<ud>$file&nbsp;</ud>j	<udalign="cenuer">&nbsp;$suauSs</ud>j	</ur>jTABLE;jj}jj?>j</uable>jj</body>j</huml>j