This list of thread unsafe library calls pass published in the perl development list. IMO Roland, Phong and Glenn should do a tree wide sweep, including lbshell, libcmd and libast, once Glenn is back from his vacation.
Olga ---------- Forwarded message ---------- From: Leon Timmermans <[email protected]> Date: Sun, Jan 22, 2012 at 4:30 PM Subject: [perl #108762] Many perl built-ins may not be not thread-safe To: [email protected] # New Ticket Created by Leon Timmermans # Please include the string: [perl #108762] # in the subject line of all future correspondence about this issue. # <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=108762 > This is a bug report for perl from [email protected], generated with the help of perlbug 1.39 running under perl 5.14.2. ----------------------------------------------------------------- A lot of perl's built-ins and some core modules are based on POSIX APIs that are listed as not guaranteeing to be thread-safe. This means that implementations are not required to make these functions thread-safe (though most could be made thread-safe using thread local storage). I doubt there's any non-trivial program using threads that's not using any of these. In particular, this includes: * drand48() [ rand ] * dlerror() [ DynaLoader ] * endgrent() * endpwent() * getenv() [ %ENV ] * getgrent() * getgrgid() * getgrnam() * gethostbyaddr() * gethostbyname() * gethostent() * getlogin() * getnetbyaddr() * getnetbyname() * getnetent() * getprotobyname() * getprotobynumber() * getprotoent() * getpwent() * getpwnam() * getpwuid() * getservbyname() * getservbyport() * getservent() * localeconv() [ POSIX ] * nl_langinfo() [ I18N::LangInfo ] * readdir() * setgrent() * setpwent() * strerror() [ $!, $^E ] Most of these functions have thread-safe/reentrant equivalents (e.g. gethostbyname_r). Another function uses an internal reimplementation that suffers from the same inherent issues with regard to signal handling * system() (its signal handling is a bit problematic in presense of threads). Some of the unsafe functions in POSIX are provided as built-ins, but are already implemented some other thread-safe/reentrant implementations: * localtime() * gmtime() * inet_ntoa() [Socket.pm] * Two more is simply ignored outside the main thread: * setenv [ %ENV ] * unsetenv [ %ENV ] ----------------------------------------------------------------- --- Flags: category=core severity=low --- Site configuration information for perl 5.14.2: Configured by leon at Tue Jan 17 21:29:06 CET 2012. Summary of my perl5 (revision 5 version 14 subversion 2) configuration: Platform: osname=linux, osvers=3.0.0-14-generic, archname=x86_64-linux-thread-multi uname='linux leon-laptop 3.0.0-14-generic #23-ubuntu smp mon nov 21 20:28:43 utc 2011 x86_64 x86_64 x86_64 gnulinux ' config_args='-de -Dprefix=/home/leon/perl5/perlbrew/perls/perl-5.14.2 -Dusethreads' hint=recommended, useposix=true, d_sigaction=define useithreads=define, usemultiplicity=define useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef use64bitint=define, use64bitall=define, uselongdouble=undef usemymalloc=n, bincompat5005=undef Compiler: cc='cc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64', optimize='-O2', cppflags='-D_REENTRANT -D_GNU_SOURCE -fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include' ccversion='', gccversion='4.6.1', gccosandvers='' intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=12345678 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16 ivtype='long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8 alignbytes=8, prototype=define Linker and Libraries: ld='cc', ldflags =' -fstack-protector -L/usr/local/lib' libpth=/usr/local/lib /lib/x86_64-linux-gnu /lib/../lib /usr/lib/x86_64-linux-gnu /usr/lib/../lib /lib /usr/lib libs=-lnsl -ldb -ldl -lm -lcrypt -lutil -lpthread -lc perllibs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc libc=, so=so, useshrplib=false, libperl=libperl.a gnulibc_version='2.13' Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E' cccdlflags='-fPIC', lddlflags='-shared -O2 -L/usr/local/lib -fstack-protector' Locally applied patches: --- @INC for perl 5.14.2: /home/leon/perl5/perlbrew/perls/perl-5.14.2/lib/site_perl/5.14.2/x86_64-linux-thread-multi /home/leon/perl5/perlbrew/perls/perl-5.14.2/lib/site_perl/5.14.2 /home/leon/perl5/perlbrew/perls/perl-5.14.2/lib/5.14.2/x86_64-linux-thread-multi /home/leon/perl5/perlbrew/perls/perl-5.14.2/lib/5.14.2 . --- Environment for perl 5.14.2: HOME=/home/leon LANG=en_US.utf8 LANGUAGE=en_US:en_GB:en LD_LIBRARY_PATH (unset) LOGDIR (unset) PATH=/home/leon/perl5/perlbrew/bin:/home/leon/perl5/perlbrew/perls/perl-5.14.2/bin:/home/leon/bin:/usr/lib/lightdm/lightdm:/usr/local/sbin:/usr/local/bin:/usr/sbin:/usr/bin:/sbin:/bin:/usr/games PERLBREW_HOME=/home/leon/.perlbrew PERLBREW_PATH=/home/leon/perl5/perlbrew/bin:/home/leon/perl5/perlbrew/perls/perl-5.14.2/bin PERLBREW_PERL=perl-5.14.2 PERLBREW_ROOT=/home/leon/perl5/perlbrew PERLBREW_VERSION=0.25 PERL_BADLANG (unset) SHELL=/bin/bash -- , _ _ , { \/`o;====- Olga Kryzhanovska -====;o`\/ } .----'-/`-/ [email protected] \-`\-'----. `'-..-| / http://twitter.com/fleyta \ |-..-'` /\/\ Solaris/BSD//C/C++ programmer /\/\ `--` `--` _______________________________________________ ast-developers mailing list [email protected] https://mailman.research.att.com/mailman/listinfo/ast-developers
