On Wed, 11 Jul 2001, Justin Rains wrote:
> Date: Wed, 11 Jul 2001 07:04:43 -0700 (PDT)
> From: Justin Rains <[EMAIL PROTECTED]>
> Reply-To: [EMAIL PROTECTED]
> To: [EMAIL PROTECTED]
> Subject: Errors when trying to use AuthAny.pm
>
> Hi all. I am relatively new to mod_perl so try to bear with me.
> I am trying to use the AuthAny.pm module to provide some basic
> authentication. First off.. Do I put it in the same directory as
> Registry.pm? That is where I have it now. In my httpd.conf file
> I put the following in:
>
> <Location /tools>
> AuthName Test
> AuthType Basic
> PerlAuthenHandler AuthAny
> require valid-user
> </Location>
> </VirtualHost>
>
> I am running on a cobalt raq 3. Here is what I have in AuthAny.pm:
>
> package Apache::AuthAny;
> # file: Apache/AuthAny.pm
>
>
> use strict;
> use Apache::Constants qw(:common);
>
>
> sub handler {
> my $r = shift;
>
> my($res, $sent_pw) = $r->get_basic_auth_pw;
> return $res if $res != OK;
>
>
> my $user = $r->connection->user;
> unless($user and $sent_pw) {
> $r->note_basic_auth_failure;
> $r->log_reason("Both a username and password must be
> provided", $r->filename);
> return AUTH_REQUIRED;
> }
>
>
> return OK;
> }
>
>
> 1;
> __END__
>
> The error log message is:
> [Wed Jul 11 09:04:59 2001] [error] (2)No such file or directory:
> access to /tools/ failed for nr2-216-196-142-76.fuse.net, reason:
> User not known to the underlying authentication module
>
> Am I missing something here? I am using the standard apache that
> came with the raq.
>
> Thanks for any help!
> Justin
>
> ==
> Justin Rains
> WSI.com Consulting
> http://www.wsicnslt.com/
Justin!
Wassup? Welcome to mod_perl! It's good to see your name on the list.
Since no one seems to have answered your question, I'll give it a
shot. The only thing I can come up with right now is that you might
have mistyped the <Location> directive. You have:
PerlAuthenHandler AuthAny
And the Eagle book (page 283) has:
PerlAuthenHandler Apache::AuthAny
Other than that, I can't really see a problem. I pasted your code
into my own module (not in the Apache namespace, however), and it all
worked without a problem.
FWIW, I tend to carve out my own namespaces and place my Apache Perl
modules into a library path that gets a use() in a startup file. To
be more explicit, I'll put my stuff into a directory like
"/usr/local/apache/lib/perl." Then in my httpd.conf, I'll add a line
line like "PerlRequire conf/perlstartup.pl" (where "conf" is relative
to the server root, or just whereever you want to put it). My Perl
startup file then uses all the modules I've written, like so:
#!/usr/bin/perl
# file: perlstartup.pl
use lib '/usr/local/apache/lib/perl';
use Foo::Bar;
use Foo::Baz;
use Foo::AuthAny;
1;
HTH!
ky
