Opomba : Lupino Korn /bin/ksh dobite z namestitvijo paketa pdksh*.rpm s CDja Linux contrib
Shranite to datoteko kot tekstovno datoteko in na njej izvedite chmod a+rx.
#!/bin/ksh
# CVS program sdelete
# Program za brisanje datotek iz CVS
# Vsako ime datoteke se sestoji iz treh delov: domačega imenika, podimenika
# in imena datoteke. Polna pot do datoteke je tako $HOME/$subdir/$fname.
# V CVS se ohrani enaka struktura imenikov (z vpeljavo spremenljivke
# $subdir), torej se bo pot v CVS glasila $CVSROOT/$subdir/$fname.
# V tem programu igrajo 4 spremenljivke ($HOME, $CVSROOT, $subdir in $fname)
# pomembno vlogo. Na primer, vzorčne vrednosti so lahko:
# HOME=/home/aldev, subdir=myproject/src CVSROOT=/home/cvsroot
# in fname=foo.cpp
# Pozor: Uporabljajte dvojne narekovaje, da se bodo v vrednostih spremenljivk
# ohranili presledki, npr. "$HOME/$subdir", če je $subdir enak 'some foo.cpp'
cmdname=`basename $0`
if [ $# -lt 1 ]; then
print "\nUporaba: $cmdname <ime_datoteke> \n"
exit
fi
homedir=` echo $HOME | cut -f1 -d' ' `
if [ "$homedir" = "" ]; then
print "\nNapaka: spremenljivka \$HOME ni nastavljena!!\n"
exit
fi
cur_dir=`pwd`
len=${#homedir}
len=$(($len + 2))
subdir=` echo $cur_dir | cut -b $len-2000 `
#echo "subdir is : " $subdir
tmpaa=`dirname "$onearg" `
if [ "$tmpaa" = "." ]; then
fname="$onearg"
if [ "$subdir" = "" ]; then
subdir=$tmpaa
fi
else
fname=`basename "$onearg" `
if [ "$subdir" = "" ]; then
subdir=$tmpaa
else
subdir="$subdir/$tmpaa"
fi
fi
#echo "subdir je : " $subdir
#echo "fname je : " $fname
# imenik CVS v lokalnem imeniku je nujen za delovanje ukazov..
if [ ! -d "$homedir/$subdir/CVS" ]; then
#tmpaa=` (cd "$CVSROOT/$subdir"; find * -prune -type f -print | head -1 ) `
tmpaa=` (cd "$CVSROOT/$subdir"; find * -maxdepth 0 -type f -print | head -1 ) `
tmpbb=`basename $tmpaa | cut -d',' -f1 `
if [ "$tmpaa" = "" -o ! -f "$CVSROOT/$subdir/$tmpbb,v" ]; then
print "\nImenik $homedir/$subdir/CVS ne obstaja."
print "Na imeniku `basename $subdir` morate izvesti sget. Podajte -"
print " cd $homedir/`dirname $subdir` "
print " sget `basename $subdir` "
exit
else
# Sedaj poskusi s sget narediti CVS v lokalnem imeniku
(
cd "$homedir"
if [ "$subdir" = "." ]; then # nu uporabljaj pik, ker lahko zmedejo CVS
cvs -r checkout -A $tmpbb
else
cvs -r checkout -A "$subdir/$tmpbb"
fi
)
fi
fi
# Deluj znotraj podlupine ...
(
cd $homedir
# Check if file does not exist....
if [ ! -f "$subdir/$fname" ]; then
# Poskusi dobiti datoteko iz CVS
sget "$subdir/$fname"
if [ ! -f "$subdir/$fname" ]; then
print "\nNapaka: $subdir/$fname NE obstaja v skladiscu CVS."
print "\nKoncujem $cmdname ......"
exit
fi
fi
bkextn=cvs_sdelete_safety_backup
\mv -f "$subdir/$fname" "$subdir/$fname.$bkextn"
cvs remove "$subdir/$fname"
print "\nUkaz sdelete odstrani datoteko iz skladisca CVS"
print "in jo arhivira v imenik CVS Attic. V primeru,da v prihodnosti"
print "potrebujete to datoteko, vzpostavite stik z administratorjem CVS."
print " "
print "\nKoncan $cmdname. $cmdname uspesen"
print "Izvedite scommit na imeniku $homedir/$subdir/$fname , da"
print "bo ta sprememba stalna."
\mv -f "$subdir/$fname.$bkextn" "$subdir/$fname"
)