Re: Apache::ServerUtil pb in modperl2
pascal barbedor wrote: apache 2.0.35 / mod_perl 1.99_01 / winnt or win2k You don't say which perl version you are using. Please remember to run t/REPORT when sending bug reports. If this is 5.6.0 before we continue, first update to 5.6.1. 5.6.0 is very buggy. 5.6.1 is very stable. I confirm that using a module in startup.pl consisting of use Data::Dumper ; use XML::LibXML() ; [1] use Apache::ServerUtil ; [2] my $s=Apache-server ; [3] my $base=$s-dir_config('some'); [4] my $xml=XML::LibXML-new(); [5] print Dumper $xml ; I cannot reproduce this problem with the same setup and perl 5.6.1 on linux. i.e. I run the whole test suite without any segfaults. here is a backtrace in case useful PERL56! 28021683() PERL56! 28071c17() PERL56! 2805c910() you realize that this bt is not useful :) even if we knew to do the easily pointer arithmetics in our head :) You need to recompile your perl and mod_perl with debugging enabled. (at least mod_perl to start with). Use MP_DEBUG=1 when building mod_perl 2.0's Makefile.PL. I'll prepare a proper doc how to build mod_perl for debuggging and report bugs with 2.0. For now if you need to recompile perl with debug mode on please use the info at: http://perl.apache.org/preview/modperl-docs/dst_html/docs/1.0/guide/help.html#How_to_Report_Problems __ Stas BekmanJAm_pH -- Just Another mod_perl Hacker http://stason.org/ mod_perl Guide --- http://perl.apache.org mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com http://modperlbook.org http://apache.org http://ticketmaster.com
Re: Apache::ServerUtil pb in modperl2
On Sat, 13 Apr 2002, pascal barbedor wrote: Does the following, or some variation, work? [ .. ] sub handler { my $r = shift; my $key = $r-dir_config-get('TEST'); $r-content_type('text/plain'); $r-print($key); Apache::OK; } yes it works perfectly well. but you are accessing dir_config through a request object and in my example I am accessing it through the server object in a use module in startup.pl I just wanted to verify that accessing it this way worked ... On my XP machine (ActivePerl 631, based on perl-5.6.1) and with httpd-2/modperl-2 from cvs I too find that accessing dir_config values from a server object doesn't work - it just returns an empty value. The modperl-2 server object tests run OK, but the dir_config tests result in a server error when trying to set a dir_config value from the request object (this occurs after the tests involving getting a value, but before accessing it from the server object). I've verified that accessing dir_config thru a server object gives an APR::Table object, and the table tests pass; this looks like a more detailed analysis is needed ... best regards, randy
Re: Apache::ServerUtil pb in modperl2
apache 2.0.35 / mod_perl 1.99_01 / winnt or win2k I confirm that using a module in startup.pl consisting of use Data::Dumper ; use XML::LibXML() ; [1] use Apache::ServerUtil ; [2] my $s=Apache-server ; [3] my $base=$s-dir_config('some'); [4] my $xml=XML::LibXML-new(); [5] print Dumper $xml ; causes the line [3] to output message Attempt to free unreferenced scalar line [4] causes apache segfaults unhandled exception perl56.dll (XML::LibXML in version 1.31 or 1.40) line [5] is executed before apache stops $VAR1 = bless( {}, 'XML::LibXML' ); here is a backtrace in case useful PERL56! 28021683() PERL56! 28071c17() PERL56! 2805c910() PERL56! 2805c5b1() PERL56! 2805c577() PERL56! 2805c577() PERL56! 2805c870() PERL56! 2805ba24() PERL56! 2800c882() PERL56! 2805c7f3() PERL56! 2805ba24() PERL56! 2800c882() PERL56! 2805b9fd() PERL56! 2800c882() PERL56! 2805b9fd() PERL56! 2800c882() PERL56! 2805b9fd() PERL56! 2800c882() PERL56! 2805c248() PERL56! 2805d510() PERL56! 2805d16f() MOD_PERL! 10001fb3() MOD_PERL! 10002a22() MOD_PERL! 10001840() MOD_PERL! 10001796() ap_run_post_config(apr_pool_t * 0x0078a830, apr_pool_t * 0x007ba660, apr_pool_t * 0x007bc6a8, server_rec * 0x007a2508) line 130 + 89 bytes main(int 1, const char * const * 0x00782760) line 569 + 22 bytes mainCRTStartup() line 338 + 17 bytes KERNEL32! 77e77903() if I drop line [4] and [5], there is the line [3] message, but apache does not seem to segfault. pascal Accédez au courrier électronique de La Poste : www.laposte.net ; 3615 LAPOSTENET (0,13 ?/mn) ; tél : 08 92 68 13 50 (0,34?/mn)
Re: Apache::ServerUtil pb in modperl2
Does the following, or some variation, work? == package Apache::Test; # PerlModule Apache::Test # Location /hello-world # SetHandler modperl # PerlResponseHandler Apache::Test # PerlSetVar TEST jdjdsds # /Location use strict; # based on t/conf/modperl_extra.pl in the mod_perl-2 sources use Apache::RequestRec (); use Apache::RequestIO (); use Apache::ServerUtil (); use Apache::RequestUtil (); use APR::Table; use Apache::Const -compile = qw(:common); use APR::Const -compile = qw(:common); sub handler { my $r = shift; my $key = $r-dir_config-get('TEST'); $r-content_type('text/plain'); $r-print($key); Apache::OK; } 1; === best regards, randy kobes yes it works perfectly well. but you are accessing dir_config through a request object and in my example I am accessing it through the server object in a use module in startup.pl best regards pascal
Apache::ServerUtil pb in modperl2
Hi apache 2.0.35 / mod_perl 1.99_01 / winnt I confirm that using a module in startup.pl consisting of use Data::Dumper ; use XML::LibXML() ; [1] use Apache::ServerUtil ; [2] my $s=Apache-server ; [3] my $base=$s-dir_config('some'); [4] my $xml=XML::LibXML-new(); [5] print Dumper $xml ; causes the line [3] to output message Attempt to free unreferenced scalar line [4] causes apache segfaults unhandled exception perl56.dll (XML::LibXML in version 1.31 or 1.40) line [5] is executed before apache stops $VAR1 = bless( {}, 'XML::LibXML' ); if I drop line [4] and [5], there is the line [3] message, but apache does not seem to segfault. pascal Accédez au courrier électronique de La Poste : www.laposte.net ; 3615 LAPOSTENET (0,13 /mn) ; tél : 08 92 68 13 50 (0,34/mn)
Re: Apache::ServerUtil pb in modperl2
On Thu, 11 Apr 2002, pascal barbedor wrote: I have a problem with Apache::ServerUtil though : when using $s-dir_config('some') i have this message (and apache segfaults) Attempt to free unreferenced scalar at .. line 17 i have installed modperl through ppd, so have not the t/report procedure i am under win2k ppd from theoryx5, ASperl build 631 for now the only lines in httpd.conf concerning modperl are perlsetvar statpath path perlrequire startup.pl then, in startup.pl : use Apache2; use Apache::ServerUtil(); use Apache::Const(); use Mymodule(); -- in Mymodule.pm use Apache::ServerUtil; my $s=Apache-server; [and the incriminated line 17: ] my $base=$s-dir_config('StatPath'); Does the following, or some variation, work? == package Apache::Test; # PerlModule Apache::Test # Location /hello-world # SetHandler modperl # PerlResponseHandler Apache::Test # PerlSetVar TEST jdjdsds # /Location use strict; # based on t/conf/modperl_extra.pl in the mod_perl-2 sources use Apache::RequestRec (); use Apache::RequestIO (); use Apache::ServerUtil (); use Apache::RequestUtil (); use APR::Table; use Apache::Const -compile = qw(:common); use APR::Const -compile = qw(:common); sub handler { my $r = shift; my $key = $r-dir_config-get('TEST'); $r-content_type('text/plain'); $r-print($key); Apache::OK; } 1; === best regards, randy kobes
Apache::ServerUtil pb in modperl2
Hi thanks for preceeding answer I had missed this doc. I have a problem with Apache::ServerUtil though : when using $s-dir_config('some') i have this message (and apache segfaults) : Attempt to free unreferenced scalar at .. line 17 i have installed modperl through ppd, so have not the t/report procedure i am under win2k ppd from theoryx5, ASperl build 631 for now the only lines in httpd.conf concerning modperl are perlsetvar statpath path perlrequire startup.pl then, in startup.pl : use Apache2; use Apache::ServerUtil(); use Apache::Const(); use Mymodule(); -- in Mymodule.pm use Apache::ServerUtil; my $s=Apache-server; [and the incriminated line 17: ] my $base=$s-dir_config('StatPath'); pascal
Re: Apache::ServerUtil pb in modperl2
pascal barbedor wrote: Hi thanks for preceeding answer I had missed this doc. I have a problem with Apache::ServerUtil though : when using $s-dir_config('some') i have this message (and apache segfaults) can you get a backtrace and send here? Also try building from scratch and see if 'make test' passes for you. That would be the best help, instead of trying to use pre-compiled binaries at this point. Attempt to free unreferenced scalar at .. line 17 i have installed modperl through ppd, so have not the t/report procedure i am under win2k ppd from theoryx5, ASperl build 631 __ Stas BekmanJAm_pH -- Just Another mod_perl Hacker http://stason.org/ mod_perl Guide --- http://perl.apache.org mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com http://modperlbook.org http://apache.org http://ticketmaster.com