[Bug other/13126] New: gccbug presents incorrect ident data

["gcc-bugzilla at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

	The RCS command ident, when run on gccbug, gives multiple
	erroneous responses.  Prior communication (late 1980s) with
	FSF and Walter Tichy indicates that this is a feature of
	ident, not a bug.  Similar problems occur with CVS.

Environment:
>System: SunOS login1 5.8 Generic_108528-19 sun4u sparc SUNW,Ultra-5_10
>Architecture: sun4
>host: sparc-sun-solaris2.8
>build: sparc-sun-solaris2.8
>target: sparc-sun-solaris2.8
>configured with: ./configure --prefix=/afs/sph.umich.edu/pkg/@sys/pkg/gcc-3.3.2 --with-gnu-as --with-as=/afs/sph.umich.edu/pkg/@sys/bin/as --with-gnu-ld --with-ld=/afs/sph.umich.edu/pkg/@sys/bin/ld --enable-threads --disable-nls --with-libiconv-prefix=/afs/sph.umich.edu/pkg/@sys/pkg/libconv-1.9.1

How-To-Repeat:
	When running ident against gccbug, you get the following bogus
	results:
     $COMMAND: Please fix the MAIL_AGENT entry in the $
     $COMMAND: cannot read $
     $COMMAND: Aborting ..."; $
     $COMMAND: could not copy $
     $COMMAND: the problem report remains in $
     $COMMAND: the problem report remains in $
------- Additional Comments From scs at sph dot umich dot edu  2003-11-19 14:31 -------
Fix:
	This bogus response is fairly common when running ident against
	perl programs.  Fortunately there is a simple workaround, which
	is to enclose variable name portions of the offending line in
	curly brackets, eg,
     ${COMMAND}: Please fix the MAIL_AGENT entry in the $
	This bit of syntactic sugar, while not strictly necessary,
	does prevent the line from appearing to ident as an RCS/CVS
	marker and does not complicate the perl script.  The changes
	to gccbug to fix this were trivial.  The following is a sharfile
	with the original file (gccbug-orig), the modified file
	(gccbug-new), and a patch file for them.

#!/bin/sh
# This is a shell archive (produced by GNU sharutils 4.2.1).
# To extract the files from this archive, save it to some FILE, remove
# everything before the `!/bin/sh' line above, then type `sh FILE'.
#
# Made on 2003-11-19 09:15 EDT by <scs@login1>.
# Source directory was `/afs/sph.umich.edu/user/s/scs'.
#
# Existing files will *not* be overwritten unless `-c' is specified.
#
# This shar contains:
# length mode       name
# ------ ---------- ------------------------------------------
#  15827 -rw-r--r-- gccbug-new
#  15781 -rw-r--r-- gccbug-orig
#   8817 -rw-r--r-- gccbug-patch
#
save_IFS="${IFS}"
IFS="${IFS}:"
gettext_dir=FAILED
locale_dir=FAILED
first_param="$1"
for dir in $PATH
do
  if test "$gettext_dir" = FAILED && test -f $dir/gettext \
     && ($dir/gettext --version >/dev/null 2>&1)
  then
    set `$dir/gettext --version 2>&1`
    if test "$3" = GNU
    then
      gettext_dir=$dir
    fi
  fi
  if test "$locale_dir" = FAILED && test -f $dir/shar \
     && ($dir/shar --print-text-domain-dir >/dev/null 2>&1)
  then
    locale_dir=`$dir/shar --print-text-domain-dir`
  fi
done
IFS="$save_IFS"
if test "$locale_dir" = FAILED || test "$gettext_dir" = FAILED
then
  echo=echo
else
  TEXTDOMAINDIR=$locale_dir
  export TEXTDOMAINDIR
  TEXTDOMAIN=sharutils
  export TEXTDOMAIN
  echo="$gettext_dir/gettext -s"
fi
if touch -am -t 200112312359.59 $$.touch >/dev/null 2>&1 && test ! -f 200112312359.59 -a -f $$.touch; then
  shar_touch='touch -am -t $1$2$3$4$5$6.$7 "$8"'
elif touch -am 123123592001.59 $$.touch >/dev/null 2>&1 && test ! -f 123123592001.59 -a ! -f 123123592001.5 -a -f $$.touch; then
  shar_touch='touch -am $3$4$5$6$1$2.$7 "$8"'
elif touch -am 1231235901 $$.touch >/dev/null 2>&1 && test ! -f 1231235901 -a -f $$.touch; then
  shar_touch='touch -am $3$4$5$6$2 "$8"'
else
  shar_touch=:
  echo
  $echo 'WARNING: not restoring timestamps.  Consider getting and'
  $echo "installing GNU \`touch', distributed in GNU File Utilities..."
  echo
fi
rm -f 200112312359.59 123123592001.59 123123592001.5 1231235901 $$.touch
#
if mkdir _sh29647; then
  $echo 'x -' 'creating lock directory'
else
  $echo 'failed to create lock directory'
  exit 1
fi
# ============= gccbug-new ==============
if test -f 'gccbug-new' && test "$first_param" != -c; then
  $echo 'x -' SKIPPING 'gccbug-new' '(file already exists)'
else
  $echo 'x -' extracting 'gccbug-new' '(binary)'
  sed 's/^X//' << 'SHAR_EOF' | uudecode &&

-- 
           Summary: gccbug presents incorrect ident data
           Product: gcc
           Version: 3.3.2
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: other
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: scs at sph dot umich dot edu
                CC: gcc-bugs at gcc dot gnu dot org


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=13126