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