Mr jeremy pennington wrote:
I am new to modperl and have been trying to get it
running for the past week but not having any luck. The
first time I run make test it errored out and said
unable to start the server, but I tried again later
and got past that and now I get the following errors.
I am running solaris 9, apache 2.0.52, mod_perl
1.99_17, perl 5.6.1. I greatly appreciate any help,
ideas, suggestions, trys.
[...]

thanks for the very detailed report, Jeremy.

I'm splitting this thread in two, since I believe these two failures are unrelated. Let's deal here with protocol/pseudo_http

# t/TEST -verbose protocol/pseudo_http

# Using Apache/Test.pm version 1.16
ok 1
# testing : greeting
# expected: HELO
# received: not ok 2
# Failed test 2 in t/protocol/pseudo_http.t at line 63
# send: HELO
# testing : login
# expected: Login:
# received: not ok 3
[...]
--------------------------------------------------------------------------------
t/protocol/pseudo_http.t 13 11 84.62% 2-8, 10-13
Failed 1/1 test scripts, 0.00% okay. 11/13 subtests
failed, 15.38% okay.
[warning] server localhost:8529 shutdown
[ error] error running tests (please examine
t/logs/error_log)
[ info] an old core file has been found:
/usr/local/src/mod_perl-1.99_17/t/core



Error_log from t/TEST -verbose protocol/pseudo_http
[...]
[Wed Nov 03 20:40:24 2004] [error] Argument
"APR::SO_NONBLOCK" isn't numeric in
subroutine entry at
/usr/local/src/mod_perl-1.99_17/t/protocol/TestProtocol/pseu
do_http.pm line 33.\n
[Wed Nov 03 20:40:24 2004] [error] Argument
"APR::SO_NONBLOCK" isn't numeric in
subroutine entry at
/usr/local/src/mod_perl-1.99_17/t/protocol/TestProtocol/pseu
do_http.pm line 33.\n

That's strange since exactly the same code in the other tests under t/protocol/TestProtocol doesn't fail.


Please tell us if there is any difference if you apply this patch:

Index: t/protocol/TestProtocol/pseudo_http.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/t/protocol/TestProtocol/pseudo_http.pm,v
retrieving revision 1.7
diff -u -r1.7 pseudo_http.pm
--- t/protocol/TestProtocol/pseudo_http.pm 18 Aug 2004 07:44:38 -0000 1.7
+++ t/protocol/TestProtocol/pseudo_http.pm 4 Nov 2004 04:09:07 -0000
@@ -30,7 +30,8 @@
my $socket = $c->client_socket;


     if ($socket->opt_get(APR::SO_NONBLOCK)) {
-        $socket->opt_set(APR::SO_NONBLOCK => 0);
+        my $opt = APR::SO_NONBLOCK();
+        $socket->opt_set($opt => 0);
     }

     if ((my $rc = greet($c)) != Apache::OK) {

and reverting the above one, applying the following one (two different attempts):

Index: t/protocol/TestProtocol/pseudo_http.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/t/protocol/TestProtocol/pseudo_http.pm,v
retrieving revision 1.7
diff -u -r1.7 pseudo_http.pm
--- t/protocol/TestProtocol/pseudo_http.pm 18 Aug 2004 07:44:38 -0000 1.7
+++ t/protocol/TestProtocol/pseudo_http.pm 4 Nov 2004 04:10:44 -0000
@@ -30,7 +30,7 @@
my $socket = $c->client_socket;


     if ($socket->opt_get(APR::SO_NONBLOCK)) {
-        $socket->opt_set(APR::SO_NONBLOCK => 0);
+        $socket->opt_set(APR::SO_NONBLOCK, 0);
     }

     if ((my $rc = greet($c)) != Apache::OK) {

--
__________________________________________________________________
Stas Bekman            JAm_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

--
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



Reply via email to