Return to rcsclean.sh CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / new / rcs / src

Annotation of 43BSDTahoe/new/rcs/src/rcsclean.sh, revision 1.1.1.1

1.1       root        1: #! /bin/sh
                      2: #
                      3: # RCS cleanup operation.
                      4: # $Header: /arthur/src/local/bin/rcs/src/RCS/rcsclean.sh,v 1.5 86/07/03 13:09:55 jdl Exp $
                      5: #
                      6: # This program removes working files which are copies of the latest
                      7: # revision on the default branch of the corresponding RCS files.
                      8: # For each file given, rcsclean performs a co operation for the latest
                      9: # revision on the default branch, and compares
                     10: # the result with the working file. If the two are identical,
                     11: # the working file is deleted.
                     12: #
                     13: # A typical application in a Makefile would be:
                     14: # clean:;       rm *.o; rcsclean *.c *.o
                     15: #
                     16: # Limitation: This program doesn't work if given the name of
                     17: # an RCS file rather than the name of the working file.
                     18: 
                     19: PATH=/usr/new/bin:/usr/local/bin:/bin:/usr/bin:/usr/ucb
                     20: export PATH
                     21: progname=$0
                     22: if [ $# = 0 ] ; then
                     23:     echo        "usage: $progname file ..."
                     24:     echo        "removes all working files that are checked in and are unchanged"
                     25:     exit  0
                     26: fi
                     27: TMPFILE=/tmp/rcscl$$.tmp
                     28: while test $# -gt 0 ; do
                     29:     if test -f $1 ; then
                     30:        co -p -q $1 > $TMPFILE
                     31:        if [ $? = 0 ] ; then
                     32:            cmp -s $1 $TMPFILE
                     33:            if [ $? = 0 ] ; then
                     34:                chmod +w $1; rm -f $1; rcs -u -q $1
                     35:            fi
                     36:        fi
                     37:     fi
                     38:     shift
                     39: done
                     40: rm -f $TMPFILE

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.