call_sv() changes PL_tainted to FALSE

[p5pRT]

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

Searchable as RT106374$

[p5pRT]

From @khwilliamson

This is a bug report for perl from public@​khwilliamson.com,
generated with the help of perlbug 1.39 running under perl 5.15.5.

---

PL_tainted is inappropriately set to false in a call_sv() call. There may
be other functions that should be investigated for this behavior.

---

---

Flags​:
  category=core
  severity=medium

---

Site configuration information for perl 5.15.5​:

Configured by khw at Thu Dec 15 16​:08​:21 MST 2011.

Summary of my perl5 (revision 5 version 15 subversion 5) configuration​:
  Commit id​: ce39d11ae211c29d6bf7bd90f2dad5dff23e251d
  Platform​:
  osname=linux, osvers=2.6.35-31-generic-pae,
archname=i686-linux-thread-multi-64int-ld
  uname='linux karl 2.6.35-31-generic-pae #63-ubuntu smp mon nov 28
20​:48​:50 utc 2011 i686 gnulinux '
  config_args='-des -Dprefix=/home/khw/devel -Dusedevel
-D'optimize=-ggdb3' -A'optimize=-ggdb3' -A'optimize=-O0' -Dman1dir=none
-Dman3dir=none -DDEBUGGING -Dusemorebits -Dusethreads'
  hint=recommended, useposix=true, d_sigaction=define
  useithreads=define, usemultiplicity=define
  useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef
  use64bitint=define, use64bitall=undef, uselongdouble=define
  usemymalloc=n, bincompat5005=undef
  Compiler​:
  cc='cc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -DDEBUGGING
-fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include
-D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
  optimize='-O0 -ggdb3',
  cppflags='-D_REENTRANT -D_GNU_SOURCE -DDEBUGGING
-fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include'
  ccversion='', gccversion='4.4.5', gccosandvers=''
  intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=12345678
  d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
  ivtype='long long', ivsize=8, nvtype='long double', nvsize=12,
Off_t='off_t', lseeksize=8
  alignbytes=4, prototype=define
  Linker and Libraries​:
  ld='cc', ldflags =' -fstack-protector -L/usr/local/lib'
  libpth=/usr/local/lib /lib/../lib /usr/lib/../lib /lib /usr/lib
/usr/lib/i686-linux-gnu
  libs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
  perllibs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
  libc=/lib/libc-2.12.1.so, so=so, useshrplib=false, libperl=libperl.a
  gnulibc_version='2.12.1'
  Dynamic Linking​:
  dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
  cccdlflags='-fPIC', lddlflags='-shared -ggdb3 -ggdb3 -O0
-L/usr/local/lib -fstack-protector'

Locally applied patches​:

---

@​INC for perl 5.15.5​:
  /home/khw/perl/utf8/lib

/home/khw/devel/lib/perl5/site_perl/5.15.5/i686-linux-thread-multi-64int-ld
  /home/khw/devel/lib/perl5/site_perl/5.15.5
  /home/khw/devel/lib/perl5/5.15.5/i686-linux-thread-multi-64int-ld
  /home/khw/devel/lib/perl5/5.15.5
  /home/khw/devel/lib/perl5/site_perl
  .

---

Environment for perl 5.15.5​:
  HOME=/home/khw
  LANG=en_US.UTF-8
  LANGUAGE=en_US​:en
  LD_LIBRARY_PATH (unset)
  LOGDIR (unset)

PATH=/home/khw/bin​:/home/khw/print/bin​:/bin​:/usr/local/sbin​:/usr/local/bin​:/usr/sbin​:/usr/bin​:/sbin​:/usr/games​:/home/khw/cxoffice/bin
  PERL5OPT=-w
  PERL_BADLANG (unset)
  SHELL=/bin/ksh

[p5pRT]

From @cpansprout

On Thu Dec 15 17​:51​:35 2011, public@​khwilliamson.com wrote​:

This is a bug report for perl from public@​khwilliamson.com,
generated with the help of perlbug 1.39 running under perl 5.15.5.

-----------------------------------------------------------------
PL_tainted is inappropriately set to false in a call_sv() call. There
may
be other functions that should be investigated for this behavior.

Should it be localised?

--

Father Chrysostomos

[p5pRT]

The RT System itself - Status changed from 'new' to 'open'