Commit | Line | Data |
---|---|---|
c84bdaf6 LC |
1 | #!/bin/sh |
2 | # List version-controlled file names. | |
3 | ||
4 | # Print a version string. | |
3d458a81 | 5 | scriptversion=2011-05-16.22; # UTC |
c84bdaf6 | 6 | |
49114fd4 | 7 | # Copyright (C) 2006-2011 Free Software Foundation, Inc. |
c84bdaf6 LC |
8 | |
9 | # This program is free software: you can redistribute it and/or modify | |
10 | # it under the terms of the GNU General Public License as published by | |
11 | # the Free Software Foundation, either version 3 of the License, or | |
12 | # (at your option) any later version. | |
13 | ||
14 | # This program is distributed in the hope that it will be useful, | |
15 | # but WITHOUT ANY WARRANTY; without even the implied warranty of | |
16 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
17 | # GNU General Public License for more details. | |
18 | ||
19 | # You should have received a copy of the GNU General Public License | |
20 | # along with this program. If not, see <http://www.gnu.org/licenses/>. | |
21 | ||
22 | ||
23 | # List the specified version-controlled files. | |
24 | # With no argument, list them all. With a single DIRECTORY argument, | |
25 | # list the version-controlled files in that directory. | |
26 | ||
27 | # If there's an argument, it must be a single, "."-relative directory name. | |
28 | # cvsu is part of the cvsutils package: http://www.red-bean.com/cvsutils/ | |
29 | ||
30 | postprocess= | |
31 | case $1 in | |
32 | --help) cat <<EOF | |
3d458a81 | 33 | Usage: $0 [-C SRCDIR] [DIR...] |
c84bdaf6 LC |
34 | |
35 | Output a list of version-controlled files in DIR (default .), relative to | |
36 | SRCDIR (default .). SRCDIR must be the top directory of a checkout. | |
37 | ||
38 | Options: | |
39 | --help print this help, then exit | |
40 | --version print version number, then exit | |
41 | -C SRCDIR change directory to SRCDIR before generating list | |
42 | ||
43 | Report bugs and patches to <bug-gnulib@gnu.org>. | |
44 | EOF | |
45 | exit ;; | |
46 | ||
47 | --version) | |
48 | year=`echo "$scriptversion" | sed 's/[^0-9].*//'` | |
49 | cat <<EOF | |
50 | vc-list-files $scriptversion | |
51 | Copyright (C) $year Free Software Foundation, Inc, | |
52 | License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html> | |
53 | This is free software: you are free to change and redistribute it. | |
54 | There is NO WARRANTY, to the extent permitted by law. | |
55 | EOF | |
56 | exit ;; | |
57 | ||
58 | -C) | |
59 | test "$2" = . || postprocess="| sed 's|^|$2/|'" | |
60 | cd "$2" || exit 1 | |
61 | shift; shift ;; | |
62 | esac | |
63 | ||
3d458a81 AW |
64 | test $# = 0 && set . |
65 | ||
66 | for dir | |
67 | do | |
68 | if test -d .git; then | |
69 | test "x$dir" = x. \ | |
70 | && dir= sed_esc= \ | |
71 | || { dir="$dir/"; sed_esc=`echo "$dir"|env sed 's,\([\\/]\),\\\\\1,g'`; } | |
72 | # Ignore git symlinks - either they point into the tree, in which case | |
73 | # we don't need to visit the target twice, or they point somewhere | |
74 | # else (often into a submodule), in which case the content does not | |
75 | # belong to this package. | |
76 | eval exec git ls-tree -r 'HEAD:"$dir"' \ | |
77 | \| sed -n '"s/^100[^ ]*./$sed_esc/p"' $postprocess | |
78 | elif test -d .hg; then | |
79 | eval exec hg locate '"$dir/*"' $postprocess | |
80 | elif test -d .bzr; then | |
81 | test "$postprocess" = '' && postprocess="| sed 's|^\./||'" | |
82 | eval exec bzr ls -R --versioned '"$dir"' $postprocess | |
83 | elif test -d CVS; then | |
84 | test "$postprocess" = '' && postprocess="| sed 's|^\./||'" | |
85 | if test -x build-aux/cvsu; then | |
86 | eval build-aux/cvsu --find --types=AFGM '"$dir"' $postprocess | |
87 | elif (cvsu --help) >/dev/null 2>&1; then | |
88 | eval cvsu --find --types=AFGM '"$dir"' $postprocess | |
89 | else | |
90 | eval awk -F/ \''{ \ | |
91 | if (!$1 && $3 !~ /^-/) { \ | |
92 | f=FILENAME; \ | |
93 | if (f ~ /CVS\/Entries$/) \ | |
94 | f = substr(f, 1, length(f)-11); \ | |
95 | print f $2; \ | |
96 | }}'\'' \ | |
97 | `find "$dir" -name Entries -print` /dev/null' $postprocess | |
98 | fi | |
99 | elif test -d .svn; then | |
100 | eval exec svn list -R '"$dir"' $postprocess | |
c84bdaf6 | 101 | else |
3d458a81 AW |
102 | echo "$0: Failed to determine type of version control used in `pwd`" 1>&2 |
103 | exit 1 | |
c84bdaf6 | 104 | fi |
3d458a81 | 105 | done |
c84bdaf6 LC |
106 | |
107 | # Local variables: | |
108 | # eval: (add-hook 'write-file-hooks 'time-stamp) | |
109 | # time-stamp-start: "scriptversion=" | |
110 | # time-stamp-format: "%:y-%02m-%02d.%02H" | |
111 | # time-stamp-time-zone: "UTC" | |
112 | # time-stamp-end: "; # UTC" | |
113 | # End: |