-------------8<---------- Start Bug Report ------------8<----------
1. Problem Description:
I am porting a mod_perl 1.x system ( Mason ) to 2.0. This
is a totally unofficial effort, more for me to learn
mod_perl2 and Mason than anything else. The system
has in-place a scheme to pass the request object from
module to module ( method $self->apache_req ).
Becauuse of problems, I made the apache request global
( PerlOptions +GlobalRequest ) and used the Apache->request
global request accessor - it works fine that way.
Now I am trying to go back to the passed request object.
Here is what happens:
$self->apache_req->server->log->notice ( "try apache_req" );
-- logs OK
Apache->request->server->log->notice ( "try Apache->request" );
-- logs OK
($self->{cookie_class} is 'Apache::Cookie')
my $cookie =
$self->{cookie_class}->new( Apache->request, ... );
-- OK
my $cookie =
$self->{cookie_class}->new( $self->apache_req, ... );
-- Segmentation fault (11)
my $apr = Apache::Request->new( $self->apache_req );
-- Segmentation fault (11)
Apache->request->server->log->notice
( "global \$r => ", Apache->request );
-- prints:
[Thu Jan 29 00:29:28 2004] [notice] global $r =>
Apache::RequestRec=SCALAR(0x94cb658)
Apache->request->server->log->notice
( "\$self->apache_req => ", $self->apache_req );
--prints:
[Thu Jan 29 00:29:28 2004] [notice] $self->apache_req =>
Apache::Request=SCALAR(0x8ac6c9c)
The module's uses:
use Apache2;
use Apache::Session;
use Apache::RequestRec;
use Apache::RequestUtil;
use Apache::Cookie;
use CGI::Cookie;
use HTML::Mason 1.16;
use HTML::Mason::Exceptions ( abbr => [ qw( param_error error ) ] );
use HTML::Mason::Request;
I am befuttled(?sp?) that the $r->apache_req is able to log via
the ->server->log interface, but refuses to cookieize.
2. Used Components and their Configuration:
*** mod_perl version 1.9913
(NOTICE THAT I REMOVED THE DEFAULT COMPAT)
*** using lib/Apache/BuildConfig.pm
*** Makefile.PL options:
MP_APXS => /usr/apache2/sbin/apxs
MP_COMPAT_1X =>
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 Thu Jan 29 10:32:23 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 [EMAIL PROTECTED]
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
