1/*-
2 * Copyright (c) 1989, 1993
3 * The Regents of the University of California. All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. Neither the name of the University nor the names of its contributors
14 * may be used to endorse or promote products derived from this software
15 * without specific prior written permission.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
28 */
29
30#if 0
31#ifndef lint
32static char sccsid[] = "@(#)compare.c 8.1 (Berkeley) 6/6/93";
33#endif /* not lint */
34#endif
35#include <sys/cdefs.h>
36__FBSDID("$FreeBSD: head/usr.sbin/mtree/compare.c 121853 2003-11-01 08:43:54Z bde $");
37
38#include <sys/param.h>
39#include <sys/stat.h>
40#include <sys/time.h>
41
42#include <err.h>
43#include <errno.h>
44#include <fcntl.h>
45#include <fts.h>
46#ifdef MD5
47#include <md5.h>
48#endif
49#ifdef RMD160
50#include <ripemd.h>
51#endif
52#ifdef SHA1
53#include <sha.h>
54#endif
55#include <stdint.h>
56#include <stdio.h>
57#include <time.h>
58#include <unistd.h>
59#include <vis.h>
60
61#include "mtree.h"
62#include "extern.h"
63
64extern int uflag;
65extern int lineno;
66
67static const char *ftype(u_int);
68
69#define INDENTNAMELEN 8
70#define LABEL \
71 if (!label++) { \
72 len = printf("%s changed\n", RP(p)); \
73 tab = "\t"; \
74 }
75
76int
77compare(char *name __unused, NODE *s, FTSENT *p)
78{
79 struct timeval tv[2];
80 uint32_t val;
81 int fd, label;
82 off_t len;
83 char *cp;
84 const char *tab = "";
85 char *fflags;
86
87 label = 0;
88 switch(s->type) {
89 case F_BLOCK:
90 if (!S_ISBLK(p->fts_statp->st_mode))
91 goto typeerr;
92 break;
93 case F_CHAR:
94 if (!S_ISCHR(p->fts_statp->st_mode))
95 goto typeerr;
96 break;
97 case F_DIR:
98 if (!S_ISDIR(p->fts_statp->st_mode))
99 goto typeerr;
100 break;
101 case F_FIFO:
102 if (!S_ISFIFO(p->fts_statp->st_mode))
103 goto typeerr;
104 break;
105 case F_FILE:
106 if (!S_ISREG(p->fts_statp->st_mode))
107 goto typeerr;
108 break;
109 case F_LINK:
110 if (!S_ISLNK(p->fts_statp->st_mode))
111 goto typeerr;
112 break;
113 case F_SOCK:
114 if (!S_ISSOCK(p->fts_statp->st_mode)) {
115typeerr: LABEL;
116 (void)printf("\ttype expected %s found %s\n",
117 ftype(s->type), inotype(p->fts_statp->st_mode));
118 return (label);
119 }
120 break;
121 }
122 /* Set the uid/gid first, then set the mode. */
123 if (s->flags & (F_UID | F_UNAME) && s->st_uid != p->fts_statp->st_uid) {
124 LABEL;
125 (void)printf("%suser expected %lu found %lu",
126 tab, (u_long)s->st_uid, (u_long)p->fts_statp->st_uid);
127 if (uflag)
128 if (chown(p->fts_accpath, s->st_uid, -1))
129 (void)printf(" not modified: %s\n",
130 strerror(errno));
131 else
132 (void)printf(" modified\n");
133 else
134 (void)printf("\n");
135 tab = "\t";
136 }
137 if (s->flags & (F_GID | F_GNAME) && s->st_gid != p->fts_statp->st_gid) {
138 LABEL;
139 (void)printf("%sgid expected %lu found %lu",
140 tab, (u_long)s->st_gid, (u_long)p->fts_statp->st_gid);
141 if (uflag)
142 if (chown(p->fts_accpath, -1, s->st_gid))
143 (void)printf(" not modified: %s\n",
144 strerror(errno));
145 else
146 (void)printf(" modified\n");
147 else
148 (void)printf("\n");
149 tab = "\t";
150 }
151 if (s->flags & F_MODE &&
152 !S_ISLNK(p->fts_statp->st_mode) &&
153 s->st_mode != (p->fts_statp->st_mode & MBITS)) {
154 LABEL;
155 (void)printf("%spermissions expected %#o found %#o",
156 tab, s->st_mode, p->fts_statp->st_mode & MBITS);
157 if (uflag)
158 if (chmod(p->fts_accpath, s->st_mode))
159 (void)printf(" not modified: %s\n",
160 strerror(errno));
161 else
162 (void)printf(" modified\n");
163 else
164 (void)printf("\n");
165 tab = "\t";
166 }
167 if (s->flags & F_NLINK && s->type != F_DIR &&
168 s->st_nlink != p->fts_statp->st_nlink) {
169 LABEL;
170 (void)printf("%slink_count expected %u found %u\n",
171 tab, s->st_nlink, p->fts_statp->st_nlink);
172 tab = "\t";
173 }
174 if (s->flags & F_SIZE && s->st_size != p->fts_statp->st_size &&
175 !S_ISDIR(p->fts_statp->st_mode)) {
176 LABEL;
177 (void)printf("%ssize expected %jd found %jd\n", tab,
178 (intmax_t)s->st_size, (intmax_t)p->fts_statp->st_size);
179 tab = "\t";
180 }
181 /*
182 * XXX
183 * Catches nano-second differences, but doesn't display them.
184 */
185 if ((s->flags & F_TIME) &&
186 ((s->st_mtimespec.tv_sec != p->fts_statp->st_mtimespec.tv_sec) ||
187 (s->st_mtimespec.tv_nsec != p->fts_statp->st_mtimespec.tv_nsec))) {
188 LABEL;
189 (void)printf("%smodification time expected %.24s ",
190 tab, ctime(&s->st_mtimespec.tv_sec));
191 (void)printf("found %.24s",
192 ctime(&p->fts_statp->st_mtimespec.tv_sec));
193 if (uflag) {
194 tv[0].tv_sec = s->st_mtimespec.tv_sec;
195 tv[0].tv_usec = s->st_mtimespec.tv_nsec / 1000;
196 tv[1] = tv[0];
197 if (utimes(p->fts_accpath, tv))
198 (void)printf(" not modified: %s\n",
199 strerror(errno));
200 else
201 (void)printf(" modified\n");
202 } else
203 (void)printf("\n");
204 tab = "\t";
205 }
206 if (s->flags & F_CKSUM) {
207 if ((fd = open(p->fts_accpath, O_RDONLY, 0)) < 0) {
208 LABEL;
209 (void)printf("%scksum: %s: %s\n",
210 tab, p->fts_accpath, strerror(errno));
211 tab = "\t";
212 } else if (crc(fd, &val, &len)) {
213 (void)close(fd);
214 LABEL;
215 (void)printf("%scksum: %s: %s\n",
216 tab, p->fts_accpath, strerror(errno));
217 tab = "\t";
218 } else {
219 (void)close(fd);
220 if (s->cksum != val) {
221 LABEL;
222 (void)printf("%scksum expected %lu found %lu\n",
223 tab, s->cksum, (unsigned long)val);
224 tab = "\t";
225 }
226 }
227 }
228 if ((s->flags & F_FLAGS) && s->st_flags != p->fts_statp->st_flags) {
229 LABEL;
230 fflags = flags_to_string(s->st_flags);
231 (void)printf("%sflags expected \"%s\"", tab, fflags);
232 free(fflags);
233
234 fflags = flags_to_string(p->fts_statp->st_flags);
235 (void)printf(" found \"%s\"", fflags);
236 free(fflags);
237
238 if (uflag)
239 if (chflags(p->fts_accpath, s->st_flags))
240 (void)printf(" not modified: %s\n",
241 strerror(errno));
242 else
243 (void)printf(" modified\n");
244 else
245 (void)printf("\n");
246 tab = "\t";
247 }
248#ifdef MD5
249 if (s->flags & F_MD5) {
250 char *new_digest, buf[33];
251
252 new_digest = MD5File(p->fts_accpath, buf);
253 if (!new_digest) {
254 LABEL;
255 printf("%sMD5: %s: %s\n", tab, p->fts_accpath,
256 strerror(errno));
257 tab = "\t";
258 } else if (strcmp(new_digest, s->md5digest)) {
259 LABEL;
260 printf("%sMD5 expected %s found %s\n", tab, s->md5digest,
261 new_digest);
262 tab = "\t";
263 }
264 }
265#endif /* MD5 */
266#ifdef SHA1
267 if (s->flags & F_SHA1) {
268 char *new_digest, buf[41];
269
270 new_digest = SHA1_File(p->fts_accpath, buf);
271 if (!new_digest) {
272 LABEL;
273 printf("%sSHA-1: %s: %s\n", tab, p->fts_accpath,
274 strerror(errno));
275 tab = "\t";
276 } else if (strcmp(new_digest, s->sha1digest)) {
277 LABEL;
278 printf("%sSHA-1 expected %s found %s\n",
279 tab, s->sha1digest, new_digest);
280 tab = "\t";
281 }
282 }
283#endif /* SHA1 */
284#ifdef RMD160
285 if (s->flags & F_RMD160) {
286 char *new_digest, buf[41];
287
288 new_digest = RIPEMD160_File(p->fts_accpath, buf);
289 if (!new_digest) {
290 LABEL;
291 printf("%sRIPEMD160: %s: %s\n", tab,
292 p->fts_accpath, strerror(errno));
293 tab = "\t";
294 } else if (strcmp(new_digest, s->rmd160digest)) {
295 LABEL;
296 printf("%sRIPEMD160 expected %s found %s\n",
297 tab, s->rmd160digest, new_digest);
298 tab = "\t";
299 }
300 }
301#endif /* RMD160 */
302
303 if (s->flags & F_SLINK &&
304 strcmp(cp = rlink(p->fts_accpath), s->slink)) {
305 LABEL;
306 (void)printf("%slink_ref expected %s found %s\n",
307 tab, s->slink, cp);
308 }
309 return (label);
310}
311
312const char *
313inotype(u_int type)
314{
315 switch(type & S_IFMT) {
316 case S_IFBLK:
317 return ("block");
318 case S_IFCHR:
319 return ("char");
320 case S_IFDIR:
321 return ("dir");
322 case S_IFIFO:
323 return ("fifo");
324 case S_IFREG:
325 return ("file");
326 case S_IFLNK:
327 return ("link");
328 case S_IFSOCK:
329 return ("socket");
330 default:
331 return ("unknown");
332 }
333 /* NOTREACHED */
334}
335
336static const char *
337ftype(u_int type)
338{
339 switch(type) {
340 case F_BLOCK:
341 return ("block");
342 case F_CHAR:
343 return ("char");
344 case F_DIR:
345 return ("dir");
346 case F_FIFO:
347 return ("fifo");
348 case F_FILE:
349 return ("file");
350 case F_LINK:
351 return ("link");
352 case F_SOCK:
353 return ("socket");
354 default:
355 return ("unknown");
356 }
357 /* NOTREACHED */
358}
359
360char *
361rlink(char *name)
362{
363 static char lbuf[MAXPATHLEN * 4];
364 int len;
365 char tbuf[MAXPATHLEN];
366
367 if ((len = readlink(name, tbuf, sizeof(tbuf) - 1)) == -1)
368 err(1, "line %d: %s", lineno, name);
369 tbuf[len] = '\0';
370 strvis(lbuf, tbuf, VIS_WHITE | VIS_OCTAL);
371 return (lbuf);
372}