source: trunk/expressoMail1_2/inc/class.imap_functions.inc.php @ 4832

Revision 4832, 157.0 KB checked in by airton, 13 years ago (diff)

Ticket #2148 - Implementar a inibicao de e-mails por copia oculta

  • Property svn:eol-style set to native
  • Property svn:executable set to *
Line 
1<?php
2
3include_once("class.functions.inc.php");
4include_once("class.ldap_functions.inc.php");
5include_once("class.exporteml.inc.php");
6
7class imap_functions
8{
9        var $public_functions = array
10        (
11                'get_range_msgs'                                => True,
12                'get_info_msg'                                  => True,
13                'get_info_msgs'                                 => True,
14                'get_folders_list'                              => True,
15                'import_msgs'                                   => True,
16                'report_mail_error'             => True,
17                'msgs_to_archive'                               => True
18        );
19
20        var $ldap;
21        var $mbox;
22        var $imap_port;
23        var $has_cid;
24        var $imap_options = '';
25        var $functions;
26        var $prefs;
27        var $foldersLimit;
28        var $imap_sentfolder;
29
30        function imap_functions (){
31                $this->foldersLimit = $_SESSION['phpgw_info']['user']['preferences']['expressoMail']['imap_max_folders'] ?  $_SESSION['phpgw_info']['user']['preferences']['expressoMail']['imap_max_folders'] : 20000; //Limit of folders (mailboxes) user can see
32                $this->username           = $_SESSION['phpgw_info']['expressomail']['user']['userid'];
33                $this->password           = $_SESSION['phpgw_info']['expressomail']['user']['passwd'];
34                $this->imap_server        = $_SESSION['phpgw_info']['expressomail']['email_server']['imapServer'];
35                $this->imap_port          = $_SESSION['phpgw_info']['expressomail']['email_server']['imapPort'];
36                $this->imap_delimiter = $_SESSION['phpgw_info']['expressomail']['email_server']['imapDelimiter'];
37                $this->functions          = new functions();
38                $this->imap_sentfolder = $_SESSION['phpgw_info']['expressomail']['email_server']['imapDefaultSentFolder']   ? $_SESSION['phpgw_info']['expressomail']['email_server']['imapDefaultSentFolder']   : str_replace("*","", $this->functions->getLang("Sent"));
39                $this->has_cid = false;
40                $this->prefs = $_SESSION['phpgw_info']['user']['preferences']['expressoMail'];
41
42
43                if ($_SESSION['phpgw_info']['expressomail']['email_server']['imapTLSEncryption'] == 'yes')
44                {
45                        $this->imap_options = '/tls/novalidate-cert';
46                }
47                else
48                {
49                        $this->imap_options = '/notls/novalidate-cert';
50                }
51        }
52        // BEGIN of functions.
53        function open_mbox($folder = False,$force_die=true)
54        {
55                $folder = mb_convert_encoding($folder, "UTF7-IMAP","ISO_8859-1");
56                if (is_resource($this->mbox))
57                {
58                     if ($force_die)
59                     {
60                        @imap_reopen($this->mbox, "{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".$folder) or die(serialize(array('imap_error' => $this->parse_error(imap_last_error()))));
61                     }
62                     else
63                        {
64                            @imap_reopen($this->mbox, "{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".$folder);
65                        }
66                }
67                else
68                    {
69                        if($force_die)
70                        {
71                            $this->mbox = @imap_open("{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".$folder, $this->username, $this->password) or die(serialize(array('imap_error' => $this->parse_error(imap_last_error()))));
72                        }
73                        else
74                            {
75                                $this->mbox = @imap_open("{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".$folder, $this->username, $this->password);
76                            }
77                       
78                    }
79                    return $this->mbox;
80         }
81
82        function parse_error($error){
83                // This error is returned from Imap.
84                if(strstr($error,'Connection refused')) {
85                        return str_replace("%1", $this->functions->getLang("Mail"), $this->functions->getLang("Connection failed with %1 Server. Try later."));
86                }
87                elseif(strstr($error,'virus')) {
88                        return str_replace("%1", $this->functions->getLang("Mail"), $this->functions->getLang("Your message was rejected by antivirus. Perhaps your attachment has been infected."));
89                }
90                // This condition verifies if SESSION is expired.
91                elseif(!count($_SESSION))
92                        return "nosession";
93
94                return $error;
95        }
96
97        function get_range_msgs2($params)
98        {
99                // Free others requests
100                session_write_close();
101                $folder = $params['folder'];
102                $msg_range_begin = $params['msg_range_begin'];
103                $msg_range_end = $params['msg_range_end'];
104                $sort_box_type = $params['sort_box_type'];
105                $sort_box_reverse = $params['sort_box_reverse'];
106                $search_box_type = $params['search_box_type'] != "ALL" && $params['search_box_type'] != "" ? $params['search_box_type'] : false;
107
108                $folder                         = $params['folder'];
109                $msg_range_begin        = $params['msg_range_begin'];
110                $msg_range_end          = $params['msg_range_end'];
111                $sort_box_type          = $params['sort_box_type'];
112                $sort_box_reverse       = $params['sort_box_reverse'];
113                $search_box_type        = $params['search_box_type'] != "ALL" && $params['search_box_type'] != "" ? $params['search_box_type'] : false;
114
115                if( !$this->mbox || !is_resource( $this->mbox ) )
116                        $this->mbox = $this->open_mbox($folder);
117
118        $return = array();
119
120        $return['folder'] = $folder;
121
122        //Para enviar o offset entre o timezone definido pelo usuário e GMT
123        $return['offsetToGMT'] = $this->functions->CalculateDateOffset();
124
125        if(!$search_box_type || $search_box_type=="UNSEEN" || $search_box_type=="SEEN") {
126                        $msgs_info = imap_status($this->mbox,"{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".mb_convert_encoding( $folder, "UTF7-IMAP", "ISO_8859-1" ) ,SA_ALL);
127
128
129                        $return['tot_unseen'] = $search_box_type == "SEEN" ? 0 : $msgs_info->unseen;
130
131                        $sort_array_msg = $this-> get_msgs($folder, $sort_box_type, $search_box_type, $sort_box_reverse,$msg_range_begin,$msg_range_end);
132
133                        $num_msgs = ($search_box_type=="UNSEEN") ? $msgs_info->unseen : (($search_box_type=="SEEN") ? ($msgs_info->messages - $msgs_info->unseen) : $msgs_info->messages);
134
135                        $i = 0;
136                        if(is_array($sort_array_msg)){
137                                foreach($sort_array_msg as $msg_number => $value)
138                                {
139                                        $temp = $this->get_info_head_msg($msg_number);
140                                        //$temp['msg_sample'] = $this->get_msg_sample($msg_number,$folder);
141                                        if(!$temp)
142                                                return false;
143
144                                        $return[$i] = $temp;
145                                        $i++;
146                                }
147                        }
148                        $return['num_msgs'] =  $num_msgs;
149                }
150                else {
151                        $num_msgs = imap_num_msg($this->mbox);
152                        $sort_array_msg = $this-> get_msgs($folder, $sort_box_type, $search_box_type, $sort_box_reverse,$msg_range_begin,$num_msgs);
153
154
155                        $return['tot_unseen'] = 0;
156                        $i = 0;
157
158                        if(is_array($sort_array_msg)){
159
160                            foreach($sort_array_msg as $msg_number => $value)
161                            {
162                                $temp = $this->get_info_head_msg($msg_number);
163                                if(!$temp)
164                                    return false;
165
166                                if($temp['Unseen'] == 'U' || $temp['Recent'] == 'N'){
167                                                $return['tot_unseen']++;
168                                        }
169
170                                if($i <= ($msg_range_end-$msg_range_begin))
171                                    $return[$i] = $temp;
172                                $i++;
173                            }
174                        }
175                        $return['num_msgs'] = count($sort_array_msg)+($msg_range_begin-1);
176                }
177                return $return;
178    }
179
180        function get_info_head_msg($msg_number)
181        {
182                $head_array = array();
183                include_once("class.imap_attachment.inc.php");
184
185                $imap_attachment = new imap_attachment();
186                //if ($this->prefs['use_important_flag'] )
187                //{
188                        /*Como eu preciso do atributo Importance para saber se o email é
189                         * importante ou não, uso abaixo a função imap_fetchheader e busco
190                         * o atributo importance nela. Isso faz com que eu acesse o cabeçalho
191                         * duas vezes e de duas formas diferentes, mas em contrapartida, eu
192                         * não preciso reimplementar o método utilizando o fetchheader.
193                         * Como as mensagens são renderizadas em um número pequeno por vez,
194                         * não parece ter perda considerável de performance.
195                         */
196
197                        $tempHeader = imap_fetchheader($this->mbox, imap_msgno($this->mbox, $msg_number));
198                        $flag = preg_match('/importance *: *(.*)\r/i', $tempHeader, $importance);
199                //}
200                // Reimplementado código para identificação dos e-mails assinados e cifrados
201                // no método getMessageType(). Mário César Kolling <mario.kolling@serpro.gov.br>
202                $head_array['ContentType'] = $this->getMessageType($msg_number, $tempHeader);
203                $head_array['Importance'] = $flag==0?"Normal":$importance[1];
204
205                $header = $this->get_header($msg_number);
206                if (!is_object($header))
207                        return false;
208                $head_array['Recent'] = $header->Recent;
209                $head_array['Unseen'] = $header->Unseen;
210                if($header->Answered =='A' && $header->Draft == 'X'){
211                        $head_array['Forwarded'] = 'F';
212                }
213                else {
214                        $head_array['Answered'] = $header->Answered;
215                        $head_array['Draft']    = $header->Draft;
216                }
217                $head_array['Deleted'] = $header->Deleted;
218                $head_array['Flagged'] = $header->Flagged;
219                $head_array['msg_number'] = $msg_number;
220                $head_array['udate'] = $header->udate;
221                $head_array['offsetToGMT'] = $this->functions->CalculateDateOffset();
222
223                $msgTimestamp = $header->udate + $head_array['offsetToGMT'];
224                $head_array['timestamp'] = $msgTimestamp;
225               
226                $date_msg = gmdate("d/m/Y",$msgTimestamp);
227//              if (date("d/m/Y") == $date_msg)
228//                      $return['udate'] = $header->udate;
229//              else
230
231                if (date("d/m/Y") == $date_msg) //no dia
232                {
233                        $head_array['smalldate'] = gmdate("H:i",$msgTimestamp);
234                }
235                else
236                {
237                        $head_array['smalldate'] = gmdate("d/m/Y",$msgTimestamp);
238                }
239
240                $from = $header->from;
241                $head_array['from'] = array();
242                $head_array['from']['name'] = ( isset( $from[0]->personal ) ) ? $this->decode_string($from[0]->personal) : NULL;
243                $head_array['from']['email'] = $this->decode_string($from[0]->mailbox) . "@" . $from[0]->host;
244                if(!$head_array['from']['name'])
245                        $head_array['from']['name'] = $head_array['from']['email'];
246                $to = $header->to;
247                $head_array['to'] = array();
248                if($to[1] && $to[1]->host == ".SYNTAX-ERROR.") { //E-mails que não possuem o campo "para", vêm com o recipiente preenchido, porém com um recipiente a mais alegando erro de sintaxe.
249                        $head_array['to']['name'] = $head_array['to']['email'] = NULL;
250                }
251                else {
252                        $tmp = ( isset( $to[0]->personal ) ) ? imap_mime_header_decode($to[0]->personal) : NULL;
253                        $head_array['to']['name'] = ( isset( $tmp[0]->text ) ) ? $this->decode_string($this->decode_string($tmp[0]->text)) : NULL;
254                        $head_array['to']['email'] = ( isset( $to[0]->mailbox ) ) ? ( $this->decode_string($to[0]->mailbox) . "@" . ( ( isset( $to[0]->host ) ) ? $to[0]->host : '' ) ) : NULL;
255                        if(!$head_array['to']['name'])
256                                $head_array['to']['name'] = $head_array['to']['email'];
257                }
258                $cc = $header->cc;
259                $cco = $header->bcc;
260                if ( ($cc) && (!$head_array['to']['name']) ){
261                        $head_array['to']['name'] = ( isset( $cc[0]->personal ) ) ? $this->decode_string($cc[0]->personal) : NULL;
262                        $head_array['to']['email'] = $this->decode_string($cc[0]->mailbox) . "@" . $cc[0]->host;
263                        if(!$head_array['to']['name'])
264                                $head_array['to']['name'] = $head_array['from']['email'];
265                }
266                else if ( ($cco) && (!$head_array['to']['name']) ){
267                        $head_array['to']['name'] = ( isset( $cco[0]->personal ) ) ? $this->decode_string($cco[0]->personal) : NULL;
268                        $head_array['to']['email'] = $this->decode_string($cco[0]->mailbox) . "@" . $cco[0]->host;
269                        if(!$head_array['to']['name'])
270                                $head_array['to']['name'] = $head_array['from']['email'];
271                }
272                $head_array['subject'] = ( isset( $header->fetchsubject ) ) ? $this->decode_string($header->fetchsubject) : '';
273
274                $head_array['Size'] = $header->Size;
275
276                $head_array['attachment'] = array();
277                $head_array['attachment'] = $imap_attachment->get_attachment_headerinfo($this->mbox, $msg_number);
278
279                return $head_array;
280        }
281
282        /**
283        *
284        * @license    http://www.gnu.org/copyleft/gpl.html GPL
285        * @param      string $string String a ser decodificada
286        * @return     string
287        * @todo       Verificar a possibilidade de se utilizar a função iconv_mime_decode, que é capaz de identificar a codificação por si só, mas que pode ser interpretada de forma diversa dependendo da implementação do sistema
288        * @todo       Executar testes suficientes para validar a funçao iconv_mime_decode em substituição à este método decode_string
289        */
290        function decode_string($string)
291        {
292                if ((strpos(strtolower($string), '=?iso-8859-1') !== false) || (strpos(strtolower($string), '=?windows-1252') !== false))
293                {
294            $retun = '';
295                        $tmp = imap_mime_header_decode($string);
296                        foreach ($tmp as $tmp1)
297            {
298                                $return .= $this->htmlspecialchars_encode($tmp1->text);
299            }
300
301            return str_replace("\t", "", $return);
302                }
303                else if (strpos(strtolower($string), '=?utf-8') !== false)
304                {
305                        $elements = imap_mime_header_decode($string);
306
307                        for($i = 0;$i < count($elements);$i++)
308                        {
309                                $charset = strtolower($elements[$i]->charset);
310                                $text = $elements[$i]->text;
311                                if(!strcasecmp($charset, "utf-8") || !strcasecmp($charset, "utf-7"))
312                                $decoded .= $this->functions->utf8_to_ncr($text);
313                                else
314                                {
315                                        if( strcasecmp($charset,"default") )
316                                                $decoded .= $this->htmlspecialchars_encode(iconv($charset, "iso-8859-1", $text));
317                                        else
318                                                $decoded .= $this->htmlspecialchars_encode($text);
319                                }
320                        }
321
322              return str_replace("\t", "", $decoded);
323                }
324                else if(strpos(strtolower($string), '=?us-ascii') !== false)
325           {
326                        $retun = '';
327                        $tmp = imap_mime_header_decode($string);
328                        foreach ($tmp as $tmp1)
329                                $return .= $this->htmlspecialchars_encode(quoted_printable_decode($tmp1->text));
330               
331                        return str_replace("\t", "", $return);
332         
333            }
334        else if (eregi('=?', $string))
335            return iconv_mime_decode($string);
336       
337
338                        return $this->htmlspecialchars_encode($string);
339        }
340        /**
341        * Função que importa arquivos .eml exportados pelo expresso para a caixa do usuário. Testado apenas
342        * com .emls gerados pelo expresso, e o arquivo pode ser um zip contendo vários emls ou um .eml.
343        */
344        function import_msgs($params) {
345                if(!$this->mbox)
346                        $this->mbox = $this->open_mbox();
347
348                if( preg_match('/local_/',$params["folder"]) )
349                {
350                        // PLEASE, BE CAREFULL!!! YOU SHOULD USE EMAIL CONFIGURATION VALUES (EMAILADMIN MODULE)
351                        $tmp_box = mb_convert_encoding('INBOX'.$this->imap_delimiter.$_SESSION['phpgw_info']['expressomail']['email_server']['imapDefaultTrashFolder'].$this->imap_delimiter.'tmpMoveToLocal', "UTF7-IMAP", "UTF-8");
352                        if ( ! imap_createmailbox( $this -> mbox,"{".$this -> imap_server."}$tmp_box" ) )
353                                return $this->functions->getLang( 'Import to Local : fail...' );
354                        imap_reopen($this->mbox, "{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".$tmp_box);
355                        $params["folder"] = $tmp_box;
356                }
357                $errors = array();
358                $invalid_format = false;
359                $filename = $params['FILES'][0]['name'];
360                $params["folder"] = mb_convert_encoding($params["folder"], "UTF7-IMAP","ISO_8859-1");
361                $quota = imap_get_quotaroot($this->mbox, $params["folder"]);
362                if((($quota['limit'] - $quota['usage'])*1024) <= $params['FILES'][0]['size']){
363                        return array( 'error' => $this->functions->getLang("fail in import:").
364                                                        " ".$this->functions->getLang("Over quota"));
365                }
366                if(substr($filename,strlen($filename)-4)==".zip") {
367                        $zip = zip_open($params['FILES'][0]['tmp_name']);
368
369                        if ($zip) {
370                                while ($zip_entry = zip_read($zip)) {
371
372                                        if (zip_entry_open($zip, $zip_entry, "r")) {
373                                                $email = zip_entry_read($zip_entry, zip_entry_filesize($zip_entry));
374                                                $status = @imap_append($this->mbox,
375                                                                "{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".$params["folder"],
376                                                                        $email
377                                                                        );
378                                                if(!$status)
379                                                        array_push($errors,zip_entry_name($zip_entry));
380                                                zip_entry_close($zip_entry);
381                                        }
382                                }
383                                zip_close($zip);
384                        }
385
386                        if ( isset( $tmp_box ) && ! sizeof( $errors ) )
387                        {
388
389                                $mc = imap_check($this->mbox);
390
391                                $result = imap_fetch_overview( $this -> mbox, "1:{$mc -> Nmsgs}", 0 );
392
393                                $ids = array( );
394                                foreach ($result as $overview)
395                                        $ids[ ] = $overview -> uid;
396
397                                return implode( ',', $ids );
398                        }
399                        }
400                else if(substr($filename,strlen($filename)-4)==".eml") {
401                        $email = implode("",file($params['FILES'][0]['tmp_name']));
402                        $status = @imap_append($this->mbox,
403                                                                "{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".$params["folder"],
404                                                                        $email
405                                                                        );
406                        if(!$status){
407                                array_push($errors,zip_entry_name($zip_entry));
408                                zip_entry_close($zip_entry);
409                        }
410                }
411                else
412                {
413                        if ( isset( $tmp_box ) )
414                                imap_deletemailbox( $this->mbox,"{".$this -> imap_server."}$tmp_box" );
415
416                        return array("error" => $this->functions->getLang("wrong file format"));
417                        $invalid_format = true;
418                }
419
420                if(!$invalid_format) {
421                        if(count($errors)>0) {
422                                $message = $this->functions->getLang("fail in import:")."\n";
423                                foreach($errors as $arquivo) {
424                                        $message.=$arquivo."\n";
425                                }
426                                return array("error" => $message);
427                        }
428                        else
429                                return $this->functions->getLang("The import was executed successfully.");
430                }
431        }
432        /*
433                Remove os anexos de uma mensagem. A estratégia para isso é criar uma mensagem nova sem os anexos, mantendo apenas
434                a primeira parte do e-mail, que é o texto, sem anexos.
435                O método considera que o email é multpart.
436        */
437        function remove_attachments($params) {
438                include_once("class.message_components.inc.php");
439                if(!$this->mbox || !is_resource($this->mbox))
440                        $this->mbox = $this->open_mbox($params["folder"]);
441                $return["status"] = true;
442                $header = "";
443
444                $headertemp = explode("\n",imap_fetchheader($this->mbox, imap_msgno($this->mbox, $params["msg_num"])));
445                foreach($headertemp as $head) {//Se eu colocar todo o header do email dá pau no append, então procuro apenas o que interessa.
446                        $head1 = explode(":",$head);
447                        if ( (strtoupper($head1[0]) == "TO") ||
448                                        (strtoupper($head1[0]) == "FROM") ||
449                                        (strtoupper($head1[0]) == "SUBJECT") ||
450                                        (strtoupper($head1[0]) == "DATE") )
451                                $header .= $head."\r\n";
452                }
453
454                $msg = &new message_components($this->mbox);
455                $msg->fetch_structure($params["msg_num"]);/* O fetchbody tava trazendo o email com problemas na acentuação.
456                                                             Então uso essa classe para verificar a codificação e o charset,
457                                                             para que o método decodeBody do expresso possa trazer tudo certinho*/
458
459                $all_body_type = strtolower($msg->file_type[$params["msg_num"]][0]);
460                $all_body_encoding = $msg->encoding[$params["msg_num"]][0];
461                $all_body_charset = $msg->charset[$params["msg_num"]][0];
462               
463                if($all_body_type=='multipart/alternative') {
464                        if(strtolower($msg->file_type[$params["msg_num"]][2]=='text/html') &&
465                                        $msg->pid[$params["msg_num"]][2] == '1.2') {
466                                $body_part_to_show = '1.2';
467                                $all_body_type = strtolower($msg->file_type[$params["msg_num"]][2]);
468                                $all_body_encoding = $msg->encoding[$params["msg_num"]][2];
469                                $all_body_charset = $msg->charset[$params["msg_num"]][2];
470                        }
471                        else {
472                                $body_part_to_show = '1.1';
473                                $all_body_type = strtolower($msg->file_type[$params["msg_num"]][1]);
474                                $all_body_encoding = $msg->encoding[$params["msg_num"]][1];
475                                $all_body_charset = $msg->charset[$params["msg_num"]][1];
476                        }
477                }
478                else
479                        $body_part_to_show = '1';
480
481                $status = imap_append($this->mbox,
482                                "{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".$params["folder"],
483                                        $header.
484                                        "Content-Type: ".$all_body_type."; charset = \"".$all_body_charset."\"".
485                                        "\r\n".
486                                        "Content-Transfer-Encoding: ".$all_body_encoding.
487                                        "\r\n".
488                                        "\r\n".
489                                        str_replace("\n","\r\n",$this->decodeBody(
490                                                        imap_fetchbody($this->mbox,imap_msgno($this->mbox, $params["msg_num"]),$body_part_to_show),
491                                                        $all_body_encoding, $all_body_charset
492                                                        )
493                                        ), "\\Seen"); //Append do novo email, só com header e conteúdo sem anexos.
494
495                if(!$status)
496                {
497                        $return["status"] = false;
498                        $return["msg"] = lang("error appending mail on delete attachments");
499                }
500                else
501                {
502                        $status = imap_status($this->mbox, "{".$this->imap_server.":".$this->imap_port."}".$params['folder'], SA_UIDNEXT);
503                        $return['msg_no'] = $status->uidnext - 1;
504                        imap_delete($this->mbox, imap_msgno($this->mbox, $params["msg_num"]));
505                        imap_expunge($this->mbox);
506                }
507
508                return $return;
509
510        }
511       
512        function msgs_to_archive($params) {
513               
514                $folder = $params['folder'];
515                $all_ids = $this-> get_msgs($folder, 'SORTARRIVAL', false, 0,-1,-1);
516
517                $messages_not_to_copy = explode(",",$params['mails']);
518                $ids = array();
519               
520                $cont = 0;
521               
522                foreach($all_ids as $each_id=>$value) {
523                        if(!in_array($each_id,$messages_not_to_copy)) {
524                                array_push($ids,$each_id);
525                                $cont++;
526                        }
527                        if($cont>=100)
528                                break;
529                }
530
531                if (empty($ids))
532                        return array();
533
534                $params = array("folder"=>$folder,"msgs_number"=>implode(",",$ids));
535               
536               
537                return $this->get_info_msgs($params);
538               
539               
540        }
541
542/**
543         *
544         * @return
545         * @param $params Object
546         */
547        function get_info_msgs($params) {
548                include_once("class.exporteml.inc.php");
549                $return = array();
550                $new_params = array();
551                $attach_params = array();
552                $new_params["msg_folder"]=$params["folder"];
553                $attach_params["folder"] = $params["folder"];
554                $msgs = explode(",",$params["msgs_number"]);
555                $exporteml = new ExportEml();
556                $unseen_msgs = array();
557                foreach($msgs as $msg_number) {
558                        $new_params["msg_number"] = $msg_number;
559                        //ini_set("display_errors","1");
560                        $msg_info = $this->get_info_msg($new_params);
561
562                        $this->mbox = $this->open_mbox($params['folder']); //Não sei porque, mas se não abrir de novo a caixa dá erro.
563                        $msg_info['header'] = $this->get_info_head_msg($msg_number);
564
565                        $attach_params["num_msg"] = $msg_number;
566                        $msg_info['array_attach'] = $exporteml->get_attachments_in_array($attach_params);
567                        $msg_info['url_export_file'] = $exporteml->export_to_archive($msg_number,$params["folder"]);
568                        imap_close($this->mbox);
569                        $this->mbox=false;
570                        array_push($return,serialize($msg_info));
571
572                        if($msg_info['Unseen'] == "U" || $msg_info['Recent'] == "N"){
573                                        array_push($unseen_msgs,$msg_number);
574                        }
575                }
576                if($unseen_msgs){
577                        $msgs_list = implode(",",$unseen_msgs);
578                        $array_msgs = array('folder' => $new_params["msg_folder"], "msgs_to_set" => $msgs_list, "flag" => "unseen");
579                        $this->set_messages_flag($array_msgs);
580                }
581
582                return $return;
583        }
584
585        /**
586        * @license   http://www.gnu.org/copyleft/gpl.html GPL
587        * @author    Consórcio Expresso Livre - 4Linux (www.4linux.com.br) e Prognus Software Livre (www.prognus.com.br)
588        * @param     $msg_number numero da mensagem
589        */
590        function getRawHeader($msg_number)
591    {
592                return imap_fetchheader($this->mbox, $msg_number, FT_UID);
593        }
594       
595        /**
596        * @license   http://www.gnu.org/copyleft/gpl.html GPL
597        * @author    Consórcio Expresso Livre - 4Linux (www.4linux.com.br) e Prognus Software Livre (www.prognus.com.br)
598        * @param     $msg_number numero da mensagem
599        */
600        function getRawBody($msg_number)
601    {
602                return  imap_body($this->mbox, $msg_number, FT_UID);   
603        }
604
605       
606        /**
607        * @license   http://www.gnu.org/copyleft/gpl.html GPL
608        * @author    Consórcio Expresso Livre - 4Linux (www.4linux.com.br) e Prognus Software Livre (www.prognus.com.br)
609        * @param     $msg mensagem
610        */
611        function builderMsgHeader($msg)
612    {
613
614 
615            $fromMail =  str_replace('<','', str_replace('>','',$msg->headers['from']));
616            $tosMails =  str_replace('<','', str_replace('>','',$msg->headers['to']));
617
618            $tos = explode(',',$tosMails);
619            $to = '';
620            foreach ($tos as $value)
621            {
622                $to .= '<a href="mailto:'.str_replace(' ','',$value).'">'.$value.'</a>, ';
623            }
624
625            $header = '
626                <table style="margin: 2px; border: 1px solid black; background: none repeat scroll 0% 0% rgb(234, 234, 234);">
627                <tbody>
628                <tr><td><b>'.$this->functions->getLang('Subject').':</b></td><td>'.$msg->headers['subject'].'</td></tr>
629                <tr><td><b>'.$this->functions->getLang('From').':</b></td><td><a href="mailto:'.$fromMail.'">'.$fromMail.'</a></td></tr>
630                <tr><td><b>'.$this->functions->getLang('Date').':</b></td><td>'.$msg->headers['date'].'</td></tr>
631                <tr><td><b>'.$this->functions->getLang('To').':</b></td><td>'.$to.'</td></tr>
632                </tbody>
633                </table>
634                <br />'
635            ;
636
637          return $header;
638    }
639       
640                /**
641        * Constroe o corpo da msg direto na variavel de conteudo
642        * @param Mail_mimeDecode $structure
643        * @param <type> $content Ponteiro para Variavel de conteudo da msg
644        */
645        function builderMsgBody($structure , &$content , $printHeader = false)
646        {
647            if(strtolower($structure->ctype_primary) == 'multipart' && strtolower($structure->ctype_secondary) == 'alternative')
648            {
649                $numParts = count($structure->parts) - 1;
650
651                for($i = $numParts; $i >= 0; $i--)
652                {
653                    $part = $structure->parts[$i];
654
655                    switch (strtolower($part->ctype_primary))
656                    {
657                       case 'text':
658                           $disposition = strtolower($part->disposition);
659                           if($disposition != 'attachment')
660                           {
661                                if(strtolower($part->ctype_secondary) == 'html')
662                                {
663                                   if($printHeader)
664                                        $content .= $this->builderMsgHeader($part);
665
666                                   $content .= $this->decodeMailPart($part->body,$part->ctype_parameters['charset']);
667                                }
668
669                                if(strtolower($part->ctype_secondary) == 'plain' )
670                                {
671                                  if($printHeader)
672                                      $content .= $this->builderMsgHeader($part);
673
674                                   $content .= '<pre>'. htmlentities($this->decodeMailPart($part->body,$part->ctype_parameters['charset'],false)).'</pre>';
675                                }
676
677
678
679                           }
680
681                            $i = -1;
682                            break;
683
684                       case 'multipart':
685
686                            if($printHeader)
687                               $content .= $this->builderMsgHeader($part);
688
689                            $this->builderMsgBody($part,$content);
690
691                            $i = -1;
692                            break;
693
694                       case 'message':
695
696                            if(!is_array($part->parts))
697                            {
698                                $content .= "<hr align='left' width='95%' style='border:1px solid #DCDCDC'>";
699                                $content .= '<pre>'. htmlentities($this->decodeMailPart($part->body, $structure->ctype_parameters['charset'],false)).'</pre>';
700                                $content .= "<hr align='left' width='95%' style='border:1px solid #DCDCDC'>";
701                            }
702                            else
703                                $this->builderMsgBody($part,$content,true);
704
705                            $i = -1;
706                            break;
707                    }
708                }
709            }
710            else
711            {
712                foreach ($structure->parts  as $index => $part)
713                {
714                   switch (strtolower($part->ctype_primary))
715                   {
716                       case 'text':
717                           
718                           $disposition = strtolower($part->disposition);
719                           if($disposition != 'attachment')
720                           {
721                                if(strtolower($part->ctype_secondary) == 'html')
722                                {
723                                   if($printHeader)
724                                        $content .= $this->builderMsgHeader($part);
725
726                                   $content .= $this->decodeMailPart($part->body,$part->ctype_parameters['charset']);
727                                }
728
729                                if(strtolower($part->ctype_secondary) == 'plain')
730                                {
731                                  if($printHeader)
732                                      $content .= $this->builderMsgHeader($part);
733
734                                   $content .= '<pre>'. htmlentities($this->decodeMailPart($part->body,$part->ctype_parameters['charset'],false)).'</pre>';
735                                }
736
737                       
738                           }
739                            break;
740                       case 'multipart':
741
742                            if($printHeader)
743                               $content .= $this->builderMsgHeader($part);
744
745                            $this->builderMsgBody($part,$content);
746
747                            break;
748                       case 'message':
749
750                            if(!is_array($part->parts))
751                            {
752                                $content .= "<hr align='left' width='95%' style='border:1px solid #DCDCDC'>";
753                                $content .= '<pre>'.  htmlentities($this->decodeMailPart($part->body, $structure->ctype_parameters['charset'],false)).'</pre>';
754                                $content .= "<hr align='left' width='95%' style='border:1px solid #DCDCDC'>";
755                            }
756                            else
757                                $this->builderMsgBody($part,$content,true);
758                        break;
759                 }
760               }
761            }
762        }
763       
764       
765       
766        /**
767        * @license   http://www.gnu.org/copyleft/gpl.html GPL
768        * @author    Consórcio Expresso Livre - 4Linux (www.4linux.com.br) e Prognus Software Livre (www.prognus.com.br)
769        * @param     $msg_number numero da mensagem
770        */
771        function get_msg_sample($msg_number)
772        {
773
774                $return = "";
775                if( (!isset($this->prefs['preview_msg_subject']) || ($this->prefs['preview_msg_subject'] != "1")) &&
776                        (!isset($this->prefs['preview_msg_tip']    ) || ($this->prefs['preview_msg_tip']     != "1")) )
777                {
778                        $return['body'] = "";
779                        return $return;
780                }
781
782                include_once("class.message_components.inc.php");
783                $msg = &new message_components($this->mbox);
784                $msg->fetch_structure($msg_number); 
785
786                if(!$msg->structure[$msg_number]->parts)
787                {
788                        $content = '';
789                        if (strtolower($msg->structure[$msg_number]->subtype) == "plain" || strtolower($msg->structure[$msg_number]->subtype) == "html")
790                        {
791                                $content = $this->decodeBody(imap_body($this->mbox, $msg_number, FT_UID|FT_PEEK), $msg->encoding[$msg_number][0], $msg->charset[$msg_number][0]);
792                        }
793                }
794                else
795                {
796                        foreach($msg->pid[$msg_number] as $values => $msg_part)
797                        {
798
799                                $file_type = strtolower($msg->file_type[$msg_number][$values]);
800                                if($file_type == "text/plain" || $file_type == "text/html") {
801                                        $content = $this->decodeBody(imap_fetchbody($this->mbox, $msg_number, $msg_part, FT_UID|FT_PEEK), $msg->encoding[$msg_number][$values], $msg->charset[$msg_number][$values]);
802                                        break;
803                                }
804                        }
805                }
806                $content = $this->replace_special_characters($content);
807                $tags_replace = array("<br>","<br/>","<br />");
808                $content = str_replace($tags_replace," ", $content);
809                $content = strip_tags($content);
810                $content = str_replace(array("{","}","&nbsp;"), " ", $content);
811                $content = trim($content);
812                $content = html_entity_decode(substr($content,0,300));
813                $content != "" ? $return['body'] = " - " . $content: $return['body'] = "";
814                return $return;
815        }
816       
817       
818        function get_info_msg($params)
819        {
820                $return = array();
821                $msg_number = $params['msg_number'];
822                $msg_folder = urldecode($params['msg_folder']);
823               
824                if(preg_match('(.+)(_[a-zA-Z0-9]+)',$msg_number,$matches)) { //Verifies if it comes from a tab diferent of the main one.
825                        $msg_number = $matches[1];
826                        $plus_id = $matches[2];
827                }
828                else {
829                        $plus_id = '';
830                }
831
832                if(!$this->mbox || !is_resource($this->mbox))
833                        $this->mbox = $this->open_mbox($msg_folder);
834               
835                $header = $this->get_header($msg_number);
836                if (!$header) {
837                        $return['status_get_msg_info'] = "false";
838                        return $return;
839                }
840
841                $header_ = imap_fetchheader($this->mbox, $msg_number, FT_UID);
842                $return_get_body = $this->get_body_msg($msg_number, $msg_folder);
843                $body = $return_get_body['body'];
844
845                if($return_get_body['body']=='isCripted'){
846                        $exporteml = new ExportEml();
847                        $return['source']=$exporteml->export_msg_data($msg_number,$msg_folder);
848                        $return['body']                 = "";
849                        $return['attachments']  =  "";
850                        $return['thumbs']               =  "";
851                        $return['signature']    =  "";
852                        //return $return;
853                }else{
854            $return['body']             = $body;
855            $return['attachments']      = $return_get_body['attachments'];
856            $return['thumbs']           = $return_get_body['thumbs'];
857            $return['signature']        = $return_get_body['signature'];
858                }
859                $pattern = '/^[ \t]*Disposition-Notification-To:[ ]*<?[[:alnum:]\._-]+@[[:alnum:]_-]+[\.[:alnum:]]+>?/sm';
860                if (preg_match($pattern, $header_, $fields))
861                {
862                        if(preg_match('/[[:alnum:]\._\-]+@[[:alnum:]_\-\.]+/',$fields[0], $matches)){
863                                $return['DispositionNotificationTo'] = "<".$matches[0].">";
864                        }
865                }
866
867                $return['Recent']       = $header->Recent;
868                $return['Unseen']       = $header->Unseen;
869                $return['Deleted']      = $header->Deleted;
870                $return['Flagged']      = $header->Flagged;
871
872                if($header->Answered =='A' && $header->Draft == 'X'){
873                        $return['Forwarded'] = 'F';
874                }
875
876                else {
877                        $return['Answered']     = $header->Answered;
878                        $return['Draft']        = $header->Draft;
879                }
880
881                $return['msg_number'] = $msg_number.$plus_id;
882                $return['msg_folder'] = $msg_folder;
883
884                $date_msg = gmdate("d/m/Y",$header->udate);
885                if (date("d/m/Y") == $date_msg)
886                        $return['udate'] = gmdate("H:i",$header->udate);
887                else
888                        $return['udate'] = $date_msg;
889
890                $return['msg_day'] = $date_msg;
891                $return['msg_hour'] = gmdate("H:i",$header->udate);
892
893                if (date("d/m/Y") == $date_msg) //no dia
894                {
895                        $return['fulldate'] = gmdate("d/m/Y H:i",$header->udate);
896                        $return['smalldate'] = gmdate("H:i",$header->udate);
897
898                        $timestamp_now = strtotime("now") + $offset;
899                        $timestamp_msg_time = $header->udate;
900                        // $timestamp_now is GMT and $timestamp_msg_time is MailDate TZ.
901                        // The variable $timestamp_diff is calculated without MailDate TZ.
902                        $pdate = date_parse($header->MailDate);
903                        $timestamp_diff = $timestamp_now - $timestamp_msg_time  + ($pdate['zone']*(-60));
904
905                        if (gmdate("H",$timestamp_diff) > 0)
906                        {
907                                $return['fulldate'] .= " (" . gmdate("H:i", $timestamp_diff) . ' ' . $this->functions->getLang('hours ago') . ')';
908                        }
909                        else
910                        {
911                                if (gmdate("i",$timestamp_diff) == 0){
912                                        $return['fulldate'] .= ' ('. $this->functions->getLang('now').')';
913                                }
914                                elseif (gmdate("i",$timestamp_diff) == 1){
915                                        $return['fulldate'] .= ' (1 '. $this->functions->getLang('minute ago').')';
916                                }
917                                else{
918                                        $return['fulldate'] .= " (" . gmdate("i",$timestamp_diff) .' '. $this->functions->getLang('minutes ago') . ')';
919                                }
920                        }
921                }
922                else{
923                        $return['fulldate'] = gmdate("d/m/Y H:i",$header->udate);
924                        $return['smalldate'] = gmdate("d/m/Y",$header->udate);
925                }
926
927                $from = $header->from;
928                $return['from'] = array();
929                $return['from']['name'] = $this->decode_string($from[0]->personal);
930                $return['from']['email'] = $this->decode_string($from[0]->mailbox . "@" . $from[0]->host);
931                if ($return['from']['name'])
932                {
933                        if (substr($return['from']['name'], 0, 1) == '"')
934                                $return['from']['full'] = $return['from']['name'] . ' ' . '&lt;' . $return['from']['email'] . '&gt;';
935                        else
936                                $return['from']['full'] = '"' . $return['from']['name'] . '" ' . '&lt;' . $return['from']['email'] . '&gt;';
937                }
938                else
939                        $return['from']['full'] = $return['from']['email'];
940
941                // Sender attribute
942                $sender = $header->sender;
943                $return['sender'] = array();
944                $return['sender']['name'] = $this->decode_string($sender[0]->personal);
945                $return['sender']['email'] = $this->decode_string($sender[0]->mailbox . "@" . $sender[0]->host);
946                if ($return['sender']['name'])
947                {
948                        if (substr($return['sender']['name'], 0, 1) == '"')
949                                $return['sender']['full'] = $return['sender']['name'] . ' ' . '&lt;' . $return['sender']['email'] . '&gt;';
950                        else
951                                $return['sender']['full'] = '"' . $return['sender']['name'] . '" ' . '&lt;' . $return['sender']['email'] . '&gt;';
952                }
953                else
954                        $return['sender']['full'] = $return['sender']['email'];
955
956                if($return['from']['full'] == $return['sender']['full'])
957                        $return['sender'] = null;
958                $to = $header->to;
959                $return['toaddress2'] = "";
960                if (!empty($to))
961                {
962                        foreach ($to as $tmp)
963                        {
964                                if (!empty($tmp->personal))
965                                {
966                                        $personal_tmp = imap_mime_header_decode($tmp->personal);
967                                        $return['toaddress2'] .= '"' . $personal_tmp[0]->text . '"';
968                                        $return['toaddress2'] .= " ";
969                                        $return['toaddress2'] .= "&lt;";
970                                        if ($tmp->host != 'unspecified-domain')
971                                                $return['toaddress2'] .= $tmp->mailbox . "@" . $tmp->host;
972                                        else
973                                                $return['toaddress2'] .= $tmp->mailbox;
974                                        $return['toaddress2'] .= "&gt;";
975                                        $return['toaddress2'] .= ", ";
976                                }
977                                else
978                                {
979                                        if ($tmp->host != 'unspecified-domain')
980                                                $return['toaddress2'] .= $tmp->mailbox . "@" . $tmp->host;
981                                        else
982                                                $return['toaddress2'] .= $tmp->mailbox;
983                                        $return['toaddress2'] .= ", ";
984                                }
985                        }
986                        $return['toaddress2'] = $this->del_last_two_caracters($return['toaddress2']);
987                }
988                else
989                {
990                        $return['toaddress2'] = "";
991                }       
992
993                $cc = $header->cc;
994                $return['cc'] = "";
995                if (!empty($cc))
996                {
997                        foreach ($cc as $tmp_cc)
998                        {
999                                if (!empty($tmp_cc->personal))
1000                                {
1001                                        $personal_tmp_cc = imap_mime_header_decode($tmp_cc->personal);
1002                                        $return['cc'] .= '"' . $personal_tmp_cc[0]->text . '"';
1003                                        $return['cc'] .= " ";
1004                                        $return['cc'] .= "&lt;";
1005                                        $return['cc'] .= $tmp_cc->mailbox . "@" . $tmp_cc->host;
1006                                        $return['cc'] .= "&gt;";
1007                                        $return['cc'] .= ", ";
1008                                }
1009                                else
1010                                {
1011                                        $return['cc'] .= $tmp_cc->mailbox . "@" . $tmp_cc->host;
1012                                        $return['cc'] .= ", ";
1013                                }
1014                        }
1015                        $return['cc'] = $this->del_last_two_caracters($return['cc']);
1016                }
1017                else
1018                {
1019                        $return['cc'] = "";
1020                }
1021
1022                ##
1023                # @AUTHOR Rodrigo Souza dos Santos
1024                # @DATE 2008/09/12
1025                # @BRIEF Adding the BCC field.
1026                ##
1027               
1028                $bcc = $header->bcc;
1029                $return['bcc'] = "";
1030                if (!empty($bcc))
1031                {
1032                        foreach ($bcc as $tmp_bcc)
1033                        {
1034                                if (!empty($tmp_bcc->personal))
1035                                {
1036                                        $personal_tmp_bcc = imap_mime_header_decode($tmp_bcc->personal);
1037                                        $return['bcc'] .= '"' . $personal_tmp_bcc[0]->text . '"';
1038                                        $return['bcc'] .= " ";
1039                                        $return['bcc'] .= "&lt;";
1040                                        $return['bcc'] .= $tmp_bcc->mailbox . "@" . $tmp_bcc->host;
1041                                        $return['bcc'] .= "&gt;";
1042                                        $return['bcc'] .= ", ";
1043                                }
1044                                else
1045                                {
1046                                        $return['bcc'] .= $tmp_bcc->mailbox . "@" . $tmp_bcc->host;
1047                                        $return['bcc'] .= ", ";
1048                                }
1049                        }
1050                        $return['bcc'] = $this->del_last_two_caracters($return['bcc']);
1051                }
1052                else
1053                {
1054                        $return['bcc'] = "";
1055                }
1056
1057                $reply_to = $header->reply_to;
1058                $return['reply_to'] = "";
1059                if (is_object($reply_to[0]))
1060                {
1061                        if ($return['from']['email'] != ($reply_to[0]->mailbox."@".$reply_to[0]->host))
1062                        {
1063                                if (!empty($reply_to[0]->personal))
1064                                {
1065                                        $personal_reply_to = imap_mime_header_decode($tmp_reply_to->personal);
1066                                        if(!empty($personal_reply_to[0]->text)) {
1067                                                $return['reply_to'] .= '"' . $personal_reply_to[0]->text . '"';
1068                                                $return['reply_to'] .= " ";
1069                                                $return['reply_to'] .= "&lt;";
1070                                                $return['reply_to'] .= $reply_to[0]->mailbox . "@" . $reply_to[0]->host;
1071                                                $return['reply_to'] .= "&gt;";
1072                                        }
1073                                        else {
1074                                                $return['reply_to'] .= $reply_to[0]->mailbox . "@" . $reply_to[0]->host;
1075                                        }
1076                                }
1077                                else
1078                                {
1079                                        $return['reply_to'] .= $reply_to[0]->mailbox . "@" . $reply_to[0]->host;
1080                                }
1081                        }
1082                }
1083                $return['reply_to'] = $this->decode_string($return['reply_to']);
1084                $return['subject'] = $this->decode_string($header->fetchsubject);
1085                $return['Size'] = $header->Size;
1086                $return['reply_toaddress'] = $header->reply_toaddress;
1087
1088                //All this is to help in local messages
1089                $return['timestamp'] = $header->udate;
1090                $return['login'] = $_SESSION['phpgw_info']['expressomail']['user']['account_id'];//$GLOBALS['phpgw_info']['user']['account_id'];
1091                $return['reply_toaddress'] = $header->reply_toaddress;
1092               
1093                return $return;
1094        }
1095
1096        /*
1097         * Converte textos utf8 para o padrão html.
1098         * @link http://php.net/manual/en/function.utf8-decode.php
1099         * @author luka8088 <luka8088@gmail.com>
1100         */
1101        function utf8_to_html ($data)
1102        {
1103            return preg_replace("/([\\xC0-\\xF7]{1,1}[\\x80-\\xBF]+)/e", '$this->_utf8_to_html("\\1")', $data);
1104        }
1105
1106        function _utf8_to_html ($data)
1107                {
1108            $ret = 0;
1109                foreach((str_split(strrev(chr((ord($data{0}) % 252 % 248 % 240 % 224 % 192) + 128) . substr($data, 1)))) as $k => $v)
1110                        $ret += (ord($v) % 128) * pow(64, $k);
1111                    return "&#$ret;";
1112                }
1113        //------------------------------------------------------------------------------//
1114
1115
1116       
1117       
1118                /**
1119         * Decodifica uma part da mensagem para iso-8859-1
1120         * @param <type> $part parte do email
1121         * @param <type> $encode codificação da parte
1122         * @return <type> string decodificada
1123         */
1124        function decodeMailPart($part, $encode, $html = true)
1125                {
1126            switch (strtolower($encode))
1127                        {
1128                case 'iso-8859-1':
1129                    return $part;
1130                    break;
1131
1132                case 'utf-8':
1133                    if ($html)
1134                                                return  $this->utf8_to_html($part);
1135                else
1136                                                return  utf8_decode ($part);
1137                    break;
1138
1139                default:
1140                    return mb_convert_encoding($part, 'iso-8859-1');
1141                                        break;
1142                                }
1143                        }
1144
1145       
1146        function get_body_msg($msg_number, $msg_folder)
1147        {
1148            /*
1149             * Requires of librarys
1150             */
1151            require_once $_SESSION['rootPath'].'/library/mime/mimePart.php';
1152            require_once $_SESSION['rootPath'].'/library/mime/mimeDecode.php';
1153            require_once $_SESSION['rootPath'].'/expressoMail1_2/inc/class.attachment.inc.php';
1154                include_once("class.message_components.inc.php");
1155            //--------------------------------------------------------------------//
1156
1157            $return = array();
1158
1159                $msg = &new message_components($this->mbox);
1160                $msg->fetch_structure($msg_number);
1161
1162            $content = '';
1163
1164            $rawMessageData = $this->getRawHeader($msg_number).$this->getRawBody($msg_number);
1165
1166            $decoder = new Mail_mimeDecode($rawMessageData);
1167
1168            $params['include_bodies'] = true;
1169            $params['decode_bodies']  = true;
1170            $params['decode_headers'] = true;
1171            $structure = $decoder->decode($params);
1172
1173            /*
1174             * Inicia Gerenciador de Anexos
1175             */
1176            $attachmentManager = new attachment();
1177            $attachmentManager->setStructure($structure);
1178            //----------------------------------------------//
1179
1180            /*
1181             * Monta informações dos anexos para o cabecalhos
1182             */
1183            $attachments = $attachmentManager->getAttachmentsInfo();
1184            $return['attachments'] = $attachments;
1185            //----------------------------------------------//
1186
1187            /*
1188             * Monta informações das imagens
1189             */
1190            $images = $attachmentManager->getEmbeddedImagesInfo();
1191            //----------------------------------------------//
1192
1193                if(!$this->has_cid)
1194                {
1195                    $return['thumbs']    = $this->get_thumbs($images,$msg_number,$msg_folder);
1196                        $return['signature'] = $this->get_signature($msg,$msg_number,$msg_folder);
1197                }
1198
1199            switch (strtolower($structure->ctype_primary))
1200                {
1201                case 'text':
1202                        if(strtolower($structure->ctype_secondary) == 'x-pkcs7-mime')
1203                        {
1204                                $return['body']='isCripted';
1205                                return $return;
1206                        }
1207                        $attachment = array();
1208
1209                        $msg_subtype = strtolower($structure->ctype_secondary);
1210                        $disposition = strtolower($structure->disposition);
1211
1212                        if(($msg_subtype == "html" || $msg_subtype == 'plain') && ($disposition != 'attachment'))
1213                        {
1214
1215
1216                                if(strtolower($msg_subtype) == 'plain')
1217                                        {
1218                                        $content = $this->decodeMailPart($structure->body, $structure->ctype_parameters['charset'],false);
1219                                                $content = str_replace( array( '<', '>' ), array( ' #$<$# ', ' #$>$# ' ), $content );
1220                                                $content = htmlentities( $content );
1221                                        $this->replace_links($content);
1222                                                $content = str_replace( array( ' #$&lt;$# ', ' #$&gt;$# ' ), array( '&lt;', '&gt;' ), $content );
1223                                                $content = '<pre>' . $content . '</pre>';
1224                                                $return[ 'body' ] = $content;
1225                                                return $return;
1226                                        }
1227                                                                $content = $this->decodeMailPart($structure->body, $structure->ctype_parameters['charset']);
1228                                }
1229
1230                    break;
1231
1232               case 'multipart':
1233                    $this-> builderMsgBody($structure , $content);
1234
1235                    break;
1236
1237               case 'message':
1238                    if(!is_array($structure->parts))
1239                                {
1240                        $content .= "<hr align='left' width='95%' style='border:1px solid #DCDCDC'>";
1241                        $content .= '<pre>'.htmlentities($this->decodeMailPart($structure->body, $structure->ctype_parameters['charset'],false)).'</pre>';
1242                        $content .= "<hr align='left' width='95%' style='border:1px solid #DCDCDC'>";
1243                                                }
1244                                            else
1245                        $this->builderMsgBody($structure , $content,true);
1246
1247                    break;
1248
1249               default:
1250                    if(count($attachments) > 0)
1251                       $content .= '';
1252                    else
1253                                                                {
1254                       $content .= $this->functions->getLang('Message not supported') . '. ';
1255                       $content .= $this->functions->getLang('Type') . ': ' . $structure->ctype_primary . '/' . $structure->ctype_secondary;
1256                                                                }
1257                    break;
1258                                                                }
1259
1260                $params = array('folder' => $msg_folder, "msgs_to_set" => $msg_number, "flag" => "seen");
1261                $this->set_messages_flag($params);
1262                $content = $this->process_embedded_images($images,$msg_number,$content, $msg_folder);
1263                $content = $this->replace_special_characters($content);
1264                $this->replace_links($content);
1265                $return['body'] = &$content;
1266               
1267                return $return;
1268        }
1269
1270        function htmlfilter($body)
1271        {
1272                require_once('htmlfilter.inc');
1273
1274                $tag_list = Array(
1275                                false,
1276                                'blink',
1277                                'object',
1278                                'meta',
1279                                'html',
1280                                'link',
1281                                'frame',
1282                                'iframe',
1283                                'layer',
1284                                'ilayer',
1285                                'plaintext'
1286                );
1287
1288                /**
1289                * A very exclusive set:
1290                */
1291                // $tag_list = Array(true, "b", "a", "i", "img", "strong", "em", "p");
1292                $rm_tags_with_content = Array(
1293                                'script',
1294                                'style',
1295                                'applet',
1296                                'embed',
1297                                'head',
1298                                'frameset',
1299                                'xml',
1300                                'xmp'
1301                );
1302
1303                $self_closing_tags =  Array(
1304                                'img',
1305                                'br',
1306                                'hr',
1307                                'input'
1308                );
1309
1310                $force_tag_closing = true;
1311
1312                $rm_attnames = Array(
1313                        '/.*/' =>
1314                                Array(
1315                                        '/target/i',
1316                                        //'/^on.*/i', -> onClick, dos compromissos da agenda.
1317                                        '/^dynsrc/i',
1318                                        '/^datasrc/i',
1319                                        '/^data.*/i',
1320                                        '/^lowsrc/i'
1321                                )
1322                );
1323
1324                /**
1325                 * Yeah-yeah, so this looks horrible. Check out htmlfilter.inc for
1326                 * some idea of what's going on here. :)
1327                 */
1328
1329                $bad_attvals = Array(
1330                '/.*/' =>
1331                Array(
1332                      '/.*/' =>
1333                              Array(
1334                                Array(
1335                                  '/^([\'\"])\s*\S+\s*script\s*:*(.*)([\'\"])/si',
1336                                          //'/^([\'\"])\s*https*\s*:(.*)([\'\"])/si', -> doclinks notes
1337                                          '/^([\'\"])\s*mocha\s*:*(.*)([\'\"])/si',
1338                                          '/^([\'\"])\s*about\s*:(.*)([\'\"])/si'
1339                                      ),
1340                            Array(
1341                                              '\\1oddjob:\\2\\1',
1342                                          //'\\1uucp:\\2\\1', -> doclinks notes
1343                                      '\\1amaretto:\\2\\1',
1344                                          '\\1round:\\2\\1'
1345                                        )
1346                                    ),
1347
1348                          '/^style/i' =>
1349                              Array(
1350                                        Array(
1351                                          '/expression/i',
1352                                              '/behaviou*r/i',
1353                                          '/binding/i',
1354                                              '/include-source/i',
1355                                          '/url\s*\(\s*([\'\"]*)\s*https*:.*([\'\"]*)\s*\)/si',
1356                                              '/url\s*\(\s*([\'\"]*)\s*\S+\s*script:.*([\'\"]*)\s*\)/si'
1357                                         ),
1358                                        Array(
1359                                          'idiocy',
1360                                              'idiocy',
1361                                          'idiocy',
1362                                              'idiocy',
1363                                          'url(\\1http://securityfocus.com/\\1)',
1364                                          'url(\\1http://securityfocus.com/\\1)'
1365                                         )
1366                                )
1367                          )
1368                    );
1369
1370                $add_attr_to_tag = Array(
1371                                '/^a$/i' => Array('target' => '"_new"')
1372                );
1373
1374
1375                $trusted_body = sanitize($body,
1376                                $tag_list,
1377                                $rm_tags_with_content,
1378                                $self_closing_tags,
1379                                $force_tag_closing,
1380                                $rm_attnames,
1381                                $bad_attvals,
1382                                $add_attr_to_tag
1383                );
1384
1385            return $trusted_body;
1386        }
1387
1388        function decodeBody($body, $encoding, $charset=null)
1389        {
1390
1391                if ($encoding == 'quoted-printable')
1392                {
1393                        $body = quoted_printable_decode($body);
1394
1395                        }
1396        else if ($encoding == 'base64')
1397        {
1398                $body = base64_decode($body);
1399        }
1400                // All other encodings are returned raw.
1401                if (strtolower($charset) == "utf-8")
1402                        return utf8_decode($body);
1403        else
1404                        return $body;
1405        }
1406
1407                               
1408        /**
1409        * @license   http://www.gnu.org/copyleft/gpl.html GPL
1410        * @author    Consórcio Expresso Livre - 4Linux (www.4linux.com.br) e Prognus Software Livre (www.prognus.com.br)
1411        * @param     $images
1412        * @param     $msgno
1413        * @param     $body
1414        * @param     $msg_folder
1415        */                     
1416        function process_embedded_images($images, $msgno, $body, $msg_folder)
1417        {
1418
1419            foreach ($images as $image)
1420                {
1421                $image['cid'] = eregi_replace("<", "", $image['cid']);
1422                $image['cid'] = eregi_replace(">", "", $image['cid']);
1423                                $body = eregi_replace("<br/>", "", $body);
1424                $body = str_replace("src=\"cid:".$image['cid']."\"", " src=\"./inc/show_embedded_attach.php?msg_folder=$msg_folder&msg_num=$msgno&msg_part=".$image['pid']."\" ", $body);
1425                $body = str_replace("src='cid:".$image['cid']."'", " src=\"./inc/show_embedded_attach.php?msg_folder=$msg_folder&msg_num=$msgno&msg_part=".$image['pid']."\" ", $body);
1426                $body = str_replace("src=cid:".$image['cid'], " src=\"./inc/show_embedded_attach.php?msg_folder=$msg_folder&msg_num=$msgno&msg_part=".$image['pid']."\" ", $body);   
1427                        }
1428                return $body;
1429        }
1430
1431        function replace_special_characters($body)
1432        {
1433                // Suspected TAGS!
1434                // $tag_list = Array('blink','object','meta','html','link','frame','iframe','layer','ilayer','plaintext','script','style','img','applet','embed','head','frameset','xml','xmp');
1435
1436                // remove MS Office's proprietary tag
1437                //$body = mb_ereg_replace('<!\-\-\[if [^!]* mso .*\]>.*<!\[endif\]\-\->', '', $body);
1438               
1439                // Layout problem: Change html elements
1440                // with absolute position to relate position, CASE INSENSITIVE.
1441                $body = @mb_eregi_replace("POSITION: ABSOLUTE;","",$body);
1442
1443                // tags to be removed doe to security reasons
1444                $tag_list = Array(
1445                        'head','blink','object','frame','iframe',
1446                        'layer','ilayer','plaintext','script',
1447                        'applet','embed','frameset','xml','xmp'
1448                );
1449
1450                foreach($tag_list as $index => $tag) {
1451                        $body = @mb_eregi_replace("<$tag\\b[^>]*>(.*?)</$tag>", "<!-- TAG <$tag> Removed by ExpressoMail -->", $body);
1452                        }
1453               
1454                //try to wrap CSS code instead of remove STYLE tags
1455                require_once('../library/csstidy/class.csstidy.php');
1456                $css = new csstidy();
1457                $css->set_cfg('preserve_css', false);
1458
1459                $regs_found = array();
1460                $tags_found = @mb_eregi("<style\b[^>]*>(.*?)</style>", $body, $regs_found);
1461               
1462                foreach ($regs_found as $block_found) {
1463                        $n_start      = strpos($block_found, '>')+1;
1464                        $n_length     = strrpos($block_found, '<')-$n_start;
1465                        $bf_innerHTML = substr($block_found, $n_start, $n_length);
1466                       
1467                        $bf_innerHTML = mb_ereg_replace('<!--', '', $bf_innerHTML);
1468                        $bf_innerHTML = mb_ereg_replace('-->', '', $bf_innerHTML);
1469
1470                        $css->parse($bf_innerHTML);
1471                       
1472                        $prefix = ".$wrapper_class ";
1473                        foreach ($css->css[41] as $key => $value) {
1474                                                //explode multiple selectors per block
1475                                                $selectors = explode(',', $key);
1476                                                         
1477                                    foreach ($selectors as $selector) {
1478                                        if (ereg('\*', $key)) {
1479                                                                //skip selecto '*'
1480                                            continue;
1481                }
1482                                                                 
1483                                                        $selector = eregi_replace('[^#\.]*body.*', '', $selector);
1484                                                        $css->css[41][$prefix.trim($selector)] = $value;
1485                                    }
1486                        unset($css->css[41][$key]);
1487                        }
1488                       
1489                        $body = str_replace($block_found, '<style>'.$css->print->plain().'</style>', $body);
1490                }
1491
1492
1493                // Malicious Code Remove
1494                $dirtyCodePattern = "/(<([\w]+[\w0-9]*)(.*)on(mouse(move|over|down|up)|load|blur|change|error|click|dblclick|focus|key(down|up|press)|select)([\n\ ]*)=([\n\ ]*)[\"'][^>\"']*[\"']([^>]*)>)(.*)(<\/\\2>)?/misU";
1495                preg_match_all($dirtyCodePattern,$body,$rest,PREG_PATTERN_ORDER);
1496                foreach($rest[0] as $i => $val) {
1497                        if (!(preg_match("/javascript:window\.open\(\"([^'\"]*)\/index\.php\?menuaction=calendar\.uicalendar\.set_action\&cal_id=([^;'\"]+);?['\"]/i",$rest[1][$i]) && strtoupper($rest[4][$i]) == "CLICK" )) //Calendar events
1498                                $body = str_replace($rest[1][$i],"<".$rest[2][$i].$rest[3][$i].$rest[7][$i].">",$body);
1499                }
1500
1501                /*
1502                * Remove deslocamento a esquerda colocado pelo Outlook.
1503                * Este delocamento faz com que algumas palavras fiquem escondidas atras da barra lateral do expresso.
1504                */
1505                $body = mb_ereg_replace("(<p[^>]*)(text-indent:[^>;]*-[^>;]*;)([^>]*>)","\\1\\3",$body);
1506            $body = mb_ereg_replace("(<p[^>]*)(margin-right:[^>;]*-[^>;]*;)([^>]*>)","\\1\\3",$body);
1507            $body = mb_ereg_replace("(<p[^>]*)(margin-left:[^>;]*-[^>;]*;)([^>]*>)","\\1\\3",$body);
1508            //--------------------------------------------------------------------------------------------//   
1509
1510                //$body = $this->replace_links($body);
1511
1512                //Remoção de tags <span></span> para correção de erro no firefox
1513                $body = mb_eregi_replace("<span><span>","",$body);
1514                $body = mb_eregi_replace("</span></span>","",$body);
1515                $body =  preg_replace("/text-indent:.*;/i","", $body);
1516               
1517                //Correção para compatibilização com Outlook, ao visualizar a mensagem
1518                $body = mb_ereg_replace('<!--\[','<!-- [',$body);
1519                $body = mb_ereg_replace('&lt;!\[endif\]--&gt;', '<![endif]-->', $body);
1520               
1521                return  "<div class=\"$wrapper_class\"><span>".$body.'</span></div>';
1522        }
1523
1524
1525
1526        function replace_links_callback($matches) 
1527        {
1528                if($matches[3])
1529                        $pref = $matches[3];
1530            else
1531                        $pref = $matches[3] = 'http';
1532
1533            return '<a href="'.$pref.'://'.$matches[4].$matches[5].'" target="_blank">'.$matches[4].$matches[5].'</a>';
1534        }
1535
1536
1537        /**
1538        * @license   http://www.gnu.org/copyleft/gpl.html GPL
1539        * @author    Consórcio Expresso Livre - 4Linux (www.4linux.com.br) e Prognus Software Livre (www.prognus.com.br)
1540        * @param     $body corpo da mensagem
1541        */
1542        function replace_links(&$body)
1543                {
1544                // Trata urls do tipo aaaa.bbb.empresa 
1545                // Usadas na intranet. 
1546                $pattern = '/(?<=[\s|(<br>)|\n|\r|;])(((http|https|ftp|ftps)?:\/\/((?:[\w]\.?)+(?::[\d]+)?[:\/.\-~&=?%;@#,+\w]*))|((?:www?\.)(?:\w\.?)*(?::\d+)?[\:\/\w.\-~&=?%;@+]*))/i';     
1547                $replacement = '<a href="://$4$5" target="_blank">$4$5</a>';
1548            $body = preg_replace_callback($pattern,array( &$this, 'replace_links_callback'), $body);
1549                // E-mail address in the text should create a new e-mail on ExpressoMail
1550                $pattern = '/( |<|&lt;|>)([A-Za-z0-9\.~?\/_=#\-]*@[A-Za-z0-9\.~?\/_=#\-]*)( |>|&gt;|<)/im';
1551                $replacement = '$1<a href="mailto:$2">$2</a>$3';
1552                $body = preg_replace( $pattern, $replacement, $body );
1553
1554        }
1555
1556        function get_signature($msg, $msg_number, $msg_folder)
1557        {
1558            include_once(dirname( __FILE__ ) ."/../../security/classes/CertificadoB.php");
1559            include_once("class.db_functions.inc.php");
1560            foreach ($msg->file_type[$msg_number] as $index => $file_type)
1561            {
1562                $sign = array();
1563                $temp = $this->get_info_head_msg($msg_number);
1564                if($temp['ContentType'] =='normal') return $sign;
1565                $file_type = strtolower($file_type);
1566                if(strtolower($msg->encoding[$msg_number][$index]) == 'base64')
1567                {
1568                    if ($temp['ContentType'] == 'signature')
1569                    {
1570                        if(!$this->mbox || !is_resource($this->mbox))
1571                        $this->mbox = $this->open_mbox($msg_folder);
1572
1573                        $header = @imap_headerinfo($this->mbox, imap_msgno($this->mbox, $msg_number), 80, 255);
1574
1575                        $imap_msg               = @imap_fetchheader($this->mbox, $msg_number, FT_UID);
1576                        $imap_msg               .= @imap_body($this->mbox, $msg_number, FT_UID);
1577
1578                        $certificado = new certificadoB();
1579                        $validade = $certificado->verificar($imap_msg);
1580                                        $sign[] = $certificado->msg_sem_assinatura;
1581                        if ($certificado->apresentado)
1582                        {
1583                            $from = $header->from;
1584                            foreach ($from as $id => $object)
1585                            {
1586                                $fromname = $object->personal;
1587                                $fromaddress = $object->mailbox . "@" . $object->host;
1588                            }
1589                            foreach ($certificado->erros_ssl as $item)
1590                            {
1591                                $sign[] = $item . "#@#";
1592                            }
1593
1594                            if (count($certificado->erros_ssl) < 1)
1595                            {
1596                                $check_msg = 'Message untouched';
1597                                if(strtoupper($fromaddress) == strtoupper($certificado->dados['EMAIL']))
1598                                {
1599                                    $check_msg .= ' and authentic###';
1600                                }
1601                                else
1602                                {
1603                                    $check_msg .= ' with signer different from sender#@#';
1604                                }
1605                                $sign[] = $check_msg;
1606                            }
1607                                               
1608                            $sign[] = 'Message signed by: ###' . $certificado->dados['NOME'];
1609                            $sign[] = 'Certificate email: ###' . $certificado->dados['EMAIL'];
1610                            $sign[] = 'Mail from: ###' . $fromaddress;
1611                            $sign[] = 'Certificate Authority: ###' . $certificado->dados['EMISSOR'];
1612                            $sign[] = 'Validity of certificate: ###' . gmdate('r',openssl_to_timestamp($certificado->dados['FIM_VALIDADE']));
1613                            $sign[] = 'Message date: ###' . $header->Date;
1614
1615                            $cert = openssl_x509_parse($certificado->cert_assinante);
1616
1617                            $sign_alert = array();
1618                            $sign_alert[] = 'Certificate Owner###:\n';
1619                            $sign_alert[] = 'Common Name (CN)###  ' . $cert[subject]['CN'] .  '\n';
1620                            $X = substr($certificado->dados['NASCIMENTO'] ,0,2) . '-' . substr($certificado->dados['NASCIMENTO'] ,2,2) . '-'  . substr($certificado->dados['NASCIMENTO'] ,4,4);
1621                            $sign_alert[]= 'Organization (O)###  ' . $cert[subject]['O'] .  '\n';
1622                            $sign_alert[]= 'Organizational Unit (OU)### ' . $cert[subject]['OU'][0] .  '\n';
1623                            //$sign_alert[] = 'Serial Number### ' . $cert['serialNumber'] . '\n';
1624                            $sign_alert[] = 'Personal Data###:' . '\n';
1625                            $sign_alert[] = 'Birthday### ' . $X .  '\n';
1626                            $sign_alert[]= 'Fiscal Id### ' . $certificado->dados['CPF'] .  '\n';
1627                            $sign_alert[]= 'Identification### ' . $certificado->dados['RG'] .  '\n\n';
1628                            $sign_alert[]= 'Certificate Issuer###:\n';
1629                            $sign_alert[]= 'Common Name (CN)###  ' . $cert[issuer]['CN'] . '\n';
1630                            $sign_alert[]= 'Organization (O)###  ' . $cert[issuer]['O'] .  '\n';
1631                            $sign_alert[]= 'Organizational Unit (OU)### ' . $cert[issuer]['OU'][0] .  '\n\n';
1632                            $sign_alert[]= 'Validity###:\n';
1633                            $H = data_hora($cert[validFrom]);
1634                            $X = substr($H,6,2) . '-' . substr($H,4,2) . '-'  . substr($H,0,4);
1635                            $sign_alert[]= 'Valid From### ' . $X .  '\n';
1636                            $H = data_hora($cert[validTo]);
1637                            $X = substr($H,6,2) . '-' . substr($H,4,2) . '-'  . substr($H,0,4);
1638                            $sign_alert[]= 'Valid Until### ' . $X;
1639                            $sign[] = $sign_alert;
1640
1641                            $this->db = new db_functions();
1642                           
1643                            // TODO: testar se existe um certificado no banco e verificar qual ï¿œ o mais atual.
1644                            if(!$certificado->dados['EXPIRADO'] && !$certificado->dados['REVOGADO'] && count($certificado->erros_ssl) < 1)
1645                                $this->db->insert_certificate(strtolower($certificado->dados['EMAIL']), $certificado->cert_assinante, $certificado->dados['SERIALNUMBER'], $certificado->dados['AUTHORITYKEYIDENTIFIER']);
1646                        }
1647                        else
1648                        {
1649                            $sign[] = "<span style=color:red>" . $this->functions->getLang('Invalid signature') . "</span>";
1650                            foreach($certificado->erros_ssl as $item)
1651                                $sign[] = "<span style=color:red>" . $this->functions->getLang($item) . "</span>";
1652                        }
1653                    }
1654                }
1655            }
1656            return $sign;
1657        }
1658
1659       
1660        /**
1661        * @license   http://www.gnu.org/copyleft/gpl.html GPL
1662        * @author    Consórcio Expresso Livre - 4Linux (www.4linux.com.br) e Prognus Software Livre (www.prognus.com.br)
1663        * @param     $images
1664        * @param     $msg_number
1665        * @param     $msg_folder
1666        */
1667        function get_thumbs($images, $msg_number, $msg_folder)
1668        {
1669
1670                $thumbs_array = array();
1671                $i = 0;
1672
1673            foreach ($images as $x => $image)
1674        {
1675                 if($x && $x == 'names')
1676                    continue;
1677                 
1678                 $img = "<img id='".$msg_folder.";;".$msg_number.";;".$i.";;".$image['pid'].";;".$image['encoding']."' title='".$this->functions->getLang("Click here do view (+)")."'src=./inc/show_thumbs.php?&msg_num=".$msg_number."&msg_folder=".$msg_folder."&msg_part=".$image['pid']." />";
1679                 $href = "./inc/show_img.php?msg_num=".$msg_number."&msg_folder=".$msg_folder."&msg_part=".$image['pid'];
1680                                 $anchor = "<a class=\"expressomail-thumbs-link\" onMouseDown='save_image(event,this,\"".$image['type']."\")' href=\"".$href."\" onclick=\"window.open('".$href."','mywindow','width=700,height=600,scrollbars=yes');return false;\">". $img ."</a>";
1681                 $thumbs_array[] = $anchor;
1682                        $i++;
1683               
1684                }
1685        return $thumbs_array;
1686        }
1687
1688        /*function delete_msg($params)
1689        {
1690                $folder = $params['folder'];
1691                $msgs_to_delete = explode(",",$params['msgs_to_delete']);
1692
1693                $mbox_stream = $this->open_mbox($folder);
1694
1695                foreach ($msgs_to_delete as $msg_number){
1696                        imap_delete($mbox_stream, $msg_number, FT_UID);
1697                }
1698                imap_close($mbox_stream, CL_EXPUNGE);
1699                return $params['msgs_to_delete'];
1700        }*/
1701
1702        // Novo
1703        function delete_msgs($params)
1704        {
1705
1706                $folder = $params['folder'];
1707                $folder =  mb_convert_encoding($folder, "UTF7-IMAP","ISO-8859-1");
1708                $msgs_number = explode(",",$params['msgs_number']);
1709                $border_ID = $params['border_ID'];
1710
1711                $return = array();
1712
1713                if ($params['get_previous_msg']){
1714                        $return['previous_msg'] = $this->get_info_previous_msg($params);
1715                        // Fix problem in unserialize function JS.
1716                        $return['previous_msg']['body'] = str_replace(array('{','}'), array('&#123;','&#125;'), $return['previous_msg']['body']);
1717                }
1718
1719                //$mbox_stream = $this->open_mbox($folder);
1720                $mbox_stream = @imap_open("{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".$folder, $this->username, $this->password) or die(serialize(array('imap_error' => $this->parse_error(imap_last_error()))));
1721
1722                foreach ($msgs_number as $msg_number)
1723                {
1724                        if (imap_delete($mbox_stream, $msg_number, FT_UID));
1725                                $return['msgs_number'][] = $msg_number;
1726                }
1727
1728                $return['folder'] = $folder;
1729                $return['border_ID'] = $border_ID;
1730
1731                if($mbox_stream)
1732                        imap_close($mbox_stream, CL_EXPUNGE);
1733                return $return;
1734        }
1735
1736
1737        function refresh($params)
1738        {
1739
1740                $folder = $params['folder'];
1741                $msg_range_begin = $params['msg_range_begin'];
1742                $msg_range_end = $params['msg_range_end'];
1743                $msgs_existent = $params['msgs_existent'];
1744                $sort_box_type = $params['sort_box_type'];
1745                $sort_box_reverse = $params['sort_box_reverse'];
1746                $msgs_in_the_server = array();
1747                $search_box_type = $params['search_box_type'] != "ALL" && $params['search_box_type'] != "" ? $params['search_box_type'] : false;
1748                $msgs_in_the_server = $this->get_msgs($folder, $sort_box_type, $search_box_type, $sort_box_reverse,$msg_range_begin,$msg_range_end);
1749                $msgs_in_the_server = array_keys($msgs_in_the_server);
1750                if(!count($msgs_in_the_server))
1751                        return array();
1752
1753                $num_msgs = (count($msgs_in_the_server) - imap_num_recent($this->mbox));
1754                $msgs_in_the_client = explode(",", $msgs_existent);
1755
1756                $msg_to_insert  = array_diff($msgs_in_the_server, $msgs_in_the_client);
1757                $msg_to_delete = array_diff($msgs_in_the_client, $msgs_in_the_server);
1758
1759                $msgs_to_exec = array();
1760                foreach($msg_to_insert as $msg_number)
1761                        $msgs_to_exec[] = $msg_number;
1762                //sort($msgs_to_exec);
1763
1764                $return = array();
1765                $return['new_msgs'] = imap_num_recent($this->mbox);
1766                $i = 0;
1767                foreach($msgs_to_exec as $msg_number)
1768                {
1769                        /*A função imap_headerinfo não traz o cabeçalho completo, e sim alguns
1770                        * atributos do cabeçalho. Como eu preciso do atributo Importance
1771                        * para saber se o email é importante ou não, uso abaixo a função
1772                        * imap_fetchheader e busco o atributo importance nela para passar
1773                        * para as funções ajax. Isso faz com que eu acesse o cabeçalho
1774                        * duas vezes e de duas formas diferentes, mas em contrapartida, eu
1775                        * não preciso reimplementar o método utilizando o fetchheader.
1776                        */
1777   
1778                        $tempHeader = @imap_fetchheader($this->mbox, imap_msgno($this->mbox, $msg_number));
1779                        $flag = preg_match('/importance *: *(.*)\r/i', $tempHeader, $importance);
1780                        $return[$i]['Importance'] = $flag==0?"Normal":$importance[1];
1781
1782                        $msg_sample = $this->get_msg_sample($msg_number);
1783                        $return[$i]['msg_sample'] = $msg_sample;
1784
1785                        $header = $this->get_header($msg_number);
1786                        if (!is_object($header))
1787                                continue;
1788
1789                        $return[$i]['msg_number']       = $msg_number;
1790                       
1791                        //get the next msg number to append this msg in the view in a correct place
1792                        $msg_key_position = array_search($msg_number, $msgs_in_the_server);
1793                       
1794                        $return[$i]['msg_key_position'] = $msg_key_position;
1795                        if($msg_key_position !== false && array_key_exists($msg_key_position + 1,$msgs_in_the_server) !== false)
1796                                $return[$i]['next_msg_number'] = $msgs_in_the_server[$msg_key_position + 1];
1797                        else
1798                                $return[$i]['next_msg_number'] = $msgs_in_the_server[$msg_key_position];
1799
1800                        $return[$i]['msg_folder']       = $folder;
1801                        // Atribui o tipo (normal, signature ou cipher) ao campo Content-Type
1802                        $return[$i]['ContentType']  = $this->getMessageType($msg_number, $tempHeader);
1803                        $return[$i]['Recent']           = $header->Recent;
1804                        $return[$i]['Unseen']           = $header->Unseen;
1805                        $return[$i]['Answered']         = $header->Answered;
1806                        $return[$i]['Deleted']          = $header->Deleted;
1807                        $return[$i]['Draft']            = $header->Draft;
1808                        $return[$i]['Flagged']          = $header->Flagged;
1809
1810                        $return[$i]['udate'] = $header->udate;
1811               
1812                        $from = $header->from;
1813                        $return[$i]['from'] = array();
1814                        $tmp = imap_mime_header_decode($from[0]->personal);
1815                        $return[$i]['from']['name'] = $tmp[0]->text;
1816                        $return[$i]['from']['email'] = $from[0]->mailbox . "@" . $from[0]->host;
1817                        //$return[$i]['from']['full'] ='"' . $return[$i]['from']['name'] . '" ' . '<' . $return[$i]['from']['email'] . '>';
1818                        if(!$return[$i]['from']['name'])
1819                                $return[$i]['from']['name'] = $return[$i]['from']['email'];
1820
1821                        /*$toaddress = imap_mime_header_decode($header->toaddress);
1822                        $return[$i]['toaddress'] = '';
1823                        foreach ($toaddress as $tmp)
1824                                $return[$i]['toaddress'] .= $tmp->text;*/
1825                        $to = $header->to;
1826                        $return[$i]['to'] = array();
1827                        $tmp = imap_mime_header_decode($to[0]->personal);
1828                        $return[$i]['to']['name'] = $tmp[0]->text;
1829                        $return[$i]['to']['email'] = $to[0]->mailbox . "@" . $to[0]->host;
1830                        $return[$i]['to']['full'] ='"' . $return[$i]['to']['name'] . '" ' . '<' . $return[$i]['to']['email'] . '>';
1831                        $cc = $header->cc;
1832                        if ( ($cc) && (!$return[$i]['to']['name']) ){
1833                                $return[$i]['to']['name'] =  $cc[0]->personal;
1834                                $return[$i]['to']['email'] = $cc[0]->mailbox . "@" . $cc[0]->host;
1835                        }
1836                        $return[$i]['subject'] = $this->decode_string($header->fetchsubject);
1837
1838                        $return[$i]['Size'] = $header->Size;
1839                        $return[$i]['reply_toaddress'] = $header->reply_toaddress;
1840
1841                        $return[$i]['attachment'] = array();
1842                        if (!isset($imap_attachment))
1843                        {
1844                                include_once("class.imap_attachment.inc.php");
1845                                $imap_attachment = new imap_attachment();
1846                        }
1847                        $return[$i]['attachment'] = $imap_attachment->get_attachment_headerinfo($this->mbox, $msg_number);
1848                        $i++;
1849                }
1850                $return['quota'] = $this->get_quota(array('folder_id' => $folder));
1851                $return['sort_box_type'] = $params['sort_box_type'];
1852                if(!$this->mbox || !is_resource($this->mbox))
1853                {
1854                    $this->open_mbox($folder);
1855                }
1856
1857                $return['msgs_to_delete'] = $msg_to_delete;
1858                $return['offsetToGMT'] = $this->functions->CalculateDateOffset();
1859                if($this->mbox && is_resource($this->mbox))
1860                        imap_close($this->mbox);
1861
1862                return $return;
1863        }
1864
1865     /**
1866     * Método que faz a verificação do Content-Type do e-mail e verifica se é um e-mail normal,
1867     * assinado ou cifrado.
1868     * @author Mário César Kolling <mario.kolling@serpro.gov.br>
1869     * @param $headers Uma String contendo os Headers do e-mail retornados pela função imap_imap_fetchheader
1870     * @param $msg_number O número da mesagem
1871     * @return Retorna o tipo da mensagem (normal, signature, cipher).
1872     */
1873    function getMessageType($msg_number, $headers = false){
1874            include_once(dirname( __FILE__ ) ."/../../security/classes/CertificadoB.php");
1875            $contentType = "normal";
1876            if (!$headers){
1877                $headers = imap_fetchheader($this->mbox, imap_msgno($this->mbox, $msg_number));
1878            }
1879           
1880            if (preg_match("/pkcs7-signature/i", $headers) == 1){
1881                $contentType = "signature";
1882            } else if (preg_match("/pkcs7-mime/i", $headers) == 1){
1883                $contentType = testa_p7m( imap_body($this->mbox, imap_msgno($this->mbox, $msg_number)) );
1884            }
1885
1886            return $contentType;
1887    }
1888
1889         /**
1890     * Metodo que retorna todas as pastas do usuario logado.
1891     * @param $params array opcional para repassar os argumentos ao metodo.
1892     * Se usar $params['noSharedFolders'] = true, ira retornar todas as pastas do usuário logado,
1893     * excluindo as compartilhadas para ele.
1894     * Se usar $params['folderType'] = "default" irá retornar somente as pastas defaults
1895     * Se usar $params['folderType'] = "personal" irá retornar somente as pastas pessoais
1896     * Se usar $params['folderType'] = null irá retornar todas as pastas
1897     * @return Retorna um array contendo as seguintes informacoes de cada pasta: folder_unseen,
1898     * folder_id, folder_name, folder_parent e folder_hasChildren.
1899     */
1900        function get_folders_list($params = null)
1901        {
1902                $mbox_stream = $this->open_mbox();
1903                if($params && $params['onload'] && $_SESSION['phpgw_info']['expressomail']['server']['certificado']){
1904                        $this->delete_mailbox(array("del_past" => "INBOX".$this->imap_delimiter."decifradas"));
1905                }
1906
1907                $inbox = 'INBOX';
1908                $trash = $inbox . $this->imap_delimiter . $_SESSION['phpgw_info']['expressomail']['email_server']['imapDefaultTrashFolder'];
1909                $drafts = $inbox . $this->imap_delimiter . $_SESSION['phpgw_info']['expressomail']['email_server']['imapDefaultDraftsFolder'];
1910                $spam = $inbox . $this->imap_delimiter . $_SESSION['phpgw_info']['expressomail']['email_server']['imapDefaultSpamFolder'];
1911                $sent = $inbox . $this->imap_delimiter . $_SESSION['phpgw_info']['expressomail']['email_server']['imapDefaultSentFolder'];
1912                $uid2cn = $_SESSION['phpgw_info']['user']['preferences']['expressoMail']['uid2cn'];
1913                // Free others requests
1914                session_write_close();
1915
1916                $serverString = "{".$this->imap_server.":".$this->imap_port.$this->imap_options."}";
1917               
1918                if ( $params && $params['noSharedFolders'] )
1919                        $folders_list = array_merge(imap_getmailboxes($mbox_stream, $serverString, 'INBOX' ), imap_getmailboxes($mbox_stream, $serverString, 'INBOX/*' ) );
1920                else
1921                        $folders_list = imap_getmailboxes($mbox_stream, $serverString, '*' );
1922
1923                $folders_list = array_slice($folders_list,0,$this->foldersLimit);
1924
1925                $tmp = array();
1926                $resultMine = array();
1927                $resultDefault = array();
1928
1929                if (is_array($folders_list)) {
1930                        reset($folders_list);
1931                        $this->ldap = new ldap_functions();
1932
1933                        $i = 0;
1934                        while (list($key, $val) = each($folders_list)) {
1935                                $status = imap_status($mbox_stream, $val->name, SA_UNSEEN);
1936
1937                                //$tmp_folder_id = explode("}", imap_utf7_decode($val->name));
1938                                $tmp_folder_id = explode("}", $val->name );
1939
1940                                $folderUser = trim( strpos( $tmp_folder_id[1], $this->imap_delimiter , 5 ) );
1941
1942                            $folderUser = trim( substr( $tmp_folder_id[1], 0, $folderUser ) );
1943
1944                            $Permission = true;
1945
1946                            if( $folderUser != "INBOX" && $folderUser != "" )
1947                            {
1948                               $Permission = imap_getacl( $mbox_stream, $folderUser );
1949                            }
1950
1951                            if( $Permission )
1952                            {
1953                                $tmp_folder_id[1] = mb_convert_encoding( $tmp_folder_id[1], "ISO-8859-1", "UTF7-IMAP" );
1954
1955                                if( $tmp_folder_id[1]=='INBOX'.$this->imap_delimiter.'decifradas')
1956                                {
1957                                        continue;
1958                                }
1959                                $result[$i]['folder_unseen'] = $status->unseen;
1960                                $folder_id = $tmp_folder_id[1];
1961                                $result[$i]['folder_id'] = $folder_id;
1962
1963                                $tmp_folder_parent = explode($this->imap_delimiter, $folder_id);
1964                                $result[$i]['folder_name'] = array_pop($tmp_folder_parent);
1965                                $result[$i]['folder_name'] = $result[$i]['folder_name'] == 'INBOX' ? 'Inbox' : $result[$i]['folder_name'];
1966                       
1967                                if ($uid2cn && substr($folder_id,0,4) == 'user') {
1968                                        //$this->ldap = new ldap_functions();
1969                                        if ($cn = $this->ldap->uid2cn($result[$i]['folder_name'])) {
1970                                                $result[$i]['folder_name'] = $cn;
1971                                        }
1972                                }
1973
1974                                $tmp_folder_parent = implode($this->imap_delimiter, $tmp_folder_parent);
1975                                $result[$i]['folder_parent'] = $tmp_folder_parent == 'INBOX' ? '' : $tmp_folder_parent;
1976
1977                                if (($val->attributes == 32) && ($result[$i]['folder_name'] != 'Inbox'))
1978                                        $result[$i]['folder_hasChildren'] = 1;
1979                                else
1980                                        $result[$i]['folder_hasChildren'] = 0;
1981
1982                                switch ($tmp_folder_id[1]) {
1983                                        case $inbox:
1984                                        case $sent:
1985                                        case $drafts:
1986                                        case $spam:
1987                                        case $trash:
1988                                                $resultDefault[]=$result[$i];
1989                                                break;
1990                                        default:
1991                                                $resultMine[]=$result[$i];
1992                                }
1993
1994                            }
1995                            $i++;
1996                        }
1997                }
1998
1999                if ( $params && !$params['noQuotaInfo'] ) {
2000                        //Get quota info of current folder
2001                        $current_folder = "INBOX";
2002                        if($params && $params['folder'])
2003                                $current_folder = $params['folder'];
2004
2005                        $arr_quota_info = $this->get_quota(array('folder_id' => $current_folder));
2006                } else {
2007                        $arr_quota_info = array();
2008                }
2009
2010                // Sorting resultMine
2011                foreach ($resultMine as $folder_info)
2012                {
2013                        $array_tmp[] = $folder_info['folder_id'];
2014                }
2015
2016                natcasesort($array_tmp);
2017               
2018                $result2 = array();
2019
2020                foreach ($array_tmp as $key => $folder_id)
2021                {
2022                        $result2[] = $resultMine[$key];
2023                }
2024               
2025                // Sorting resultDefault
2026                foreach ($resultDefault as $key => $folder_id)
2027                {
2028                        switch ($resultDefault[$key]['folder_id']) {
2029                                case $inbox:
2030                                        $resultDefault2[0] = $resultDefault[$key];
2031                                        break;
2032                                case $sent:
2033                                        $resultDefault2[1] = $resultDefault[$key];
2034                                        break;
2035                                case $drafts:
2036                                        $resultDefault2[2] = $resultDefault[$key];
2037                                        break;
2038                                case $spam:
2039                                        $resultDefault2[3] = $resultDefault[$key];
2040                                        break;
2041                                case $trash:
2042                                        $resultDefault2[4] = $resultDefault[$key];
2043                                        break;
2044                        }
2045                }
2046               
2047                if ( $params && $params['folderType'] && $params['folderType'] == 'default' )
2048                        return array_merge($resultDefault2, $arr_quota_info);
2049
2050                if ( $params && $params['folderType'] && $params['folderType'] == 'personal' )
2051                        return array_merge($result2, $arr_quota_info);
2052
2053                // Merge default folders and personal
2054                $result2 = array_merge($resultDefault2, $result2);
2055               
2056                return array_merge($result2, $arr_quota_info);
2057        }
2058
2059        function create_mailbox($arr)
2060        {
2061                $namebox        = $arr['newp'];
2062                $mbox_stream = $this->open_mbox();
2063                $imap_server = $_SESSION['phpgw_info']['expressomail']['email_server']['imapServer'];
2064                $namebox =  mb_convert_encoding($namebox, "UTF7-IMAP", "UTF-8");
2065
2066                $result = "Ok";
2067                if(!imap_createmailbox($mbox_stream,"{".$imap_server."}$namebox"))
2068                {
2069                        $result = implode("<br />\n", imap_errors());
2070                }
2071
2072                if($mbox_stream)
2073                        imap_close($mbox_stream);
2074
2075                return $result;
2076
2077        }
2078
2079        function create_extra_mailbox($arr)
2080        {
2081                $nameboxs = explode(";",$arr['nw_folders']);
2082                $result = "";
2083                $mbox_stream = $this->open_mbox();
2084                $imap_server = $_SESSION['phpgw_info']['expressomail']['email_server']['imapServer'];
2085                foreach($nameboxs as $key=>$tmp){
2086                        if($tmp != ""){
2087                                if(!imap_createmailbox($mbox_stream,imap_utf7_encode("{".$imap_server."}$tmp"))){
2088                                        $result = implode("<br />\n", imap_errors());
2089                                        if($mbox_stream)
2090                                                imap_close($mbox_stream);
2091                                        return $result;
2092                                }
2093                        }
2094                }
2095                if($mbox_stream)
2096                        imap_close($mbox_stream);
2097                return true;
2098        }
2099
2100        function delete_mailbox($arr)
2101        {
2102                $namebox = $arr['del_past'];
2103                $imap_server = $_SESSION['phpgw_info']['expressomail']['email_server']['imapServer'];
2104                $mbox_stream = $this->mbox ? $this->mbox : $this->open_mbox();
2105                //$del_folder = imap_deletemailbox($mbox_stream,"{".$imap_server."}INBOX.$namebox");
2106
2107                $result = "Ok";
2108                $namebox = mb_convert_encoding($namebox, "UTF7-IMAP","UTF-8");
2109                if(!imap_deletemailbox($mbox_stream,"{".$imap_server."}$namebox"))
2110                {
2111                        $result = implode("<br />\n", imap_errors());
2112                }
2113                /*
2114                if($mbox_stream)
2115                        imap_close($mbox_stream);
2116                */
2117                return $result;
2118        }
2119
2120        function ren_mailbox($arr)
2121        {
2122                $namebox = $arr['current'];
2123                $new_box = $arr['rename'];
2124                $imap_server = $_SESSION['phpgw_info']['expressomail']['email_server']['imapServer'];
2125                $mbox_stream = $this->open_mbox();
2126                //$ren_folder = imap_renamemailbox($mbox_stream,"{".$imap_server."}INBOX.$namebox","{".$imap_server."}INBOX.$new_box");
2127
2128                $result = "Ok";
2129                $namebox = mb_convert_encoding($namebox, "UTF7-IMAP","UTF-8");
2130                $new_box = mb_convert_encoding($new_box, "UTF7-IMAP","UTF-8");
2131
2132                if(!imap_renamemailbox($mbox_stream,"{".$imap_server."}$namebox","{".$imap_server."}$new_box"))
2133                {
2134                        $result = imap_errors();
2135                }
2136                if($mbox_stream)
2137                        imap_close($mbox_stream);
2138                return $result;
2139
2140        }
2141
2142        function get_num_msgs($params)
2143        {
2144                $folder = $params['folder'];
2145                if(!$this->mbox || !is_resource($this->mbox)) {
2146                        $this->mbox = $this->open_mbox($folder);
2147                        if(!$this->mbox || !is_resource($this->mbox))
2148                        return imap_last_error();
2149                }
2150                $num_msgs = imap_num_msg($this->mbox);
2151                if($this->mbox && is_resource($this->mbox))
2152                        imap_close($this->mbox);
2153
2154                return $num_msgs;
2155        }
2156
2157        function folder_exists($folder){
2158                $mbox =  $this->open_mbox();
2159                $serverString = "{".$this->imap_server.":".$this->imap_port.$this->imap_options."}";           
2160                $list = imap_getmailboxes($mbox,$serverString, $folder);
2161                $return = is_array($list);             
2162                imap_close($mbox);
2163                return $return;
2164        }
2165       
2166        function send_mail($params)
2167        {
2168                include_once("class.phpmailer.php");
2169                $mail = new PHPMailer();
2170                include_once("class.db_functions.inc.php");
2171                $db = new db_functions();
2172                $fromaddress = $params['input_from'] ? explode(';',$params['input_from']) : "";
2173                ##
2174                # @AUTHOR Rodrigo Souza dos Santos
2175                # @DATE 2008/09/17$fileName
2176                # @BRIEF Checks if the user has permission to send an email with the email address used.
2177                ##
2178                if ( is_array($fromaddress) && ($fromaddress[1] != $_SESSION['phpgw_info']['expressomail']['user']['email']) )
2179                {
2180                        $deny = true;
2181                        foreach( $_SESSION['phpgw_info']['expressomail']['user']['shared_mailboxes'] as $key => $val )
2182                                if ( array_key_exists('mail', $val) && $val['mail'][0] == $fromaddress[1] )
2183                                        $deny = false and end($_SESSION['phpgw_info']['expressomail']['user']['shared_mailboxes']);
2184
2185                        if ( $deny )
2186                                return "The server denied your request to send a mail, you cannot use this mail address.";
2187                }
2188
2189                $toaddress = implode(',',$db->getAddrs(explode(',',$params['input_to'])));
2190                $ccaddress = implode(',',$db->getAddrs(explode(',',$params['input_cc'])));
2191                $ccoaddress = implode(',',$db->getAddrs(explode(',',$params['input_cco'])));
2192                $replytoaddress = $params['input_replyto'];
2193                $subject = $params['input_subject'];
2194                $msg_uid = $params['msg_id'];
2195                $return_receipt = $params['input_return_receipt'];
2196                $is_important = $params['input_important_message'];
2197        $encrypt = $params['input_return_cripto'];
2198                $signed = $params['input_return_digital'];
2199
2200                if($params['smime'])
2201        {
2202            $body = $params['smime'];
2203            $mail->SMIME = true;
2204            // A MSG assinada deve ser testada neste ponto.
2205            // Testar o certificado e a integridade da msg....
2206            include_once(dirname( __FILE__ ) ."/../../security/classes/CertificadoB.php");
2207            $erros_acumulados = '';
2208            $certificado = new certificadoB();
2209            $validade = $certificado->verificar($body);
2210            if(!$validade)
2211            {
2212                foreach($certificado->erros_ssl as $linha_erro)
2213                {
2214                    $erros_acumulados .= $linha_erro;
2215                }
2216            }
2217            else
2218            {
2219                // Testa o CERTIFICADO: se o CPF  he o do usuario logado, se  pode assinar msgs e se  nao esta expirado...
2220                if ($certificado->apresentado)
2221                {
2222                    if($certificado->dados['EXPIRADO']) $erros_acumulados .='Certificado expirado.';
2223                    $this->cpf = isset($GLOBALS['phpgw_info']['server']['certificado_atributo_cpf'])&&$GLOBALS['phpgw_info']['server']['certificado_atributo_cpf']!=''?$_SESSION['phpgw_info']['expressomail']['user'][$GLOBALS['phpgw_info']['server']['certificado_atributo_cpf']]:$this->username;
2224                    if($certificado->dados['CPF'] != $this->cpf) $erros_acumulados .=' CPF no certificado diferente do logado no expresso.';
2225                    if(!($certificado->dados['KEYUSAGE']['digitalSignature'] && $certificado->dados['EXTKEYUSAGE']['emailProtection'])) $erros_acumulados .=' Certificado nao permite assinar mensagens.';
2226                }
2227                else
2228                {
2229                    $$erros_acumulados .= 'Nao foi possivel usar o certificado para assinar a msg';
2230                }
2231            }
2232            if(!$erros_acumulados =='')
2233            {
2234                return $erros_acumulados;
2235            }
2236        }
2237        else
2238        {
2239            $body = $params['body'];
2240            //Compatibilização com Outlook, ao encaminhar a mensagem
2241            $body = mb_ereg_replace('<!--\[','<!-- [',$body);
2242        }
2243                //echo "<script language=\"javascript\">javascript:alert('".$body."');</script>";
2244                $attachments = $_FILES;
2245                $forwarding_attachments = $params['forwarding_attachments'];
2246                $local_attachments = $params['local_attachments'];
2247
2248                //Test if must be saved in shared folder and change if necessary
2249                if( $fromaddress[2] == 'y' ){
2250                        //build shared folder path
2251                        $newfolder = "user".$this->imap_delimiter.$fromaddress[3].$this->imap_delimiter.$this->imap_sentfolder;
2252                        if( $this->folder_exists($newfolder) ) $folder = $newfolder;
2253                        else $folder =  $params['folder'];                     
2254                } else  {
2255                        $folder = $params['folder'];                   
2256                }
2257               
2258                $folder = mb_convert_encoding($folder, "UTF7-IMAP","ISO_8859-1");
2259                $folder_name = $params['folder_name'];
2260                // Fix problem with cyrus delimiter changes.
2261                // Dots in names: enabled/disabled.
2262                $folder = @eregi_replace("INBOX/", "INBOX".$this->imap_delimiter, $folder);
2263                $folder = @eregi_replace("INBOX.", "INBOX".$this->imap_delimiter, $folder);
2264                // End Fix.
2265                if ($folder != 'null'){
2266                        $mail->SaveMessageInFolder = $folder;
2267                }
2268////////////////////////////////////////////////////////////////////////////////////////////////////
2269                $mail->SMTPDebug = false;
2270
2271                if($signed && !$params['smime'])
2272                {
2273            $mail->Mailer = "smime";
2274                        $mail->SignedBody = true;
2275                }
2276                else
2277            $mail->IsSMTP();
2278
2279                $mail->Host = $_SESSION['phpgw_info']['expressomail']['email_server']['smtpServer'];
2280                $mail->Port = $_SESSION['phpgw_info']['expressomail']['email_server']['smtpPort'];
2281                $mail->From = $_SESSION['phpgw_info']['expressomail']['user']['email'];
2282                $mail->FromName = $_SESSION['phpgw_info']['expressomail']['user']['fullname'];
2283                if($fromaddress){
2284                        $mail->Sender = $mail->From;
2285                        $mail->SenderName = $mail->FromName;
2286                        $mail->FromName = $fromaddress[0];
2287                        $mail->From = $fromaddress[1];
2288                }
2289
2290                $this->add_recipients("to", $toaddress, &$mail);
2291                $this->add_recipients("cc", $ccaddress, &$mail);
2292                $allow = $_SESSION['phpgw_info']['server']['expressomail']['allow_hidden_copy'];
2293                 
2294                                if( $allow )
2295                                {
2296                                    $this->add_recipients("cco", $ccoaddress, &$mail);
2297                                }
2298                $mail->AddReplyTo($replytoaddress);
2299                $mail->Subject = $subject;
2300                $mail->IsHTML( ( array_key_exists( 'type', $params ) && in_array( strtolower( $params[ 'type' ] ), array( 'html', 'plain' ) ) ) ? strtolower( $params[ 'type' ] ) != 'plain' : true );
2301                $mail->Body = $body;
2302
2303        if (($encrypt && $signed && $params['smime']) || ($encrypt && !$signed))        // a msg deve ser enviada cifrada...
2304                {
2305                        $email = $this->add_recipients_cert($toaddress . ',' . $ccaddress. ',' .$ccoaddress);
2306            $email = explode(",",$email);
2307            // Deve ser testado se foram obtidos os certificados de todos os destinatarios.
2308            // Deve ser verificado um numero limite de destinatarios.
2309            // Deve ser verificado se os certificados sao validos.
2310            // Se uma das verificacoes falhar, nao enviar o e-mail e avisar o usuario.
2311            // O array $mail->Certs_crypt soh deve ser preenchido se os certificados passarem nas verificacoes.
2312            $numero_maximo = $_SESSION['phpgw_info']['user']['preferences']['expressoMail']['num_max_certs_to_cipher'];  // Este valor dever ser configurado pelo administrador do site ....
2313            $erros_acumulados = "";
2314            $aux_mails = array();
2315            $mail_list = array();
2316            if(count($email) > $numero_maximo)
2317            {
2318                $erros_acumulados .= "Excedido o numero maximo (" . $numero_maximo . ") de destinatarios para uma msg cifrada...." . chr(0x0A);
2319                return $erros_acumulados;
2320            }
2321            // adiciona o email do remetente. eh para cifrar a msg para ele tambem. Assim vai poder visualizar a msg na pasta enviados..
2322            $email[] = $_SESSION['phpgw_info']['expressomail']['user']['email'];
2323            foreach($email as $item)
2324            {
2325                $certificate = $db->get_certificate(strtolower($item));
2326                if(!$certificate)
2327                {
2328                    $erros_acumulados .= "Chamada com parametro invalido.  e-Mail nao pode ser vazio." . chr(0x0A);
2329                    return $erros_acumulados;
2330                }
2331
2332                if (array_key_exists("dberr1", $certificate))
2333                {
2334
2335                    $erros_acumulados .= "Ocorreu um erro quando pesquisava certificados dos destinatarios para cifrar a msg." . chr(0x0A);
2336                    return $erros_acumulados;
2337                                }
2338                if (array_key_exists("dberr2", $certificate))
2339                {
2340                    $erros_acumulados .=  $item . ' : Nao  pode cifrar a msg. Certificado nao localizado.' . chr(0x0A);
2341                    //continue;
2342                }
2343                        /*  Retirado este teste para evitar mensagem de erro duplicada.
2344                if (!array_key_exists("certs", $certificate))
2345                {
2346                        $erros_acumulados .=  $item . ' : Nao  pode cifrar a msg. Certificado nao localizado.' . chr(0x0A);
2347                    continue;
2348                }
2349            */
2350                include_once(dirname( __FILE__ ) ."/../../security/classes/CertificadoB.php");
2351
2352                foreach ($certificate['certs'] as $registro)
2353                {
2354                    $c1 = new certificadoB();
2355                    $c1->certificado($registro['chave_publica']);
2356                    if ($c1->apresentado)
2357                    {
2358                        $c2 = new Verifica_Certificado($c1->dados,$registro['chave_publica']);
2359                        if (!$c1->dados['EXPIRADO'] && !$c2->revogado && $c2->status)
2360                        {
2361                            $aux_mails[] = $registro['chave_publica'];
2362                            $mail_list[] = strtolower($item);
2363                        }
2364                        else
2365                        {
2366                            if ($c1->dados['EXPIRADO'] || $c2->revogado)
2367                            {
2368                                $db->update_certificate($c1->dados['SERIALNUMBER'],$c1->dados['EMAIL'],$c1->dados['AUTHORITYKEYIDENTIFIER'],
2369                                    $c1->dados['EXPIRADO'],$c2->revogado);
2370                            }
2371
2372                            $erros_acumulados .= $item . ':  ' . $c2->msgerro . chr(0x0A);
2373                            foreach($c2->erros_ssl as $linha)
2374                            {
2375                                $erros_acumulados .=  $linha . chr(0x0A);
2376                            }
2377                            $erros_acumulados .=  'Emissor: ' . $c1->dados['EMISSOR'] . chr(0x0A);
2378                            $erros_acumulados .=  $c1->dados['CRLDISTRIBUTIONPOINTS'] . chr(0x0A);
2379                        }
2380                    }
2381                    else
2382                    {
2383                        $erros_acumulados .= $item . ' : Nao  pode cifrar a msg. Certificado invalido.' . chr(0x0A);
2384                    }
2385                }
2386                if(!(in_array(strtolower($item),$mail_list)) && !empty($erros_acumulados))
2387                                {
2388                                        return $erros_acumulados;
2389                        }
2390            }
2391
2392            $mail->Certs_crypt = $aux_mails;
2393        }
2394                // Build CID images
2395                $this->buildEmbeddedImages($mail,$msg_uid,$forwarding_attachments);
2396
2397                //      Build Uploading Attachments!!!
2398                if (count($attachments)>0) //Caso seja forward normal...
2399                {
2400                        $total_uploaded_size = 0;
2401                        $upload_max_filesize = str_replace("M","",$_SESSION['phpgw_info']['user']['preferences']['expressoMail']['max_attachment_size']) * 1024 * 1024;
2402                        foreach ($attachments as $attach)
2403                        {
2404                                if($attach['error'] == UPLOAD_ERR_INI_SIZE)
2405                                    return $this->parse_error("message file too big");
2406                                if($attach['name']=='Unknown')
2407                                        continue;
2408                                $mail->AddAttachment($attach['tmp_name'], $attach['name'], "base64", $this->get_file_type($attach['name']));  // optional name
2409                                $total_uploaded_size = $total_uploaded_size + $attach['size'];
2410                        }
2411                        if( $total_uploaded_size > $upload_max_filesize){
2412                                return $this->parse_error("message file too big");
2413                        }
2414                }
2415                if(count($local_attachments)>0) { //Caso seja forward de mensagens locais
2416
2417                        $total_uploaded_size = 0;
2418                        $upload_max_filesize = str_replace("M","",ini_get('upload_max_filesize')) * 1024 * 1024;
2419                        foreach($local_attachments as $local_attachment) {
2420                                $file_description = unserialize(rawurldecode($local_attachment));
2421                                $tmp = array_values($file_description);
2422                                foreach($file_description as $i => $descriptor){
2423                                        $tmp[$i]  = eregi_replace('\'*\'','',$descriptor);
2424                                }
2425                                $mail->AddAttachment($_FILES[$tmp[1]]['tmp_name'], $tmp[2], "base64", $this->get_file_type($tmp[2]));  // optional name
2426                                $total_uploaded_size = $total_uploaded_size + $_FILES[$tmp[1]]['size'];
2427                        }
2428                        if( $total_uploaded_size > $upload_max_filesize)
2429                                return 'false';
2430                }
2431////////////////////////////////////////////////////////////////////////////////////////////////////
2432                //      Build Forwarding Attachments!!!
2433                if (count($forwarding_attachments) > 0)
2434                {
2435                        // Bug fixed for array_search function
2436                        $name_cid_files = array();
2437                        if(count($name_cid_files) > 0) {
2438                                $name_cid_files[count($name_cid_files)] = $name_cid_files[0];
2439                                $name_cid_files[0] = null;
2440                        }
2441
2442                        foreach($forwarding_attachments as $forwarding_attachment)
2443                        {
2444                                        $file_description = unserialize(rawurldecode($forwarding_attachment));
2445                                        $tmp = array_values($file_description);
2446                                        foreach($file_description as $i => $descriptor){
2447                                                $tmp[$i]  = eregi_replace('\'*\'','',$descriptor);
2448                                        }
2449                                        $file_description = $tmp;
2450                                        $fileContent = $this->get_forwarding_attachment($file_description[0], $file_description[1], $file_description[3],$file_description[4]);
2451                                        $fileName = $file_description[2];
2452                                        if(!array_search(trim($fileName),$name_cid_files)) {
2453                                                $mail->AddStringAttachment($fileContent,html_entity_decode(rawurldecode($fileName)), $file_description[4], $this->get_file_type($file_description[2]));
2454                                }
2455                        }
2456                }
2457
2458////////////////////////////////////////////////////////////////////////////////////////////////////
2459                // Important message
2460                if($is_important)
2461                        $mail->isImportant();
2462
2463////////////////////////////////////////////////////////////////////////////////////////////////////
2464                // Disposition-Notification-To
2465                if ($return_receipt)
2466                        $mail->ConfirmReadingTo = $_SESSION['phpgw_info']['expressomail']['user']['email'];
2467////////////////////////////////////////////////////////////////////////////////////////////////////
2468
2469                $sent = $mail->Send();
2470
2471                if(!$sent)
2472                {
2473                        return $this->parse_error($mail->ErrorInfo);
2474                }
2475                else
2476                {
2477            if ($signed && !$params['smime'])
2478                        {
2479                                return $sent;
2480                        }
2481                        if($_SESSION['phpgw_info']['server']['expressomail']['expressoMail_enable_log_messages'] == "True")
2482                        {
2483                                $userid = $_SESSION['phpgw_info']['expressomail']['user']['userid'];
2484                                $userip = $_SESSION['phpgw_info']['expressomail']['user']['session_ip'];
2485                                $now = date("d/m/y H:i:s");
2486                                $addrs = $toaddress.$ccaddress.$ccoaddress;
2487                                $sent = trim($sent);
2488                                error_log("$now - $userip - $sent [$subject] - $userid => $addrs\r\n", 3, "/home/expressolivre/mail_senders.log");
2489                        }
2490                        if($_SESSION['phpgw_info']['user']['preferences']['expressoMail']['number_of_contacts'] &&
2491                           $_SESSION['phpgw_info']['user']['preferences']['expressoMail']['use_dynamic_contacts']) {
2492                                $contacts = new dynamic_contacts();
2493                                $new_contacts = $contacts->add_dynamic_contacts($toaddress.",".$ccaddress.",".$ccoaddress);
2494                                return array("success" => true, "new_contacts" => $new_contacts);
2495                        }
2496                        return array("success" => true);
2497                }
2498        }
2499       
2500       
2501        /**
2502        * @license   http://www.gnu.org/copyleft/gpl.html GPL
2503        * @author    Consórcio Expresso Livre - 4Linux (www.4linux.com.br) e Prognus Software Livre (www.prognus.com.br)
2504        * @param     $mail email
2505        * @param     $msg_uid uid da mensagem
2506        * @param     $forwarding_attachments anexos
2507        */
2508        function buildEmbeddedImages(&$mail,$msg_uid,&$forwarding_attachments)
2509        {
2510                //      Build CID for embedded Images!!!
2511                $pattern = '/src="([^"]*?show_embedded_attach.php\?msg_folder=(.+)?&(amp;)?msg_num=(.+)?&(amp;)?msg_part=(.+)?)"/isU';
2512                $cid_imgs = '';
2513                preg_match_all($pattern,$mail->Body,$cid_imgs,PREG_PATTERN_ORDER);
2514                $cid_array = array();
2515
2516                foreach($cid_imgs[6] as $j => $val){
2517                        if ( !array_key_exists($cid_imgs[4][$j].$val, $cid_array) )
2518                        {
2519                                $cid_array[$cid_imgs[4][$j].$val] = base_convert(microtime(), 10, 36);
2520                        }
2521                        $cid = $cid_array[$cid_imgs[4][$j].$val]; 
2522
2523                        $mail->Body = str_replace($cid_imgs[1][$j], "cid:".$cid, $mail->Body);
2524
2525                        $count    = strlen($cid_imgs[6][$j]);
2526                        $position = substr($cid_imgs[6][$j], 2, $count);
2527                        $position--;
2528                                       
2529                        $attach_img = $forwarding_attachments[$position];
2530                        $file_description = unserialize(rawurldecode($attach_img));
2531                       
2532                        if (is_array($file_description))
2533                                foreach($file_description as $i => $descriptor)                         
2534                                        $file_description[$i]  = eregi_replace('\'*\'','',$descriptor);
2535
2536                        // The image is not in the same mail?
2537                        if ($msg_uid != $cid_imgs[4][$j])
2538                        {
2539                                $fileContent = $this->get_forwarding_attachment($cid_imgs[2][$j], $cid_imgs[4][$j], $cid_imgs[6][$j], 'base64');
2540                                $fileName = ($msg_uid != 'undefined') ? "image_".($j).".jpg" : $file_description[2];
2541                                $fileCode = "base64";
2542                                $fileType = "image/jpg";
2543                                $file_attached[0] = $cid_imgs[2][$j];
2544                                $file_attached[1] = $cid_imgs[4][$j];
2545                                $file_attached[2] = $fileName;
2546                                $file_attached[3] = '0.'.($j+1);
2547                                $file_attached[4] = 'base64';
2548                                $file_attached[5] = strlen($fileContent); //Size of file
2549                                $file_attached[6] = $cid_imgs[6][$j];
2550                                $return_forward[] = $file_attached;
2551
2552                                if ($file_attached[3] == $file_description[3] || $msg_uid == 'undefined')
2553                                        unset($forwarding_attachments[$position]);
2554                               
2555                        }
2556                        else
2557                        {
2558                                $fileContent = $this->get_forwarding_attachment($file_description[0], $msg_uid, $file_description[3], 'base64');
2559                                $fileName = $file_description[2];
2560                                $fileCode = $file_description[4];
2561                                $file_description[3] = '0.'.($j+1);
2562                                $file_description[6] = $cid_imgs[6][$j];
2563                                $fileType = $this->get_file_type($file_description[2]);
2564                                unset($forwarding_attachments[$position]);
2565                                if (!empty($file_description))
2566                                {
2567                                        $file_description[5] = strlen($fileContent); //Size of file
2568                                        $return_forward[] = $file_description;
2569                                }
2570                        }
2571                        $tempDir = '/tmp';
2572                        $file = "cidimage_".$_SESSION[ 'phpgw_session' ][ 'session_id' ].$cid_imgs[6][$j].".dat";                                       
2573                        $f = fopen($tempDir.'/'.$file,"w");
2574                        fputs($f,$fileContent);
2575                        fclose($f);
2576
2577                        if ($fileContent)
2578                                $mail->AddEmbeddedImage($tempDir.'/'.$file, $cid, $fileName, $fileCode, $fileType);
2579                }
2580
2581                return $return_forward;
2582        }
2583        function add_recipients_cert($full_address)
2584        {
2585                $result = "";
2586                $parse_address = imap_rfc822_parse_adrlist($full_address, "");
2587                foreach ($parse_address as $val)
2588                {
2589                        //echo "<script language=\"javascript\">javascript:alert('".$val->mailbox."@".$val->host."');</script>";
2590                        if ($val->mailbox == "INVALID_ADDRESS")
2591                                continue;
2592                        if ($val->mailbox == "UNEXPECTED_DATA_AFTER_ADDRESS")
2593                                continue;
2594                        if (empty($val->personal))
2595                                $result .= $val->mailbox."@".$val->host . ",";
2596                        else
2597                                $result .= $val->mailbox."@".$val->host . ",";
2598                }
2599
2600                return substr($result,0,-1);
2601        }
2602
2603        function add_recipients($recipient_type, $full_address, $mail)
2604        {
2605                //remove a comma if is given two unexpected commas
2606                $full_address = preg_replace("/, ?,/",",",$full_address);
2607                $parse_address = imap_rfc822_parse_adrlist($full_address, "");
2608                foreach ($parse_address as $val)
2609                {
2610                        //echo "<script language=\"javascript\">javascript:alert('".$val->mailbox."@".$val->host."');</script>";
2611                        if ($val->mailbox == "INVALID_ADDRESS")
2612                                continue;
2613
2614                        if (empty($val->personal))
2615                        {
2616                                switch($recipient_type)
2617                                {
2618                                        case "to":
2619                                                $mail->AddAddress($val->mailbox."@".$val->host);
2620                                                break;
2621                                        case "cc":
2622                                                $mail->AddCC($val->mailbox."@".$val->host);
2623                                                break;
2624                                        case "cco":
2625                                                $mail->AddBCC($val->mailbox."@".$val->host);
2626                                                break;
2627                                }
2628                        }
2629                        else
2630                        {
2631                                switch($recipient_type)
2632                                {
2633                                        case "to":
2634                                                $mail->AddAddress($val->mailbox."@".$val->host, $val->personal);
2635                                                break;
2636                                        case "cc":
2637                                                $mail->AddCC($val->mailbox."@".$val->host, $val->personal);
2638                                                break;
2639                                        case "cco":
2640                                                $mail->AddBCC($val->mailbox."@".$val->host, $val->personal);
2641                                                break;
2642                                }
2643                        }
2644                }
2645                return true;
2646        }
2647
2648        function get_forwarding_attachment($msg_folder, $msg_number, $msg_part, $encoding)
2649        {
2650            include_once $_SESSION['rootPath'].'/expressoMail1_2/inc/class.attachment.inc.php';
2651            $attachment = new attachment();
2652            $attachment->setStructureFromMail($msg_folder, $msg_number);
2653            return $attachment->getAttachment($msg_part);
2654        }
2655
2656        function del_last_caracter($string)
2657        {
2658                $string = substr($string,0,(strlen($string) - 1));
2659                return $string;
2660        }
2661
2662        function del_last_two_caracters($string)
2663        {
2664                $string = substr($string,0,(strlen($string) - 2));
2665                return $string;
2666        }
2667
2668        function messages_sort($sort_box_type,$sort_box_reverse, $search_box_type,$offsetBegin,$offsetEnd)
2669        {
2670                if ($sort_box_type != "SORTFROM" && $search_box_type!= "FLAGGED"){
2671                        $imapsort = imap_sort($this->mbox,constant($sort_box_type),$sort_box_reverse,SE_UID,$search_box_type);
2672                        foreach($imapsort as $iuid)
2673                                $sort[$iuid] = "";
2674                       
2675                        if ($offsetBegin == -1 && $offsetEnd ==-1 )
2676                                $slice_array = false;
2677                        else
2678                                $slice_array = true;
2679                }
2680                else
2681                {
2682                        $sort = array();
2683                        if ($offsetBegin > $offsetEnd) {$temp=$offsetEnd; $offsetEnd=$offsetBegin; $offsetBegin=$temp;}
2684                        $num_msgs = imap_num_msg($this->mbox);
2685                        if ($offsetEnd >  $num_msgs) {$offsetEnd = $num_msgs;}
2686                        $slice_array = true;
2687
2688                        for ($i=$num_msgs; $i>0; $i--)
2689                        {
2690                                if ($sort_box_type == "SORTARRIVAL" && $sort_box_reverse && count($sort) >= $offsetEnd)
2691                                        break;
2692                                $iuid = @imap_uid($this->mbox,$i);
2693                                $header = $this->get_header($iuid);
2694                                // List UNSEEN messages.
2695                                if($search_box_type == "UNSEEN" &&  (!trim($header->Recent) && !trim($header->Unseen))){
2696                                        continue;
2697                                }
2698                                // List SEEN messages.
2699                                elseif($search_box_type == "SEEN" && (trim($header->Recent) || trim($header->Unseen))){
2700                                        continue;
2701                                }
2702                                // List ANSWERED messages.
2703                                elseif($search_box_type == "ANSWERED" && !trim($header->Answered)){
2704                                        continue;
2705                                }
2706                                // List FLAGGED messages.
2707                                elseif($search_box_type == "FLAGGED" && !trim($header->Flagged)){
2708                                        continue;
2709                                }
2710
2711                                if($sort_box_type=='SORTFROM') {
2712                                        if (($header->from[0]->mailbox . "@" . $header->from[0]->host) == $_SESSION['phpgw_info']['expressomail']['user']['email'])
2713                                                $from = $header->to;
2714                                        else
2715                                                $from = $header->from;
2716
2717                                        $tmp = imap_mime_header_decode($from[0]->personal);
2718
2719                                        if ($tmp[0]->text != "")
2720                                                $sort[$iuid] = $tmp[0]->text;
2721                                        else
2722                                                $sort[$iuid] = $from[0]->mailbox . "@" . $from[0]->host;
2723                                }
2724                                else if($sort_box_type=='SORTSUBJECT') {
2725                                        $sort[$iuid] = $header->subject;
2726                                }
2727                                else if($sort_box_type=='SORTSIZE') {
2728                                        $sort[$iuid] = $header->Size;
2729                                }
2730                                else {
2731                                        $sort[$iuid] = $header->udate;
2732                                }
2733
2734                        }
2735                        natcasesort($sort);
2736
2737                        if ($sort_box_reverse)
2738                                $sort = array_reverse($sort,true);
2739                }
2740
2741                if(!is_array($sort))
2742                        $sort = array();
2743
2744
2745                if ($slice_array)
2746                        $sort = array_slice($sort,$offsetBegin-1,$offsetEnd-($offsetBegin-1),true);
2747
2748
2749                return $sort;
2750
2751        }
2752
2753
2754        function move_search_messages($params){
2755                $params['selected_messages'] = urldecode($params['selected_messages']);
2756                $params['new_folder'] = urldecode($params['new_folder']);
2757                $params['new_folder_name'] = urldecode($params['new_folder_name']);
2758                $sel_msgs = explode(",", $params['selected_messages']);
2759                @reset($sel_msgs);
2760                $sorted_msgs = array();
2761                foreach($sel_msgs as $idx => $sel_msg) {
2762                        $sel_msg = explode(";", $sel_msg);
2763                         if(array_key_exists($sel_msg[0], $sorted_msgs)){
2764                                $sorted_msgs[$sel_msg[0]] .= ",".$sel_msg[1];
2765                         }
2766                         else {
2767                                $sorted_msgs[$sel_msg[0]] = $sel_msg[1];
2768                         }
2769                }
2770                @ksort($sorted_msgs);
2771                $last_return = false;
2772                foreach($sorted_msgs as $folder => $msgs_number) {
2773                        $params['msgs_number'] = $msgs_number;
2774                        $params['folder'] = $folder;
2775                        if($params['new_folder'] && $folder != $params['new_folder']){
2776                                $last_return = $this -> move_messages($params);
2777                        }
2778                        elseif(!$params['new_folder'] || $params['delete'] ){
2779                                $last_return = $this -> delete_msgs($params);
2780                                $last_return['deleted'] = true;
2781                        }
2782                }
2783                return $last_return;
2784        }
2785
2786        function move_messages($params)
2787        {
2788                $folder = $params['folder'];
2789                $mbox_stream = $this->open_mbox($folder);
2790                $newmailbox = ($params['new_folder']);
2791                $newmailbox = mb_convert_encoding($newmailbox, "UTF7-IMAP","ISO_8859-1");
2792                $new_folder_name = $params['new_folder_name'];
2793                $msgs_number = $params['msgs_number'];
2794                $return = array('msgs_number' => $msgs_number,
2795                                                'folder' => $folder,
2796                                                'new_folder_name' => $new_folder_name,
2797                                                'border_ID' => $params['border_ID'],
2798                                                'status' => true); //Status foi adicionado para validar as permissoes ACL
2799
2800                //Este bloco tem a finalidade de averiguar as permissoes para pastas compartilhadas
2801        if (substr($folder,0,4) == 'user'){
2802                $acl = $this->getacltouser($folder);
2803                /*
2804                 *   l - lookup (mailbox is visible to LIST/LSUB commands)
2805                 *   r - read (SELECT the mailbox, perform CHECK, FETCH, PARTIAL, SEARCH, COPY from mailbox)
2806                 *   s - keep seen/unseen information across sessions (STORE SEEN flag)
2807                 *   w - write (STORE flags other than SEEN and DELETED)
2808                 *   i - insert (perform APPEND, COPY into mailbox)
2809                 *   p - post (send mail to submission address for mailbox, not enforced by IMAP4 itself)
2810                 *   c - create (CREATE new sub-mailboxes in any implementation-defined hierarchy)
2811                 *   d - delete (STORE DELETED flag, perform EXPUNGE)
2812                 *   a - administer (perform SETACL)
2813                        */
2814                        if (strpos($acl, "d") === false){
2815                                $return['status'] = false;
2816                                return $return;
2817                        }
2818        }
2819        //Este bloco tem a finalidade de transformar o CPF das pastas compartilhadas em common name
2820        if ($_SESSION['phpgw_info']['user']['preferences']['expressoMail']['uid2cn']){
2821            if (substr($new_folder_name,0,4) == 'user'){
2822                $this->ldap = new ldap_functions();
2823                $tmp_folder_name = explode($this->imap_delimiter, $new_folder_name);
2824                $return['new_folder_name'] = array_pop($tmp_folder_name);
2825                if( $cn = $this->ldap->uid2cn($return['new_folder_name']))
2826                {
2827                    $return['new_folder_name'] = $cn;
2828                }
2829            }
2830        }
2831
2832                // Caso estejamos no box principal, nao eh necessario pegar a informacao da mensagem anterior.
2833                if (($params['get_previous_msg']) && ($params['border_ID'] != 'null') && ($params['border_ID'] != ''))
2834                {
2835                        $return['previous_msg'] = $this->get_info_previous_msg($params);
2836                        // Fix problem in unserialize function JS.
2837                        $return['previous_msg']['body'] = str_replace(array('{','}'), array('&#123;','&#125;'), $return['previous_msg']['body']);
2838                }
2839
2840                $mbox_stream = $this->open_mbox($folder);
2841                if(imap_mail_move($mbox_stream, $msgs_number, $newmailbox, CP_UID)) {
2842                        imap_expunge($mbox_stream);
2843                        if($mbox_stream)
2844                                imap_close($mbox_stream);
2845                        return $return;
2846                }else {
2847                        if(strstr(imap_last_error(),'Over quota')) {
2848                                $accountID      = $_SESSION['phpgw_info']['expressomail']['email_server']['imapAdminUsername'];
2849                                $pass           = $_SESSION['phpgw_info']['expressomail']['email_server']['imapAdminPW'];
2850                                $userID         = $_SESSION['phpgw_info']['expressomail']['user']['userid'];
2851                                $server         = $_SESSION['phpgw_info']['expressomail']['email_server']['imapServer'];
2852                                $mbox           = @imap_open("{".$this->imap_server.":".$this->imap_port.$this->imap_options."}INBOX", $accountID, $pass) or die(serialize(array('imap_error' => $this->parse_error(imap_last_error()))));
2853                                if(!$mbox)
2854                                        return imap_last_error();
2855                                $quota  = imap_get_quotaroot($mbox_stream, "INBOX");
2856                                if(! imap_set_quota($mbox, "user".$this->imap_delimiter.$userID, 2.1 * $quota['usage'])) {
2857                                        if($mbox_stream)
2858                                                imap_close($mbox_stream);
2859                                        if($mbox)
2860                                                imap_close($mbox);
2861                                        return "move_messages(): Error setting quota for MOVE or DELETE!! ". "user".$this->imap_delimiter.$userID." line ".__LINE__."\n";
2862                                }
2863                                if(imap_mail_move($mbox_stream, $msgs_number, $newmailbox, CP_UID)) {
2864                                        imap_expunge($mbox_stream);
2865                                        if($mbox_stream)
2866                                                imap_close($mbox_stream);
2867                                        // return to original quota limit.
2868                                        if(!imap_set_quota($mbox, "user".$this->imap_delimiter.$userID, $quota['limit'])) {
2869                                                if($mbox)
2870                                                        imap_close($mbox);
2871                                                return "move_messages(): Error setting quota for MOVE or DELETE!! line ".__LINE__."\n";
2872                                        }
2873                                        return $return;
2874                                }
2875                                else {
2876                                        if($mbox_stream)
2877                                                imap_close($mbox_stream);
2878                                        if(!imap_set_quota($mbox, "user".$this->imap_delimiter.$userID, $quota['limit'])) {
2879                                                if($mbox)
2880                                                        imap_close($mbox);
2881                                                return "move_messages(): Error setting quota for MOVE or DELETE!! line ".__LINE__."\n";
2882                                        }
2883                                        return imap_last_error();
2884                                }
2885
2886                        }
2887                        else {
2888                                if($mbox_stream)
2889                                        imap_close($mbox_stream);
2890                                return "move_messages() line ".__LINE__.": ". imap_last_error()." folder:".$newmailbox;
2891                        }
2892                }
2893        }
2894
2895        function save_msg($params)
2896        {
2897
2898                include_once("class.phpmailer.php");
2899                $mail = new PHPMailer();
2900                include_once("class.db_functions.inc.php");
2901                $toaddress = $params['input_to'];
2902                $ccaddress = $params['input_cc'];
2903                $ccoaddress = $params['input_cco'];
2904                $return_receipt = $params['input_return_receipt'];
2905                $is_important = $params['input_important_message'];
2906                $subject = $params['input_subject'];
2907                $msg_uid = $params['msg_id'];
2908                $body = $params['body'];
2909                $body = str_replace("%nbsp;","&nbsp;",$body);
2910                $body = preg_replace("/\n/"," ",$body);
2911                $body = preg_replace("/\r/","",$body);
2912                $forwarding_attachments = $params['forwarding_attachments'];
2913                $attachments = $params['FILES'];
2914                $return_files = $params['FILES'];
2915
2916                if(is_array($params['local_attachments'])){
2917                    foreach ($params['local_attachments'] as $key => $local_attach) {
2918                       $tmp = unserialize(urldecode($local_attach));
2919                       $attachments[$key]['name'] = $tmp[2];
2920                       $return_files[$key]['name'] = $tmp[2];
2921                    }
2922                }
2923
2924
2925                $folder = $params['folder'];
2926                $folder = mb_convert_encoding($folder, "UTF7-IMAP","ISO_8859-1");
2927                // Fix problem with cyrus delimiter changes.
2928                // Dots in names: enabled/disabled.
2929                $folder = @eregi_replace("INBOX/", "INBOX".$this->imap_delimiter, $folder);
2930                $folder = @eregi_replace("INBOX.", "INBOX".$this->imap_delimiter, $folder);
2931                // End Fix.
2932
2933                $mail->SaveMessageInFolder = $folder;
2934                $mail->SMTPDebug = false;
2935
2936                $mail->IsSMTP();
2937                $mail->Host = $_SESSION['phpgw_info']['expressomail']['email_server']['smtpServer'];
2938                $mail->Port = $_SESSION['phpgw_info']['expressomail']['email_server']['smtpPort'];
2939                $mail->From = $_SESSION['phpgw_info']['expressomail']['user']['email'];
2940                $mail->FromName = $_SESSION['phpgw_info']['expressomail']['user']['fullname'];
2941
2942                $mail->Sender = $mail->From;
2943                $mail->SenderName = $mail->FromName;
2944                $mail->FromName = $_SESSION['phpgw_info']['expressomail']['user']['fullname'];
2945                $mail->From =  $_SESSION['phpgw_info']['expressomail']['user']['email'];
2946
2947                $this->add_recipients("to", $toaddress, &$mail);
2948                $this->add_recipients("cc", $ccaddress, &$mail);
2949                $this->add_recipients("cco", $ccoaddress, &$mail);
2950                $mail->AddReplyTo($replytoaddress);
2951                $mail->Subject = $subject;
2952                $mail->IsHTML(true);
2953                $mail->Body = $body;
2954               
2955                $return_forward = $this->buildEmbeddedImages($mail,$msg_uid,$forwarding_attachments);
2956                $imagesParts = array();
2957
2958                foreach ($return_forward as $value)
2959                        $imagesParts[$value[6]] = $value[3];   
2960
2961        //      Build Forwarding Attachments!!!
2962                        foreach($forwarding_attachments as $forwarding_attachment)
2963                        {
2964                                $file_description = unserialize(rawurldecode($forwarding_attachment));
2965                        $file_description = array_values($file_description);
2966                                       
2967                                foreach($file_description as $i => $descriptor){
2968                                                        $file_description[$i] = eregi_replace('\'*\'','',$descriptor);
2969                                }
2970                                $fileContent = $this->get_forwarding_attachment($file_description[0], $file_description[1], $file_description[3],$file_description[4]);
2971                                $fileName = $file_description[2];
2972
2973                                $file_description[5] = strlen($fileContent); //Size of file
2974                                $return_forward[] = $file_description;
2975
2976                                        $mail->AddStringAttachment($fileContent, $fileName, $file_description[4], $this->get_file_type($file_description[2]));
2977                        }
2978
2979                if ((count($return_forward) > 0) && (count($return_files) > 0))
2980                {
2981                        $return_files = array_merge_recursive($return_forward,$return_files);
2982                }
2983                else if (count($return_files) < 1)
2984                {
2985                                $return_files = $return_forward;
2986                }
2987
2988                //      Build Uploading Attachments!!!
2989                $sizeof_attachments = count($attachments);
2990                if ($sizeof_attachments)
2991                {
2992                        foreach ($attachments as $numb => $attach)
2993                        {
2994                                if ($numb == ($sizeof_attachments-1) && $params['insertImg'] == 'true')
2995                                { // Auto-resize image
2996                                        list($width, $height,$image_type) = getimagesize($attach['tmp_name']);
2997                                        switch ($image_type)
2998                                        {
2999                                        // Do not corrupt animated gif
3000                                        //case 1: $image_big = imagecreatefromgif($attach['tmp_name']);break;
3001                                                case 2:
3002                                                        $image_big = imagecreatefromjpeg($attach['tmp_name']);  break;
3003                                                case 3:
3004                                                        $image_big = imagecreatefrompng($attach['tmp_name']); break;
3005                                        case 6:
3006                                                require_once("gd_functions.php");
3007                                                $image_big = imagecreatefrombmp($attach['tmp_name']); break;
3008                                        default:
3009                                                $mail->AddAttachment($attach['tmp_name'], $attach['name'], "base64", $this->get_file_type($attach['name']));
3010                                                break;
3011                                        }
3012                                        header('Content-type: image/jpeg');
3013                                        $max_resolution = $_SESSION['phpgw_info']['user']['preferences']['expressoMail']['image_size'];
3014                                        $max_resolution = ($max_resolution==""?'65536':$max_resolution);
3015                                        if ($width < $max_resolution && $height < $max_resolution)
3016                                        {
3017                                                $new_width = $width;
3018                                                $new_height = $height;
3019                                        }
3020                                        else if ($width > $max_resolution)
3021                                        {
3022                                                $new_width = $max_resolution;
3023                                                $new_height = $height*($new_width/$width);
3024                                        }
3025                                        else
3026                                        {
3027                                                $new_height = $max_resolution;
3028                                                $new_width = $width*($new_height/$height);
3029                                        }
3030                                        $image_new = imagecreatetruecolor($new_width, $new_height);
3031                                        imagecopyresampled($image_new, $image_big, 0, 0, 0, 0, $new_width, $new_height, $width, $height);
3032                                        $tmpDir = '/tmp';
3033
3034                                       // $tmpDir = ini_get("session.save_path");
3035                                        $_file = "/cidimage_".$_SESSION[ 'phpgw_session' ][ 'session_id' ].".dat";
3036                                        imagejpeg($image_new,$tmpDir.$_file, 85);
3037                                        $mail->AddAttachment($tmpDir.$_file, $attach['name'], "base64", $this->get_file_type($tmpDir.$_file));
3038                                }else{
3039                                        $mail->AddAttachment($attach['tmp_name'], $attach['name'], "base64", $this->get_file_type($attach['name']));
3040                                }// optional name
3041                        }
3042                }
3043
3044                if(!empty($mail->AltBody))
3045            $mail->ContentType = "multipart/alternative";
3046
3047                $mail->error_count = 0; // reset errors
3048                $mail->SetMessageType();
3049                $header = $mail->CreateHeader();
3050                $body = $mail->CreateBody();
3051
3052                $mbox_stream = $this->open_mbox($folder);
3053                $new_header = str_replace("\n", "\r\n", $header);
3054                $new_body = str_replace("\n", "\r\n", $body);
3055                $return['append'] = imap_append($mbox_stream, "{".$this->imap_server.":".$this->imap_port."}".$folder, $new_header . $new_body, "\\Seen \\Draft");
3056                $status = imap_status($mbox_stream, "{".$this->imap_server.":".$this->imap_port."}".$folder, SA_UIDNEXT);
3057                $return['msg_no'] = $status->uidnext - 1;
3058                $return['folder_id'] = $folder;
3059                $return['imagesParts'] = $imagesParts;
3060
3061                if($mbox_stream)
3062                        imap_close($mbox_stream);
3063                       
3064                if (is_array($return_files))
3065                {
3066                        foreach ($return_files as $index => $_attachment)
3067                        {
3068                                if (array_key_exists("name", $_attachment))
3069                                {
3070                                unset($return_files[$index]);
3071                                $return_files[$index] = $_attachment['name']."_SIZE_".$return_files[$index][1] = $_attachment['size'];
3072                        }
3073                        else
3074                        {
3075                                unset($return_files[$index]);
3076                                $return_files[$index] = $_attachment[2]."_SIZE_". $return_files[$index][1] = $_attachment[5];
3077                        }
3078                }
3079                }
3080
3081                $return['files'] = serialize($return_files);
3082                $return["subject"] = $subject;
3083
3084                if (!$return['append'])
3085                        $return['append'] = imap_last_error();
3086
3087                return $return;
3088        }
3089
3090        function set_messages_flag($params)
3091        {
3092                $folder = $params['folder'];
3093                $msgs_to_set = $params['msgs_to_set'];
3094                $flag = $params['flag'];
3095                $return = array();
3096                $return["msgs_to_set"] = $msgs_to_set;
3097                $return["flag"] = $flag;
3098
3099                if(!$this->mbox && !is_resource($this->mbox))
3100                        $this->mbox = $this->open_mbox($folder);
3101
3102                if ($flag == "unseen")
3103                        $return["status"] = imap_clearflag_full($this->mbox, $msgs_to_set, "\\Seen", ST_UID);
3104                elseif ($flag == "seen")
3105                        $return["status"] = imap_setflag_full($this->mbox, $msgs_to_set, "\\Seen", ST_UID);
3106                elseif ($flag == "answered"){
3107                        $return["status"] = imap_setflag_full($this->mbox, $msgs_to_set, "\\Answered", ST_UID);
3108                        imap_clearflag_full($this->mbox, $msgs_to_set, "\\Draft", ST_UID);
3109                }
3110                elseif ($flag == "forwarded")
3111                        $return["status"] = imap_setflag_full($this->mbox, $msgs_to_set, "\\Answered \\Draft", ST_UID);
3112                elseif ($flag == "flagged")
3113                        $return["status"] = imap_setflag_full($this->mbox, $msgs_to_set, "\\Flagged", ST_UID);
3114                elseif ($flag == "unflagged") {
3115                        $flag_importance = false;
3116                        $msgs_number = explode(",",$msgs_to_set);
3117                        $unflagged_msgs = "";
3118                        foreach($msgs_number as $msg_number) {
3119                                preg_match('/importance *: *(.*)\r/i',
3120                                        imap_fetchheader($this->mbox, imap_msgno($this->mbox, $msg_number))
3121                                        ,$importance);
3122                                if(strtolower($importance[1])=="high" && $_SESSION['phpgw_info']['user']['preferences']['expressoMail']['use_important_flag']) {
3123                                        $flag_importance=true;
3124                                }
3125                                else {
3126                                        $unflagged_msgs.=$msg_number.",";
3127                                }
3128                        }
3129
3130                        if($unflagged_msgs!="") {
3131                                imap_clearflag_full($this->mbox,substr($unflagged_msgs,0,strlen($unflagged_msgs)-1), "\\Flagged", ST_UID);
3132                                $return["msgs_unflageds"] = substr($unflagged_msgs,0,strlen($unflagged_msgs)-1);
3133                        }
3134                        else {
3135                                $return["msgs_unflageds"] = false;
3136                        }
3137
3138                        if($flag_importance && $_SESSION['phpgw_info']['user']['preferences']['expressoMail']['use_important_flag']) {
3139                                $return["status"] = false;
3140                                $return["msg"] = $this->functions->getLang("At least one of selected message cant be marked as normal");
3141                        }
3142                        else {
3143                                $return["status"] = true;
3144                        }
3145                }
3146
3147                if($this->mbox && is_resource($this->mbox))
3148                        imap_close($this->mbox);
3149                return $return;
3150        }
3151
3152        function get_file_type($file_name)
3153        {
3154                $file_name = strtolower($file_name);
3155                $strFileType = strrev(substr(strrev($file_name),0,4));
3156                if ($strFileType == ".asf")
3157                        return "video/x-ms-asf";
3158                if ($strFileType == ".avi")
3159                        return "video/avi";
3160                if ($strFileType == ".doc")
3161                        return "application/msword";
3162                if ($strFileType == ".zip")
3163                        return "application/zip";
3164                if ($strFileType == ".xls")
3165                        return "application/vnd.ms-excel";
3166                if ($strFileType == ".gif")
3167                        return "image/gif";
3168                if ($strFileType == ".jpg" || $strFileType == "jpeg")
3169                        return "image/jpeg";
3170                if ($strFileType == ".png")
3171                        return "image/png";
3172                if ($strFileType == ".wav")
3173                        return "audio/wav";
3174                if ($strFileType == ".mp3")
3175                        return "audio/mpeg3";
3176                if ($strFileType == ".mpg" || $strFileType == "mpeg")
3177                        return "video/mpeg";
3178                if ($strFileType == ".rtf")
3179                        return "application/rtf";
3180                if ($strFileType == ".htm" || $strFileType == "html")
3181                        return "text/html";
3182                if ($strFileType == ".xml")
3183                        return "text/xml";
3184                if ($strFileType == ".xsl")
3185                        return "text/xsl";
3186                if ($strFileType == ".css")
3187                        return "text/css";
3188                if ($strFileType == ".php")
3189                        return "text/php";
3190                if ($strFileType == ".asp")
3191                        return "text/asp";
3192                if ($strFileType == ".pdf")
3193                        return "application/pdf";
3194                if ($strFileType == ".txt")
3195                        return "text/plain";
3196                if ($strFileType == ".wmv")
3197                        return "video/x-ms-wmv";
3198                if ($strFileType == ".sxc")
3199                        return "application/vnd.sun.xml.calc";
3200                if ($strFileType == ".stc")
3201                        return "application/vnd.sun.xml.calc.template";
3202                if ($strFileType == ".sxd")
3203                        return "application/vnd.sun.xml.draw";
3204                if ($strFileType == ".std")
3205                        return "application/vnd.sun.xml.draw.template";
3206                if ($strFileType == ".sxi")
3207                        return "application/vnd.sun.xml.impress";
3208                if ($strFileType == ".sti")
3209                        return "application/vnd.sun.xml.impress.template";
3210                if ($strFileType == ".sxm")
3211                        return "application/vnd.sun.xml.math";
3212                if ($strFileType == ".sxw")
3213                        return "application/vnd.sun.xml.writer";
3214                if ($strFileType == ".sxq")
3215                        return "application/vnd.sun.xml.writer.global";
3216                if ($strFileType == ".stw")
3217                        return "application/vnd.sun.xml.writer.template";
3218
3219
3220                return "application/octet-stream";
3221        }
3222
3223        function htmlspecialchars_encode($str)
3224        {
3225                return  str_replace( array('&', '"','\'','<','>','{','}'), array('&amp;','&quot;','&#039;','&lt;','&gt;','&#123;','&#125;'), $str);
3226        }
3227        function htmlspecialchars_decode($str)
3228        {
3229                return  str_replace( array('&amp;','&quot;','&#039;','&lt;','&gt;','&#123;','&#125;'), array('&', '"','\'','<','>','{','}'), $str);
3230        }
3231
3232        function get_msgs($folder, $sort_box_type, $search_box_type, $sort_box_reverse,$offsetBegin = 0,$offsetEnd = 0)
3233        {
3234                if(!$this->mbox || !is_resource($this->mbox))
3235                        $this->mbox = $this->open_mbox($folder);
3236
3237                return $this->messages_sort($sort_box_type,$sort_box_reverse, $search_box_type,$offsetBegin,$offsetEnd);
3238        }
3239
3240        function get_info_next_msg($params)
3241        {
3242                $msg_number = $params['msg_number'];
3243                $folder = $params['msg_folder'];
3244                $sort_box_type = $params['sort_box_type'];
3245                $sort_box_reverse = $params['sort_box_reverse'];
3246                $reuse_border = $params['reuse_border'];
3247                $search_box_type = $params['search_box_type'] != "ALL" && $params['search_box_type'] != "" ? $params['search_box_type'] : false;
3248                $sort_array_msg = $this -> get_msgs($folder, $sort_box_type, $search_box_type, $sort_box_reverse);
3249
3250                $success = false;
3251                if (is_array($sort_array_msg))
3252                {
3253                        foreach ($sort_array_msg as $i => $value){
3254                                if ($value == $msg_number)
3255                                {
3256                                        $success = true;
3257                                        break;
3258                                }
3259                        }
3260                }
3261
3262                if (! $success || $i >= sizeof($sort_array_msg)-1)
3263                {
3264                        $params['status'] = 'false';
3265                        $params['command_to_exec'] = "delete_border('". $reuse_border ."');";
3266                        return $params;
3267                }
3268
3269                $params = array();
3270                $params['msg_number'] = $sort_array_msg[($i+1)];
3271                $params['msg_folder'] = $folder;
3272
3273                $return = $this->get_info_msg($params);
3274                $return["reuse_border"] = $reuse_border;
3275                return $return;
3276        }
3277
3278        function get_info_previous_msg($params)
3279        {
3280                $msg_number = $params['msgs_number'];
3281                $folder = $params['folder'];
3282                $sort_box_type = $params['sort_box_type'];
3283                $sort_box_reverse = $params['sort_box_reverse'];
3284                $reuse_border = $params['reuse_border'];
3285                $search_box_type = $params['search_box_type'] != "ALL" && $params['search_box_type'] != "" ? $params['search_box_type'] : false;
3286                $sort_array_msg = $this -> get_msgs($folder, $sort_box_type, $search_box_type, $sort_box_reverse);
3287
3288                $success = false;
3289                if (is_array($sort_array_msg))
3290                {
3291                        foreach ($sort_array_msg as $i => $value){
3292                                if ($value == $msg_number)
3293                                {
3294                                        $success = true;
3295                                        break;
3296                                }
3297                        }
3298                }
3299                if (! $success || $i == 0)
3300                {
3301                        $params['status'] = 'false';
3302                        $params['command_to_exec'] = "delete_border('". $reuse_border ."');";
3303                        return $params;
3304                }
3305
3306                $params = array();
3307                $params['msg_number'] = $sort_array_msg[($i-1)];
3308                $params['msg_folder'] = $folder;
3309
3310                $return = $this->get_info_msg($params);
3311                $return["reuse_border"] = $reuse_border;
3312                return $return;
3313        }
3314
3315        // This function updates the values: quota, paging and new messages menu.
3316        function get_menu_values($params){
3317                $return_array = array();
3318                $return_array = $this->get_quota($params);
3319
3320                $mbox_stream = $this->open_mbox($params['folder']);
3321                $return_array['num_msgs'] = imap_num_msg($mbox_stream);
3322                if($mbox_stream)
3323                        imap_close($mbox_stream);
3324
3325                return $return_array;
3326        }
3327
3328        function get_quota($params){
3329                // folder_id = user/{uid} for shared folders
3330                if(substr($params['folder_id'],0,5) != 'INBOX' && preg_match('/user\\'.$this->imap_delimiter.'/i', $params['folder_id'])){
3331                        $array_folder =  explode($this->imap_delimiter,$params['folder_id']);
3332                        $folder_id = "user".$this->imap_delimiter.$array_folder[1];
3333                }
3334                // folder_id = INBOX for inbox folders
3335                else
3336                        $folder_id = "INBOX";
3337
3338                if(!$this->mbox || !is_resource($this->mbox))
3339                        $this->mbox = $this->open_mbox();
3340
3341                $quota = imap_get_quotaroot($this->mbox, $folder_id);
3342                if($this->mbox && is_resource($this->mbox))
3343                        imap_close($this->mbox);
3344
3345                if (!$quota){
3346                        return array(
3347                                'quota_percent' => 0,
3348                                'quota_used' => 0,
3349                                'quota_limit' =>  0
3350                        );
3351                }
3352
3353                if(count($quota) && $quota['limit']) {
3354                        $quota_limit = $quota['limit'];
3355                        $quota_used  = $quota['usage'];
3356                        if($quota_used >= $quota_limit)
3357                        {
3358                                $quotaPercent = 100;
3359                        }
3360                        else
3361                        {
3362                        $quotaPercent = ($quota_used / $quota_limit)*100;
3363                        $quotaPercent = (($quotaPercent)* 100 + .5 )* .01;
3364                        }
3365                        return array(
3366                                'quota_percent' => floor($quotaPercent),
3367                                'quota_used' => $quota_used,
3368                                'quota_limit' =>  $quota_limit
3369                        );
3370                }
3371                else
3372                        return array();
3373        }
3374
3375        function send_notification($params){
3376                include("../header.inc.php");
3377                require_once("class.phpmailer.php");
3378                $mail = new PHPMailer();
3379
3380                $toaddress = $params['notificationto'];
3381
3382                $subject = lang("Read receipt: %1",$params['subject']);
3383                $body = lang("Your message: %1",$params['subject']) . '<br>';
3384                $body .= lang("Received in: %1",date("d/m/Y H:i",$params['date'])) . '<br>';
3385                $body .= lang("Has been read by: %1 &lt; %2 &gt; at %3", $_SESSION['phpgw_info']['expressomail']['user']['fullname'], $_SESSION['phpgw_info']['expressomail']['user']['email'], date("d/m/Y H:i"));
3386                $mail->SMTPDebug = false;
3387                $mail->IsSMTP();
3388                $mail->Host = $_SESSION['phpgw_info']['expressomail']['email_server']['smtpServer'];
3389                $mail->Port = $_SESSION['phpgw_info']['expressomail']['email_server']['smtpPort'];
3390                $mail->From = $_SESSION['phpgw_info']['expressomail']['user']['email'];
3391                $mail->FromName = $_SESSION['phpgw_info']['expressomail']['user']['fullname'];
3392                $mail->AddAddress($toaddress);
3393                $mail->Subject = $this->htmlspecialchars_decode($subject);
3394
3395                $mail->IsHTML(true);
3396                $mail->Body = $body;
3397
3398                if(!$mail->Send()){
3399                        return $mail->ErrorInfo;
3400                }
3401                else
3402                        return true;
3403        }
3404
3405        function empty_folder($params)
3406        {
3407                $folder = 'INBOX' . $this->imap_delimiter . $_SESSION['phpgw_info']['expressomail']['email_server'][$params['clean_folder']];
3408                $mbox_stream = $this->open_mbox($folder);
3409                $return = imap_delete($mbox_stream,'1:*');
3410                if($mbox_stream)
3411                        imap_close($mbox_stream, CL_EXPUNGE);
3412                return $return;
3413        }
3414
3415        function search($params)
3416        {
3417                include("class.imap_attachment.inc.php");
3418                $imap_attachment = new imap_attachment();
3419                $criteria = $params['criteria'];
3420                $return = array();
3421                $folders = $this->get_folders_list();
3422
3423                $j = 0;
3424                foreach($folders as $folder)
3425                {
3426                        $mbox_stream = $this->open_mbox($folder);
3427                        $messages = imap_search($mbox_stream, $criteria, SE_UID);
3428
3429                        if ($messages == '')
3430                                continue;
3431
3432                        $i = 0;
3433                        $return[$j] = array();
3434                        $return[$j]['folder_name'] = $folder['name'];
3435
3436                        foreach($messages as $msg_number)
3437                        {
3438                                $header = $this->get_header($msg_number);
3439                                if (!is_object($header))
3440                                        return false;
3441
3442                                $return[$j][$i]['msg_folder']   = $folder['name'];
3443                                $return[$j][$i]['msg_number']   = $msg_number;
3444                                $return[$j][$i]['Recent']               = $header->Recent;
3445                                $return[$j][$i]['Unseen']               = $header->Unseen;
3446                                $return[$j][$i]['Answered']     = $header->Answered;
3447                                $return[$j][$i]['Deleted']              = $header->Deleted;
3448                                $return[$j][$i]['Draft']                = $header->Draft;
3449                                $return[$j][$i]['Flagged']              = $header->Flagged;
3450
3451                                $date_msg = gmdate("d/m/Y",$header->udate);
3452                                if (gmdate("d/m/Y") == $date_msg)
3453                                        $return[$j][$i]['udate'] = gmdate("H:i",$header->udate);
3454                                else
3455                                        $return[$j][$i]['udate'] = $date_msg;
3456
3457                                $fromaddress = imap_mime_header_decode($header->fromaddress);
3458                                $return[$j][$i]['fromaddress'] = '';
3459                                foreach ($fromaddress as $tmp)
3460                                        $return[$j][$i]['fromaddress'] .= $this->replace_maior_menor($tmp->text);
3461
3462                                $from = $header->from;
3463                                $return[$j][$i]['from'] = array();
3464                                $tmp = imap_mime_header_decode($from[0]->personal);
3465                                $return[$j][$i]['from']['name'] = $tmp[0]->text;
3466                                $return[$j][$i]['from']['email'] = $from[0]->mailbox . "@" . $from[0]->host;
3467                                $return[$j][$i]['from']['full'] ='"' . $return[$j][$i]['from']['name'] . '" ' . '<' . $return[$j][$i]['from']['email'] . '>';
3468
3469                                $to = $header->to;
3470                                $return[$j][$i]['to'] = array();
3471                                $tmp = imap_mime_header_decode($to[0]->personal);
3472                                $return[$j][$i]['to']['name'] = $tmp[0]->text;
3473                                $return[$j][$i]['to']['email'] = $to[0]->mailbox . "@" . $to[0]->host;
3474                                $return[$j][$i]['to']['full'] ='"' . $return[$i]['to']['name'] . '" ' . '<' . $return[$i]['to']['email'] . '>';
3475
3476                                $subject = imap_mime_header_decode($header->fetchsubject);
3477                                $return[$j][$i]['subject'] = '';
3478                                foreach ($subject as $tmp)
3479                                        $return[$j][$i]['subject'] .= $tmp->text;
3480
3481                                $return[$j][$i]['Size'] = $header->Size;
3482                                $return[$j][$i]['reply_toaddress'] = $header->reply_toaddress;
3483
3484                                $return[$j][$i]['attachment'] = array();
3485                                $return[$j][$i]['attachment'] = $imap_attachment->get_attachment_headerinfo($mbox_stream, $msg_number);
3486
3487                                $i++;
3488                        }
3489                        $j++;
3490                        if($mbox_stream)
3491                                imap_close($mbox_stream);
3492                }
3493
3494                return $return;
3495        }
3496
3497
3498        function mobile_search($params)
3499        {
3500                include("class.imap_attachment.inc.php");
3501                $imap_attachment = new imap_attachment();
3502                $criterias = array ("TO","SUBJECT","FROM","CC");
3503                $return = array();
3504                if(!isset($params['folder'])) {
3505                        $folder_params = array("noSharedFolders"=>1);
3506                        if(isset($params['folderType']))
3507                                $folder_params['folderType'] = $params['folderType'];
3508                        $folders = $this->get_folders_list($folder_params);
3509                }
3510                else
3511                        $folders = array(0=>array('folder_id'=>$params['folder']));
3512                $num_msgs = 0;
3513                $max_msgs = $params['max_msgs'] + 1; //get one more because mobile paginate
3514                $return["msgs"] = array();
3515               
3516                //get max_msgs of each folder order by date and later order all messages together and retur only max_msgs msgs
3517                foreach($folders as $id =>$folder)
3518                {
3519                        if(strpos($folder['folder_id'],'user')===false && is_array($folder)) {
3520                                foreach($criterias as $criteria_fixed)
3521                                {
3522                                        $_filter = $criteria_fixed . ' "'.$params['filter'].'"';
3523
3524                                        $mbox_stream = $this->open_mbox($folder['folder_id']);
3525
3526                                        $messages = imap_sort($mbox_stream,SORTARRIVAL,1,SE_UID,$_filter);
3527                                       
3528                                        if ($messages == ''){
3529                                                if($mbox_stream)
3530                                                        imap_close($mbox_stream);
3531                                                continue;       
3532                                        }
3533                                       
3534                                        foreach($messages as $msg_number)
3535                                        {
3536                                                $temp = $this->get_info_head_msg($msg_number);
3537                                                if(!$temp)
3538                                                        return false;
3539                                                $temp['msg_folder'] = $folder['folder_id'];
3540                                                $return["msgs"][$num_msgs] = $temp;
3541                                                $num_msgs++;
3542                                        }
3543
3544                                        if($mbox_stream)
3545                                                imap_close($mbox_stream);
3546                                }
3547                        }
3548                }
3549
3550                if(!function_exists("cmp_date")) {
3551                        function cmp_date($obj1, $obj2){
3552                    if($obj1['timestamp'] == $obj2['timestamp']) return 0;
3553                    return ($obj1['timestamp'] < $obj2['timestamp']) ? 1 : -1;
3554                        }
3555                }
3556                usort($return["msgs"], "cmp_date");
3557                $return["has_more_msg"] = (sizeof($return["msgs"]) > $max_msgs);
3558                $return["msgs"] = array_slice($return["msgs"], 0, $max_msgs);
3559                $return["msgs"]['num_msgs'] = $num_msgs;
3560               
3561                return $return;
3562        }
3563
3564        function delete_and_show_previous_message($params)
3565        {
3566                $return = $this->get_info_previous_msg($params);
3567
3568                $params_tmp1 = array();
3569                $params_tmp1['msgs_to_delete'] = $params['msg_number'];
3570                $params_tmp1['folder'] = $params['msg_folder'];
3571                $return_tmp1 = $this->delete_msg($params_tmp1);
3572
3573                $return['msg_number_deleted'] = $return_tmp1;
3574
3575                return $return;
3576        }
3577
3578
3579        function automatic_trash_cleanness($params)
3580        {
3581                $before_date = date("m/d/Y", strtotime("-".$params['before_date']." day"));
3582                $criteria =  'BEFORE "'.$before_date.'"';
3583                $mbox_stream = $this->open_mbox('INBOX'.$this->imap_delimiter.$_SESSION['phpgw_info']['expressomail']['email_server']['imapDefaultTrashFolder']);
3584                // Free others requests
3585                session_write_close();
3586                $messages = imap_search($mbox_stream, $criteria, SE_UID);
3587                if (is_array($messages)){
3588                        foreach ($messages as $msg_number){
3589                                imap_delete($mbox_stream, $msg_number, FT_UID);
3590                        }
3591                }
3592                if($mbox_stream)
3593                        imap_close($mbox_stream, CL_EXPUNGE);
3594                return $messages;
3595        }
3596//      Fix the search problem with special characters!!!!
3597        function remove_accents($string) {
3598                return strtr($string,
3599                "?Ó??ó?Ý?úÁÀÃÂÄÇÉÈÊËÍÌ?ÎÏÑÕÔÓÒÖÚÙ?ÛÜ?áàãâäçéèêëíì?îïñóòõôöúù?ûüýÿ",
3600                "SOZsozYYuAAAAACEEEEIIIIINOOOOOUUUUUsaaaaaceeeeiiiiinooooouuuuuyy");
3601        }
3602
3603        function make_search_date($date,$before = false){
3604
3605            //TODO: Adaptar a data de acordo com o locale do sistema.
3606            list($day,$month,$year) = explode("/", $date);
3607            $before?$day=(int)$day+1:$day=(int)$day;
3608            $timestamp = mktime(0,0,0,(int)$month,$day,(int)$year);
3609            $search_date = date('d-M-Y',$timestamp);
3610            return $search_date;
3611
3612        }
3613
3614        function search_msg( $params = false )
3615        {
3616                $mbox_stream = "";
3617               
3618                if(strpos($params['condition'],"#")===false)
3619                { //local messages
3620                        $search=false;
3621                }
3622                else
3623                {
3624                        $search = explode(",",$params['condition']);
3625                }
3626               
3627                $params['page'] = $params['page'] * 1;
3628
3629            if( is_array($search) )
3630            {
3631                        $search = array_unique($search); // Remove duplicated folders
3632                        $search_criteria = '';
3633                        $search_result_number = $_SESSION['phpgw_info']['user']['preferences']['expressoMail']['search_result_number'];
3634                        foreach($search as $tmp)
3635                        {
3636                                $tmp1 = explode("##",$tmp);
3637                                $sum = 0;
3638                                $name_box = $tmp1[0];
3639                                unset($filter);
3640                                foreach($tmp1 as $index => $criteria)
3641                                {
3642                                        if ($index != 0 && strlen($criteria) != 0)
3643                                        {
3644                                                $filter_array = explode("<=>",html_entity_decode(rawurldecode($criteria)));
3645                                                $filter .= " ".$filter_array[0];
3646                                                if (strlen($filter_array[1]) != 0)
3647                                                {
3648                                                        if ( trim($filter_array[0]) != 'BEFORE' &&
3649                                                                 trim($filter_array[0]) != 'SINCE' &&
3650                                                                 trim($filter_array[0]) != 'ON')
3651                                                        {
3652                                                            $filter .= '"'.$filter_array[1].'"';
3653                                                        }
3654                                                        if(trim($filter_array[0]) == 'BEFORE' )
3655                                                        {
3656                                                            $filter .= '"'.$this->make_search_date($filter_array[1],true).'"';
3657                                                        }else{
3658                                                            $filter .= '"'.$this->make_search_date($filter_array[1]).'"';
3659                                                        }
3660                                                }
3661                                        }
3662                                }
3663                               
3664                                $name_box = mb_convert_encoding(utf8_decode($name_box), "UTF7-IMAP", "ISO_8859-1" );
3665                                $filter = $this->remove_accents($filter);
3666
3667                                //Este bloco tem a finalidade de transformar o login (quando numerico) das pastas compartilhadas em common name
3668                                if ($_SESSION['phpgw_info']['user']['preferences']['expressoMail']['uid2cn'] && substr($name_box,0,4) == 'user')
3669                                {
3670                                        $folder_name = explode($this->imap_delimiter,$name_box);
3671                                        $this->ldap = new ldap_functions();
3672                                       
3673                                        if ($cn = $this->ldap->uid2cn($folder_name[1]))
3674                                        {
3675                                                $folder_name[1] = $cn;
3676                                        }
3677                                        $folder_name = implode($this->imap_delimiter,$folder_name);
3678                                }
3679                                else
3680                                        $folder_name = mb_convert_encoding(utf8_decode($name_box), "UTF7-IMAP", "ISO_8859-1" );
3681                               
3682                                if(!is_resource($mbox_stream))
3683                                        $mbox_stream = $this->open_mbox($name_box);
3684                                else
3685                                        imap_reopen($mbox_stream, "{".$this->imap_server.":".$this->imap_port.$this->imap_options."}".$name_box);
3686                               
3687                                if (preg_match("/^.?\bALL\b/", $filter))
3688                                {
3689                                        // Quick Search, note: this ALL isn't the same ALL from imap_search
3690                                        $all_criterias = array ("TO","SUBJECT","FROM","CC");
3691                                           
3692                                        foreach($all_criterias as $criteria_fixed)
3693                                        {
3694                                                $_filter = $criteria_fixed . substr($filter,4);
3695                                               
3696                                                $search_criteria = imap_search($mbox_stream, $_filter, SE_UID);
3697                                               
3698                                                if(is_array($search_criteria))
3699                                                {
3700                                                        foreach($search_criteria as $new_search)
3701                                                        {
3702                                                                $elem = $this->get_msg_detail($new_search,$name_box,$mbox_stream);
3703                                                                $elem['boxname'] = mb_convert_encoding( $name_box, "ISO_8859-1", "UTF7-IMAP" );
3704                                                                $elem['uid'] = $new_search;
3705                                                                /* compare dates in ordering */
3706                                                                $elem['udatecomp'] = substr ($elem['udate'], -4) ."-". substr ($elem['udate'], 3, 2) ."-". substr ($elem['udate'], 0, 2);
3707                                                                $retorno[] = $elem;
3708                                                        }
3709                                                }
3710                                        }
3711                                }
3712                                else{
3713                                        $search_criteria = imap_search($mbox_stream, $filter, SE_UID);
3714                                        if($_SESSION['phpgw_info']['user']['preferences']['expressoMail']['use_important_flag'])
3715                                        {
3716                                            if((!strpos($filter,"FLAGGED") === false) || (!strpos($filter,"UNFLAGGED") === false))
3717                                            {
3718                                                $num_msgs = imap_num_msg($mbox_stream);
3719                                                $flagged_msgs = array();
3720                                                for ($i=$num_msgs; $i>0; $i--)
3721                                                {
3722                                                        $iuid = @imap_uid($this->mbox,$i);
3723                                                        $header = $this->get_header($iuid);
3724                                                        if(trim($header->Flagged))
3725                                                        {
3726                                                                $flagged_msgs[$i] = $iuid;
3727                                                        }
3728                                                }
3729                                                if((count($flagged_msgs) >0) && (strpos($filter,"UNFLAGGED") === false))
3730                                                {
3731                                                    $arry_diff = is_array($search_criteria) ? array_diff($flagged_msgs,$search_criteria):$flagged_msgs;
3732                                                    foreach($arry_diff as $msg)
3733                                                    {
3734                                                        $search_criteria[] = $msg;
3735                                                    }
3736                                                }
3737                                                else if((count($flagged_msgs) >0) && (is_array($search_criteria)) && (!strpos($filter,"UNFLAGGED") === false))
3738                                                {
3739                                                    $search_criteria = array_diff($search_criteria,$flagged_msgs);
3740                                                }
3741                                            }
3742                                        }
3743
3744                                        if( is_array( $search_criteria) )
3745                                        {
3746                                                foreach($search_criteria as $new_search)
3747                                                {
3748                                                        $elem = $this->get_msg_detail($new_search,$name_box,$mbox_stream);
3749                                                        $elem['boxname'] = mb_convert_encoding( $name_box, "ISO_8859-1", "UTF7-IMAP" );
3750                                                        $elem['uid'] = $new_search;
3751                                                        /* compare dates in ordering */
3752                                                        $elem['udatecomp'] = substr ($elem['udate'], -4) ."-". substr ($elem['udate'], 3, 2) ."-". substr ($elem['udate'], 0, 2);
3753                                                        $retorno[] = $elem;
3754                                                }
3755                                        }
3756                                }
3757                        }
3758                }
3759               
3760                if($mbox_stream)
3761                {
3762                        imap_close($mbox_stream);
3763            }
3764           
3765            $num_msgs = count($retorno);
3766
3767            /* Comparison functions, descendent is ascendent with parms inverted */
3768            function SORTDATE($a, $b){ return ($a['udatecomp'] < $b['udatecomp']); }
3769            function SORTDATE_REVERSE($b, $a) { return SORTDATE($a,$b); }
3770
3771            function SORTWHO($a, $b) { return (strtoupper($a['from']) > strtoupper($b['from'])); }
3772            function SORTWHO_REVERSE($b, $a) { return SORTWHO($a,$b); }
3773
3774            function SORTSUBJECT($a, $b) { return (strtoupper($a['subject']) > strtoupper($b['subject'])); }
3775            function SORTSUBJECT_REVERSE($b, $a) { return SORTSUBJECT($a,$b); }
3776
3777            function SORTBOX($a, $b) { return ($a['boxname'] > $b['boxname']); }
3778            function SORTBOX_REVERSE($b, $a) { return SORTBOX($a,$b); }
3779
3780            function SORTSIZE($a, $b) { return ($a['size'] > $b['size']); }
3781            function SORTSIZE_REVERSE($b, $a) { return SORTSIZE($a,$b); }
3782
3783            usort( $retorno, $params['sort_type']);
3784            $pageret = array_slice( $retorno, $params['page'] * $this->prefs['max_email_per_page'], $this->prefs['max_email_per_page']);
3785           
3786            $arrayRetorno['num_msgs']   =  $num_msgs;
3787            $arrayRetorno['data']               =  $pageret;
3788            $arrayRetorno['currentTab'] =  $params['current_tab'];
3789
3790                if ($pageret)
3791                {
3792                        return $arrayRetorno;
3793                }
3794                else
3795                {
3796                        return 'none';
3797                }
3798        }
3799
3800        function get_msg_detail($uid_msg,$name_box, $mbox_stream )
3801        {
3802                $header = $this->get_header($uid_msg);
3803                require_once("class.imap_attachment.inc.php");
3804                $imap_attachment = new imap_attachment();
3805                $attachments =  $imap_attachment->get_attachment_headerinfo($mbox_stream, $uid_msg);
3806                $attachments = $attachments['number_attachments'] > 0?"T".$attachments['number_attachments']:"";
3807                $flag = $header->Unseen
3808                        .$header->Recent
3809                        .$header->Flagged
3810                        .$header->Draft
3811                        .$header->Answered
3812                        .$header->Deleted
3813                        .$attachments;
3814
3815
3816                $subject = $this->decode_string($header->fetchsubject);
3817                $from = $header->from[0]->mailbox;
3818                if($header->from[0]->personal != "")
3819                        $from = $header->from[0]->personal;
3820                $ret_msg['from']        = $this->decode_string($from);
3821                $ret_msg['subject']     = $subject;
3822                $ret_msg['udate']       = gmdate("d/m/Y",$header->udate + $this->functions->CalculateDateOffset());
3823                $ret_msg['size']        = $header->Size;
3824                $ret_msg['flag']        = $flag;
3825                return $ret_msg;
3826        }
3827
3828
3829        function size_msg($size){
3830                $var = floor($size/1024);
3831                if($var >= 1){
3832                        return $var." kb";
3833                }else{
3834                        return $size ." b";
3835                }
3836        }
3837       
3838        function ob_array($the_object)
3839        {
3840           $the_array=array();
3841           if(!is_scalar($the_object))
3842           {
3843               foreach($the_object as $id => $object)
3844               {
3845                   if(is_scalar($object))
3846                   {
3847                       $the_array[$id]=$object;
3848                   }
3849                   else
3850                   {
3851                       $the_array[$id]=$this->ob_array($object);
3852                   }
3853               }
3854               return $the_array;
3855           }
3856           else
3857           {
3858               return $the_object;
3859           }
3860        }
3861
3862        function getacl()
3863        {
3864                $this->ldap = new ldap_functions();
3865
3866                $return = array();
3867                $mbox_stream = $this->open_mbox();
3868                $mbox_acl = imap_getacl($mbox_stream, 'INBOX');
3869
3870                $i = 0;
3871                foreach ($mbox_acl as $user => $acl)
3872                {
3873                        if ($user != $this->username)
3874                        {
3875                                $return[$i]['uid'] = $user;
3876                                $return[$i]['cn'] = $this->ldap->uid2cn($user);
3877                        }
3878                        $i++;
3879                }
3880                return $return;
3881        }
3882
3883        function setacl($params)
3884        {
3885                $old_users = $this->getacl();
3886                if (!count($old_users))
3887                        $old_users = array();
3888
3889                $tmp_array = array();
3890                foreach ($old_users as $index => $user_info)
3891                {
3892                        $tmp_array[$index] = $user_info['uid'];
3893                }
3894                $old_users = $tmp_array;
3895
3896                $users = unserialize($params['users']);
3897                if (!count($users))
3898                        $users = array();
3899
3900                //$add_share = array_diff($users, $old_users);
3901                $remove_share = array_diff($old_users, $users);
3902
3903                $mbox_stream = $this->open_mbox();
3904
3905                $serverString = "{".$this->imap_server.":".$this->imap_port.$this->imap_options."}";
3906                $mailboxes_list = imap_getmailboxes($mbox_stream, $serverString, "user".$this->imap_delimiter.$this->username."*");
3907
3908                /*if (count($add_share))
3909                {
3910                        foreach ($add_share as $index=>$uid)
3911                        {
3912                        if (is_array($mailboxes_list))
3913                        {
3914                        foreach ($mailboxes_list as $key => $val)
3915                        {
3916                        $folder = str_replace($serverString, "", imap_utf7_decode($val->name));
3917                                                imap_setacl ($mbox_stream, $folder, "$uid", "lrswipcda");
3918                        }
3919                        }
3920                        }
3921                }*/
3922
3923                if (count($remove_share))
3924                {
3925                        foreach ($remove_share as $index=>$uid)
3926                        {
3927                            if (is_array($mailboxes_list))
3928                            {
3929                                foreach ($mailboxes_list as $key => $val)
3930                                {
3931                                    $folder = str_replace($serverString, "", imap_utf7_decode($val->name));
3932                                    $folder = str_replace("&-", "&", $folder);
3933                                    imap_setacl ($mbox_stream, $folder, "$uid", "");
3934                                }
3935                            }
3936                        }
3937                }
3938
3939                return true;
3940        }
3941
3942        function getaclfromuser($params)
3943        {
3944                $useracl = $params['user'];
3945
3946                $return = array();
3947                $return[$useracl] = 'false';
3948                $mbox_stream = $this->open_mbox();
3949                $mbox_acl = imap_getacl($mbox_stream, 'INBOX');
3950
3951                foreach ($mbox_acl as $user => $acl)
3952                {
3953                        if (($user != $this->username) && ($user == $useracl))
3954                        {
3955                                $return[$user] = $acl;
3956                        }
3957                }
3958                return $return;
3959        }
3960
3961        function getacltouser($user)
3962        {
3963                $return = array();
3964                $mbox_stream = $this->open_mbox();
3965                //Alterado, antes era 'imap_getacl($mbox_stream, 'user'.$this->imap_delimiter.$user);
3966                //Afim de tratar as pastas compartilhadas, verificandos as permissoes de operacao sobre as mesmas
3967                //No caso de se tratar da caixa do proprio usuario logado, utiliza a sintaxe abaixo
3968                if(substr($user,0,4) != 'user')
3969                $mbox_acl = imap_getacl($mbox_stream, 'user'.$this->imap_delimiter.$user);
3970                else
3971                  $mbox_acl = imap_getacl($mbox_stream, $user);
3972                return $mbox_acl[$this->username];
3973        }
3974
3975
3976        function setaclfromuser($params)
3977        {
3978                $user = $params['user'];
3979                $acl = $params['acl'];
3980
3981                $mbox_stream = $this->open_mbox();
3982
3983                $serverString = "{".$this->imap_server.":".$this->imap_port.$this->imap_options."}";
3984                $mailboxes_list = imap_getmailboxes($mbox_stream, $serverString, "user".$this->imap_delimiter.$this->username."*");
3985
3986                if (is_array($mailboxes_list))
3987                {
3988                        foreach ($mailboxes_list as $key => $val)
3989                        {
3990                                $folder = str_replace($serverString, "", imap_utf7_encode($val->name));
3991                                $folder = str_replace("&-", "&", $folder);
3992                                if (!imap_setacl ($mbox_stream, $folder, $user, $acl))
3993                                {
3994                                        $return = imap_last_error();
3995                                }
3996                        }
3997                }
3998                if (isset($return))
3999                        return $return;
4000                else
4001                        return true;
4002        }
4003
4004        function download_attachment($msg,$msgno)
4005        {
4006                $array_parts_attachments = array();
4007                //$array_parts_attachments['names'] = '';
4008                include_once("class.imap_attachment.inc.php");
4009                $imap_attachment = new imap_attachment();
4010
4011                if (count($msg->fname[$msgno]) > 0)
4012                {
4013                        $i = 0;
4014                        foreach ($msg->fname[$msgno] as $index=>$fname)
4015                        {
4016                                $array_parts_attachments[$i]['pid'] = $msg->pid[$msgno][$index];
4017                                $array_parts_attachments[$i]['name'] = $imap_attachment->flat_mime_decode($this->decode_string($fname));
4018                                $array_parts_attachments[$i]['name'] = $array_parts_attachments[$i]['name'] ? $array_parts_attachments[$i]['name'] : "attachment.bin";
4019                                $array_parts_attachments[$i]['encoding'] = $msg->encoding[$msgno][$index];
4020                                //$array_parts_attachments['names'] .= $array_parts_attachments[$i]['name'] . ', ';
4021                                $array_parts_attachments[$i]['fsize'] = $msg->fsize[$msgno][$index];
4022                                $i++;
4023                        }
4024                }
4025                //$array_parts_attachments['names'] = substr($array_parts_attachments['names'],0,(strlen($array_parts_attachments['names']) - 2));
4026                return $array_parts_attachments;
4027        }
4028
4029       
4030        /**
4031        * @license   http://www.gnu.org/copyleft/gpl.html GPL
4032        * @author    Consórcio Expresso Livre - 4Linux (www.4linux.com.br) e Prognus Software Livre (www.prognus.com.br)
4033        * @param     $params
4034        */
4035        function spam($params)
4036        {
4037               
4038                $mbox_stream = $this->open_mbox($params['folder']);
4039                $msgs_number = explode(',',$params['msgs_number']);
4040
4041                $user = Array();
4042
4043                if(substr($params['folder'], 0, 4) == 'user')
4044                {
4045                    $ldapObject = new ldap_functions();
4046
4047                    $folderArray = Array();
4048                    $folderArray = explode($this->imap_delimiter, $params['folder']);
4049
4050                    $user['name'] = $folderArray[1];
4051                    $user['email'] = $ldapObject->getMailByUid($user['name']);
4052               
4053                }
4054                else
4055                {
4056                    $user['name'] = $this->username;
4057                    $user['email'] = $_SESSION['phpgw_info']['expressomail']['user']['email'];
4058                }
4059
4060                foreach($msgs_number as $msg_number)
4061                {
4062                        $imap_msg_number = imap_msgno($mbox_stream, $msg_number);
4063                        $header = imap_fetchheader($mbox_stream, $imap_msg_number);
4064                        $body = imap_body($mbox_stream, $imap_msg_number);
4065                        $msg = $header . $body;
4066                        strtok($user['email'], '@');
4067                        $domain = strtok('@');
4068
4069           
4070
4071                        //Encontrar a assinatura do dspam no cabecalho
4072                        $v = explode("\r\n", $header);
4073                        foreach ($v as $linha){
4074                                if (eregi("^Message-ID", $linha)) {
4075                                        $args = explode(" ", $linha);
4076                                        $msg_id = "'$args[1]'";
4077                                } elseif (eregi("^X-DSPAM-Signature", $linha)) {
4078                                        $args = explode(" ",$linha);
4079                                        $signature = $args[1];
4080                                }
4081                        }
4082
4083                        // Seleciona qual comando a ser executado
4084                        switch($params['spam']){
4085                                case 'true':  $cmd = $_SESSION['phpgw_info']['server']['expressomail']['expressoMail_command_for_spam']; break;
4086                                case 'false': $cmd = $_SESSION['phpgw_info']['server']['expressomail']['expressoMail_command_for_ham']; break;
4087                        }
4088
4089                     
4090                        $tags = array('##EMAIL##', '##USERNAME##', '##DOMAIN##', '##SIGNATURE##', '##MSGID##');
4091                        $cmd = str_replace($tags, array($user['email'], $user['name'], $domain, $signature, $msg_id), $cmd);
4092                       
4093                        system($cmd);
4094                }
4095
4096                imap_close($mbox_stream);
4097                return false;
4098        }
4099       
4100       
4101        function get_header($msg_number)
4102        {
4103                $header = @imap_headerinfo($this->mbox, imap_msgno($this->mbox, $msg_number), 80, 255);
4104                if (!is_object($header))
4105                        return false;
4106
4107                if($header->Flagged != "F" && $_SESSION['phpgw_info']['user']['preferences']['expressoMail']['use_important_flag']) {
4108                        $flag = preg_match('/importance *: *(.*)\r/i',
4109                                                imap_fetchheader($this->mbox, imap_msgno($this->mbox, $msg_number))
4110                                                ,$importance);
4111                        $header->Flagged = $flag==0?false:strtolower($importance[1])=="high"?"F":false;
4112                }
4113
4114                return $header;
4115        }
4116
4117//Por Bruno Costa(bruno.vieira-costa@serpro.gov.br - Insere emails no imap a partir do fonte do mesmo. Se o argumento timestamp for passado ele utiliza do script python
4118///expressoMail1_2/imap.py para inserir uma msg com o horário correto pois isso não é porssível com a função imap_append do php.
4119
4120    function insert_email($source,$folder,$timestamp,$flags){
4121        $username = $_SESSION['phpgw_info']['expressomail']['user']['userid'];
4122        $password = $_SESSION['phpgw_info']['expressomail']['user']['passwd'];
4123        $imap_server = $_SESSION['phpgw_info']['expressomail']['email_server']['imapServer'];
4124        $imap_port      = $_SESSION['phpgw_info']['expressomail']['email_server']['imapPort'];
4125        $imap_options = '/notls/novalidate-cert';
4126        $mbox_stream = imap_open("{".$imap_server.":".$imap_port.$imap_options."}".$folder, $username, $password);
4127        if(imap_last_error())
4128        {
4129            imap_createmailbox($mbox_stream,imap_utf7_encode("{".$imap_server."}".$folder));
4130        }
4131        if($timestamp){
4132                        $pdate = date_parse(date('r')); // pega a data atual do servidor (TODO: pegar a data da mensagem local)
4133                        $timestamp += $pdate['zone']*(60); //converte a data da mensagem para o fuso horário GMT 0. Isto é feito devido ao Expresso Mail armazenar a data no fuso horário GMT 0 e para exibi-la converte ela para o fuso horário local.
4134                        /* TODO: o diretorio /tmp deve ser substituido pelo diretorio temporario configurado no setup */
4135                        $file = "/tmp/sess_".$_SESSION[ 'phpgw_session' ][ 'session_id' ];
4136               
4137                $f = fopen($file,"w");
4138                fputs($f,base64_encode($source));
4139            fclose($f);
4140                   $command = "python ".$_SESSION['rootPatch']."/expressoMail1_2/imap.py ".escapeshellarg($imap_server)." ".escapeshellarg($imap_port)." ".escapeshellarg($username)." ".escapeshellarg($password)." ".escapeshellarg($timestamp)." ".escapeshellarg($folder)." ".escapeshellarg($file);
4141            $return['command']=exec(escapeshellcmd($command));
4142        }else{
4143            $return['append'] = imap_append($mbox_stream, "{".$imap_server.":".$imap_port."}".$folder, $source, "\\Seen");
4144        }
4145        $status = imap_status($mbox_stream, "{".$this->imap_server.":".$this->imap_port."}".$folder, SA_UIDNEXT);
4146                       
4147        $return['msg_no'] = $status->uidnext - 1;
4148        $return['error'] = imap_last_error();
4149        if(!$return['error'] && $flags != '' ){
4150
4151                  $flags_array=explode(':',$flags);
4152                  //"Answered","Draft","Flagged","Unseen"
4153                  $flags_fixed = "";
4154                  if($flags_array[0] == 'A')
4155                        $flags_fixed.="\\Answered ";
4156                  if($flags_array[1] == 'X')
4157                        $flags_fixed.="\\Draft ";
4158                  if($flags_array[2] == 'F')
4159                        $flags_fixed.="\\Flagged ";
4160                  if($flags_array[3] != 'U')
4161                        $flags_fixed.="\\Seen ";
4162
4163                  imap_setflag_full($mbox_stream, $return['msg_no'], $flags_fixed, ST_UID);
4164                }
4165        if($mbox_stream)
4166            imap_close($mbox_stream);
4167        return $return;
4168    }
4169
4170    function show_decript($params){
4171        $source = $params['source'];
4172        //error_log("source: $source\nversao: " . PHP_VERSION, 3, '/tmp/teste.log');
4173        $source = str_replace(" ", "+", $source,$i);
4174
4175        if (version_compare(PHP_VERSION, '5.2.0', '>=')){
4176            if(!$source = base64_decode($source,true))
4177                return "error ".$source."Espaços ".$i;
4178
4179        }
4180        else {
4181            if(!$source = base64_decode($source))
4182                return "error ".$source."Espaços ".$i;
4183        }
4184
4185        $insert = $this->insert_email($source,'INBOX'.$this->imap_delimiter.'decifradas');
4186
4187                $get['msg_number'] = $insert['msg_no'];
4188                $get['msg_folder'] = 'INBOX'.$this->imap_delimiter.'decifradas';
4189                $return = $this->get_info_msg($get);
4190                $get['msg_number'] = $params['ID'];
4191                $get['msg_folder'] = $params['folder'];
4192                $tmp = $this->get_info_msg($get);
4193                if(!$tmp['status_get_msg_info'])
4194                {
4195                        $return['msg_day']=$tmp['msg_day'];
4196                        $return['msg_hour']=$tmp['msg_hour'];
4197                        $return['fulldate']=$tmp['fulldate'];
4198                        $return['smalldate']=$tmp['smalldate'];
4199                }
4200                else
4201                {
4202                        $return['msg_day']='';
4203                        $return['msg_hour']='';
4204                        $return['fulldate']='';
4205                        $return['smalldate']='';
4206                }
4207        $return['msg_no'] =$insert['msg_no'];
4208        $return['error'] = $insert['error'];
4209        $return['folder'] = $params['folder'];
4210        //$return['acls'] = $insert['acls'];
4211        $return['original_ID'] =  $params['ID'];
4212
4213        return $return;
4214
4215    }
4216
4217//Por Bruno Costa(bruno.vieira-costa@serpro.gov.br - Trata fontes de emails enviados via POST para o servidor por um xmlhttprequest, as partes codificados com
4218//Base64 os "+" são substituidos por " " no envio e essa função arruma esse efeito.
4219
4220    function treat_base64_from_post($source){
4221            $offset = 0;
4222            do
4223            {
4224                    if($inicio = strpos($source, 'Content-Transfer-Encoding: base64', $offset))
4225                    {
4226                            $inicio = strpos($source, "\n\r", $inicio);
4227                            $fim = strpos($source, '--', $inicio);
4228                            if(!$fim)
4229                                    $fim = strpos($source,"\n\r", $inicio);
4230                            $length = $fim-$inicio;
4231                            $parte = substr( $source,$inicio,$length-1);
4232                            $parte = str_replace(" ", "+", $parte);
4233                            $source = substr_replace($source, $parte, $inicio, $length-1);
4234                    }
4235                    if($offset > $inicio)
4236                    $offset=FALSE;
4237                    else
4238                    $offset = $inicio;
4239            }
4240            while($offset);
4241            return $source;
4242    }
4243
4244//Por Bruno Costa(bruno.vieira-costa@serpro.gov.br - Recebe os fontes dos emails a serem desarquivados, separa e envia cada um para função insert_mail.
4245
4246    function unarchive_mail($params)
4247    {
4248        $dest_folder = $params['folder'];
4249        $sources = explode("#@#@#@",$params['source']);
4250        $timestamps = explode("#@#@#@",$params['timestamp']);
4251        $flags = explode("#@#@#@",$params['flags']);
4252
4253        foreach($sources as $index=>$src)
4254        {
4255            if($src!="")
4256            {
4257                $source = $this->treat_base64_from_post($src);
4258                $insert = $this->insert_email($source,$dest_folder,$timestamps[$index],$flags[$index]);
4259            }
4260        }
4261       
4262        return $insert;
4263    }
4264
4265    function download_all_local_attachments($params)
4266    {
4267        $source = $params['source'];
4268        $source = $this->treat_base64_from_post($source);
4269        $insert = $this->insert_email($source,'INBOX'.$this->imap_delimiter.'decifradas');
4270        $exporteml = new ExportEml();
4271        $params['num_msg']=$insert['msg_no'];
4272        $params['folder']='INBOX'.$this->imap_delimiter.'decifradas';
4273        return $exporteml->download_all_attachments($params);
4274    }
4275       
4276        /**
4277         * Método que envia um email reportando um erro no email do usuário
4278         * @license http://www.gnu.org/copyleft/gpl.html GPL
4279         * @author Prognus Software Livre (http://www.prognus.com.br)
4280         */ 
4281        function report_mail_error($params)
4282        {       
4283                $params = $params['params'];
4284                $array_params = explode(";;", $params);
4285                $id_msg   = $array_params[0];
4286                $msg_user = $array_params[1];
4287               
4288                if($msg_user == '')
4289                        $msg_user = "Sem mensagem!";
4290                         
4291                $toaddresses = $_SESSION['phpgw_info']['expressomail']['server']['sugestoes_email_to']; 
4292                $toaddress   = explode(",", $toaddresses);       
4293                                 
4294                for($i=0; $i<count($toaddress); $i++)
4295                        $toaddress[$i] = trim($toaddress[$i]);
4296                                 
4297                $toname       = $_SESSION['phpgw_info']['expressomail']['user']['fullname'];
4298                 
4299                $exporteml    = new ExportEml();
4300                $mail_content = $exporteml->export_msg_data($id_msg, $msg_folder);
4301                $this->open_mbox($msg_folder); 
4302                $title = "Erro de email reportado";
4303                $body  = "<body>O usuário <strong>$toname</strong> reportou um erro na tentativa de acesso ao conteúdo do email.<br><br>Segue em anexo o fonte da mensagem" .                           " reportada.<br><br><hr><strong><u>Mensagem do usuário:</strong></u><br><br><br>" .
4304                                "$msg_user</body><br><br><hr>";
4305                             
4306                $mailService = ServiceLocator::getService('mail');     
4307                $mailService->addAttachment($mail_content, 'report.eml', 'application/text');
4308                $mailService->send($toaddress, $GLOBALS['phpgw_info']['user']['email'], $title, $body);
4309        }
4310       
4311       
4312       
4313    function get_quota_folders(){
4314
4315            // Additional Imap Class for not-implemented functions into PHP-IMAP extension.
4316            include_once("class.imapfp.inc.php");           
4317            $imapfp = new imapfp();
4318
4319            if(!$imapfp->open($this->imap_server,$this->imap_port))
4320                    return $imapfp->get_error();             
4321            if (!$imapfp->login( $this->username,$this->password ))
4322                    return $imapfp->get_error();
4323
4324            $response_array = $imapfp->get_mailboxes_size();
4325            if ($imapfp->error)
4326                    return $imapfp->get_error();
4327
4328            $data = array();
4329            $quota_root = $this->get_quota(array('folder_id' => "INBOX"));
4330            $data["quota_root"] = $quota_root;
4331
4332            foreach ($response_array as $idx=>$line) {
4333                    $line2 = str_replace('"', "", $line);
4334                    $line2 = str_replace(" /vendor/cmu/cyrus-imapd/size (value.shared ",";",str_replace("* ANNOTATION ","",$line2));
4335                    list($folder,$size) = explode(";",$line2);
4336                    $quota_used = str_replace(")","",$size);
4337                    $quotaPercent = (($quota_used / 1024) / $data["quota_root"]["quota_limit"])*100;
4338                    $folder = mb_convert_encoding($folder, "ISO_8859-1", "UTF7-IMAP");
4339                    if(!preg_match('/user\\'.$this->imap_delimiter.$this->username.'\\'.$this->imap_delimiter.'/i',$folder)){
4340                            $folder = $this->functions->getLang("Inbox");
4341                    }
4342                    else
4343                            $folder = preg_replace('/user\\'.$this->imap_delimiter.$this->username.'\\'.$this->imap_delimiter.'/i','', $folder);
4344
4345                    $data[$folder] = array("quota_percent" => sprintf("%.1f",round($quotaPercent,1)), "quota_used" => $quota_used);
4346            }
4347            $imapfp->close();
4348            return $data;
4349    } 
4350}
4351?>
Note: See TracBrowser for help on using the repository browser.