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

Revision 4777, 156.3 KB checked in by airton, 13 years ago (diff)

Ticket #2132 - Mensagem do Outlook e parcialmente truncada na margem esquerda

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