magellan-next/include/cleanutils.sminc

# package clean utilities
# $Id$

#
# taken from gentoo (livecd-ng)
#
#"zapmost" is used to remove an entire directory tree, *except* for certain
#specified files. Arg 1 is the tree, args 2+ are the items to keep, which can
#be files or directories at the root or deeper levels.

#example calls:
#zapmost /usr/share/locales en_us
#zapmost /usr/share/terminfo l/linux
zapmost()
{
	local rootdir
	rootdir="${1}/"
	[ ! -e  "$rootdir" ] && echo "zapmost: $rootdir not found; skipping..." && return 1
	install -d ${BUILDDIR}/zap
	local dirs
	shift
	local x
	for x in ${*}
	do
		if [ "${x##*/}" = "${x}" ]
		then
			#one deep
			mv ${rootdir}${x} ${BUILDDIR}/zap
		else
			#more than one deep; create intermediate directories
			dirs=${x%/*}
			install -d ${BUILDDIR}/zap/${dirs}
			mv ${rootdir}${x} ${BUILDDIR}/zap/${dirs}
		fi
	done
	rm -rf ${rootdir}*
	mv ${BUILDDIR}/zap/* ${rootdir}
}
1	niro	2	# package clean utilities
2	niro	1930	# $Id$
3	niro	2
4			#
5			# taken from gentoo (livecd-ng)
6			#
7			#"zapmost" is used to remove an entire directory tree, except for certain
8			#specified files. Arg 1 is the tree, args 2+ are the items to keep, which can
9			#be files or directories at the root or deeper levels.
10
11			#example calls:
12			#zapmost /usr/share/locales en_us
13			#zapmost /usr/share/terminfo l/linux
14	niro	1930	zapmost()
15			{
16	niro	2	local rootdir
17			rootdir="${1}/"
18			[ ! -e "$rootdir" ] && echo "zapmost: $rootdir not found; skipping..." && return 1
19			install -d ${BUILDDIR}/zap
20			local dirs
21			shift
22			local x
23			for x in ${*}
24			do
25			if [ "${x##*/}" = "${x}" ]
26			then
27			#one deep
28			mv ${rootdir}${x} ${BUILDDIR}/zap
29			else
30			#more than one deep; create intermediate directories
31			dirs=${x%/*}
32			install -d ${BUILDDIR}/zap/${dirs}
33	niro	2800	mv ${rootdir}${x} ${BUILDDIR}/zap/${dirs}
34	niro	2	fi
35			done
36			rm -rf ${rootdir}*
37			mv ${BUILDDIR}/zap/* ${rootdir}
38			}