Craig A. Berry wrote:
At 11:39 PM -0500 8/12/07, John E. Malmberg wrote:

The last 2 tests in utftaint.t are failing on VMS.

Insecure $ENV{PATH} while running with -T switch at ./test.pl line 547.

I am a bit stumped on how to fix this.


I don't see this failure with a default configuration.  Do you have
any protected subsystem identifiers on that system?  That could is
considered the equivalent of running with setuid and could trigger
tainting.

The utftaint.t test is run with the "-T" flag in the command line, and that is what is triggering the tainting.

I am not aware of any problems with $ENV{PATH} on specifically not tainted tests.

Is utftaint.t succeeding with all 88 tests for you?

EAGLE> mcr [-]ndbgperl "-V"
Summary of my perl5 (revision 5 version 9 subversion 5 patch 31670) configuration:
  Platform:
    osname=VMS, osvers=V8.3, archname=VMS_AXP
    uname='VMS eagle V8.3 AlphaServer DS10 617 MHz'
config_args='-"Dusevmsdebug" -Dunlink_all_versions -Duselargefiles -Dcf_email=SYSTEM -de'
    hint=none, useposix=false, d_sigaction=define
    useithreads=undef, usemultiplicity=undef
    useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef
    use64bitint=undef, use64bitall=undef, uselongdouble=undef
    usemymalloc=undef, bincompat5005=undef
  Compiler:
cc='CC/DECC', ccflags='/Include=[]/Standard=Relaxed_ANSI/Prefix=All/Obj=.obj /NOANSI_ALIAS/float=ieee/ieee=denorm/Define=_USE_STD_STAT=1',
    optimize='/List/Debug/NoOpt',
    cppflags='undef'
    ccversion='70190015', gccversion='', gccosandvers='undef'
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16
ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
    alignbytes=8, prototype=define
  Linker and Libraries:
    ld='Link/nodebug', ldflags ='/Debug/Trace/Map'
    libpth=/sys$share /sys$library
    libs=
    perllibs=
    libc=(DECCRTL), so=exe, useshrplib=true, libperl=undef
    gnulibc_version='undef'
  Dynamic Linking:
    dlsrc=dl_vms.c, dlext=exe, d_dlsymun=undef, ccdlflags=''
    cccdlflags='', lddlflags='/Share'


Characteristics of this PERLSHR image:
  Compile-time options: DEBUGGING PERL_DONT_CREATE_GVSV PERL_MALLOC_WRAP
                        USE_LARGE_FILES USE_PERLIO
  Locally applied patches:
        DEVEL
  Built under VMS
  Compiled at Aug 12 2007 01:11:08
  %ENV:
    PERLDB_PIDS="XXXX"
    PERLSHR="PERL_ROOT:[000000]PERLSHR.EXE"
    PERL_BUILD_ROOT="DISK$BIGDISK:[PROJECT_ROOT.PERL-BLEAD.]"
    PERL_ROOT="PERL_BUILD_ROOT"
  @INC:
    perl_root:[lib.VMS_AXP.5_9_5]
    perl_root:[lib]
    perl_root:[lib.site_perl.VMS_AXP]
    perl_root:[lib.site_perl]

-John

Reply via email to