Add Change Bars to troff output (1 of 1)

[Jim Hutchison]

#! /bin/sh
# This is a shell archive.  Remove anything before this line, then unpack
# it by saving it into a file and typing "sh file".  To overwrite existing
# files, type "sh file -c".  You can also feed this as standard input via
# unshar, or by typing "sh <file", e.g..  If this archive is complete, you
# will see the following message at the end:
#		"End of shell archive."
# Contents:  add_cb.doc add_cb.c
#
#	-rw-r--r--  1 hutch        2138 Nov 16 13:39 add_cb.c
#	-rw-r--r--  1 hutch        1068 Nov 16 13:40 add_cb.doc
#
#	34282     3 add_cb.c
#	39821     2 add_cb.doc
#
# Wrapped by hutch at dreamit on Fri Nov 16 13:40:54 1990
PATH=/bin:/usr/bin:/usr/ucb ; export PATH
if test -f 'add_cb.doc' -a "${1}" != "-c" ; then 
  echo shar: Will not clobber existing file \"'add_cb.doc'\"
else
echo shar: Extracting \"'add_cb.doc'\" \(1068 characters\)
sed "s/^X//" >'add_cb.doc' <<'END_OF_FILE'
X
X    add_cb	-- Add change bars to troff output (Public Domain)
X
XAdd_cb adds change bars to documents or other troff source, based on 'diff'
Xoutput.  I've tested it with documents and vgrind output, and found it to
Xwork satisfactorily.
X
XIt does expect diff output to look something like:
X<non-numeric>anything
X#,#a#
X<non-numeric>anything
X#,#a#,#
X<non-numeric>anything
X#,#c#
X<non-numeric>anything
X#,#c#,#
X<non-numeric>anything
X
XWhich is normal for most default /bin/diff output (atleast on an FPS model
X500 or Sun.  If your system is different, or you want to use a different
Xsymbol for change bars, the code is short and easy to modify.  You will want
Xto modify it if you have lines longer than 1024 bytes.
X
XTo compile:
X    cc -o add_cb add_cb.c
X
XUsage examples:
X    diff old.ms new.ms | add_cb new.ms | ditroff -ms
X
X    rcsdiff new.me  | add_cb new.me | ditroff -me
X
X    ( echo .vS ; rcsdiff foo.c | add_cb foo.c ; echo .vE ) |\
X	vgrind -n -s10 -f -t | dtroff -ms
X
XPlease feel free to send me Email if you run across any bugs.
X
X    Jim Hutchison	hutch at rawfish.fps.com
END_OF_FILE
if test 1068 -ne `wc -c <'add_cb.doc'`; then
    echo shar: \"'add_cb.doc'\" unpacked with wrong size!
fi
# end of 'add_cb.doc'
fi
if test -f 'add_cb.c' -a "${1}" != "-c" ; then 
  echo shar: Will not clobber existing file \"'add_cb.c'\"
else
echo shar: Extracting \"'add_cb.c'\" \(2138 characters\)
sed "s/^X//" >'add_cb.c' <<'END_OF_FILE'
X/* Public Domain Change Bar utility
X**
X** Adds change bars to a file, based on /bin/diff output
X**
X** To compile:
X**    cc -o add_cb add_cb.c
X**
X** Usage examples:
X**    diff old.ms new.ms | add_cb new.ms | ditroff -ms
X**
X**    rcsdiff new.me  | add_cb new.me | ditroff -me
X**
X**    ( echo .vS ; rcsdiff foo.c | add_cb foo.c ; echo .vE ) |\
X**	vgrind -n -s10 -f -t | dtroff -ms
X**
X** Please feel free to send me Email if you run across any bugs.
X**
X**    Jim Hutchison	hutch at rawfish.fps.com
X*/
X#include <stdio.h>
X#include <ctype.h>
X#include <sys/types.h>
X
X#define BEGIN_CHANGE	".mc \\fB\\s18|\\s0\\fR 2"
X#define END_CHANGE	".mc"
X
Xmain(argc, argv)
X    int argc;
X    char **argv;
X{
X    char buf[1024];
X    int a, b;
X    register FILE *fp;
X    register u_int start, end, idx, cnt;
X    register char *bp = buf, *cp;
X
X    if (argc < 2) {
X	fprintf(stderr, "Usage: diff old new | add_cb new > foo\n");
X	fprintf(stderr, "       rcsdiff new  | add_cb new > foo\n");
X	exit(-1);
X    }
X
X    if ((fp = fopen(argv[1], "r")) == NULL)
X	perror(argv[1]), exit(-1);
X
X    start = end = -1;
X    idx = 1;
X    while (!feof(fp)) {
X	while (fgets(bp, sizeof(buf), stdin) != NULL) {
X
X	    /* Look for a line like:
X	    **	#,#a#
X	    **	#,#a#,#
X	    **	#,#c#
X	    **	#,#c#,#
X	    */
X	    if (isdigit(*bp)) {	/* may be a command */
X		for (cp = bp; cp && *cp != 'a' && *cp != 'c'; cp++)
X		    ;
X		cp++;		/* get to number(s) */
X
X		cnt = sscanf(cp, "%d,%d", &a, &b);
X		if (cnt == 1)
X		    start = end = a;
X		else if (cnt == 2) {
X		    start = a;
X		    end = b;
X		}
X		/* end++;		/* step 1 past the change */
X
X		if (cnt > 0) 	/* got a "change" range */
X		    break;
X	    }
X	}
X
X	for (; idx < start && !feof(fp); idx++)
X	    copyline(fp, stdout);
X
X	if (start == idx)
X	    puts(BEGIN_CHANGE);
X	
X	for (; idx <= end && !feof(fp); idx++)
X	    copyline(fp, stdout);
X
X	if (idx >= end) {
X	    puts(END_CHANGE);
X	    end = (u_int)0x7fffffff;
X	}
X    }
X
X    fclose(fp);
X    exit(0);
X}
X
X/* Copy a line from fin to fout
X*/
Xcopyline(fin, fout)
X    register FILE *fin, *fout;
X{
X    register int c;
X
X    while ((c = getc(fin)) != EOF) {
X	putc(c, fout);
X	if (c == '\n')
X	    break;
X    }
X}
END_OF_FILE
if test 2138 -ne `wc -c <'add_cb.c'`; then
    echo shar: \"'add_cb.c'\" unpacked with wrong size!
fi
# end of 'add_cb.c'
fi
echo shar: End of shell archive.
exit 0
--
-
Jim Hutchison		{dcdwest,ucbvax}!ucsd!fps!hutch
Disclaimer:  I am not an official spokesman for FPS computing