getting user basic_credentials in a SOAP::Lite Server

physi has asked for the wisdom of the Perl Monks concerning the following question:

Hi Monks,

I got a SOAP::Lite Server using

use SOAP::Transport::HTTP +trace => [qw(all)];

In the trace I find a lot of tracing stuff, but there is no chance to figure out the basic_credentials, which are sent to my server by i.e. SOAPUI with the username and password property.

Any hint of how to read this properties from the incoming SOAP message would be a real pleasure ;-)

Cheers, Christian

-----------------------------------
--the good, the bad and the physi--
-----------------------------------

Comment on getting user basic_credentials in a SOAP::Lite Server Download Code

Replies are listed 'Best First'.

Re: getting user basic_credentials in a SOAP::Lite Server
by Anonymous Monk on Nov 02, 2010 at 19:45 UTC

basic credentials are part of HTTP headers, they're not part of SOAP/XML

[reply]

Re^2: getting user basic_credentials in a SOAP::Lite Server

by physi (Friar) on Nov 03, 2010 at 10:45 UTC

-----------------------------------
--the good, the bad and the physi--
-----------------------------------

[reply]

Re^3: getting user basic_credentials in a SOAP::Lite Server

by Anonymous Monk on Nov 03, 2010 at 20:06 UTC

CGI->remote_user()
use Data::Dumper; print Dumper( $someobject );

?node_id=3989;HIT=soap%20auth;re=N

2009‑04‑03 mohan2monks HTTP basic authentication in SOAP::Lite SoPW

2008‑10‑28 perlchild NTLM Authentication with SOAP::Lite not working SoPW

2007‑12‑19 rahed SOAP::Lite authentication SoPW

2006‑10‑17 Anonymous Monk SOAP::Lite and web service with http basic auth SoPW

2006‑09‑06 Anonymous Monk Perl SOAP and SSL, HHTP Basic Auth SoPW

2006‑07‑20 mrguy123 Basic authentication in SOAP SoPW

2006‑07‑14 talexb Authentication and Authorization for SOAP SoPW

2006‑05‑16 Anonymous Monk Soap::Lite Authentication SoPW

2006‑04‑15 Anonymous Monk authentication and SOAP::Lite SoPW

2004‑06‑27 hpavc SOAP::Transport::HTTP::Daemon w/ Auth SoPW

2004‑04‑19 cLive ;-) SOAP::Lite - securest authentication route... SoPW

2003‑06‑04 forkboy Authentication with SOAP::Lite ? SoPW

[reply]
[d/l]

Re: getting user basic_credentials in a SOAP::Lite Server
by physi (Friar) on Nov 11, 2010 at 14:13 UTC

if (! $self->request->headers->authorization)
{
 use HTTP::Headers;
my $h = HTTP::Headers->new(
       Content_Type => 'text/html',
       'WWW-Authenticate' =>  'Basic realm="Secure Area"');
 print "no AUTH\n";
 return $self->response(
            HTTP::Response->new(
                401,"401 Unauthorized",$h))};
[download]

So now I'm able to send a 401-Message if there is no authorization in the header. The the client knows that it should send an authorization in the header and then I can check this in my Server-Code.

-----------------------------------
--the good, the bad and the physi--
-----------------------------------

[reply]
[d/l]