I have tried looking through the mail archives and didn't fir anything that
quite matches my problems. I may have one problem and many symptoms or many
problems. Please please help...
First, before anyone points this out, I am the maintainer of both mod_perl
and Apache::ASP in the OpenBSD ports tree - this does not mean I know what I
am doing :-)
Set-up is OpenBSD/i386 (both 3.2 and -current - Apache/1.3.27), mod_perl
1.27 and Apache::ASP 2.49 with this one patch:
--- ASP.pm.orig Fri Nov 22 13:12:02 2002
+++ ASP.pm Fri Nov 22 13:12:11 2002
@@ -537,7 +537,7 @@ sub FileId {
my @inode_stat = ();
if($self->{inode_names}) {
@inode_stat = stat($file);
- unless($inode_stat[0] && $inode_stat[1]) {
+ unless($inode_stat[0] || $inode_stat[1]) {
@inode_stat = ();
}
}
What I am hoping for is any instances of people saying that this stuff
sounds familir or that it is fixed in next release :)
The symptoms, indicating maybe one or maybe more problems;
1. I get many many instances of:
Use of uninitialized value in split at
/usr/local/libdata/perl5/site_perl/Apache
/ASP/Response.pm line 938 during global destruction.
This is:
my $new_query = join('&',
(map {
>>> /^$Apache::ASP::SessionCookieName\=/ ?
'' : $_
}
split(/&/, $query)
),
$Apache::ASP::SessionCookieName.'='.$asp->{session_id}
);
It appears that $query is actually the variable undefined - probably because
the regexp "$rel_url =~ /^([^\?]+)(\?([^\#]*))?(\#.*)?$/)" is failing for
'(\#.*)?' and not setting $3 a few lines above. Not sure entirely if this is
a real URI or a special internal one...
if there isn't a problem with the regexp, then there is with the following
lines:
$new_url = $1;
$query = $3;
$frag = $4; <<< ... there is no 4th () in the regexp...
Maybe these should be $1, $2, $3 ??? Yep, that looks right re-reading this
e-mail... going to hand patch it and see how it goes.
Hang on. No, wait. There is a nested paren up there... WTF does that mean in
per WRT $1 etc. ??? I will go off and read 'man perlre' I think.
2. Quite a few:
Use of uninitialized value in string eq at
/usr/local/libdata/perl5/site_perl/Ap
ache/ASP/Session.pm line 236 during global destruction.
This is:
sub NEXTKEY {
my($self, $key) = @_;
>>> my $value = $self->{state}->NEXTKEY($key);
if($value eq '_UA') {
$self->{state}->NEXTKEY($value);
} else {
$value;
}
}
Without reading all the Tie'd code, I am guessing the next line should
actually read "if(defined $value && $value eq '_UA') {" ???
Will also, in ignorance of side effects, try this locally.
3. SEGV:
I am getting a number of:
[Tue Dec 10 08:50:09 2002] [notice] child pid 161 exit signal Segmentation
fault
(11)
Haven't looked at the core files yet. Will do soon. Not much else to go on.
4. 'Missing' environment
Maybe related to the SEGV above, but I am seeing occasional failures in .asp
files to see any environment or ASP objects. I have code that does this:
<% if (!defined $r->path_info) { %>
No category chosen.
...
<% } else { %>
But the URL most DEFINITELY had PATH_INFO... the access_log entries say
so...
could be 1. and/or 2. above.
rgds,
--
Peter
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
