[PATCH] vc-list-files: new module

[Jim Meyering]

I've just pushed the change adding this new module.
As far as I know, it's used only via the Makefile.maint-style
rules that are run as part of e.g., coreutils "make syntax-check".

Changes from the version in coreutils:
I've just reintroduced support for mercurial (only lightly tested),
and rearranged the directory-existence tests so git is first.

        vc-list-files: new module
        * modules/vc-list-files: New module.
        * build-aux/vc-list-files: New file.
        * MODULES.html.sh (maint/rel Support): Add vc-list-files.

---
 MODULES.html.sh         |    1 +
 build-aux/vc-list-files |   57 +++++++++++++++++++++++++++++++++++++++++++++++
 modules/vc-list-files   |   19 +++++++++++++++
 3 files changed, 77 insertions(+), 0 deletions(-)
 create mode 100755 build-aux/vc-list-files
 create mode 100644 modules/vc-list-files

diff --git a/MODULES.html.sh b/MODULES.html.sh
index bf89f4b..f6c9853 100755
--- a/MODULES.html.sh
+++ b/MODULES.html.sh
@@ -2733,6 +2733,7 @@ func_all_modules ()
   func_module git-version-gen
   func_module gnupload
   func_module maintainer-makefile
+  func_module vc-list-files
   func_end_table

   element="Misc"
diff --git a/build-aux/vc-list-files b/build-aux/vc-list-files
new file mode 100755
index 0000000..1e158bb
--- /dev/null
+++ b/build-aux/vc-list-files
@@ -0,0 +1,57 @@
+#!/bin/sh
+# List version-controlled file names.
+
+# Copyright (C) 2006-2008 Free Software Foundation, Inc.
+
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+
+# List the specified version-controlled files.
+# With no argument, list them all.  With a single DIRECTORY argument,
+# list the version-controlled files in that directory.
+# This script must be run solely from the top of a $srcdir build directory.
+
+# If there's an argument, it must be a single, "."-relative directory name.
+# cvsu is part of the cvsutils package: http://www.red-bean.com/cvsutils/
+
+dir=
+case $# in
+  0) ;;
+  1) dir=$1 ;;
+  *) echo "$0: too many arguments" 1>&2
+     echo "Usage: $0 [DIR]" 1>&2; exit 1;;
+esac
+
+test "x$dir" = x && dir=.
+
+if test -d .git; then
+  exec git ls-files "$dir"
+elif test -d .hg; then
+  exec hg locate "$dir/*"
+elif test -d CVS; then
+  if test -x build-aux/cvsu; then
+    build-aux/cvsu --find --types=AFGM "$dir"
+  else
+    awk -F/ '{                         \
+       if (!$1 && $3 !~ /^-/) {        \
+         f=FILENAME;                   \
+         sub(/CVS\/Entries/, "", f);   \
+         print f $2;                   \
+       }}'                             \
+      $(find ${*-*} -name Entries -print) /dev/null;
+  fi
+else
+  echo "$0: Failed to determine type of version control used in "`pwd` 1>&2
+  exit 1
+fi
diff --git a/modules/vc-list-files b/modules/vc-list-files
new file mode 100644
index 0000000..0f922ae
--- /dev/null
+++ b/modules/vc-list-files
@@ -0,0 +1,19 @@
+Description:
+list version-controlled files (vc-agnostic)
+
+Files:
+build-aux/vc-list-files
+
+Depends-on:
+
+configure.ac:
+
+Makefile.am:
+
+Include:
+
+License:
+GPLed build tool
+
+Maintainer:
+coreutils
--
1.5.4.rc5.1.ge6bfe