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 )