src/folders_rename_getname.php

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