You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl@perl.apache.org by Marina Markus <ma...@bgumail.bgu.ac.il> on 2004/11/01 17:19:16 UTC
Request methods not found
Hello,
With Geoffrey Young's generous help I have successfully implemented
authentication using my own handler subroutine defined as PerlAuthenHandler.
This works OK in RedHat but not on SGI (IRIX 6.2). Call to the handler fails
complaining that it cannot find request object methods, be it "connection"
or "get_basic_auth_pw", saying, for example:
[Mon Nov 1 12:54:13 2004] [error] Can't locate object method
"get_basic_auth_pw" via package "Our::Auth" at
/usr/local/lib/perl5/site_perl/5.005/Our/Auth.pm line 16, <DATA> chunk
225.\n
These methods should come with the installation of mod_perl, shouldn't they?
A bare installation of Apache 1.3.31+mod_perl 1.29 on a RedHat works OK
without demanding any addition Perl modules to be installed.
Maybe the ancient Perl version (5.005) is to blame?
Thank you for any idea.
Marina Markus
mary@bgumail.bgu.ac.il
RE: Request methods not found
Posted by Martin Moss <ma...@btopenworld.com>.
Having Just re-read your reply, (don't ask, waiting
for a machine sync to finish, bored...!) I noticed
that you said you didn't get an apache Object at all.
This is behaviour I've seen myself, and I never got a
decent understanding of why it happens?
So does anybody know under what circumstances it's
possible to NOT get an Apache object passed into your
handler subroutine?
Does this happen when a subrequest occurs?
Regards
Marty
--- Marina Markus <ma...@bgumail.bgu.ac.il> wrote:
> Hello and many thanks to Martin and Geoffrey,
>
> Martin was right - using "Dump" revealed that only
> "Our::Auth" was passed as
> an input variable (and the request was not passed at
> all). After I changed
> "PerlAuthenHandler Our::Auth->authen_handler" to
> "PerlAuthenHandler
> Our::Auth::authen_handler", the handler started to
> get the request as the
> first variable.
>
> If Martin can give such exact advices after a bad
> night, I ask what wonders
> he can do when he is OK :)
>
> Thanks a lot to Geoffrey for Apache-Test, it looks
> very helpful.
> -Marina
>
> -----Original Message-----
> From: Geoffrey Young
> [mailto:geoff@modperlcookbook.org]
> Sent: Tuesday, November 02, 2004 3:09 PM
> To: Marina Markus
> Cc: modperl@perl.apache.org;
> martin_moss@btopenworld.com
> Subject: Re: Request methods not found
>
>
> > This code works OK in RedHat but cannot find
> "get_basic_auth_pw" in SGI.
> > Still, my feeling is that that something simple
> but imporant is omitted
> > in the code.
>
> no, the code looks fine. the issue isn't that
> get_basic_auth_pw() can't
> generally be found, but that $r isn't an Apache
> object, so your code is
> looking in the wrong place. and you could be
> looking in the wrong place
> through no fault of your code at all - as martin
> suggested, you are probably
> using method handlers without knowing it.
>
> besides the (good) advice that martin gave in his
> post, a really, really
> good way to track this down would be to use
> Apache-Test. not that you are
> required to do this, but if you're interested in
> spending the up-front time
> to learn something new that will save you _lots_ of
> time in the future, give
> this a whirl...
>
> first, install Apache-Test from CPAN:
>
> http://search.cpan.org/dist/Apache-Test/
>
> then download this sample tarball:
>
>
>
http://perl.apache.org/~geoff/Apache-Test-skeleton-mp1.tar.gz
>
> and tweak the distribution so that your handler is
> activated (follow the
> README to get started). then try this:
>
> $ perl Makefile.PL -httpd
> /path/to/your/apache/bin/httpd
> $ make
> $ t/TEST -conf
> $ t/TEST -start
>
> and you can use your browser (or lynx or whatever)
> to hit
> http://localhost:8529/ and see your handler in
> action. you could also take
> the time to tweak bug.t to act as a client for you.
>
> the benefit here is that you now have a pristine
> environment with nothing
> attached to it except the code in question, and you
> can roll up your code
> (via make dist) and try it on different boxes. you
> can even post a link to
> the tarball you have made for developers here to
> try, which would save
> iterations of 'what's the code? what's the
> configuration?" and so on.
>
> now, if you don't do all of that, never fear - we're
> still here to help :)
> but it's something to keep in mind as you go forward
> with mod_perl related
> things. Apache-Test is a wonderful development
> tool, so taking the time to
> get familiar with it will reap many, many benefits
> in the long term.
>
> >>well, that message says that it can't find
> get_basic_auth_pw() via
> >>Our::Auth. it should be looking for it via the
> Apache class, not
> >>Our::Auth.
> >
> >
> > What checks can I do to see if Apache class is
> seen by mod_perl?
>
> it is, or the 'use Apache' call would die.
>
> HTH
>
> --Geoff
>
>
___________________________________________________________ALL-NEW Yahoo! Messenger - all new features - even more fun! http://uk.messenger.yahoo.com
--
Report problems: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html
List etiquette: http://perl.apache.org/maillist/email-etiquette.html
RE: Request methods not found
Posted by Marina Markus <ma...@bgumail.bgu.ac.il>.
Hello and many thanks to Martin and Geoffrey,
Martin was right - using "Dump" revealed that only "Our::Auth" was passed as
an input variable (and the request was not passed at all). After I changed
"PerlAuthenHandler Our::Auth->authen_handler" to "PerlAuthenHandler
Our::Auth::authen_handler", the handler started to get the request as the
first variable.
If Martin can give such exact advices after a bad night, I ask what wonders
he can do when he is OK :)
Thanks a lot to Geoffrey for Apache-Test, it looks very helpful.
-Marina
-----Original Message-----
From: Geoffrey Young [mailto:geoff@modperlcookbook.org]
Sent: Tuesday, November 02, 2004 3:09 PM
To: Marina Markus
Cc: modperl@perl.apache.org; martin_moss@btopenworld.com
Subject: Re: Request methods not found
> This code works OK in RedHat but cannot find "get_basic_auth_pw" in SGI.
> Still, my feeling is that that something simple but imporant is omitted
> in the code.
no, the code looks fine. the issue isn't that get_basic_auth_pw() can't
generally be found, but that $r isn't an Apache object, so your code is
looking in the wrong place. and you could be looking in the wrong place
through no fault of your code at all - as martin suggested, you are probably
using method handlers without knowing it.
besides the (good) advice that martin gave in his post, a really, really
good way to track this down would be to use Apache-Test. not that you are
required to do this, but if you're interested in spending the up-front time
to learn something new that will save you _lots_ of time in the future, give
this a whirl...
first, install Apache-Test from CPAN:
http://search.cpan.org/dist/Apache-Test/
then download this sample tarball:
http://perl.apache.org/~geoff/Apache-Test-skeleton-mp1.tar.gz
and tweak the distribution so that your handler is activated (follow the
README to get started). then try this:
$ perl Makefile.PL -httpd /path/to/your/apache/bin/httpd
$ make
$ t/TEST -conf
$ t/TEST -start
and you can use your browser (or lynx or whatever) to hit
http://localhost:8529/ and see your handler in action. you could also take
the time to tweak bug.t to act as a client for you.
the benefit here is that you now have a pristine environment with nothing
attached to it except the code in question, and you can roll up your code
(via make dist) and try it on different boxes. you can even post a link to
the tarball you have made for developers here to try, which would save
iterations of 'what's the code? what's the configuration?" and so on.
now, if you don't do all of that, never fear - we're still here to help :)
but it's something to keep in mind as you go forward with mod_perl related
things. Apache-Test is a wonderful development tool, so taking the time to
get familiar with it will reap many, many benefits in the long term.
>>well, that message says that it can't find get_basic_auth_pw() via
>>Our::Auth. it should be looking for it via the Apache class, not
>>Our::Auth.
>
>
> What checks can I do to see if Apache class is seen by mod_perl?
it is, or the 'use Apache' call would die.
HTH
--Geoff
--
Report problems: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html
List etiquette: http://perl.apache.org/maillist/email-etiquette.html
Re: Request methods not found
Posted by Geoffrey Young <ge...@modperlcookbook.org>.
> This code works OK in RedHat but cannot find "get_basic_auth_pw" in SGI.
> Still, my feeling is that that something simple but imporant is omitted
> in the code.
no, the code looks fine. the issue isn't that get_basic_auth_pw() can't
generally be found, but that $r isn't an Apache object, so your code is
looking in the wrong place. and you could be looking in the wrong place
through no fault of your code at all - as martin suggested, you are probably
using method handlers without knowing it.
besides the (good) advice that martin gave in his post, a really, really
good way to track this down would be to use Apache-Test. not that you are
required to do this, but if you're interested in spending the up-front time
to learn something new that will save you _lots_ of time in the future, give
this a whirl...
first, install Apache-Test from CPAN:
http://search.cpan.org/dist/Apache-Test/
then download this sample tarball:
http://perl.apache.org/~geoff/Apache-Test-skeleton-mp1.tar.gz
and tweak the distribution so that your handler is activated (follow the
README to get started). then try this:
$ perl Makefile.PL -httpd /path/to/your/apache/bin/httpd
$ make
$ t/TEST -conf
$ t/TEST -start
and you can use your browser (or lynx or whatever) to hit
http://localhost:8529/ and see your handler in action. you could also take
the time to tweak bug.t to act as a client for you.
the benefit here is that you now have a pristine environment with nothing
attached to it except the code in question, and you can roll up your code
(via make dist) and try it on different boxes. you can even post a link to
the tarball you have made for developers here to try, which would save
iterations of 'what's the code? what's the configuration?" and so on.
now, if you don't do all of that, never fear - we're still here to help :)
but it's something to keep in mind as you go forward with mod_perl related
things. Apache-Test is a wonderful development tool, so taking the time to
get familiar with it will reap many, many benefits in the long term.
>>well, that message says that it can't find get_basic_auth_pw() via
>>Our::Auth. it should be looking for it via the Apache class, not
>>Our::Auth.
>
>
> What checks can I do to see if Apache class is seen by mod_perl?
it is, or the 'use Apache' call would die.
HTH
--Geoff
--
Report problems: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html
List etiquette: http://perl.apache.org/maillist/email-etiquette.html
Re: Request methods not found
Posted by Martin Moss <ma...@btopenworld.com>.
Hi Marina,
Can you post a bit of your http.conf which declares
your AuthHandler's usage?
Are you saying:-
PerlAuthHandler Our::Auth->authen_handler
or
PerlAuthHandler Our::Authen::authenhandler
I ran some code across SuSe and Redhat and noticed
different behviours for using "->".
If you use "->" I think that this is interpreted as a
'method handler' and as such the first argument to
your authen_handler subroutine would be your classname
(Our::Auth) and the second argument would be the $r
(Apache->request).
Can you add this to your code:-
> package Our::Auth;
> use strict;
> use Apache;
> use Apache::Constants qw(:common);
>
use Data::Dumper;
> use mod_perl ();
>
> sub authen_handler {
>
print STDERR Dumper(@_); #lets see what you
got passed
> my $r = shift;
>
> my ($res, $sent_pw) = $r->get_basic_auth_pw;
>
> return $res if $res != OK;
>
> my $user = $r->connection->user;
> if (!$user || !$sent_pw) {
> return AUTH_REQUIRED;
> }
> return OK;
> }
> 1;
I suspect that you will see 2 variables passed into
you subroutine
1 = 'Our::Auth'
2 = instantiated Apache object
However I did have a skinful last night and my brain
is a little sluggish, so I could be wrong...(anybody
feel free to correct me)
Marty
--- Marina Markus <ma...@bgumail.bgu.ac.il> wrote:
>
> Hello Geoffrey,
>
> Thank you for your answer; but I have to ask you for
> more help
> as I neither use a pre-build version nor work with
> subclassing.
> The handler code is very simple:
>
> package Our::Auth;
> use strict;
> use Apache;
> use Apache::Constants qw(:common);
>
> use mod_perl ();
>
> sub authen_handler {
>
> my $r = shift;
>
> my ($res, $sent_pw) = $r->get_basic_auth_pw;
>
> return $res if $res != OK;
>
> my $user = $r->connection->user;
> if (!$user || !$sent_pw) {
> return AUTH_REQUIRED;
> }
> return OK;
> }
> 1;
>
> This code works OK in RedHat but cannot find
> "get_basic_auth_pw" in SGI.
> Still, my feeling is that that something simple but
> imporant is omitted
> in the code.
>
> > that's right. are you rolling your own on SGI or
> using a pre-compiled
> > package? if the package is pre-compliled you
> might want to make sure that
> > it's mod_perl 1.2X and not mod_perl 1.99_XX, which
> is the precursor to
> > mod_perl 2.0 and a completely different beast.
>
> I didn't use pre-compiled package but built it from
> source (Apache 1.3.31+
> PHP 4.3.8 + mod_perl 1.29).
>
> Maybe the following can be important: compilation is
> 32-bit
> (with "-o32" flag), otherwise Apache build complains
> of incompatible
> libraries. In fact, I had to configure mod_perl
> using a Shell-script:
>
> #!/bin/sh
> CC="cc -o32" \
> perl Makefile.PL PERL_LOG=1 PERL_CHILD_INIT=1 \
> PERL_AUTHEN=1 PERL_ACCESS=1 PERL_AUTHZ=1 \
> PERL_CLEANUP=1 PERL_STACKED_HANDLERS=1 \
> USE_APACI=1 APACI_ARGS='--with-layout=Apache
> --prefix=/apache
> --activate-module=src/modules/php4/libphp4.a'
>
> Still, there were no error messages concerning
> 32-to-64 incompatibility,
> so it may be not relevant.
>
> > well, that message says that it can't find
> get_basic_auth_pw() via
> > Our::Auth. it should be looking for it via the
> Apache class, not
> > Our::Auth.
>
> What checks can I do to see if Apache class is seen
> by mod_perl?
>
> Thank you,
>
> Marina Markus
> mary@bgumail.bgu.ac.il
>
>
> On Mon, 1 Nov 2004, Geoffrey Young wrote:
>
> >
> >
> > Marina Markus wrote:
> > > Hello,
> > >
> > > With Geoffrey Young's generous help I have
> successfully implemented
> > > authentication using my own handler subroutine
> defined as PerlAuthenHandler.
> >
> > :)
> >
> >
> > > This works OK in RedHat but not on SGI (IRIX
> 6.2). Call to the handler fails
> > > complaining that it cannot find request object
> methods, be it "connection"
> > > or "get_basic_auth_pw", saying, for example:
> > >
> > > [Mon Nov 1 12:54:13 2004] [error] Can't locate
> object method
> > > "get_basic_auth_pw" via package "Our::Auth" at
> > > /usr/local/lib/perl5/site_perl/5.005/Our/Auth.pm
> line 16, <DATA> chunk
> > > 225.\n
> >
> > well, that message says that it can't find
> get_basic_auth_pw() via
> > Our::Auth. it should be looking for it via the
> Apache class, not Our::Auth.
> > if you're looking for it via $r blessed into
> Our::Auth you need to make
> > sure that you're doing subclassing properly for
> mod_perl (which is a bit
> > different than normal perl subclasses). see
> >
> >
>
http://www.modperlcookbook.org/code/ch10/Cookbook/Apache.pm
> >
> > for an example.
> >
> > if you're not trying any subclassing tricks then
> something is definitely
> > amuck - $r should be an 'Apache' object (or
> 'Apache::RequestRec' in mp2)
> > when you call $r->note_basio_auth_pw.
> >
> > >
> > > These methods should come with the installation
> of mod_perl, shouldn't they?
> >
> > yes.
> >
> > > A bare installation of Apache 1.3.31+mod_perl
> 1.29 on a RedHat works OK
> > > without demanding any addition Perl modules to
> be installed.
> >
> > that's right. are you rolling your own on SGI or
> using a pre-compiled
> > package? if the package is pre-compliled you
> might want to make sure that
> > it's mod_perl 1.2X and not mod_perl 1.99_XX, which
> is the precursor to
> > mod_perl 2.0 and a completely different beast.
> >
> > >
> > > Maybe the ancient Perl version (5.005) is to
> blame?
> >
> > nope.
> >
> > as I said, based on the message above something is
> amuck that looks to have
> > nothing to do with mod_perl, but rather the way
> that get_basic_auth_pw() is
> > being invoked.
> >
> > HTH
> >
> > --Geoff
> >
> > --
> > Report problems: http://perl.apache.org/bugs/
> > Mail list info:
> http://perl.apache.org/maillist/modperl.html
> > List etiquette:
> http://perl.apache.org/maillist/email-etiquette.html
> >
> >
>
>
> --
> Report problems: http://perl.apache.org/bugs/
> Mail list info:
> http://perl.apache.org/maillist/modperl.html
> List etiquette:
> http://perl.apache.org/maillist/email-etiquette.html
>
>
___________________________________________________________ALL-NEW Yahoo! Messenger - all new features - even more fun! http://uk.messenger.yahoo.com
--
Report problems: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html
List etiquette: http://perl.apache.org/maillist/email-etiquette.html
Re: Request methods not found
Posted by Marina Markus <ma...@bgumail.bgu.ac.il>.
Hello Geoffrey,
Thank you for your answer; but I have to ask you for more help
as I neither use a pre-build version nor work with subclassing.
The handler code is very simple:
package Our::Auth;
use strict;
use Apache;
use Apache::Constants qw(:common);
use mod_perl ();
sub authen_handler {
my $r = shift;
my ($res, $sent_pw) = $r->get_basic_auth_pw;
return $res if $res != OK;
my $user = $r->connection->user;
if (!$user || !$sent_pw) {
return AUTH_REQUIRED;
}
return OK;
}
1;
This code works OK in RedHat but cannot find "get_basic_auth_pw" in SGI.
Still, my feeling is that that something simple but imporant is omitted
in the code.
> that's right. are you rolling your own on SGI or using a pre-compiled
> package? if the package is pre-compliled you might want to make sure that
> it's mod_perl 1.2X and not mod_perl 1.99_XX, which is the precursor to
> mod_perl 2.0 and a completely different beast.
I didn't use pre-compiled package but built it from source (Apache 1.3.31+
PHP 4.3.8 + mod_perl 1.29).
Maybe the following can be important: compilation is 32-bit
(with "-o32" flag), otherwise Apache build complains of incompatible
libraries. In fact, I had to configure mod_perl using a Shell-script:
#!/bin/sh
CC="cc -o32" \
perl Makefile.PL PERL_LOG=1 PERL_CHILD_INIT=1 \
PERL_AUTHEN=1 PERL_ACCESS=1 PERL_AUTHZ=1 \
PERL_CLEANUP=1 PERL_STACKED_HANDLERS=1 \
USE_APACI=1 APACI_ARGS='--with-layout=Apache --prefix=/apache
--activate-module=src/modules/php4/libphp4.a'
Still, there were no error messages concerning 32-to-64 incompatibility,
so it may be not relevant.
> well, that message says that it can't find get_basic_auth_pw() via
> Our::Auth. it should be looking for it via the Apache class, not
> Our::Auth.
What checks can I do to see if Apache class is seen by mod_perl?
Thank you,
Marina Markus
mary@bgumail.bgu.ac.il
On Mon, 1 Nov 2004, Geoffrey Young wrote:
>
>
> Marina Markus wrote:
> > Hello,
> >
> > With Geoffrey Young's generous help I have successfully implemented
> > authentication using my own handler subroutine defined as PerlAuthenHandler.
>
> :)
>
>
> > This works OK in RedHat but not on SGI (IRIX 6.2). Call to the handler fails
> > complaining that it cannot find request object methods, be it "connection"
> > or "get_basic_auth_pw", saying, for example:
> >
> > [Mon Nov 1 12:54:13 2004] [error] Can't locate object method
> > "get_basic_auth_pw" via package "Our::Auth" at
> > /usr/local/lib/perl5/site_perl/5.005/Our/Auth.pm line 16, <DATA> chunk
> > 225.\n
>
> well, that message says that it can't find get_basic_auth_pw() via
> Our::Auth. it should be looking for it via the Apache class, not Our::Auth.
> if you're looking for it via $r blessed into Our::Auth you need to make
> sure that you're doing subclassing properly for mod_perl (which is a bit
> different than normal perl subclasses). see
>
> http://www.modperlcookbook.org/code/ch10/Cookbook/Apache.pm
>
> for an example.
>
> if you're not trying any subclassing tricks then something is definitely
> amuck - $r should be an 'Apache' object (or 'Apache::RequestRec' in mp2)
> when you call $r->note_basio_auth_pw.
>
> >
> > These methods should come with the installation of mod_perl, shouldn't they?
>
> yes.
>
> > A bare installation of Apache 1.3.31+mod_perl 1.29 on a RedHat works OK
> > without demanding any addition Perl modules to be installed.
>
> that's right. are you rolling your own on SGI or using a pre-compiled
> package? if the package is pre-compliled you might want to make sure that
> it's mod_perl 1.2X and not mod_perl 1.99_XX, which is the precursor to
> mod_perl 2.0 and a completely different beast.
>
> >
> > Maybe the ancient Perl version (5.005) is to blame?
>
> nope.
>
> as I said, based on the message above something is amuck that looks to have
> nothing to do with mod_perl, but rather the way that get_basic_auth_pw() is
> being invoked.
>
> HTH
>
> --Geoff
>
> --
> Report problems: http://perl.apache.org/bugs/
> Mail list info: http://perl.apache.org/maillist/modperl.html
> List etiquette: http://perl.apache.org/maillist/email-etiquette.html
>
>
--
Report problems: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html
List etiquette: http://perl.apache.org/maillist/email-etiquette.html
Re: Request methods not found
Posted by Geoffrey Young <ge...@modperlcookbook.org>.
Marina Markus wrote:
> Hello,
>
> With Geoffrey Young's generous help I have successfully implemented
> authentication using my own handler subroutine defined as PerlAuthenHandler.
:)
> This works OK in RedHat but not on SGI (IRIX 6.2). Call to the handler fails
> complaining that it cannot find request object methods, be it "connection"
> or "get_basic_auth_pw", saying, for example:
>
> [Mon Nov 1 12:54:13 2004] [error] Can't locate object method
> "get_basic_auth_pw" via package "Our::Auth" at
> /usr/local/lib/perl5/site_perl/5.005/Our/Auth.pm line 16, <DATA> chunk
> 225.\n
well, that message says that it can't find get_basic_auth_pw() via
Our::Auth. it should be looking for it via the Apache class, not Our::Auth.
if you're looking for it via $r blessed into Our::Auth you need to make
sure that you're doing subclassing properly for mod_perl (which is a bit
different than normal perl subclasses). see
http://www.modperlcookbook.org/code/ch10/Cookbook/Apache.pm
for an example.
if you're not trying any subclassing tricks then something is definitely
amuck - $r should be an 'Apache' object (or 'Apache::RequestRec' in mp2)
when you call $r->note_basio_auth_pw.
>
> These methods should come with the installation of mod_perl, shouldn't they?
yes.
> A bare installation of Apache 1.3.31+mod_perl 1.29 on a RedHat works OK
> without demanding any addition Perl modules to be installed.
that's right. are you rolling your own on SGI or using a pre-compiled
package? if the package is pre-compliled you might want to make sure that
it's mod_perl 1.2X and not mod_perl 1.99_XX, which is the precursor to
mod_perl 2.0 and a completely different beast.
>
> Maybe the ancient Perl version (5.005) is to blame?
nope.
as I said, based on the message above something is amuck that looks to have
nothing to do with mod_perl, but rather the way that get_basic_auth_pw() is
being invoked.
HTH
--Geoff
--
Report problems: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html
List etiquette: http://perl.apache.org/maillist/email-etiquette.html