Rodent of Unusual Size wrote:

* On 2002-01-03 at 08:07,
  Stas Bekman <[EMAIL PROTECTED]> excited the electrons to say:

Whenever you have a hanging problem in Perl, the solution is very simple. Put into your code this:

        :

and then kill the process with:

% kill -USR2 PID

And the printed trace will tell you exactly where the code hangs.


Okey, I'll try it -- but I'm not sure which of this frickin' modules to put it in.. so I'll put it in t/TEST.


That's fine. this is a global sighandler.


Here's what it shows (the bogus ETag value is part of what I'm
trying to test):

server localhost:8530 listening (mod_headers)
server localhost:8531 listening (mod_proxy)
server localhost:8532 listening (mod_vhost_alias)
GET http://localhost:8529/index.html:
User-Agent: libwww-perl/5.62

HTTP/1.1 200 OK
Connection: close
Date: Thu, 03 Jan 2002 13:31:37 GMT
Accept-Ranges: bytes
ETag: ""
Server: Apache/1.3.23-dev (Unix)
Content-Length: 26
Content-Type: text/html
Last-Modified: Mon, 30 Jul 2001 19:37:14 GMT
Client-Date: Thu, 03 Jan 2002 13:31:38 GMT
Client-Peer: 127.0.0.1:8529

caught SIGUSR2! at /tmp/httpd-test/perl-framework/t/TEST line 19
        main::__ANON__('USR2') called at 
/tmp/httpd-test/perl-framework/t/../Apache-Test/lib/Apache/TestRun.pm line 570
        Apache::TestRun::run('Apache::TestRun=HASH(0x85e5ff8)', '-d=lwp', 2, 
'apache/limits') called at /tmp/httpd-test/perl-framework/t/TEST line 22


Not very revealing to me..


it says that the code hangs on line 570 in Apache-Test/lib/Apache/TestRun.pm. But sometimes compiler get confused by a few lines, so I'm not sure where exactly the problem is. Can you please check if it hangs after $self->start()? e.g. add die() after it:

    $self->start;

    $self->run_tests;

or put the compiler line counter hint before $self->start():

#line 568
    $self->start;

    $self->run_tests;

probably need to add an alarm or see if we need to supply a timeout for UserAgent calls.

Also can you please try again with the patch I've sent in a few hours ago?


BTW, it hung all night last night -- like for over 7 hours.  I started
it before I went to bed.


well, once it hangs it hangs :)





--


_____________________________________________________________________ Stas Bekman JAm_pH -- Just Another mod_perl Hacker http://stason.org/ mod_perl Guide http://perl.apache.org/guide mailto:[EMAIL PROTECTED] http://ticketmaster.com http://apacheweek.com http://singlesheaven.com http://perl.apache.org http://perlmonth.com/



Reply via email to