xref: /original-bsd/usr.sbin/mtree/compare.c (revision e59fb703)
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.8 (Berkeley) 12/11/91";
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_statb.st_mode))
55 			goto typeerr;
56 		break;
57 	case F_CHAR:
58 		if (!S_ISCHR(p->fts_statb.st_mode))
59 			goto typeerr;
60 		break;
61 	case F_DIR:
62 		if (!S_ISDIR(p->fts_statb.st_mode))
63 			goto typeerr;
64 		break;
65 	case F_FIFO:
66 		if (!S_ISFIFO(p->fts_statb.st_mode))
67 			goto typeerr;
68 		break;
69 	case F_FILE:
70 		if (!S_ISREG(p->fts_statb.st_mode))
71 			goto typeerr;
72 		break;
73 	case F_LINK:
74 		if (!S_ISLNK(p->fts_statb.st_mode))
75 			goto typeerr;
76 		break;
77 	case F_SOCK:
78 		if (!S_ISSOCK(p->fts_statb.st_mode)) {
79 typeerr:		LABEL;
80 			(void)printf("\ttype (%s, %s)\n",
81 			    ftype(s->type), inotype(p->fts_statb.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_statb.st_uid) {
87 		LABEL;
88 		(void)printf("%suser (%u, %u",
89 		    tab, s->st_uid, p->fts_statb.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_statb.st_gid) {
101 		LABEL;
102 		(void)printf("%sgid (%u, %u", s->st_gid, p->fts_statb.st_gid);
103 		if (uflag)
104 			if (chown(p->fts_accpath, -1, s->st_gid))
105 				(void)printf(", not modified: %s)",
106 				    strerror(errno));
107 			else
108 				(void)printf(", modified)");
109 		else
110 			(void)printf(")\n");
111 		tab = "\t";
112 	}
113 	if (s->flags & F_MODE && s->st_mode != (p->fts_statb.st_mode & MBITS)) {
114 		LABEL;
115 		(void)printf("%spermissions (%#o, %#o",
116 		    tab, s->st_mode, p->fts_statb.st_mode & MBITS);
117 		if (uflag)
118 			if (chmod(p->fts_accpath, s->st_mode))
119 				(void)printf(", not modified: %s)",
120 				    strerror(errno));
121 			else
122 				(void)printf(", modified)");
123 		else
124 			(void)printf(")\n");
125 		tab = "\t";
126 	}
127 	if (s->flags & F_NLINK && s->type != F_DIR &&
128 	    s->st_nlink != p->fts_statb.st_nlink) {
129 		LABEL;
130 		(void)printf("%slink count (%u, %u)\n",
131 		    tab, s->st_nlink, p->fts_statb.st_nlink);
132 		tab = "\t";
133 	}
134 	if (s->flags & F_SIZE && s->st_size != p->fts_statb.st_size) {
135 		LABEL;
136 		(void)printf("%ssize (%ld, %ld)\n",
137 		    tab, s->st_size, p->fts_statb.st_size);
138 		tab = "\t";
139 	}
140 	if (s->flags & F_TIME && s->st_mtime != p->fts_statb.st_mtime) {
141 		LABEL;
142 		(void)printf("%smodification time (%.24s, ",
143 		    tab, ctime(&s->st_mtime));
144 		(void)printf("%.24s)\n", ctime(&p->fts_statb.st_mtime));
145 		tab = "\t";
146 	}
147 	if (s->flags & F_CKSUM)
148 		if ((fd = open(p->fts_accpath, O_RDONLY, 0)) < 0) {
149 			LABEL;
150 			(void)printf("%scksum: %s: %s\n",
151 			    tab, p->fts_accpath, strerror(errno));
152 			tab = "\t";
153 		} else if (crc(fd, &val, &len)) {
154 			(void)close(fd);
155 			LABEL;
156 			(void)printf("%scksum: %s: %s\n",
157 			    tab, p->fts_accpath, strerror(errno));
158 			tab = "\t";
159 		} else {
160 			(void)close(fd);
161 			if (s->cksum != val) {
162 				LABEL;
163 				(void)printf("%scksum (%lu, %lu)\n",
164 				    tab, s->cksum, val);
165 			}
166 			tab = "\t";
167 		}
168 	if (s->flags & F_SLINK && strcmp(cp = rlink(name), s->slink)) {
169 		LABEL;
170 		(void)printf("%slink ref (%s, %s)\n", tab, cp, s->slink);
171 	}
172 	return (label);
173 }
174 
175 char *
176 inotype(type)
177 	u_int type;
178 {
179 	switch(type & S_IFMT) {
180 	case S_IFBLK:
181 		return ("block");
182 	case S_IFCHR:
183 		return ("char");
184 	case S_IFDIR:
185 		return ("dir");
186 	case S_IFIFO:
187 		return ("fifo");
188 	case S_IFREG:
189 		return ("file");
190 	case S_IFLNK:
191 		return ("link");
192 	case S_IFSOCK:
193 		return ("socket");
194 	default:
195 		return ("unknown");
196 	}
197 	/* NOTREACHED */
198 }
199 
200 static char *
201 ftype(type)
202 	u_int type;
203 {
204 	switch(type) {
205 	case F_BLOCK:
206 		return ("block");
207 	case F_CHAR:
208 		return ("char");
209 	case F_DIR:
210 		return ("dir");
211 	case F_FIFO:
212 		return ("fifo");
213 	case F_FILE:
214 		return ("file");
215 	case F_LINK:
216 		return ("link");
217 	case F_SOCK:
218 		return ("socket");
219 	default:
220 		return ("unknown");
221 	}
222 	/* NOTREACHED */
223 }
224 
225 char *
226 rlink(name)
227 	char *name;
228 {
229 	static char lbuf[MAXPATHLEN];
230 	register int len;
231 
232 	if ((len = readlink(name, lbuf, sizeof(lbuf))) == -1)
233 		err("%s: %s", name, strerror(errno));
234 	lbuf[len] = '\0';
235 	return (lbuf);
236 }
237