compare.c revision 1.31 1 /* $NetBSD: compare.c,v 1.31 2001/10/18 04:45:41 lukem Exp $ */
2
3 /*-
4 * Copyright (c) 1989, 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. All advertising materials mentioning features or use of this software
16 * must display the following acknowledgement:
17 * This product includes software developed by the University of
18 * California, Berkeley and its contributors.
19 * 4. Neither the name of the University nor the names of its contributors
20 * may be used to endorse or promote products derived from this software
21 * without specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * SUCH DAMAGE.
34 */
35
36 #include <sys/cdefs.h>
37 #ifndef lint
38 #if 0
39 static char sccsid[] = "@(#)compare.c 8.1 (Berkeley) 6/6/93";
40 #else
41 __RCSID("$NetBSD: compare.c,v 1.31 2001/10/18 04:45:41 lukem Exp $");
42 #endif
43 #endif /* not lint */
44
45 #include <sys/param.h>
46 #include <sys/stat.h>
47 #include <sys/types.h>
48
49 #include <errno.h>
50 #include <fcntl.h>
51 #include <fts.h>
52 #include <md5.h>
53 #include <stdio.h>
54 #include <time.h>
55 #include <unistd.h>
56
57 #include "mtree.h"
58 #include "extern.h"
59
60 #define INDENTNAMELEN 8
61 #define MARK \
62 do { \
63 len = printf("%s: ", RP(p)); \
64 if (len > INDENTNAMELEN) { \
65 tab = "\t"; \
66 (void)printf("\n"); \
67 } else { \
68 tab = ""; \
69 (void)printf("%*s", INDENTNAMELEN - (int)len, ""); \
70 } \
71 } while (0)
72 #define LABEL if (!label++) MARK
73
74 #define CHANGEFLAGS(path, oflags) \
75 if (flags != (oflags)) { \
76 if (!label) { \
77 MARK; \
78 (void)printf("%sflags (\"%s\"", tab, \
79 flags_to_string(p->fts_statp->st_flags, "none")); \
80 } \
81 if (chflags(path, flags)) { \
82 label++; \
83 (void)printf(", not modified: %s)\n", \
84 strerror(errno)); \
85 } else \
86 (void)printf(", modified to \"%s\")\n", \
87 flags_to_string(flags, "none")); \
88 }
89
90 /* SETFLAGS:
91 * given pflags, additionally set those flags specified in sflags and
92 * selected by mask (the other flags are left unchanged). oflags is
93 * passed as reference to check if chflags is necessary.
94 */
95 #define SETFLAGS(path, sflags, pflags, oflags, mask) \
96 do { \
97 flags = ((sflags) & (mask)) | (pflags); \
98 CHANGEFLAGS(path, oflags); \
99 } while (0)
100
101 /* CLEARFLAGS:
102 * given pflags, reset the flags specified in sflags and selected by mask
103 * (the other flags are left unchanged). oflags is
104 * passed as reference to check if chflags is necessary.
105 */
106 #define CLEARFLAGS(path, sflags, pflags, oflags, mask) \
107 do { \
108 flags = (~((sflags) & (mask)) & CH_MASK) & (pflags); \
109 CHANGEFLAGS(path, oflags); \
110 } while (0)
111
112 int
113 compare(const char *name, NODE *s, FTSENT *p)
114 {
115 u_int32_t len, val, flags;
116 int fd, label;
117 const char *cp, *tab;
118 char md5buf[35];
119
120 tab = NULL;
121 label = 0;
122 switch(s->type) {
123 case F_BLOCK:
124 if (!S_ISBLK(p->fts_statp->st_mode))
125 goto typeerr;
126 break;
127 case F_CHAR:
128 if (!S_ISCHR(p->fts_statp->st_mode))
129 goto typeerr;
130 break;
131 case F_DIR:
132 if (!S_ISDIR(p->fts_statp->st_mode))
133 goto typeerr;
134 break;
135 case F_FIFO:
136 if (!S_ISFIFO(p->fts_statp->st_mode))
137 goto typeerr;
138 break;
139 case F_FILE:
140 if (!S_ISREG(p->fts_statp->st_mode))
141 goto typeerr;
142 break;
143 case F_LINK:
144 if (!S_ISLNK(p->fts_statp->st_mode))
145 goto typeerr;
146 break;
147 case F_SOCK:
148 if (!S_ISSOCK(p->fts_statp->st_mode)) {
149 typeerr: LABEL;
150 (void)printf("\ttype (%s, %s)\n",
151 nodetype(s->type), inotype(p->fts_statp->st_mode));
152 }
153 break;
154 }
155 if (iflag && !uflag) {
156 if (s->flags & F_FLAGS)
157 SETFLAGS(p->fts_accpath, s->st_flags,
158 p->fts_statp->st_flags, p->fts_statp->st_flags,
159 SP_FLGS);
160 return (label);
161 }
162 if (mflag && !uflag) {
163 if (s->flags & F_FLAGS)
164 CLEARFLAGS(p->fts_accpath, s->st_flags,
165 p->fts_statp->st_flags, p->fts_statp->st_flags,
166 SP_FLGS);
167 return (label);
168 }
169 /* Set the uid/gid first, then set the mode. */
170 if (s->flags & (F_UID | F_UNAME) && s->st_uid != p->fts_statp->st_uid) {
171 LABEL;
172 (void)printf("%suser (%lu, %lu",
173 tab, (u_long)s->st_uid, (u_long)p->fts_statp->st_uid);
174 if (uflag) {
175 if (chown(p->fts_accpath, s->st_uid, -1))
176 (void)printf(", not modified: %s)\n",
177 strerror(errno));
178 else
179 (void)printf(", modified)\n");
180 } else
181 (void)printf(")\n");
182 tab = "\t";
183 }
184 if (s->flags & (F_GID | F_GNAME) && s->st_gid != p->fts_statp->st_gid) {
185 LABEL;
186 (void)printf("%sgid (%lu, %lu",
187 tab, (u_long)s->st_gid, (u_long)p->fts_statp->st_gid);
188 if (uflag) {
189 if (chown(p->fts_accpath, -1, s->st_gid))
190 (void)printf(", not modified: %s)\n",
191 strerror(errno));
192 else
193 (void)printf(", modified)\n");
194 }
195 else
196 (void)printf(")\n");
197 tab = "\t";
198 }
199 if (s->flags & F_MODE &&
200 s->st_mode != (p->fts_statp->st_mode & MBITS)) {
201 if (lflag) {
202 mode_t tmode, mode;
203
204 tmode = s->st_mode;
205 mode = p->fts_statp->st_mode & MBITS;
206 /*
207 * if none of the suid/sgid/etc bits are set,
208 * then if the mode is a subset of the target,
209 * skip.
210 */
211 if (!((tmode & ~(S_IRWXU|S_IRWXG|S_IRWXO)) ||
212 (mode & ~(S_IRWXU|S_IRWXG|S_IRWXO))))
213 if ((mode | tmode) == tmode)
214 goto skip;
215 }
216
217 LABEL;
218 (void)printf("%spermissions (%#lo, %#lo",
219 tab, (u_long)s->st_mode,
220 (u_long)p->fts_statp->st_mode & MBITS);
221 if (uflag) {
222 if (chmod(p->fts_accpath, s->st_mode))
223 (void)printf(", not modified: %s)\n",
224 strerror(errno));
225 else
226 (void)printf(", modified)\n");
227 }
228 else
229 (void)printf(")\n");
230 tab = "\t";
231 skip: ;
232 }
233 if (s->flags & F_DEV &&
234 (s->type == F_BLOCK || s->type == F_CHAR) &&
235 s->st_rdev != p->fts_statp->st_rdev) {
236 LABEL;
237 (void)printf("%sdevice (%#x, %#x",
238 tab, s->st_rdev, p->fts_statp->st_rdev);
239 if (uflag) {
240 /* XXXLUKEM: unlink first ? */
241 if (mknod(p->fts_accpath, s->st_mode, s->st_rdev))
242 (void)printf(", not modified: %s)\n",
243 strerror(errno));
244 else
245 (void)printf(", modified)\n");
246 } else
247 (void)printf(")\n");
248 tab = "\t";
249 }
250 if (s->flags & F_NLINK && s->type != F_DIR &&
251 s->st_nlink != p->fts_statp->st_nlink) {
252 LABEL;
253 (void)printf("%slink count (%lu, %lu)\n",
254 tab, (u_long)s->st_nlink, (u_long)p->fts_statp->st_nlink);
255 tab = "\t";
256 }
257 if (s->flags & F_SIZE && s->st_size != p->fts_statp->st_size) {
258 LABEL;
259 (void)printf("%ssize (%lld, %lld)\n",
260 tab, (long long)s->st_size,
261 (long long)p->fts_statp->st_size);
262 tab = "\t";
263 }
264 /*
265 * XXX
266 * Since utimes(2) only takes a timeval, there's no point in
267 * comparing the low bits of the timespec nanosecond field. This
268 * will only result in mismatches that we can never fix.
269 *
270 * Doesn't display microsecond differences.
271 */
272 if (s->flags & F_TIME) {
273 struct timeval tv[2];
274 struct stat *ps = p->fts_statp;
275 time_t smtime = s->st_mtimespec.tv_sec;
276
277 #ifdef BSD4_4
278 time_t pmtime = ps->st_mtimespec.tv_sec;
279
280 TIMESPEC_TO_TIMEVAL(&tv[1], &ps->st_mtimespec);
281 #else
282 time_t pmtime = (time_t)ps->st_mtime;
283
284 tv[1].tv_sec = ps->st_mtime;
285 tv[1].tv_usec = 0;
286 #endif
287 TIMESPEC_TO_TIMEVAL(&tv[0], &s->st_mtimespec);
288
289 if (tv[0].tv_sec != tv[1].tv_sec ||
290 tv[0].tv_usec != tv[1].tv_usec) {
291 LABEL;
292 (void)printf("%smodification time (%.24s, ",
293 tab, ctime(&smtime));
294 (void)printf("%.24s", ctime(&pmtime));
295 if (tflag) {
296 tv[1] = tv[0];
297 if (utimes(p->fts_accpath, tv))
298 (void)printf(", not modified: %s)\n",
299 strerror(errno));
300 else
301 (void)printf(", modified)\n");
302 } else
303 (void)printf(")\n");
304 tab = "\t";
305 }
306 }
307 /*
308 * XXX
309 * since chflags(2) will reset file times, the utimes() above
310 * may have been useless! oh well, we'd rather have correct
311 * flags, rather than times?
312 */
313 if ((s->flags & F_FLAGS) && ((s->st_flags != p->fts_statp->st_flags)
314 || mflag || iflag)) {
315 if (s->st_flags != p->fts_statp->st_flags) {
316 LABEL;
317 (void)printf("%sflags (\"%s\" is not ", tab,
318 flags_to_string(s->st_flags, "none"));
319 (void)printf("\"%s\"",
320 flags_to_string(p->fts_statp->st_flags, "none"));
321 }
322 if (uflag) {
323 if (iflag)
324 SETFLAGS(p->fts_accpath, s->st_flags,
325 0, p->fts_statp->st_flags, CH_MASK);
326 else if (mflag)
327 CLEARFLAGS(p->fts_accpath, s->st_flags,
328 0, p->fts_statp->st_flags, SP_FLGS);
329 else
330 SETFLAGS(p->fts_accpath, s->st_flags,
331 0, p->fts_statp->st_flags,
332 (~SP_FLGS & CH_MASK));
333 } else
334 (void)printf(")\n");
335 tab = "\t";
336 }
337 if (s->flags & F_CKSUM) {
338 if ((fd = open(p->fts_accpath, O_RDONLY, 0)) < 0) {
339 LABEL;
340 (void)printf("%scksum: %s: %s\n",
341 tab, p->fts_accpath, strerror(errno));
342 tab = "\t";
343 } else if (crc(fd, &val, &len)) {
344 (void)close(fd);
345 LABEL;
346 (void)printf("%scksum: %s: %s\n",
347 tab, p->fts_accpath, strerror(errno));
348 tab = "\t";
349 } else {
350 (void)close(fd);
351 if (s->cksum != val) {
352 LABEL;
353 (void)printf("%scksum (%lu, %lu)\n",
354 tab, s->cksum, (unsigned long)val);
355 }
356 tab = "\t";
357 }
358 }
359 if (s->flags & F_MD5) {
360 if (MD5File(p->fts_accpath, md5buf) == NULL) {
361 LABEL;
362 (void)printf("%smd5: %s: %s\n",
363 tab, p->fts_accpath, strerror(errno));
364 tab = "\t";
365 } else {
366 if (strcmp(s->md5sum, md5buf)) {
367 LABEL;
368 (void)printf("%smd5 (0x%s, 0x%s)\n",
369 tab, s->md5sum, md5buf);
370 }
371 tab = "\t";
372 }
373 }
374
375 if (s->flags & F_SLINK && strcmp(cp = rlink(name), s->slink)) {
376 LABEL;
377 (void)printf("%slink ref (%s, %s)\n", tab, cp, s->slink);
378 }
379 return (label);
380 }
381
382 const char *
383 inotype(u_int type)
384 {
385
386 return (nodetype(type & S_IFMT));
387 }
388
389 const char *
390 nodetype(u_int type)
391 {
392
393 switch(type) {
394 case F_BLOCK:
395 case S_IFBLK:
396 return ("block");
397 case F_CHAR:
398 case S_IFCHR:
399 return ("char");
400 case F_DIR:
401 case S_IFDIR:
402 return ("dir");
403 case F_FIFO:
404 case S_IFIFO:
405 return ("fifo");
406 case F_FILE:
407 case S_IFREG:
408 return ("file");
409 case F_LINK:
410 case S_IFLNK:
411 return ("link");
412 case F_SOCK:
413 case S_IFSOCK:
414 return ("socket");
415 default:
416 return ("unknown");
417 }
418 /* NOTREACHED */
419 }
420
421 const char *
422 rlink(const char *name)
423 {
424 static char lbuf[MAXPATHLEN];
425 int len;
426
427 if ((len = readlink(name, lbuf, sizeof(lbuf))) == -1)
428 mtree_err("%s: %s", name, strerror(errno));
429 lbuf[len] = '\0';
430 return (lbuf);
431 }
432