src/folders.php

   1 <?php
   2
   3 /**
   4  * folders.php
   5  *
   6  * Copyright (c) 1999-2003 The SquirrelMail Project Team
   7  * Licensed under the GNU GPL. For full terms see the file COPYING.
   8  *
   9  * Handles all interaction between the user and the other folder
  10  * scripts which do most of the work. Also handles the Special
  11  * Folders.
  12  *
  13  * $Id$
  14  */
  15
  16 /* Path for SquirrelMail required files. */
  17 define('SM_PATH','../');
  18
  19 /* SquirrelMail required files. */
  20 require_once(SM_PATH . 'include/validate.php');
  21 require_once(SM_PATH . 'functions/imap.php');
  22 require_once(SM_PATH . 'functions/plugin.php');
  23 require_once(SM_PATH . 'functions/html.php');
  24
  25 displayPageHeader($color, 'None');
  26
  27 /* get globals we may need */
  28
  29 sqgetGlobalVar('username', $username, SQ_SESSION);
  30 sqgetGlobalVar('key', $key, SQ_COOKIE);
  31 sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION);
  32 sqgetGlobalVar('onetimepad', $onetimepad, SQ_SESSION);
  33
  34 sqgetGlobalVar('success', $success, SQ_GET);
  35
  36 /* end of get globals */
  37
  38 echo '<br>' .
  39     html_tag( 'table', '', 'center', $color[0], 'width="95%" cellpadding="1" cellspacing="0" border="0"' ) .
  40         html_tag( 'tr' ) .
  41             html_tag( 'td', '', 'center' ) . '<b>' . _("Folders") . '</b>' .
  42                 html_tag( 'table', '', 'center', '', 'width="100%" cellpadding="5" cellspacing="0" border="0"' ) .
  43                     html_tag( 'tr' ) .
  44                         html_tag( 'td', '', 'center', $color[4] );
  45
  46 if ( isset($success) && $success ) {
  47
  48     $td_str = '<b>';
  49
  50     switch ($success)
  51     {
  52         case 'subscribe':
  53             $td_str .=  _("Subscribed successfully!");
  54             break;
  55         case 'unsubscribe':
  56             $td_str .=  _("Unsubscribed successfully!");
  57             break;
  58         case 'delete':
  59             $td_str .=  _("Deleted folder successfully!");
  60             break;
  61         case 'create':
  62             $td_str .=  _("Created folder successfully!");
  63             break;
  64         case 'rename':
  65             $td_str .=  _("Renamed successfully!");
  66             break;
  67         case 'subscribe-doesnotexist':
  68             $td_str .=  _("Subscription Unsuccessful - Folder does not exist.");
  69             break;
  70     }
  71
  72     $td_str .= '</b><br>';
  73
  74
  75     echo html_tag( 'table',
  76                 html_tag( 'tr',
  77                      html_tag( 'td', $td_str .
  78                                '<a href="../src/left_main.php" target=left>' .
  79                                _("refresh folder list") . '</a>' ,
  80                      'center' )
  81                 ) ,
  82             'center', '', 'width="100%" cellpadding="4" cellspacing="0" border="0"' );
  83 }
  84
  85 echo "\n<br>";
  86
  87 $imapConnection = sqimap_login ($username, $key, $imapServerAddress, $imapPort, 0);
  88 $boxes = sqimap_mailbox_list($imapConnection);
  89
  90 /** CREATING FOLDERS **/
  91 echo html_tag( 'table', '', 'center', '', 'width="70%" cellpadding="4" cellspacing="0" border="0"' ) .
  92             html_tag( 'tr',
  93                 html_tag( 'td', '<b>' . _("Create Folder") . '</b>', 'center', $color[9] )
  94             ) .
  95             html_tag( 'tr' ) .
  96                 html_tag( 'td', '', 'center', $color[0] ) .
  97
  98      "<FORM NAME=cf ACTION=\"folders_create.php\" METHOD=\"POST\">\n".
  99      "<input type=TEXT SIZE=25 NAME=folder_name><BR>\n".
 100      _("as a subfolder of").
 101      '<BR>'.
 102      "<TT><SELECT NAME=subfolder>\n";
 103
 104 $show_selected = array();
 105 $skip_folders = array();
 106 $server_type = strtolower($imap_server_type);
 107 if ( $server_type == 'courier' ) {
 108   array_push($skip_folders, 'inbox.trash');
 109   if ( $default_folder_prefix == 'INBOX.' ) {
 110     array_push($skip_folders, 'inbox');
 111   }
 112 }
 113
 114 if ( $default_sub_of_inbox == false ) {
 115     echo '<OPTION SELECTED VALUE="">[ '._("None")." ]\n";
 116 } else {
 117     echo '<OPTION VALUE="">[ '._("None")." ]\n";
 118     $show_selected = array('inbox');
 119 }
 120
 121 // Call sqimap_mailbox_option_list, using existing connection to IMAP server,
 122 // the arrays of folders to include or skip (assembled above),
 123 // use 'noinferiors' as a mailbox filter to leave out folders that can not contain other folders.
 124 // use the long format to show subfolders in an intelligible way if parent is missing (special folder)
 125 echo sqimap_mailbox_option_list($imapConnection, $show_selected, $skip_folders, $boxes, 'noinferiors', true);
 126
 127 echo "</SELECT></TT>\n";
 128 if ($show_contain_subfolders_option) {
 129     echo '<br><input type=CHECKBOX NAME="contain_subs"> &nbsp;'
 130        . _("Let this folder contain subfolders")
 131        . '<BR>';
 132 }
 133 echo "<input type=SUBMIT VALUE=\""._("Create")."\">\n";
 134 echo "</FORM></td></tr>\n";
 135
 136 echo html_tag( 'tr',
 137             html_tag( 'td', '&nbsp;', 'left', $color[4] )
 138         ) ."\n";
 139
 140 /** count special folders **/
 141 $count_special_folders = 0;
 142 $num_max = 1;
 143 if (strtolower($imap_server_type) == "courier" || $move_to_trash) {
 144     $num_max++;
 145 }
 146 if ($move_to_sent) {
 147     $num_max++;
 148 }
 149 if ($save_as_draft) {
 150     $num_max++;
 151 }
 152 for ($p = 0, $cnt = count($boxes); $p < $cnt && $count_special_folders < $num_max; $p++) {
 153     if (strtolower($boxes[$p]['unformatted']) == 'inbox')
 154         $count_special_folders++;
 155     else if (strtolower($imap_server_type) == 'courier' &&
 156             strtolower($boxes[$p]['unformatted']) == 'inbox.trash') {
 157         $count_special_folders++;
 158     }
 159     else if ($boxes[$p]['unformatted'] == $trash_folder && $trash_folder) {
 160         $count_special_folders++;
 161         array_push($skip_folders, strtolower($trash_folder));
 162     }
 163     else if ($boxes[$p]['unformatted'] == $sent_folder && $sent_folder) {
 164         $count_special_folders++;
 165         array_push($skip_folders, strtolower($sent_folder));
 166     }
 167     else if ($boxes[$p]['unformatted'] == $draft_folder && $draft_folder) {
 168         $count_special_folders++;
 169         array_push($skip_folders, strtolower($draft_folder));
 170     }
 171 }
 172
 173
 174 /** RENAMING FOLDERS **/
 175 echo html_tag( 'tr',
 176             html_tag( 'td', '<b>' . _("Rename a Folder") . '</b>', 'center', $color[9] )
 177         ) .
 178         html_tag( 'tr' ) .
 179         html_tag( 'td', '', 'center', $color[0] );
 180
 181 if ($count_special_folders < count($boxes)) {
 182     echo "<FORM ACTION=\"folders_rename_getname.php\" METHOD=\"POST\">\n"
 183        . "<TT><SELECT NAME=old>\n"
 184        . '         <OPTION VALUE="">[ ' . _("Select a folder") . " ]</OPTION>\n";
 185
 186     // use existing IMAP connection, we have no special values to show,
 187     // but we do include values to skip. Use the pre-created $boxes to save an IMAP query.
 188     // send NULL for the flag - ALL folders are eligible for rename!
 189     // use long format to make sure folder names make sense when parents may be missing.
 190     echo sqimap_mailbox_option_list($imapConnection, 0, $skip_folders, $boxes, NULL, true);
 191
 192     echo "</SELECT></TT>\n".
 193          "<input type=SUBMIT VALUE=\"".
 194          _("Rename").
 195          "\">\n".
 196          "</FORM></td></tr>\n";
 197 } else {
 198     echo _("No folders found") . '<br><br></td></tr>';
 199 }
 200 $boxes_sub = $boxes;
 201
 202 echo html_tag( 'tr',
 203             html_tag( 'td', '&nbsp;', 'left', $color[4] )
 204         ) ."\n";
 205
 206 /** DELETING FOLDERS **/
 207 echo html_tag( 'tr',
 208             html_tag( 'td', '<b>' . _("Delete Folder") . '</b>', 'center', $color[9] )
 209         ) .
 210         html_tag( 'tr' ) .
 211         html_tag( 'td', '', 'center', $color[0] );
 212
 213 if ($count_special_folders < count($boxes)) {
 214     echo "<FORM ACTION=\"folders_delete.php\" METHOD=\"POST\">\n"
 215        . "<TT><SELECT NAME=mailbox>\n"
 216        . '         <OPTION VALUE="">[ ' . _("Select a folder") . " ]</OPTION>\n";
 217
 218     // send NULL for the flag - ALL folders are eligible for delete (except what we've got in skiplist)
 219     // use long format to make sure folder names make sense when parents may be missing.
 220     echo sqimap_mailbox_option_list($imapConnection, 0, $skip_folders, $boxes, NULL, true);
 221
 222     echo "</SELECT></TT>\n"
 223        . '<input type=SUBMIT VALUE="'
 224        . _("Delete")
 225        . "\">\n"
 226        . "</form></td></tr>\n";
 227 } else {
 228     echo _("No folders found") . "<br><br></td></tr>";
 229 }
 230
 231 echo html_tag( 'tr',
 232             html_tag( 'td', '&nbsp;', 'left', $color[4] )
 233         ) ."</table>\n";
 234
 235
 236 /** UNSUBSCRIBE FOLDERS **/
 237 echo html_tag( 'table', '', 'center', '', 'width="70%" cellpadding="4" cellspacing="0" border="0"' ) .
 238             html_tag( 'tr',
 239                 html_tag( 'td', '<b>' . _("Unsubscribe") . '/' . _("Subscribe") . '</b>', 'center', $color[9], 'colspan="2"' )
 240             ) .
 241             html_tag( 'tr' ) .
 242                 html_tag( 'td', '', 'center', $color[0], 'width="50%"' );
 243
 244 if ($count_special_folders < count($boxes)) {
 245     echo "<FORM ACTION=\"folders_subscribe.php?method=unsub\" METHOD=\"POST\">\n"
 246        . "<TT><SELECT NAME=\"mailbox[]\" multiple size=8>\n";
 247     for ($i = 0; $i < count($boxes); $i++) {
 248         $use_folder = true;
 249         if ((strtolower($boxes[$i]["unformatted"]) != "inbox") &&
 250             ($boxes[$i]["unformatted"] != $trash_folder) &&
 251             ($boxes[$i]["unformatted"] != $sent_folder) &&
 252             ($boxes[$i]["unformatted"] != $draft_folder)) {
 253             $box = $boxes[$i]["unformatted-dm"];
 254             $box2 = str_replace(' ', '&nbsp;',
 255                                 imap_utf7_decode_local($boxes[$i]["unformatted-disp"]));
 256             echo "         <OPTION VALUE=\"$box\">$box2\n";
 257         }
 258     }
 259     echo "</SELECT></TT><br><br>\n"
 260        . '<input type=SUBMIT VALUE="'
 261        . _("Unsubscribe")
 262        . "\">\n"
 263        . "</FORM></td>\n";
 264 } else {
 265     echo _("No folders were found to unsubscribe from!") . '</td>';
 266 }
 267 $boxes_sub = $boxes;
 268
 269 /** SUBSCRIBE TO FOLDERS **/
 270 echo html_tag( 'td', '', 'center', $color[0], 'width="50%"' );
 271 if(!$no_list_for_subscribe) {
 272   $boxes_all = sqimap_mailbox_list_all ($imapConnection);
 273
 274   $box = '';
 275   $box2 = '';
 276   for ($i = 0, $q = 0; $i < count($boxes_all); $i++) {
 277     $use_folder = true;
 278     for ($p = 0; $p < count ($boxes); $p++) {
 279         if ($boxes_all[$i]['unformatted'] == $boxes[$p]['unformatted']) {
 280             $use_folder = false;
 281             continue;
 282         } else if ($boxes_all[$i]['unformatted-dm'] == $folder_prefix) {
 283             $use_folder = false;
 284         }
 285     }
 286     if ($use_folder == true) {
 287         $box[$q] = $boxes_all[$i]['unformatted-dm'];
 288         $box2[$q] = imap_utf7_decode_local($boxes_all[$i]['unformatted-disp']);
 289         $q++;
 290     }
 291   }
 292   if ($box && $box2) {
 293     echo "<FORM ACTION=\"folders_subscribe.php?method=sub\" METHOD=\"POST\">\n"
 294        . '<tt><select name="mailbox[]" multiple size=8>';
 295
 296     for ($q = 0; $q < count($box); $q++) {
 297        echo "         <OPTION VALUE=\"$box[$q]\">".$box2[$q]."\n";
 298     }
 299     echo '</select></tt><br><br>'
 300        . '<input type=SUBMIT VALUE="'. _("Subscribe") . "\">\n"
 301        . "</FORM></td></tr></table><BR>\n";
 302   } else {
 303     echo _("No folders were found to subscribe to!") . '</td></tr></table>';
 304   }
 305 } else {
 306   /* don't perform the list action -- this is much faster */
 307   echo "<FORM ACTION=\"folders_subscribe.php?method=sub\" METHOD=\"POST\">\n"
 308      . _("Subscribe to:") . '<br>'
 309      . '<tt><input type="text" name="mailbox[]" size=35>'
 310      . '<INPUT TYPE=SUBMIT VALUE="'. _("Subscribe") . "\">\n"
 311      . "</FORM></TD></TR></TABLE><BR>\n";
 312 }
 313
 314 do_hook('folders_bottom');
 315 ?>
 316
 317     </td></tr>
 318     </table>
 319
 320 </td></tr>
 321 </table>
 322
 323 <?php
 324    sqimap_logout($imapConnection);
 325 ?>
 326
 327 </body></html>