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, $uid_support,
  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, $uid_support);
  58
  59         if ($response == 'OK') {
  60
  61             // fetch the subject for the message with $id from msgs.
  62             // is there a more efficient way to do this?
  63             foreach($msgs as $k => $vals) {
  64                 if($vals['ID'] == $id) {
  65                     $subject = $msgs[$k]['SUBJECT'];
  66                     break;
  67                 }
  68             }
  69
  70             array_shift($body_a);
  71             array_pop($body_a);
  72             $body = implode('', $body_a);
  73             $body .= "\r\n";
  74
  75             $localfilename = GenerateRandomString(32, 'FILE', 7);
  76             $full_localfilename = "$hashed_attachment_dir/$localfilename";
  77
  78             $fp = fopen( $full_localfilename, 'wb');
  79             fwrite ($fp, $body);
  80             fclose($fp);
  81             $composeMessage->initAttachment('message/rfc822',$subject.'.msg',
  82                  $full_localfilename);
  83         }
  84     }
  85
  86     $compose_messages[$composesession] = $composeMessage;
  87     sqsession_register($compose_messages,'compose_messages');
  88     session_write_close();
  89     return $composesession;
  90 }
  91
  92
  93
  94 /* get globals */
  95 sqgetGlobalVar('key',       $key,           SQ_COOKIE);
  96 sqgetGlobalVar('username',  $username,      SQ_SESSION);
  97 sqgetGlobalVar('onetimepad',$onetimepad,    SQ_SESSION);
  98 sqgetGlobalVar('delimiter', $delimiter,     SQ_SESSION);
  99 sqgetGlobalVar('base_uri',  $base_uri,      SQ_SESSION);
 100
 101 sqgetGlobalVar('mailbox', $mailbox);
 102 sqgetGlobalVar('startMessage', $startMessage);
 103 sqgetGlobalVar('msg', $msg);
 104
 105 sqgetGlobalVar('msgs',              $msgs,              SQ_SESSION);
 106 sqgetGlobalVar('composesession',    $composesession,    SQ_SESSION);
 107 sqgetGlobalVar('lastTargetMailbox', $lastTargetMailbox, SQ_SESSION);
 108
 109 sqgetGlobalVar('moveButton',      $moveButton,      SQ_POST);
 110 sqgetGlobalVar('expungeButton',   $expungeButton,   SQ_POST);
 111 sqgetGlobalVar('targetMailbox',   $targetMailbox,   SQ_POST);
 112 sqgetGlobalVar('expungeButton',   $expungeButton,   SQ_POST);
 113 sqgetGlobalVar('undeleteButton',  $undeleteButton,  SQ_POST);
 114 sqgetGlobalVar('markRead',        $markRead,        SQ_POST);
 115 sqgetGlobalVar('markUnread',      $markUnread,      SQ_POST);
 116 sqgetGlobalVar('attache',         $attache,         SQ_POST);
 117 sqgetGlobalVar('location',        $location,        SQ_POST);
 118 sqgetGlobalVar('bypass_trash',    $bypass_trash,    SQ_POST);
 119
 120 /* end of get globals */
 121
 122 $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
 123 $mbx_response=sqimap_mailbox_select($imapConnection, $mailbox);
 124
 125 $location = set_url_var($location,'composenew',0,false);
 126 $location = set_url_var($location,'composesession',0,false);
 127 $location = set_url_var($location,'session',0,false);
 128
 129 /* remember changes to mailbox setting */
 130 if (!isset($lastTargetMailbox)) {
 131     $lastTargetMailbox = 'INBOX';
 132 }
 133 if ($targetMailbox != $lastTargetMailbox) {
 134     $lastTargetMailbox = $targetMailbox;
 135     sqsession_register($lastTargetMailbox, 'lastTargetMailbox');
 136 }
 137 $exception = false;
 138
 139 do_hook('move_before_move');
 140
 141
 142 /*
 143     Move msg list sorting up here, as it is used several times,
 144     makes it more efficient to do it in one place for the code
 145 */
 146 $id = array();
 147 if (isset($msg) && is_array($msg)) {
 148     foreach( $msg as $key=>$uid ) {
 149         // using foreach removes the risk of infinite loops that was there //
 150         $id[] = $uid;
 151     }
 152 }
 153
 154 // expunge-on-demand if user isn't using move_to_trash or auto_expunge
 155 if(isset($expungeButton)) {
 156     $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
 157     if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) {
 158         if ($startMessage > $show_num) {
 159             $location = set_url_var($location,'startMessage',$startMessage-$show_num,false);
 160         } else {
 161             $location = set_url_var($location,'startMessage',1,false);
 162         }
 163     }
 164 } elseif(isset($undeleteButton)) {
 165     // undelete messages if user isn't using move_to_trash or auto_expunge
 166     // Removes \Deleted flag from selected messages
 167     if (count($id)) {
 168         sqimap_toggle_flag($imapConnection, $id, '\\Deleted',false,true);
 169     } else {
 170         $exception = true;
 171     }
 172 } elseif (!isset($moveButton)) {
 173     if (count($id)) {
 174         $cnt = count($id);
 175         if (!isset($attache)) {
 176             $button_action = concat_hook_function('move_messages_button_action');
 177             if (isset($markRead)) {
 178                 sqimap_toggle_flag($imapConnection, $id, '\\Seen',true,true);
 179             } else if (isset($markUnread)) {
 180                 sqimap_toggle_flag($imapConnection, $id, '\\Seen',false,true);
 181             } else  {
 182                 if (!$button_action) {
 183                     sqimap_msgs_list_delete($imapConnection, $mailbox, $id,$bypass_trash);
 184                     if ($auto_expunge) {
 185                         $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
 186                     }
 187                 }
 188             }
 189         }
 190         if (isset($attache)) {
 191             $composesession = attachSelectedMessages($id, $imapConnection);
 192             $location = set_url_var($location, 'session', $composesession, false);
 193             if ($compose_new_win) {
 194                 $location = set_url_var($location, 'composenew', 1, false);
 195             } else {
 196                 $location = str_replace('search.php','compose.php',$location);
 197                 $location = str_replace('right_main.php','compose.php',$location);
 198             }
 199         } else {
 200             if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) {
 201                 if ($startMessage > $show_num) {
 202                     $location = set_url_var($location,'startMessage',$startMessage-$show_num, false);
 203                 } else {
 204                     $location = set_url_var($location,'startMessage',1, false);
 205                 }
 206             }
 207         }
 208     } else {
 209         $exception = true;
 210     }
 211 } else {    // Move messages
 212
 213     if (count($id)) {
 214         sqimap_msgs_list_move($imapConnection,$id,$targetMailbox);
 215         if ($auto_expunge) {
 216             $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
 217         } else {
 218             $cnt = 0;
 219         }
 220
 221         if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) {
 222             if ($startMessage > $show_num) {
 223                 $location = set_url_var($location,'startMessage',$startMessage-$show_num, false);
 224             } else {
 225                 $location = set_url_var($location,'startMessage',1, false);
 226             }
 227         }
 228     } else {
 229         $exception = true;
 230     }
 231 }
 232 // Log out this session
 233 sqimap_logout($imapConnection);
 234 if ($exception) {
 235     displayPageHeader($color, $mailbox);
 236     error_message(_("No messages were selected."), $mailbox, $sort, $startMessage, $color);
 237 } else {
 238     header("Location: $location");
 239     exit;
 240 }
 241 ?>
 242 </BODY></HTML>