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
38 static 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
43 static 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
61 const char *tabs[] = { "", "\t", "\t\t" };
62
63 FILE *file(const char *);
64 void show(FILE *, const char *, char *);
65 int stricoll(const char *, const char *);
66 static void usage(void);
67 static void printversion(void);
68
69 int
main(int argc,char * argv[])70 main(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
172 void
show(FILE * fp,const char * offset,char * buf)173 show(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
181 FILE *
file(const char * name)182 file(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
194 static void
usage(void)195 usage(void)
196 {
197 (void)fprintf(stderr, "Usage: /bin/comm [OPTION]... LEFT_FILE RIGHT_FILE
198 Compare 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
209 static void
printversion(void)210 printversion(void)
211 {
212 (void)fprintf(stderr, copyright);
213 (void)fprintf(stderr, "\nVersion : %s\n", sccsid);
214 exit(1);
215 }
216
217 int
stricoll(const char * s1,const char * s2)218 stricoll(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