changeset 9661:7af2e7ef9554

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.
author Jim Meyering <meyering@redhat.com>
date Thu, 31 Jan 2008 11:13:04 +0100
parents 88b4f52198ce
children 52902e86c444
files MODULES.html.sh build-aux/vc-list-files modules/vc-list-files
diffstat 3 files changed, 77 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/MODULES.html.sh
+++ b/MODULES.html.sh
@@ -2733,6 +2733,7 @@
   func_module git-version-gen
   func_module gnupload
   func_module maintainer-makefile
+  func_module vc-list-files
   func_end_table
 
   element="Misc"
new file mode 100755
--- /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
new file mode 100644
--- /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