Naprej Nazaj Kazalo

24. sunlock

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 sunlock
# Program za odklepanje datotek, za sprostitev ključavnice, ki jo naredi sedit

# 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 " Izbira -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 `

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

cur_dir=`pwd`
#echo $cur_dir

len=${#homedir}
len=$(($len + 2))
#echo $len

subdir=` echo $cur_dir | cut -b $len-2000 `
#echo "subdir je : " $subdir
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

cvs_root=` echo $CVSROOT | cut -f1 -d' '  `
if [ "$cvs_root" = "" ]; then
        print "\nNapaka: spremenljivka \$CVSROOT ni nastavljena!!\n"
        exit
fi

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 potreben pri vseh ukazih..
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 s pomocjo sget poskusi izdelati CVS
                (
                        cd "$homedir"
                        if [ "$subdir" = "." ]; then  # ne uporabljaj pik, ki lahko zmedejo CVS
                                cvs -r checkout -A $tmpbb
                        else
                                cvs -r checkout -A "$subdir/$tmpbb"
                        fi
                )
        fi
fi

# Ugotovi stevilko zadnje revizije datoteke....
# Uporabi tmpfile ker argumentov ni mogoce nastavljati v podlupini
tmpfile=$homedir/sunlock-lock.tmp
\rm -f $tmpfile 2>/dev/null
if [ "$FLAG1" = "" ]; then
        # Deluj znotraj podlupine - iz korenskega imenika
        (
        cd $homedir
                if [ "$subdir" = "." ]; then  # ne uporabljaj pik, ki lahko zmedejo 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 is : $lockfile
if [ ! -e $lockfile ]; then
        print "\nDatoteke $fname revizije $OARG1 NI zaklenil nihce."
        print " "
        exit
fi

ans=""
while :
do
        print "\n\n********************************************************"
        print "POZOR: $cmdname bo sprostil kljucavnico in omogocil ostalim"
        print "       razvijalcem urejanje datoteke. Svetujemo, da"
        print "       shranite spremembe z ukazom scommit."
        print "*********************************************************"
        print -n "\nAli ste prepricani, da zelite odkleniti datoteko <d/n>? [n]: "
        read ans
        if [ "$ans" = "" -o "$ans" = " " -o "$ans" = "n" -o "$ans" = "N" ]; then
                print "\nOpuscam $cmdname ...."
                exit
        fi
        if [ "$ans" = "d" -o "$ans" = "D" ]; then
                print "\n\n\n\n\n "
                print "POZOR: izgubite lahko vse spremebe, ki ste jih naredili v datoteki!!"
                print -n "Ali ste prepricani? Ali res zelite odkleniti datoteko <d/n>? [n]: "
                read ans
                if [ "$ans" = "d" -o "$ans" = "D" ]; then
                        break
                elif [ "$ans" = "" -o "$ans" = " " -o "$ans" = "n" -o "$ans" = "N" ]; then
                        exit
                else
                        print "\n\nNapacen vnos. Poskusite znova..."
                        sleep 1
                fi
        else
                print "\n\nNapacen vnos. Poskusite znova..."
                sleep 1
        fi
done

if [ -e $lockfile ]; then
        \rm -f $lockfile
        print "\nKoncan $cmdname ."
else
        print "\nDatoteka $fname NI zaklenjena."
        print " "
fi



Naprej Nazaj Kazalo