2 * Copyright (c) 1989, 1993
3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
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.
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
32 static char sccsid
[] = "@(#)spec.c 8.1 (Berkeley) 6/6/93";
35 #include <sys/cdefs.h>
36 __FBSDID("$FreeBSD: src/usr.sbin/mtree/spec.c,v 1.22 2005/03/29 11:44:17 tobez Exp $");
38 #include <sys/types.h>
54 int lineno
; /* Current spec line number. */
56 static void set(char *, NODE
*);
57 static void unset(char *, NODE
*);
60 mtree_readspec(FILE *fi
)
68 centry
= last
= root
= NULL
;
69 bzero(&ginfo
, sizeof(ginfo
));
71 for (lineno
= 1; fgets(buf
, sizeof(buf
), fi
);
72 ++lineno
, c_cur
= c_next
, c_next
= 0) {
73 /* Skip empty lines. */
77 /* Find end of line. */
78 if ((p
= index(buf
, '\n')) == NULL
) {
79 RECORD_FAILURE(21, ERANGE
);
80 errx(1, "line %d too long", lineno
);
83 /* See if next line is continuation line. */
89 /* Null-terminate the line. */
92 /* Skip leading whitespace. */
93 for (p
= buf
; *p
&& isspace(*p
); ++p
);
95 /* If nothing but whitespace or comment char, continue. */
100 (void)fprintf(stderr
, "line %d: {%s}\n", lineno
, p
);
107 /* Grab file name, "$", "set", or "unset". */
108 if ((p
= strtok(p
, "\n\t ")) == NULL
) {
109 RECORD_FAILURE(22, EINVAL
);
110 errx(1, "line %d: missing field", lineno
);
116 if (strcmp(p
+ 1, "set"))
121 if (strcmp(p
+ 1, "unset"))
128 RECORD_FAILURE(23, EINVAL
);
129 errx(1, "line %d: slash character in file name",
133 if (!strcmp(p
, "..")) {
134 /* Don't go up, if haven't gone down. */
137 if (last
->type
!= F_DIR
|| last
->flags
& F_DONE
) {
142 last
->flags
|= F_DONE
;
145 noparent
: RECORD_FAILURE(24, EINVAL
);
146 errx(1, "line %d: no parent node", lineno
);
149 if ((centry
= calloc(1, sizeof(NODE
) + strlen(p
))) == NULL
) {
150 RECORD_FAILURE(25, ENOMEM
);
155 if (strpbrk(p
, MAGIC
))
156 centry
->flags
|= F_MAGIC
;
157 if (strunvis(centry
->name
, p
) == -1) {
158 RECORD_FAILURE(26, EILSEQ
);
159 errx(1, "filename %s is ill-encoded", p
);
164 last
= root
= centry
;
166 } else if (last
->type
== F_DIR
&& !(last
->flags
& F_DONE
)) {
167 centry
->parent
= last
;
168 last
= last
->child
= centry
;
170 centry
->parent
= last
->parent
;
172 last
= last
->next
= centry
;
179 set(char *t
, NODE
*ip
)
183 char *kw
, *val
= NULL
;
190 for (; (kw
= strtok(t
, "= \t\n")); t
= NULL
) {
191 ip
->flags
|= type
= parsekey(kw
, &value
);
192 if ((value
== 0) || (val
= strtok(NULL
, " \t\n")) == NULL
) {
193 RECORD_FAILURE(27, EINVAL
);
194 errx(1, "line %d: missing value", lineno
);
198 ip
->cksum
= strtoul(val
, &ep
, 10);
200 RECORD_FAILURE(28, EINVAL
);
201 errx(1, "line %d: invalid checksum %s",
206 ip
->md5digest
= strdup(val
);
207 if (!ip
->md5digest
) {
208 RECORD_FAILURE(29, ENOMEM
);
213 ip
->sha1digest
= strdup(val
);
214 if (!ip
->sha1digest
) {
215 RECORD_FAILURE(30, ENOMEM
);
220 ip
->sha256digest
= strdup(val
);
221 if (!ip
->sha256digest
) {
222 RECORD_FAILURE(31, ENOMEM
);
227 ip
->rmd160digest
= strdup(val
);
228 if (!ip
->rmd160digest
) {
229 RECORD_FAILURE(32, ENOMEM
);
234 if (strcmp("none", val
) == 0) {
236 } else if (strtofflags(&val
, &ip
->st_flags
, NULL
) != 0) {
237 RECORD_FAILURE(33, EINVAL
);
238 errx(1, "line %d: invalid flag %s",lineno
, val
);
242 ip
->st_gid
= (gid_t
)strtoul(val
, &ep
, 10);
244 RECORD_FAILURE(34, EINVAL
);
245 errx(1, "line %d: invalid gid %s", lineno
, val
);
249 if ((gr
= getgrnam(val
)) == NULL
) {
250 RECORD_FAILURE(35, EINVAL
);
251 errx(1, "line %d: unknown group %s", lineno
, val
);
253 ip
->st_gid
= gr
->gr_gid
;
256 /* just set flag bit */
259 if ((m
= setmode(val
)) == NULL
) {
260 RECORD_FAILURE(36, EINVAL
);
261 errx(1, "line %d: invalid file mode %s",
264 ip
->st_mode
= getmode(m
, 0);
268 ip
->st_nlink
= strtoul(val
, &ep
, 10);
270 RECORD_FAILURE(37, EINVAL
);
271 errx(1, "line %d: invalid link count %s",
276 ip
->st_size
= strtoq(val
, &ep
, 10);
278 RECORD_FAILURE(38, EINVAL
);
279 errx(1, "line %d: invalid size %s",
284 ip
->slink
= malloc(strlen(val
) + 1);
285 if (ip
->slink
== NULL
) {
286 RECORD_FAILURE(39, ENOMEM
);
289 if (strunvis(ip
->slink
, val
) == -1) {
290 RECORD_FAILURE(40, EILSEQ
);
291 errx(1, "symlink %s is ill-encoded", val
);
295 ip
->st_mtimespec
.tv_sec
= strtoul(val
, &ep
, 10);
297 RECORD_FAILURE(41, EINVAL
);
298 errx(1, "line %d: invalid time %s",
302 ip
->st_mtimespec
.tv_nsec
= strtoul(val
, &ep
, 10);
304 RECORD_FAILURE(42, EINVAL
);
305 errx(1, "line %d: invalid time %s",
312 if (!strcmp(val
, "block"))
316 if (!strcmp(val
, "char"))
320 if (!strcmp(val
, "dir"))
324 if (!strcmp(val
, "file"))
326 if (!strcmp(val
, "fifo"))
330 if (!strcmp(val
, "link"))
334 if (!strcmp(val
, "socket"))
338 RECORD_FAILURE(43, EINVAL
);
339 errx(1, "line %d: unknown file type %s",
344 ip
->st_uid
= (uid_t
)strtoul(val
, &ep
, 10);
346 RECORD_FAILURE(44, EINVAL
);
347 errx(1, "line %d: invalid uid %s", lineno
, val
);
351 if ((pw
= getpwnam(val
)) == NULL
) {
352 RECORD_FAILURE(45, EINVAL
);
353 errx(1, "line %d: unknown user %s", lineno
, val
);
355 ip
->st_uid
= pw
->pw_uid
;
358 ip
->st_birthtimespec
.tv_sec
= strtoul(val
, &ep
, 10);
360 RECORD_FAILURE(46, EINVAL
);
361 errx(1, "line %d: invalid time %s",
365 ip
->st_birthtimespec
.tv_nsec
= strtoul(val
, &ep
, 10);
367 RECORD_FAILURE(47, EINVAL
);
368 errx(1, "line %d: invalid time %s",
373 ip
->st_atimespec
.tv_sec
= strtoul(val
, &ep
, 10);
375 RECORD_FAILURE(48, EINVAL
);
376 errx(1, "line %d: invalid time %s",
380 ip
->st_atimespec
.tv_nsec
= strtoul(val
, &ep
, 10);
382 RECORD_FAILURE(49, EINVAL
);
383 errx(1, "line %d: invalid time %s",
388 ip
->st_ctimespec
.tv_sec
= strtoul(val
, &ep
, 10);
390 RECORD_FAILURE(50, EINVAL
);
391 errx(1, "line %d: invalid time %s",
395 ip
->st_ctimespec
.tv_nsec
= strtoul(val
, &ep
, 10);
397 RECORD_FAILURE(51, EINVAL
);
398 errx(1, "line %d: invalid time %s",
403 ip
->st_ptimespec
.tv_sec
= strtoul(val
, &ep
, 10);
405 RECORD_FAILURE(52, EINVAL
);
406 errx(1, "line %d: invalid time %s",
410 ip
->st_ptimespec
.tv_nsec
= strtoul(val
, &ep
, 10);
412 RECORD_FAILURE(53, EINVAL
);
413 errx(1, "line %d: invalid time %s",
418 ep
= strtok(val
,".");
419 ip
->xattrsdigest
= strdup(ep
);
420 if (!ip
->xattrsdigest
) {
422 RECORD_FAILURE(54, error
);
423 errc(1, error
, "strdup");
425 val
= strtok(NULL
,".");
427 ip
->xdstream_priv_id
= strtoull(val
, &ep
, 10);
429 RECORD_FAILURE(55, EINVAL
);
430 errx(1, "line %d: invalid private id %s",
434 ip
->xdstream_priv_id
= 0;
438 ip
->st_ino
= (ino_t
)strtoull(val
, &ep
, 10);
440 RECORD_FAILURE(56, EINVAL
);
441 errx(1, "line %d: invalid inode %s",
446 ip
->acldigest
= strdup(val
);
447 if (!ip
->acldigest
) {
449 RECORD_FAILURE(57, error
);
450 errc(1, error
, "strdup");
454 ip
->sibling_id
= (quad_t
)strtoull(val
, &ep
, 10);
456 RECORD_FAILURE(58, EINVAL
);
457 errx(1, "line %d: invalid sibling id %s", lineno
, val
);
464 unset(char *t
, NODE
*ip
)
468 while ((p
= strtok(t
, "\n\t ")))
469 ip
->flags
&= ~parsekey(p
, NULL
);