On Thu, Feb 11, 1999 at 07:26:58PM -0600, Ronny Haryanto wrote:
> <?
> $induk = "/home/httpd/html/";
> header("Content-Type: application/octet-stream");
> header("Content-Length: ".filesize($induk.$PATH_INFO));
> readfile($induk.$PATH_INFO);
> ?>
kalo yg di atas nggak bisa diresume kalo putus, misalnya kalo sering
dipake untuk serve file2 gede.
ini versi yang bisa support resume, manggilnya sama, misalnya aslinya
ada di /home/data/koleksi/mp3/lagu1.mp3 bisa dipanggil pake
http://www.server.com/download.php3/koleksi/mp3/lagu1.mp3
asal script ini disimpen di $DOCUMENT_ROOT/download.php3
<?
/* liat http://www.w3.org/Protocols/rfc2068/rfc2068 utk HTTP headers */
$induk = "/home/data/";
if(!is_file($induk.$PATH_INFO) || !is_readable($induk.$PATH_INFO))
{
echo "<p>Invalid path $PATH_INFO\n";
exit();
}
$filename = $PATH_INFO;
$mimetype = "application/octet-stream";
$fsize = filesize($induk.$filename);
/* cek client minta resume gak? */
$headers = getAllHeaders();
if(isset($headers["Range"]))
{
header("HTTP/1.1 206 Partial content");
/* only supports:
* bytes=123-
* bytes=-123
*/
$val=split("=",$headers["Range"]);
if(ereg("^-",$val[1]))
{
$slen = ereg_replace("-","",$val[1]);
$sfrom = $fsize - $slen;
header("Content-Length: ".$slen);
}
else if(ereg("-$",$val[1]))
{
$sfrom = ereg_replace("-","",$val[1]);
$slen = $fsize - $sfrom;
header("Content-Length: ".(string)((int)$fsize-(int)$sfrom));
}
$br = $sfrom."-".(string)($fsize-1)."/".$fsize;
header("Content-Range: bytes $br");
header("Content-Type: ".$mimetype);
header("Connection: close");
$fd=@fopen($induk.$filename, "r");
fseek($fd, $sfrom);
fpassthru($fd);
}
else /* nggak nyambung, kasih aja semuanya */
{
header("Content-Length: ".filesize($induk.$filename));
header("Content-Type: ".$mimetype);
header("Connection: close");
readfile($induk.$filename);
}
?>
Layanan Informasi Iklan Baris Internet * http://www.iklan-25.co.id
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
To unsubscribe, e-mail : [EMAIL PROTECTED]
To subscribe, e-mail : [EMAIL PROTECTED]
Netika BerInternet : [EMAIL PROTECTED]
HI-Reliability low cost web hosting service - http://www.IndoGlobal.com
