Package: debmirror Version: 1:2.48 Severity: important Tags: patch
Dear developers,Since last week-end's DDOS attack, Canonical made some changes in their infrastructure and libwww-perl's default User-Agent string (libwww-perl/X.XX) is now blocked, making debmirror unable to mirror Ubuntu and Launchpad repositories.
This simple patch adds a User-Agent header specific to debmirror (debmirror/version), making it work again with those repositories.
Regards, -- Raphaël Halimi
From 26c7c1915090a3a81bba5bce21e299e66cb83154 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Rapha=C3=ABl=20Halimi?= <[email protected]> Date: Thu, 7 May 2026 08:58:56 +0200 Subject: [PATCH] Add debmirror-specific User-Agent header --- debmirror | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/debmirror b/debmirror index a6dd865..bd4fdec 100755 --- a/debmirror +++ b/debmirror @@ -927,6 +927,7 @@ sub init_connection { downloads_via_http() && do { $ua = LWP::UserAgent->new(keep_alive => 1); + $ua->agent("debmirror/$version"); $ua->timeout($timeout); $ua->proxy('http', $ENV{http_proxy}) if $ENV{http_proxy}; $ua->proxy('http', $proxy) if $proxy; @@ -941,6 +942,7 @@ sub init_connection { downloads_via_https() && do { $ua = LWP::UserAgent->new(keep_alive => 1, ssl_opts => { verify_hostname => ! $disable_ssl_verification }); + $ua->agent("debmirror/$version"); $ua->timeout($timeout); $ua->proxy('https', $ENV{https_proxy}) if $ENV{https_proxy}; $ua->proxy('https', $proxy) if $proxy; @@ -956,6 +958,7 @@ sub init_connection { downloads_via_ftp() && do { if ($proxy || $ENV{ftp_proxy}) { $ua = LWP::UserAgent->new; + $ua->agent("debmirror/$version"); $ua->timeout($timeout); $ua->proxy('ftp', $proxy ? $proxy : $ENV{ftp_proxy}); } @@ -972,6 +975,7 @@ sub init_connection { downloads_via_file() && do { $ua = LWP::UserAgent->new; + $ua->agent("debmirror/$version"); $ua->timeout($timeout); $ua->show_progress($progress); $host='localhost'; -- 2.53.0

