src/move_messages.php

   1 <?php
   2
   3 /**
   4  * move_messages.php
   5  *
   6  * Copyright (c) 1999-2004 The SquirrelMail Project Team
   7  * Licensed under the GNU GPL. For full terms see the file COPYING.
   8  *
   9  * Enables message moving between folders on the IMAP server.
  10  *
  11  * $Id$
  12  * @package squirrelmail
  13  */
  14
  15 /** Path for SquirrelMail required files. */
  16 define('SM_PATH','../');
  17
  18 /* SquirrelMail required files. */
  19 require_once(SM_PATH . 'include/validate.php');
  20 require_once(SM_PATH . 'functions/global.php');
  21 require_once(SM_PATH . 'functions/display_messages.php');
  22 require_once(SM_PATH . 'functions/imap.php');
  23 require_once(SM_PATH . 'functions/html.php');
  24
  25 global $compose_new_win;
  26
  27 if ( !sqgetGlobalVar('composesession', $composesession, SQ_SESSION) ) {
  28     $composesession = 0;
  29 }
  30
  31 function attachSelectedMessages($msg, $imapConnection) {
  32     global $username, $attachment_dir, $startMessage,
  33            $data_dir, $composesession,
  34            $msgs, $show_num, $compose_messages;
  35
  36     if (!isset($compose_messages)) {
  37         $compose_messages = array();
  38         sqsession_register($compose_messages,'compose_messages');
  39     }
  40
  41     if (!$composesession) {
  42         $composesession = 1;
  43         sqsession_register($composesession,'composesession');
  44     } else {
  45         $composesession++;
  46         sqsession_register($composesession,'composesession');
  47     }
  48
  49     $hashed_attachment_dir = getHashedDir($username, $attachment_dir);
  50
  51     $composeMessage = new Message();
  52     $rfc822_header = new Rfc822Header();
  53     $composeMessage->rfc822_header = $rfc822_header;
  54     $composeMessage->reply_rfc822_header = '';
  55
  56     foreach($msg as $id) {
  57         $body_a = sqimap_run_command($imapConnection, "FETCH $id RFC822", true, $response, $readmessage, TRUE);
  58
  59         if ($response == 'OK') {
  60             // fetch the subject for the message with $id from msgs.
  61             // is there a more efficient way to do this?
  62             foreach($msgs as $k => $vals) {
  63                 if($vals['ID'] == $id) {
  64                     $subject = $msgs[$k]['SUBJECT'];
  65                     break;
  66                 }
  67             }
  68
  69             array_shift($body_a);
  70             array_pop($body_a);
  71             $body = implode('', $body_a);
  72             $body .= "\r\n";
  73
  74             $localfilename = GenerateRandomString(32, 'FILE', 7);
  75             $full_localfilename = "$hashed_attachment_dir/$localfilename";
  76
  77             $fp = fopen( $full_localfilename, 'wb');
  78             fwrite ($fp, $body);
  79             fclose($fp);
  80             $composeMessage->initAttachment('message/rfc822',$subject.'.msg',
  81                  $full_localfilename);
  82         }
  83     }
  84
  85     $compose_messages[$composesession] = $composeMessage;
  86     sqsession_register($compose_messages,'compose_messages');
  87     session_write_close();
  88     return $composesession;
  89 }
  90
  91
  92
  93 /* get globals */
  94 sqgetGlobalVar('key',       $key,           SQ_COOKIE);
  95 sqgetGlobalVar('username',  $username,      SQ_SESSION);
  96 sqgetGlobalVar('onetimepad',$onetimepad,    SQ_SESSION);
  97 sqgetGlobalVar('delimiter', $delimiter,     SQ_SESSION);
  98 sqgetGlobalVar('base_uri',  $base_uri,      SQ_SESSION);
  99
 100 sqgetGlobalVar('mailbox', $mailbox);
 101 sqgetGlobalVar('startMessage', $startMessage);
 102 sqgetGlobalVar('msg', $msg);
 103
 104 sqgetGlobalVar('msgs',              $msgs,              SQ_SESSION);
 105 sqgetGlobalVar('composesession',    $composesession,    SQ_SESSION);
 106 sqgetGlobalVar('lastTargetMailbox', $lastTargetMailbox, SQ_SESSION);
 107
 108 sqgetGlobalVar('moveButton',      $moveButton,      SQ_POST);
 109 sqgetGlobalVar('expungeButton',   $expungeButton,   SQ_POST);
 110 sqgetGlobalVar('targetMailbox',   $targetMailbox,   SQ_POST);
 111 sqgetGlobalVar('expungeButton',   $expungeButton,   SQ_POST);
 112 sqgetGlobalVar('undeleteButton',  $undeleteButton,  SQ_POST);
 113 sqgetGlobalVar('markRead',        $markRead,        SQ_POST);
 114 sqgetGlobalVar('markUnread',      $markUnread,      SQ_POST);
 115 sqgetGlobalVar('markFlagged',     $markFlagged,     SQ_POST);
 116 sqgetGlobalVar('markUnflagged',   $markUnflagged,   SQ_POST);
 117 sqgetGlobalVar('attache',         $attache,         SQ_POST);
 118 sqgetGlobalVar('location',        $location,        SQ_POST);
 119 sqgetGlobalVar('bypass_trash',    $bypass_trash,    SQ_POST);
 120 sqgetGlobalVar('dmn',             $is_dmn,          SQ_POST);
 121
 122 /* end of get globals */
 123
 124 $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
 125 $mbx_response=sqimap_mailbox_select($imapConnection, $mailbox);
 126
 127 $location = set_url_var($location,'composenew',0,false);
 128 $location = set_url_var($location,'composesession',0,false);
 129 $location = set_url_var($location,'session',0,false);
 130
 131 /* remember changes to mailbox setting */
 132 if (!isset($lastTargetMailbox)) {
 133     $lastTargetMailbox = 'INBOX';
 134 }
 135 if ($targetMailbox != $lastTargetMailbox) {
 136     $lastTargetMailbox = $targetMailbox;
 137     sqsession_register($lastTargetMailbox, 'lastTargetMailbox');
 138 }
 139 $exception = false;
 140
 141 do_hook('move_before_move');
 142
 143
 144 /*
 145     Move msg list sorting up here, as it is used several times,
 146     makes it more efficient to do it in one place for the code
 147 */
 148 $id = array();
 149 if (isset($msg) && is_array($msg)) {
 150     foreach( $msg as $key=>$uid ) {
 151         // using foreach removes the risk of infinite loops that was there //
 152         $id[] = $uid;
 153     }
 154 }
 155
 156 // expunge-on-demand if user isn't using move_to_trash or auto_expunge
 157 if(isset($expungeButton)) {
 158     $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
 159     if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) {
 160         if ($startMessage > $show_num) {
 161             $location = set_url_var($location,'startMessage',$startMessage-$show_num,false);
 162         } else {
 163             $location = set_url_var($location,'startMessage',1,false);
 164         }
 165     }
 166 } elseif(isset($undeleteButton)) {
 167     // undelete messages if user isn't using move_to_trash or auto_expunge
 168     // Removes \Deleted flag from selected messages
 169     if (count($id)) {
 170         sqimap_toggle_flag($imapConnection, $id, '\\Deleted',false,true);
 171     } else {
 172         $exception = true;
 173     }
 174 } elseif (!isset($moveButton)) {
 175     if (count($id)) {
 176         $cnt = count($id);
 177         if (!isset($attache)) {
 178             if (isset($markRead)) {
 179                 sqimap_toggle_flag($imapConnection, $id, '\\Seen',true,true);
 180             } else if (isset($markUnread)) {
 181                 sqimap_toggle_flag($imapConnection, $id, '\\Seen',false,true);
 182             } else if (isset($markFlagged)) {
 183                 sqimap_toggle_flag($imapConnection, $id, '\\Flagged', true, true);
 184             } else if (isset($markUnflagged)) {
 185                 sqimap_toggle_flag($imapConnection, $id, '\\Flagged', false, true);
 186             } else  {
 187                 if (!boolean_hook_function('move_messages_button_action', NULL, 1)) {
 188                     sqimap_msgs_list_delete($imapConnection, $mailbox, $id,$bypass_trash);
 189                     if ($auto_expunge) {
 190                         $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
 191                     }
 192                 }
 193             }
 194         }
 195         if (isset($attache)) {
 196             $composesession = attachSelectedMessages($id, $imapConnection);
 197             $location = set_url_var($location, 'session', $composesession, false);
 198             if ($compose_new_win) {
 199                 $location = set_url_var($location, 'composenew', 1, false);
 200             } else {
 201                 $location = str_replace('search.php','compose.php',$location);
 202                 $location = str_replace('right_main.php','compose.php',$location);
 203             }
 204         } else {
 205             if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) {
 206                 if ($startMessage > $show_num) {
 207                     $location = set_url_var($location,'startMessage',$startMessage-$show_num, false);
 208                 } else {
 209                     $location = set_url_var($location,'startMessage',1, false);
 210                 }
 211             }
 212         }
 213     } else {
 214         $exception = true;
 215     }
 216 } else {    // Move messages
 217
 218     $num_ids = count($id);
 219     if ( $num_ids > 0 ) {
 220         if ( $is_dmn && count($id) == 1 ) {
 221             sqimap_msgs_list_move($imapConnection,$id[0],$targetMailbox);
 222             $cnt = sqimap_mailbox_expunge_dmn($id[0]);
 223         } else {
 224             sqimap_msgs_list_move($imapConnection,$id,$targetMailbox);
 225             if ($auto_expunge) {
 226                 $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
 227             } else {
 228                 $cnt = 0;
 229             }
 230         }
 231
 232         if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) {
 233             if ($startMessage > $show_num) {
 234                 $location = set_url_var($location,'startMessage',$startMessage-$show_num, false);
 235             } else {
 236                 $location = set_url_var($location,'startMessage',1, false);
 237             }
 238         }
 239     } else {
 240         $exception = true;
 241     }
 242 }
 243 // Log out this session
 244 sqimap_logout($imapConnection);
 245 if ($exception) {
 246     displayPageHeader($color, $mailbox);
 247     error_message(_("No messages were selected."), $mailbox, $sort, $startMessage, $color);
 248 } else {
 249     header("Location: $location");
 250     exit;
 251 }
 252 ?>
 253 </BODY></HTML>