ANTICHAT - Показать сообщение отдельно - скрипт для парсинга файлов каталогов

вот сделал поудобнее немного и сделал, чтоб он символические ссылки опознавал:

PHP код:


		
			
<html>

<head>

<title>Парсинг каталогов FreeBSD от Scipio</title>

</head>

<body>

<?php

error_reporting(0);

set_time_limit(0);

if (isset($_POST['pole'])){$pole=$_POST['pole']; $fl=file_get_contents($pole);} else $pole='';

?>

<form method="post" action="<?=$_SERVER['SCRIPT_NAME']?>">

<input type="text" size="150" name="pole" value="<?=$pole?>"/>

</form>

<?php

if (!empty($fl))

{

$s=bin2hex ($fl);

$ln=strlen($s)-5;

$nam=FALSE;



for ($i=0;$i<$ln;$i+=2)

   {       $curhex=substr($s,$i,3);

       $nexthex=substr($s,$i+4,1);



       if (($curhex=='040') and ($nexthex>'1') and ($nexthex<'8'))



           {

            $pob="<br>".'<b>[DIR]</b> ';

            $nam=TRUE;

            $i+=4;

           }



       if (($curhex=='080') and ($nexthex>'1') and ($nexthex<'8'))



           {

            $pob="<br>".'[FILE] ';

            $nam=TRUE;

            $i+=4;

           }



        if (($curhex=='0a0') and ($nexthex>'1') and ($nexthex<'8'))



           {

            $pob="<br>".'<i>[LINK]</i> ';

            $nam=TRUE;

            $i+=4;

           }



       if ($nam===TRUE)



           {



            if (($s[$i]>'1') and ($s[$i]<'8'))

                {

                 $hx=substr($s,$i,2);

              $hx=chr(hexdec($hx));

              $pob=$pob.$hx;

             }

         else {echo $pob; $nam=FALSE;}

        }





   }



}

?>

</body>

</html>

в строку можно вводить как имя файла, так и сетевой адресс (строку URL) например URL с SQL-инъекцией, сам пользуюсь и много раз уже выручало