2 * SPDX-License-Identifier: BSD-3-Clause
4 * Copyright (c) 1993, 1994
5 * The Regents of the University of California. All rights reserved.
7 * This code is derived from software contributed to Berkeley
8 * by Pace Willisson (pace@blitz.com). The Rock Ridge Extension
9 * Support code is derived from software contributed to Berkeley
10 * by Atsushi Murai (amurai@spec.co.jp).
12 * Redistribution and use in source and binary forms, with or without
13 * modification, are permitted provided that the following conditions
15 * 1. Redistributions of source code must retain the above copyright
16 * notice, this list of conditions and the following disclaimer.
17 * 2. Redistributions in binary form must reproduce the above copyright
18 * notice, this list of conditions and the following disclaimer in the
19 * documentation and/or other materials provided with the distribution.
20 * 3. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 * @(#)cd9660_rrip.c 8.6 (Berkeley) 12/5/94
39 #include <sys/cdefs.h>
40 __FBSDID("$FreeBSD$");
42 #include <sys/param.h>
43 #include <sys/systm.h>
47 #include <sys/vnode.h>
48 #include <sys/mount.h>
49 #include <sys/kernel.h>
51 #include <fs/cd9660/iso.h>
52 #include <fs/cd9660/cd9660_node.h>
53 #include <fs/cd9660/cd9660_rrip.h>
54 #include <fs/cd9660/iso_rrip.h>
56 typedef int rrt_func_t(void *, ISO_RRIP_ANALYZE *ana);
61 void (*func2)(struct iso_directory_record *isodir, ISO_RRIP_ANALYZE *ana);
65 static int cd9660_rrip_altname(ISO_RRIP_ALTNAME *p, ISO_RRIP_ANALYZE *ana);
66 static int cd9660_rrip_attr(ISO_RRIP_ATTR *p, ISO_RRIP_ANALYZE *ana);
67 static int cd9660_rrip_cont(ISO_RRIP_CONT *p, ISO_RRIP_ANALYZE *ana);
68 static void cd9660_rrip_defattr(struct iso_directory_record *isodir,
69 ISO_RRIP_ANALYZE *ana);
70 static void cd9660_rrip_defname(struct iso_directory_record *isodir,
71 ISO_RRIP_ANALYZE *ana);
72 static void cd9660_rrip_deftstamp(struct iso_directory_record *isodir,
73 ISO_RRIP_ANALYZE *ana);
74 static int cd9660_rrip_device(ISO_RRIP_DEVICE *p, ISO_RRIP_ANALYZE *ana);
75 static int cd9660_rrip_extref(ISO_RRIP_EXTREF *p, ISO_RRIP_ANALYZE *ana);
76 static int cd9660_rrip_idflag(ISO_RRIP_IDFLAG *p, ISO_RRIP_ANALYZE *ana);
77 static int cd9660_rrip_loop(struct iso_directory_record *isodir,
78 ISO_RRIP_ANALYZE *ana, RRIP_TABLE *table);
79 static int cd9660_rrip_pclink(ISO_RRIP_CLINK *p, ISO_RRIP_ANALYZE *ana);
80 static int cd9660_rrip_reldir(ISO_RRIP_RELDIR *p, ISO_RRIP_ANALYZE *ana);
81 static int cd9660_rrip_slink(ISO_RRIP_SLINK *p, ISO_RRIP_ANALYZE *ana);
82 static int cd9660_rrip_stop(ISO_SUSP_HEADER *p, ISO_RRIP_ANALYZE *ana);
83 static int cd9660_rrip_tstamp(ISO_RRIP_TSTAMP *p, ISO_RRIP_ANALYZE *ana);
86 * POSIX file attribute
89 cd9660_rrip_attr(ISO_RRIP_ATTR *p, ISO_RRIP_ANALYZE *ana)
91 ana->inop->inode.iso_mode = isonum_733(p->mode);
92 ana->inop->inode.iso_uid = isonum_733(p->uid);
93 ana->inop->inode.iso_gid = isonum_733(p->gid);
94 ana->inop->inode.iso_links = isonum_733(p->links);
95 ana->fields &= ~ISO_SUSP_ATTR;
100 cd9660_rrip_defattr(struct iso_directory_record *isodir, ISO_RRIP_ANALYZE *ana)
102 /* But this is a required field! */
103 printf("RRIP without PX field?\n");
104 cd9660_defattr(isodir,ana->inop,NULL,ISO_FTYPE_RRIP);
111 cd9660_rrip_slink(ISO_RRIP_SLINK *p, ISO_RRIP_ANALYZE *ana)
113 ISO_RRIP_SLINK_COMPONENT *pcomp;
114 ISO_RRIP_SLINK_COMPONENT *pcompe;
116 char *outbuf, *inbuf;
117 char hostbuf[MAXHOSTNAMELEN];
119 pcomp = (ISO_RRIP_SLINK_COMPONENT *)p->component;
120 pcompe = (ISO_RRIP_SLINK_COMPONENT *)((char *)p + isonum_711(p->h.length));
122 outbuf = ana->outbuf;
126 * Gathering a Symbolic name from each component with path
130 pcomp = (ISO_RRIP_SLINK_COMPONENT *)((char *)pcomp + ISO_RRIP_SLSIZ
131 + isonum_711(pcomp->clen))) {
133 if (len < ana->maxlen) {
143 switch (*pcomp->cflag) {
144 case ISO_SUSP_CFLAG_CURRENT:
145 /* Inserting Current */
149 case ISO_SUSP_CFLAG_PARENT:
150 /* Inserting Parent */
154 case ISO_SUSP_CFLAG_ROOT:
155 /* Inserting slash for ROOT */
156 /* Double slash, nothing really to do here. */
159 case ISO_SUSP_CFLAG_VOLROOT:
160 /* Inserting a mount point i.e. "/cdrom" */
164 inbuf = ana->imp->im_mountp->mnt_stat.f_mntonname;
165 wlen = strlen(inbuf);
168 case ISO_SUSP_CFLAG_HOST:
169 /* Inserting hostname i.e. "kurt.tools.de" */
170 getcredhostname(curthread->td_ucred, hostbuf,
173 wlen = strlen(inbuf);
176 case ISO_SUSP_CFLAG_CONTINUE:
180 /* Inserting component */
181 wlen = isonum_711(pcomp->clen);
185 printf("RRIP with incorrect flags?");
186 wlen = ana->maxlen + 1;
190 if (len + wlen > ana->maxlen) {
191 /* indicate error to caller */
194 ana->outbuf -= *ana->outlen;
199 memcpy(outbuf, inbuf, wlen);
203 ana->outbuf = outbuf;
207 if (!isonum_711(p->flags)) {
208 ana->fields &= ~ISO_SUSP_SLINK;
209 return ISO_SUSP_SLINK;
218 cd9660_rrip_altname(ISO_RRIP_ALTNAME *p, ISO_RRIP_ANALYZE *ana)
223 char hostbuf[MAXHOSTNAMELEN];
230 case ISO_SUSP_CFLAG_CURRENT:
231 /* Inserting Current */
235 case ISO_SUSP_CFLAG_PARENT:
236 /* Inserting Parent */
240 case ISO_SUSP_CFLAG_HOST:
241 /* Inserting hostname i.e. "kurt.tools.de" */
242 getcredhostname(curthread->td_ucred, hostbuf, sizeof(hostbuf));
244 wlen = strlen(inbuf);
247 case ISO_SUSP_CFLAG_CONTINUE:
251 /* Inserting component */
252 wlen = isonum_711(p->h.length) - 5;
253 inbuf = (char *)p + 5;
257 printf("RRIP with incorrect NM flags?\n");
258 wlen = ana->maxlen + 1;
262 if ((*ana->outlen += wlen) > ana->maxlen) {
263 /* treat as no name field */
264 ana->fields &= ~ISO_SUSP_ALTNAME;
265 ana->outbuf -= *ana->outlen - wlen;
270 memcpy(ana->outbuf, inbuf, wlen);
274 ana->fields &= ~ISO_SUSP_ALTNAME;
275 return ISO_SUSP_ALTNAME;
281 cd9660_rrip_defname(struct iso_directory_record *isodir, ISO_RRIP_ANALYZE *ana)
283 isofntrans(isodir->name,isonum_711(isodir->name_len),
284 ana->outbuf,ana->outlen,
285 1,isonum_711(isodir->flags)&4, ana->imp->joliet_level,
286 ana->imp->im_flags, ana->imp->im_d2l);
287 switch (*ana->outbuf) {
294 /* outlen is 1 already */
295 strcpy(ana->outbuf,"..");
301 * Parent or Child Link
304 cd9660_rrip_pclink(ISO_RRIP_CLINK *p, ISO_RRIP_ANALYZE *ana)
306 *ana->inump = isonum_733(p->dir_loc) << ana->imp->im_bshift;
307 ana->fields &= ~(ISO_SUSP_CLINK|ISO_SUSP_PLINK);
308 return *p->h.type == 'C' ? ISO_SUSP_CLINK : ISO_SUSP_PLINK;
312 * Relocated directory
315 cd9660_rrip_reldir(ISO_RRIP_RELDIR *p, ISO_RRIP_ANALYZE *ana)
317 /* special hack to make caller aware of RE field */
320 return ISO_SUSP_RELDIR|ISO_SUSP_ALTNAME|ISO_SUSP_CLINK|ISO_SUSP_PLINK;
324 cd9660_rrip_tstamp(ISO_RRIP_TSTAMP *p, ISO_RRIP_ANALYZE *ana)
330 /* Check a format of time stamp (7bytes/17bytes) */
331 if (!(*p->flags&ISO_SUSP_TSTAMP_FORM17)) {
332 if (*p->flags&ISO_SUSP_TSTAMP_CREAT)
335 if (*p->flags&ISO_SUSP_TSTAMP_MODIFY) {
336 cd9660_tstamp_conv7(ptime,&ana->inop->inode.iso_mtime,
340 memset(&ana->inop->inode.iso_mtime, 0, sizeof(struct timespec));
342 if (*p->flags&ISO_SUSP_TSTAMP_ACCESS) {
343 cd9660_tstamp_conv7(ptime,&ana->inop->inode.iso_atime,
347 ana->inop->inode.iso_atime = ana->inop->inode.iso_mtime;
349 if (*p->flags&ISO_SUSP_TSTAMP_ATTR)
350 cd9660_tstamp_conv7(ptime,&ana->inop->inode.iso_ctime,
353 ana->inop->inode.iso_ctime = ana->inop->inode.iso_mtime;
356 if (*p->flags&ISO_SUSP_TSTAMP_CREAT)
359 if (*p->flags&ISO_SUSP_TSTAMP_MODIFY) {
360 cd9660_tstamp_conv17(ptime,&ana->inop->inode.iso_mtime);
363 memset(&ana->inop->inode.iso_mtime, 0, sizeof(struct timespec));
365 if (*p->flags&ISO_SUSP_TSTAMP_ACCESS) {
366 cd9660_tstamp_conv17(ptime,&ana->inop->inode.iso_atime);
369 ana->inop->inode.iso_atime = ana->inop->inode.iso_mtime;
371 if (*p->flags&ISO_SUSP_TSTAMP_ATTR)
372 cd9660_tstamp_conv17(ptime,&ana->inop->inode.iso_ctime);
374 ana->inop->inode.iso_ctime = ana->inop->inode.iso_mtime;
376 ana->fields &= ~ISO_SUSP_TSTAMP;
377 return ISO_SUSP_TSTAMP;
381 cd9660_rrip_deftstamp(struct iso_directory_record *isodir,
382 ISO_RRIP_ANALYZE *ana)
384 cd9660_deftstamp(isodir,ana->inop,NULL,ISO_FTYPE_RRIP);
391 cd9660_rrip_device(ISO_RRIP_DEVICE *p, ISO_RRIP_ANALYZE *ana)
395 high = isonum_733(p->dev_t_high);
396 low = isonum_733(p->dev_t_low);
399 ana->inop->inode.iso_rdev = makedev(major(low), minor(low));
401 ana->inop->inode.iso_rdev = makedev(high, minor(low));
402 ana->fields &= ~ISO_SUSP_DEVICE;
403 return ISO_SUSP_DEVICE;
410 cd9660_rrip_idflag(ISO_RRIP_IDFLAG *p, ISO_RRIP_ANALYZE *ana)
412 ana->fields &= isonum_711(p->flags)|~0xff; /* don't touch high bits */
413 /* special handling of RE field */
414 if (ana->fields&ISO_SUSP_RELDIR)
415 return cd9660_rrip_reldir(/* XXX */ (ISO_RRIP_RELDIR *)p,ana);
417 return ISO_SUSP_IDFLAG;
421 * Continuation pointer
424 cd9660_rrip_cont(ISO_RRIP_CONT *p, ISO_RRIP_ANALYZE *ana)
426 ana->iso_ce_blk = isonum_733(p->location);
427 ana->iso_ce_off = isonum_733(p->offset);
428 ana->iso_ce_len = isonum_733(p->length);
429 return ISO_SUSP_CONT;
436 cd9660_rrip_stop(ISO_SUSP_HEADER *p, ISO_RRIP_ANALYZE *ana)
438 return ISO_SUSP_STOP;
442 * Extension reference
445 cd9660_rrip_extref(ISO_RRIP_EXTREF *p, ISO_RRIP_ANALYZE *ana)
447 if ( ! ((isonum_711(p->len_id) == 10
448 && bcmp((char *)p + 8,"RRIP_1991A",10) == 0)
449 || (isonum_711(p->len_id) == 10
450 && bcmp((char *)p + 8,"IEEE_P1282",10) == 0)
451 || (isonum_711(p->len_id) == 9
452 && bcmp((char *)p + 8,"IEEE_1282", 9) == 0))
453 || isonum_711(p->version) != 1)
455 ana->fields &= ~ISO_SUSP_EXTREF;
456 return ISO_SUSP_EXTREF;
460 cd9660_rrip_loop(struct iso_directory_record *isodir, ISO_RRIP_ANALYZE *ana,
464 ISO_SUSP_HEADER *phead;
465 ISO_SUSP_HEADER *pend;
466 struct buf *bp = NULL;
472 * Note: If name length is odd,
473 * it will be padding 1 byte after the name
475 pwhead = isodir->name + isonum_711(isodir->name_len);
476 if (!(isonum_711(isodir->name_len)&1))
478 isochar(isodir->name, pwhead, ana->imp->joliet_level, &c, NULL,
479 ana->imp->im_flags, ana->imp->im_d2l);
481 /* If it's not the '.' entry of the root dir obey SP field */
482 if (c != 0 || isonum_733(isodir->extent) != ana->imp->root_extent)
483 pwhead += ana->imp->rr_skip;
485 pwhead += ana->imp->rr_skip0;
487 phead = (ISO_SUSP_HEADER *)pwhead;
488 pend = (ISO_SUSP_HEADER *)((char *)isodir + isonum_711(isodir->length));
494 * Note: "pend" should be more than one SUSP header
496 while (pend >= phead + 1) {
497 if (isonum_711(phead->version) == 1) {
498 for (ptable = table; ptable->func; ptable++) {
499 if (*phead->type == *ptable->type
500 && phead->type[1] == ptable->type[1]) {
501 result |= ptable->func(phead,ana);
508 if (result&ISO_SUSP_STOP) {
509 result &= ~ISO_SUSP_STOP;
512 /* plausibility check */
513 if (isonum_711(phead->length) < sizeof(*phead))
517 * Hopefully this works with newer versions, too
519 phead = (ISO_SUSP_HEADER *)((char *)phead + isonum_711(phead->length));
522 if (ana->fields && ana->iso_ce_len) {
523 if (ana->iso_ce_blk >= ana->imp->volume_space_size
524 || ana->iso_ce_off + ana->iso_ce_len > ana->imp->logical_block_size
525 || bread(ana->imp->im_devvp,
527 (ana->imp->im_bshift - DEV_BSHIFT),
528 ana->imp->logical_block_size, NOCRED, &bp))
529 /* what to do now? */
531 phead = (ISO_SUSP_HEADER *)(bp->b_data + ana->iso_ce_off);
532 pend = (ISO_SUSP_HEADER *) ((char *)phead + ana->iso_ce_len);
539 * If we don't find the Basic SUSP stuffs, just set default value
540 * (attribute/time stamp)
542 for (ptable = table; ptable->func2; ptable++)
543 if (!(ptable->result&result))
544 ptable->func2(isodir,ana);
553 * XXX the casts are bogus but will do for now.
555 #define BC (rrt_func_t *)
556 static RRIP_TABLE rrip_table_analyze[] = {
557 { "PX", BC cd9660_rrip_attr, cd9660_rrip_defattr, ISO_SUSP_ATTR },
558 { "TF", BC cd9660_rrip_tstamp, cd9660_rrip_deftstamp, ISO_SUSP_TSTAMP },
559 { "PN", BC cd9660_rrip_device, 0, ISO_SUSP_DEVICE },
560 { "RR", BC cd9660_rrip_idflag, 0, ISO_SUSP_IDFLAG },
561 { "CE", BC cd9660_rrip_cont, 0, ISO_SUSP_CONT },
562 { "ST", BC cd9660_rrip_stop, 0, ISO_SUSP_STOP },
567 cd9660_rrip_analyze(struct iso_directory_record *isodir, struct iso_node *inop,
570 ISO_RRIP_ANALYZE analyze;
574 analyze.fields = ISO_SUSP_ATTR|ISO_SUSP_TSTAMP|ISO_SUSP_DEVICE;
576 return cd9660_rrip_loop(isodir,&analyze,rrip_table_analyze);
580 * Get Alternate Name.
582 static RRIP_TABLE rrip_table_getname[] = {
583 { "NM", BC cd9660_rrip_altname, cd9660_rrip_defname, ISO_SUSP_ALTNAME },
584 { "CL", BC cd9660_rrip_pclink, 0, ISO_SUSP_CLINK|ISO_SUSP_PLINK },
585 { "PL", BC cd9660_rrip_pclink, 0, ISO_SUSP_CLINK|ISO_SUSP_PLINK },
586 { "RE", BC cd9660_rrip_reldir, 0, ISO_SUSP_RELDIR },
587 { "RR", BC cd9660_rrip_idflag, 0, ISO_SUSP_IDFLAG },
588 { "CE", BC cd9660_rrip_cont, 0, ISO_SUSP_CONT },
589 { "ST", BC cd9660_rrip_stop, 0, ISO_SUSP_STOP },
594 cd9660_rrip_getname(struct iso_directory_record *isodir, char *outbuf,
595 u_short *outlen, cd_ino_t *inump, struct iso_mnt *imp)
597 ISO_RRIP_ANALYZE analyze;
601 analyze.outbuf = outbuf;
602 analyze.outlen = outlen;
603 analyze.maxlen = NAME_MAX;
604 analyze.inump = inump;
606 analyze.fields = ISO_SUSP_ALTNAME|ISO_SUSP_RELDIR|ISO_SUSP_CLINK|ISO_SUSP_PLINK;
609 isochar(isodir->name, isodir->name + isonum_711(isodir->name_len),
610 imp->joliet_level, &c, NULL, imp->im_flags, imp->im_d2l);
611 tab = rrip_table_getname;
612 if (c == 0 || c == 1) {
613 cd9660_rrip_defname(isodir,&analyze);
615 analyze.fields &= ~ISO_SUSP_ALTNAME;
619 return cd9660_rrip_loop(isodir,&analyze,tab);
625 static RRIP_TABLE rrip_table_getsymname[] = {
626 { "SL", BC cd9660_rrip_slink, 0, ISO_SUSP_SLINK },
627 { "RR", BC cd9660_rrip_idflag, 0, ISO_SUSP_IDFLAG },
628 { "CE", BC cd9660_rrip_cont, 0, ISO_SUSP_CONT },
629 { "ST", BC cd9660_rrip_stop, 0, ISO_SUSP_STOP },
634 cd9660_rrip_getsymname(struct iso_directory_record *isodir, char *outbuf,
635 u_short *outlen, struct iso_mnt *imp)
637 ISO_RRIP_ANALYZE analyze;
639 analyze.outbuf = outbuf;
640 analyze.outlen = outlen;
642 analyze.maxlen = MAXPATHLEN;
643 analyze.cont = 1; /* don't start with a slash */
645 analyze.fields = ISO_SUSP_SLINK;
647 return (cd9660_rrip_loop(isodir,&analyze,rrip_table_getsymname)&ISO_SUSP_SLINK);
650 static RRIP_TABLE rrip_table_extref[] = {
651 { "ER", BC cd9660_rrip_extref, 0, ISO_SUSP_EXTREF },
652 { "CE", BC cd9660_rrip_cont, 0, ISO_SUSP_CONT },
653 { "ST", BC cd9660_rrip_stop, 0, ISO_SUSP_STOP },
658 * Check for Rock Ridge Extension and return offset of its fields.
659 * Note: We insist on the ER field.
662 cd9660_rrip_offset(struct iso_directory_record *isodir, struct iso_mnt *imp)
665 ISO_RRIP_ANALYZE analyze;
668 p = (ISO_RRIP_OFFSET *)(isodir->name + 1);
669 if (bcmp(p,"SP\7\1\276\357",6)) {
670 /* Maybe, it's a CDROM XA disc? */
672 p = (ISO_RRIP_OFFSET *)((char *)p + 15);
673 if (bcmp(p,"SP\7\1\276\357",6))
678 analyze.fields = ISO_SUSP_EXTREF;
679 if (!(cd9660_rrip_loop(isodir,&analyze,rrip_table_extref)&ISO_SUSP_EXTREF))
682 return isonum_711(p->skip);