xref: /original-bsd/usr.sbin/mtree/compare.c (revision 381fb7ab)
1 /*-
2  * Copyright (c) 1989 The Regents of the University of California.
3  * All rights reserved.
4  *
5  * %sccs.include.redist.c%
6  */
7 
8 #ifndef lint
9 static char sccsid[] = "@(#)compare.c	5.10 (Berkeley) 03/31/92";
10 #endif /* not lint */
11 
12 #include <sys/param.h>
13 #include <sys/stat.h>
14 #include <fcntl.h>
15 #include <fts.h>
16 #include <errno.h>
17 #include <stdio.h>
18 #include <time.h>
19 #include <unistd.h>
20 #include "mtree.h"
21 #include "extern.h"
22 
23 extern int uflag;
24 
25 static char *ftype __P((u_int));
26 
27 #define	INDENTNAMELEN	8
28 #define	LABEL \
29 	if (!label++) { \
30 		len = printf("%s: ", RP(p)); \
31 		if (len > INDENTNAMELEN) { \
32 			tab = "\t"; \
33 			(void)printf("\n"); \
34 		} else { \
35 			tab = ""; \
36 			(void)printf("%*s", INDENTNAMELEN - len, ""); \
37 		} \
38 	}
39 
40 int
41 compare(name, s, p)
42 	char *name;
43 	register NODE *s;
44 	register FTSENT *p;
45 {
46 	extern int uflag;
47 	u_long len, val;
48 	int fd, label;
49 	char *cp, *tab;
50 
51 	label = 0;
52 	switch(s->type) {
53 	case F_BLOCK:
54 		if (!S_ISBLK(p->fts_statp->st_mode))
55 			goto typeerr;
56 		break;
57 	case F_CHAR:
58 		if (!S_ISCHR(p->fts_statp->st_mode))
59 			goto typeerr;
60 		break;
61 	case F_DIR:
62 		if (!S_ISDIR(p->fts_statp->st_mode))
63 			goto typeerr;
64 		break;
65 	case F_FIFO:
66 		if (!S_ISFIFO(p->fts_statp->st_mode))
67 			goto typeerr;
68 		break;
69 	case F_FILE:
70 		if (!S_ISREG(p->fts_statp->st_mode))
71 			goto typeerr;
72 		break;
73 	case F_LINK:
74 		if (!S_ISLNK(p->fts_statp->st_mode))
75 			goto typeerr;
76 		break;
77 	case F_SOCK:
78 		if (!S_ISSOCK(p->fts_statp->st_mode)) {
79 typeerr:		LABEL;
80 			(void)printf("\ttype (%s, %s)\n",
81 			    ftype(s->type), inotype(p->fts_statp->st_mode));
82 		}
83 		break;
84 	}
85 	/* Set the uid/gid first, then set the mode. */
86 	if (s->flags & (F_UID | F_UNAME) && s->st_uid != p->fts_statp->st_uid) {
87 		LABEL;
88 		(void)printf("%suser (%u, %u",
89 		    tab, s->st_uid, p->fts_statp->st_uid);
90 		if (uflag)
91 			if (chown(p->fts_accpath, s->st_uid, -1))
92 				(void)printf(", not modified: %s)\n",
93 				    strerror(errno));
94 			else
95 				(void)printf(", modified)\n");
96 		else
97 			(void)printf(")\n");
98 		tab = "\t";
99 	}
100 	if (s->flags & (F_GID | F_GNAME) && s->st_gid != p->fts_statp->st_gid) {
101 		LABEL;
102 		(void)printf("%sgid (%u, %u",
103 		    tab, s->st_gid, p->fts_statp->st_gid);
104 		if (uflag)
105 			if (chown(p->fts_accpath, -1, s->st_gid))
106 				(void)printf(", not modified: %s)",
107 				    strerror(errno));
108 			else
109 				(void)printf(", modified)");
110 		else
111 			(void)printf(")\n");
112 		tab = "\t";
113 	}
114 	if (s->flags & F_MODE &&
115 	    s->st_mode != (p->fts_statp->st_mode & MBITS)) {
116 		LABEL;
117 		(void)printf("%spermissions (%#o, %#o",
118 		    tab, s->st_mode, p->fts_statp->st_mode & MBITS);
119 		if (uflag)
120 			if (chmod(p->fts_accpath, s->st_mode))
121 				(void)printf(", not modified: %s)",
122 				    strerror(errno));
123 			else
124 				(void)printf(", modified)");
125 		else
126 			(void)printf(")\n");
127 		tab = "\t";
128 	}
129 	if (s->flags & F_NLINK && s->type != F_DIR &&
130 	    s->st_nlink != p->fts_statp->st_nlink) {
131 		LABEL;
132 		(void)printf("%slink count (%u, %u)\n",
133 		    tab, s->st_nlink, p->fts_statp->st_nlink);
134 		tab = "\t";
135 	}
136 	if (s->flags & F_SIZE && s->st_size != p->fts_statp->st_size) {
137 		LABEL;
138 		(void)printf("%ssize (%ld, %ld)\n",
139 		    tab, s->st_size, p->fts_statp->st_size);
140 		tab = "\t";
141 	}
142 	if (s->flags & F_TIME && s->st_mtime != p->fts_statp->st_mtime) {
143 		LABEL;
144 		(void)printf("%smodification time (%.24s, ",
145 		    tab, ctime(&s->st_mtime));
146 		(void)printf("%.24s)\n", ctime(&p->fts_statp->st_mtime));
147 		tab = "\t";
148 	}
149 	if (s->flags & F_CKSUM)
150 		if ((fd = open(p->fts_accpath, O_RDONLY, 0)) < 0) {
151 			LABEL;
152 			(void)printf("%scksum: %s: %s\n",
153 			    tab, p->fts_accpath, strerror(errno));
154 			tab = "\t";
155 		} else if (crc(fd, &val, &len)) {
156 			(void)close(fd);
157 			LABEL;
158 			(void)printf("%scksum: %s: %s\n",
159 			    tab, p->fts_accpath, strerror(errno));
160 			tab = "\t";
161 		} else {
162 			(void)close(fd);
163 			if (s->cksum != val) {
164 				LABEL;
165 				(void)printf("%scksum (%lu, %lu)\n",
166 				    tab, s->cksum, val);
167 			}
168 			tab = "\t";
169 		}
170 	if (s->flags & F_SLINK && strcmp(cp = rlink(name), s->slink)) {
171 		LABEL;
172 		(void)printf("%slink ref (%s, %s)\n", tab, cp, s->slink);
173 	}
174 	return (label);
175 }
176 
177 char *
178 inotype(type)
179 	u_int type;
180 {
181 	switch(type & S_IFMT) {
182 	case S_IFBLK:
183 		return ("block");
184 	case S_IFCHR:
185 		return ("char");
186 	case S_IFDIR:
187 		return ("dir");
188 	case S_IFIFO:
189 		return ("fifo");
190 	case S_IFREG:
191 		return ("file");
192 	case S_IFLNK:
193 		return ("link");
194 	case S_IFSOCK:
195 		return ("socket");
196 	default:
197 		return ("unknown");
198 	}
199 	/* NOTREACHED */
200 }
201 
202 static char *
203 ftype(type)
204 	u_int type;
205 {
206 	switch(type) {
207 	case F_BLOCK:
208 		return ("block");
209 	case F_CHAR:
210 		return ("char");
211 	case F_DIR:
212 		return ("dir");
213 	case F_FIFO:
214 		return ("fifo");
215 	case F_FILE:
216 		return ("file");
217 	case F_LINK:
218 		return ("link");
219 	case F_SOCK:
220 		return ("socket");
221 	default:
222 		return ("unknown");
223 	}
224 	/* NOTREACHED */
225 }
226 
227 char *
228 rlink(name)
229 	char *name;
230 {
231 	static char lbuf[MAXPATHLEN];
232 	register int len;
233 
234 	if ((len = readlink(name, lbuf, sizeof(lbuf))) == -1)
235 		err("%s: %s", name, strerror(errno));
236 	lbuf[len] = '\0';
237 	return (lbuf);
238 }
239