src/empty_trash.php

   1 <?php
   2
   3 /**
   4  * empty_trash.php
   5  *
   6  * Copyright (c) 1999-2001 The Squirrelmail Development Team
   7  * Licensed under the GNU GPL. For full terms see the file COPYING.
   8  *
   9  * Handles deleting messages from the trash folder without
  10  * deleting subfolders.
  11  *
  12  * $Id$
  13  */
  14
  15 /*****************************************************************/
  16 /*** THIS FILE NEEDS TO HAVE ITS FORMATTING FIXED!!!           ***/
  17 /*** PLEASE DO SO AND REMOVE THIS COMMENT SECTION.             ***/
  18 /***    + Base level indent should begin at left margin, as    ***/
  19 /***      the require_once below looks.                        ***/
  20 /***    + All identation should consist of four space blocks   ***/
  21 /***    + Tab characters are evil.                             ***/
  22 /***    + all comments should use "slash-star ... star-slash"  ***/
  23 /***      style -- no pound characters, no slash-slash style   ***/
  24 /***    + FLOW CONTROL STATEMENTS (if, while, etc) SHOULD      ***/
  25 /***      ALWAYS USE { AND } CHARACTERS!!!                     ***/
  26 /***    + Please use ' instead of ", when possible. Note "     ***/
  27 /***      should always be used in _( ) function calls.        ***/
  28 /*** Thank you for your help making the SM code more readable. ***/
  29 /*****************************************************************/
  30
  31 require_once('../src/validate.php');
  32 require_once('../functions/display_messages.php');
  33 require_once('../functions/imap.php');
  34 require_once('../functions/array.php');
  35 require_once('../functions/tree.php');
  36
  37    $imap_stream = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
  38
  39    sqimap_mailbox_list($imap_stream);
  40
  41    $mailbox = $trash_folder;
  42    $boxes = sqimap_mailbox_list($imap_stream);
  43    global $delimiter;
  44
  45    // According to RFC2060, a DELETE command should NOT remove inferiors (sub folders)
  46    //    so lets go through the list of subfolders and remove them before removing the
  47    //    parent.
  48
  49    /** First create the top node in the tree **/
  50    for ($i = 0;$i < count($boxes);$i++) {
  51       if (($boxes[$i]["unformatted"] == $mailbox) && (strlen($boxes[$i]["unformatted"]) == strlen($mailbox))) {
  52          $foldersTree[0]["value"] = $mailbox;
  53          $foldersTree[0]["doIHaveChildren"] = false;
  54          continue;
  55       }
  56    }
  57    // Now create the nodes for subfolders of the parent folder
  58    // You can tell that it is a subfolder by tacking the mailbox delimiter
  59    //    on the end of the $mailbox string, and compare to that.
  60    $j = 0;
  61    for ($i = 0;$i < count($boxes);$i++) {
  62       if (substr($boxes[$i]["unformatted"], 0, strlen($mailbox . $delimiter)) == ($mailbox . $delimiter)) {
  63          addChildNodeToTree($boxes[$i]["unformatted"], $boxes[$i]["unformatted-dm"], $foldersTree);
  64       }
  65    }
  66
  67    // now lets go through the tree and delete the folders
  68    walkTreeInPreOrderEmptyTrash(0, $imap_stream, $foldersTree);
  69
  70    $location = get_location();
  71    header ("Location: $location/left_main.php");
  72
  73    sqimap_logout($imap_stream);
  74 ?>