Article View: pl.comp.lang.php
Article #220332Re: Zdalny upload z jednego serwera na drugi
From: Ja
Date: Tue, 08 Sep 2009 07:23
Date: Tue, 08 Sep 2009 07:23
122 lines
3366 bytes
3366 bytes
Nie bardzo rozumiem jak, ale działa :-). Może się komuś przyda:
<?
error_reporting(0);
function style()
{
echo "<TITLE>Transload Version 2.0</TITLE>
<STYLE>
BODY
{
COLOR: #000000;
margin: 5,5,5,5;
FONT-FAMILY: Courier New,Courier;
}
TD
{
FONT-SIZE: 14px;
FONT-FAMILY: Courier New,Courier;
COLOR: #555555;
HEIGHT: 20;
}
A:link, A:visited, A:active
{
COLOR: #000000;
TEXT-DECORATION: none;
}
A:hover
{
COLOR: #FFFF00;
TEXT-DECORATION: none;
}
</STYLE>
";
}
$thedir="galleries/";
function url_copy($source)
{
$d=explode("/",$source);
$dest=$d[count($d)-1];
$f1=fopen($source,"rb");
$f2=fopen($dest,"w");
echo "<SCRIPT>window.status='Copying \'$source\' to
\'$dest\'...';</SCRIPT>\n";
flush();
while ($buff=fread($f1,1024))
fwrite($f2,$buff);
fclose($f1);
fclose($f2);
$size=filesize($dest);
echo "<SCRIPT>window.status='$size bytes copied.';</SCRIPT>\n";
}
function list_file()
{
echo "<TABLE width=90% align=center border=1 bordercolor=#0000FF
style='border-collapse: collapse' cellpadding=2>
<TR>
<TD><B>File name</B></TD>
<TD><B>File size</B></TD>
<TD><B>File time</B></TD>
</TR>";
$d=opendir(".");
while ($f=readdir($d))
if (!($f=="." || $f==".." || $f=="index.php"))
{
$size=filesize($f);
$date=filemtime($f);
echo "<TR><TD><A href=$f>$f</A></TD><TD>$size</TD><TD>".date ("H:i:s - d
F Y", $date)."</TD></TR>";
}
echo "</TABLE>";
}
function show_form()
{
echo "<H3 align=center>Transload URL version 2.0<BR>
<br></H3>
<TABLE width=90% align=center border=1 bordercolor=#0000FF
style='border-collapse: collapse' cellpadding=2>
<FORM method=post>
<TR>
<TD width=100% align=right valign=top><B>Tranload Url</B><BR>Put one URL
or multi URL per line.<br> EX : http://domain1.com/aa.zip
<br>http://domain2.com/bb.zip<br>http://domain3.com/cc.zip<br>..........................</TD>
<TD><TEXTAREA wrap=virtual name=url rows=10 cols=80></TEXTAREA></TD>
</TR>
<TR>
<TD colspan=2 align=center><INPUT type=submit value=' Transload now '></TD>
</TR>
</TABLE>
</FORM>";
}
function download()
{
header("Content-type: application/x-download");
header("Content-Disposition: attachment; filename=index.php");
@readfile("index.php");
die();
}
$cmd=$_SERVER[QUERY_STRING];
if ($cmd=="source")
download();
style();
show_form();
global $HTTP_POST_VARS;
$url=$HTTP_POST_VARS[url];
if ($url!="")
{
$d=explode("\n",$url);
$d=str_replace("\r","",$d);
for ($i=0; $i<count($d); $i++)
if (trim($d[$i])!="") url_copy($d[$i]);
}
list_file();
?>
<br>
<br>
Technical Details
Message-ID:
<h850p6$v0i$1@news.onet.pl>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!newsfeed.pionier.net.pl!news.nask.pl!news.nask.org.pl!news.onet.pl!not-for-mailReferences:
<h7186a$s0t$1@news.onet.pl>Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!newsfeed.pionier.net.pl!news.nask.pl!news.nask.org.pl!news.onet.pl!not-for-mail From: Ja <fm24@poczta.onet.pl> Newsgroups: pl.comp.lang.php Subject: Re: Zdalny upload z jednego serwera na drugi Date: Tue, 08 Sep 2009 09:23:12 +0200 Organization: http://onet.pl Lines: 122 Message-ID: <h850p6$v0i$1@news.onet.pl> References: <h7186a$s0t$1@news.onet.pl> NNTP-Posting-Host: 94.254.155.108 Mime-Version: 1.0 X-Trace: news.onet.pl 1252394599 31762 94.254.155.108 (8 Sep 2009 07:23:19 GMT) X-Complaints-To: niusy@onet.pl NNTP-Posting-Date: Tue, 8 Sep 2009 07:23:19 +0000 (UTC) User-Agent: Thunderbird 2.0.0.23 (Windows/20090812) In-Reply-To: <h7186a$s0t$1@news.onet.pl> Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit