Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Jump to bottom

re: Perl bug - SIGINT does not break through sleep #7001

Open
p5pRT opened this issue Dec 22, 2003 · 2 comments
Open

re: Perl bug - SIGINT does not break through sleep #7001

p5pRT opened this issue Dec 22, 2003 · 2 comments
Labels
distro-mswin32 type-core type-OS-interaction type-portability

Comments

@p5pRT
Copy link

p5pRT commented Dec 22, 2003

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

Searchable as RT24738$
@p5pRT
Copy link
Author

p5pRT commented Dec 22, 2003 •
edited by toddr

From terry.grieb@intel.com

Created by Terry.Grieb@intel.com

The following small example shows that hitting a Control/C does not break through
a sleep so if you have a long sleep the program can not be aborted when you
have a SIGINT handler.

$SIG{INT} = sub
{
die;
};

print "Note you can't interrupt the sleep\n";
print "Please hit CTRL/C within 10 secs\n";
sleep 10;
print "Too late. Sleep ended.\n";
exit( 0 );
Perl Info 

Flags:
    category=core
    severity=high

Site configuration information for perl v5.8.2:

Configured by ActiveState at Tue Dec  9 10:19:27 2003.

Summary of my perl5 (revision 5 version 8 subversion 2) configuration:
  Platform:
    osname=MSWin32, osvers=4.0, archname=MSWin32-x86-multi-thread
    uname=''
    config_args='undef'
    hint=recommended, useposix=true, d_sigaction=undef
    usethreads=undef use5005threads=undef useithreads=define usemultiplicity=define
    useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
    use64bitint=undef use64bitall=undef uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='cl', ccflags ='-nologo -Gf -W3 -MD -Zi -DNDEBUG -O1 -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FCRYPT  -DNO_HASH_SEED -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO -DPERL_MSVCRT_READFIX',
    optimize='-MD -Zi -DNDEBUG -O1',
    cppflags='-DWIN32'
    ccversion='', gccversion='', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=undef, longlongsize=8, d_longdbl=define, longdblsize=10
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='__int64', lseeksize=8
    alignbytes=8, prototype=define
  Linker and Libraries:
    ld='link', ldflags ='-nologo -nodefaultlib -debug -opt:ref,icf  -libpath:"C:\Perl\lib\CORE"  -machine:x86'
    libpth=C:\PROGRA~1\MICROS~3\VC98\lib
    libs=  oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib  comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib  netapi32.lib uuid.lib wsock32.lib mpr.lib winmm.lib  version.lib odbc32.lib odbccp32.lib msvcrt.lib
    perllibs=  oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib  comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib  netapi32.lib uuid.lib wsock32.lib mpr.lib winmm.lib  version.lib odbc32.lib odbccp32.lib msvcrt.lib
    libc=msvcrt.lib, so=dll, useshrplib=yes, libperl=perl58.lib
    gnulibc_version='undef'
  Dynamic Linking:
    dlsrc=dl_win32.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' '
    cccdlflags=' ', lddlflags='-dll -nologo -nodefaultlib -debug -opt:ref,icf  -libpath:"C:\Perl\lib\CORE"  -machine:x86'

Locally applied patches:
    ACTIVEPERL_LOCAL_PATCHES_ENTRY
    21846 Configure gets d_u32align wrong
    21739 [perl #24493] install.html not working
    21737 Ooops. left an XXX comment in, and worse still it's a // comment
    21735 utf8 keys now work for tied hashes
    21734 Accessing unicode keys in tie hashes via hv_exists was broken
    21733 ext/threads/t/problem.t
    21732 Config::myconfig() fails under ithreads
    21728 Update perlhist with 5.6.2
    21723 Include 'SCCS' in the list of dir names ignored by installperl
    21718 Empty subroutine as object method segfaults in 5.8.2 (sometimes)
    21714 Fix bug #24380: assigning list with duplicated keys to a hash
    21706 [perl #24460] [DOC PATCH] the begincheck program
    21693 must copy changes from win32/makeifle.mk to wince/makefile.ce
    21691 Update the list of pumpkings in perlhist.pod
    21687 [PATCH 5.6.2-RC1 pod/perlhist.pod]  Updated
    21677 OS/2 docu
    21676 Bug #24407: key for shared hash got stringified into wrong pool
    21673 Be sure to use -fPIC not -fpic on Linux/SPARC
    21672 extending the hash attack test
    21671 Benchmark.pm cmpthese segfault
    21662 'make minitest' fails for op/cproto and op/pat
    21586 Comment that this 'optimisation' is actually a necessary fixup
    21548 Sync with Pod::Perldoc 3.12
    21540 Fix backward-compatibility issues in if.pm


@INC for perl v5.8.2:
    C:/Perl/lib
    C:/Perl/site/lib
    .


Environment for perl v5.8.2:
    HOME=C:\grieb
    LANG (unset)
    LANGUAGE (unset)
    LD_LIBRARY_PATH (unset)
    LOGDIR (unset)
    PATH=C:\perl\bin;C:\bin;C:\bin\X11;C:\mksnt;C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem;c:\ntlocal;c:\local;C:\office2k\Office;C:\w2kResKit;C:\Program Files\Microsoft Visual Studio\Common\Tools\WinNT;C:\Program Files\Microsoft Visual Studio\Common\MSDev98\Bin;C:\Program Files\Microsoft Visual Studio\Common\Tools;C:\Program Files\Microsoft Visual Studio\VC98\bin;c:\grieb\bin;c:\emacs\bin;c:\cmplr\bin;c:\netbatch\bin;c:\w2kreskit
    PERL_BADLANG (unset)
    SHELL=C:/mksnt/sh.exe

@p5pRT
Copy link
Author

p5pRT commented Dec 24, 2003

From @lizmat

At 20​:50 +0000 12/22/03, "Grieb, Terry" (via RT) wrote​:

The following small example shows that hitting a Control/C does not
break through
a sleep so if you have a long sleep the program can not be aborted when you
have a SIGINT handler.

$SIG\{INT\} = sub
    \{
    die;
    \};

print "Note you can't interrupt the sleep\\n";
print "Please hit CTRL/C within 10 secs\\n";
sleep 10;
print "Too late\. Sleep ended\.\\n";
exit\( 0 \);

Must be a Windows issue. Works fine on Linux and MacOSX from 5.6.0
through 5.9.0.

Liz

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Assignees
No one assigned
Labels
distro-mswin32 type-core type-OS-interaction type-portability
Projects
None yet
Milestone
No milestone
Development

No branches or pull requests
2 participants
@xenu @p5pRT