diff options
Diffstat (limited to 'scripts/download.pl')
| -rwxr-xr-x | scripts/download.pl | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/scripts/download.pl b/scripts/download.pl index 51a816cff4..ad4fde7333 100755 --- a/scripts/download.pl +++ b/scripts/download.pl @@ -78,7 +78,7 @@ sub download_cmd { my $additional_mirrors = join(" ", map "$_/$filename", @_); my @chArray = ('a'..'z', 'A'..'Z', 0..9); - my $rfn = join '', map{ $chArray[int rand @chArray] } 0..9; + my $rfn = join '', "${filename}_", map{ $chArray[int rand @chArray] } 0..9; if (open CURL, '-|', 'curl', '--version') { if (defined(my $line = readline CURL)) { $have_curl = 1 if $line =~ /^curl /; @@ -94,13 +94,15 @@ sub download_cmd { if ($have_aria2c) { @mirrors=(); - return join(" ", "touch /dev/shm/${rfn}_spp;", + return join(" ", "[ -d $ENV{'TMPDIR'}/aria2c ] || mkdir $ENV{'TMPDIR'}/aria2c;", + "touch $ENV{'TMPDIR'}/aria2c/${rfn}_spp;", qw(aria2c --stderr -c -x2 -s10 -j10 -k1M), $url, $additional_mirrors, $check_certificate ? () : '--check-certificate=false', - "--server-stat-of=/dev/shm/${rfn}_spp", - "--server-stat-if=/dev/shm/${rfn}_spp", - "-d /dev/shm -o $rfn;", - "cat /dev/shm/$rfn;", "rm /dev/shm/$rfn /dev/shm/${rfn}_spp"); + "--server-stat-of=$ENV{'TMPDIR'}/aria2c/${rfn}_spp", + "--server-stat-if=$ENV{'TMPDIR'}/aria2c/${rfn}_spp", + "-d $ENV{'TMPDIR'}/aria2c -o $rfn;", + "cat $ENV{'TMPDIR'}/aria2c/$rfn;", + "rm $ENV{'TMPDIR'}/aria2c/$rfn $ENV{'TMPDIR'}/aria2c/${rfn}_spp"); } elsif ($have_curl) { return (qw(curl -f --connect-timeout 20 --retry 5 --location), $check_certificate ? () : '--insecure', |