lib-src/vcdiff

   1 #! /bin/sh
   2 #
   3 # Enhanced sccs diff utility for use with vc mode.
   4 # This version is more compatible with rcsdiff(1).
   5 #
   6 # Copyright (C) 1992, 1993, 1995, 1997, 2001, 2002, 2003, 2004, 2005,
   7 #   2006, 2007, 2008  Free Software Foundation, Inc.
   8
   9 # This file is part of GNU Emacs.
  10
  11 # GNU Emacs is free software: you can redistribute it and/or modify
  12 # it under the terms of the GNU General Public License as published by
  13 # the Free Software Foundation, either version 3 of the License, or
  14 # (at your option) any later version.
  15
  16 # GNU Emacs is distributed in the hope that it will be useful,
  17 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  18 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19 # GNU General Public License for more details.
  20
  21 # You should have received a copy of the GNU General Public License
  22 # along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.
  23
  24
  25 DIFF="diff"
  26 usage="$0: Usage: vcdiff [--brief] [-q] [-r<sid1>] [-r<sid2>] [diffopts] sccsfile..."
  27
  28 # Now that we use `sccs get' rather than just `get', we don't need this.
  29 # PATH=$PATH:/usr/ccs/bin:/usr/sccs:/usr/xpg4/bin # common SCCS hangouts
  30
  31 echo="echo"
  32 sid1= sid2=
  33
  34 for f
  35 do
  36         case $f in
  37         -*)
  38                 case $f in
  39                 --brief)
  40                         DIFF=cmp;;
  41                 -q)
  42                         echo=:;;
  43                 -r?*)
  44                         case $sid1 in
  45                         '')
  46                                 sid1=$f
  47                                 ;;
  48                         *)
  49                                 case $sid2 in
  50                                 ?*) echo "$usage" >&2; exit 2 ;;
  51                                 esac
  52                                 sid2=$f
  53                                 ;;
  54                         esac
  55                         ;;
  56                 *)
  57                         options="$options $f"
  58                         ;;
  59                 esac
  60                 shift
  61                 ;;
  62         *)
  63                 break
  64                 ;;
  65         esac
  66 done
  67
  68 case $# in
  69 0)
  70         echo "$usage" >&2
  71         exit 2
  72 esac
  73
  74
  75 rev1= rev2= status=0
  76 trap 'status=2; exit' 1 2 13 15
  77 trap 'rm -f $rev1 $rev2 || status=2; exit $status' 0
  78
  79 for f
  80 do
  81         s=2
  82
  83         case $f in
  84         s.* | */s.*)
  85                 if
  86                         rev1=`mktemp /tmp/geta.XXXXXXXX`
  87                         sccs get -s -p -k $sid1 "$f" > $rev1 &&
  88                         case $sid2 in
  89                         '')
  90                                 workfile=`expr " /$f" : '.*/s.\(.*\)'`
  91                                 ;;
  92                         *)
  93                                 rev2=`mktemp /tmp/getb.XXXXXXXX`
  94                                 sccs get -s -p -k $sid2 "$f" > $rev2
  95                                 workfile=$rev2
  96                         esac
  97                 then
  98                         $echo $DIFF $options $rev1 $workfile >&2
  99                         $DIFF $options $rev1 $workfile
 100                         s=$?
 101                 fi
 102                 ;;
 103         *)
 104                 echo "$0: $f is not an SCCS file" >&2
 105         esac
 106
 107         if test $status -lt $s
 108         then status=$s
 109         fi
 110 done
 111
 112 # arch-tag: 4344ba3a-bcbe-4f77-971c-f43c1606953a