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."