Source for file move_messages.php

Documentation is available at move_messages.php

  1. <?php
  2.  
  3. /**
  4.  * move_messages.php
  5.  *
  6.  * Enables message moving between folders on the IMAP server.
  7.  *
  8.  * @copyright 1999-2020 The SquirrelMail Project Team
  9.  * @license http://opensource.org/licenses/gpl-license.php GNU Public License
  10.  * @version $Id: move_messages.php 14840 2020-01-07 07:42:38Z pdontthink $
  11.  * @package squirrelmail
  12.  */
  13.  
  14. /** This is the move_messages page */
  15. define('PAGE_NAME', 'move_messages');
  16.  
  17. /* Path for SquirrelMail required files. */
  18. define('SM_PATH','../');
  19.  
  20. /* SquirrelMail required files. */
  21. require_once(SM_PATH . 'include/validate.php');
  22. require_once(SM_PATH . 'functions/global.php');
  23. require_once(SM_PATH . 'functions/display_messages.php');
  24. require_once(SM_PATH . 'functions/imap.php');
  25. require_once(SM_PATH . 'functions/html.php');
  26.  
  27. global $compose_new_win;
  28.  
  29. if ( !sqgetGlobalVar('composesession', $composesession, SQ_SESSION) ) {
  30.   $composesession = 0;
  31. }
  32.  
  33. function attachSelectedMessages($msg, $imapConnection) {
  34.     global $username, $attachment_dir, $startMessage,
  35.            $data_dir, $composesession, $uid_support, $mailbox,
  36.        $msgs, $thread_sort_messages, $allow_server_sort, $show_num;
  37.  
  38.     if (!$composesession) {
  39.         $composesession = 1;
  40.             sqsession_register($composesession,'composesession');
  41.     } else {
  42.         $composesession++;
  43.         sqsession_register($composesession,'composesession');
  44.     }
  45.  
  46.     $hashed_attachment_dir = getHashedDir($username, $attachment_dir, $composesession);
  47.  
  48.     if ($thread_sort_messages || $allow_server_sort) {
  49.        $start_index=0;
  50.     } else {
  51.        $start_index = ($startMessage-1) * $show_num;
  52.     }
  53.  
  54.     $i = 0;
  55.     $j = 0;
  56.     $hashed_attachment_dir = getHashedDir($username, $attachment_dir);
  57.  
  58.     $composeMessage = new Message();
  59.     $rfc822_header = new Rfc822Header();
  60.     $composeMessage->rfc822_header = $rfc822_header;
  61.     $composeMessage->reply_rfc822_header = '';
  62.  
  63.     while ($j < count($msg)) {
  64.         if (isset($msg[$i])) {
  65.             $id = $msg[$i];
  66.             
  67.             $body_a = sqimap_run_command($imapConnection, "FETCH $id RFC822",true, $response, $readmessage, $uid_support);
  68.             
  69.             if ($response == 'OK') {
  70.                 $message = sqimap_get_message($imapConnection, $id, $mailbox);
  71.  
  72.                 // fetch the subject for the message from the object
  73.                 //
  74.                 $subject = $message->rfc822_header->subject;
  75.  
  76.                 // use subject for file name
  77.                 //
  78.                 if ( empty($subject) )
  79.                     $filename = "untitled-".$message->entity_id;
  80.                 else
  81.                     $filename = $subject;
  82.                 $filename .= '.eml';
  83.  
  84.                 // figure out a subject for new message
  85.                 //
  86.                 $subject = decodeHeader($subject, false, false, true);
  87.                 $subject = trim($subject);
  88.                 if (substr(strtolower($subject), 0, 4) != 'fwd:') {
  89.                     $subject = 'Fwd: ' . $subject;
  90.                 }
  91.  
  92.                 array_shift($body_a);
  93.                 array_pop($body_a);
  94.                 $body = implode('', $body_a);
  95.                 $body .= "\r\n";
  96.  
  97.                 $localfilename = GenerateRandomString(32, 'FILE', 7);
  98.                 $full_localfilename = "$hashed_attachment_dir/$localfilename";
  99.                 while (file_exists($full_localfilename)) {
  100.                     $localfilename = GenerateRandomString(32, 'FILE', 7);
  101.                     $full_localfilename = "$hashed_attachment_dir/$localfilename";
  102.                 }
  103.  
  104.                 $fp = fopen( $full_localfilename, 'wb');
  105.                 fwrite ($fp, $body);
  106.                 fclose($fp);
  107.                 $composeMessage->initAttachment('message/rfc822',$filename,
  108.                      $localfilename);
  109.                 $composeMessage->rfc822_header->subject = $subject;
  110.             }
  111.             $j++;
  112.         }
  113.         $i++;
  114.     }
  115.  
  116.     sqgetGlobalVar('compose_messages', $compose_messages, SQ_SESSION);
  117.     if (!isset($compose_messages)
  118.      || !is_array($compose_messages)) {
  119.         $compose_messages = array();
  120.     }
  121.     $compose_messages[$composesession] = $composeMessage;
  122.     sqsession_register($compose_messages,'compose_messages');
  123.     session_write_close();
  124.     return $composesession;
  125. }
  126.  
  127.  
  128.  
  129. /* get globals */
  130. sqgetGlobalVar('key',       $key,           SQ_COOKIE);
  131. sqgetGlobalVar('username',  $username,      SQ_SESSION);
  132. sqgetGlobalVar('onetimepad',$onetimepad,    SQ_SESSION);
  133. sqgetGlobalVar('delimiter', $delimiter,     SQ_SESSION);
  134. sqgetGlobalVar('base_uri',  $base_uri,      SQ_SESSION);
  135.  
  136. sqgetGlobalVar('mailbox', $mailbox);
  137. sqgetGlobalVar('startMessage', $startMessage);
  138. sqgetGlobalVar('msg', $msg);
  139.  
  140. sqgetGlobalVar('msgs',              $msgs,              SQ_SESSION);
  141. sqgetGlobalVar('composesession',    $composesession,    SQ_SESSION);
  142. sqgetGlobalVar('lastTargetMailbox', $lastTargetMailbox, SQ_SESSION);
  143.  
  144. sqgetGlobalVar('moveButton',      $moveButton,      SQ_POST);
  145. sqgetGlobalVar('expungeButton',   $expungeButton,   SQ_POST);
  146. sqgetGlobalVar('targetMailbox',   $targetMailbox,   SQ_POST);
  147. sqgetGlobalVar('expungeButton',   $expungeButton,   SQ_POST);
  148. sqgetGlobalVar('undeleteButton',  $undeleteButton,  SQ_POST);
  149. sqgetGlobalVar('markRead',        $markRead,        SQ_POST);
  150. sqgetGlobalVar('markUnread',      $markUnread,      SQ_POST);
  151. sqgetGlobalVar('attache',         $attache,         SQ_POST);
  152. sqgetGlobalVar('location',        $location,        SQ_POST);
  153.  
  154. if (!sqgetGlobalVar('smtoken',$submitted_token, SQ_FORM)) {
  155.     $submitted_token = '';
  156. }
  157. /* end of get globals */
  158.  
  159. // security check
  160. sm_validate_security_token($submitted_token, -1, TRUE);
  161.  
  162. global $imap_stream_options; // in case not defined in config
  163. $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0, $imap_stream_options);
  164. $mbx_response=sqimap_mailbox_select($imapConnection, $mailbox);
  165.  
  166. $location = set_url_var($location,'composenew',0,false);
  167. $location = set_url_var($location,'composesession',0,false);
  168. $location = set_url_var($location,'session',0,false);
  169. $location = set_url_var($location,'preselected',NULL,false,true);
  170.  
  171. // make sure that cache is not used
  172. $location = set_url_var($location,'use_mailbox_cache',0,false);
  173.  
  174. /* remember changes to mailbox setting */
  175. if (!isset($lastTargetMailbox)) {
  176.     $lastTargetMailbox = 'INBOX';
  177. }
  178. if ($targetMailbox != $lastTargetMailbox) {
  179.     $lastTargetMailbox = $targetMailbox;
  180.     sqsession_register($lastTargetMailbox, 'lastTargetMailbox');
  181. }
  182. $exception = false;
  183.  
  184. do_hook('move_before_move');
  185.  
  186.  
  187. /*
  188.     Move msg list sorting up here, as it is used several times,
  189.     makes it more efficient to do it in one place for the code
  190. */
  191. $id = array();
  192. if (isset($msg) && is_array($msg)) {
  193.     foreach( $msg as $key=>$uid ) {
  194.         // using foreach removes the risk of infinite loops that was there //
  195.         $id[] = $uid;
  196.     }
  197. }
  198.  
  199. // expunge-on-demand if user isn't using move_to_trash or auto_expunge
  200. if(isset($expungeButton)) {
  201.     $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
  202.     if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) {
  203.         if ($startMessage > $show_num) {
  204.             $location = set_url_var($location,'startMessage',$startMessage-$show_num,false);
  205.         } else {
  206.             $location = set_url_var($location,'startMessage',1,false);
  207.         }
  208.     }
  209. } elseif(isset($undeleteButton)) {
  210.     // undelete messages if user isn't using move_to_trash or auto_expunge
  211.     // Removes \Deleted flag from selected messages
  212.     if (count($id)) {
  213.         sqimap_toggle_flag($imapConnection, $id, '\\Deleted',false,true);
  214.     } else {
  215.         $exception = true;
  216.     }
  217. } elseif (!isset($moveButton)) {
  218.     if (count($id)) {
  219.         $cnt = count($id);
  220.         if (!isset($attache)) {
  221.             if (isset($markRead)) {
  222.                 sqimap_toggle_flag($imapConnection, $id, '\\Seen',true,true);
  223.             } else if (isset($markUnread)) {
  224.                 sqimap_toggle_flag($imapConnection, $id, '\\Seen',false,true);
  225.             } else  {
  226.                 sqimap_msgs_list_delete($imapConnection, $mailbox, $id);
  227.                 if ($auto_expunge) {
  228.                     $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
  229.                 }
  230.                 if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) {
  231.                     if ($startMessage > $show_num) {
  232.                         $location = set_url_var($location,'startMessage',$startMessage-$show_num, false);
  233.                     } else {
  234.                         $location = set_url_var($location,'startMessage',1, false);
  235.                     }
  236.                 }
  237.             }
  238.         } else {
  239.             $composesession = attachSelectedMessages($id, $imapConnection);
  240.             $location = set_url_var($location, 'session', $composesession, false);
  241.             $location = set_url_var($location, 'forward_as_attachment_init', 1, false);
  242.             if ($compose_new_win) {
  243.                 $location = set_url_var($location, 'composenew', 1, false);
  244.             } else {
  245.                 $location = str_replace('search.php','compose.php',$location);
  246.                 $location = str_replace('right_main.php','compose.php',$location);
  247.             }
  248.         }
  249.     } else {
  250.         $exception = true;
  251.     }
  252. } else {    // Move messages
  253.     if (count($id)) {
  254.         // move messages only when target mailbox is not the same as source mailbox
  255.         if ($mailbox!=$targetMailbox) {
  256.             sqimap_msgs_list_move($imapConnection,$id,$targetMailbox);
  257.             if ($auto_expunge) {
  258.                 $cnt = sqimap_mailbox_expunge($imapConnection, $mailbox, true);
  259.             } else {
  260.                 $cnt = 0;
  261.             }
  262.  
  263.             if (($startMessage+$cnt-1) >= $mbx_response['EXISTS']) {
  264.                 if ($startMessage > $show_num) {
  265.                     $location = set_url_var($location,'startMessage',$startMessage-$show_num, false);
  266.                 } else {
  267.                     $location = set_url_var($location,'startMessage',1, false);
  268.                 }
  269.             }
  270.         }
  271.     } else {
  272.         $exception = true;
  273.     }
  274. }
  275. // Log out this session
  276. sqimap_logout($imapConnection);
  277. if ($exception) {
  278.     displayPageHeader($color, $mailbox);
  279.     error_message(_("No messages were selected."), $mailbox, $sort, $startMessage, $color);
  280. } else {
  281.     header("Location: $location");
  282.     exit;
  283. }
  284. ?>
  285. </body></html>

Documentation generated on Mon, 13 Jan 2020 04:25:01 +0100 by phpDocumentor 1.4.3