2 * Copyright (c) 1993, 1994
3 * The Regents of the University of California. All rights reserved.
5 * This code is derived from software contributed to Berkeley
6 * by Pace Willisson (pace@blitz.com). The Rock Ridge Extension
7 * Support code is derived from software contributed to Berkeley
8 * by Atsushi Murai (amurai@spec.co.jp).
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the University of
21 * California, Berkeley and its contributors.
22 * 4. Neither the name of the University nor the names of its contributors
23 * may be used to endorse or promote products derived from this software
24 * without specific prior written permission.
26 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
38 * @(#)cd9660_rrip.c 8.6 (Berkeley) 12/5/94
39 * $FreeBSD: src/sys/isofs/cd9660/cd9660_rrip.c,v 1.17 1999/08/28 00:46:06 peter Exp $
42 #include <sys/param.h>
43 #include <sys/systm.h>
45 #include <sys/vnode.h>
46 #include <sys/mount.h>
47 #include <sys/kernel.h>
49 #include <isofs/cd9660/iso.h>
50 #include <isofs/cd9660/cd9660_node.h>
51 #include <isofs/cd9660/cd9660_rrip.h>
52 #include <isofs/cd9660/iso_rrip.h>
54 typedef int rrt_func_t __P((void *, ISO_RRIP_ANALYZE *ana));
59 void (*func2) __P((struct iso_directory_record *isodir, ISO_RRIP_ANALYZE *ana));
63 static int cd9660_rrip_altname __P((ISO_RRIP_ALTNAME *p,
64 ISO_RRIP_ANALYZE *ana));
65 static int cd9660_rrip_attr __P((ISO_RRIP_ATTR *p, ISO_RRIP_ANALYZE *ana));
66 static int cd9660_rrip_cont __P((ISO_RRIP_CONT *p, ISO_RRIP_ANALYZE *ana));
67 static void cd9660_rrip_defattr __P((struct iso_directory_record *isodir,
68 ISO_RRIP_ANALYZE *ana));
69 static void cd9660_rrip_defname __P((struct iso_directory_record *isodir,
70 ISO_RRIP_ANALYZE *ana));
71 static void cd9660_rrip_deftstamp __P((struct iso_directory_record *isodir,
72 ISO_RRIP_ANALYZE *ana));
73 static int cd9660_rrip_device __P((ISO_RRIP_DEVICE *p,
74 ISO_RRIP_ANALYZE *ana));
75 static int cd9660_rrip_extref __P((ISO_RRIP_EXTREF *p,
76 ISO_RRIP_ANALYZE *ana));
77 static int cd9660_rrip_idflag __P((ISO_RRIP_IDFLAG *p,
78 ISO_RRIP_ANALYZE *ana));
79 static int cd9660_rrip_loop __P((struct iso_directory_record *isodir,
80 ISO_RRIP_ANALYZE *ana,
82 static int cd9660_rrip_pclink __P((ISO_RRIP_CLINK *p,
83 ISO_RRIP_ANALYZE *ana));
84 static int cd9660_rrip_reldir __P((ISO_RRIP_RELDIR *p,
85 ISO_RRIP_ANALYZE *ana));
86 static int cd9660_rrip_slink __P((ISO_RRIP_SLINK *p,
87 ISO_RRIP_ANALYZE *ana));
88 static int cd9660_rrip_stop __P((ISO_SUSP_HEADER *p,
89 ISO_RRIP_ANALYZE *ana));
90 static int cd9660_rrip_tstamp __P((ISO_RRIP_TSTAMP *p,
91 ISO_RRIP_ANALYZE *ana));
94 * POSIX file attribute
97 cd9660_rrip_attr(p,ana)
99 ISO_RRIP_ANALYZE *ana;
101 ana->inop->inode.iso_mode = isonum_733(p->mode);
102 ana->inop->inode.iso_uid = isonum_733(p->uid);
103 ana->inop->inode.iso_gid = isonum_733(p->gid);
104 ana->inop->inode.iso_links = isonum_733(p->links);
105 ana->fields &= ~ISO_SUSP_ATTR;
106 return ISO_SUSP_ATTR;
110 cd9660_rrip_defattr(isodir,ana)
111 struct iso_directory_record *isodir;
112 ISO_RRIP_ANALYZE *ana;
114 /* But this is a required field! */
115 printf("RRIP without PX field?\n");
116 cd9660_defattr(isodir,ana->inop,NULL,ISO_FTYPE_RRIP);
123 cd9660_rrip_slink(p,ana)
125 ISO_RRIP_ANALYZE *ana;
127 register ISO_RRIP_SLINK_COMPONENT *pcomp;
128 register ISO_RRIP_SLINK_COMPONENT *pcompe;
130 char *outbuf, *inbuf;
132 pcomp = (ISO_RRIP_SLINK_COMPONENT *)p->component;
133 pcompe = (ISO_RRIP_SLINK_COMPONENT *)((char *)p + isonum_711(p->h.length));
135 outbuf = ana->outbuf;
139 * Gathering a Symbolic name from each component with path
143 pcomp = (ISO_RRIP_SLINK_COMPONENT *)((char *)pcomp + ISO_RRIP_SLSIZ
144 + isonum_711(pcomp->clen))) {
147 if (len < ana->maxlen) {
157 switch (*pcomp->cflag) {
159 case ISO_SUSP_CFLAG_CURRENT:
160 /* Inserting Current */
164 case ISO_SUSP_CFLAG_PARENT:
165 /* Inserting Parent */
169 case ISO_SUSP_CFLAG_ROOT:
170 /* Inserting slash for ROOT */
171 /* start over from beginning(?) */
176 case ISO_SUSP_CFLAG_VOLROOT:
177 /* Inserting a mount point i.e. "/cdrom" */
181 inbuf = ana->imp->im_mountp->mnt_stat.f_mntonname;
182 wlen = strlen(inbuf);
185 case ISO_SUSP_CFLAG_HOST:
186 /* Inserting hostname i.e. "kurt.tools.de" */
188 wlen = strlen(hostname);
191 case ISO_SUSP_CFLAG_CONTINUE:
195 /* Inserting component */
196 wlen = isonum_711(pcomp->clen);
200 printf("RRIP with incorrect flags?");
201 wlen = ana->maxlen + 1;
205 if (len + wlen > ana->maxlen) {
206 /* indicate error to caller */
209 ana->outbuf -= *ana->outlen;
214 bcopy(inbuf,outbuf,wlen);
219 ana->outbuf = outbuf;
223 if (!isonum_711(p->flags)) {
224 ana->fields &= ~ISO_SUSP_SLINK;
225 return ISO_SUSP_SLINK;
234 cd9660_rrip_altname(p,ana)
236 ISO_RRIP_ANALYZE *ana;
247 case ISO_SUSP_CFLAG_CURRENT:
248 /* Inserting Current */
252 case ISO_SUSP_CFLAG_PARENT:
253 /* Inserting Parent */
257 case ISO_SUSP_CFLAG_HOST:
258 /* Inserting hostname i.e. "kurt.tools.de" */
260 wlen = strlen(hostname);
263 case ISO_SUSP_CFLAG_CONTINUE:
267 /* Inserting component */
268 wlen = isonum_711(p->h.length) - 5;
269 inbuf = (char *)p + 5;
273 printf("RRIP with incorrect NM flags?\n");
274 wlen = ana->maxlen + 1;
278 if ((*ana->outlen += wlen) > ana->maxlen) {
279 /* treat as no name field */
280 ana->fields &= ~ISO_SUSP_ALTNAME;
281 ana->outbuf -= *ana->outlen - wlen;
286 bcopy(inbuf,ana->outbuf,wlen);
290 ana->fields &= ~ISO_SUSP_ALTNAME;
291 return ISO_SUSP_ALTNAME;
297 cd9660_rrip_defname(isodir,ana)
298 struct iso_directory_record *isodir;
299 ISO_RRIP_ANALYZE *ana;
301 isofntrans(isodir->name,isonum_711(isodir->name_len),
302 ana->outbuf,ana->outlen,
303 1,isonum_711(isodir->flags)&4, ana->imp->joliet_level);
304 switch (*ana->outbuf) {
311 /* outlen is 1 already */
312 strcpy(ana->outbuf,"..");
318 * Parent or Child Link
321 cd9660_rrip_pclink(p,ana)
323 ISO_RRIP_ANALYZE *ana;
325 *ana->inump = isonum_733(p->dir_loc) << ana->imp->im_bshift;
326 ana->fields &= ~(ISO_SUSP_CLINK|ISO_SUSP_PLINK);
327 return *p->h.type == 'C' ? ISO_SUSP_CLINK : ISO_SUSP_PLINK;
331 * Relocated directory
334 cd9660_rrip_reldir(p,ana)
336 ISO_RRIP_ANALYZE *ana;
338 /* special hack to make caller aware of RE field */
341 return ISO_SUSP_RELDIR|ISO_SUSP_ALTNAME|ISO_SUSP_CLINK|ISO_SUSP_PLINK;
345 cd9660_rrip_tstamp(p,ana)
347 ISO_RRIP_ANALYZE *ana;
353 /* Check a format of time stamp (7bytes/17bytes) */
354 if (!(*p->flags&ISO_SUSP_TSTAMP_FORM17)) {
355 if (*p->flags&ISO_SUSP_TSTAMP_CREAT)
358 if (*p->flags&ISO_SUSP_TSTAMP_MODIFY) {
359 cd9660_tstamp_conv7(ptime,&ana->inop->inode.iso_mtime,
363 bzero(&ana->inop->inode.iso_mtime,sizeof(struct timespec));
365 if (*p->flags&ISO_SUSP_TSTAMP_ACCESS) {
366 cd9660_tstamp_conv7(ptime,&ana->inop->inode.iso_atime,
370 ana->inop->inode.iso_atime = ana->inop->inode.iso_mtime;
372 if (*p->flags&ISO_SUSP_TSTAMP_ATTR)
373 cd9660_tstamp_conv7(ptime,&ana->inop->inode.iso_ctime,
376 ana->inop->inode.iso_ctime = ana->inop->inode.iso_mtime;
379 if (*p->flags&ISO_SUSP_TSTAMP_CREAT)
382 if (*p->flags&ISO_SUSP_TSTAMP_MODIFY) {
383 cd9660_tstamp_conv17(ptime,&ana->inop->inode.iso_mtime);
386 bzero(&ana->inop->inode.iso_mtime,sizeof(struct timespec));
388 if (*p->flags&ISO_SUSP_TSTAMP_ACCESS) {
389 cd9660_tstamp_conv17(ptime,&ana->inop->inode.iso_atime);
392 ana->inop->inode.iso_atime = ana->inop->inode.iso_mtime;
394 if (*p->flags&ISO_SUSP_TSTAMP_ATTR)
395 cd9660_tstamp_conv17(ptime,&ana->inop->inode.iso_ctime);
397 ana->inop->inode.iso_ctime = ana->inop->inode.iso_mtime;
400 ana->fields &= ~ISO_SUSP_TSTAMP;
401 return ISO_SUSP_TSTAMP;
405 cd9660_rrip_deftstamp(isodir,ana)
406 struct iso_directory_record *isodir;
407 ISO_RRIP_ANALYZE *ana;
409 cd9660_deftstamp(isodir,ana->inop,NULL,ISO_FTYPE_RRIP);
416 cd9660_rrip_device(p,ana)
418 ISO_RRIP_ANALYZE *ana;
422 high = isonum_733(p->dev_t_high);
423 low = isonum_733(p->dev_t_low);
426 ana->inop->inode.iso_rdev = makeudev(umajor(low), uminor(low));
428 ana->inop->inode.iso_rdev = makeudev(high, uminor(low));
429 ana->fields &= ~ISO_SUSP_DEVICE;
430 return ISO_SUSP_DEVICE;
437 cd9660_rrip_idflag(p,ana)
439 ISO_RRIP_ANALYZE *ana;
441 ana->fields &= isonum_711(p->flags)|~0xff; /* don't touch high bits */
442 /* special handling of RE field */
443 if (ana->fields&ISO_SUSP_RELDIR)
444 return cd9660_rrip_reldir(/* XXX */ (ISO_RRIP_RELDIR *)p,ana);
446 return ISO_SUSP_IDFLAG;
450 * Continuation pointer
453 cd9660_rrip_cont(p,ana)
455 ISO_RRIP_ANALYZE *ana;
457 ana->iso_ce_blk = isonum_733(p->location);
458 ana->iso_ce_off = isonum_733(p->offset);
459 ana->iso_ce_len = isonum_733(p->length);
460 return ISO_SUSP_CONT;
467 cd9660_rrip_stop(p,ana)
469 ISO_RRIP_ANALYZE *ana;
471 return ISO_SUSP_STOP;
475 * Extension reference
478 cd9660_rrip_extref(p,ana)
480 ISO_RRIP_ANALYZE *ana;
482 if (isonum_711(p->len_id) != 10
483 || bcmp((char *)p + 8,"RRIP_1991A",10)
484 || isonum_711(p->version) != 1)
486 ana->fields &= ~ISO_SUSP_EXTREF;
487 return ISO_SUSP_EXTREF;
491 cd9660_rrip_loop(isodir,ana,table)
492 struct iso_directory_record *isodir;
493 ISO_RRIP_ANALYZE *ana;
496 register RRIP_TABLE *ptable;
497 register ISO_SUSP_HEADER *phead;
498 register ISO_SUSP_HEADER *pend;
499 struct buf *bp = NULL;
505 * Note: If name length is odd,
506 * it will be padding 1 byte after the name
508 pwhead = isodir->name + isonum_711(isodir->name_len);
509 if (!(isonum_711(isodir->name_len)&1))
511 isochar(isodir->name, pwhead, ana->imp->joliet_level, &c);
513 /* If it's not the '.' entry of the root dir obey SP field */
514 if (c != 0 || isonum_733(isodir->extent) != ana->imp->root_extent)
515 pwhead += ana->imp->rr_skip;
517 pwhead += ana->imp->rr_skip0;
519 phead = (ISO_SUSP_HEADER *)pwhead;
520 pend = (ISO_SUSP_HEADER *)((char *)isodir + isonum_711(isodir->length));
526 * Note: "pend" should be more than one SUSP header
528 while (pend >= phead + 1) {
529 if (isonum_711(phead->version) == 1) {
530 for (ptable = table; ptable->func; ptable++) {
531 if (*phead->type == *ptable->type
532 && phead->type[1] == ptable->type[1]) {
533 result |= ptable->func(phead,ana);
540 if (result&ISO_SUSP_STOP) {
541 result &= ~ISO_SUSP_STOP;
544 /* plausibility check */
545 if (isonum_711(phead->length) < sizeof(*phead))
549 * Hopefully this works with newer versions, too
551 phead = (ISO_SUSP_HEADER *)((char *)phead + isonum_711(phead->length));
554 if (ana->fields && ana->iso_ce_len) {
555 if (ana->iso_ce_blk >= ana->imp->volume_space_size
556 || ana->iso_ce_off + ana->iso_ce_len > ana->imp->logical_block_size
557 || bread(ana->imp->im_devvp,
559 (ana->imp->im_bshift - DEV_BSHIFT),
560 ana->imp->logical_block_size, NOCRED, &bp))
561 /* what to do now? */
563 phead = (ISO_SUSP_HEADER *)(bp->b_data + ana->iso_ce_off);
564 pend = (ISO_SUSP_HEADER *) ((char *)phead + ana->iso_ce_len);
571 * If we don't find the Basic SUSP stuffs, just set default value
572 * (attribute/time stamp)
574 for (ptable = table; ptable->func2; ptable++)
575 if (!(ptable->result&result))
576 ptable->func2(isodir,ana);
585 * XXX the casts are bogus but will do for now.
587 #define BC (rrt_func_t *)
588 static RRIP_TABLE rrip_table_analyze[] = {
589 { "PX", BC cd9660_rrip_attr, cd9660_rrip_defattr, ISO_SUSP_ATTR },
590 { "TF", BC cd9660_rrip_tstamp, cd9660_rrip_deftstamp, ISO_SUSP_TSTAMP },
591 { "PN", BC cd9660_rrip_device, 0, ISO_SUSP_DEVICE },
592 { "RR", BC cd9660_rrip_idflag, 0, ISO_SUSP_IDFLAG },
593 { "CE", BC cd9660_rrip_cont, 0, ISO_SUSP_CONT },
594 { "ST", BC cd9660_rrip_stop, 0, ISO_SUSP_STOP },
599 cd9660_rrip_analyze(isodir,inop,imp)
600 struct iso_directory_record *isodir;
601 struct iso_node *inop;
604 ISO_RRIP_ANALYZE analyze;
608 analyze.fields = ISO_SUSP_ATTR|ISO_SUSP_TSTAMP|ISO_SUSP_DEVICE;
610 return cd9660_rrip_loop(isodir,&analyze,rrip_table_analyze);
614 * Get Alternate Name.
616 static RRIP_TABLE rrip_table_getname[] = {
617 { "NM", BC cd9660_rrip_altname, cd9660_rrip_defname, ISO_SUSP_ALTNAME },
618 { "CL", BC cd9660_rrip_pclink, 0, ISO_SUSP_CLINK|ISO_SUSP_PLINK },
619 { "PL", BC cd9660_rrip_pclink, 0, ISO_SUSP_CLINK|ISO_SUSP_PLINK },
620 { "RE", BC cd9660_rrip_reldir, 0, ISO_SUSP_RELDIR },
621 { "RR", BC cd9660_rrip_idflag, 0, ISO_SUSP_IDFLAG },
622 { "CE", BC cd9660_rrip_cont, 0, ISO_SUSP_CONT },
623 { "ST", BC cd9660_rrip_stop, 0, ISO_SUSP_STOP },
628 cd9660_rrip_getname(isodir,outbuf,outlen,inump,imp)
629 struct iso_directory_record *isodir;
635 ISO_RRIP_ANALYZE analyze;
639 analyze.outbuf = outbuf;
640 analyze.outlen = outlen;
641 analyze.maxlen = NAME_MAX;
642 analyze.inump = inump;
644 analyze.fields = ISO_SUSP_ALTNAME|ISO_SUSP_RELDIR|ISO_SUSP_CLINK|ISO_SUSP_PLINK;
647 isochar(isodir->name, isodir->name + isonum_711(isodir->name_len),
648 imp->joliet_level, &c);
649 tab = rrip_table_getname;
650 if (c == 0 || c == 1) {
651 cd9660_rrip_defname(isodir,&analyze);
653 analyze.fields &= ~ISO_SUSP_ALTNAME;
657 return cd9660_rrip_loop(isodir,&analyze,tab);
663 static RRIP_TABLE rrip_table_getsymname[] = {
664 { "SL", BC cd9660_rrip_slink, 0, ISO_SUSP_SLINK },
665 { "RR", BC cd9660_rrip_idflag, 0, ISO_SUSP_IDFLAG },
666 { "CE", BC cd9660_rrip_cont, 0, ISO_SUSP_CONT },
667 { "ST", BC cd9660_rrip_stop, 0, ISO_SUSP_STOP },
672 cd9660_rrip_getsymname(isodir,outbuf,outlen,imp)
673 struct iso_directory_record *isodir;
678 ISO_RRIP_ANALYZE analyze;
680 analyze.outbuf = outbuf;
681 analyze.outlen = outlen;
683 analyze.maxlen = MAXPATHLEN;
684 analyze.cont = 1; /* don't start with a slash */
686 analyze.fields = ISO_SUSP_SLINK;
688 return (cd9660_rrip_loop(isodir,&analyze,rrip_table_getsymname)&ISO_SUSP_SLINK);
691 static RRIP_TABLE rrip_table_extref[] = {
692 { "ER", BC cd9660_rrip_extref, 0, ISO_SUSP_EXTREF },
693 { "CE", BC cd9660_rrip_cont, 0, ISO_SUSP_CONT },
694 { "ST", BC cd9660_rrip_stop, 0, ISO_SUSP_STOP },
699 * Check for Rock Ridge Extension and return offset of its fields.
700 * Note: We insist on the ER field.
703 cd9660_rrip_offset(isodir,imp)
704 struct iso_directory_record *isodir;
708 ISO_RRIP_ANALYZE analyze;
711 p = (ISO_RRIP_OFFSET *)(isodir->name + 1);
712 if (bcmp(p,"SP\7\1\276\357",6)) {
713 /* Maybe, it's a CDROM XA disc? */
715 p = (ISO_RRIP_OFFSET *)((char *)p + 15);
716 if (bcmp(p,"SP\7\1\276\357",6))
721 analyze.fields = ISO_SUSP_EXTREF;
722 if (!(cd9660_rrip_loop(isodir,&analyze,rrip_table_extref)&ISO_SUSP_EXTREF))
725 return isonum_711(p->skip);