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"