Naprej Nazaj Kazalo

31. sfreeze

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 sfreeze
# Program za zamrznitev in odrez izdaje izvornega drevesa iz 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 simbolicna_oznaka <ime imenika> "

        print "\nNa primer: - "
        print "   cd \$HOME"
        print "   $cmdname  REVIZIJA_1   moj_imenik_z_izvorno_kodo_projekta"
        print "Za prikaz seznama revizij izvedite -"
        print "slog <ime_datoteke>, zapomnite si simbolicno ime in izvedite -"
        print "cvs history -T"

        print "\nDa naredite stranski poganjek iz glavnega debla, uporabite"
        print "izbiri -b in -r, ki naredita oznako kot oznako veje. To je"
        print "koristno za izdelavo popravkov prej izdane programske opreme"
        print "Na primer :- "
        print "   cd \$HOME"
        print "   cvs rtag -b -r REVIZIJA_1 REVIZIJA_1_1 moj_imenik_z_izvorno_kodo_projekta"
        print " "

#       print "\nInformacija o oznaki se nahaja v \$CVSROOT/CVSROOT/taginfo,v"
#       print "Lahko izvedete - cd $HOME; sget CVSROOT"
#       print "da vidite to datoteko"
        exit
}

# Ukaz getopt ne bo vec podprt v naslednji izdaji. 
# 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 2 ]; then
        Usage
fi

if [ ! -d $2 ]; then
        print "\nNapaka: drugi argument $2 ni imenik!"
        print "          Opuscam $cmdname...."
        print " "
        exit
fi

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

cur_dir=`pwd`
len=${#homedir}
len=$(($len + 2))
subdir=` echo $cur_dir | cut -b $len-2000 `
#echo "subdir is : " $subdir

# imenik CVS v lokalnem imeniku je nujen za delovanje 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 s sget narediti CVS v lokalnem imeniku
                (
                        cd "$homedir"
                        if [ "$subdir" = "." ]; then  # ne uporabljaj pik, ker lahko zmedejo CVS
                                cvs -r checkout -A $tmpbb
                        else
                                cvs -r checkout -A "$subdir/$tmpbb"
                        fi
                )
        fi
fi

if [ "$cur_dir" != "$homedir" ]; then
        print "\nNe nahajate se v domacem imeniku $homedir!!"
        print "Izvesti morate ukaz sfreeze"
        print "iz domacega imenika $homedir."
        exit
fi

# cvs rtag symbolic_tag <directory name>
cvs rtag $1 $2

print "\nKoncan $cmdname. $cmdname uspesen."


Naprej Nazaj Kazalo