source: branches/2.2/expressoMail1_2/inc/class.ScriptS.inc.php @ 4891

Revision 4891, 21.5 KB checked in by alexandrecorreia, 13 years ago (diff)

Ticket #2177 - Foi retirado o error_log dentro desta classe, sem efeito

  • Property svn:eol-style set to native
  • Property svn:executable set to *
Line 
1<?php
2
3//Inclui o arquivo contendo a classe SieveS;
4include('class.SieveS.inc.php');
5
6class ScriptS {
7
8    //Declaração de Variáveis;
9    var $SieveS;   // Var para criação do objeto;
10    var $reply;  // Var para resposta;
11    var $scriptfile;  // Nome do script;
12    var $username;   // Nome do usuario;
13    var $rules;  // Regras do sieve;
14    var $errstr;   // Erros retornados;
15    var $size;  // Tamanho;
16    var $so;  // Verifica se a regra foi criada por outro tipo serviço de filtros;
17    var $continuebit;
18    var $sizebit;
19    var $anyofbit;
20    var $keepbit;
21    var $regexbit;
22    var $newrules = array();
23    var $newout;
24    var $teste;
25    var $EmailVoip;
26    var $EmailExpresso;
27
28    function ScriptS() {
29
30        //Cria o objeto;
31        $this->SieveS = new SieveS();
32
33        //$this->scriptfile = $GLOBALS['HTTP_SESSION_VARS']['phpgw_info']['expressomail']['user']['account_lid'];
34        $this->scriptfile = $_SESSION['phpgw_info']['expressomail']['user']['account_lid'];
35        $this->username = $this->scriptfile;
36
37        $this->reply    = "";
38        $this->rules    = "";
39        $this->errstr   = "";
40        $this->size     = "";
41
42        $this->continuebit  = 1;
43        $this->sizebit      = 2;
44        $this->anyofbit     = 4;
45        $this->keepbit      = 8;
46        $this->regexbit     = 128;
47
48        $this->EmailVoip = trim($_SESSION['phpgw_info']['user']['preferences']['expressoMail']['voip_email_redirect']);
49        $this->EmailExpresso = trim($_SESSION['phpgw_info']['expressomail']['user']['email']);
50    }
51
52    function init_a() {
53
54        //Abre a conexão
55        $this->SieveS->start();
56
57        $this->reply = $this->SieveS->getscript();
58
59        if (!$this->reply) {
60
61            $aux = $this->SieveS->putscript($this->scriptfile, $this->createScript());
62            if (!$aux) {
63                // Caso de erro, grava dentro da variável errstr;
64                $this->errstr = "Error: file not created";
65                return $this->errstr;
66            }
67            // Mata a variavel;
68            unset($aux);
69            // Ativa o script;
70            $aux = $this->SieveS->activatescript($this->scriptfile);
71
72            if (!$aux) {
73                // Caso de erro, grava dentro da variavel errstr;
74                $this->errstr = "Error: error to activate file";
75                return $this->errstr;
76            } else {
77                $this->reply = $this->SieveS->getscript();
78                $this->rules = $this->readScript($this->reply);
79            }
80        } else {
81            $this->rules = $this->readScript($this->reply);
82        }
83
84        //Fecha a conexao
85        $this->SieveS->close();
86
87        if ($this->rules)
88            return $this->rules;
89    }
90
91    function rec_rules($params) {
92
93        $newr1 = array();
94        $newr2 = array();
95        $newr3 = array();
96
97        $var_decode = rawurldecode($params['arfilter']);
98        $var_decode = preg_replace('/\n\./', '.', $var_decode);
99
100        $narray = explode("_end_", $var_decode);
101
102        foreach ($narray as $key => $tmp) {
103            if ($tmp != "") {
104                $newr1[] = $tmp;
105            }
106        }
107        unset($key);
108        unset($tmp);
109        foreach ($newr1 as $key => $tmp) {
110            $tmp2 = explode("_begin_##", $tmp);
111            foreach ($tmp2 as $tmp3) {
112                if ($tmp3 != "") {
113                    $newr2[] = trim($tmp3);
114                }
115            }
116        }
117
118        unset($tmp);
119        unset($tmp2);
120        unset($tmp3);
121
122        foreach ($newr2 as $tmp) {
123            if (trim($tmp) != "") {
124                $tmp2 = explode("##", $tmp);
125                foreach ($tmp2 as $tmp3) {
126                    $tmp4 .= trim($tmp3) . "&&";
127                }
128                $newr3[] = substr($tmp4, 0, (strlen($tmp4) - 4));
129                unset($tmp2);
130                unset($tmp3);
131                unset($tmp4);
132            }
133        }
134
135        $tmp = $newr3[count($newr3) - 1];
136
137        if (substr($tmp, 0, 9) == "#vacation") {
138            $this->newout = array_pop($newr3);
139            foreach ($newr3 as $key => $tmp) {
140                $this->newrules[] = $tmp;
141            }
142        } else {
143            foreach ($newr3 as $tmp) {
144                $this->newrules[] = $tmp;
145            }
146        }
147
148        unset($tmp);
149        $tmp = explode("&&", $this->newout);
150        $tmp1 = explode(",", $tmp[2]);
151        foreach ($tmp1 as $key => $tmp2) {
152            $tmp3 .= stripslashes(trim($tmp2)) . ", ";
153        }
154        $tmp3 = substr($tmp3, 0, (strlen($tmp3) - 2));
155
156        unset($tmp);
157        unset($tmp1);
158        unset($tmp2);
159        unset($key);
160        $tmp = explode("&&", $this->newout);
161        foreach ($tmp as $key => $tmp1) {
162            if ($key == 2) {
163                $tmp2 .= trim($tmp3) . "&&";
164            } else {
165                $tmp2 .= trim($tmp1) . "&&";
166            }
167        }
168        unset($this->newout);
169        $this->newout = substr($tmp2, 0, (strlen($tmp2) - 2));
170
171        //Abre a conexao
172        $this->SieveS->start();
173        $this->errstr = "";
174
175        // Escreve a nova regra;
176        $this->reply = $this->SieveS->getscript();
177        /*
178          if($this->reply){
179          $this->errstr = $this->SieveS->deletescript($this->scriptfile);
180          }
181         */
182
183        $error_log_file = "/home/expressolivre/sieve_error.log";
184        //Escreve a(s) nova(s) regra(s);
185        $newrule = $this->write_rule();
186        if (strlen($newrule) > 0)
187            $this->errstr = $this->SieveS->putscript($this->scriptfile, $newrule);
188        else {
189            if ($_SESSION['phpgw_info']['server']['expressomail']['expressoMail_enable_log_messages'] == "True")
190                error_log(date("D M j G:i:s T Y") . ": SieveError, Invalid rule for "
191                        . $_SESSION['phpgw_info']['expressomail']['user']['userid'] . "=>"
192                        . $this->teste . "\nRule:"
193                        . $var_decode . "\n", 3, $error_log_file);
194            return "Invalid rule\n" . $this->teste;
195        }
196
197        //Ativa o script;
198        $this->errstr = $this->SieveS->activatescript($this->scriptfile);
199
200        //Fecha a conexao
201        $this->SieveS->close();
202
203        if ($this->errstr) {
204            return "Ok";
205        } else {
206            if ($_SESSION['phpgw_info']['server']['expressomail']['expressoMail_enable_log_messages'] == "True")
207                error_log(date("D M j G:i:s T Y")
208                        . ": SieveError, Problem for "
209                        . $_SESSION['phpgw_info']['expressomail']['user']['userid'] . "=>"
210                        . " "
211                        . $this->SieveS->errstr . "\n", 3, $error_log_file);
212            return "Problemas na criação do arquivo!\n" . $this->teste;
213        }
214    }
215
216    function convert_specialchar($input) {
217        $special_char = false;
218        for ($i = 0; $i < strlen($input); $i++) {
219            if (preg_match('/[^a-z0-9.@~_+=&\'*^\ \-\[\]]/i', $input[$i])) {
220                $special_char = true;
221                $input = preg_replace('/\\' . $input[$i] . '/', '=' . bin2hex($input[$i]), $input);
222            }
223        }
224
225        if ($special_char) {
226            /*             *
227             * When using arrays with pattern and replacement,
228             * the keys are processed in the order they appear in the array.
229             * See preg_replace in php.net/preg_replace
230             * */
231            $patterns[0] = '/=c3/i';
232            $patterns[1] = '/ /';
233            $replacements[1] = '';
234            $replacements[0] = '_';
235            $input = preg_replace($patterns, $replacements, $input);
236        }
237
238        return($input);
239    }
240
241    // build the rule
242    function write_rule() {
243
244        // Variaveis;
245        $rule = array();
246        $vacation = array();
247        $newruletext = "";
248        $activerules = 0;
249        $regexused = 0;
250        $rejectused = 0;
251        $notify = 0;
252        $flaggedused = 0;
253        $newscriptbody = "";
254        $continue = 1;
255        $tmpSubject = "";
256
257        // Recebe os valores das regras;
258        foreach ($this->newrules as $tmp)
259        {
260            $tmp1 = explode("&&", $tmp);
261            $rule['priority']   = $tmp1[1];
262            $rule['status']     = $tmp1[2];
263            $rule['from']       = $this->convert_specialchar($tmp1[3]);
264            $rule['to']         = $this->convert_specialchar($tmp1[4]);
265            $tmpSubject         = $tmp1[5];
266            $rule['subject']    = $this->convert_specialchar($tmp1[5]);
267            $rule['action']     = $tmp1[6];
268            $rule['action_arg'] = utf8_encode(preg_replace("/\\r\\n/", "\r\n", $tmp1[7]));
269            $rule['flg']        = $tmp1[8];
270            $rule['field']      = $tmp1[9];
271            $rule['field_val']  = $tmp1[10];
272            $rule['size']       = trim($tmp1[11]);
273            $rule['continue']   = ($tmp1[8] & $this->continuebit);
274            $rule['gthan']      = ($tmp1[8] & $this->sizebit);
275            $rule['anyof']      = ($tmp1[8] & $this->anyofbit);
276            $rule['keep']       = ($tmp1[8] & $this->keepbit);
277            $rule['regexp']     = ($tmp1[8] & $this->regexbit);
278            $rule['unconditional'] = 0;
279
280            if (!$rule['from'] && !$rule['to'] && !$rule['subject'] && !$rule['field'] && empty($rule['size']) && $rule['action']) {
281                $rule['unconditional'] = 1;
282
283                if ($rule['unconditional'] && ($rule['size'] == "0" || $rule['size'] == 0 ))
284                    $rule['unconditional'] = 0;
285            }
286           
287            unset($tmp1);
288
289            // Monta as regras;
290            if ($rule['status'] == 'ENABLED')
291            {
292                $activerules = 1;
293
294                // Condições para montagem das regras;
295                $anyall = "allof";
296                if ($rule['anyof'])
297                    $anyall = "anyof";
298                if ($rule['regexp']) {
299                    $regexused = 1;
300                }
301                $started = 0;
302
303                if (!$rule['unconditional']) {
304                    if (!$continue)
305                        $newruletext .= "els";
306                    $newruletext .= "if " . $anyall . " (";
307                    if ($rule['from']) {
308                        if (preg_match("/^\s*!/", $rule['from'])) {
309                            $newruletext .= 'not ';
310                            $rule['from'] = preg_replace("/^\s*!/", "", $rule['from']);
311                        }
312                        $match = ':contains';
313                        if (preg_match("/\*|\?/", $rule['from']))
314                            $match = ':matches';
315                        if ($rule['regexp'])
316                            $match = ':regex';
317                        $newruletext .= "header " . $match . " [\"From\"]";
318                        $newruletext .= " \"" . $rule['from'] . "\"";
319                        $started = 1;
320                    }
321                    if ($rule['to']) {
322                        if ($started)
323                            $newruletext .= ", ";
324                        if (preg_match("/^\s*!/", $rule['to'])) {
325                            $newruletext .= 'not ';
326                            $rule['to'] = preg_replace("/^\s*!/", "", $rule['to']);
327                        }
328                        $match = ':contains';
329                        if (preg_match("/\*|\?/", $rule['to']))
330                            $match = ':matches';
331                        if ($rule['regexp'])
332                            $match = ':regex';
333                        $newruletext .= "address " . $match . " [\"To\",\"TO\",\"Cc\",\"CC\"]";
334                        $newruletext .= " \"" . $rule['to'] . "\"";
335                        $started = 1;
336                    }
337                    if ($rule['subject']) {
338                        if ($started)
339                            $newruletext .= ", ";
340                        if (preg_match("/^\s*!/", $rule['subject'])) {
341                            $newruletext .= 'not ';
342                            $rule['subject'] = preg_replace("/^\s*!/", "", $rule['subject']);
343                        }
344                        $match = ':contains';
345                        if (preg_match("/\*|\?/", $rule['subject']))
346                            $match = ':matches';
347                        if ($rule['regexp'])
348                            $match = ':regex';
349                        $newruletext .= "header " . $match . " \"subject\"";
350                        $newruletext .= " \"" . $rule['subject'] . "\"";
351                        $started = 1;
352                    }
353                    if ($rule['field'] && $rule['field_val']) {
354                        if ($started)
355                            $newruletext .= ", ";
356                        if (preg_match("/^\s*!/", $rule['field_val'])) {
357                            $newruletext .= 'not ';
358                            $rule['field_val'] = preg_replace("/^\s*!/", "", $rule['field_val']);
359                        }
360                        $match = ':contains';
361                        if (preg_match("/\*|\?/", $rule['field_val']))
362                            $match = ':matches';
363                        if ($rule['regexp'])
364                            $match = ':regex';
365                        $newruletext .= "header " . $match . " \"" . $rule['field'] . "\"";
366                        $newruletext .= " \"" . $rule['field_val'] . "\"";
367                        $started = 1;
368                    }
369
370                    if ($rule['size'] != '')
371                    {
372                        if ( $rule['size'] == 0 && $rule['gthan'] )
373                        {
374                            $xthan = " :over ";
375                           
376                            if ($started)
377                                $newruletext .= ", ";
378
379                            $newruletext .= "size " . $xthan . "0K";
380                            $started = 1;
381                        }
382
383                        if ( $rule['size'] > 0 )
384                        {
385                            $xthan = " :under ";
386                           
387                            if ($rule['gthan'])
388                                $xthan = " :over ";
389                            if ($started)
390                                $newruletext .= ", ";
391
392                            $newruletext .= "size " . $xthan . $rule['size'] . "K";
393                            $started = 1;
394                        }
395                    }
396                }
397
398                // Don't write half rule!
399                if (strlen($newruletext) == 0)
400                    return false;
401                // Actions
402                if (!$rule['unconditional'])
403                    $newruletext .= ") {\n\t";
404
405                if (preg_match("/folder/i", $rule['action'])) {
406                    $newruletext .= "fileinto \"" . $rule['action_arg'] . "\";";
407                }
408
409                if (preg_match("/reject/i", $rule['action'])) {
410                    $newruletext .= "reject text: \n" . $rule['action_arg'] . "\n.\n;";
411                    $rejectused = 1;
412                }
413                if (preg_match("/flagged/i", $rule['action'])) {
414                    $newruletext .= "addflag \"\\\\Flagged\";";
415                    $flaggedused = 1;
416                }
417                if (preg_match("/address/i", $rule['action'])) {
418                    $newruletext .= "redirect \"" . $rule['action_arg'] . "\";";
419                }
420
421                if (preg_match("/notify/i", $rule['action'])) {
422                    $newruletext .= "notify :method \"mailto\" :options [\"" . $this->EmailVoip . "\"]:" .
423                            "message \"<expressovoip><from>" . $this->EmailExpresso . "</from>" .
424                            "<br/><Subject>" . utf8_encode($tmpSubject) . "</Subject></expressovoip>\";";
425                    $notify = 1;
426                }
427
428                if (preg_match("/discard/i", $rule['action'])) {
429                    $newruletext .= "discard;";
430                }
431               
432                if ($rule['keep'] )
433                {   
434                    $newruletext .= "\n\tfileinto \"INBOX\";";
435                }
436               
437                if (!$rule['unconditional'])
438                {
439                    $newruletext .= "\n}";
440                }
441
442                $continue = 0;
443                if ($rule['continue'])
444                    $continue = 1;
445                if ($rule['unconditional'])
446                    $continue = 1;
447
448                $newscriptbody .= $newruletext . "\n\n";
449                unset($newruletext);
450            }
451        }// Fim do Foreach;
452        $this->teste = $newscriptbody;
453        // Para a regras fora do escritorio;
454        unset($tmp);
455        if ($this->newout != "") {
456            $aux = explode("&&", $this->newout);
457            $vacation['days'] = $aux[1];
458            $vacation['addresses'] = $aux[2];
459            $vacation['text'] = preg_replace("/\\\\n/", "\r\n", $aux[3]);
460            $vacation['status'] = $aux[4];
461        }
462
463        // Monta a regra para fora do escritorio;
464        if ($vacation['status'] == 'on') {
465            $newscriptbody .= "vacation :days " . $vacation['days'] . " :addresses [";
466            $newscriptbody .= $vacation['addresses'];
467            $newscriptbody .= "] text:\n" . utf8_encode($vacation['text']) . "\n.\n;\n\n";
468        }
469
470        // Cria o cabeçalho do arquivo;
471        $newscripthead = "";
472        $newscripthead .= "#Mail filter rules for " . $this->username . "\n";
473        $newscripthead .= '#Generated by ' . $this->username . ' using Expressomail ';
474        $newscripthead .= "\n";
475
476        // Continuação do cabeçalho do arquivo;                 
477        if ($activerules) {
478            $newscripthead .= "require [\"fileinto\"";
479
480            if ($notify) {
481                $newscripthead .= ",\"notify\"";
482            }
483            if ($regexused) {
484                $newscripthead .= ",\"regex\"";
485            }
486            if ($rejectused) {
487                $newscripthead .= ",\"reject\"";
488            }
489            if ($flaggedused) {
490                $newscripthead .= ",\"imapflags\"";
491            }
492            if ($this->newout && $vacation['status'] == 'on') {
493                $newscripthead .= ",\"vacation\"";
494            }
495            $newscripthead .= "];\n\n";
496        } else {
497            if ($vacation && $vacation['status'] == 'on') {
498                $newscripthead .= "require [\"vacation\"];\n\n";
499            }
500        }
501
502        // Cria o rodapé do arquivo;
503        $newscriptfoot = "";
504        $newscriptfoot .= "##PSEUDO script start\n";
505        // Lê as regras;
506        foreach ($this->newrules as $tmp) {
507            $newscriptfoot .= preg_replace("/[\\n\\r]/", " ", $tmp) . "\n";
508        }
509        // Lê as regras fora do escritório;
510        if ($this->newout != "") {
511            $newscriptfoot .= preg_replace("/[\\n\\r]/", " ", $this->newout) . "\n";
512        }
513        $newscriptfoot .= "#mode&&basic\n";
514
515        $newscript = $newscripthead . $newscriptbody . $newscriptfoot;
516
517        // Destroi as variaveis;
518        unset($rule);
519        unset($vacation);
520        unset($activerules);
521        unset($regexused);
522        unset($rejectused);
523        unset($flaggedused);
524        unset($newscripthead);
525        unset($newscriptbody);
526        unset($newscriptfoot);
527        unset($continue);
528        unset($this->newrules);
529        unset($this->newout);
530
531        // Retorna o script construido;
532        return $newscript;
533    }
534
535// Fim da Função
536    // Cria o script sieve, caso nao possua;
537    function createScript() {
538
539        // Cria o cabeçalho do arquivo;
540        $newScriptHead = "";
541        $newScriptHead .= "#Mail filter rules for " . $this->username . "\n";
542        $newScriptHead .= '#Generated by ' . $this->username . ' using ExpressoMail ';
543        $newScriptHead .= "\n";
544
545        //Cria o rodapé do arquivo;
546        $newScriptFoot = "";
547        $newScriptFoot .= "##PSEUDO Script Start\n";
548        $newScriptFoot .= "#mode&&basic\n";
549
550        //Para passar para o arquivo;
551        $newScript = $newScriptHead . $newScriptFoot;
552
553        return $newScript;
554    }
555
556    //Lê o conteúdo do script;
557    function readScript($scriptName) {
558
559        // Verifica se a conexão foi bem sucedida;
560        if (!$scriptName) {
561            $this->errstr = "Não foi possível conectar com o Servidor";
562            return "false 2";
563        }
564
565        // Recebe o conteúdo do array;
566        $lines = array();
567        $lines = preg_split("/\n/", $scriptName);
568
569        // Pega o tamanho da regra na primeira do script;
570        $size_rule = array_shift($lines);
571
572        // Recebe o tamanho do script, pela primeira linha;
573        $this->size = trim($size_rule);
574
575        // Verifica a composição do script;
576        $line = array_shift($lines);
577        if (!preg_match("/^# ?Mail(.*)rules for/", $line)) {
578            $this->errstr = "Formato nao reconhecido";
579            return false;
580        }
581
582        // Variaveis para a regra e o campo ferias;
583        $regexps = array('^ *##PSEUDO', '^ *#rule', '^ *#vacation', '^ *#mode');
584        $retorno['rule'] = array();
585        $retorno['vacation'] = array();
586        $retorno['mode'] = array();
587
588        $line = array_shift($lines);
589        while (isset($line)) {
590            foreach ($regexps as $regp) {
591                if (preg_match("/$regp/i", $line)) {
592                    // Recebe todas as regras criadas no servidor;
593                    if (preg_match("/^ *#rule&&/i", $line)) {
594                        $retorno['rule'][] = $line . "\n";
595                    }
596                    if (preg_match("/^ *#vacation&&/i", $line)) {
597                        $retorno['vacation'][] = $line . "\n";
598                    }
599                    if (preg_match("/^ *#mode&&(.*)/i", $line)) {
600                        $retorno['mode'][] = $line . "\n";
601                    }
602                }
603            }
604            // Pega a proxima linha do sript;
605            $line = array_shift($lines);
606        }
607        return $retorno;
608    }
609
610}
611
612//Fim da Classe
613?>
Note: See TracBrowser for help on using the repository browser.