src/move_messages.php

   1 <?php
   2
   3 /**
   4  * move_messages.php
   5  *
   6  * Copyright (c) 1999-2003 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  */
  13
  14 /* Path for SquirrelMail required files. */
  15 define('SM_PATH','../');
  16
  17 /* SquirrelMail required files. */
  18 require_once(SM_PATH . 'include/validate.php');
  19 require_once(SM_PATH . 'functions/global.php');
  20 require_once(SM_PATH . 'functions/display_messages.php');
  21 require_once(SM_PATH . 'functions/imap.php');
  22 require_once(SM_PATH . 'functions/html.php');
  23
  24 global $compose_new_win;
  25
  26 if ( !sqgetGlobalVar('composesession', $composesession, SQ_SESSION) ) {
  27   $composesession = 0;
  28 }
  29
  30 /* obsolete ?? */
  31 function putSelectedMessagesIntoString($msg) {
  32     $j = 0;
  33     $i = 0;
  34     $firstLoop = true;
  35     // If they have selected nothing msg is size one still, but will
  36     // be an infinite loop because we never increment j. so check to
  37     // see if msg[0] is set or not to fix this.
  38     while (($j < count($msg)) && ($msg[0])) {
  39         if ($msg[$i]) {
  40             if ($firstLoop != true) {
  41                 $selectedMessages .= "&amp;";
  42             } else {
  43                 $firstLoop = false;
  44             }
  45             $selectedMessages .= "selMsg[$j]=$msg[$i]";
  46             $j++;
  47         }
  48         $i++;
  49     }
  50 }
  51
  52 function attachSelectedMessages($msg, $imapConnection) {
  53     global $username, $attachment_dir, $startMessage,
  54            $data_dir, $composesession, $uid_support,
  55            $msgs, $thread_sort_messages, $allow_server_sort, $show_num,
  56            $compose_messages;
  57
  58     if (!isset($compose_messages)) {
  59             $compose_messages = array();
  60             sqsession_register($compose_messages,'compose_messages');
  61     }
  62
  63     if (!$composesession) {
  64             $composesession = 1;
  65             sqsession_register($composesession,'composesession');
  66     } else {
  67             $composesession++;
  68             sqsession_register($composesession,'composesession');
  69     }
  70
  71     $hashed_attachment_dir = getHashedDir($username, $attachment_dir, $composesession);
  72
  73     if ($thread_sort_messages || $allow_server_sort) {
  74        $start_index=0;
  75     } else {
  76        $start_index = ($startMessage-1) * $show_num;
  77     }
  78
  79     $i = 0;
  80     $j = 0;
  81     $hashed_attachment_dir = getHashedDir($username, $attachment_dir);
  82
  83     $composeMessage = new Message();
  84     $rfc822_header = new Rfc822Header();
  85     $composeMessage->rfc822_header = $rfc822_header;
  86     $composeMessage->reply_rfc822_header = '';
  87
  88     while ($j < count($msg)) {
  89         if (isset($msg[$i])) {
  90             $id = $msg[$i];
  91             $body_a = sqimap_run_command($imapConnection, "FETCH $id RFC822",true, $response, $readmessage, $uid_support);
  92             if ($response == 'OK') {
  93                 $k = $i + $start_index;
  94                 $subject = $msgs[$k]['SUBJECT'];
  95
  96                 array_shift($body_a);
  97                 $body = implode('', $body_a);
  98                 $body .= "\r\n";
  99
 100                 $localfilename = GenerateRandomString(32, 'FILE', 7);
 101                 $full_localfilename = "$hashed_attachment_dir/$localfilename";
 102
 103                 $fp = fopen( $full_localfilename, 'wb');
 104                 fwrite ($fp, $body);
 105                 fclose($fp);
 106                 $composeMessage->initAttachment('message/rfc822',$subject.'.eml',
 107                          $full_localfilename);
 108             }
 109             $j++;
 110         }
 111         $i++;
 112     }
 113     $compose_messages[$composesession] = $composeMessage;
 114     sqsession_register($compose_messages,'compose_messages');
 115     session_write_close();
 116     return $composesession;
 117 }
 118
 119
 120
 121 /* get globals */
 122 sqgetGlobalVar('key',       $key,           SQ_COOKIE);
 123 sqgetGlobalVar('username',  $username,      SQ_SESSION);
 124 sqgetGlobalVar('onetimepad',$onetimepad,    SQ_SESSION);
 125 sqgetGlobalVar('delimiter', $delimiter,     SQ_SESSION);
 126 sqgetGlobalVar('base_uri',  $base_uri,      SQ_SESSION);
 127
 128 sqgetGlobalVar('mailbox', $mailbox);
 129 sqgetGlobalVar('startMessage', $startMessage);
 130 sqgetGlobalVar('msg', $msg);
 131
 132 sqgetGlobalVar('msgs',              $msgs,              SQ_SESSION);
 133 sqgetGlobalVar('composesession',    $composesession,    SQ_SESSION);
 134 sqgetGlobalVar('lastTargetMailbox', $lastTargetMailbox, SQ_SESSION);
 135
 136 sqgetGlobalVar('moveButton',      $moveButton,      SQ_POST);
 137 sqgetGlobalVar('expungeButton',   $expungeButton,   SQ_POST);
 138 sqgetGlobalVar('targetMailbox',   $targetMailbox,   SQ_POST);
 139 sqgetGlobalVar('expungeButton',   $expungeButton,   SQ_POST);
 140 sqgetGlobalVar('undeleteButton',  $undeleteButton,  SQ_POST);
 141 sqgetGlobalVar('markRead',        $markRead,        SQ_POST);
 142 sqgetGlobalVar('markUnread',      $markUnread,      SQ_POST);
 143 sqgetGlobalVar('attache',         $attache,         SQ_POST);
 144 sqgetGlobalVar('location',        $location,        SQ_POST);
 145
 146 /* end of get globals */
 147
 148 $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
 149 $mbx_response=sqimap_mailbox_select($imapConnection, $mailbox);
 150
 151 $location = set_url_var($location,'composenew',0,false);
 152 $location = set_url_var($location,'composesession',0,false);
 153 $location = set_url_var($location,'session',0,false);
 154
 155 /* remember changes to mailbox setting */
 156 if (!isset($lastTargetMailbox)) {
 157     $lastTargetMailbox = 'INBOX';
 158 }
 159 if ($targetMailbox != $lastTargetMailbox) {
 160     $lastTargetMailbox = $targetMailbox;
 161     sqsession_register($lastTargetMailbox, 'lastTargetMailbox');
 162 }
 163 $exception = false;
 164
 165 do_hook('move_before_move');
 166
 167 // expunge-on-demand if user isn't using move_to_trash or auto_expunge
 168 if(isset($expungeButton)) {
 169     $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
 170     if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) {
 171         if ($startMessage > $show_num) {
 172             $location = set_url_var($location,'startMessage',$startMessage-$show_num,false);
 173         } else {
 174             $location = set_url_var($location,'startMessage',1,false);
 175         }
 176     }
 177 } elseif(isset($undeleteButton)) {
 178     // undelete messages if user isn't using move_to_trash or auto_expunge
 179     if (is_array($msg) == 1) {
 180         // Removes \Deleted flag from selected messages
 181         $j = $i = 0;
 182         $id = array();
 183         // If they have selected nothing msg is size one still, but will be an infinite
 184         //    loop because we never increment j.  so check to see if msg[0] is set or not to fix this.
 185         while ($j < count($msg)) {
 186             if ($msg[$i]) {
 187                 $id[] = $msg[$i];
 188                 $j++;
 189             }
 190             $i++;
 191         }
 192         if (count($id)) {
 193             sqimap_toggle_flag($imapConnection, $id, '\\Deleted',false,true);
 194         }
 195     } else {
 196         $exception = true;
 197     }
 198 } elseif (!isset($moveButton)) {
 199     // If the delete button was pressed, the moveButton variable will not be set.
 200     if (is_array($msg)) {
 201         // Marks the selected messages as 'Deleted'
 202         $j = $i = $cnt = 0;
 203         $id = array();
 204         // If they have selected nothing msg is size one still, but will be an infinite
 205         //    loop because we never increment j.  so check to see if msg[0] is set or not to fix this.
 206         while ($j < count($msg)) {
 207             if (isset($msg[$i])) {
 208                 $id[] = $msg[$i];
 209                 $j++;
 210             }
 211             $i++;
 212         }
 213         if (count($id) && !isset($attache)) {
 214            if (isset($markRead)) {
 215               sqimap_toggle_flag($imapConnection, $id, '\\Seen',true,true);
 216            } else if (isset($markUnread)) {
 217               sqimap_toggle_flag($imapConnection, $id, '\\Seen',false,true);
 218            } else  {
 219               sqimap_msgs_list_delete($imapConnection, $mailbox, $id);
 220               if ($auto_expunge) {
 221                  $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
 222               }
 223            }
 224         }
 225         if (isset($attache)) {
 226             $composesession = attachSelectedMessages($msg, $imapConnection);
 227             $location = set_url_var($location, 'session', $composesession, false);
 228             if ($compose_new_win) {
 229                 $location = set_url_var($location, 'composenew', 1, false);
 230             } else {
 231                 $location = str_replace('search.php','compose.php',$location);
 232                 $location = str_replace('right_main.php','compose.php',$location);
 233             }
 234         } else {
 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         }
 243     } else {
 244         $exception = true;
 245     }
 246 } else {    // Move messages
 247     // lets check to see if they selected any messages
 248     if (is_array($msg)) {
 249         $j = $i = 0;
 250         $id = array();
 251         // If they have selected nothing msg is size one still, but will be an infinite
 252         //    loop because we never increment j.  so check to see if msg[0] is set or not to fix this.
 253         $cnt = count($msg);
 254         while ($j < $cnt) {
 255             if (isset($msg[$i])) {
 256                 $id[] = $msg[$i];
 257                 $j++;
 258             }
 259             $i++;
 260         }
 261         sqimap_msgs_list_copy($imapConnection,$id,$targetMailbox);
 262         if ($auto_expunge) {
 263             $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
 264         } else {
 265             $cnt = 0;
 266         }
 267
 268         if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) {
 269             if ($startMessage > $show_num) {
 270                 $location = set_url_var($location,'startMessage',$startMessage-$show_num, false);
 271             } else {
 272                 $location = set_url_var($location,'startMessage',1, false);
 273             }
 274         }
 275     } else {
 276         $exception = true;
 277     }
 278 }
 279 // Log out this session
 280 sqimap_logout($imapConnection);
 281 if ($exception) {
 282     displayPageHeader($color, $mailbox);
 283     error_message(_("No messages were selected."), $mailbox, $sort, $startMessage, $color);
 284 } else {
 285     header("Location: $location");
 286     exit;
 287 }
 288 ?>
 289 </BODY></HTML>