DirExplorer.php

[Guest]

DirExplorer.php

Version: 1.0.0
Category: Download / Upload scripts

Description:
Lets you easy Explorer a directory in a nice way.UPload this script in any directory on your webserver and point your webbrowser to it.

[raghu]

[b]hai u r script is reallly nice,but its encode[ plz remove it/b]

[subzero]

Hmmmm zend or not zend any scripts are keep to them selfs he made it so keep the make of it

also that is a image code file not encoded

[Guest]

HOw to limit the files display to 20 per page ????

anyone ???

[TzoLy]

if (!isset($_GET) && !isset($_POST))
{
        $_GET = @$HTTP_GET_VARS;
        $_POST = @$HTTP_POST_VARS;
        $_COOKIE = @$HTTP_COOKIE_VARS;
        $_SESSION = @$HTTP_SESSION_VARS;
        $_ENV = @$HTTP_ENV_VARS;
        $_SERVER = @$HTTP_SERVER_VARS;
}
$topdir = "./"; 
if (empty($_GET["dir"])) $dir="/"; 
if (!empty($_GET["dir"])) $dir=urldecode($_GET["dir"]); 
$debug = false; 
$ver="1.0";

$sort = true;
$sort_type = SORT_REGULAR;

$show_filesize = true; 

if (!empty($otherlocation)) if ($otherlocation[strlen($otherlocation)-1] != '/') $otherlocation .= '/';
if (empty($otherlocation)) $otherlocation="";

function imgheader()
{
        header("Expires: ".date("D, d M Y H:i:s",mktime(date("H"),date("i"),date("s"),date("m"),date("d")+1,date("Y"))));
}

function image_1()
 {
   imgheader();
    header("Content-type: image/gif");
    header("Content-length: 120");
    echo base64_decode(
'R0lGODlhEgANAKIAAPf39///zpycAP/OnM7OY////wAAAP//nC'.
'wAAAAAEgANAAADRVglzKYwKgFCOEc8CQX5INE0kWCdqHUQ23Jh'.
'cDyw3RsfA7625g3nM54NA9TRJkOiLlj7LXFMZHE6iC5C2FCrYO'.
'h6v19IAgA7');
  }

function image_2()
{
    imgheader();
    header("Content-type: image/gif");
    header("Content-length: 109");
    echo base64_decode(
'R0lGODlhEgALAKIAAP///8zMzJmZmWZmZgAAAAAAAAAAAAAAAC'.
'H5BAAAAAAALAAAAAASAAsAAAMyCLrcPjDKyEa4ON9B1HCOwHla'.
'BgliB3yChgZtSk6DeMprAC7wCNi0iUpBKBqPxp2SkQAAOw==');
}

 function image_3() 
  {
    imgheader();
    header("Content-type: image/gif");
    header("Content-length: 54");
    echo base64_decode(
'R0lGODlhEgANAIAAAP///wAAACH5BAEAAAAALAAAAAASAA0AAA'.
'INhI+py+0Po5y02ovzKQA7');
}

  function image_4() 
  {
    imgheader();
    header("Content-type: image/gif");
    header("Content-length: 42470");
    echo base64_decode('iVBORw0KGgoAAAANSUhEUgAAAIIAAAATCAYAAABcOdUbAAAACXBIWXMAAAsTAAALEwEAmpwYAAAA'.
'BGdBTUEAALGOfPtRkwAAACBjSFJNAAB6JQAAgIMAAPn/AACA6QAAdTAAAOpgAAA6mAAAF2+SX8VG'.
'AAAPS0lEQVR42uyae3Bc9XXHP3dXb1mPK9vyE4MvdiEOIcQ3NjQ8XSty06alzezWbSeddoau4jCZ'.
'ZJrO7NZNJwGS6Y52SCekTVGtEkhDkiq7hTCkEBQLzBvbrDHGNmDJV8HG+CHJV7beWt17+ofPFT8L'.
'UdL8W+7Mb/bu3d95/M75/s45v3PXEhA+vP7fX7EPTfDhBVD2fj88eCNMT1+4r6iAzz/76zMVIACm'.
'gGmgBISKunKgQkdc58/ovCm9F1UsrjShDkvpKo3fInkRj2ljrhi0caWrVN4mX/OK9C4pj/I5NDJn'.
'jhhris2zy+Y+C1XXiJ55ZDCPnGCOjiEXh3JLaeNz1j1fuLdUVoUhFwExx7+5iNJfNO5143KvG5e5'.
'880RgpRARkHOptrkXHe3lIJwdpzp7hYvnZFDIO+AjOgYTmdkcnDoorkvOI68CDLQ1SWlIJSJwSF5'.
'HuQwyCDIlCF3GmQIZLy3T0pBKH3pjDxv2xfx60tnZL/KHVM9x0BG0xk5BTKgfIez2VmaowbNOEig'.
'dD7I2J69UgpCedV15SDISX0+ks7ISduW07q2kqFnoHyG05n3yDihdpvRuXPlnOrqkj6Dbr7xRjoj'.
'J9VeHzT6s9mL5F4EhMjp4d5qCXdXizxXJWFPhcij5RcB4v1AMAkyZNtyrrtbJgaH5JVsVr4F8rcg'.
'Xwb5tuvKa11dcqijQ54EOQRyMp2R1xJJ+XeQb4B8BeRn6Yw8ls5IDuR7ILvUAD3pjPwY5FU1UqBy'.
'z4McSySlFISyK52Rb4DcCXKP40gpCOW5jg65E+SHIEV1+gjIWQXgc7Ytu5XvMyCvd3RIKQjlu44j'.
'94PsVpqSOtIDOZzOyGOJpHwb5D+V75sgY719cjSblWdAelW3wHDukM592HFkRMH/fDojPSD96pQI'.
'MP0gvwB5s6tL7gK5A2S36paxbbkdZkfatqUr1SYPJpKyHeSrIF8CeUhtl3Xd2bntrivf39wi94G8'.
'AHIKpMwMF+GBGqzKGMTUwlOCNW4hBMgjZchYSOzPA3DjbCsGF4WbGeA8UPVEN5NAx9o19Po+5zVc'.
'W8CJYpF9W7eyKZFk3LY56ftcYzfyVCHPr4AzwDhwf66daqABqAEWA2c8jytTKXbm2qkDGoFa5TsK'.
'SMtmJn2fYbuRV4EqYIHvA3DM9zmoc5cACzXklrnrqbNt4uk0B7Zvp1nlv5LLsSbVRkMiycFcOw2q'.
'Q72xzhp3PY/l2gk0JNtAXTrDqO/TnGrj8VyOEd+fTRuVaqdppX/T83D2FZkBNmaz7PR9ejt3ANCs'.
'YX0SGADqfJ/XVfbHfJ/1wCFdd1WUZn2fvs4d1No2I0YKulrl9gKe6vF2sUgjcLnKWh6lJAuQAzVY'.
'tXGsK0ax1o5i1cWwai2oiRHbPI116wyUW4Q/sPjiHBCEasAgmyXuONyzpZW9vs8p/a0eWAQ0qSLP'.
'F/IM2jYHgLjr8iZwVvObrY6qB6pVwSq7kR3bt9PsOCxKJPkVMAhMqEMnXJdTXj8jvs8Cx8FXI0Y5'.
'eBI4p06InCHpDAfzBfYX8qxKJDkMvKNzfc/jhUKeTakUJ1W3CTVsCahIJDmYLzCi+TqmPMvd9fz0'.
'i9uosm0Wpto4ApxW20S1SIU6r1Kffam1lWLPTlo6OhhPJOlV508beT9U+WPGGs7ps0q1a7NuDvH9'.
'C5tAN1F0nVf6MrWtrXOq5tRbSIWFdfkIMmwjYzbW8vNQHcO6egzZU034ywpiyQBiFgAdbvyiaHAO'.
'aEi1caCQ55DvM6oO/RhwC7AF+DRwnSJx3PMYBnzfJ9XdzcZEkhU6fyNwraLZAZpsm5cKeU54Hp9J'.
'pzkOnAKGdYEVqRRPd+7gyL4iS1Y7xHWRjapfXA1QpYXZFBA4q3mmkOdHuRzNjsM16QwDmv9sYFcu'.
'xzLHoSWdYVDljKvx65MJXivkqdHdtARYmkhyKF9gd7HIU4U816dS9ANvq21m1NjVapdlBihub21l'.
'X89Ofr+raxYMw6pzozq7Xh0bNwDVCFwGXAWsB64BPqH2u0E/F+n8ao1qVwHXAzfp/JUaWWMWIC9X'.
'QzyGnG5Qi8WQsSaIW0jvAiQGlgXy0IVMEt7HbFQQNc7k5hbKbZuDxX2MqwJXqUOvAz6p4zpV8CM6'.
'5+Ht26lutEl1dXFnEHJ9Nstyx2GFLnIZUG/bVAEPd3ay1nVp3NzCMQXDgG1zxuun3/c55nksd5zZ'.
'irhmDhAqVN94Iknfzh5OAHuLRXb37GRTKsWgOqwRKBWLeMUim1MpzmjaGgTGXJdTusY6NWQTYLds'.
'Znchz1kgv6OTZY7DhnSG40b0wnDqQtWpTp301dZW9isYxhJJjmror1Dw1ipoolz+i8Ehfh6E3B2E'.
'fCUIuXXPXpqA1erg9cA6lRUBpx64VP3yCfXBsggIUWyPrR25EOdmBCZDKAkEggSCZZxDYn8Rvueo'.
'OAGcHb6Qjwc0L14CXAlcoQ5doTtnsX6u0N0043l8beMGOrZtY3chzzXpDJ/p7aM6kWQMwLYZ9jzi'.
'wE9y7ZzwPD7VluIY0A+Up9PsKeQZAs75w9TbNkscZ/YYeVENpOFxcTrNzV1ddAQhu4KQaze3zDru'.
'rBplEfDLXI6ljsMqTUfHABIJdmltEIXkpYkkl6ba+HoQ8kgQ8q/d3QDcnLqg50mNKIFxhK7U+wVG'.
'Ovx6ayt9xSKbOjo45bp4Gk1CI01EV8uihdwQj5GIx9gWj3H3xg2cVH8sNuxdYRxlq7TuWqIAWKxA'.
'LJ/lXbrgZWv5OazGYaxaH6vRx1p+ntiVY1gbJ7A+PY31uZn3nElDzVsni0XGfZ9FjkOFGrJZF1mh'.
'ubWUzrAoCFkXhNw0OASKxgZgZ+cO7tq6lc/GY7xUyHNFNssBYNhxGPKHEd3huwp5rk8kKdPawgfe'.
'8DymgQHPA2DJaodJI59GgJ0CxHU5XCjwhXiMm+IxPh6PcWU8xuFikZtTKU4rsOuA44U8R4tFfjed'.
'xgPecRyGdYeXqfNqgEp3Pf8Yj/G5eAw3HmNdPMbfbN3KMsfhilQbbxlRYe65vkodslqjyze3tPKO'.
'53HrE90MKBimjXrHXE9U+5zRWmRY55Wpc8v+ly5i3OhbvAuyiZDwpeoLAkTedwCE35+/QQHwQucO'.
'bkwkZoWUGw2OCeBorp2jWhl/a+0a+pVuJbDGyJt3bN3K2/0e7zgO51c79HkegYa2R3M5Rn2fdYkE'.
'a9IZXtzZg6877PS+IgDLHOdCuppjuDFgcSLBf+faGVH9GnRn/1BrglWJ5Gzhugh4pVDgctelYXML'.
'dYkk+VyOUaVbBNS7LsP+MKdVXo3ye7GQ541ikZtSKY5rIToypzEUhewmrZvWAYt9nzsUDFuf6GbC'.
'dZmYB0SWscObgaUKqEajAPw/t5hlMoTR4NdvG85hUKEh7unt27GA2zo6OK8IHYkqe2BIUwfAYeDy'.
'VBvTCoRPahFzjaaMUd/noOdR4Tgc6feI6UIbfJ8XCnm2pNqodVbzTM/O2SNX3PMY9X0W2DZTBhCi'.
'qNXgugz6wwyrzpeo8a8E3ijkOaK7/4zurEbg5Vw7pz2P38ukmbIbOeL7zJhH21SKZ3PtTKtDfwv4'.
'qDr2v3I51rguKxNJjikYBnQXj6kpLbXdCs3ZVwG27/MPW1o54Xl8+YluxnV+OCeSLNFcfwvQAmzQ'.
'GqDuN3h3EBMg9tkZGAsJHy/Hsqx5J1qWRXifEt32Lh4soxJeDnxnSyvNjsMfd3dTnc5wFDiu4eus'.
'5nz0u9g2V6faiKsjIyP+QSLJieI+RI+ObxSLLFD+lwEvd3ZSZ9scKO5jwjDkcmDC91nrrqc0DxA2'.
'pFI8W8gTKgh+G2gFfkeLq2KhwBrX5dJEkiEjKjzd2Ym7uYWfFwpM6nrrgUrH4bzvM6TP1gGb9HR0'.
'A3C6kGfU92lNp+kDFnV1Udfbx1EFxYxxmqjVNazT01KT75P9062c830qbJsxBWet2m+l48xGhMWq'.
'57JEkkrXnT3dmKlxQaNN8D7t6WiDX+gm/sQS+Wlc5KH4vC3m8L53B3O6ilMgb4E8CvI1kD8BuTfV'.
'JofmtJjNMTQ4JN/RrtdAb5+8ls3KkWxWzuzZKz3pjPwVyI+zWTk7OCQ/ymblCyDfBXlAu4aPd3TI'.
'p0D+COQukAdBurW7WApCeSCblT/UNvM96Yw8oK3j+9MZuQ3kn0B6QI6A7NfuYL+2c0tBKHe7rnwP'.
'5J+1a/dIR4dsUHnfBHlYeY8MDsntIH+vPPYrz6dAfmbo80xXlzzb0SEDvX3SbttS1FbwkT175e9A'.
'HgHpAzkG8px2VP8a5M8cR+7PZuUWkAc+oMVcCkJ50nXlKZC9IPsN+aUglIzryr0gB7SDGRo+tKLX'.
'0BYQ/sB6t3IQIJQLEDLgY0YDs2AcAd4CDug4oYiMzspRB3BQx7jm6CiSrNT7UCNHFEKnlH6NhsFm'.
'3U37tBpvBlylPws8B7yuReRC2+axwSH+Zft2/iPXTq3uvNV6jL0WWKWR4xDwFLBXaS/RnkazRq/X'.
'tfJfBXxc08BxTXHjGs1u1NC+QPsHe4AngT61RaNGjrju7km9v0z12aDhfkK7gK8C+/WYHBXLU2q/'.
'qKu4VAvySp2zQHW8TGW8pnoMaMS5HrhZT3MNRn1XZqZ+6y9ltk/wnhxy27wlwmydUKPF3owurk7B'.
'ENUKgf5mqQJ1KrxSFfYN2kCNVq8GjDqOUYeyQo24WMHj6PxAvy9UPT+63r1I5zLjuFZvvHkrV32i'.
'o60YhW5UC8TU+BFoMXJ8jfKrVX5l6nBb+Z3TjVJu2CziHzecGCptk5F2y/XYOqbPRgx6FBhnjcp/'.
'Rm00rTwrdA2Brj02Jz1Y872Gns37t31gjTjv++yoYVGtyhzXXeurwqGxQPNkETParhUGQMqMBS1U'.
'9C/ShZUryKL6IGrZrlZgNdk2n8+kAdjbs5NqpV+tu2GFUVSVKc/LVM9mdeol6vRyBcmkAq7JOLqV'.
'lMclhl7mxviI2mPUaGrF1QbRxoj6EVG0iE4SUSdylREdz+oYVnrzihsRtll5R6+wz6nuK9VPZQYI'.
'3vf/CL/JX5YsA31VKnSFKjCqSodzlI4b59gy45l59JzRhVSpceqUT62RemqNRa0FbuzqYlUiyZjv'.
'c/e2bXjFIksUAFdpRb/U6KiV6+5dqzLGjGdNer9MjRr9p2FadVppvHSKolVUQC/TNVxqRDbzPweB'.
'0W1sUpuVG7aMejBLNP2U1JZjCsRgHiDUKF2DPmtUkE4aNmw2XoJF1/8MAPW8M8p9yxCyAAAAAElF'.
'TkSuQmCC');
  }

if (empty($_GET["image"])) $image=0; else $image=$_GET["image"];

if ($image == 1) { image_1(); die(); }
if ($image == 2) { image_2(); die(); }
if ($image == 3) { image_3(); die(); }
if ($image == 4) { image_4(); die(); }


function f($size="1",$color="#000000",$face="Verdana")
{
    echo '<font face="'.$face.'" color="'.$color.'" size="'.$size.'">'."\n";
}
function endf()
{
    echo '</font>'."\n";
}
function br()
{
    return '
'."\n";
}
function img($nr,$border=0)
{
    global $_SERVER;
    return  '[img]'.$_SERVER[[/img]';
}

function getext($filename) 
{
  $f = strrev($filename);
  $ext = substr($f, 0, strpos($f,"."));
  return strrev($ext);
 }

function sw($i)
{
    if ($i) return 0;
    else return 1;
}

function my_filesize($file,$path="./") {

  if(!is_file($path.$file)) exit("File does not exist!");

  $kb = 1024;        
   $mb = 1024 * $kb;  
  $gb = 1024 * $mb;  
   $tb = 1024 * $gb;   

   $size = filesize($path.$file);

   if($size < $kb) {
       return $size." B";
   }
   else if($size < $mb) {
      return round($size/$kb,2)." KB";
   }
   else if($size < $gb) {
       return round($size/$mb,2)." MB";
  }
   else if($size < $tb) {
       return round($size/$gb,2)." GB";
   }
   else {
      return round($size/$tb,2)." TB";
   }
}


function listdir($dir="./",$toplevel="./",$otherlocation="")
{
    global $_SERVER,$debug,$filetypes, $filter, $sort, $sort_type, $show_filesize;
    $dir=str_replace('./','/',$dir);
    $text = "";
    if ($dir[strlen($dir)-1] != '/') $dir .= '/';
    $path=$toplevel.$dir;
    $path=str_replace('//','/',$path);
    $path=str_replace('..','',$path);
    echo 'You are here: '.$path.'

';
$realdir="$path";

    if ($debug) {f(1); echo br().'$path = '.$path.br().'$dir = '.$dir.br().br(); endf();}
    $diren=$dir;
    if (!is_dir("$path")) die(f(2,"#FF0000")."Error $path is not a directory?");
    $files = dir($path) or die("Error reading/opening $path");
     while ($a = $files->read())
    {
        if (!empty($a)) $currentArray[] = $a;
    }
    if ($sort && (!$sort_type)) sort($currentArray);
    if ($sort && $sort_type) sort($currentArray,$sort_type);
    for ($i = 0; $i < count($currentArray); $i++)
    {
        $current = $currentArray[$i];
        if (($current != "..") && ($current != ".")) 
        {
            $dir = $diren;
            
            if (is_dir($path.$current)) 
                if ($debug) echo "\$dir = $dir  - ";
            if (is_dir($path.$current)) 
            echo 
            ''.img(1).' '."\n".''.$current.''.br();
            else 
            {
                if ($toplevel == "./") $dir = $path;
                            if ($debug) echo "\$dir = $dir  - ";
                $match = sw($filter);
                if (!empty($filetypes[0])) 
                {
                    $ext=getext($current);
                    $match = $filter;
                        for ($e=0;$e<count($filetypes);$e++)
                        {
                        if ($ext == $filetypes[$e] ) $match = sw($filter);
                    }
                } else $match = 1;
                if ($match == 1) 
                {
                    echo img(3).' '.$current.'';
                    if ($show_filesize) echo " <font size=\"1\">(".my_filesize($current,$realdir).")</font>";
                    echo br();
                }
            }
        }
    };
}


f(2); 
echo '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">

<html>
  <head>
    <title>
       DirExplorer by Ashraf Khan
    </title>
  </head>
  <body bgcolor=FFFFFF>
';

echo ''.img(2).' ';
echo 'Go to top'.br();
if (empty($topdir)) $topdir = "./";

if ($debug) { f(1); echo "listdir($dir,$topdir,$otherlocation);".br().br(); endf(); }

f(2); listdir($dir,$topdir,$otherlocation); endf();


echo '

<font size="1" face="Verdana"> DirExplorer v'.$ver.' 
</font>
    <a href="http://gsmjava.net">
          [img]'.$_SERVER[[/img]
        </a></font>
  </body>
</html>';

?> 

This its the good script :D with that bug solved :D

[redwap]

Can Anyone tell me how to add Pagination in DirExplorer Script
Please I need to know......

[MaaV]

i hate encoded scripts..

will not bother trying this out ..

[GumSlone]

i hate encoded scripts..

will not bother trying this out ..

there is a simple base64 encoding, you can easily decode everything and the base decoded stuff will not harm the script if you simpy remove it.

[neostar]

Yeah, i'll decode it and then i'll use it.

[djeasy]

Please how can i instul script in my site

[subzero]

upload then shut up pmpl it works on any server no installing needed

[djeasy]

U dont understand. I downloaded an mp3 script in .Zip format. I xtracted and uploaded it in my site. But noting happend

[subzero]

is it in the same folder as this script is ? lol

[djeasy]

After i uploaded it, it created a directory after that i checked my index notin happend please i am a newbie. Even the files i have in my directories dont show in my site pls help

[subzero]

maybe your hosting blocked them type of scripts focks open