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 function attachSelectedMessages($msg, $imapConnection) {
  31     global $username, $attachment_dir, $startMessage,
  32            $data_dir, $composesession, $uid_support,
  33            $msgs, $show_num, $compose_messages;
  34
  35     if (!isset($compose_messages)) {
  36         $compose_messages = array();
  37         sqsession_register($compose_messages,'compose_messages');
  38     }
  39
  40     if (!$composesession) {
  41         $composesession = 1;
  42         sqsession_register($composesession,'composesession');
  43     } else {
  44         $composesession++;
  45         sqsession_register($composesession,'composesession');
  46     }
  47
  48     $hashed_attachment_dir = getHashedDir($username, $attachment_dir);
  49
  50     $composeMessage = new Message();
  51     $rfc822_header = new Rfc822Header();
  52     $composeMessage->rfc822_header = $rfc822_header;
  53     $composeMessage->reply_rfc822_header = '';
  54
  55     foreach($msg as $id) {
  56         $body_a = sqimap_run_command($imapConnection, "FETCH $id RFC822", true, $response, $readmessage, $uid_support);
  57
  58         if ($response == 'OK') {
  59
  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.'.eml',
  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('attache',         $attache,         SQ_POST);
 116 sqgetGlobalVar('location',        $location,        SQ_POST);
 117
 118 /* end of get globals */
 119
 120 $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
 121 $mbx_response=sqimap_mailbox_select($imapConnection, $mailbox);
 122
 123 $location = set_url_var($location,'composenew',0,false);
 124 $location = set_url_var($location,'composesession',0,false);
 125 $location = set_url_var($location,'session',0,false);
 126
 127 /* remember changes to mailbox setting */
 128 if (!isset($lastTargetMailbox)) {
 129     $lastTargetMailbox = 'INBOX';
 130 }
 131 if ($targetMailbox != $lastTargetMailbox) {
 132     $lastTargetMailbox = $targetMailbox;
 133     sqsession_register($lastTargetMailbox, 'lastTargetMailbox');
 134 }
 135 $exception = false;
 136
 137 do_hook('move_before_move');
 138
 139
 140 /*
 141     Move msg list sorting up here, as it is used several times,
 142     makes it more efficient to do it in one place for the code
 143 */
 144 $id = array();
 145 if (isset($msg) && is_array($msg)) {
 146     foreach( $msg as $key=>$uid ) {
 147         // using foreach removes the risk of infinite loops that was there //
 148         $id[] = $uid;
 149     }
 150 }
 151
 152 // expunge-on-demand if user isn't using move_to_trash or auto_expunge
 153 if(isset($expungeButton)) {
 154     $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
 155     if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) {
 156         if ($startMessage > $show_num) {
 157             $location = set_url_var($location,'startMessage',$startMessage-$show_num,false);
 158         } else {
 159             $location = set_url_var($location,'startMessage',1,false);
 160         }
 161     }
 162 } elseif(isset($undeleteButton)) {
 163     // undelete messages if user isn't using move_to_trash or auto_expunge
 164     // Removes \Deleted flag from selected messages
 165     if (count($id)) {
 166         sqimap_toggle_flag($imapConnection, $id, '\\Deleted',false,true);
 167     } else {
 168         $exception = true;
 169     }
 170 } elseif (!isset($moveButton)) {
 171     if (count($id)) {
 172         $cnt = count($id);
 173         if (!isset($attache)) {
 174             $button_action = concat_hook_function('move_messages_button_action');
 175             if (isset($markRead)) {
 176                 sqimap_toggle_flag($imapConnection, $id, '\\Seen',true,true);
 177             } else if (isset($markUnread)) {
 178                 sqimap_toggle_flag($imapConnection, $id, '\\Seen',false,true);
 179             } else  {
 180                 if (!$button_action) {
 181                     sqimap_msgs_list_delete($imapConnection, $mailbox, $id);
 182                     if ($auto_expunge) {
 183                         $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
 184                     }
 185                 }
 186             }
 187         }
 188         if (isset($attache)) {
 189             $composesession = attachSelectedMessages($id, $imapConnection);
 190             $location = set_url_var($location, 'session', $composesession, false);
 191             if ($compose_new_win) {
 192                 $location = set_url_var($location, 'composenew', 1, false);
 193             } else {
 194                 $location = str_replace('search.php','compose.php',$location);
 195                 $location = str_replace('right_main.php','compose.php',$location);
 196             }
 197         } else {
 198             if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) {
 199                 if ($startMessage > $show_num) {
 200                     $location = set_url_var($location,'startMessage',$startMessage-$show_num, false);
 201                 } else {
 202                     $location = set_url_var($location,'startMessage',1, false);
 203                 }
 204             }
 205         }
 206     } else {
 207         $exception = true;
 208     }
 209 } else {    // Move messages
 210
 211     if (count($id)) {
 212         sqimap_msgs_list_copy($imapConnection,$id,$targetMailbox);
 213         if ($auto_expunge) {
 214             $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
 215         } else {
 216             $cnt = 0;
 217         }
 218
 219         if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) {
 220             if ($startMessage > $show_num) {
 221                 $location = set_url_var($location,'startMessage',$startMessage-$show_num, false);
 222             } else {
 223                 $location = set_url_var($location,'startMessage',1, false);
 224             }
 225         }
 226     } else {
 227         $exception = true;
 228     }
 229 }
 230 // Log out this session
 231 sqimap_logout($imapConnection);
 232 if ($exception) {
 233     displayPageHeader($color, $mailbox);
 234     error_message(_("No messages were selected."), $mailbox, $sort, $startMessage, $color);
 235 } else {
 236     header("Location: $location");
 237     exit;
 238 }
 239 ?>
 240 </BODY></HTML>