From: Dietmar Maurer <dietmar@proxmox.com>
Date: Tue, 29 Oct 2013 09:20:38 +0000 (+0100)
Subject: subscription updates: set UserAgent header on proxy connect request
X-Git-Url: https://git.proxmox.com/?a=commitdiff_plain;h=e620818309c9add28edd16a03bcdfee1efb9b60a;p=pve-manager-legacy.git

subscription updates: set UserAgent header on proxy connect request
---

diff --git a/PVE/API2/Subscription.pm b/PVE/API2/Subscription.pm
index 8ea874b2..8817ad89 100644
--- a/PVE/API2/Subscription.pm
+++ b/PVE/API2/Subscription.pm
@@ -4,6 +4,7 @@ use strict;
 use warnings;
 use Digest::MD5 qw(md5_hex md5_base64);
 use MIME::Base64;
+use Net::SSL;
 use HTTP::Request;
 use LWP::UserAgent;
 use JSON; 
@@ -231,6 +232,8 @@ sub check_subscription {
     local ($ENV{HTTPS_PROXY}, $ENV{HTTPS_PROXY_USERNAME}, $ENV{HTTPS_PROXY_PASSWORD});
 
     if ($proxy) {
+	# some proxies reject connection if UserAgent header is not set
+	Net::SSL::send_useragent_to_proxy(1);
 	($ENV{HTTPS_PROXY}, $ENV{HTTPS_PROXY_USERNAME}, $ENV{HTTPS_PROXY_PASSWORD}) =
 	    PVE::API2Tools::parse_http_proxy($proxy);
 	$ua->proxy(['http'], $proxy);