search

Perl / perl5

🐪 The Perl programming language
https://dev.perl.org/perl5/
Other
1.93k stars 552 forks source link

NULL passed to pstat syscall instead of a valid pointer #9716

Closed p5pRT closed 13 years ago

p5pRT commented 15 years ago

Migrated from rt.perl.org#64936 (status was 'resolved')

Searchable as RT64936$

p5pRT commented 15 years ago

From Petr.Novotny@amdocs.com

Created by petr.novotny@amdocs.com

The problem is that Perl doesn't pass a valid pointer to the underlying syscall and it passes NULL instead.

This is the Perl snippet (note that the code itself is HP-UX specific)​: syscall(239\,0x80000004\,$title\,length($title)\,0\,0);

This is tusc -v output on a machine where is works​: pstat(PSTAT_SETCMD\, 0x4003b908\, 16\, 0\, 0) ............................................................................................................................ = 0   command​: "trying something"

This is tusc -v output on a machine where it does not work​: pstat(PSTAT_SETCMD\, NULL\, 16\, 0\, 0) .................................................................................................................................. ERR#14 EFAULT

It works consistently on PA-RISC. It fails consistently on Itanium. In both cases\, Perl is 5.8.5 32-bit build\, from official(?) HP-UX depot.

It is most likely that this is a Perl bug caused by some #ifdef in the code. It is possible that the bug lies with the operating system\, its includes and libraries\, or with the compiler. In that case\, please suggest how to verify that.

Perl Info ``` Flags: category=core severity=medium Site configuration information for perl v5.8.5: Configured by root at Thu Jul 21 12:50:42 IDT 2005. Summary of my perl5 (revision 5 version 8 subversion 5) configuration: Platform: osname=hpux, osvers=11.23, archname=IA64.ARCHREV_0 uname='hp-ux hpx7601 b.11.23 u ia64 3200213597 unlimited-user license ' config_args='-Dprefix=/usr/local/perl585 -Uinstallusrbinperl' hint=recommended, useposix=true, d_sigaction=define usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=undef useperlio=define d_sfio=undef uselargefiles=define usesocks=undef use64bitint=undef use64bitall=undef uselongdouble=undef usemymalloc=n, bincompat5005=undef Compiler: cc='cc', ccflags =' -Ae -D_HPUX_SOURCE -Wl,+vnocompatwarnings -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 ', optimize='+O2 +Onolimit', cppflags='-Aa -D__STDC_EXT__ -D_HPUX_SOURCE -Ae -D_HPUX_SOURCE -Wl,+vnocompatwarnings -I/usr/local/include' ccversion='B3910B A.05.50', gccversion='', gccosandvers='' intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=4321 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='/usr/bin/ld', ldflags =' -L/usr/local/lib -L/usr/lib/hpux32' libpth=/usr/local/lib /usr/lib/hpux32 /lib /usr/lib /usr/ccs/lib libs=-lpthread -lcl -lnsl -lnm -lndbm -ldl -ldld -lm -lsec -lc perllibs=-lpthread -lcl -lnsl -lnm -ldl -ldld -lm -lsec -lc libc=/usr/lib/hpux32/libc.so, so=so, useshrplib=false, libperl=libperl.a gnulibc_version='' Dynamic Linking: dlsrc=dl_hpux.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E -Wl,-B,deferred ' cccdlflags='+Z', lddlflags='-b +vnocompatwarnings -L/usr/local/lib -L/usr/lib/hpux32' Locally applied patches: @INC for perl v5.8.5: /usr/local/perl585/lib/5.8.5/IA64.ARCHREV_0 /usr/local/perl585/lib/5.8.5 /usr/local/perl585/lib/site_perl/5.8.5/IA64.ARCHREV_0 /usr/local/perl585/lib/site_perl/5.8.5 /usr/local/perl585/lib/site_perl . Environment for perl v5.8.5: HOME=/devduser3/ip/users/petrn LANG (unset) LANGUAGE (unset) LD_LIBRARY_PATH=:/pubhome/ip/ccip/iccip/proj/gcpfl700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/gcpflgn700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/acapi700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/acmtapi700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/acapi700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/acmtapi700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/gac700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/gac700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/gdapi700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/gdapi700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/ggd700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/ggd700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/miapi700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/miapi700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/pmapi700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/pmapi700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/amcapi700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/amcapi700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj /gmi700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/gmf700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/gmf700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/gcpfl700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/gcpflgn700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/gcpf700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/utlapi700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/gutl700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/utlapi700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/gutl700_S4P9V64OG/lib:/local64/ACE_wrappers-5.4e_64b/ace:/opt/syncsort64.3.11/lib:/ttvl01/TimesTen/tt703_64/lib:/usr/local64/xerces-c2_6_0_icu_64b//lib:/usr/local64/gmp-4.1.4/lib:/usr/local64/openssl-0.9.7f/lib:/usr/local64/xalan-c1_9_0_icu_64b//lib:/pubhome/ip/ccip/iccip/bb/cppunit/v70_0/HP-IA64/lib:/pubhome/ip/ccip/iccip/bb/mockpp/v70_0/HP-IA64/v1.10/lib:/devduser3/ip/users/petrn/proj/gmf700_S4P9V64OG/ut:/pubhome/ip/ccip/iccip/proj/gmf700_S4P9V64OG/ut:/pubhome/ip/ccip/iccip/proj/mfgdd700_S4P9V64OG/lib:/pubhome/ip/cci p/iccip/proj/gngdd700_S4P9V64OG/lib:/oravl01/oracle/10.2.0.3! /lib:/us r/lib/pa20_64:/usr/lib LOGDIR (unset) PATH=/iphome/ip/ccip/mb_ccip/v700/Build/bin:/iphome/ip/ccip/mb_ccip/v700/Build/bin:/opt/CA/harvest7/config/rd2/bin:/opt/CA/harvest7/bin:/usr/local/bin:/opt/ansic/bin:/usr/bin:/usr/contrib/bin:/usr/contrib/bin/X11:/usr/vue/bin:/usr/bin/X11:/bin:/usr/sbin:/opt/langtools/bin:/usr/ccs/bin:/opt/perf/bin:/etc:/devduser3/ip/users/petrn/bin:.:/pubhome/ip/ccip/iccip/proj/chapi700_S4P9V64OG/bin:/opt/imake/bin:/opt/aCC/bin:/pubhome/ip/ccip/iccip/bb/ant/v70_0/ant-1_6_4/bin:/opt/java1.4.2_11/bin:/pubhome/ip/ccip/iccip/proj/gjf700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/proj/ginfj700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/proj/gscripts700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/proj/ginfdb700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/proj/gcpf700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/proj/gcpfl700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/proj/gopacm700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/bb/apm/v70_0/HP-IA64//bin:.:/oravl01/oracle/10.2.0.3/bin:/devduser3/ip/users/petrn/proj/gmf700_S4P9V64OG/bin:/pubhom e/ip/ccip/iccip/proj/gmf700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/proj/mfgdd700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/proj/gngdd700_S4P9V64OG/bin:/iphome/ip/ccip/mb_ccip/v700/Build/bin:/opt/CA/harvest7/config/rd2/bin:/opt/CA/harvest7/bin:/usr/local/bin:/opt/ansic/bin:/usr/bin:/usr/contrib/bin:/usr/contrib/bin/X11:/usr/vue/bin:/usr/bin/X11:/bin:/usr/sbin:/opt/langtools/bin:/opt/perf/bin:/etc:/devduser3/ip/users/petrn/bin:/proj/chapi700_S4P9V64OG/bin:/bb/ant/v70_0/ant-1_6_4/bin:/proj/gjf700_S4P9V64OG/bin:/proj/ginfj700_S4P9V64OG/bin:/proj/gscripts700_S4P9V64OG/bin:/proj/ginfdb700_S4P9V64OG/bin:/proj/gcpf700_S4P9V64OG/bin:/proj/gcpfl700_S4P9V64OG/bin:/proj/gopacm700_S4P9V64OG/bin:/bb/apm/v70_0/HP-IA64//bin:/proj/chapi700_T2V64OG/bin:/proj/gjf700_T2V64OG/bin:/proj/ginfj700_T2V64OG/bin:/proj/gscripts700_T2V64OG/bin:/proj/ginfdb700_T2V64OG/bin:/proj/gcpf700_T2V64OG/bin:/proj/gcpfl700_T2V64OG/bin:/proj/gopacm700_T2V64OG/bin:/usr/contrib/Q4/bin:/opt/perl/bin:/opt/ipf/bin:/opt/hparray/ bin:/opt/nettladm/bin:/opt/fcms/bin:/opt/sec_mgmt/bastille/b! in:/opt/ dsau/bin:/opt/dsau/sbin:/opt/resmon/bin:/opt/gnome/bin:/usr/contrib/kwdb/bin:/opt/wbem/bin:/opt/wbem/sbin:/opt/mozilla:/opt/graphics/common/bin:/opt/prm/bin:/opt/sec_mgmt/spc/bin:/opt/ssh/bin:/opt/hpsmh/bin:/opt/upgrade/bin:/opt/gwlm/bin:/opt/hpnpl//bin:/opt/OV/bin/OpC:/opt/OV/bin:/opt/ignite/bin:/opt/sas/bin:/opt/sfm/bin:/opt/cadvise/bin:/opt/caliper/bin:/opt/sentinel/bin:/usr/ccs/bin PERL_BADLANG (unset) SHELL=/bin/tcsh -- Petr Novotný Prague Development Center, AMDOCS +420266773112, +420608711517 "No mercy for him who is without knowledge." - Ami ben Nathan, Berakhot 33a This message and the information contained herein is proprietary and confidential and subject to the Amdocs policy statement, you may review at http://www.amdocs.com/email_disclaimer.asp ```
p5pRT commented 15 years ago

From Petr.Novotny@amdocs.com

Created by petr.novotny@amdocs.com

The problem is that Perl doesn't pass a valid pointer to the underlying syscall and it passes NULL instead.

This is the Perl snippet (note that the code itself is HP-UX specific)​: syscall(239\,0x80000004\,$title\,length($title)\,0\,0);

This is tusc -v output on a machine where is works​: pstat(PSTAT_SETCMD\, 0x4003b908\, 16\, 0\, 0) ............................................................................................................................ = 0   command​: "trying something"

This is tusc -v output on a machine where it does not work​: pstat(PSTAT_SETCMD\, NULL\, 16\, 0\, 0) .................................................................................................................................. ERR#14 EFAULT

It works consistently on PA-RISC. It fails consistently on Itanium. In both cases\, Perl is 5.8.5 32-bit build\, from official(?) HP-UX depot.

It is most likely that this is a Perl bug caused by some #ifdef in the code. It is possible that the bug lies with the operating system\, its includes and libraries\, or with the compiler. In that case\, please suggest how to verify that.

Perl Info ``` Flags: category=core severity=medium Site configuration information for perl v5.8.5: Configured by root at Thu Jul 21 12:50:42 IDT 2005. Summary of my perl5 (revision 5 version 8 subversion 5) configuration: Platform: osname=hpux, osvers=11.23, archname=IA64.ARCHREV_0 uname='hp-ux hpx7601 b.11.23 u ia64 3200213597 unlimited-user license ' config_args='-Dprefix=/usr/local/perl585 -Uinstallusrbinperl' hint=recommended, useposix=true, d_sigaction=define usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=undef useperlio=define d_sfio=undef uselargefiles=define usesocks=undef use64bitint=undef use64bitall=undef uselongdouble=undef usemymalloc=n, bincompat5005=undef Compiler: cc='cc', ccflags =' -Ae -D_HPUX_SOURCE -Wl,+vnocompatwarnings -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 ', optimize='+O2 +Onolimit', cppflags='-Aa -D__STDC_EXT__ -D_HPUX_SOURCE -Ae -D_HPUX_SOURCE -Wl,+vnocompatwarnings -I/usr/local/include' ccversion='B3910B A.05.50', gccversion='', gccosandvers='' intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=4321 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='/usr/bin/ld', ldflags =' -L/usr/local/lib -L/usr/lib/hpux32' libpth=/usr/local/lib /usr/lib/hpux32 /lib /usr/lib /usr/ccs/lib libs=-lpthread -lcl -lnsl -lnm -lndbm -ldl -ldld -lm -lsec -lc perllibs=-lpthread -lcl -lnsl -lnm -ldl -ldld -lm -lsec -lc libc=/usr/lib/hpux32/libc.so, so=so, useshrplib=false, libperl=libperl.a gnulibc_version='' Dynamic Linking: dlsrc=dl_hpux.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E -Wl,-B,deferred ' cccdlflags='+Z', lddlflags='-b +vnocompatwarnings -L/usr/local/lib -L/usr/lib/hpux32' Locally applied patches: @INC for perl v5.8.5: /usr/local/perl585/lib/5.8.5/IA64.ARCHREV_0 /usr/local/perl585/lib/5.8.5 /usr/local/perl585/lib/site_perl/5.8.5/IA64.ARCHREV_0 /usr/local/perl585/lib/site_perl/5.8.5 /usr/local/perl585/lib/site_perl . Environment for perl v5.8.5: HOME=/devduser3/ip/users/petrn LANG (unset) LANGUAGE (unset) LD_LIBRARY_PATH=:/pubhome/ip/ccip/iccip/proj/gcpfl700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/gcpflgn700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/acapi700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/acmtapi700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/acapi700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/acmtapi700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/gac700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/gac700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/gdapi700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/gdapi700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/ggd700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/ggd700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/miapi700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/miapi700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/pmapi700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/pmapi700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/amcapi700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/amcapi700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj /gmi700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/gmf700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/gmf700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/gcpfl700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/gcpflgn700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/gcpf700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/utlapi700_S4P9V64OG/lib:/devduser3/ip/users/petrn/proj/gutl700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/utlapi700_S4P9V64OG/lib:/pubhome/ip/ccip/iccip/proj/gutl700_S4P9V64OG/lib:/local64/ACE_wrappers-5.4e_64b/ace:/opt/syncsort64.3.11/lib:/ttvl01/TimesTen/tt703_64/lib:/usr/local64/xerces-c2_6_0_icu_64b//lib:/usr/local64/gmp-4.1.4/lib:/usr/local64/openssl-0.9.7f/lib:/usr/local64/xalan-c1_9_0_icu_64b//lib:/pubhome/ip/ccip/iccip/bb/cppunit/v70_0/HP-IA64/lib:/pubhome/ip/ccip/iccip/bb/mockpp/v70_0/HP-IA64/v1.10/lib:/devduser3/ip/users/petrn/proj/gmf700_S4P9V64OG/ut:/pubhome/ip/ccip/iccip/proj/gmf700_S4P9V64OG/ut:/pubhome/ip/ccip/iccip/proj/mfgdd700_S4P9V64OG/lib:/pubhome/ip/cci p/iccip/proj/gngdd700_S4P9V64OG/lib:/oravl01/oracle/10.2.0.3! /lib:/us r/lib/pa20_64:/usr/lib LOGDIR (unset) PATH=/iphome/ip/ccip/mb_ccip/v700/Build/bin:/iphome/ip/ccip/mb_ccip/v700/Build/bin:/opt/CA/harvest7/config/rd2/bin:/opt/CA/harvest7/bin:/usr/local/bin:/opt/ansic/bin:/usr/bin:/usr/contrib/bin:/usr/contrib/bin/X11:/usr/vue/bin:/usr/bin/X11:/bin:/usr/sbin:/opt/langtools/bin:/usr/ccs/bin:/opt/perf/bin:/etc:/devduser3/ip/users/petrn/bin:.:/pubhome/ip/ccip/iccip/proj/chapi700_S4P9V64OG/bin:/opt/imake/bin:/opt/aCC/bin:/pubhome/ip/ccip/iccip/bb/ant/v70_0/ant-1_6_4/bin:/opt/java1.4.2_11/bin:/pubhome/ip/ccip/iccip/proj/gjf700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/proj/ginfj700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/proj/gscripts700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/proj/ginfdb700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/proj/gcpf700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/proj/gcpfl700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/proj/gopacm700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/bb/apm/v70_0/HP-IA64//bin:.:/oravl01/oracle/10.2.0.3/bin:/devduser3/ip/users/petrn/proj/gmf700_S4P9V64OG/bin:/pubhom e/ip/ccip/iccip/proj/gmf700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/proj/mfgdd700_S4P9V64OG/bin:/pubhome/ip/ccip/iccip/proj/gngdd700_S4P9V64OG/bin:/iphome/ip/ccip/mb_ccip/v700/Build/bin:/opt/CA/harvest7/config/rd2/bin:/opt/CA/harvest7/bin:/usr/local/bin:/opt/ansic/bin:/usr/bin:/usr/contrib/bin:/usr/contrib/bin/X11:/usr/vue/bin:/usr/bin/X11:/bin:/usr/sbin:/opt/langtools/bin:/opt/perf/bin:/etc:/devduser3/ip/users/petrn/bin:/proj/chapi700_S4P9V64OG/bin:/bb/ant/v70_0/ant-1_6_4/bin:/proj/gjf700_S4P9V64OG/bin:/proj/ginfj700_S4P9V64OG/bin:/proj/gscripts700_S4P9V64OG/bin:/proj/ginfdb700_S4P9V64OG/bin:/proj/gcpf700_S4P9V64OG/bin:/proj/gcpfl700_S4P9V64OG/bin:/proj/gopacm700_S4P9V64OG/bin:/bb/apm/v70_0/HP-IA64//bin:/proj/chapi700_T2V64OG/bin:/proj/gjf700_T2V64OG/bin:/proj/ginfj700_T2V64OG/bin:/proj/gscripts700_T2V64OG/bin:/proj/ginfdb700_T2V64OG/bin:/proj/gcpf700_T2V64OG/bin:/proj/gcpfl700_T2V64OG/bin:/proj/gopacm700_T2V64OG/bin:/usr/contrib/Q4/bin:/opt/perl/bin:/opt/ipf/bin:/opt/hparray/ bin:/opt/nettladm/bin:/opt/fcms/bin:/opt/sec_mgmt/bastille/b! in:/opt/ dsau/bin:/opt/dsau/sbin:/opt/resmon/bin:/opt/gnome/bin:/usr/contrib/kwdb/bin:/opt/wbem/bin:/opt/wbem/sbin:/opt/mozilla:/opt/graphics/common/bin:/opt/prm/bin:/opt/sec_mgmt/spc/bin:/opt/ssh/bin:/opt/hpsmh/bin:/opt/upgrade/bin:/opt/gwlm/bin:/opt/hpnpl//bin:/opt/OV/bin/OpC:/opt/OV/bin:/opt/ignite/bin:/opt/sas/bin:/opt/sfm/bin:/opt/cadvise/bin:/opt/caliper/bin:/opt/sentinel/bin:/usr/ccs/bin PERL_BADLANG (unset) SHELL=/bin/tcsh -- Petr Novotný Prague Development Center, AMDOCS +420266773112, +420608711517 "No mercy for him who is without knowledge." - Ami ben Nathan, Berakhot 33a This message and the information contained herein is proprietary and confidential and subject to the Amdocs policy statement, you may review at http://www.amdocs.com/email_disclaimer.asp ```
p5pRT commented 15 years ago

From @tux

On Tue\, 21 Apr 2009 08​:52​:20 -0700\, "Petr Novotny" (via RT) \perlbug\-followup@​perl\.org wrote​:

[Please enter your report here] The problem is that Perl doesn't pass a valid pointer to the underlying syscall and it passes NULL instead.

This is the Perl snippet (note that the code itself is HP-UX specific)​: syscall (239\, 0x80000004\, $title\, length ($title)\, 0\, 0);

Can you elaborate on what this is supposed to do\, with references\, before I try a hidden system reboot?

This is tusc -v output on a machine where is works​: pstat(PSTAT_SETCMD\, 0x4003b908\, 16\, 0\, 0) ................. = 0 command​: "trying something"

This is tusc -v output on a machine where it does not work​: pstat(PSTAT_SETCMD\, NULL\, 16\, 0\, 0) ....................... ERR#14 EFAULT

It works consistently on PA-RISC. It fails consistently on Itanium.

Do you have a (good) reason to run 32bit perl on Itanium?

In both cases\, Perl is 5.8.5 32-bit build\, from official(?) HP-UX depot.

It is for sure not mine :)

It is most likely that this is a Perl bug caused by some #ifdef in the code. It is possible that the bug lies with the operating system\, its includes and libraries\, or with the compiler. In that case\, please suggest how to verify that.

I see an enormously long $LD_LIBRARY_PATH which includes libs for 64bit and for Oracle. IIRC Oracle 10g is 64bit default on HP-UX 11.23 Itanium\, which makes me wonder why you use a 32bit perl.

Try to slim it down\, with a (very) short $PATH and empty $SHLIB_PATH and $LD_LIBRARY_PATH

[Please do not change anything below this line] ----------------------------------------------------------------- --- Flags​: category=core severity=medium --- Site configuration information for perl v5.8.5​:

Configured by root at Thu Jul 21 12​:50​:42 IDT 2005.

Summary of my perl5 (revision 5 version 8 subversion 5) configuration​: Platform​: osname=hpux\, osvers=11.23\, archname=IA64.ARCHREV_0 uname='hp-ux hpx7601 b.11.23 u ia64 3200213597 unlimited-user license ' config_args='-Dprefix=/usr/local/perl585 -Uinstallusrbinperl' hint=recommended\, useposix=true\, d_sigaction=define usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=undef useperlio=define d_sfio=undef uselargefiles=define usesocks=undef use64bitint=undef use64bitall=undef uselongdouble=undef usemymalloc=n\, bincompat5005=undef Compiler​: cc='cc'\, ccflags =' -Ae -D_HPUX_SOURCE -Wl\,+vnocompatwarnings -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 '\, optimize='+O2 +Onolimit'\, cppflags='-Aa -D__STDC_EXT__ -D_HPUX_SOURCE -Ae -D_HPUX_SOURCE -Wl\,+vnocompatwarnings -I/usr/local/include' ccversion='B3910B A.05.50'\, gccversion=''\, gccosandvers='' intsize=4\, longsize=4\, ptrsize=4\, doublesize=8\, byteorder=4321 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='/usr/bin/ld'\, ldflags =' -L/usr/local/lib -L/usr/lib/hpux32' libpth=/usr/local/lib /usr/lib/hpux32 /lib /usr/lib /usr/ccs/lib libs=-lpthread -lcl -lnsl -lnm -lndbm -ldl -ldld -lm -lsec -lc perllibs=-lpthread -lcl -lnsl -lnm -ldl -ldld -lm -lsec -lc libc=/usr/lib/hpux32/libc.so\, so=so\, useshrplib=false\, libperl=libperl.a gnulibc_version='' Dynamic Linking​: dlsrc=dl_hpux.xs\, dlext=so\, d_dlsymun=undef\, ccdlflags='-Wl\,-E -Wl\,-B\,deferred ' cccdlflags='+Z'\, lddlflags='-b +vnocompatwarnings -L/usr/local/lib -L/usr/lib/hpux32'

Locally applied patches​:

--- @​INC for perl v5.8.5​: /usr/local/perl585/lib/5.8.5/IA64.ARCHREV_0 /usr/local/perl585/lib/5.8.5 /usr/local/perl585/lib/site_perl/5.8.5/IA64.ARCHREV_0 /usr/local/perl585/lib/site_perl/5.8.5 /usr/local/perl585/lib/site_perl .

--- Environment for perl v5.8.5​: HOME=/devduser3/ip/users/petrn LANG (unset) LANGUAGE (unset) LD_LIBRARY_PATH=​:/pubhome/ip/ccip/iccip/proj/gcpfl700_S4P9V64OG/lib​:/pubhome/ip/ccip/iccip/proj/gcpflgn700_S4P9V64OG/lib​:/devduser3/ip/users/petrn/proj/acapi700_S4P9V64OG/lib​:/devduser3/ip/users/petrn/proj/acmtapi700_S4P9V64OG/lib​:/pubhome/ip/ccip/iccip/proj/acapi700_S4P9V64OG/lib​:/pubhome/ip/ccip/iccip/proj/acmtapi700_S4P9V64OG/lib​:/devduser3/ip/users/petrn/proj/gac700_S4P9V64OG/lib​:/pubhome/ip/ccip/iccip/proj/gac700_S4P9V64OG/lib​:/devduser3/ip/users/petrn/proj/gdapi700_S4P9V64OG/lib​:/pubhome/ip/ccip/iccip/proj/gdapi700_S4P9V64OG/lib​:/devduser3/ip/users/petrn/proj/ggd700_S4P9V64OG/lib​:/pubhome/ip/ccip/iccip/proj/ggd700_S4P9V64OG/lib​:/devduser3/ip/users/petrn/proj/miapi700_S4P9V64OG/lib​:/pubhome/ip/ccip/iccip/proj/miapi700_S4P9V64OG/lib​:/devduser3/ip/users/petrn/proj/pmapi700_S4P9V64OG/lib​:/pubhome/ip/ccip/iccip/proj/pmapi700_S4P9V64OG/lib​:/devduser3/ip/users/petrn/proj/amcapi700_S4P9V64OG/lib​:/pubhome/ip/ccip/iccip/proj/amcapi700_S4P9V64OG/lib​:/pubhome/ip/ccip/iccip/p! roj /gmi700_S4P9V64OG/lib​:/devduser3/ip/users/petrn/proj/gmf700_S4P9V64OG/lib​:/pubhome/ip/ccip/iccip/proj/gmf700_S4P9V64OG/lib​:/pubhome/ip/ccip/iccip/proj/gcpfl700_S4P9V64OG/lib​:/pubhome/ip/ccip/iccip/proj/gcpflgn700_S4P9V64OG/lib​:/pubhome/ip/ccip/iccip/proj/gcpf700_S4P9V64OG/lib​:/devduser3/ip/users/petrn/proj/utlapi700_S4P9V64OG/lib​:/devduser3/ip/users/petrn/proj/gutl700_S4P9V64OG/lib​:/pubhome/ip/ccip/iccip/proj/utlapi700_S4P9V64OG/lib​:/pubhome/ip/ccip/iccip/proj/gutl700_S4P9V64OG/lib​:/local64/ACE_wrappers-5.4e_64b/ace​:/opt/syncsort64.3.11/lib​:/ttvl01/TimesTen/tt703_64/lib​:/usr/local64/xerces-c2_6_0_icu_64b//lib​:/usr/local64/gmp-4.1.4/lib​:/usr/local64/openssl-0.9.7f/lib​:/usr/local64/xalan-c1_9_0_icu_64b//lib​:/pubhome/ip/ccip/iccip/bb/cppunit/v70_0/HP-IA64/lib​:/pubhome/ip/ccip/iccip/bb/mockpp/v70_0/HP-IA64/v1.10/lib​:/devduser3/ip/users/petrn/proj/gmf700_S4P9V64OG/ut​:/pubhome/ip/ccip/iccip/proj/gmf700_S4P9V64OG/ut​:/pubhome/ip/ccip/iccip/proj/mfgdd700_S4P9V64OG/lib​:/pubhome/ip/! cci p/iccip/proj/gngdd700_S4P9V64OG/lib​:/oravl01/oracle/10.2.0.3! /lib​:/us r/lib/pa20_64​:/usr/lib LOGDIR (unset) PATH=/iphome/ip/ccip/mb_ccip/v700/Build/bin​:/iphome/ip/ccip/mb_ccip/v700/Build/bin​:/opt/CA/harvest7/config/rd2/bin​:/opt/CA/harvest7/bin​:/usr/local/bin​:/opt/ansic/bin​:/usr/bin​:/usr/contrib/bin​:/usr/contrib/bin/X11​:/usr/vue/bin​:/usr/bin/X11​:/bin​:/usr/sbin​:/opt/langtools/bin​:/usr/ccs/bin​:/opt/perf/bin​:/etc​:/devduser3/ip/users/petrn/bin​:.​:/pubhome/ip/ccip/iccip/proj/chapi700_S4P9V64OG/bin​:/opt/imake/bin​:/opt/aCC/bin​:/pubhome/ip/ccip/iccip/bb/ant/v70_0/ant-1_6_4/bin​:/opt/java1.4.2_11/bin​:/pubhome/ip/ccip/iccip/proj/gjf700_S4P9V64OG/bin​:/pubhome/ip/ccip/iccip/proj/ginfj700_S4P9V64OG/bin​:/pubhome/ip/ccip/iccip/proj/gscripts700_S4P9V64OG/bin​:/pubhome/ip/ccip/iccip/proj/ginfdb700_S4P9V64OG/bin​:/pubhome/ip/ccip/iccip/proj/gcpf700_S4P9V64OG/bin​:/pubhome/ip/ccip/iccip/proj/gcpfl700_S4P9V64OG/bin​:/pubhome/ip/ccip/iccip/proj/gopacm700_S4P9V64OG/bin​:/pubhome/ip/ccip/iccip/bb/apm/v70_0/HP-IA64//bin​:.​:/oravl01/oracle/10.2.0.3/bin​:/devduser3/ip/users/petrn/proj/gmf700_S4P9V64OG/bin​:/pub! hom e/ip/ccip/iccip/proj/gmf700_S4P9V64OG/bin​:/pubhome/ip/ccip/iccip/proj/mfgdd700_S4P9V64OG/bin​:/pubhome/ip/ccip/iccip/proj/gngdd700_S4P9V64OG/bin​:/iphome/ip/ccip/mb_ccip/v700/Build/bin​:/opt/CA/harvest7/config/rd2/bin​:/opt/CA/harvest7/bin​:/usr/local/bin​:/opt/ansic/bin​:/usr/bin​:/usr/contrib/bin​:/usr/contrib/bin/X11​:/usr/vue/bin​:/usr/bin/X11​:/bin​:/usr/sbin​:/opt/langtools/bin​:/opt/perf/bin​:/etc​:/devduser3/ip/users/petrn/bin​:/proj/chapi700_S4P9V64OG/bin​:/bb/ant/v70_0/ant-1_6_4/bin​:/proj/gjf700_S4P9V64OG/bin​:/proj/ginfj700_S4P9V64OG/bin​:/proj/gscripts700_S4P9V64OG/bin​:/proj/ginfdb700_S4P9V64OG/bin​:/proj/gcpf700_S4P9V64OG/bin​:/proj/gcpfl700_S4P9V64OG/bin​:/proj/gopacm700_S4P9V64OG/bin​:/bb/apm/v70_0/HP-IA64//bin​:/proj/chapi700_T2V64OG/bin​:/proj/gjf700_T2V64OG/bin​:/proj/ginfj700_T2V64OG/bin​:/proj/gscripts700_T2V64OG/bin​:/proj/ginfdb700_T2V64OG/bin​:/proj/gcpf700_T2V64OG/bin​:/proj/gcpfl700_T2V64OG/bin​:/proj/gopacm700_T2V64OG/bin​:/usr/contrib/Q4/bin​:/opt/perl/bin​:/opt/ipf/bin​:/opt/hparr! ay/ bin​:/opt/nettladm/bin​:/opt/fcms/bin​:/opt/sec_mgmt/bastille/b! in​:/opt/ dsau/bin​:/opt/dsau/sbin​:/opt/resmon/bin​:/opt/gnome/bin​:/usr/contrib/kwdb/bin​:/opt/wbem/bin​:/opt/wbem/sbin​:/opt/mozilla​:/opt/graphics/common/bin​:/opt/prm/bin​:/opt/sec_mgmt/spc/bin​:/opt/ssh/bin​:/opt/hpsmh/bin​:/opt/upgrade/bin​:/opt/gwlm/bin​:/opt/hpnpl//bin​:/opt/OV/bin/OpC​:/opt/OV/bin​:/opt/ignite/bin​:/opt/sas/bin​:/opt/sfm/bin​:/opt/cadvise/bin​:/opt/caliper/bin​:/opt/sentinel/bin​:/usr/ccs/bin PERL_BADLANG (unset) SHELL=/bin/tcsh

-- H.Merijn Brand http​://tux.nl Perl Monger http​://amsterdam.pm.org/ using & porting perl 5.6.2\, 5.8.x\, 5.10.x\, 5.11.x on HP-UX 10.20\, 11.00\, 11.11\, 11.23\, and 11.31\, OpenSuSE 10.3\, 11.0\, and 11.1\, AIX 5.2 and 5.3. http​://mirrors.develooper.com/hpux/ http​://www.test-smoke.org/ http​://qa.perl.org http​://www.goldmark.org/jeff/stupid-disclaimers/

p5pRT commented 15 years ago

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

p5pRT commented 15 years ago

From @tux

On Tue\, 21 Apr 2009 08​:52​:05 -0700\, "Petr Novotny" (via RT) \perlbug\-followup@​perl\.org wrote​:

This is obviously a duplicate of #64936 (or vice versa)

-- H.Merijn Brand http​://tux.nl Perl Monger http​://amsterdam.pm.org/ using & porting perl 5.6.2\, 5.8.x\, 5.10.x\, 5.11.x on HP-UX 10.20\, 11.00\, 11.11\, 11.23\, and 11.31\, OpenSuSE 10.3\, 11.0\, and 11.1\, AIX 5.2 and 5.3. http​://mirrors.develooper.com/hpux/ http​://www.test-smoke.org/ http​://qa.perl.org http​://www.goldmark.org/jeff/stupid-disclaimers/

p5pRT commented 15 years ago

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

p5pRT commented 15 years ago

From Petr.Novotny@amdocs.com

Please close this 64936\, it is duplicate to 64934\, only with an empty subject line.

My mistake\, sorry.

-- Petr Novotný Prague Development Center\, AMDOCS +420266773112\, +420608711517 "I'm old enough not to care too much / About what you think of me / But I'm young enough to remember the future / And the way things ought to be." - Rush

-----Original Message----- From​: perlbug-followup@​perl.org [mailto​:perlbug-followup@​perl.org] Sent​: 21 April 2009 17​:52 To​: Petr Novotny Subject​: [perl #64936] perlbug AutoReply​:

Greetings\,

This message has been automatically generated in response to the creation of a perl bug report regarding​: "".

There is no need to reply to this message right now. Your ticket has been assigned an ID of [perl #64936]. Within the next 24-72 hours\, your message will be posted to the perl developers. Please be patient!

Please include the string​:

[perl #64936]

in the subject line of all future correspondence about this issue. To do so\, you may reply to this message (please delete unnecessary quotes and text.)

Thank you\, perlbug-followup@​perl.org

-------------------------------------------------------------- ----------- CC​: "Ilan Green" \Ilan\.Green@​amdocs\.com MIME-Version​: 1.0 X-Spam-Status​: No\, hits=-2.7 required=8.0 tests=MISSING_SUBJECT\,PERLBUG_CONF Content-Class​: urn​:content-classes​:message X-Virus-Checked​: Checked X-Virus-Checked​: Checked X-Old-Spam-Check-BY​: la.mx.develooper.com Message-ID​: \2E7A5CA2D4E7624C81E8D229FACCEC3103A8FDD7@​tlvmail8\.corp\.amdocs\.com content-type​: text/plain; charset="utf-8" X-MS-Tnef-Correlator​: Received​: (qmail 16231 invoked from network); 21 Apr 2009 15​:51​:41 -0000 Received​: from localhost (HELO la.mx.develooper.com) (127.0.0.1) by localhost with SMTP; 21 Apr 2009 15​:51​:41 -0000 Received​: (qmail 16227 invoked by alias); 21 Apr 2009 15​:51​:40 -0000 Received​: from la.mx.develooper.com (HELO x1.develooper.com) (207.171.7.76) by la.mx.develooper.com (qpsmtpd/0.28) with SMTP; Tue\, 21 Apr 2009 08​:51​:35 -0700 Received​: (qmail 16170 invoked by uid 225); 21 Apr 2009 15​:51​:31 -0000 Received​: (qmail 16165 invoked by alias); 21 Apr 2009 15​:51​:31 -0000 Received​: from isomail1.amdocs.com (HELO isomail1.amdocs.com) (193.43.244.88) by la.mx.develooper.com (qpsmtpd/0.28) with ESMTP; Tue\, 21 Apr 2009 08​:51​:26 -0700 Received​: from localhost (localhost [127.0.0.1]) by isomail1.amdocs.com (Postfix) with SMTP id 44EA290195; Tue\, 21 Apr 2009 18​:25​:42 +0300 (IDT) Received​: from TLVMAIL8.corp.amdocs.com (unknown [10.224.1.87]) by isomail1.amdocs.com (Postfix) with ESMTP id E891290197 for \perlbug@​perl\.org; Tue\, 21 Apr 2009 18​:25​:34 +0300 (IDT) Delivered-To​: rt-perl5@​netlabs.develooper.com Delivered-To​: perlbug@​perl.org Subject​: Return-Path​: \Petr\.Novotny@​amdocs\.com X-Spam-Check-BY​: la.mx.develooper.com Thread-Index​: AcnClXBHcllRCw/+SMq0y7iJ06SAgw== X-Old-Spam-Status​: No\, hits=-2.7 required=8.0 tests=MISSING_SUBJECT\,PERLBUG_CONF Date​: Tue\, 21 Apr 2009 18​:25​:44 +0300 X-MS-Has-Attach​: X-Mimeole​: Produced By Microsoft Exchange V6.5 To​: \perlbug@​perl\.org Content-Transfer-Encoding​: quoted-printable From​: "Petr Novotny" \Petr\.Novotny@​amdocs\.com X-RT-Original-Encoding​: iso-8859-1

This message and the information contained herein is proprietary and confidential and subject to the Amdocs policy statement\, you may review at http​://www.amdocs.com/email_disclaimer.asp

p5pRT commented 15 years ago

From @tux

Duplicate of 64936

p5pRT commented 15 years ago

@tux - Status changed from 'open' to 'resolved'

p5pRT commented 15 years ago

@tux - Status changed from 'resolved' to 'open'

p5pRT commented 13 years ago

@tux - Status changed from 'open' to 'resolved'