Source for file move_messages.php

Documentation is available at move_messages.php

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

Documentation generated on Sat, 07 Oct 2006 16:32:38 +0300 by phpDocumentor 1.3.0RC6