|
DataMuseum.dkPresents historical artifacts from the history of: Regnecentalen RC-900 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Regnecentalen RC-900 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1445 (0x5a5) Types: TextFile Notes: UNIX file Names: »sccsdiff«
└─⟦b21eee5b0⟧ Bits:30004155/disk3.imd SW95713I 386/ix Software Development System Rel. 2.0 └─⟦b21eee5b0⟧ UNIX Filesystem └─⟦this⟧ »sd/new/usr/bin/sccsdiff«
# Copyright (c) 1984 AT&T # All Rights Reserved # THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF AT&T # The copyright notice above does not evidence any # actual or intended publication of such source code. #ident "@(#)sccsdiff.sh 2.3 - 88/05/26" # DESCRIPTION: # Execute bdiff(1) on two versions of a set of # SCCS files and optionally pipe through pr(1). # Optionally specify bdiff segmentation size. trap "rm -f /tmp/get[abc]$$;exit 1" 0 1 2 3 15 if [ $# -lt 3 ] then echo "Usage: sccsdiff -r<sid1> -r<sid2> [-p] [-s<num-arg>] sccsfile ..." 1>&2 exit 1 fi for i in $@ do case $i in -*) case $i in -r*) if [ ! "$sid1" ] then sid1=`echo $i | sed -e 's/^-r//'` elif [ ! "$sid2" ] then sid2=`echo $i | sed -e 's/^-r//'` fi ;; -s*) num=`echo $i | sed -e 's/^-s//'` ;; -p*) pipe=yes ;; *) echo "$0: unknown argument: $i" 1>&2 exit 1 ;; esac ;; *s.*) files="$files $i" ;; *) echo "$0: $i not an SCCS file" 1>&2 ;; esac done for i in $files do if get -s -p -k -r$sid1 $i > /tmp/geta$$ then if get -s -p -k -r$sid2 $i > /tmp/getb$$ then bdiff /tmp/geta$$ /tmp/getb$$ $num > /tmp/getc$$ fi fi if [ ! -s /tmp/getc$$ ] then if [ -f /tmp/getc$$ ] then echo "$i: No differences" > /tmp/getc$$ else exit 1 fi fi if [ "$pipe" ] then pr -h "$i: $sid1 vs. $sid2" /tmp/getc$$ else cat /tmp/getc$$ fi done trap 0 rm -f /tmp/get[abc]$$