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 if ($old == '') {
  21     displayPageHeader($color, 'None');
  22     echo "<html><body bgcolor=$color[4]>";
  23     plain_error_message(_("You have not selected a folder to rename. Please do so.")."<BR><A HREF=\"../src/folders.php\">"._("Click here to go back")."</A>.", $color);
  24     exit;
  25 }
  26
  27
  28 $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
  29
  30 if (substr($old, strlen($old) - strlen($delimiter)) == $delimiter) {
  31     $isfolder = TRUE;
  32     $old = substr($old, 0, strlen($old) - 1);
  33 } else {
  34     $isfolder = FALSE;
  35 }
  36
  37 if (strpos($old, $delimiter)) {
  38     $old_name = substr($old, strrpos($old, $delimiter)+1, strlen($old));
  39     $old_parent = substr($old, 0, strrpos($old, $delimiter));
  40 } else {
  41     $old_name = $old;
  42     $old_parent = '';
  43 }
  44
  45 displayPageHeader($color, 'None');
  46 echo "<br><TABLE align=center border=0 WIDTH=\"95%\" COLS=1>".
  47      "<TR><TD BGCOLOR=\"$color[0]\" ALIGN=CENTER><B>".
  48      _("Rename a folder").
  49      "</B></TD></TR>".
  50      "<TR><TD BGCOLOR=\"$color[4]\" ALIGN=CENTER>".
  51      "<FORM ACTION=\"folders_rename_do.php\" METHOD=\"POST\">\n".
  52      _("New name:").
  53      "<br><B>$old_parent $delimiter </B><INPUT TYPE=TEXT SIZE=25 NAME=new_name VALUE=\"$old_name\"><BR>\n";
  54 if ( $isfolder ) {
  55     echo "<INPUT TYPE=HIDDEN NAME=isfolder VALUE=\"true\">";
  56 }
  57 printf("<INPUT TYPE=HIDDEN NAME=orig VALUE=\"%s\">\n", $old);
  58 printf("<INPUT TYPE=HIDDEN NAME=old_name VALUE=\"%s\">\n", $old_name);
  59 echo "<INPUT TYPE=SUBMIT VALUE=\""._("Submit")."\">\n".
  60      "</FORM><BR></TD></TR>".
  61      "</TABLE>";
  62
  63 /** Log out this session **/
  64 sqimap_logout($imapConnection);
  65 ?>