view release on metacpan or  search on metacpan

xtools/my-check-copyright-years.sh  view on Meta::CPAN

# the copyright line

if test -z "$DISTVNAME"; then
  DISTVNAME=`sed -n 's/^DISTVNAME = \(.*\)/\1/p' Makefile`
fi
case $DISTVNAME in
  *\$*) DISTVNAME=`make echo-DISTVNAME` ;;
esac
if test -z "$DISTVNAME"; then
  echo "DISTVNAME not set and not in Makefile"
  exit 1
fi
TARGZ="$DISTVNAME.tar.gz"
if test -e "$TARGZ"; then :;
else
  pwd
  echo "TARGZ $TARGZ not found"
  exit 1
fi


MY_HIDE=
year=`date +%Y`

result=0

# files with dates $year
tar tvfz $TARGZ \
| egrep "$year-|debian/copyright" \
| sed "s:^.*$DISTVNAME/::" \
| {
while read i
do
  # echo "consider $i"
  GREP=grep
  case $i in \
    '' | */ \
    | ppport.h \
    | debian/changelog | debian/doc-base \
    | debian/compat | debian/emacsen-compat | debian/source/format \
    | debian/patches/*.diff \
    | COPYING | MANIFEST* | SIGNATURE | META.yml | META.json \
    | version.texi | */version.texi \
    | *utf16* | examples/rs''s2lea''fnode.conf \
    | */MathI''mage/ln2.gz | */MathI''mage/pi.gz \
    | *.mo | *.locatedb* | t/samp.* \
    | t/empty.dat | t/*.xpm | t/*.xbm | t/*.jpg | t/*.gif \
    | t/*.g${MY_HIDE}d \
    | tools/*-oeis-samples.gp \
    | test-oeis-samples.gp \
    | tools/configurations-gfs-generated.gp \
    | devel/configurations-t-generated.gp \
    | test-symbols.txt | test-funcs.txt \
    | tests/test-symbols.txt | tests/test-funcs.txt \
    | devel/minimal-domsets-max-even2.c \
    | devel/a002251-Wythoff-LU-swap.txt \
    | devel/a159917-Zeckendorf-low2digits.txt \
    | devel/devel/a341258-lazy-reverse.txt \
    | devel/a341258-lazy-reverse.txt \
    | oeis/a002251-Wythoff-LU-swap.txt \
    | debian/user-background-jobs.conf \
    | */*/b3*.txt \
    | */*/saved-state.txt \
    | oeis/a159917-Zeckendorf-low2digits.txt \
    | */_whizzy*)
      continue ;;
    *.gz)
      GREP=zgrep
  esac; \

  if test -e "$srcdir/$i"
  then f="$srcdir/$i"
  else f="$i"
  fi

  if $GREP -q -e "Copyright.*$year" $f
  then :;
  else
    echo "$i:1: this file"
    grep Copyright $f
    result=1
  fi
done
}
exit $result