• <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>
    • 軟件測試技術
    • 軟件測試博客
    • 軟件測試視頻
    • 開源軟件測試技術
    • 軟件測試論壇
    • 軟件測試沙龍
    • 軟件測試資料下載
    • 軟件測試雜志
    • 軟件測試人才招聘
      暫時沒有公告

    字號: | 推薦給好友 上一篇 | 下一篇

    CVS-RCS(4)

    發布: 2007-6-21 12:06 | 作者:   | 來源:   | 查看: 18次 | 進入軟件測試論壇討論

    領測軟件測試網

       
      4.3 scommit

    注意 : Korn shell /bin/ksh 在你從Linux CD-ROM 安裝 pdksh*.rpm 時就會產


    請把他存成一般文字檔并改變存取權限 chmod a+rx
    _________________________________________________________________

    #!/bin/ksh
    # CVS program scommit
    # Program to commit the changes and check in the file into CVS

    cmdname=`basename $0`

    Usage()
    {
    print "\nUsage: $cmdname [-r revision_number] "
    print "The options -r are optional "
    print "For example - "
    print " $cmdname -r 1.1 foo.cpp"
    print " $cmdname foo.cpp "
    print " "
    }

    # Command getopt will not supported in next major release.
    # Use getopts instead.
    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

    hme=` echo $HOME | cut -f1 -d' ' `
    if [ "$hme" = "" ]; then
    print "\nError: \$HOME is not set!!\n"
    exit
    fi

    # Find sub-directory
    cur_dir=`pwd`
    #echo $cur_dir
    len=${#hme}
    len=$(($len + 2))
    #echo $len
    subdir=` echo $cur_dir | cut -b $len-2000 `
    #echo $subdir
    if [ "$subdir" = "" ]; then
    fdname=$1
    else
    fdname=$subdir"/"$1
    fi

    # If file is already checked out by another user....
    cvs_root=` echo $CVSROOT | cut -f1 -d' ' `
    if [ "$cvs_root" = "" ]; then
    print "\nError: \$CVSROOT is not set!!\n"
    exit
    fi
    cldir=$CVSROOT/$subdir/Locks
    mkdir $cldir 2>/dev/null

    # Get the working revision number of the file....
    # Use tmpfile as the arg cannot be set inside the sub-shell
    tmpfile=$hme/sedit-lock.tmp
    \rm -f $tmpfile 2>/dev/null
    if [ "$FLAG1" = "" ]; then
    (
    cd $hme
    cvs status $fdname 2>/dev/null | grep "Working revision:" | awk '{print
    $3}' >$tmpfile
    )
    OARG1=`cat $tmpfile`
    \rm -f $tmpfile 2>/dev/null
    fi

    if [ "$OARG1" = "" ]; then
    print "The file $fdname is NEW, it is not in the CVS repository"
    else
    lockfile=$cldir/$1-$OARG1
    if [ -e $lockfile ]; then
    # Check if this revision is owned by you...
    aa=` ls -l $lockfile | awk '{print $3}' `
    userid=`id | cut -d'(' -f2 | cut -d')' -f1 `
    if [ "$aa" != "$userid" ]; then
    print " "
    print "The file $fdname is NOT locked by you!!"
    print "It is locked by unix user name $aa and your logi
    n name is $userid"
    # print "If you are working concurrently with other devel
    oper"
    # print "and you used -F option with sedit."
    print "You need to wait untill other developer does sco
    mmit"
    print "or sunlock"
    print "Aborting the $cmdname ...."
    print " "
    exit 2
    fi
    else
    if [ -f $CVSROOT/$subdir/$1,v ]; then
    print "You did not lock the file $fdname with sedit!!"
    print "Aborting the $cmdname ...."
    exit 2
    else
    print "\nThe file $fdname does not exist in CVS reposit
    ory yet!!"
    print "You should have done sadd on $fdname ...."
    fi
    fi
    fi

    if [ -d $1 ]; then
    Usage
    exit 2
    # Do not allow directory commits for now ...
    #cvs commit
    else
    cvs commit $1
    exit_status=$?
    fi

    if [ $exit_status -eq 0 ]; then
    print "\nDone $cmdname. $cmdname successful"
    #print "\nTip (Usage): $cmdname \n"
    fi

    延伸閱讀

    文章來源于領測軟件測試網 http://www.kjueaiud.com/


    關于領測軟件測試網 | 領測軟件測試網合作伙伴 | 廣告服務 | 投稿指南 | 聯系我們 | 網站地圖 | 友情鏈接
    版權所有(C) 2003-2010 TestAge(領測軟件測試網)|領測國際科技(北京)有限公司|軟件測試工程師培訓網 All Rights Reserved
    北京市海淀區中關村南大街9號北京理工科技大廈1402室 京ICP備10010545號-5
    技術支持和業務聯系:info@testage.com.cn 電話:010-51297073

    軟件測試 | 領測國際ISTQBISTQB官網TMMiTMMi認證國際軟件測試工程師認證領測軟件測試網

    老湿亚洲永久精品ww47香蕉图片_日韩欧美中文字幕北美法律_国产AV永久无码天堂影院_久久婷婷综合色丁香五月

  • <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>