From 4c0a9db684cf999021182a08b5f4fc859b2b22d6 Mon Sep 17 00:00:00 2001 From: Ben Gras Date: Tue, 22 Jun 2010 00:46:55 +0000 Subject: [PATCH] no more minix diff --- commands/Makefile | 4 +- commands/cdiff/Makefile | 4 - commands/cdiff/cdiff.c | 365 ------------ commands/diff/Makefile | 4 - commands/diff/diff.c | 1254 --------------------------------------- 5 files changed, 2 insertions(+), 1629 deletions(-) delete mode 100644 commands/cdiff/Makefile delete mode 100644 commands/cdiff/cdiff.c delete mode 100644 commands/diff/Makefile delete mode 100644 commands/diff/diff.c diff --git a/commands/Makefile b/commands/Makefile index 42f26b6b7..db7413865 100644 --- a/commands/Makefile +++ b/commands/Makefile @@ -5,11 +5,11 @@ SUBDIR= aal add_route adduser advent arp ash at autil awk \ backup badblocks banner basename bigmake binpackage \ binpackages binsizes bzip2 bzip2recover cal calendar \ - cat cawf cd cdiff cdprobe checkhier chmem \ + cat cawf cd cdprobe checkhier chmem \ chmod chown chroot ci cksum cleantmp clear cmp co \ comm compress cp crc cron crontab cut datasizes date \ dd de decomp16 DESCRIBE dev2name devsize df dhcpd \ - dhrystone diff dirname dis88 du dumpcore easypack \ + dhrystone dirname dis88 du dumpcore easypack \ ed eject elle elvis env expand factor file \ find finger fingerd fix fold format fortune fsck \ fsck1 ftp101 ftpd200 getty grep gomoku head host \ diff --git a/commands/cdiff/Makefile b/commands/cdiff/Makefile deleted file mode 100644 index 902e00df6..000000000 --- a/commands/cdiff/Makefile +++ /dev/null @@ -1,4 +0,0 @@ -PROG= cdiff -MAN= - -.include diff --git a/commands/cdiff/cdiff.c b/commands/cdiff/cdiff.c deleted file mode 100644 index e8eaa0ab9..000000000 --- a/commands/cdiff/cdiff.c +++ /dev/null @@ -1,365 +0,0 @@ -/* cdiff - context diff Author: Larry Wall */ - -/* Cdiff - turns a regular diff into a new-style context diff - * - * Usage: cdiff file1 file2 - */ - -#define PATCHLEVEL 2 - -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - -char buff[512]; - -FILE *inputfp, *oldfp, *newfp; - -int oldmin, oldmax, newmin, newmax; -int oldbeg, oldend, newbeg, newend; -int preoldmax, prenewmax; -int preoldbeg, preoldend, prenewbeg, prenewend; -int oldwanted, newwanted; - -char *oldhunk, *newhunk; -char *progname; -size_t oldsize, oldalloc, newsize, newalloc; - -_PROTOTYPE(int main, (int argc, char **argv)); -_PROTOTYPE(void dumphunk, (void)); -_PROTOTYPE(char *getold, (int targ)); -_PROTOTYPE(char *getnew, (int targ)); -_PROTOTYPE(void *xmalloc, (size_t size)); -_PROTOTYPE(void *xrealloc, (void *ptr, size_t size)); - -#define Nullfp (FILE*)0 -#define Nullch (char*)0 -#define ENOUGH (NAME_MAX + PATH_MAX + 1) -#define CRC_END 12 - -int main(argc, argv) -int argc; -char **argv; -{ - FILE *crcfp; - char *old, *new; - int context = 3; - struct stat statbuf; - register char *s; - char op; - char *newmark, *oldmark; - char sysbuf1[ENOUGH], sysbuf2[ENOUGH]; - int len; - char *line; - int i; - int status; - - progname = argv[0]; - oldalloc = 512; - oldhunk = (char *) xmalloc(oldalloc); - newalloc = 512; - newhunk = (char *) xmalloc(newalloc); - - for (argc--, argv++; argc; argc--, argv++) { - if (argv[0][0] != '-') break; - - if (argv[0][1] == 'c') context = atoi(argv[0] + 2); - } - - if (argc != 2) { - fprintf(stderr, "Usage: cdiff old new\n"); - exit(2); - } - old = argv[0]; - new = argv[1]; - - oldfp = fopen(old, "r"); - if (!oldfp) { - fprintf(stderr, "Can't open %s\n", old); - exit(2); - } - newfp = fopen(new, "r"); - if (!newfp) { - fprintf(stderr, "Can't open %s\n", new); - exit(2); - } - - /* Compute crcs by popen()ing crc and reading the output. Do this before - * popen()ing diff to do the work. popen() attempts to support multiple - * clients, but the 1.3-1.6.24b versions don't succeed. - */ - sprintf(sysbuf1, "crc %s", old); - crcfp = popen(sysbuf1, "r"); - if (!crcfp) { - /* The only advantage of cdiff over diff is that it prints crcs, so - * give up easily if crc fails. - */ - fprintf(stderr, "Can't execute crc %s\n", old); - exit(2); - } - fgets(sysbuf1, sizeof(sysbuf1), crcfp); - sysbuf1[CRC_END] = '\0'; - status = pclose(crcfp); - if (status != 0) { - fprintf(stderr, "crc %s returned bad status %d\n", old, status); - exit(2); - } - sprintf(sysbuf2, "crc %s", new); - crcfp = popen(sysbuf2, "r"); - if (!crcfp) { - fprintf(stderr, "Can't execute crc %s\n", new); - exit(2); - } - fgets(sysbuf2, sizeof(sysbuf2), crcfp); - sysbuf2[CRC_END] = '\0'; - status = pclose(crcfp); - if (status != 0) { - fprintf(stderr, "crc %s returned bad status %d\n", new, status); - exit(2); - } - - sprintf(buff, "diff %s %s 2>/dev/null", old, new); - inputfp = popen(buff, "r"); - if (!inputfp) { - fprintf(stderr, "Can't execute diff %s %s\n", old, new); - exit(2); - } - - fstat(fileno(oldfp), &statbuf); - printf("*** %s crc=%s\t%s", old, sysbuf1, ctime(&statbuf.st_mtime)); - fstat(fileno(newfp), &statbuf); - printf("--- %s crc=%s\t%s", new, sysbuf2, ctime(&statbuf.st_mtime)); - - preoldend = -1000; - - while (fgets(buff, sizeof buff, inputfp) != Nullch) { - if (isdigit(*buff)) { - oldmin = atoi(buff); - for (s = buff; isdigit(*s); s++); - if (*s == ',') { - s++; - oldmax = atoi(s); - for (; isdigit(*s); s++); - } else { - oldmax = oldmin; - } - if (*s != 'a' && *s != 'd' && *s != 'c') { - fprintf(stderr, "Unparseable input: %s\n", s); - exit(2); - } - op = *s; - s++; - newmin = atoi(s); - for (; isdigit(*s); s++); - if (*s == ',') { - s++; - newmax = atoi(s); - for (; isdigit(*s); s++); - } else { - newmax = newmin; - } - if (*s != '\n' && *s != ' ') { - fprintf(stderr, "Unparseable input: %s\n", s); - exit(2); - } - newmark = oldmark = "! "; - if (op == 'a') { - oldmin++; - newmark = "+ "; - } - if (op == 'd') { - newmin++; - oldmark = "- "; - } - oldbeg = oldmin - context; - oldend = oldmax + context; - if (oldbeg < 1) oldbeg = 1; - newbeg = newmin - context; - newend = newmax + context; - if (newbeg < 1) newbeg = 1; - - if (preoldend < oldbeg - 1) { - if (preoldend >= 0) { - dumphunk(); - } - preoldbeg = oldbeg; - prenewbeg = newbeg; - oldwanted = newwanted = 0; - oldsize = newsize = 0; - } else { /* we want to append to previous hunk */ - oldbeg = preoldmax + 1; - newbeg = prenewmax + 1; - } - - for (i = oldbeg; i <= oldmax; i++) { - line = getold(i); - if (!line) { - oldend = oldmax = i - 1; - break; - } - len = strlen(line) + 2; - if (oldsize + len + 1 >= oldalloc) { - oldalloc *= 2; - oldhunk = (char *) xrealloc(oldhunk, oldalloc); - } - if (i >= oldmin) { - strcpy(oldhunk + oldsize, oldmark); - oldwanted++; - } else { - strcpy(oldhunk + oldsize, " "); - } - strcpy(oldhunk + oldsize + 2, line); - oldsize += len; - } - preoldmax = oldmax; - preoldend = oldend; - - for (i = newbeg; i <= newmax; i++) { - line = getnew(i); - if (!line) { - newend = newmax = i - 1; - break; - } - len = strlen(line) + 2; - if (newsize + len + 1 >= newalloc) { - newalloc *= 2; - newhunk = (char *) xrealloc(newhunk, newalloc); - } - if (i >= newmin) { - strcpy(newhunk + newsize, newmark); - newwanted++; - } else { - strcpy(newhunk + newsize, " "); - } - strcpy(newhunk + newsize + 2, line); - newsize += len; - } - prenewmax = newmax; - prenewend = newend; - } - } - - if (preoldend >= 0) { - dumphunk(); - } - status = pclose(inputfp); - if (!WIFEXITED(status)) exit(2); - status = WEXITSTATUS(status); - return(status == 0 || status == 1 ? status : 2); -} - -void dumphunk() -{ - int i; - char *line; - int len; - - for (i = preoldmax + 1; i <= preoldend; i++) { - line = getold(i); - if (!line) { - preoldend = i - 1; - break; - } - len = strlen(line) + 2; - if (oldsize + len + 1 >= oldalloc) { - oldalloc *= 2; - oldhunk = (char *) xrealloc(oldhunk, oldalloc); - } - strcpy(oldhunk + oldsize, " "); - strcpy(oldhunk + oldsize + 2, line); - oldsize += len; - } - for (i = prenewmax + 1; i <= prenewend; i++) { - line = getnew(i); - if (!line) { - prenewend = i - 1; - break; - } - len = strlen(line) + 2; - if (newsize + len + 1 >= newalloc) { - newalloc *= 2; - newhunk = (char *) xrealloc(newhunk, newalloc); - } - strcpy(newhunk + newsize, " "); - strcpy(newhunk + newsize + 2, line); - newsize += len; - } - printf("***************\n"); - if (preoldbeg >= preoldend) { - printf("*** %d ****\n", preoldend); - } else { - printf("*** %d,%d ****\n", preoldbeg, preoldend); - } - if (oldwanted) { - printf("%s", oldhunk); - } - oldsize = 0; - *oldhunk = '\0'; - if (prenewbeg >= prenewend) { - printf("--- %d ----\n", prenewend); - } else { - printf("--- %d,%d ----\n", prenewbeg, prenewend); - } - if (newwanted) { - printf("%s", newhunk); - } - newsize = 0; - *newhunk = '\0'; -} - -char *getold(targ) -int targ; -{ - static int oldline = 0; - - while (fgets(buff, sizeof buff, oldfp) != Nullch) { - oldline++; - if (oldline == targ) return buff; - } - return Nullch; -} - -char *getnew(targ) -int targ; -{ - static int newline = 0; - - while (fgets(buff, sizeof buff, newfp) != Nullch) { - newline++; - if (newline == targ) return buff; - } - return Nullch; -} - -void *xmalloc(size) -size_t size; -{ - void *ptr; - - ptr = malloc(size); - if (ptr == NULL) { - fprintf(stderr, "%s: out of memory\n", progname); - exit(2); - } - return(ptr); -} - -void *xrealloc(ptr, size) -void *ptr; -size_t size; -{ - ptr = realloc(ptr, size); - if (ptr == NULL) { - fprintf(stderr, "%s: out of memory\n", progname); - exit(2); - } - return(ptr); -} diff --git a/commands/diff/Makefile b/commands/diff/Makefile deleted file mode 100644 index 5d974e093..000000000 --- a/commands/diff/Makefile +++ /dev/null @@ -1,4 +0,0 @@ -PROG= diff -MAN= - -.include diff --git a/commands/diff/diff.c b/commands/diff/diff.c deleted file mode 100644 index c79d18cdd..000000000 --- a/commands/diff/diff.c +++ /dev/null @@ -1,1254 +0,0 @@ -/* diff - print differences between 2 files Author: Erik Baalbergen */ - -/* Poor man's implementation of diff(1) - no options available -* - may give more output than other diffs, -* due to the straight-forward algorithm -* - runs out of memory if the differing chunks become too large -* - input line length should not exceed LINELEN; longer lines are -* truncated, while only the first LINELEN characters are compared -* -* - Bug fixes by Rick Thomas Sept. 1989 -* -* Please report bugs and suggestions to erikb@cs.vu.nl -*------------------------------------------------------------------------------ -* Changed diff to conform to POSIX 1003.2 ( Draft 11) by Thomas Brupbacher -* ( tobr@mw.lpc.ethz.ch). -* -* To incorporate the context diff option -c in the program, the source code -* for the program cdiff has been copied to the end of this program. Only -* slight modifications for the cdiff code to work within the program diff -* were made( e.g. main() -> context_diff()). -* -* New options: -* -c, -C n where n=0,1,...: -* produces a context diff as the program cdiff. The default is to -* print 3 lines of context, this value can be changed with -C -* ( e.g. -C 5 prints five lines of context.) -* -e : Prints an ed script, so you can convert to with -* the command ed < `diff -e `. -* -b : Causes trailing blanks to be ignored and spaces of multiple blanks -* to be reduced to one blank before comparison. -*----------------------------------------------------------------------------- -*/ - -#include -#include -#include /* NAME_MAX for maximal filename length */ -#include /* string manipulation */ -#include -#include -#include -#include -#include -#include -#include -#include - -/* These definitions are needed only to suppress warning messages. */ -#define Nullfp ((FILE*)0) -#define Nullch ((char*)0) -#define NullStructLine ((struct line *)0) - -#define LINELEN 128 /* max line length included in diff */ - - -#define NOT_SET 0 /* Defines to characterise if a flag */ -#define SET 1 /* is set */ - - /* Indexes of the warning-message array */ -#define EXCLUSIVE_OPTIONS 0 -#define CANNOT_OPEN_FILE 1 - - /* Used to define the mode */ -typedef enum { - undefined, context, ed_mode -} MODE; - - /* Global variables for the 'normal' diff part */ -char *progname; /* program name (on command line) */ -int diffs = 0; /* number of differences */ -MODE mode; /* which mode is used */ -int severe_error; /* nonzero after severe, non-fatal error */ - -/* The following global variables are used with the -r option: - * for every pair of files that are different, a "command line" of the - * form "diff " is printed before the real - * output starts. */ -int firstoutput = 1; /* flag to print one time */ -char options_string[10]; /* string to hold command line options */ -char oldfile[PATH_MAX]; /* first file */ -char newfile[PATH_MAX]; /* second file */ - - - /* Global variables for the command-line options */ -int trim_blanks = NOT_SET; /* SET if -b specified */ -int recursive_dir = NOT_SET; /* SET if -r specified */ -int context_lines = 3; /* numbers of lines in a context */ -static int offset; /* offset of the actual line number for -e */ - - /* Function prototypes for the functions in this file */ -struct f; -_PROTOTYPE(int main, (int argc, char **argv )); -_PROTOTYPE(void process_command_line, (int argc, char **argv )); -_PROTOTYPE(void analyse_input_files, (char *arg1, char *arg2, char *input1, - char *input2 )); -_PROTOTYPE(void diff, (char *filename1, char *filename2 )); -_PROTOTYPE(FILE *check_file, (char *name )); -_PROTOTYPE(void build_option_string, (void )); -_PROTOTYPE(void fatal_error, (char *fmt, char *s )); -_PROTOTYPE(void warn, (int number, char *string )); -_PROTOTYPE(void trimming_blanks, (char *l_text )); -_PROTOTYPE(char *filename, (char *path_string)); -_PROTOTYPE(struct line *new_line, (int size )); -_PROTOTYPE(void free_line, (struct line *l )); -_PROTOTYPE(int equal_line, (struct line *l1, struct line *l2 )); -_PROTOTYPE(int equal_3, (struct line *l1, struct line *l2 )); -_PROTOTYPE(struct line *read_line, (FILE *fp )); -_PROTOTYPE(void advance, (struct f *f )); -_PROTOTYPE(void aside, (struct f *f, struct line *l )); -_PROTOTYPE(struct line *next, (struct f *f )); -_PROTOTYPE(void init_f, (struct f *f, FILE *fp )); -_PROTOTYPE(void update, (struct f *f, char *s )); -_PROTOTYPE(void __diff, (FILE *fp1, FILE *fp2 )); -_PROTOTYPE(void differ, (struct f *f1, struct f *f2 )); -_PROTOTYPE(int wlen, (struct f *f )); -_PROTOTYPE(void range, (int a, int b )); -_PROTOTYPE(void cdiff, (char *old, char *new, FILE *file1, FILE *file2 )); -_PROTOTYPE(void dumphunk, (void )); -_PROTOTYPE(char *getold, (int targ )); -_PROTOTYPE(char *getnew, (int targ )); -_PROTOTYPE(int isdir, (char *path )); -_PROTOTYPE(void diff_recursive, (char *dir1, char *dir2 )); -_PROTOTYPE(void file_type_error, (char *filename1, char *filename2, - struct stat *statbuf1, struct stat *statbuf2 )); -_PROTOTYPE(void *xmalloc, (size_t size)); -_PROTOTYPE(void *xrealloc, (void *ptr, size_t size)); - -int main(argc, argv) -int argc; -char **argv; -{ - char file1[PATH_MAX], file2[PATH_MAX]; - extern int optind; /* index of the current string in argv */ - - progname = argv[0]; - process_command_line(argc, argv); - - analyse_input_files(argv[optind], argv[optind + 1], file1, file2); - optind++; - - if (recursive_dir == SET) { - build_option_string(); - diff_recursive(file1, file2); - } else { - diff(file1, file2); - } - - return(severe_error ? 2 : diffs > 0 ? 1 : 0); -} - -/* Process the command line and set the flags for the different - * options. the processing of the command line is done with the - * getopt() library function. a minimal error processing is done - * for the number of command line arguments. */ -void process_command_line(argc, argv) -int argc; /* number of arguments on command line */ -char **argv; /* ** to arguments on command line */ -{ - int c; - extern char *optarg; /* points to string with options */ - extern int optind; /* index of the current string in argv */ - - /* Are there enough arguments? */ - if (argc < 3) { - fatal_error("Usage: %s [-c|-e|-C n][-br] file1 file2\n", progname); - } - - /* Process all options using getopt() */ - while ((c = getopt(argc, argv, "ceC:br")) != -1) { - switch (c) { - case 'c': - if (mode != undefined) warn(EXCLUSIVE_OPTIONS, "c"); - mode = context; - context_lines = 3; - break; - case 'e': - if (mode != undefined) warn(EXCLUSIVE_OPTIONS, "e"); - mode = ed_mode; - break; - case 'C': - if (mode != undefined) warn(EXCLUSIVE_OPTIONS, "C"); - mode = context; - context_lines = atoi(optarg); - break; - case 'b': trim_blanks = SET; break; - case 'r': recursive_dir = SET; break; - case '?': - exit(2); - } - } - - /* We should have two arguments left */ - if ((argc - optind) != 2) - fatal_error("Need exactly two input file-names!\n", ""); -} - -/* Analyse_input_files takes the two input files on the command line - * and decides what to do. returns the (corrected) filenames that - * can be used to call diff(). - * if two directories are given, then a recursive diff is done. - * one directory and one filename compares the file with - * in the directory with . - * if two filenames are specified, no special action takes place. - */ -void analyse_input_files(arg1, arg2, input1, input2) -char *arg1, *arg2; /* filenames on the command line */ -char *input1, *input2; /* filenames to be used with diff() */ -{ - int stat1 = 0, stat2 = 0; - - if (strcmp(arg1, "-") != 0) - stat1 = isdir(arg1); /* != 0 <-> arg1 is directory */ - if (strcmp(arg2, "-") != 0) stat2 = isdir(arg2); -#ifdef DEBUG - fprintf(stderr, "%s, stat = %d\n", arg1, stat1); - fprintf(stderr, "%s, stat = %d\n", arg2, stat2); -#endif - if (stat1 && stat2) { /* both arg1 and arg2 are directories */ - recursive_dir = SET; - strcpy(input1, arg1); - strcpy(input2, arg2); - return; - } - if (stat1 != 0) { /* arg1 is a dir, arg2 not */ - if (strcmp(arg2, "-") != 0) { /* arg2 != stdin */ - strcpy(input1, arg1); - strcat(input1, "/"); - strcat(input1, arg2); - strcpy(input2, arg2); - return; - } else { - fatal_error("cannot compare stdin (-) with a directory!", ""); - } - } - if (stat2 != 0) { /* arg2 is a dir, arg1 not */ - if (strcmp(arg1, "-") != 0) { /* arg1 != stdin */ - strcpy(input1, arg1); - strcpy(input2, arg2); - strcat(input2, "/"); - strcat(input2, arg1); - return; - } else { /* arg1 == stdin */ - fatal_error("cannot compare stdin (-) with a directory!", ""); - } - } - - /* Both arg1 and arg2 are normal files */ - strcpy(input1, arg1); - strcpy(input2, arg2); -} - -/* Diff() is the front end for all modes of the program diff, execpt - * the recursive_dir option. - * diff() expects the filenames of the two files to be compared as - * arguments. the mode is determined from the global variable mode. - */ -void diff(filename1, filename2) -char *filename1, *filename2; -{ - FILE *file1 = check_file(filename1); - FILE *file2 = check_file(filename2); - struct stat statbuf1, statbuf2; - - if ((file1 != Nullfp) && (file2 != Nullfp)) { - /* If we do a recursive diff, then we don't compare block - * special, character special or FIFO special files to any - * file. */ - fstat(fileno(file1), &statbuf1); - fstat(fileno(file2), &statbuf2); - if ((((statbuf1.st_mode & S_IFREG) != S_IFREG) || - ((statbuf2.st_mode & S_IFREG) != S_IFREG)) && - (recursive_dir == SET)) { - file_type_error(filename1, filename2, &statbuf1, &statbuf2); - } else { - switch (mode) { - case context: - cdiff(filename1, filename2, file1, file2); - break; - case ed_mode: - case undefined: - __diff(file1, file2); - if (mode == ed_mode) printf("w\n"); - break; - } - } - } else - severe_error = 1; - if (file1 != Nullfp) fclose(file1); - if (file2 != Nullfp) fclose(file2); -} - -/* Check_file() opens the fileptr with name . if - * equals "-" stdin is associated with the return value. - */ -FILE *check_file(name) -char *name; -{ - FILE *temp; - - if (strcmp(name, "-") == 0) { - return(stdin); - } else { - temp = fopen(name, "r"); - if (temp == Nullfp) warn(CANNOT_OPEN_FILE, name); - return(temp); - } -} - -/* Build_option_string() is called before recursive_dir() is called - * from the main() function. its purpose is to build the string that - * is used on the command line to get the current operation mode. - * e.g. "-C 6 -b". - */ -void build_option_string() -{ - switch (mode) { - case ed_mode:sprintf(options_string, "-e"); - break; - case context: - if (context_lines == 3) - sprintf(options_string, "-c"); - else - sprintf(options_string, "-C %d", context_lines); - break; - } - -} - - -/* The fatal error handler. - * Expects a format string and a string as arguments. The arguments - * are printed to stderr and the program exits with an error code 2. - */ -void fatal_error(fmt, s) -char *fmt; /* the format sttring to be printed */ -char *s; /* string to be inserted into the format - * string */ -{ - fprintf(stderr, "%s: ", progname); - fprintf(stderr, fmt, s); - fprintf(stderr, "\n"); - exit(2); -} - -/* This function prints non fatal error messages to stderr. - * Expects the index of the message to be printed and a pointer - * to the (optional) string to be printed. - * Returns no value. - */ -void warn(number, string) -int number; /* index of the warning */ -char *string; /* string to be inserted to the warning */ -{ - static char *warning[] = { - "%s: The options -c, -e, -C n are mutually exclusive! Assuming -%c\n", - "%s: cannot open file %s for reading\n", - }; - fprintf(stderr, warning[number], progname, string); -} - -/* Function used with the optione -b, trims the blanks in a input line: - * - blanks between words are reduced to one - * - trailing blanks are eliminated. - */ -void trimming_blanks(l_text) -char *l_text; /* begin of the char array */ -{ - char *line = l_text; - char *copy_to, *copy_from; - - do { - if (*line == ' ') { - copy_from = line; - copy_to = line; - while (*(++copy_from) == ' '); - if (*copy_from != '\n') copy_to++; - while (*copy_from != '\0') *(copy_to++) = *(copy_from++); - *copy_to = '\0'; - } - } while (*(++line) != '\0'); -} - - -/* Filename separates the filename and the relative path in path_string. - * Returns the filename with a leading / - */ -char *filename(path_string) -char *path_string; -{ - char name[NAME_MAX + 2]; /* filename plus / */ - char *ptr; - - name[0] = '/'; - ptr = strrchr(path_string, '/'); - - if (ptr == 0) { /* no / in path_string, only a filename */ - strcat(name, path_string); - } else { - strcat(name, ptr); - } - - return(name); -} - -/* The line module: one member in a linked list of lines. */ -struct line { - struct line *l_next; /* pointer to the next line */ - char l_eof; /* == 0 if last line in file */ - char *l_text; /* array with the text */ -}; - -struct line *freelist = 0; -#define stepup(ll) ( ((ll) && ((ll)->l_eof==0)) ? (ll)->l_next : (ll) ) - -/* Function to allocate space for a new line containing SIZE chars */ -struct line *new_line(size) -int size; -{ - register struct line *l; - - if ((l = freelist) != NullStructLine) - freelist = freelist->l_next; - else { - l = (struct line *) xmalloc(3 * sizeof(void *)); - l->l_text = (char *) xmalloc((size + 2) * sizeof(char)); - if ((l == 0) || (l->l_text == 0)) fatal_error("Out of memory", ""); - } - return l; -} - - -/* Free_line() releases storage allocated for . */ -void free_line(l) -register struct line *l; -{ - l->l_next = freelist; - freelist = l; -} - -/* Equal_line() compares two lines, and . - * the returned value is the result of the strcmp() function. - */ -int equal_line(l1, l2) -struct line *l1, *l2; -{ - if (l1 == 0 || l2 == 0) - return(0); - else if (l1->l_eof || l2->l_eof) - return(l1->l_eof == l2->l_eof); - else - return(strcmp(l1->l_text, l2->l_text) == 0); -} - -int equal_3(l1, l2) -struct line *l1, *l2; -{ - register int i, ansr; - - ansr = 1; -#ifdef DEBUG - if (l1 == 0) - fprintf(stderr, "\t(null)\n"); - else if (l1->l_eof) - fprintf(stderr, "\t(eof)\n"); - else - fprintf(stderr, "\t%s", l1->l_text); - if (l2 == 0) - fprintf(stderr, "\t(null)\n"); - else if (l2->l_eof) - fprintf(stderr, "\t(eof)\n"); - else - fprintf(stderr, "\t%s", l2->l_text); -#endif - for (i = 0; i < 3; ++i) { - if (!equal_line(l1, l2)) { - ansr = 0; - break; - } - l1 = stepup(l1); - l2 = stepup(l2); - } -#ifdef DEBUG - fprintf(stderr, "\t%d\n", ansr); -#endif - return(ansr); -} - -struct line * - read_line(fp) -FILE *fp; -{ - register struct line *l = new_line(LINELEN); - register char *p; - register int c; - - (p = &(l->l_text[LINELEN]))[1] = '\377'; - l->l_eof = 0; - if (fgets(l->l_text, LINELEN + 2, fp) == 0) { - l->l_eof = 1; - l->l_text[0] = 0; - } else if ((p[1] & 0377) != 0377 && *p != '\n') { - while ((c = fgetc(fp)) != '\n' && c != EOF) { - } - *p++ = '\n'; - *p = '\0'; - } - l->l_next = 0; - if (trim_blanks == SET) { -#ifdef DEBUG - printf("xxx %s xxx\n", l->l_text); -#endif - trimming_blanks(l->l_text); -#ifdef DEBUG - printf("xxx %s xxx\n", l->l_text); -#endif - } - return l; -} - -/* File window handler */ -struct f { - struct line *f_bwin, *f_ewin; - struct line *f_aside; - int f_linecnt; /* line number in file of last advanced line */ - FILE *f_fp; -}; - -void advance(f) -register struct f *f; -{ - register struct line *l; - - if ((l = f->f_bwin) != NullStructLine) { - if (f->f_ewin == l) - f->f_bwin = f->f_ewin = 0; - else - f->f_bwin = l->l_next; - free_line(l); - (f->f_linecnt)++; - } -} - -void aside(f, l) -struct f *f; -struct line *l; -{ - register struct line *ll; - - if (l == 0) return; - if ((ll = l->l_next) != NullStructLine) { - while (ll->l_next) ll = ll->l_next; - ll->l_next = f->f_aside; - f->f_aside = l->l_next; - l->l_next = 0; - f->f_ewin = l; - } -} - - -struct line *next(f) -register struct f *f; -{ - register struct line *l; - - if ((l = f->f_aside) != NullStructLine) { - f->f_aside = l->l_next; - l->l_next = 0; - } else - l = read_line(f->f_fp); - if (l) { - if (f->f_bwin == 0) - f->f_bwin = f->f_ewin = l; - else { - if (f->f_ewin->l_eof && l->l_eof) { - free_line(l); - return(f->f_ewin); - } - f->f_ewin->l_next = l; - f->f_ewin = l; - } - } - return l; -} - - -/* Init_f() initialises a window structure (struct f). is the - * file associated with . - */ -void init_f(f, fp) -register struct f *f; -FILE *fp; -{ - f->f_bwin = f->f_ewin = f->f_aside = 0; - f->f_linecnt = 0; - f->f_fp = fp; -} - - -/* Update() prints a window. is a pointer to the window, is the - * string containing the "prefix" to the printout( either "<" or ">"). - * after completion of update(), the window is empty. - */ -void update(f, s) -register struct f *f; -char *s; -{ - char *help; - int only_dot = 0; - - if (firstoutput && (recursive_dir == SET)) { - printf("diff %s %s %s\n", options_string, oldfile, newfile); - firstoutput = 0; - } - while (f->f_bwin && f->f_bwin != f->f_ewin) { - if (mode != ed_mode) { - printf("%s%s", s, f->f_bwin->l_text); - } else { -#ifdef DEBUG - printf("ed_mode: test for only dot"); - printf("%s", f->f_bwin->l_text); -#endif - help = f->f_bwin->l_text; - while ((*help == ' ') || - (*help == '.') || - (*help == '\t')) { - if (*(help++) == '.') only_dot++; - if (only_dot > 1) break; - } - - /* If only_dot is equal 1, there is only one dot on - * the line, so we have to take special actions. - * f the line with only one dot is found, we output - * two dots (".."), terminate the append modus and - * substitute "." for "..". Afterwards we restart - * with the append command. */ - if (*help == '\n' && only_dot == 1) { - help = f->f_bwin->l_text; - while (*help != '\0') { - if (*help == '.') printf("."); - putchar((int) *(help++)); - } - printf(".\n"); - printf(".s/\\.\\././\n"); - printf("a\n"); - } else { - printf("%s%s", s, f->f_bwin->l_text); - } - } - advance(f); - } -} - -/* __Diff(), performs the "core operation" of the program. - * Expects two file-pointers as arguments. This functions does - * *not* check if the file-pointers are valid. - */ - -void __diff(fp1, fp2) -FILE *fp1, *fp2; -{ - struct f f1, f2; - struct line *l1, *s1, *b1, *l2, *s2, *b2; - register struct line *ll; - - init_f(&f1, fp1); - init_f(&f2, fp2); - l1 = next(&f1); - l2 = next(&f2); - while ((l1->l_eof == 0) || (l2->l_eof == 0)) { - if (equal_line(l1, l2)) { - equal: - advance(&f1); - advance(&f2); - l1 = next(&f1); - l2 = next(&f2); - continue; - } - s1 = b1 = l1; - s2 = b2 = l2; - /* Read several more lines */ - next(&f1); - next(&f1); - next(&f2); - next(&f2); - /* Start searching */ -search: - next(&f2); - ll = s1; - do { - if (equal_3(ll, b2)) { - l1 = ll; - l2 = b2; - aside(&f1, ll); - aside(&f2, b2); - differ(&f1, &f2); - goto equal; - } - if (ll->l_eof) break; - ll = stepup(ll); - } while (ll); - b2 = stepup(b2); - - next(&f1); - ll = s2; - do { - if (equal_3(b1, ll)) { - l1 = b1; - l2 = ll; - aside(&f2, ll); - aside(&f1, b1); - differ(&f1, &f2); - goto equal; - } - if (ll->l_eof != 0) break; - ll = stepup(ll); - } while (ll); - b1 = stepup(b1); - - goto search; - } - - /* Both of the files reached EOF */ -} - -/* Differ() prints the differences between files. the arguments and - * are pointers to the two windows, where the differences are. - */ -void differ(f1, f2) -register struct f *f1, *f2; -{ - int cnt1 = f1->f_linecnt, len1 = wlen(f1); - int cnt2 = f2->f_linecnt, len2 = wlen(f2); - if ((len1 != 0) || (len2 != 0)) { - if (len1 == 0) { - if (mode == ed_mode) { - cnt1 += offset; - printf("%d a\n", cnt1); - update(f2, ""); - printf(".\n"); - offset += len2; - } else { - printf("%da", cnt1); - range(cnt2 + 1, cnt2 + len2); - } - } else if (len2 == 0) { - if (mode == ed_mode) { - cnt1 += offset; - range(cnt1 + 1, cnt1 + len1); - printf("d\n"); - offset -= len1; - while (f1->f_bwin && f1->f_bwin != f1->f_ewin) - advance(f1); - } else { - range(cnt1 + 1, cnt1 + len1); - printf("d%d", cnt2); - } - } else { - if (mode != ed_mode) { - range(cnt1 + 1, cnt1 + len1); - putchar('c'); - range(cnt2 + 1, cnt2 + len2); - } else { - cnt1 += offset; - if (len1 == len2) { - range(cnt1 + 1, cnt1 + len1); - printf("c\n"); - update(f2, ""); - printf(".\n"); - } else { - range(cnt1 + 1, cnt1 + len1); - printf("d\n"); - printf("%d a\n", cnt1); - update(f2, ""); - printf(".\n"); - offset -= len1 - len2; - } - while (f1->f_bwin && f1->f_bwin != f1->f_ewin) - advance(f1); - } - } - if (mode != ed_mode) { - putchar('\n'); - if (len1 != 0) update(f1, "< "); - if ((len1 != 0) && (len2 != 0)) printf("---\n"); - if (len2 != 0) update(f2, "> "); - } - diffs++; - } -} - - -/* Function wlen() calculates the number of lines in a window. */ -int wlen(f) -struct f *f; -{ - register cnt = 0; - register struct line *l = f->f_bwin, *e = f->f_ewin; - - while (l && l != e) { - cnt++; - l = l->l_next; - } - return cnt; -} - - -/* Range() prints the line numbers of a range. the arguments and - * are the beginning and the ending line number of the range. if - * == , only one line number is printed. otherwise and are - * separated by a ",". - */ -void range(a, b) -int a, b; -{ - printf(((a == b) ? "%d" : "%d,%d"), a, b); -} - -/* Here follows the code for option -c. - * This code is from the cdiff program by Larry Wall. I changed it only - * slightly to reflect the POSIX standard and to call the main routine - * as function context_diff(). - */ - -/* Cdiff - context diff Author: Larry Wall */ - -/* These global variables are still here from the original cdiff program... - * I was to lazy just to sort them out... - */ -char buff[512]; -FILE *oldfp, *newfp; - -int oldmin, oldmax, newmin, newmax; -int oldbeg, oldend, newbeg, newend; -int preoldmax, prenewmax; -int preoldbeg, preoldend, prenewbeg, prenewend; -int oldwanted, newwanted; - -char *oldhunk, *newhunk; -size_t oldsize, oldalloc, newsize, newalloc; - -int oldline, newline; /* Jose */ - -void cdiff(old, new, file1, file2) -char *old, *new; /* The names of the two files to be compared */ -FILE *file1, *file2; /* The corresponding file-pointers */ -{ - FILE *inputfp; - struct stat statbuf; - register char *s; - char op; - char *newmark, *oldmark; - int len; - char *line; - int i, status; - - oldfp = file1; - newfp = file2; - - oldalloc = 512; - oldhunk = (char *) xmalloc(oldalloc); - newalloc = 512; - newhunk = (char *) xmalloc(newalloc); - - -/* The context diff spawns a new process that executes a normal diff - * and parses the output. - */ - if (trim_blanks == SET) - sprintf(buff, "diff -b %s %s", old, new); - else - sprintf(buff, "diff %s %s", old, new); - - inputfp = popen(buff, "r"); - if (!inputfp) { - fprintf(stderr, "Can't execute diff %s %s, popen failed with %s\n", - old, new, strerror(errno)); - exit(2); - } - preoldend = -1000; - firstoutput = 1; - oldline = newline = 0; - while (fgets(buff, sizeof buff, inputfp) != Nullch) { - if (firstoutput) { - if (recursive_dir == SET) { - printf("diff %s %s %s\n", options_string, - oldfile, newfile); - } - fstat(fileno(oldfp), &statbuf); - printf("*** %s %s", old, ctime(&statbuf.st_mtime)); - fstat(fileno(newfp), &statbuf); - printf("--- %s %s", new, ctime(&statbuf.st_mtime)); - firstoutput = 0; - } - if (isdigit(*buff)) { - oldmin = atoi(buff); - for (s = buff; isdigit(*s); s++); - if (*s == ',') { - s++; - oldmax = atoi(s); - for (; isdigit(*s); s++); - } else { - oldmax = oldmin; - } - if (*s != 'a' && *s != 'd' && *s != 'c') { - fprintf(stderr, "Unparseable input: %s", s); - exit(2); - } - op = *s; - s++; - newmin = atoi(s); - for (; isdigit(*s); s++); - if (*s == ',') { - s++; - newmax = atoi(s); - for (; isdigit(*s); s++); - } else { - newmax = newmin; - } - if (*s != '\n' && *s != ' ') { - fprintf(stderr, "Unparseable input: %s", s); - exit(2); - } - newmark = oldmark = "! "; - if (op == 'a') { - oldmin++; - newmark = "+ "; - } - if (op == 'd') { - newmin++; - oldmark = "- "; - } - oldbeg = oldmin - context_lines; - oldend = oldmax + context_lines; - if (oldbeg < 1) oldbeg = 1; - newbeg = newmin - context_lines; - newend = newmax + context_lines; - if (newbeg < 1) newbeg = 1; - - if (preoldend < oldbeg - 1) { - if (preoldend >= 0) { - dumphunk(); - } - preoldbeg = oldbeg; - prenewbeg = newbeg; - oldwanted = newwanted = 0; - oldsize = newsize = 0; - } else { /* we want to append to previous hunk */ - oldbeg = preoldmax + 1; - newbeg = prenewmax + 1; - } - - for (i = oldbeg; i <= oldmax; i++) { - line = getold(i); - if (!line) { - oldend = oldmax = i - 1; - break; - } - len = strlen(line) + 2; - if (oldsize + len + 1 >= oldalloc) { - oldalloc *= 2; - oldhunk = (char *) xrealloc(oldhunk, oldalloc); - } - if (i >= oldmin) { - strcpy(oldhunk + oldsize, oldmark); - oldwanted++; - } else { - strcpy(oldhunk + oldsize, " "); - } - strcpy(oldhunk + oldsize + 2, line); - oldsize += len; - } - preoldmax = oldmax; - preoldend = oldend; - - for (i = newbeg; i <= newmax; i++) { - line = getnew(i); - if (!line) { - newend = newmax = i - 1; - break; - } - len = strlen(line) + 2; - if (newsize + len + 1 >= newalloc) { - newalloc *= 2; - newhunk = (char *) xrealloc(newhunk, newalloc); - } - if (i >= newmin) { - strcpy(newhunk + newsize, newmark); - newwanted++; - } else { - strcpy(newhunk + newsize, " "); - } - strcpy(newhunk + newsize + 2, line); - newsize += len; - } - prenewmax = newmax; - prenewend = newend; - } - } - status = pclose(inputfp); - if (status != 0) diffs++; - if (!WIFEXITED(status) || WEXITSTATUS(status) > 1) severe_error = 1; - - if (preoldend >= 0) { - dumphunk(); - } -} - -void dumphunk() -{ - int i; - char *line; - int len; - - for (i = preoldmax + 1; i <= preoldend; i++) { - line = getold(i); - if (!line) { - preoldend = i - 1; - break; - } - len = strlen(line) + 2; - if (oldsize + len + 1 >= oldalloc) { - oldalloc *= 2; - oldhunk = (char *) xrealloc(oldhunk, oldalloc); - } - strcpy(oldhunk + oldsize, " "); - strcpy(oldhunk + oldsize + 2, line); - oldsize += len; - } - for (i = prenewmax + 1; i <= prenewend; i++) { - line = getnew(i); - if (!line) { - prenewend = i - 1; - break; - } - len = strlen(line) + 2; - if (newsize + len + 1 >= newalloc) { - newalloc *= 2; - newhunk = (char *) xrealloc(newhunk, newalloc); - } - strcpy(newhunk + newsize, " "); - strcpy(newhunk + newsize + 2, line); - newsize += len; - } - fputs("***************\n", stdout); - if (preoldbeg >= preoldend) { - printf("*** %d ****\n", preoldend); - } else { - printf("*** %d,%d ****\n", preoldbeg, preoldend); - } - if (oldwanted) { - fputs(oldhunk, stdout); - } - oldsize = 0; - *oldhunk = '\0'; - if (prenewbeg >= prenewend) { - printf("--- %d ----\n", prenewend); - } else { - printf("--- %d,%d ----\n", prenewbeg, prenewend); - } - if (newwanted) { - fputs(newhunk, stdout); - } - newsize = 0; - *newhunk = '\0'; -} - -char *getold(targ) -int targ; -{ - while (fgets(buff, sizeof buff, oldfp) != Nullch) { - oldline++; - if (oldline == targ) return buff; - } - return Nullch; -} - -char *getnew(targ) -int targ; -{ - while (fgets(buff, sizeof buff, newfp) != Nullch) { - newline++; - if (newline == targ) return buff; - } - return Nullch; -} - - -/* Isdir() checks, if is the name of a directory. a return value - * is 0, is a normal file. otherwise the is a directory. - */ -int isdir(path) -char *path; -{ - struct stat buf; - stat(path, &buf); - if (buf.st_mode & S_IFDIR) { /* path is a directory */ - return(~0); - } else { - return(0); - } -} - - - -/* This is the "main" function if a diff of two directories has to be - * done. diff_recursive() expects the names of the two directories to - * be compared. */ -void diff_recursive(dir1, dir2) -char *dir1, *dir2; -{ - FILE *ls1, *ls2; - char file1[PATH_MAX], file2[PATH_MAX]; - char jointfile1[PATH_MAX], jointfile2[PATH_MAX]; - char command[PATH_MAX]; - int difference, eof1, eof2; - - sprintf(command, "ls %s", dir1); - ls1 = popen(command, "r"); - sprintf(command, "ls %s", dir2); - ls2 = popen(command, "r"); - - if ((ls1 == NULL) || (ls2 == NULL)) - fatal_error("cannot execute ls!", ""); - - file1[0] = '\0'; - eof1 = fscanf(ls1, "%s\n", file1); - file2[0] = '\0'; - eof2 = fscanf(ls2, "%s\n", file2); - - while ((file1[0] != '\0') && (file2[0] != '\0')) { - difference = strcmp(file1, file2); - while (difference != 0) { - if (difference < 0) { - printf("Only in %s: %s\n", dir1, file1); - file1[0] = '\0'; - eof1 = fscanf(ls1, "%s\n", file1); - if (file1[0] == '\0') break; - } else { - printf("Only in %s: %s\n", dir2, file2); - file2[0] = '\0'; - eof2 = fscanf(ls2, "%s\n", file2); - if (file2[0] == '\0') break; - } - difference = strcmp(file1, file2); - } - if (eof1 != EOF && eof2 != EOF) { - strcpy(jointfile1, dir1); - strcat(jointfile1, "/"); - strcat(jointfile1, file1); - strcpy(jointfile2, dir2); - strcat(jointfile2, "/"); - strcat(jointfile2, file2); - - if ((isdir(jointfile1) != 0) && (isdir(jointfile2) != 0)) { - printf("Common subdirectories: %s and %s\n", - jointfile1, jointfile2); - diff_recursive(jointfile1, jointfile2); - } else { - firstoutput = 1; - strcpy(oldfile, jointfile1); - strcpy(newfile, jointfile2); - diff(jointfile1, jointfile2); - } - file1[0] = '\0'; - eof1 = fscanf(ls1, "%s\n", file1); - file2[0] = '\0'; - eof2 = fscanf(ls2, "%s\n", file2); - } - } - - if (file1[0] != '\0') { /* first arg still has files */ - do { - printf("Only in %s: %s\n", dir1, file1); - eof1 = fscanf(ls1, " %s\n", file1); - } while (eof1 != EOF); - } - if (file2[0] != '\0') { - do { - printf("Only in %s: %s\n", dir2, file2); - eof2 = fscanf(ls2, " %s\n", file2); - } while (eof2 != EOF); - } - if (pclose(ls1) != 0) severe_error = 1; - if (pclose(ls2) != 0) severe_error = 1; -} - - -/* File_type_error is called, if in a recursive diff ( -r) one of the two - * files a block special, a character special or a FIFO special file is. - * The corresponding error message is printed here. */ -void file_type_error(filename1, filename2, statbuf1, statbuf2) -char *filename1, *filename2; -struct stat *statbuf1, *statbuf2; -{ - char type1[25], type2[25]; - - switch (statbuf1->st_mode & S_IFMT) { /* select only file mode */ - case S_IFREG: - sprintf(type1, "regular file "); - break; - case S_IFBLK: - sprintf(type1, "block special file "); - break; - case S_IFDIR: sprintf(type1, "directory "); break; - case S_IFCHR: - sprintf(type1, "character special file "); - break; - case S_IFIFO: - sprintf(type1, "FIFO special file "); - break; - } - - switch (statbuf2->st_mode & S_IFMT) { /* select only file mode */ - case S_IFREG: - sprintf(type2, "regular file "); - break; - case S_IFBLK: - sprintf(type2, "block special file "); - break; - case S_IFDIR: sprintf(type2, "directory "); break; - case S_IFCHR: - sprintf(type2, "character special file "); - break; - case S_IFIFO: - sprintf(type2, "FIFO special file "); - break; - } - printf("File %s is a %s while file %s is a %s\n", - filename1, type1, filename2, type2); -} - -void *xmalloc(size) -size_t size; -{ - void *ptr; - - ptr = malloc(size); - if (ptr == NULL) { - fprintf(stderr, "%s: out of memory\n", progname); - exit(2); - } - return(ptr); -} - -void *xrealloc(ptr, size) -void *ptr; -size_t size; -{ - ptr = realloc(ptr, size); - if (ptr == NULL) { - fprintf(stderr, "%s: out of memory\n", progname); - exit(2); - } - return(ptr); -}