You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl@perl.apache.org by "Beau E. Cox" <be...@beaucox.com> on 2004/01/28 03:45:59 UTC
[mp2] $r->construct_url
Hi -
-------------8<---------- Start Bug Report ------------8<----------
1. Problem Description:
I am having a really strange problem in mod_perl. The following
simple test handler:
#file:MyApache/HappyFunBall.pm
# ---------------------
package MyApache::HappyFunBall;
use strict;
use warnings;
use Apache2 ();
use Apache::RequestRec ();
use Apache::Const -compile => qw( OK );
sub handler
{
my $r = shift;
$r->content_type( 'text/plain' );
$r->print( $r->can( 'construct_url' ) ? 'CAN' : 'CAN NOT',
" construct_url\n" );
require APR::URI;
$r->print( $r->can( 'construct_url' ) ? 'CAN' : 'CAN NOT',
" construct_url\n" );
APR::URI->import();
$r->print( $r->can( 'construct_url' ) ? 'CAN' : 'CAN NOT',
" construct_url\n" );
my $curl = eval { $r->construct_url };
if( $@ ) {
$r->print( "construct_url failed:\n". $@ );
return Apache::OK;
}
my $uri = APR::URI->parse ($r->pool, $curl);
$r->print( "incoming uri => ", $uri->unparse, "\n" );
$r->print( "scheme => ", $uri->scheme, "\n" );
$r->print( "hostname => ", $uri->hostname, "\n" );
$r->print( "path => ", $uri->path, "\n" );
$r->print( "port => ", $uri->port, "\n" );
return Apache::OK;
}
1;
Is invoked via httpd.conf as per:
PerlModule MyApache::HappyFunBall
<Location /happyfunball>
SetHandler modperl
PerlResponseHandler MyApache::HappyFunBall
PerlOptions +GlobalRequest
</Location>
On my production apache, it fails ( cannot find construct_url ).
On my test apache (running on the _SAME_ maching, using
the _SAME_ perl @INC array) ir works! The only difference
I can see in the two servers are the Server and Document
roots and the virtual hosts setup.
2. Used Components and their Configuration:
*** mod_perl version 1.9913
*** using lib/Apache/BuildConfig.pm
*** Makefile.PL options:
MP_APXS => /usr/apache2/sbin/apxs
MP_COMPAT_1X => 1
MP_GENERATE_XS => 1
MP_LIBNAME => mod_perl
MP_USE_DSO => 1
MP_USE_STATIC => 1
*** /usr/apache2/sbin/httpd -V
Server version: Apache/2.0.48
Server built: Jan 26 2004 06:20:30
Server's Module Magic Number: 20020903:4
Architecture: 32-bit
Server compiled with....
-D APACHE_MPM_DIR="server/mpm/worker"
-D APR_HAS_SENDFILE
-D APR_HAS_MMAP
-D APR_HAVE_IPV6 (IPv4-mapped addresses enabled)
-D APR_USE_SYSVSEM_SERIALIZE
-D APR_USE_PTHREAD_SERIALIZE
-D SINGLE_LISTEN_UNSERIALIZED_ACCEPT
-D APR_HAS_OTHER_CHILD
-D AP_HAVE_RELIABLE_PIPED_LOGS
-D HTTPD_ROOT="/usr/apache2"
-D SUEXEC_BIN="/usr/apache2/bin/suexec"
-D DEFAULT_SCOREBOARD="logs/apache_runtime_status"
-D DEFAULT_ERRORLOG="logs/error_log"
-D AP_TYPES_CONFIG_FILE="/etc/httpd/mime.types"
-D SERVER_CONFIG_FILE="/etc/httpd/httpd.conf"
*** /usr/bin/perl -V
Summary of my perl5 (revision 5.0 version 8 subversion 2) configuration:
Platform:
osname=linux, osvers=2.4.24-pre1.lm, archname=i686-linux-thread-multi
uname='linux cathy.beaucox.com 2.4.24-pre1.lm #1 thu dec 11 02:58:17 hst
2003 i686 unknown unknown gnulinux '
config_args='-Dprefix=/usr -d -e -Dusethreads'
hint=recommended, useposix=true, d_sigaction=define
usethreads=define use5005threads=undef useithreads=define
usemultiplicity=define
useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
use64bitint=undef use64bitall=undef uselongdouble=undef
usemymalloc=n, bincompat5005=undef
Compiler:
cc='cc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAVE_PIDS
-fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE
-D_FILE_OFFSET_BITS=64',
optimize='-O3',
cppflags='-D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAVE_PIDS
-fno-strict-aliasing -I/usr/local/include'
ccversion='', gccversion='3.3.2', gccosandvers=''
intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t',
lseeksize=8
alignbytes=4, prototype=define
Linker and Libraries:
ld='cc', ldflags =' -L/usr/local/lib'
libpth=/usr/local/lib /lib /usr/lib
libs=-lnsl -ldb -ldl -lm -lcrypt -lutil -lpthread -lc
perllibs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
libc=/lib/libc-2.3.2.so, so=so, useshrplib=false, libperl=libperl.a
gnulibc_version='2.3.2'
Dynamic Linking:
dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic'
cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib'
Characteristics of this binary (from libperl):
Compile-time options: MULTIPLICITY USE_ITHREADS USE_LARGE_FILES
PERL_IMPLICIT_CONTEXT
Built under linux
Compiled at Dec 20 2003 03:01:43
%ENV:
PERL_LWP_USE_HTTP_10="1"
@INC:
/usr/lib/perl5/5.8.2/i686-linux-thread-multi
/usr/lib/perl5/5.8.2
/usr/lib/perl5/site_perl/5.8.2/i686-linux-thread-multi
/usr/lib/perl5/site_perl/5.8.2
/usr/lib/perl5/site_perl/5.8.1/i686-linux-thread-multi
/usr/lib/perl5/site_perl/5.8.1
/usr/lib/perl5/site_perl
.
*** Packages of interest status:
Apache::Request: 2.02-dev
CGI : 3.04
LWP : 5.69
mod_perl : 1.9913
3. This is the core dump trace: (if you get a core dump):
[CORE TRACE COMES HERE]
This report was generated by t/REPORT on Wed Jan 28 02:40:48 2004 GMT.
-------------8<---------- End Bug Report --------------8<----------
Note: Complete the rest of the details and post this bug report to
dev <at> perl.apache.org. To subscribe to the list send an empty
email to dev-subscribe@perl.apache.org.
Aloha => Beau;
--
Reporting bugs: 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: [mp2] $r->construct_url
Posted by "Beau E. Cox" <be...@beaucox.com>.
On Tuesday 27 January 2004 05:25 pm, Stas Bekman wrote:
> Beau E. Cox wrote:
> > Hi -
> >
> > -------------8<---------- Start Bug Report ------------8<----------
> > 1. Problem Description:
> >
> > I am having a really strange problem in mod_perl. The following
> > simple test handler:
> >
> > #file:MyApache/HappyFunBall.pm
> > # ---------------------
> > package MyApache::HappyFunBall;
> > use strict;
> > use warnings;
> > use Apache2 ();
> > use Apache::RequestRec ();
> > use Apache::Const -compile => qw( OK );
> >
> >
> > $r->print( $r->can( 'construct_url' ) ? 'CAN' : 'CAN NOT',
> > " construct_url\n" );
> > require APR::URI;
>
> cauze it's Apache::URI ;(
>
> lookup construct_url
> To use method 'construct_url' add:
> use Apache::URI ();
>
> we are working on making this process of figuring out where things are, not
> as painful as it is now.
>
> > On my production apache, it fails ( cannot find construct_url ).
> > On my test apache (running on the _SAME_ maching, using
> > the _SAME_ perl @INC array) ir works! The only difference
> > I can see in the two servers are the Server and Document
> > roots and the virtual hosts setup.
>
> You probably load Apache::URI somewhere on your test machine. For example
> Apache::compat loads this module.
>
> % grep Apache::URI lib/Apache/compat.pm
> use Apache::URI ();
>
THANKS Stas!
All is fine with use Apache::URI ();
Once more you're batting 100%.
Aloha => Beau;
PS: I have a working pure-mod_perl2 Mason (using the libapreq2 mod_perl
request interface). It is currently running - OK so far - on my site. I am
packaging it now and plan to announce it here and on Mason in a day
or two.
--
Reporting bugs: 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: [mp2] $r->construct_url
Posted by Stas Bekman <st...@stason.org>.
Beau E. Cox wrote:
> Hi -
>
> -------------8<---------- Start Bug Report ------------8<----------
> 1. Problem Description:
>
> I am having a really strange problem in mod_perl. The following
> simple test handler:
>
> #file:MyApache/HappyFunBall.pm
> # ---------------------
> package MyApache::HappyFunBall;
> use strict;
> use warnings;
> use Apache2 ();
> use Apache::RequestRec ();
> use Apache::Const -compile => qw( OK );
> $r->print( $r->can( 'construct_url' ) ? 'CAN' : 'CAN NOT',
> " construct_url\n" );
> require APR::URI;
cauze it's Apache::URI ;(
lookup construct_url
To use method 'construct_url' add:
use Apache::URI ();
we are working on making this process of figuring out where things are, not as
painful as it is now.
> On my production apache, it fails ( cannot find construct_url ).
> On my test apache (running on the _SAME_ maching, using
> the _SAME_ perl @INC array) ir works! The only difference
> I can see in the two servers are the Server and Document
> roots and the virtual hosts setup.
You probably load Apache::URI somewhere on your test machine. For example
Apache::compat loads this module.
% grep Apache::URI lib/Apache/compat.pm
use Apache::URI ();
__________________________________________________________________
Stas Bekman JAm_pH ------> Just Another mod_perl Hacker
http://stason.org/ mod_perl Guide ---> http://perl.apache.org
mailto:stas@stason.org http://use.perl.org http://apacheweek.com
http://modperlbook.org http://apache.org http://ticketmaster.com
--
Reporting bugs: 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