mtree.c revision 1.19 1 1.19 lukem /* $NetBSD: mtree.c,v 1.19 2001/10/04 04:51:27 lukem Exp $ */
2 1.5 cgd
3 1.1 cgd /*-
4 1.4 cgd * Copyright (c) 1989, 1990, 1993
5 1.4 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.9 lukem #include <sys/cdefs.h>
37 1.1 cgd #ifndef lint
38 1.9 lukem __COPYRIGHT("@(#) Copyright (c) 1989, 1990, 1993\n\
39 1.9 lukem The Regents of the University of California. All rights reserved.\n");
40 1.1 cgd #endif /* not lint */
41 1.1 cgd
42 1.1 cgd #ifndef lint
43 1.5 cgd #if 0
44 1.4 cgd static char sccsid[] = "@(#)mtree.c 8.1 (Berkeley) 6/6/93";
45 1.5 cgd #else
46 1.19 lukem __RCSID("$NetBSD: mtree.c,v 1.19 2001/10/04 04:51:27 lukem Exp $");
47 1.5 cgd #endif
48 1.1 cgd #endif /* not lint */
49 1.1 cgd
50 1.1 cgd #include <sys/param.h>
51 1.1 cgd #include <sys/stat.h>
52 1.15 simonb
53 1.1 cgd #include <errno.h>
54 1.15 simonb #include <fts.h>
55 1.15 simonb #include <stdio.h>
56 1.19 lukem #include <stdlib.h>
57 1.3 cgd #include <unistd.h>
58 1.15 simonb
59 1.1 cgd #include "mtree.h"
60 1.3 cgd #include "extern.h"
61 1.1 cgd
62 1.18 lukem int ftsoptions = FTS_PHYSICAL;
63 1.18 lukem int cflag, dflag, Dflag, eflag, iflag, lflag, mflag,
64 1.18 lukem rflag, sflag, tflag, uflag, Uflag;
65 1.18 lukem int keys;
66 1.18 lukem char fullpath[MAXPATHLEN];
67 1.19 lukem char **excludetags, **includetags;
68 1.3 cgd
69 1.19 lukem static void addtag(char ***, int *, char *);
70 1.15 simonb int main(int, char **);
71 1.19 lukem static void parsetags(char ***, int *, char *);
72 1.15 simonb static void usage(void);
73 1.3 cgd
74 1.3 cgd int
75 1.15 simonb main(int argc, char **argv)
76 1.1 cgd {
77 1.19 lukem int ch, status, etagc, itagc;
78 1.19 lukem char *dir, *p;
79 1.16 cgd
80 1.16 cgd setprogname(argv[0]);
81 1.1 cgd
82 1.19 lukem etagc = itagc = 0;
83 1.3 cgd dir = NULL;
84 1.3 cgd keys = KEYDEFAULT;
85 1.19 lukem while ((ch = getopt(argc, argv, "cdDeE:f:I:iK:k:lmp:rR:s:tUux")) != -1)
86 1.1 cgd switch((char)ch) {
87 1.1 cgd case 'c':
88 1.1 cgd cflag = 1;
89 1.1 cgd break;
90 1.1 cgd case 'd':
91 1.1 cgd dflag = 1;
92 1.1 cgd break;
93 1.18 lukem case 'D':
94 1.18 lukem Dflag = 1;
95 1.18 lukem break;
96 1.19 lukem case 'E':
97 1.19 lukem parsetags(&excludetags, &etagc, optarg);
98 1.19 lukem break;
99 1.1 cgd case 'e':
100 1.1 cgd eflag = 1;
101 1.1 cgd break;
102 1.1 cgd case 'f':
103 1.3 cgd if (!(freopen(optarg, "r", stdin)))
104 1.10 wsanchez mtree_err("%s: %s", optarg, strerror(errno));
105 1.3 cgd break;
106 1.19 lukem case 'I':
107 1.19 lukem parsetags(&includetags, &itagc, optarg);
108 1.19 lukem break;
109 1.14 mrg case 'i':
110 1.14 mrg iflag = 1;
111 1.14 mrg break;
112 1.3 cgd case 'K':
113 1.3 cgd while ((p = strsep(&optarg, " \t,")) != NULL)
114 1.3 cgd if (*p != '\0')
115 1.3 cgd keys |= parsekey(p, NULL);
116 1.3 cgd break;
117 1.3 cgd case 'k':
118 1.3 cgd keys = F_TYPE;
119 1.3 cgd while ((p = strsep(&optarg, " \t,")) != NULL)
120 1.3 cgd if (*p != '\0')
121 1.3 cgd keys |= parsekey(p, NULL);
122 1.1 cgd break;
123 1.17 perry case 'l':
124 1.17 perry lflag = 1;
125 1.17 perry break;
126 1.14 mrg case 'm':
127 1.14 mrg mflag = 1;
128 1.14 mrg break;
129 1.1 cgd case 'p':
130 1.1 cgd dir = optarg;
131 1.1 cgd break;
132 1.1 cgd case 'r':
133 1.1 cgd rflag = 1;
134 1.1 cgd break;
135 1.18 lukem case 'R':
136 1.18 lukem while ((p = strsep(&optarg, " \t,")) != NULL)
137 1.18 lukem if (*p != '\0')
138 1.18 lukem keys &= ~parsekey(p, NULL);
139 1.18 lukem break;
140 1.3 cgd case 's':
141 1.3 cgd sflag = 1;
142 1.3 cgd crc_total = ~strtol(optarg, &p, 0);
143 1.3 cgd if (*p)
144 1.10 wsanchez mtree_err("illegal seed value -- %s", optarg);
145 1.7 thorpej break;
146 1.6 mycroft case 't':
147 1.6 mycroft tflag = 1;
148 1.6 mycroft break;
149 1.8 agc case 'U':
150 1.8 agc Uflag = uflag = 1;
151 1.8 agc break;
152 1.1 cgd case 'u':
153 1.1 cgd uflag = 1;
154 1.1 cgd break;
155 1.1 cgd case 'x':
156 1.1 cgd ftsoptions |= FTS_XDEV;
157 1.1 cgd break;
158 1.1 cgd case '?':
159 1.1 cgd default:
160 1.1 cgd usage();
161 1.1 cgd }
162 1.1 cgd argc -= optind;
163 1.3 cgd argv += optind;
164 1.3 cgd
165 1.1 cgd if (argc)
166 1.1 cgd usage();
167 1.1 cgd
168 1.19 lukem addtag(&excludetags, &etagc, NULL);
169 1.19 lukem addtag(&includetags, &itagc, NULL);
170 1.19 lukem
171 1.3 cgd if (dir && chdir(dir))
172 1.10 wsanchez mtree_err("%s: %s", dir, strerror(errno));
173 1.1 cgd
174 1.12 thorpej if ((cflag || sflag) && !getcwd(fullpath, MAXPATHLEN))
175 1.13 itohy mtree_err("%s", strerror(errno));
176 1.1 cgd
177 1.18 lukem if (cflag == 1 && Dflag == 1)
178 1.18 lukem mtree_err("-c and -D flags are mutually exclusive");
179 1.18 lukem
180 1.14 mrg if (iflag == 1 && mflag == 1)
181 1.14 mrg mtree_err("-i and -m flags are mutually exclusive");
182 1.14 mrg
183 1.17 perry if (lflag == 1 && uflag == 1)
184 1.17 perry mtree_err("-l and -u flags are mutually exclusive");
185 1.17 perry
186 1.3 cgd if (cflag) {
187 1.1 cgd cwalk();
188 1.3 cgd exit(0);
189 1.3 cgd }
190 1.18 lukem if (Dflag) {
191 1.18 lukem dump_nodes("", spec());
192 1.18 lukem exit(0);
193 1.18 lukem }
194 1.8 agc status = verify();
195 1.8 agc if (Uflag & (status == MISMATCHEXIT))
196 1.8 agc status = 0;
197 1.8 agc exit(status);
198 1.1 cgd }
199 1.1 cgd
200 1.19 lukem
201 1.19 lukem static void
202 1.19 lukem addtag(char ***list, int *count, char *elem)
203 1.19 lukem {
204 1.19 lukem
205 1.19 lukem #define TAG_CHUNK 20
206 1.19 lukem
207 1.19 lukem if ((*count % TAG_CHUNK) == 0) {
208 1.19 lukem char **new;
209 1.19 lukem
210 1.19 lukem new = (char **)realloc(*list, (*count + TAG_CHUNK)
211 1.19 lukem * sizeof(char *));
212 1.19 lukem if (new == NULL)
213 1.19 lukem mtree_err("memory allocation error");
214 1.19 lukem *list = new;
215 1.19 lukem }
216 1.19 lukem (*list)[*count] = elem;
217 1.19 lukem (*count)++;
218 1.19 lukem }
219 1.19 lukem
220 1.19 lukem static void
221 1.19 lukem parsetags(char ***list, int *count, char *args)
222 1.19 lukem {
223 1.19 lukem char *p, *e;
224 1.19 lukem int len;
225 1.19 lukem
226 1.19 lukem if (args == NULL) {
227 1.19 lukem addtag(list, count, NULL);
228 1.19 lukem return;
229 1.19 lukem }
230 1.19 lukem while ((p = strsep(&args, ",")) != NULL) {
231 1.19 lukem if (*p == '\0')
232 1.19 lukem continue;
233 1.19 lukem len = strlen(p) + 3; /* "," + p + ",\0" */
234 1.19 lukem if ((e = malloc(len)) == NULL)
235 1.19 lukem mtree_err("memory allocation error");
236 1.19 lukem snprintf(e, len, ",%s,", p);
237 1.19 lukem addtag(list, count, e);
238 1.19 lukem }
239 1.19 lukem }
240 1.19 lukem
241 1.3 cgd static void
242 1.15 simonb usage(void)
243 1.1 cgd {
244 1.15 simonb
245 1.18 lukem (void)fprintf(stderr, "usage: mtree [-cdDelrUux] [-i|-m] [-f spec]"
246 1.19 lukem " [-k key] [-K addkey] [-R removekey]\n"
247 1.19 lukem "\t\t[-I inctags] [-E exctags] [-p path] [-s seed]\n");
248 1.1 cgd exit(1);
249 1.1 cgd }
250