X-Git-Url: https://vcs.fsf.org/?a=blobdiff_plain;f=src%2Ffolders_delete.php;h=c65fcabd4f0a22e5bc528b3eb5d05849e738d8df;hb=30553e2888fa18c4283c366cb48dd4df8bf2f299;hp=e0c08d0c61fc83bd73c521fb20dd98318fc3df49;hpb=d3cdb279bd61b172926b51d41d09c8a691d6c347;p=squirrelmail.git diff --git a/src/folders_delete.php b/src/folders_delete.php index e0c08d0c..c65fcabd 100644 --- a/src/folders_delete.php +++ b/src/folders_delete.php @@ -1,80 +1,144 @@ -\n"; - $imapConnection = loginToImapServer($username, $key, $imapServerAddress); - getFolderList($imapConnection, $boxes); - - $dm = findMailboxDelimeter($imapConnection); - /** lets see if we CAN move folders to the trash.. otherwise, just delete them **/ - for ($i = 0; $i < count($boxes[$i]["UNFORMATTED"]); $i++) { - if ($boxes[$i]["UNFORMATTED"] == $trash_folder) - $tmp_trash_folder = $boxes[$i]["RAW"]; - } - - $tmpflags = getMailboxFlags($tmp_trash_folder); - $can_move_to_trash = true; - for ($i = 0; $i < count($tmpflags); $i++) { - if (strtolower($tmpflags[$i]) == "noinferiors") - $can_move_to_trash = false; - } - - /** Lets start removing the folders and messages **/ - if (($move_to_trash == true) && ($can_move_to_trash == true)) { /** if they wish to move messages to the trash **/ - /** Creates the subfolders under $trash_folder **/ - for ($i = 0; $i < count($boxes); $i++) { - if (($boxes[$i]["UNFORMATTED"] == $mailbox) || - (substr($boxes[$i]["UNFORMATTED"], 0, strlen($mailbox . $dm)) == $mailbox . $dm)) { - $folderWithoutINBOX = getFolderNameMinusINBOX($boxes[$i]["UNFORMATTED"], $dm); - $flags = getMailboxFlags($boxes[$i]["RAW"]); - for ($b = 0; $b < count($flags); $b++) { - $type = $flags[$b]; - } - createFolder($imapConnection, "$trash_folder" . $dm . "$folderWithoutINBOX", $type); - } - } - for ($i = 0; $i < count($boxes); $i++) { - if (($boxes[$i]["UNFORMATTED"] == $mailbox) || - (substr($boxes[$i]["UNFORMATTED"], 0, strlen($mailbox . $dm)) == $mailbox . $dm)) { - selectMailbox($imapConnection, $boxes[$i]["UNFORMATTED"], $numMessages); - $folder = getFolderNameMinusINBOX($boxes[$i]["UNFORMATTED"]); - - if ($numMessages > 0) - $success = copyMessages($imapConnection, 1, $numMessages, "$trash_folder" . $dm . "$folder"); - else - $success = true; - - if ($success == true) - removeFolder($imapConnection, $boxes[$i]["UNFORMATTED"]); - } - } - } else { /** if they do NOT wish to move messages to the trash (or cannot)**/ - fputs($imapConnection, "1 LIST \"$mailbox\" *\n"); - $data = imapReadData($imapConnection , "1", false, $response, $message); - while (substr($data[0], strpos($data[0], " ")+1, 4) == "LIST") { - for ($i = 0; $i < count($boxes); $i++) { - if (($boxes[$i]["UNFORMATTED"] == $mailbox) || - (substr($boxes[$i]["UNFORMATTED"], 0, strlen($mailbox . $dm)) == $mailbox . $dm)) { - removeFolder($imapConnection, $boxes[$i]["UNFORMATTED"]); - } - } - fputs($imapConnection, "1 LIST \"$mailbox\" *\n"); - $data = imapReadData($imapConnection , "1", false, $response, $message); - } - } - - /** Log out this session **/ - fputs($imapConnection, "1 logout"); - - echo "

Return"; - echo ""; -?> +'._("Click here to go back").'.', $color); + exit; +} + +if ( sqgetGlobalVar('backingout', $tmp, SQ_POST) ) { + $location = get_location(); + header ("Location: $location/folders.php"); + exit; +} + +if( !sqgetGlobalVar('confirmed', $tmp, SQ_POST) ) { + displayPageHeader($color, 'None'); + + echo '
' . + html_tag( 'table', '', 'center', '', 'width="95%" border="0"' ) . + html_tag( 'tr', + html_tag( 'td', '' . _("Delete Folder") . '', 'center', $color[0] ) + ) . + html_tag( 'tr' ) . + html_tag( 'td', '', 'center', $color[4] ) . + sprintf(_("Are you sure you want to delete %s?"), str_replace(array(' ','<','>'),array(' ','<','>'),imap_utf7_decode_local($mailbox))). + addForm('folders_delete.php', 'post')."

\n". + addHidden('mailbox', $mailbox). + addSubmit(_("Yes"), 'confirmed'). + addSubmit(_("No"), 'backingout'). + '


'; + + exit; +} + +$imap_stream = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0); + +$boxes = sqimap_mailbox_list ($imap_stream); +$numboxes = count($boxes); + +global $delete_folder; + +if (substr($mailbox, -1) == $delimiter) + $mailbox_no_dm = substr($mailbox, 0, strlen($mailbox) - 1); +else + $mailbox_no_dm = $mailbox; + +/** lets see if we CAN move folders to the trash.. otherwise, + ** just delete them **/ + +/* Courier IMAP doesn't like subfolders of Trash + * If global options say we can't move it into Trash + * If it's already a subfolder of trash, we'll have to delete it */ +if (strtolower($imap_server_type) == 'courier' || + (isset($delete_folder) && $delete_folder) || + eregi('^'.$trash_folder.'.+', $mailbox) ) +{ + $can_move_to_trash = FALSE; +} + +/* Otherwise, check if trash folder exits and support sub-folders */ +else { + for ($i = 0; $i < $numboxes; $i++) { + if ($boxes[$i]['unformatted'] == $trash_folder) { + $can_move_to_trash = !in_array('noinferiors', $boxes[$i]['flags']); + } + } +} + +/** First create the top node in the tree **/ +for ($i = 0; $i < $numboxes; $i++) { + if (($boxes[$i]['unformatted-dm'] == $mailbox) && (strlen($boxes[$i]['unformatted-dm']) == strlen($mailbox))) { + $foldersTree[0]['value'] = $mailbox; + $foldersTree[0]['doIHaveChildren'] = false; + continue; + } +} + +/* Now create the nodes for subfolders of the parent folder + You can tell that it is a subfolder by tacking the mailbox delimiter + on the end of the $mailbox string, and compare to that. */ +for ($i = 0; $i < $numboxes; $i++) { + if (substr($boxes[$i]['unformatted'], 0, strlen($mailbox_no_dm . $delimiter)) == ($mailbox_no_dm . $delimiter)) { + addChildNodeToTree($boxes[$i]["unformatted"], $boxes[$i]['unformatted-dm'], $foldersTree); + } +} + +/** Lets start removing the folders and messages **/ +if (($move_to_trash == true) && ($can_move_to_trash == true)) { /** if they wish to move messages to the trash **/ + walkTreeInPostOrderCreatingFoldersUnderTrash(0, $imap_stream, $foldersTree, $mailbox); + walkTreeInPreOrderDeleteFolders(0, $imap_stream, $foldersTree); +} else { /** if they do NOT wish to move messages to the trash (or cannot)**/ + walkTreeInPreOrderDeleteFolders(0, $imap_stream, $foldersTree); +} + +/** Log out this session **/ +sqimap_logout($imap_stream); + +$location = get_location(); +header ("Location: $location/folders.php?success=delete"); + +?> \ No newline at end of file