mirror of
ssh://git.janware.com/srv/git/janware/proj/jw-pkg
synced 2026-01-15 12:03:31 +01:00
89 lines
1.5 KiB
Bash
89 lines
1.5 KiB
Bash
#!/bin/sh
|
|
|
|
export LANG=POSIX
|
|
|
|
filter_deleted()
|
|
{
|
|
local rc_file="$1"
|
|
shift
|
|
local cand
|
|
for cand in "$@"; do
|
|
grep -q "^R ./$cand/" $rc_file && continue
|
|
echo $cand
|
|
done
|
|
}
|
|
|
|
output()
|
|
{
|
|
if [ "$zero_terminate" = 1 ]; then
|
|
echo -en "$*\x00"
|
|
else
|
|
echo "$*"
|
|
fi
|
|
}
|
|
|
|
list_dirents_cvs()
|
|
{
|
|
local dirs=`sed '/^D\// !d; s%^D/%%; s%/.*%%' $1/CVS/Entries`
|
|
dirs="`filter_deleted $1/CVS/Entries $dirs`"
|
|
local cands
|
|
if [ -f $1/CVS/Entries.Log ]; then
|
|
cands="`sed '/^A D\// !d; s%^A D/%%; s%/.*%%' $1/CVS/Entries.Log`"
|
|
dirs="$dirs `filter_deleted $1/CVS/Entries.Log $cands`"
|
|
fi
|
|
local files=`sed '/^\// !d; s%/%%; s%/.*%%; s%^%%' $1/CVS/Entries`
|
|
files="`filter_deleted $1/CVS/Entries $files`"
|
|
local d f
|
|
for f in $files; do
|
|
output "$1/$f"
|
|
done
|
|
for d in $dirs; do
|
|
[ "$opt_only_regular_files" = 1 ] || output $1/$d
|
|
list_dirents_cvs $1/$d
|
|
done
|
|
}
|
|
|
|
list_dirents_git()
|
|
{
|
|
git ls-files $git_ls_files_opts $1
|
|
[ "$opt_no_submodules" = 1 ] || git submodule foreach "git ls-files $git_ls_files_opts | sed \"s|^|\$path/|\""
|
|
}
|
|
|
|
list_dirents()
|
|
{
|
|
if [ -d $1/CVS ]; then
|
|
list_dirents_cvs $1
|
|
return
|
|
fi
|
|
git status >/dev/null 2>&1 || {
|
|
echo "failed to list versioned files in $1: no VCS" >&2
|
|
exit 1
|
|
}
|
|
list_dirents_git $1
|
|
}
|
|
|
|
set -- `getopt fnz "$@"`
|
|
|
|
while [ "$1" != -- ]; do
|
|
case $1 in
|
|
-f)
|
|
opt_only_regular_files=1
|
|
;;
|
|
-n)
|
|
opt_no_submodules=1
|
|
;;
|
|
-z)
|
|
zero_terminate=1
|
|
git_ls_files_opts="$git_ls_files_opts -z"
|
|
opt_sort="$opt_sort -z"
|
|
;;
|
|
esac
|
|
shift
|
|
done
|
|
shift
|
|
|
|
proj_dir="$1"
|
|
[ "$proj_dir" ] && cd $proj_dir
|
|
|
|
list_dirents . | sort $opt_sort
|
|
|