da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/***********************************************************************
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* This software is part of the ast package *
3e14f97f673e8a630f076077de35afdd43dc1587Roger A. Faulkner* Copyright (c) 1992-2010 AT&T Intellectual Property *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* and is licensed under the *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* Common Public License, Version 1.0 *
7c2fbfb345896881c631598ee3852ce9ce33fb07April Chin* by AT&T Intellectual Property *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* A copy of the License is available at *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* http://www.opensource.org/licenses/cpl1.0.txt *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9) *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* Information and Software Systems Research *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* AT&T Research *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* Florham Park NJ *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* Glenn Fowler <gsf@research.att.com> *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* David Korn <dgk@research.att.com> *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin***********************************************************************/
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#pragma prototyped
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/*
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * David Korn
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * Glenn Fowler
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * AT&T Bell Laboratories
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * cmp
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinstatic const char usage[] =
34f9b3eef6fdadbda0a846aa4d68691ac40eace5Roland Mainz"[-?\n@(#)$Id: cmp (AT&T Research) 2009-01-05 $\n]"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinUSAGE_LICENSE
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin"[+NAME?cmp - compare two files]"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin"[+DESCRIPTION?\bcmp\b compares two files \afile1\a and \afile2\a. "
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin "\bcmp\b writes no output if the files are the same. By default, "
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin "if the files differ, the byte and line number at which the "
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin "first difference occurred are written to standard output. Bytes "
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin "and lines are numbered beginning with 1.]"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin"[+?If \askip1\a or \askip2\a are specified, or the \b-i\b option is "
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin "specified, initial bytes of the corresponding file are skipped "
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin "before beginning the compare. The skip values are in bytes or "
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin "can have a suffix of \bk\b for kilobytes or \bm\b for megabytes.]"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin"[+?If either \afile1\a or \afiles2\a is \b-\b, \bcmp\b "
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin "uses standard input starting at the current location.]"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin"[c:print-chars?Writes control characters as a \b^\b followed by a letter of "
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin "the alphabet and precede characters that have the high bit set with "
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin "\bM-\b as with \bcat\b(1).]"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin"[i:ignore-initial]#[skip:=0?Sets default skip values for the operands "
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin "\askip1\a and \askip2\a to \askip\a.]"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin"[l:verbose?Write the decimal byte number and the differing bytes (in octal) "
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin "for each difference.]"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin"[s:quiet|silent?Write nothing for differing files; return non-zero "
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin "exit status only.] ]"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin"\n"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin"\nfile1 file2 [skip1 [skip2]]\n"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin"\n"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin"[+EXIT STATUS?]{"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin "[+0?The files or portions compared are identical.]"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin "[+1?The files are different.]"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin "[+>1?An error occurred.]"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin"}"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin"[+SEE ALSO?\bcomm\b(1), \bdiff\b(1), \bcat\b(1)]"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#include <cmd.h>
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#include <ls.h>
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#include <ctype.h>
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define CMP_VERBOSE 1
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define CMP_SILENT 2
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define CMP_CHARS 4
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define cntl(x) (x&037)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#define printchar(c) ((c) ^ ('A'-cntl('A')))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinstatic void outchar(Sfio_t *out, register int c, int delim)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin{
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if(c&0200)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin sfputc(out,'M');
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin sfputc(out,'-');
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin c &= ~0200;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin else if(!isprint(c))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin sfputc(out,'^');
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin c = printchar(c);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin sfputc(out,c);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin sfputc(out,delim);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin}
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/*
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * compare two files
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinstatic int
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chincmp(const char* file1, Sfio_t* f1, const char* file2, Sfio_t* f2, int flags)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin{
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin register int c1;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin register int c2;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin register unsigned char* p1 = 0;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin register unsigned char* p2 = 0;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin register Sfoff_t lines = 1;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin register unsigned char* e1 = 0;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin register unsigned char* e2 = 0;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin Sfoff_t pos = 0;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin int ret = 0;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin unsigned char* last;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin for (;;)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if ((c1 = e1 - p1) <= 0)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (!(p1 = (unsigned char*)sfreserve(f1, SF_UNBOUND, 0)) || (c1 = sfvalue(f1)) <= 0)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if ((e2 - p2) > 0 || sfreserve(f2, SF_UNBOUND, 0) && sfvalue(f2) > 0)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin ret = 1;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (!(flags & CMP_SILENT))
34f9b3eef6fdadbda0a846aa4d68691ac40eace5Roland Mainz error(ERROR_exit(1), "EOF on %s", file1);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin return(ret);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin e1 = p1 + c1;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if ((c2 = e2 - p2) <= 0)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (!(p2 = (unsigned char*)sfreserve(f2, SF_UNBOUND, 0)) || (c2 = sfvalue(f2)) <= 0)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (!(flags & CMP_SILENT))
34f9b3eef6fdadbda0a846aa4d68691ac40eace5Roland Mainz error(ERROR_exit(1), "EOF on %s", file2);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin return(1);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin e2 = p2 + c2;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (c1 > c2)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin c1 = c2;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin pos += c1;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (flags & CMP_SILENT)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (memcmp(p1, p2, c1))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin return(1);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin p1 += c1;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin p2 += c1;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin else
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin last = p1 + c1;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin while (p1 < last)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if ((c1 = *p1++) != *p2++)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (flags)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin ret = 1;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if(flags&CMP_CHARS)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin sfprintf(sfstdout, "%6I*d ", sizeof(pos), pos - (last - p1));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin outchar(sfstdout,c1,' ');
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin outchar(sfstdout,*(p2-1),'\n');
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin else
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin sfprintf(sfstdout, "%6I*d %3o %3o\n", sizeof(pos), pos - (last - p1), c1, *(p2 - 1));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin else
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin sfprintf(sfstdout, "%s %s differ: char %I*d, line %I*u\n", file1, file2, sizeof(pos), pos - (last - p1), sizeof(lines), lines);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin return(1);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (c1 == '\n')
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin lines++;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin}
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinint
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinb_cmp(int argc, register char** argv, void* context)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin{
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin char* s;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin char* e;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin Sfio_t* f1 = 0;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin Sfio_t* f2 = 0;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin char* file1;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin char* file2;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin int n;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin off_t o1 = 0;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin off_t o2 = 0;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin struct stat s1;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin struct stat s2;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin int flags = 0;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin NoP(argc);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin cmdinit(argc, argv, context, ERROR_CATALOG, 0);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin while (n = optget(argv, usage)) switch (n)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin case 'l':
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin flags |= CMP_VERBOSE;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin break;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin case 's':
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin flags |= CMP_SILENT;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin break;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin case 'c':
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin flags |= CMP_CHARS;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin break;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin case 'i':
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin o1 = o2 = opt_info.num;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin break;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin case ':':
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin error(2, "%s", opt_info.arg);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin break;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin case '?':
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin error(ERROR_usage(2), "%s", opt_info.arg);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin break;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin argv += opt_info.index;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (error_info.errors || !(file1 = *argv++) || !(file2 = *argv++))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin error(ERROR_usage(2), "%s", optusage(NiL));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin n = 2;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (streq(file1, "-"))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin f1 = sfstdin;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin else if (!(f1 = sfopen(NiL, file1, "r")))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (!(flags & CMP_SILENT))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin error(ERROR_system(0), "%s: cannot open", file1);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin goto done;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (streq(file2, "-"))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin f2 = sfstdin;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin else if (!(f2 = sfopen(NiL, file2, "r")))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (!(flags & CMP_SILENT))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin error(ERROR_system(0), "%s: cannot open", file2);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin goto done;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (s = *argv++)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin o1 = strtol(s, &e, 0);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (*e)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin error(ERROR_exit(0), "%s: %s: invalid skip", file1, s);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin goto done;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (s = *argv++)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin o2 = strtol(s, &e, 0);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (*e)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin error(ERROR_exit(0), "%s: %s: invalid skip", file2, s);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin goto done;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (*argv)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin error(ERROR_usage(0), "%s", optusage(NiL));
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin goto done;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (o1 && sfseek(f1, o1, SEEK_SET) != o1)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (!(flags & CMP_SILENT))
34f9b3eef6fdadbda0a846aa4d68691ac40eace5Roland Mainz error(ERROR_exit(0), "EOF on %s", file1);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin n = 1;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin goto done;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (o2 && sfseek(f2, o2, SEEK_SET) != o2)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin {
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (!(flags & CMP_SILENT))
34f9b3eef6fdadbda0a846aa4d68691ac40eace5Roland Mainz error(ERROR_exit(0), "EOF on %s", file2);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin n = 1;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin goto done;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin }
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (fstat(sffileno(f1), &s1))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin error(ERROR_system(0), "%s: cannot stat", file1);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin else if (fstat(sffileno(f2), &s2))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin error(ERROR_system(0), "%s: cannot stat", file1);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin else if (s1.st_ino == s2.st_ino && s1.st_dev == s2.st_dev && o1 == o2)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin n = 0;
34f9b3eef6fdadbda0a846aa4d68691ac40eace5Roland Mainz else
34f9b3eef6fdadbda0a846aa4d68691ac40eace5Roland Mainz n = ((flags & CMP_SILENT) && S_ISREG(s1.st_mode) && S_ISREG(s2.st_mode) && (s1.st_size - o1) != (s2.st_size - o2)) ? 1 : cmp(file1, f1, file2, f2, flags);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin done:
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (f1 && f1 != sfstdin) sfclose(f1);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (f2 && f2 != sfstdin) sfclose(f2);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin return(n);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin}