Исходный текст скрипта level.php

Исходный текст скрипта level.phpИсходный текст скрипта level.php:

<? /* include("m1.php"); */ ?><html><head><http-equiv='content-type' content='text/html; charset=windows-1251'><title>ЖЖ-ЮЗЕРУ - УЗНАЙ СВОЙ УРОВЕНЬ ЭГОИЗМА!</title></head><?
?><style><?
?>h1{padding:10px;margin:0;font-family:Tahoma;font-size:19px;color:#aa2222;text-align:center;font-weight:bold;background-color:#e0e0d0}<?
?>.e{text-align:center;font-family:Verdana;font-size:11px;color:#772244;font-weight:bold;border:dotted 1px red;background-color:#fff0f0}<?
?>p{font-family:Verdana;font-size:12px;text-align:justify;color:#000000;margin:0;padding:4px}<?
?>.u{font-family:Verdana;color:#000099;font-size:12;text-align:center;margin:0;padding:0}<?
?>form{margin:10px;padding:9px;background-color:#e0e0d0}<?
?>.c{text-align:center;font-size:11px;color:#666677;padding:0;margin:2px}<?
?>a{text-decoration:none;color:#333300}<?
?>a:hover{text-decoration:underline}<?
?>.lj{color:#000099;font-weight:bold}</style><body bgcolor='#fafaf0'><h1><hr>ЖЖ-Юзеру:<br>проверь свой уровень эгоизма!<hr></h1><p>Тест рассчитывает уровень эгоизма человека и выдаёт результат по десятибальной шкале на основе представленной пользователем информации о себе.<p>Результат не может претендовать на какую бы то ни было серьёзность, но... в каждой шутке, как многим известно, есть доля шутки. Всё остальное - правда.<?

if (isset($user)) {
$user=substr(trim(stripslashes(htmlspecialchars($user))),0,100);
for ($i=0;$i<32;$i++) $user=str_replace(chr($i),"?",$user);
$user=str_replace("'","?",$user);
$user=strtolower(str_replace("\"","?",$user));
} else $user="";
if ($user=="") {
echo "<form action='http://services.webhost.ru/test/ego/'><p class=u>Имя пользователя ЖЖ: ";
echo "<img src='http://stat.livejournal.com/img/userinfo.gif' height=17 width=17 alt='LJUser'><input class=lj name=user size=12 maxlength=100> <input type=submit value='Узнать'></form>";
} else {
echo "<form action='http://services.webhost.ru/test/ego/'><p class=u>Имя пользователя ЖЖ: ";
echo "<img src='http://stat.livejournal.com/img/userinfo.gif' height=17 width=17 alt='LJUser'><input class=lj name=user size=12 maxlength=100 value='$user'> <input type=submit value='Узнать'></form>";
$url="http://www.livejournal.com/users/$user/info/";
// if (file_exists($url)) {
$f=file($url);
// } else $f=false;
$ic=0; $fc=0; $self=false;
if (($f===false)||(count($f)<29)) {
error("Пользователь $user не найден");
} else {
$n=count($f);
for ($i=0;$i<$n;$i++) {
if (strpos($f[$i],"<a href='/interests.bml'>")!==false) {
$q=strpos($f[$i],"</a>:</b></td><td colspan='2'><b>");
if ($q!==false) {
$ic=substr($f[$i],$q+33,3);
$q2=($ic[2]==":")||($ic[2]=="<");
$q1=($ic[1]==":")||($ic[1]=="<");
if ($q1) {$ic=$ic[0];} else if ($q2) {$ic=substr($ic,0,2);};
$ic+=0;
};
};
if (strpos($f[$i],"<table><tr><td style='text-align: center;font-weight:bold' nowrap valign='top'><img src='http://stat.livejournal.com/img/userinfo.gif' title='")!==false) {
$q=strpos($f[$i],"' border='0' align='top' /></td><td style='text-align: left;font-weight:bold' nowrap valign='top'>");
if ($q!==false) {
$fc=substr($f[$i],$q+98,3);
$q2=($fc[2]==":")||($fc[2]=="<");
$q1=($fc[1]==":")||($fc[1]=="<");
if ($q1) {$fc=$fc[0];} else if ($q2) {$fc=substr($fc,0,2);};
$fc+=0;
$self=(strpos(substr($f[$i],$q+98),">$user<")!==false);
};
};
};
if (($ic==0)&&($fc==0)&&!$self) {error("Для пользователя $user невозможно произвести данный расчёт");} else {
$ic=abs(75-$ic)/75;
$fc=abs(375-$fc)/375;
if ($self) {$sc=1;} else $sc=0;
$ec=floor(($ic+$fc+$sc)/3*10+0.999);

$color=Array("","007711","226622","336626","445528","55552F","664430","773332","882233","991133","AA0033");
$rr="<p style='margin:3px;padding:3px;font-family:Verdana;font-size:14px;text-align:center;font-weight:bold'>уровень вашего эгоизма: $ec";
$rr.="<table width=163 height=19 border=0 cellpadding=0 cellspacing=3><tr>";
for ($i=1;$i<11;$i++) {
if ($i>$ec) {$rr.="<td bgcolor=#c0cfcf> </td>";} else $rr.="<td bgcolor=#".$color[$i]."> </td>";
};
$rr.="</tr></table>";
if ($ec<1) {$rr.="эгоизм не обранужен";} else
if ($ec<2) {$rr.="эгоизм забыли покормить";} else
if ($ec<3) {$rr.="эгоизм отсутствует";} else
if ($ec<4) {$rr.="присутствуют зачатки эгоизма";} else
if ($ec<5) {$rr.="эгоизм в норме";} else
if ($ec<6) {$rr.="эгоизм в порядке";} else
if ($ec<7) {$rr.="эгоизм чувствует себя хорошо";} else
if ($ec<8) {$rr.="эгоизм присутствует";} else
if ($ec<9) {$rr.="эгоизм налицо";} else
if ($ec<10) {$rr.="с эгоизмом перебор";} else
$rr.="ой, что это у вас...";

echo $rr;
$rr.="<form target=_blank method=get action='http://services.webhost.ru/test/ego/'' style='margin:0;padding:0'>";
$rr.="<img src='http://stat.livejournal.com/img/userinfo.gif' height=17 width=17 alt='LJUser'><input style='color:#000099;font-weight:bold' name=user size=12 value='$user' maxlength=100> <input type=submit value='Узнать'></form></p>";

echo "<p>Вы можете скопировать результат теста к себе в журнал:<p class=u><textarea cols=60 rows=5>".htmlspecialchars($rr)."</textarea>";
$f=fopen("usr","a");
fputs($f,$user.chr(31).$ec.chr(31)."\n");
fclose($f);
};
};
// echo "Интересов: $ic. Друзей: $fc. Эго=$self";
};

function error($s) {
echo "<p class=e>";
echo "ОШИБКА<br>$s";
};

?><p><hr><p class=c>Алгоритмизация и программирование - © <a href="http://www.livejournal.com/users/kay27/info/">kay27</a>, 2004<p class=c>Powered by <a href='http://services.webhost.ru/'>services.webhost.ru</a> </body></html>