Add a patch to make it send a "Host:" header for HTTP/1.1 virtual hosts.

This commit is contained in:
Akinori MUSHA 2000-05-21 11:31:02 +00:00
parent 49de5c120b
commit 7b302a5887
Notes: svn2git 2021-03-31 03:12:20 +00:00
svn path=/head/; revision=28646

View file

@ -0,0 +1,20 @@
--- webcopy.src.orig Sun May 21 20:24:21 2000
+++ webcopy.src Sun May 21 20:25:51 2000
@@ -481,7 +481,7 @@
$_=select(S); $|=1; select($_);
if ($verbose>3) {
print(($post?"POST":"GET") . " $proxy$url HTTP/1.0${rn}" .
- "User-Agent: $agent${rn}Accept: */*${rn}$update");
+ "User-Agent: $agent${rn}Accept: */*${rn}Host: ${host}${rn}$update");
print "Authorization: $userpass${rn}" if $userpass;
if ($post) {
print "Content-Length: " . length($post_data) .
@@ -492,7 +492,7 @@
}
}
print S ($post?"POST":"GET") . " $proxy$url HTTP/1.0${rn}" .
- "User-Agent: $agent${rn}Accept: */*${rn}$update";
+ "User-Agent: $agent${rn}Accept: */*${rn}Host: ${host}${rn}$update";
print S "Authorization: $userpass${rn}" if $userpass;
if ($post) {
print S "Content-Length: " . length($post_data) .