GimpsterDotCom - My = Shell

This is an alternative to PhpShell, = written by=20 Alejandro Vasquez admin@digitart.com.mx.
The Code

<?php
/*
  **************************************************************
  *                        MyShell                             *
  **************************************************************
  $Id: shell.php,v 1.1.0 beta 2001/09/23 23:25:12 digitart Exp $

  An interactive PHP-page that will execute any command entered.
  See the files README and INSTALL or http://www.digitart.net  for
  further information.
  Copyright =A92001 Alejandro Vasquez <admin@digitart.com.mx>
  based on the original program phpShell by Martin Geisler

  This program is free software; you can redistribute it and/or
  modify it under the terms of the GNU General Public License
  as published by the Free Software Foundation; either version 2
  of the License, or (at your option) any later version.

  This program is distributed in the hope that it will be useful,
  but WITHOUT ANY WARRANTY; without even the implied warranty of
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  GNU General Public License for more details.

  You can get a copy of the GNU General Public License from this
  address: http://www.gnu.org/copyleft/gpl.html#SEC1
  You can also write to the Free Software Foundation, Inc., 59 Temple
  Place - Suite 330, Boston, MA  02111-1307, USA.
*/

#$selfSecure enables built-in authenticate feature. This must be 0 in =
order to
#use .htaccess file or other alternative method to control access to =
MyShell.
#Set up your user and password using $shellUser and $shellPswd.
#DO NOT TURN THIS OFF UNLESS YOU HAVE AN ALTERNATE METHOD TO PROTECT
#ACCESS TO THE SCRIPT.

$selfSecure =3D 1;
$shellUser  =3D "root";
$shellPswd  =3D "lool";

#$adminEmail is the email address to send warning notifications in case
#someone tries to access the script and fails to provide correct user =
and
#password. This only works if you have $selfSecure enabeled.

$adminEmail =3D "yourname@yourdomain.com";

#$fromEmail is the email address warning messages are sended from.
#This defaults to the server admin, but you can change
#to any address you want i.e.: noreplay@yourdomain.com
#This only works if you have $selfSecure enabeled.

$fromEmail  =3D $HTTP_SERVER_VARS["SERVER_ADMIN"];

#$dirLimit is the top directory allowed to change when using cd command
#or the form selector. Any attempt to change to a directory up to this
#level bounces MyShell to this directory. i.e.: $dirLimit =3D "/home";
#It is a good practice to set it to $DOCUMENT_ROOT using:
#$dirLimit =3D $DOCUMENT_ROOT;
#If you want to have access to all server directories leave it blank.
#WARNING: Althought a user won't be able to snoop on directories above
#this level using MyShell, he/she will still be able to excecute
#commands on any directory where Webserver has permission,
#i.e.: mkdir /tmp/mydir or cat /home/otheruser/.htaccess.

$dirLimit =3D "";

#$autoErrorTrap Enable automatic error traping if command returns error.
#Bear in mind that MyShell executes the command a second time in order =
to
#trap the stderr. This shouldn't be a problem in most cases.
#If you turn it off, you'll have to select either to trap stderr or not =
for
#every command you excecute.

$autoErrorTrap =3D 1;

#$voidCommands is the list of commands that MyShell won't run by any =
means.
#It defaults to known problematic commands from a web interface like =
pico,
#top, xterm but also it can include specific commands you don't want to
#be excecuted from MyShell, i.e.: dig, ping, info, kill etc.

$voidCommands  =3D array("top","xterm","su","vi","pico","netscape");

#$TexEd Built-in Text Editor prefered name. This is the command you'll =
use
#to invoke MyShell's built in text editor.
# If you are used to type pico or vi for your fav text editor,
#change this to your please. i.e.:
#  $TexEd =3D "pico";
#will allow you to type 'pico config.php' to edit the file config.php
#MyShell's text editor do not support usual commands in pico, vi etc.
#Don't forget to take off this command from the $voidCommands list
$TexEd  =3D "edit";

#$editWrap selects to use or not wrap in the editor's textarea. Wrap OFF
#is usefull when you have to edit files with long lines, i.e.: in php =
code
#files, because otherwise it is no easy to distinguish a real new line =
(CR)
#from a wraped one. If you prefer to stick to the default wraped mode of
#TEXTAREA just leave this blank i.e.: $editWrap=3D"".
$editWrap =3D"wrap=3D'OFF'";

#Cosmetic defaults.

$termCols     =3D 80;            //Default width of the output text area
$termRows     =3D 20;            //Default heght of the output text area
$bgColor      =3D "#000000";     //background color
$bgInputColor =3D "#333333";     //color of the input field
$outColor     =3D "#00BB00";     //color of the text output from the =
server
$textColor    =3D "#009900";     //color of the hard texts of the =
terminal
$linkColor    =3D "#00FF00";     //color of the links

/************** No customize needed from this point *************/

$MyShellVersion =3D "MyShell 1.1.0 build 20010923";
if =
($command&&get_magic_quotes_gpc())$command=3Dstripslashes($comman=
d);
if($selfSecure){
    if (($PHP_AUTH_USER!=3D$shellUser)||($PHP_AUTH_PW!=3D$shellPswd)) {
       Header('WWW-Authenticate: Basic realm=3D"MyShell"');
       Header('HTTP/1.0 401 Unauthorized');
       echo "<html>
         <head>
         <title>$MyShellVersion - Access Denied</title>
         </head>
         <h1>Access denied</h1>
         A warning message have been sended to the administrator
         <hr>
         <em>$MyShellVersion</em>";
       if(isset($PHP_AUTH_USER)){
          $warnMsg =3D"
 This is $MyShellVersion
 installed on: http://".$HTTP_SERVER_VARS["HTTP_HOST"]."$PHP_SELF
 just to let you know that somebody tryed to access
 the script using wrong username or password:

 Date: ".date("Y-m-d H:i:s")."
 IP: ".$HTTP_SERVER_VARS["REMOTE_ADDR"]."
 User Agent: ".$HTTP_SERVER_VARS["HTTP_USER_AGENT"]."
 username used: $PHP_AUTH_USER
 password used: $PHP_AUTH_PW

 If this is not the first time it happens,
 please consider either to remove MyShell
 from your system or change it's name or
 directory location on your server.

 Regards
 The MyShell dev team
       ";
          mail($adminEmail,"MyShell Warning - Unauthorized =
Access",$warnMsg,
          "From: $fromEmail\nX-Mailer:$MyShellVersion AutoWarn System");
       }
       exit;
    }
}
//Function that validate directories
function validate_dir($dir){
    GLOBAL $dirLimit;
    if($dirLimit){
        $cdPos =3D strpos($dir,$dirLimit);
        if ((string)$cdPos =3D=3D "") {
            $dir =3D $dirLimit;
            $GLOBALS["shellOutput"] =3D "You are not allowed change to =
directories above $dirLimit\n";
        }
    }
    return $dir;
}

// Set working directory.
if (isset($work_dir)) {
  //A workdir has been asked for - we chdir to that dir.
  $work_dir =3D validate_dir($work_dir);
  @chdir($work_dir) or
      ($shellOutput =3D "MyShell: can't change directory. Permission =
denied\nSwitching back to $DOCUMENT_ROOT\n");
  $work_dir =3D exec("pwd");
}
else{
  // No work_dir - we chdir to $DOCUMENT_ROOT
  $work_dir =3D validate_dir($DOCUMENT_ROOT);
  chdir($work_dir);
  $work_dir =3D exec("pwd");
}

//Now we handle files if we are in Edit Mode
if($editMode && ($command||$editCancel))$editMode=3Dfalse;
if($editMode){
    if($editSave ||$editSaveExit){
        if(function_exists(ini_set))ini_set("track_errors","1");
        if($fp=3D@fopen($file,"w")){
           =
if(get_magic_quotes_gpc())$shellOut=3Dstripslashes($shellOut);
           fputs($fp,$shellOut);
           fclose($fp);
           $command =3D $TexEd." ".$file;
           if($editSaveExit) {
               $command=3D"";
               $shellOutput=3D"MyShell: $file: saved";
               $editMode=3Dfalse;
           }
       }
       else {
           $command=3D"";
           $shellOutput=3D"MyShell: Error while saving =
$file:\n$php_errormsg\nUse back button to recover your changes.";
           $errorSave=3Dtrue;
       }
    }
}

//Separate command(s) and arguments to analize first command
$input=3Dexplode(" ",$command);

while (list ($key, $val) =3D each ($voidCommands)) {
    if($input[0]=3D=3D$val){
        $voidCmd =3D $input[0];
        $input[0]=3D"void";
    }
}
switch($input[0]){
    case "cd":
       $path=3D$input[1];
       if ($path=3D=3D".."){
         $work_dir=3Dstrrev(substr(strstr(strrev($work_dir), "/"), 1));
         if ($work_dir =3D=3D "") $work_dir =3D "/";
       }
       elseif (substr($path,0,1)=3D=3D"/")$work_dir=3D$path;
       else $work_dir=3D$work_dir."/".$path;
       $work_dir =3D validate_dir($work_dir);
       @chdir($work_dir) or ($shellOutput =3D "MyShell: can't change =
directory.\n$work_dir: does not exist or permission denied");
       $work_dir =3D exec("pwd");
       $commandBk =3D $command;
       $command =3D "";
       break;
    case "man":
       exec($command,$man);
       if($man){
           $codes =3D ".".chr(8);
           $manual =3D implode("\n",$man);
           $shellOutput =3D ereg_replace($codes,"",$manual);
           $commandBk =3D $command;
           $command =3D "";
       }
       else $stderr=3D1;
       break;
    case "cat":
       exec($command,$cat);
       if($cat){
           $text =3D implode("\n",$cat);
           $shellOutput =3D htmlspecialchars($text);
           $commandBk =3D $command;
           $command =3D "";
       }
       else $stderr=3D1;
       break;
    case "more":
       exec($command,$cat);
       if($cat){
           $text =3D implode("\n",$cat);
           $shellOutput =3D htmlspecialchars($text);
           $commandBk =3D $command;
           $command =3D "";
       }
       else $stderr=3D1;
       break;
    case $TexEd:
       if(file_exists($input[1])){
           exec("cat ".$input[1],$cat);
           $text =3D implode("\n",$cat);
           $shellOutput =3D htmlspecialchars($text);
           $fileOwner =3D posix_getpwuid(fileowner($input[1]));
           $filePerms =3D sprintf("%o", (fileperms($input[1])) & =
0777);
           $fileEditInfo =3D =
"&nbsp;&nbsp;:::::::&nbsp;&nbsp;Owner: <font =
color=3D$linkColor>".$fileOwner["name"]."</font> Permissions: =
<font color=3D$linkColor>$filePerms</font>";
       }
       else $fileEditInfo =3D =
"&nbsp;&nbsp;:::::::&nbsp;&nbsp;<font =
color=3D$linkColor>NEW FILE</font>";
       $currFile =3D $input[1];
       $editMode =3D true;
       $command =3D "";
       break;
    case "void":
       $shellOutput =3D "MyShell: $voidCmd: void command for MyShell";
       $commandBk =3D $command;
       $command =3D "";
}

//Now we prepare the webpage
if(!$oCols)$oCols=3D$termCols;
if(!$oRows)$oRows=3D$termRows;
if($editMode)$focus=3D"shellOut.focus()";
else $focus=3D"command.select()";
//WhoamI
if(!$whoami)$whoami=3Dexec("whoami");
?>
<html>
<head>
<title><?echo $MyShellVersion?></title>
<style>
body{
        background-color: <?echo $bgColor ?>;
        font-family : sans-serif;
        font-size : 10px;
        scrollbar-face-color: #666666;
        scrollbar-shadow-color:  <?echo $bgColor ?>;
        scrollbar-highlight-color: #999999;
        scrollbar-3dlight-color:  <?echo $bgColor ?>;
        scrollbar-darkshadow-color:  <?echo $bgColor ?>;
        scrollbar-track-color:  <?echo $bgInputColor ?>;
        scrollbar-arrow-color:  <?echo $textColor ?>;
}
input,select,option{
        background-color: <?echo $bgInputColor ?>;
        color : <?echo $outColor ?>;
        border-style : none;
        font-size : 10px;
}
textarea{
        background-color: <?echo $bgColor ?>;
        color : <?echo $outColor ?>;
        border-style : none;
}
</style>
</head>
<body <?echo "bgcolor=3D$bgColor TEXT=3D$textColor =
LINK=3D$linkColor VLINK=3D$linkColor =
onload=3Ddocument.shell.$focus"?>>
<form name=3D"shell" method=3D"post">
Current User: <a href=3D"#" =
style=3D"text-decoration:none"><?echo $whoami?></a>
<input type=3D"hidden" name=3Dwhoami value=3D<?echo =
$whoami?>>
&nbsp;&nbsp;:::::::&nbsp;&nbsp;
<?
if($editMode){
    echo "<font color=3D$linkColor><b>MyShell file =
editor</font> File:<font =
color=3D$linkColor>$work_dir/$currFile =
</font></b>$fileEditInfo\n";
}
else{
    echo "Current working directory: <b>\n";
    $work_dir_splitted =3D explode("/", substr($work_dir, 1));
    echo "<a href=3D\"$PHP_SELF?work_dir=3D" . urlencode($url) . =
"/&command=3D" . urlencode($command) . "\">Root</a>/";
    if ($work_dir_splitted[0] =3D=3D "") {
       $work_dir =3D "/";  /* Root directory. */
    }
    else{
        for ($i =3D 0; $i < count($work_dir_splitted); $i++) {
            $url .=3D "/".$work_dir_splitted[$i];
            echo "<a href=3D\"$PHP_SELF?work_dir=3D" . =
urlencode($url) . "&command=3D" . urlencode($command) . =
"\">$work_dir_splitted[$i]</a>/</b>";
        }
    }
}
?>
<br>
<textarea name=3D"shellOut" cols=3D"<? echo $oCols ?>" =
rows=3D"<? echo $oRows."\""; if(!$editMode)echo "readonly";else echo =
$editWrap?> >
<?
echo $shellOutput;
if ($command) {
  if ($stderr) {
    system($command . " 1> /tmp/output.txt 2>&1; cat =
/tmp/output.txt; rm /tmp/output.txt");
  }
  else {
    $ok =3D system($command,$status);
    if($ok=3D=3Dfalse &&$status && =
$autoErrorTrap)system($command . " 1> /tmp/output.txt 2>&1; =
cat /tmp/output.txt; rm /tmp/output.txt");
  }
}
if ($commandBk) $command =3D $commandBk;
?>
</textarea>
<br>
<?
if($editMode) echo"
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; =
&nbsp; &nbsp; &nbsp; &nbsp;
 <input type=3D'submit' name=3D'editSave' value=3D'     Save     =
'>&nbsp;&nbsp;&nbsp;
 <input type=3D'submit' name=3D'editSaveExit' value=3D' Save and Exit =
'>&nbsp;&nbsp;&nbsp;
 <input type=3D'reset' value=3D' Restore original =
'>&nbsp;&nbsp;&nbsp;
 <input type=3D'submit' name=3D'editCancel' value=3D' Cancel/Exit =
'>&nbsp;&nbsp;&nbsp;
 <input type=3D'hidden' name=3D'editMode' value=3D'true'>
<br>";
?>
<br>
Command:
<input type=3D"text" name=3D"command" size=3D"80"
<? if ($command && $echoCommand) {
     echo "value=3D`$command`";
   }
?> > <input name=3D"submit_btn" type=3D"submit" =
value=3D"Go!">
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
<?
if ($autoErrorTrap) echo "Auto error traping enabled";
else echo "<input type=3D\"checkbox\" =
name=3D\"stderr\">stderr-traping ";

if($editMode){
    echo "<input type=3D'hidden' name=3D'work_dir' =
value=3D'$work_dir'>
    <br>Save file as: <input type=3D'text' name=3D'file' =
value=3D'$currFile'>";
}
else{
    echo "<br>Working directory: <select name=3D\"work_dir\" =
onChange=3D\"this.form.submit()\">";
    // List of directories.
    $dir_handle =3D opendir($work_dir);
    while ($dir =3D readdir($dir_handle)) {
      if (is_dir($dir)) {
        if ($dir =3D=3D ".")
          echo "<option value=3D\"$work_dir\" selected>Current =
Directory</option>\n";
        elseif ($dir =3D=3D "..") {
          // Parent Dir. This might be server's root directory
          if (strlen($work_dir) =3D=3D 1) {
            // work_dir is only 1 charecter - it can only be / so don't =
output anything
          }
          elseif (strrpos($work_dir, "/") =3D=3D 0) {  // we have a =
top-level directory eg. /bin or /home etc...
            echo "<option value=3D\"/\">Parent =
Directory</option>\n";
          }
          else {   // String-manipulation to find the parent =
directory... Trust me - it works :-)
            echo "<option value=3D\"". =
strrev(substr(strstr(strrev($work_dir), "/"), 1)) ."\">Parent =
Directory</option>\n";
          }
        }
        else {
          if ($work_dir =3D=3D "/")
            echo "<option =
value=3D\"$work_dir$dir\">$dir</option>\n";
          else
            echo "<option =
value=3D\"$work_dir/$dir\">$dir</option>\n";
        }
      }
    }
    closedir($dir_handle);
    echo "</select>";
}
?>
&nbsp; | &nbsp;<input type=3D"checkbox" =
name=3D"echoCommand"<?if($echoCommand)echo " checked"?>>Echo =
commands
&nbsp; | &nbsp;Cols:<input type=3D"text" name=3D"oCols" =
size=3D3 value=3D<?echo $oCols?>>
&nbsp;Rows:<input type=3D"text" name=3D"oRows" size=3D2 =
value=3D<?echo $oRows?>>
&nbsp;| ::::::::::&nbsp;<a href=3D"http://www.digitart.net" =
target=3D"_blank" =
style=3D"text-decoration:none"><b>MyShell</b> =
&copy;2001 Digitart Producciones</a>
</form>
</body>
</html>
My = Shell=20

The Code
