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 scommit
# Program za udejanjenje sprememb in vnos datotek v 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`
Usage()
{
print "\nUporaba: $cmdname [-r stevilka_revizije] <ime_datoteke>"
print "Moznost -r je neobvezna"
print "Na primer - "
print " $cmdname -r 1.1 foo.cpp"
print " $cmdname foo.cpp "
print " "
}
# Ukaz getopt v naslednji izdaji ne bo vec podprt.
# Namesto njega uporabljam getopts.
while getopts r: ii
do
case $ii in
r) FLAG1=$ii; OARG1="$OPTARG";;
?) Usage; exit 2;;
esac
done
shift ` expr $OPTIND - 1 `
#echo FLAG1 = $FLAG1 , OARG1 = $OARG1
if [ $# -lt 1 ]; then
Usage
exit 2
fi
if [ -d $1 ]; then
Usage
exit 2
fi
homedir=` echo $HOME | cut -f1 -d' ' `
if [ "$homedir" = "" ]; then
print "\nNapaka: spremenljivka \$HOME ni nastavljena!!\n"
exit
fi
# Poisci podimenik
cur_dir=`pwd`
#echo $cur_dir
len=${#homedir}
len=$(($len + 2))
#echo $len
subdir=` echo $cur_dir | cut -b $len-2000 `
tmpaa=`dirname $1`
if [ "$tmpaa" = "." ]; then
fname=$1
if [ "$subdir" = "" ]; then
subdir=$tmpaa
fi
else
fname=`basename $1`
if [ "$subdir" = "" ]; then
subdir=$tmpaa
else
subdir="$subdir/$tmpaa"
fi
fi
# echo "subdir je : " $subdir
# echo "fname je : " $fname
# Ce je datoteko ze kdo prevzel....
cvs_root=` echo $CVSROOT | cut -f1 -d' ' `
if [ "$cvs_root" = "" ]; then
print "\nNapaka: spremenljivka \$CVSROOT ni nastavljena!!\n"
exit
fi
mkdir -p "$CVSROOT/$subdir/Locks" 2>/dev/null
# pri vseh ukazih je zahtevan imenik CVS v vasem lokalnem imeniku...
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 "Najprej morate izvesti sget na imeniku `basename $subdir`. Podajte -"
print " cd $homedir/`dirname $subdir` "
print " sget `basename $subdir` "
exit
else
# Sedaj poskusi izdelati CVS v lokalnem imeniku s sget
(
cd "$homedir"
if [ "$subdir" = "." ]; then # ne uporabljaj pike, ki lahko zmede CVS
cvs -r checkout -A $tmpbb
else
cvs -r checkout -A "$subdir/$tmpbb"
fi
)
fi
fi
# Ugotovi stevilko delovne revizije za datoteko....
# Uporaba tmpfile kot argumenta se ne more nastaviti znotraj podlupine
tmpfile=$homedir/sedit-lock.tmp
\rm -f $tmpfile 2>/dev/null
if [ "$FLAG1" = "" ]; then
(
cd $homedir
if [ "$subdir" = "." ]; then # ne uporabljaj pike, ki lahko zmede CVS
cvs status $fname 2>/dev/null | grep "Working revision:" | awk '{print $3}' >$tmpfile
else
cvs status "$subdir/$fname" 2>/dev/null | grep "Working revision:" | awk '{print $3}' >$tmpfile
fi
)
OARG1=`cat $tmpfile`
\rm -f $tmpfile 2>/dev/null
fi
if [ "$OARG1" = "" ]; then
print "Datoteka $subdir/$fname je NOVA, zato je ni v skladiscu CVS."
else
lockfile="$CVSROOT/$subdir/Locks/$fname-$OARG1"
if [ -e $lockfile ]; then
# Preveri, ali revizija pripada vam...
aa=` ls -l $lockfile | awk '{print $3}' `
userid=`id | cut -d'(' -f2 | cut -d')' -f1 `
if [ "$aa" != "$userid" ]; then
print " "
print "Datoteke $subdir/$fname NISTE zaklenili vi!!"
print "Zaklenil jo je uporabnik $aa , vase uporabnisko ime pa je $userid ."
# print "Ce delate socasno z drugim razvijalcem"
# print "in ste pri sedit uporabili izbiro -F,"
print "morate pocakati, da drug razvijalec izvede scommit"
print "ali sunlock."
print "Opuscam $cmdname ...."
print " "
exit 2
fi
else
# Datoteka mora obstajati v CVS
if [ -f "$CVSROOT/$subdir/$fname,v" ]; then
print "Datoteke $subdir/$fname niste zaklenili s sedit!!"
print "Opuscam $cmdname ...."
exit 2
else
print "\nDatoteke $subdir/$fname se ni v skladiscu CVS!!"
print "Na datoteki $subdir/$fname bi morali izvesti sadd...."
exit 2
fi
fi
fi
# Deluj znotraj podlupine - in deluj iz korenskega imenika
(
cd $homedir
# Za zadaj ne dovoli udejanjanj imenikov ...
#if [ -d "$subdir/$fname" ]; then
# cvs commit "$subdir/$fname"
#fi
if [ "$subdir" = "." ]; then # ne uporabljaj oike, ki lahko zmede CVS
cvs commit $fname
else
cvs commit "$subdir/$fname"
fi
exit_status=$?
if [ $exit_status -eq 0 ]; then
lockfile="$CVSROOT/$subdir/Locks/$fname-$OARG1"
if [ -e $lockfile ]; then
\rm -f $lockfile
fi
# Potrebno je spremeniti dovoljenja datoteke za primer,
# ko ni sprememb datoteke
chmod a-w "$HOME/$subdir/$fname"
print "\nKoncan $cmdname. $cmdname uspesen."
#print "\nNasvet: $cmdname <ime datoteke/imenika>\n"
fi
)