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