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 sedit
# Program za prevzem datotek iz CVS v načinu branje in pisanje z zaklepanjem
# 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] [-F] <ime_datoteke>"
# print "Izbiri -r, -F sta neobvezni"
# print "Izbira -F prisili k urejanju tudi, ce je datoteko "
# print "nekdo ze zaklenil"
print "\nUporaba: $cmdname [-r stevilka_revizije] <ime_datoteke>"
print "Izbira -r je neobvezna "
print "Na primer - "
print " $cmdname -r 1.1 foo.cpp"
print " $cmdname foo.cpp "
# print " $cmdname -F foo.cpp "
print " "
}
# Ukaz getopt ne bo vec podprt v naslednji izdaji.
# Namesto njega uporabimo getopts.
#while getopts r:F ii
while getopts r: ii
do
case $ii in
r) FLAG1=$ii; OARG1="$OPTARG";;
# F) FLAG2=$ii; OARG2="$OPTARG";;
?) Usage; exit 2;;
esac
done
shift ` expr $OPTIND - 1 `
#echo FLAG1 = $FLAG1 , OARG1 = $OARG1
if [ $# -lt 1 ]; then
Usage
exit
fi
homedir=` echo $HOME | cut -f1 -d' ' `
if [ "$homedir" = "" ]; then
print "\nNapaka: spremenljivka \$HOME ni nastavljena!!\n"
exit
fi
bkextn=sedit_bak
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
if [ ! -e "$CVSROOT/$subdir/$fname,v" ]; then
print "\nNapaka: datoteke $fname ni v skladiscu CVS!!\n"
exit
fi
# Imenik CVS v vasem lokalnem imeniku je nujno potreben za delovanje vseh 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 izdelati CVS in 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
# Dobi stevilko revizije datoteke....
# Uporabi tmpfile ker argumentov ni mogoce nastavljati znotraj podlupine.
tmpfile=$homedir/sedit-lock.tmp
\rm -f $tmpfile 2>/dev/null
if [ "$FLAG1" = "" ]; then
(
cd $homedir
if [ "$subdir" = "." ]; then # ne uporabi pike, ki lahko zmede CVS
cvs log $fname | head -6 | grep head: | awk '{print $2}' > $tmpfile
else
cvs log "$subdir/$fname" | head -6 | grep head: | awk '{print $2}' > $tmpfile
fi
)
OARG1=`cat $tmpfile`
\rm -f $tmpfile 2>/dev/null
fi
lockfile="$CVSROOT/$subdir/Locks/$fname-$OARG1"
#echo "lockfile je : " $lockfile
#if [ -e $lockfile -a "$FLAG2" = "" ]; then
if [ -e $lockfile ]; then
print "\nNapaka: Datoteka $fname revizije $OARG1 je ze zaklenjena!!"
aa=` ls -l $lockfile | awk '{print "Zaklenil jo je " $3}' `
print $aa
print "Ta razvijalec naj izvede scommit ALI sunlock, da jo bo odklenil."
print " "
# print "Uporabite lahko tudi izbiro -F, da prisilite datoteko k urejanju,"
# print "tudi ce jo je kdo drug zaklenil. Toda najprej se morate"
# print "z njim pogovoriti, da lahko z datoteko delata hkrati."
# print "Na primer - ta moznost je koristna, ce delate na loceni"
# print "funkctiji v jeziku C++ v datoteki, ki ne moti ostalih"
# print "razvijalcev."
# print " "
exit
fi
# Sedaj dobi kopijo samo za branje....
if [ ! -e "$HOME/$subdir/$fname" ]; then
(
cd $homedir
if [ "$subdir" = "." ]; then # ne uporabljaj pike, ki lahko zmede CVS
cvs -r checkout $fname 1>/dev/null
else
cvs -r checkout "$subdir/$fname" 1>/dev/null
fi
)
fi
# Preveri, ali datoteka ze obstaja....
tmpaa="$HOME/$subdir/$fname"
if [ -f $tmpaa ]; then
user_perms=" "
group_perms=" "
other_perms=" "
user_perms=`ls -l $tmpaa | awk '{print $tmpaa }' | cut -b3-3 `
group_perms=`ls -l $tmpaa | awk '{print $tmpaa }' | cut -b6-6 `
other_perms=`ls -l $tmpaa | awk '{print $tmpaa }' | cut -b9-9 `
if [ "$user_perms" = "w" -o "$group_perms" = "w" \
-o "$other_perms" = "w" ]; then
print "\nNapaka: datoteko je mogoce spreminjati. Opuscam $cmdname ......"
print " Narediti morate rezervno kopijo, izvesti scommit ali zbrisati datoteko in"
print " poskusiti s $cmdname znova.\n"
exit
fi
#print "\nOpomba: datoteka $tmpaa je samo za branje."
#print "Zato jo prestavljam v $tmpaa.$bkextn ....\n"
\mv -f $tmpaa $tmpaa.$bkextn
chmod 444 $tmpaa.$bkextn
elif [ -d $tmpaa ]; then
print "\nNapaka: $tmpaa je imenik in NE datoteka. Opuscam $cmdname ....\n"
exit
fi
# Naredi podlupino
print "\nSedaj dobivam datoteko $fname iz skladisca CVS ...\n"
(
cd $homedir
# Uporabljam izbiro -A, da zbrisem lepljivo oznako in da dobim
# razlicico glavne revizije
if [ "$FLAG1" = "" ]; then
if [ "$subdir" = "." ]; then # ne uporabljaj pike, ki lahko zmede CVS
cvs -w checkout -A $fname
else
cvs -w checkout -A "$subdir/$fname"
fi
else
if [ "$subdir" = "." ]; then # ne uporabljaj pike, ki lahko zmede CVS
cvs -w checkout -A -$FLAG1 $OARG1 $fname
else
cvs -w checkout -A -$FLAG1 $OARG1 "$subdir/$fname"
fi
fi
)
if [ -e "$HOME/$subdir/$fname" ]; then
# Zaklenjena datoteka je $CVSROOT/$subdir/Locks/$fname-$OARG1
touch $lockfile
if [ -e $lockfile ]; then
print "\nKoncan $cmdname."
else
print "\nUsodna napaka: datoteka $fname revizije $OARG1 ni zaklenjena !!"
print "\nPreverite vzrok za to napako.. pred nadaljevanjem..."
fi
fi
#pwd
#print "\nNasvet: $cmdname <ime_datoteke> \n"