2003-06-13 10:23:28 +00:00
|
|
|
#!/bin/sh
|
|
|
|
|
#
|
2003-06-18 11:32:54 +00:00
|
|
|
# $P4: //depot/projects/openpam/clean.sh#2 $
|
2003-06-13 10:23:28 +00:00
|
|
|
|
|
|
|
|
tmpfile="/tmp/openpam-clean.$$"
|
|
|
|
|
p4 files ... | grep -v 'delete change' |
|
|
|
|
|
sed 's|^.*/openpam/||; s|#.*$||' > "${tmpfile}"
|
2003-06-18 11:32:54 +00:00
|
|
|
find . -not -type d | cut -c 3- | while read file ; do
|
2003-06-13 10:23:28 +00:00
|
|
|
grep "^${file}\$" "${tmpfile}" >/dev/null || rm -v "${file}"
|
|
|
|
|
done
|
|
|
|
|
find . -type d -empty -print -delete
|
|
|
|
|
rm "${tmpfile}"
|
|
|
|
|
|
