From 90a682a10ad5abcb97c017f6ab4f96788abc2190 Mon Sep 17 00:00:00 2001 From: Maximilian Rehkopf Date: Thu, 14 Mar 2013 00:02:09 +0100 Subject: [PATCH] Add sane user-agent header for Async*FileGetters --- videosite/AsyncFileGetter.pm | 3 ++- videosite/AsyncWgetFileGetter.pm | 3 ++- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/videosite/AsyncFileGetter.pm b/videosite/AsyncFileGetter.pm index fa44e56..984597d 100644 --- a/videosite/AsyncFileGetter.pm +++ b/videosite/AsyncFileGetter.pm @@ -36,6 +36,7 @@ sub get { my $dlfile; my $dirname; my $cookie = ""; + my $useragent = "-H \"User-Agent: Mozilla/5.0\""; $dlfile = sprintf($self->_getval('FILEPATTERN'), $self->_encode($video->{'SOURCE'}), @@ -69,7 +70,7 @@ sub get { } $cookie = "-H \"Cookie: $video->{'COOKIE'}\"" if (defined $video->{'COOKIE'}); - my $cmdline = "( GET $cookie \"$video->{'DLURL'}\" > \"$tmpfile\" && mv \"$tmpfile\" \"$dlfile\" && chmod =rw \"$dlfile\" || rm -f \"$tmpfile\" ) &"; + my $cmdline = "( GET $useragent $cookie \"$video->{'DLURL'}\" > \"$tmpfile\" && mv \"$tmpfile\" \"$dlfile\" && chmod =rw \"$dlfile\" || rm -f \"$tmpfile\" ) &"; $self->debug(encode_base64($cmdline)); system($cmdline); diff --git a/videosite/AsyncWgetFileGetter.pm b/videosite/AsyncWgetFileGetter.pm index 145d7ad..d52a2ef 100644 --- a/videosite/AsyncWgetFileGetter.pm +++ b/videosite/AsyncWgetFileGetter.pm @@ -36,6 +36,7 @@ sub get { my $dlfile; my $dirname; my $cookie = ""; + my $useragent = "--user-agent=Mozilla/5.0"; $dlfile = sprintf($self->_getval('FILEPATTERN'), $self->_encode($video->{'SOURCE'}), @@ -69,7 +70,7 @@ sub get { } $cookie = "--header=\"Cookie: $video->{'COOKIE'}\"" if (defined $video->{'COOKIE'}); - my $cmdline = "( wget -q -O\"$tmpfile\" $cookie \"$video->{'DLURL'}\" && mv \"$tmpfile\" \"$dlfile\" && chmod =rw \"$dlfile\" && touch \"$dlfile\" || rm -f \"$tmpfile\" ) &"; + my $cmdline = "( wget -q -O\"$tmpfile\" $useragent $cookie \"$video->{'DLURL'}\" && mv \"$tmpfile\" \"$dlfile\" && chmod =rw \"$dlfile\" && touch \"$dlfile\" || rm -f \"$tmpfile\" ) &"; $self->debug("Going to execute: %s", $cmdline); system($cmdline); -- 1.8.3.1