xref: /original-bsd/usr.sbin/mtree/compare.c (revision 753853ba)
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.9 (Berkeley) 01/27/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", s->st_gid, p->fts_statp->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 &&
114 	    s->st_mode != (p->fts_statp->st_mode & MBITS)) {
115 		LABEL;
116 		(void)printf("%spermissions (%#o, %#o",
117 		    tab, s->st_mode, p->fts_statp->st_mode & MBITS);
118 		if (uflag)
119 			if (chmod(p->fts_accpath, s->st_mode))
120 				(void)printf(", not modified: %s)",
121 				    strerror(errno));
122 			else
123 				(void)printf(", modified)");
124 		else
125 			(void)printf(")\n");
126 		tab = "\t";
127 	}
128 	if (s->flags & F_NLINK && s->type != F_DIR &&
129 	    s->st_nlink != p->fts_statp->st_nlink) {
130 		LABEL;
131 		(void)printf("%slink count (%u, %u)\n",
132 		    tab, s->st_nlink, p->fts_statp->st_nlink);
133 		tab = "\t";
134 	}
135 	if (s->flags & F_SIZE && s->st_size != p->fts_statp->st_size) {
136 		LABEL;
137 		(void)printf("%ssize (%ld, %ld)\n",
138 		    tab, s->st_size, p->fts_statp->st_size);
139 		tab = "\t";
140 	}
141 	if (s->flags & F_TIME && s->st_mtime != p->fts_statp->st_mtime) {
142 		LABEL;
143 		(void)printf("%smodification time (%.24s, ",
144 		    tab, ctime(&s->st_mtime));
145 		(void)printf("%.24s)\n", ctime(&p->fts_statp->st_mtime));
146 		tab = "\t";
147 	}
148 	if (s->flags & F_CKSUM)
149 		if ((fd = open(p->fts_accpath, O_RDONLY, 0)) < 0) {
150 			LABEL;
151 			(void)printf("%scksum: %s: %s\n",
152 			    tab, p->fts_accpath, strerror(errno));
153 			tab = "\t";
154 		} else if (crc(fd, &val, &len)) {
155 			(void)close(fd);
156 			LABEL;
157 			(void)printf("%scksum: %s: %s\n",
158 			    tab, p->fts_accpath, strerror(errno));
159 			tab = "\t";
160 		} else {
161 			(void)close(fd);
162 			if (s->cksum != val) {
163 				LABEL;
164 				(void)printf("%scksum (%lu, %lu)\n",
165 				    tab, s->cksum, val);
166 			}
167 			tab = "\t";
168 		}
169 	if (s->flags & F_SLINK && strcmp(cp = rlink(name), s->slink)) {
170 		LABEL;
171 		(void)printf("%slink ref (%s, %s)\n", tab, cp, s->slink);
172 	}
173 	return (label);
174 }
175 
176 char *
177 inotype(type)
178 	u_int type;
179 {
180 	switch(type & S_IFMT) {
181 	case S_IFBLK:
182 		return ("block");
183 	case S_IFCHR:
184 		return ("char");
185 	case S_IFDIR:
186 		return ("dir");
187 	case S_IFIFO:
188 		return ("fifo");
189 	case S_IFREG:
190 		return ("file");
191 	case S_IFLNK:
192 		return ("link");
193 	case S_IFSOCK:
194 		return ("socket");
195 	default:
196 		return ("unknown");
197 	}
198 	/* NOTREACHED */
199 }
200 
201 static char *
202 ftype(type)
203 	u_int type;
204 {
205 	switch(type) {
206 	case F_BLOCK:
207 		return ("block");
208 	case F_CHAR:
209 		return ("char");
210 	case F_DIR:
211 		return ("dir");
212 	case F_FIFO:
213 		return ("fifo");
214 	case F_FILE:
215 		return ("file");
216 	case F_LINK:
217 		return ("link");
218 	case F_SOCK:
219 		return ("socket");
220 	default:
221 		return ("unknown");
222 	}
223 	/* NOTREACHED */
224 }
225 
226 char *
227 rlink(name)
228 	char *name;
229 {
230 	static char lbuf[MAXPATHLEN];
231 	register int len;
232 
233 	if ((len = readlink(name, lbuf, sizeof(lbuf))) == -1)
234 		err("%s: %s", name, strerror(errno));
235 	lbuf[len] = '\0';
236 	return (lbuf);
237 }
238