make test blocked with Mingw & PERLIO=stdio :crlf

[p5pRT]

Migrated from rt.perl.org#24495 (status was 'open')

Searchable as RT24495$

[p5pRT]

From [email protected]

Created by Administrator@freeman

This is a bug report for perl from Administrator@​freeman,
generated with the help of perlbug 1.34 running under perl v5.9.0.

-----------------------------------------------------------------

make test get blocked with PERLIO=stdio :crlf on t/io/openpid.t
As this done by Test​::Smoke, no reports can be done for this config.
This is for blead, 5.8.2 but not 5.6.2 of course.

C​:\Perl\perl-current\perl-current>set PERLIO=stdio

C​:\Perl\perl-current\perl-current>perl -Ilib t/io/openpid.t
1..10
ok 1 - first process started
ok 2 - second
ok 3 - third
ok 4 - fourth
# pids were 1676, 512, 1692, 1708
ok 5 - message from first process
ok 6 - first process killed
ok 7 - message from second process
ok 8 - killing procs 2 & 3
# waiting for process 1708 to exit
ok 9 - text sent to fourth process
ok 10 - fourth process reaped

C​:\Perl\perl-current\perl-current>set PERLIO=stdio :crlf

C​:\Perl\perl-current\perl-current>perl -Ilib t/io/openpid.t
1..10
ok 1 - first process started
ok 2 - second
ok 3 - third
ok 4 - fourth
# pids were 1712, 1728, 504, 1768
ok 5 - message from first process
not ok 6 - first process killed
# Failed at t/io/openpid.t line 60
# got '0'
# expected '1'
# errno == Invalid argument
ok 7 - message from second process
not ok 8 - killing procs 2 & 3
# Failed at t/io/openpid.t line 68
# got '1'
# expected '2'
# errno == Invalid argument
# waiting for process 1768 to exit
Terminating on signal SIGINT(2) <== I've send a CTRL+c
ok 9 - text sent to fourth process

C​:\Perl\perl-current\perl-current>

Perl Info

Flags:
     category=core
     severity=low

Site configuration information for perl v5.9.0:

Configured by Administrator at Thu Nov 13 15:10:53 2003.

Summary of my perl5 (revision 5 version 9 subversion 0) configuration:
   Platform:
     osname=MSWin32, osvers=5.2, archname=MSWin32-x86
     uname=''
     config_args='undef'
     hint=recommended, useposix=true, d_sigaction=undef
     usethreads=undef useithreads=undef usemultiplicity=undef
     useperlio=define d_sfio=undef uselargefiles=undef usesocks=undef
     use64bitint=undef use64bitall=undef uselongdouble=undef
     usemymalloc=n, bincompat5005=undef
   Compiler:
     cc='gcc', ccflags ='-g -O2 -DWIN32 -DHAVE_DES_FCRYPT -fno-strict-aliasing -DPERL_MSVCRT_READFIX',
     optimize='-g -O2',
     cppflags='-DWIN32'
     ccversion='', gccversion='3.2.3 (mingw special 20030504-1)', gccosandvers=''
     intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
     d_longlong=undef, longlongsize=8, d_longdbl=define, longdblsize=12
     ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=4
     alignbytes=8, prototype=define
   Linker and Libraries:
     ld='g++', ldflags ='-g -L"c:\perl\lib\CORE" -L"C:\MinGW\lib"'
     libpth=C:\MinGW\lib
     libs= -lmsvcrt -lmoldname -lkernel32 -luser32 -lgdi32 -lwinspool -lcomdlg32
-ladvapi32 -lshell32 -lole32 -loleaut32 -lnetapi32 -luuid -lwsock32 -lmpr -lwinmm -lversion -lodbc32
     perllibs= -lmsvcrt -lmoldname -lkernel32 -luser32 -lgdi32 -lwinspool -lcomdlg32 -ladvapi32 -lshell32 -lole32 -loleaut32 -lnetapi32 -luuid -lwsock32 -lmpr -lwinmm 
-lversion -lodbc32
     libc=-lmsvcrt, so=dll, useshrplib=yes, libperl=libperl59.a
     gnulibc_version='undef'
   Dynamic Linking:
     dlsrc=dl_win32.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' '
     cccdlflags=' ', lddlflags='-mdll -g -L"c:\perl\lib\CORE" -L"C:\MinGW\lib"'

Locally applied patches:
     DEVEL21538


@INC for perl v5.9.0:
     C:/Perl/perl-current/perl-current/lib
     .


Environment for perl v5.9.0:
     HOME (unset)
     LANG (unset)
     LANGUAGE (unset)
     LD_LIBRARY_PATH (unset)
     LOGDIR (unset)
     PATH=C:\Perl\bin\;c:\mingw\bin;C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem
     PERL_BADLANG (unset)
     SHELL (unset)

[p5pRT]

From @chorny

Same result on blead

[p5pRT]

@chorny - Status changed from 'new' to 'open'

[p5pRT]

From @jkeenan

Is this a Windows-specific problem? (I can't seem to reproduce it on
Darwin.)

[toddr]

AFAIK our test suite passes as of 5.30.0 on various windows systems so I don't think there's anything to do here.

[Leont]

This is a known issue, and easily reproduced on other platforms:

$ PERLIO=stdio:crlf ./perl -Ilib t/io/openpid.t
1..10
ok 1 - first process started
ok 2 -     second
ok 3 -     third
ok 4 -     fourth
# pids were 2245, 2246, 2247, 2248
# Test process timed out - terminating
Killed

Any buffering layer on top of :stdio will break pipes and ttys. I have some work on fixing this but it's actually quite complicated to fix this

[jkeenan]

This is a known issue, and easily reproduced on other platforms:

$ PERLIO=stdio:crlf ./perl -Ilib t/io/openpid.t
1..10
ok 1 - first process started
ok 2 -     second
ok 3 -     third
ok 4 -     fourth
# pids were 2245, 2246, 2247, 2248
# Test process timed out - terminating
Killed

Confirmed on Linux and FreeBSD.

Any buffering layer on top of :stdio will break pipes and ttys. I have some work on fixing this but it's actually quite complicated to fix this