mirror of
https://git.code.sf.net/p/quake/quakeforge-old
synced 2024-12-01 07:51:07 +00:00
61 lines
1.2 KiB
Text
61 lines
1.2 KiB
Text
|
#!/bin/sh
|
||
|
|
|
||
|
|
quakedir=/usr/share/games/quake # Where quake is installed
|
||
|
|
symtree=$HOME/.quake # Where to put the symlink tree
|
||
|
|
|
||
|
|
# returns what symlink actually points to
|
||
|
|
readlink () {
|
||
|
|
perl -e '
|
||
|
|
$l = shift;
|
||
|
|
exit 1 unless -l $l;
|
||
|
|
$r = readlink $l;
|
||
|
|
exit 1 unless $r;
|
||
|
|
print "$r\n"
|
||
|
|
' $1;
|
||
|
|
}
|
||
|
|
|
||
|
|
if test \! -d "$quakedir"; then
|
||
|
|
echo "$0: directory \"$quakedir\" not found" >&2
|
||
|
|
exit 2
|
||
|
|
fi
|
||
|
|
|
||
|
|
if test \! -d $symtree; then
|
||
|
|
mkdir -p $symtree
|
||
|
|
fi
|
||
|
|
|
||
|
|
|
||
|
|
# Remove all old symlinks in $symtree directory.
|
||
|
|
cd $symtree
|
||
|
|
for i in `find -type l`; do
|
||
|
|
if test "x`readlink $i | grep $quakedir`" != x; then
|
||
|
|
echo "Removing symlink $i"
|
||
|
|
rm -f $i
|
||
|
|
fi
|
||
|
|
done
|
||
|
|
|
||
|
|
# build the symlink tree
|
||
|
|
cd $quakedir
|
||
|
|
for i in `find -type d -maxdepth 1`; do
|
||
|
|
files=`find $i \! -type d`
|
||
|
|
for j in $files; do
|
||
|
|
oldj=$j
|
||
|
|
j=`echo "$j" | tr A-Z a-z`
|
||
|
|
mkdir -p $symtree/`dirname $j`
|
||
|
|
ln -s "$quakedir/$oldj" $symtree/$j
|
||
|
|
done
|
||
|
|
done
|
||
|
|
|
||
|
|
# Remove any empty directories.
|
||
|
|
cd $symtree
|
||
|
|
find -type d | xargs rmdir 2>/dev/null
|
||
|
|
|
||
|
|
# base is special, we need to handle that ourselves
|
||
|
|
rm -f base
|
||
|
|
ourbase=`readlink /etc/alternatives/quake-game-base`
|
||
|
|
echo "ourbase $ourbase"
|
||
|
|
echo "basename of ourbase `basename $ourbase`"
|
||
|
|
ln -s `basename $ourbase` base
|
||
|
|
|
||
|
|
$0.real $@
|
||
|
|
|