src/folders_rename_getname.php

   1 <?php
   2    /**
   3     **  folders_rename_getname.php
   4     **
   5     **  Copyright (c) 1999-2000 The SquirrelMail development team
   6     **  Licensed under the GNU GPL. For full terms see the file COPYING.
   7     **
   8     **  Gets folder names and enables renaming
   9     **  Called from folders.php
  10     **
  11     **  $Id$
  12     **/
  13
  14    require_once('../src/validate.php');
  15    require_once('../functions/imap.php');
  16
  17    $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
  18
  19    $dm = sqimap_get_delimiter($imapConnection);
  20    if (substr($old, strlen($old) - strlen($dm)) == $dm) {
  21       $isfolder = true;
  22       $old = substr($old, 0, strlen($old) - 1);
  23    }
  24
  25    if (strpos($old, $dm)) {
  26       $old_name = substr($old, strrpos($old, $dm)+1, strlen($old));
  27       $old_parent = substr($old, 0, strrpos($old, $dm));
  28    } else {
  29       $old_name = $old;
  30       $old_parent = "";
  31    }
  32
  33    displayPageHeader($color, "None");
  34    echo "<br><TABLE align=center border=0 WIDTH=95% COLS=1>";
  35    echo "<TR><TD BGCOLOR=\"$color[0]\" ALIGN=CENTER><B>";
  36    echo _("Rename a folder");
  37    echo "</B></TD></TR>";
  38    echo "<TR><TD BGCOLOR=\"$color[4]\" ALIGN=CENTER>";
  39    echo "<FORM ACTION=\"folders_rename_do.php\" METHOD=\"POST\">\n";
  40    echo _("New name:");
  41    echo "<br><B>$old_parent . </B><INPUT TYPE=TEXT SIZE=25 NAME=new_name VALUE=\"$old_name\"><BR>\n";
  42    if (isset($isfolder))
  43       echo "<INPUT TYPE=HIDDEN NAME=isfolder VALUE=\"true\">";
  44    printf("<INPUT TYPE=HIDDEN NAME=orig VALUE=\"%s\">\n", $old);
  45    printf("<INPUT TYPE=HIDDEN NAME=old_name VALUE=\"%s\">\n", $old_name);
  46    echo "<INPUT TYPE=SUBMIT VALUE=\""._("Submit")."\">\n";
  47    echo "</FORM><BR></TD></TR>";
  48    echo "</TABLE>";
  49
  50    /** Log out this session **/
  51    sqimap_logout($imapConnection);
  52 ?>