123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114 |
- #!/bin/sh
- scriptversion=2018-03-07.03;
- postprocess=
- case $1 in
- --help) cat <<EOF
- Usage: $0 [-C SRCDIR] [DIR...]
- Output a list of version-controlled files in DIR (default .), relative to
- SRCDIR (default .). SRCDIR must be the top directory of a checkout.
- Options:
- --help print this help, then exit
- --version print version number, then exit
- -C SRCDIR change directory to SRCDIR before generating list
- Report bugs and patches to <bug-gnulib@gnu.org>.
- EOF
- exit ;;
- --version)
- year=`echo "$scriptversion" | sed 's/[^0-9].*//'`
- cat <<EOF
- vc-list-files $scriptversion
- Copyright (C) $year Free Software Foundation, Inc,
- License GPLv3+: GNU GPL version 3 or later <https://gnu.org/licenses/gpl.html>
- This is free software: you are free to change and redistribute it.
- There is NO WARRANTY, to the extent permitted by law.
- EOF
- exit ;;
- -C)
- test "$2" = . || postprocess="| sed 's|^|$2/|'"
- cd "$2" || exit 1
- shift; shift ;;
- esac
- test $# = 0 && set .
- for dir
- do
- if test -d .git || test -f .git; then
- test "x$dir" = x. \
- && dir= sed_esc= \
- || { dir="$dir/"; sed_esc=`echo "$dir"|env sed 's,\([\\/]\),\\\\\1,g'`; }
-
-
-
-
- eval exec git ls-tree -r 'HEAD:"$dir"' \
- \| sed -n '"s/^100[^ ]*./$sed_esc/p"' $postprocess
- elif test -d .hg; then
- eval exec hg locate '"$dir/*"' $postprocess
- elif test -d .bzr; then
- test "$postprocess" = '' && postprocess="| sed 's|^\./||'"
- eval exec bzr ls -R --versioned '"$dir"' $postprocess
- elif test -d CVS; then
- test "$postprocess" = '' && postprocess="| sed 's|^\./||'"
- if test -x build-aux/cvsu; then
- eval build-aux/cvsu --find --types=AFGM '"$dir"' $postprocess
- elif (cvsu --help) >/dev/null 2>&1; then
- eval cvsu --find --types=AFGM '"$dir"' $postprocess
- else
- eval awk -F/ \''{ \
- if (!$1 && $3 !~ /^-/) { \
- f=FILENAME; \
- if (f ~ /CVS\/Entries$/) \
- f = substr(f, 1, length(f)-11); \
- print f $2; \
- }}'\'' \
- `find "$dir" -name Entries -print` /dev/null' $postprocess
- fi
- elif test -d .svn; then
- eval exec svn list -R '"$dir"' $postprocess
- else
- echo "$0: Failed to determine type of version control used in `pwd`" 1>&2
- exit 1
- fi
- done
|