browser == 'msie')
#if (preg_match("/msie/i",$_SERVER["HTTP_USER_AGENT"]))
#{
#header("Content-Type: application/x-unknown-octet-stream");
#}
#else
#{
#header("Content-Type: application/x-download");
#}
$dname=basename($DownloadDir);
if ($ArchiveType=="zip")
{
# header("Content-Transfer-Encoding: binary\n");
# header("Content-Type: application/zip");
header("Content-Type: application/octet-stream");
header("Content-Disposition: attachment; filename=$dname.zip");
header("Content-Transfer-Encoding: binary");
#if(strpos($_SERVER[’HTTP_USER_AGENT’], ‘MSIE’)){
#// IE cannot download from sessions without a cache
header("Cache-Control: public");
$fp = popen ("cd $FileBase/$DownloadDir/.. ; zip -r - $dname","r");
fpassthru($fp);
pclose($fp);
exit;
}
if ($ArchiveType==tgz)
{
header("Content-Disposition: attachment; filename=$dname.tgz");
$fp = popen ("cd $FileBase/$DownloadDir/.. ; tar czf - $dname","r");
fpassthru($fp);
pclose($fp);
exit;
}
}
if (!empty($DownloadFile)) // If we've been requetsted to ship a file
{
#if ($browser->browser == 'msie')
if (preg_match("/msie/i",$_SERVER["HTTP_USER_AGENT"]))
{
header("Content-Type: application/x-unknown-octet-stream");
}
else
{
header("Content-Type: application/x-download");
}
$dname=basename($DownloadFile);
header("Content-Disposition: attachment; filename=$dname");
readfile($DownloadFile);
exit;
}
?>
Download Files from the NREL
Files available for download:
Listing for files in /$Directory
\n";
$files=`ls $SearchDir | grep -v .webinfo`;
$filesarray=preg_split("/\s+/", $files);
# spaces aren't allowed in web files anyway, so go with the above
#$filesarray=preg_split("/\n/", $files);
?>
| View |
Download |
Description |
Date |
Size |
= 1024)
{
$size=$size/1024;
$extension="KB";
}
if ($size >= 1024)
{
$size=$size/1024;
$extension="MB";
}
if ($size >= 1024)
{
$size=$size/1024;
$extension="GB";
}
if (is_file("$SearchDir/$file.webinfo"))
{
$description=`cat "$SearchDir/$file.webinfo"`;
}
else
{
$description="No Description";
}
$date=date("M d, Y",filemtime("$SearchDir/$file"));
print "\n";
print "| $file | \n";
print "$file | \n";
print "$description | \n";
print "$date | \n";
printf("%d %s | \n",$size,$extension);
print "
\n";
}
else if (is_dir("$SearchDir/$file"))
{
if (is_file("$SearchDir/$file.webinfo"))
{
$description=`cat $SearchDir/$file.webinfo`;
}
else
{
$description="Sub Directory";
}
$date=date("M d, Y",filemtime("$SearchDir/$file"));
print "\n";
print "| $file | \n";
print "ZIP Archive | \n";
print "$description | \n";
print "$date | \n";
print "Not Reported | \n";
print "
\n";
}
}
}
?>
To see a file, choose its name from the "View" column. To download that
file, click on its name from the "Download" column.
Directories are listed in yellow. Viewing a directory will let you see
the contents of that directory. Downloading a directory will let you download
a .zip archive of all the files/subdirectories in that directory. These zip
files can be large, so please verify that you really want the entire directory
before downloading.
To top of download tree\n";
?>