1/*
2 * Copyright (c) 1989, 1993, 1994
3 *	The Regents of the University of California.  All rights reserved.
4 *
5 * This code is derived from software contributed to Berkeley by
6 * Case Larsen.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 *    notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 *    notice, this list of conditions and the following disclaimer in the
15 *    documentation and/or other materials provided with the distribution.
16 * 3. All advertising materials mentioning features or use of this software
17 *    must display the following acknowledgement:
18 *	This product includes software developed by the University of
19 *	California, Berkeley and its contributors.
20 * 4. Neither the name of the University nor the names of its contributors
21 *    may be used to endorse or promote products derived from this software
22 *    without specific prior written permission.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * SUCH DAMAGE.
35 */
36
37#ifndef lint
38static const char copyright[] = "@(#) Copyright (c) 1989, 1993, 1994\n	The Regents of the University of California.  All rights reserved.\n";
39#endif
40
41#if 1
42#ifndef lint
43static char sccsid[] = "From: @(#)comm.c	8.4 (Berkeley) 5/4/95";
44#endif
45#endif
46
47//#include <cdefs.h>
48//__FBSDID("$FreeBSD: /repoman/r/ncvs/src/usr.bin/comm/comm.c,v 1.20 2002/07/28 15:28:38 dwmalone Exp $");
49
50#include <ctype.h>
51//#include <err.h>
52#include <limits.h>
53#include <locale.h>
54#include <stdio.h>
55#include <stdlib.h>
56#include <string.h>
57#include <unistd.h>
58#define LINE_MAX 99999
59#define	MAXLINELEN	(LINE_MAX + 1)
60
61const char *tabs[] = { "", "\t", "\t\t" };
62
63FILE   *file(const char *);
64void	show(FILE *, const char *, char *);
65int     stricoll(const char *, const char *);
66static void	usage(void);
67static void printversion(void);
68
69int
70main(int argc, char *argv[])
71{
72	int comp, file1done = 0, file2done = 0, read1, read2;
73	int ch, flag1, flag2, flag3, iflag;
74	FILE *fp1, *fp2;
75	const char *col1, *col2, *col3;
76	char line1[MAXLINELEN], line2[MAXLINELEN];
77	const char **p;
78
79	flag1 = flag2 = flag3 = 1;
80	iflag = 0;
81
82	(void) setlocale(LC_ALL, "");
83
84	while ((ch = getopt(argc, argv, "123ivh")) != -1)
85		switch(ch) {
86		case '1':
87			flag1 = 0;
88			break;
89		case '2':
90			flag2 = 0;
91			break;
92		case '3':
93			flag3 = 0;
94			break;
95		case 'i':
96			iflag = 1;
97			break;
98		case 'v':
99			printversion();
100			break;
101		default:
102			usage();
103		}
104
105	argc -= optind;
106	argv += optind;
107
108	if (argc != 2)
109		usage();
110
111	fp1 = file(argv[0]);
112	fp2 = file(argv[1]);
113
114	/* for each column printed, add another tab offset */
115	p = tabs;
116	col1 = col2 = col3 = NULL;
117	if (flag1)
118		col1 = *p++;
119	if (flag2)
120		col2 = *p++;
121	if (flag3)
122		col3 = *p;
123
124	for (read1 = read2 = 1;;) {
125		/* read next line, check for EOF */
126		if (read1)
127			file1done = !fgets(line1, MAXLINELEN, fp1);
128		if (read2)
129			file2done = !fgets(line2, MAXLINELEN, fp2);
130
131		/* if one file done, display the rest of the other file */
132		if (file1done) {
133			if (!file2done && col2)
134				show(fp2, col2, line2);
135			break;
136		}
137		if (file2done) {
138			if (!file1done && col1)
139				show(fp1, col1, line1);
140			break;
141		}
142
143		/* lines are the same */
144		if(iflag)
145			comp = stricoll(line1, line2);
146		else
147			comp = strcoll(line1, line2);
148
149		if (!comp) {
150			read1 = read2 = 1;
151			if (col3)
152				(void)printf("%s%s", col3, line1);
153			continue;
154		}
155
156		/* lines are different */
157		if (comp < 0) {
158			read1 = 1;
159			read2 = 0;
160			if (col1)
161				(void)printf("%s%s", col1, line1);
162		} else {
163			read1 = 0;
164			read2 = 1;
165			if (col2)
166				(void)printf("%s%s", col2, line2);
167		}
168	}
169	exit(0);
170}
171
172void
173show(FILE *fp, const char *offset, char *buf)
174{
175
176	do {
177		(void)printf("%s%s", offset, buf);
178	} while (fgets(buf, MAXLINELEN, fp));
179}
180
181FILE *
182file(const char *name)
183{
184	FILE *fp;
185
186	if (!strcmp(name, "-"))
187		return (stdin);
188	if ((fp = fopen(name, "r")) == NULL) {
189		sprintf("%s", name);
190	}
191	return (fp);
192}
193
194static void
195usage(void)
196{
197	(void)fprintf(stderr, "Usage: /bin/comm [OPTION]... LEFT_FILE RIGHT_FILE
198Compare sorted files LEFT_FILE and RIGHT_FILE line by line.
199
200  -1              suppress lines unique to left file
201  -2              suppress lines unique to right file
202  -3              suppress lines unique to both files
203  -help           display this help and exit
204  -version        output version information and exit
205 ");
206	exit(1);
207}
208
209static void
210printversion(void)
211{
212	(void)fprintf(stderr, copyright);
213	(void)fprintf(stderr, "\nVersion : %s\n", sccsid);
214	exit(1);
215}
216
217int
218stricoll(const char *s1, const char *s2)
219{
220	char *p, line1[MAXLINELEN], line2[MAXLINELEN];
221
222	for (p = line1; *s1; s1++)
223		*p++ = tolower((unsigned char)*s1);
224	*p = '\0';
225	for (p = line2; *s2; s2++)
226		*p++ = tolower((unsigned char)*s2);
227	*p = '\0';
228	return strcoll(line1, line2);
229}
230
231