[request-tracker-maintainers] Bug#511319: rt3.6-clients: /usr/bin/rt-3.6 does not play nice with HTTP basic authentication

[Luis E. Muñoz]

Package: rt3.6-clients
Version: 3.6.1-4
Severity: normal
Tags: patch


With basic auth enables as per the instructions, the rt command line
does not authenticate, as it expects RT to handle the authentication.

The attached patch solves this by providing the credentials to
LWP::UserAgent to use automatically when needed, with no changes to the
visible interface to the user.


83a84,105
> # The underlying package allows for the supplying of basic
> # authentication credentials
> 
> package RT::LWP::UA;
> 
> use base 'LWP::UserAgent';
> 
> our $login = undef;
> our $password = undef;
> 
> # For non-proxy authentication, simply return the stored credentials
> # disregarding the realm. This keeps configuration as simple as possible
> sub get_basic_credentials
> {
>     my ($realm, $uri, $isproxy);
>     return ($login, $password) unless $isproxy;
>     return (undef, undef);
> }
> 
> # Get back to our main programming...
> package main;
> 
850c872,876
<     my $ua = new LWP::UserAgent(agent => "RT/3.0b", env_proxy => 1);
---
>     my $ua = new RT::LWP::UA(agent => "RT/3.0b", env_proxy => 1);
> 
>     # Set the required user / password information in the UA
>     $RT::LWP::UA::login    = $config{user};
>     $RT::LWP::UA::password = $config{passwd} ||= read_passwd();

-- System Information:
Debian Release: 4.0
  APT prefers stable
  APT policy: (500, 'stable')
Architecture: i386 (i686)
Shell:  /bin/sh linked to /bin/bash
Kernel: Linux 2.6.22-mactel-lem
Locale: LANG=en_US.UTF-8, LC_CTYPE=en_US.UTF-8 (charmap=UTF-8)

Versions of packages rt3.6-clients depends on:
ii  libhtml-format-perl         2.04-1       Format HTML syntax trees
ii  libhtml-tree-perl           3.19.01-2    represent and create HTML syntax t
ii  libwww-perl                 5.805-1      WWW client/server library for Perl
ii  perl                        5.8.8-7etch6 Larry Wall's Practical Extraction 
ii  sendmail-bin [mail-transpor 8.13.8-3     powerful, efficient, and scalable 

Versions of packages rt3.6-clients recommends:
ii  libio-socket-ssl-perl         1.01-1     Perl module implementing object or

-- no debconf information