Source for file folders_delete.php

Documentation is available at folders_delete.php

  1. <?php
  3. /**
  4. * folders_delete.php
  5. *
  6. * Deletes folders from the IMAP server.
  7. * Called from the folders.php
  8. *
  9. * @copyright 1999-2020 The SquirrelMail Project Team
  10. * @license http://opensource.org/licenses/gpl-license.php GNU Public License
  11. * @version $Id: folders_delete.php 14840 2020年01月07日 07:42:38Z pdontthink $
  12. * @package squirrelmail
  13. */
  15. /** This is the folders_delete page */
  16. define ('PAGE_NAME', 'folders_delete');
  18. /**
  19. * Path for SquirrelMail required files.
  20. * @ignore
  21. */
  22. define ('SM_PATH','../');
  24. /* SquirrelMail required files. */
  25. require_once(SM_PATH . 'include/validate.php');
  26. require_once(SM_PATH . 'functions/global.php');
  27. require_once(SM_PATH . 'functions/imap.php');
  28. require_once(SM_PATH . 'functions/tree.php');
  29. require_once(SM_PATH . 'functions/display_messages.php');
  30. require_once(SM_PATH . 'functions/html.php');
  31. require_once(SM_PATH . 'functions/forms.php');
  33. /*
  34. * Incoming values:
  35. * $mailbox - selected mailbox from the form
  36. */
  38. /* globals */
  39. sqgetGlobalVar ('key', $key, SQ_COOKIE );
  40. sqgetGlobalVar ('username', $username, SQ_SESSION );
  41. sqgetGlobalVar ('onetimepad',$onetimepad, SQ_SESSION );
  42. sqgetGlobalVar ('delimiter', $delimiter, SQ_SESSION );
  43. sqgetGlobalVar ('mailbox', $mailbox, SQ_POST );
  44. if (!sqgetGlobalVar ('smtoken',$submitted_token, SQ_POST )) {
  45. $submitted_token = '';
  46. }
  47. /* end globals */
  49. if ($mailbox == '') {
  50. displayPageHeader ($color, 'None');
  52. plain_error_message (_ ("You have not selected a folder to delete. Please do so.").
  53. '<br /><a href="../src/folders.php">'._ ("Click here to go back").'</a>.', $color);
  54. exit;
  55. }
  57. if ( sqgetGlobalVar ('backingout', $tmp, SQ_POST ) ) {
  58. $location = get_location ();
  59. header ("Location: $location/folders.php");
  60. exit;
  61. }
  63. if( !sqgetGlobalVar ('confirmed', $tmp, SQ_POST ) ) {
  64. displayPageHeader ($color, 'None');
  66. // get displayable mailbox format
  67. global $folder_prefix;
  68. if (substr ($mailbox,0,strlen ($folder_prefix))==$folder_prefix) {
  69. $mailbox_unformatted_disp = substr ($mailbox, strlen ($folder_prefix));
  70. } else {
  71. $mailbox_unformatted_disp = $mailbox;
  72. }
  74. echo '<br />' .
  75. html_tag ( 'table', '', 'center', '', 'width="95%" border="0"' ) .
  76. html_tag ( 'tr',
  77. html_tag ( 'td', '<b>' . _ ("Delete Folder") . '</b>', 'center', $color[0] )
  78. ) .
  79. html_tag ( 'tr' ) .
  80. html_tag ( 'td', '', 'center', $color[4] ) .
  81. sprintf (_ ("Are you sure you want to delete %s?"), str_replace (array(' ','<','>'),array('&nbsp;','&lt;','&gt;'),imap_utf7_decode_local ($mailbox_unformatted_disp))).
  82. addForm ('folders_delete.php', 'post', '', '', '', '', TRUE)."<p>\n".
  83. addHidden ('mailbox', $mailbox).
  84. addSubmit (_ ("Yes"), 'confirmed').
  85. addSubmit (_ ("No"), 'backingout').
  86. '</p></form><br /></td></tr></table>';
  88. exit;
  89. }
  91. // first, validate security token
  92. sm_validate_security_token ($submitted_token, -1, TRUE);
  94. global $imap_stream_options; // in case not defined in config
  95. $imap_stream = sqimap_login ($username, $key, $imapServerAddress, $imapPort, 0, $imap_stream_options);
  97. $boxes = sqimap_mailbox_list ($imap_stream);
  98. $numboxes = count ($boxes);
  100. global $delete_folder;
  102. if (substr ($mailbox, -1) == $delimiter)
  103. $mailbox_no_dm = substr ($mailbox, 0, strlen ($mailbox) - 1);
  104. else
  105. $mailbox_no_dm = $mailbox;
  107. /** lets see if we CAN move folders to the trash.. otherwise,
  108. ** just delete them **/
  110. if ((isset($delete_folder) && $delete_folder) ||
  111. preg_match ('/^' . preg_quote ($trash_folder, '/') . '.+/i', $mailbox) ) {
  112. $can_move_to_trash = FALSE;
  113. }
  115. /* Otherwise, check if trash folder exits and support sub-folders */
  116. else {
  117. for ($i = 0; $i < $numboxes; $i++) {
  118. if ($boxes[$i]['unformatted'] == $trash_folder) {
  119. $can_move_to_trash = !in_array ('noinferiors', $boxes[$i]['flags']);
  120. }
  121. }
  122. }
  124. /** First create the top node in the tree **/
  125. for ($i = 0; $i < $numboxes; $i++) {
  126. if (($boxes[$i]['unformatted-dm'] == $mailbox) && (strlen ($boxes[$i]['unformatted-dm']) == strlen ($mailbox))) {
  127. $foldersTree[0]['value'] = $mailbox;
  128. $foldersTree[0]['doIHaveChildren'] = false;
  129. continue;
  130. }
  131. }
  133. /* Now create the nodes for subfolders of the parent folder
  134. You can tell that it is a subfolder by tacking the mailbox delimiter
  135. on the end of the $mailbox string, and compare to that. */
  136. for ($i = 0; $i < $numboxes; $i++) {
  137. if (substr ($boxes[$i]['unformatted'], 0, strlen ($mailbox_no_dm . $delimiter)) == ($mailbox_no_dm . $delimiter)) {
  138. addChildNodeToTree ($boxes[$i]["unformatted"], $boxes[$i]['unformatted-dm'], $foldersTree);
  139. }
  140. }
  142. /** Lets start removing the folders and messages **/
  143. if (($move_to_trash == true) && ($can_move_to_trash == true)) { /** if they wish to move messages to the trash **/
  144. walkTreeInPostOrderCreatingFoldersUnderTrash (0, $imap_stream, $foldersTree, $mailbox);
  145. walkTreeInPreOrderDeleteFolders (0, $imap_stream, $foldersTree);
  146. } else { /** if they do NOT wish to move messages to the trash (or cannot)**/
  147. walkTreeInPreOrderDeleteFolders (0, $imap_stream, $foldersTree);
  148. }
  150. /** Log out this session **/
  151. sqimap_logout ($imap_stream);
  153. $location = get_location ();
  154. header ("Location: $location/folders.php?success=delete");

Documentation generated on 2020年1月13日 04:24:38 +0100 by phpDocumentor 1.4.3

AltStyle によって変換されたページ (->オリジナル) /