perl-dev mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Stas Bekman <>
Subject Re: t/SMOKE on win32
Date Fri, 03 Oct 2003 16:34:49 GMT
Steve Hay wrote:
> Randy Kobes wrote:
>> Also, I just tried a long run (with the above change to
>> modperl_io.c), and now I do get a (seemingly) random
>> failure, but the error message is
>>   Failed to dup STDOUT: Permission denied
>> and not STDIN. Not sure if this is progress ...
> I've rebuilt with Randy's revised IPC::Run3 patch for 
> (using undef instead of \undef), plus his patch to, plus 
> Stas' and my tweaks to modperl_io.c (changing ">&STDIN", 8 to "<&STDIN",

> 7).  I think that's the current state of affairs.  (And I didn't apply 
> Randy's change to modperl_io.c that changed "<:Apache", 8 to "<:Apache", 
> 7 ;-)
> It looks like the revision to the IPC::Run3 patch may have improved 
> things slightly (?) because I now get the same error reported above by 
> Randy every time:
>    Failed to dup STDOUT: Permission denied.
> and no longer see any errors about STDIN.
> Again the error occurs on a random test and crashes the Apache server.
> Hunting around for possible causes I thought that these two lines in 
> modperl_io.c's modperl_io_perlio_override_stdout():
>    status = Perl_do_open(aTHX_ handle_save, ">&STDOUT", 8, FALSE, O_RDONLY,
>    status = Perl_do_open9(aTHX_ handle, ">:Apache", 8, FALSE, O_RDONLY,
> should perhaps be:
>    status = Perl_do_open(aTHX_ handle_save, ">&STDOUT", 8, FALSE, O_WRONLY,
>    status = Perl_do_open9(aTHX_ handle, ">:Apache", 8, FALSE, O_WRONLY,

That sounds again as yet another copy-n-paste error. You are definitely 
correct. Though it seems that any of these problems totally unaffecting 
because we are in the dup mode. I'll commit your fix shortly.

In any case, can we single out that IPC::Run3 causes this problem? Randy were 
you able to reproduce this problem with your original patch that uses 

If that's the case with IPC::Run3, we should try again with standalone perl 
test script which dups STDOUT/STDIN and uses run3 to to spawn some external 
program that reads from STDIN and writes to STDOUT. If find such a test that 
reproduces the problem, besides having Barrie fixing it, he will have a good 
test to include in the IPC::Run3 tests suite ;)

Stas Bekman            JAm_pH ------> Just Another mod_perl Hacker     mod_perl Guide --->

To unsubscribe, e-mail:
For additional commands, e-mail:

View raw message