#!/bin/csh -f
#
# Create a whole tree symlinked on a given tree.
#
# Usage: "make-symlink-tree full-path-src full-path-dest",
#   creates a destination tree that is a duplicate of src, using symbolic
# links.
#
#			 			Gershon Elber, Jan 1993.
#

if ( $#argv != 2 ) then
	echo "Usage: make-symlink-tree full-path-src full-path-dest"
	exit 1
endif

set src = $1
set dest = $2

if ( ! -e $src ) then
	echo "Source directory does not exists"
	exit 1
endif

echo mkdir $dest
mkdir $dest

pushd . > /dev/null
cd $src
set all_files = `find . -print | sed -e "s/^.//g"`
popd > /dev/null

foreach f ( $all_files )
	if ( "$f" == "." ) then
		# ignore
	else
		if ( -d $src$f ) then
			echo mkdir $dest$f
			mkdir $dest$f
		else
			echo ln -s $src$f $dest$f
			ln -s $src$f $dest$f
		endif
	endif
end
