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 * 4. Neither the name of the University nor the names of its contributors
19 * may be used to endorse or promote products derived from this software
20 * without specific prior written permission.
22 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * @(#)cd9660_rrip.c 8.6 (Berkeley) 12/5/94
37 #include <sys/cdefs.h>
38 __FBSDID("$FreeBSD$");
40 #include <sys/param.h>
41 #include <sys/systm.h>
44 #include <sys/vnode.h>
45 #include <sys/mount.h>
46 #include <sys/kernel.h>
48 #include <isofs/cd9660/iso.h>
49 #include <isofs/cd9660/cd9660_node.h>
50 #include <isofs/cd9660/cd9660_rrip.h>
51 #include <isofs/cd9660/iso_rrip.h>
53 typedef int rrt_func_t(void *, ISO_RRIP_ANALYZE *ana);
58 void (*func2)(struct iso_directory_record *isodir, ISO_RRIP_ANALYZE *ana);
62 static int cd9660_rrip_altname(ISO_RRIP_ALTNAME *p, ISO_RRIP_ANALYZE *ana);
63 static int cd9660_rrip_attr(ISO_RRIP_ATTR *p, ISO_RRIP_ANALYZE *ana);
64 static int cd9660_rrip_cont(ISO_RRIP_CONT *p, ISO_RRIP_ANALYZE *ana);
65 static void cd9660_rrip_defattr(struct iso_directory_record *isodir,
66 ISO_RRIP_ANALYZE *ana);
67 static void cd9660_rrip_defname(struct iso_directory_record *isodir,
68 ISO_RRIP_ANALYZE *ana);
69 static void cd9660_rrip_deftstamp(struct iso_directory_record *isodir,
70 ISO_RRIP_ANALYZE *ana);
71 static int cd9660_rrip_device(ISO_RRIP_DEVICE *p, ISO_RRIP_ANALYZE *ana);
72 static int cd9660_rrip_extref(ISO_RRIP_EXTREF *p, ISO_RRIP_ANALYZE *ana);
73 static int cd9660_rrip_idflag(ISO_RRIP_IDFLAG *p, ISO_RRIP_ANALYZE *ana);
74 static int cd9660_rrip_loop(struct iso_directory_record *isodir,
75 ISO_RRIP_ANALYZE *ana, RRIP_TABLE *table);
76 static int cd9660_rrip_pclink(ISO_RRIP_CLINK *p, ISO_RRIP_ANALYZE *ana);
77 static int cd9660_rrip_reldir(ISO_RRIP_RELDIR *p, ISO_RRIP_ANALYZE *ana);
78 static int cd9660_rrip_slink(ISO_RRIP_SLINK *p, ISO_RRIP_ANALYZE *ana);
79 static int cd9660_rrip_stop(ISO_SUSP_HEADER *p, ISO_RRIP_ANALYZE *ana);
80 static int cd9660_rrip_tstamp(ISO_RRIP_TSTAMP *p, ISO_RRIP_ANALYZE *ana);
83 * POSIX file attribute
86 cd9660_rrip_attr(p,ana)
88 ISO_RRIP_ANALYZE *ana;
90 ana->inop->inode.iso_mode = isonum_733(p->mode);
91 ana->inop->inode.iso_uid = isonum_733(p->uid);
92 ana->inop->inode.iso_gid = isonum_733(p->gid);
93 ana->inop->inode.iso_links = isonum_733(p->links);
94 ana->fields &= ~ISO_SUSP_ATTR;
99 cd9660_rrip_defattr(isodir,ana)
100 struct iso_directory_record *isodir;
101 ISO_RRIP_ANALYZE *ana;
103 /* But this is a required field! */
104 printf("RRIP without PX field?\n");
105 cd9660_defattr(isodir,ana->inop,NULL,ISO_FTYPE_RRIP);
112 cd9660_rrip_slink(p,ana)
114 ISO_RRIP_ANALYZE *ana;
116 ISO_RRIP_SLINK_COMPONENT *pcomp;
117 ISO_RRIP_SLINK_COMPONENT *pcompe;
119 char *outbuf, *inbuf;
121 pcomp = (ISO_RRIP_SLINK_COMPONENT *)p->component;
122 pcompe = (ISO_RRIP_SLINK_COMPONENT *)((char *)p + isonum_711(p->h.length));
124 outbuf = ana->outbuf;
128 * Gathering a Symbolic name from each component with path
132 pcomp = (ISO_RRIP_SLINK_COMPONENT *)((char *)pcomp + ISO_RRIP_SLSIZ
133 + isonum_711(pcomp->clen))) {
136 if (len < ana->maxlen) {
146 switch (*pcomp->cflag) {
148 case ISO_SUSP_CFLAG_CURRENT:
149 /* Inserting Current */
153 case ISO_SUSP_CFLAG_PARENT:
154 /* Inserting Parent */
158 case ISO_SUSP_CFLAG_ROOT:
159 /* Inserting slash for ROOT */
160 /* start over from beginning(?) */
165 case ISO_SUSP_CFLAG_VOLROOT:
166 /* Inserting a mount point i.e. "/cdrom" */
170 inbuf = ana->imp->im_mountp->mnt_stat.f_mntonname;
171 wlen = strlen(inbuf);
174 case ISO_SUSP_CFLAG_HOST:
175 /* Inserting hostname i.e. "kurt.tools.de" */
177 wlen = strlen(hostname);
180 case ISO_SUSP_CFLAG_CONTINUE:
184 /* Inserting component */
185 wlen = isonum_711(pcomp->clen);
189 printf("RRIP with incorrect flags?");
190 wlen = ana->maxlen + 1;
194 if (len + wlen > ana->maxlen) {
195 /* indicate error to caller */
198 ana->outbuf -= *ana->outlen;
203 bcopy(inbuf,outbuf,wlen);
208 ana->outbuf = outbuf;
212 if (!isonum_711(p->flags)) {
213 ana->fields &= ~ISO_SUSP_SLINK;
214 return ISO_SUSP_SLINK;
223 cd9660_rrip_altname(p,ana)
225 ISO_RRIP_ANALYZE *ana;
236 case ISO_SUSP_CFLAG_CURRENT:
237 /* Inserting Current */
241 case ISO_SUSP_CFLAG_PARENT:
242 /* Inserting Parent */
246 case ISO_SUSP_CFLAG_HOST:
247 /* Inserting hostname i.e. "kurt.tools.de" */
249 wlen = strlen(hostname);
252 case ISO_SUSP_CFLAG_CONTINUE:
256 /* Inserting component */
257 wlen = isonum_711(p->h.length) - 5;
258 inbuf = (char *)p + 5;
262 printf("RRIP with incorrect NM flags?\n");
263 wlen = ana->maxlen + 1;
267 if ((*ana->outlen += wlen) > ana->maxlen) {
268 /* treat as no name field */
269 ana->fields &= ~ISO_SUSP_ALTNAME;
270 ana->outbuf -= *ana->outlen - wlen;
275 bcopy(inbuf,ana->outbuf,wlen);
279 ana->fields &= ~ISO_SUSP_ALTNAME;
280 return ISO_SUSP_ALTNAME;
286 cd9660_rrip_defname(isodir,ana)
287 struct iso_directory_record *isodir;
288 ISO_RRIP_ANALYZE *ana;
290 isofntrans(isodir->name,isonum_711(isodir->name_len),
291 ana->outbuf,ana->outlen,
292 1,isonum_711(isodir->flags)&4, ana->imp->joliet_level,
293 ana->imp->im_flags, ana->imp->im_d2l);
294 switch (*ana->outbuf) {
301 /* outlen is 1 already */
302 strcpy(ana->outbuf,"..");
308 * Parent or Child Link
311 cd9660_rrip_pclink(p,ana)
313 ISO_RRIP_ANALYZE *ana;
315 *ana->inump = isonum_733(p->dir_loc) << ana->imp->im_bshift;
316 ana->fields &= ~(ISO_SUSP_CLINK|ISO_SUSP_PLINK);
317 return *p->h.type == 'C' ? ISO_SUSP_CLINK : ISO_SUSP_PLINK;
321 * Relocated directory
324 cd9660_rrip_reldir(p,ana)
326 ISO_RRIP_ANALYZE *ana;
328 /* special hack to make caller aware of RE field */
331 return ISO_SUSP_RELDIR|ISO_SUSP_ALTNAME|ISO_SUSP_CLINK|ISO_SUSP_PLINK;
335 cd9660_rrip_tstamp(p,ana)
337 ISO_RRIP_ANALYZE *ana;
343 /* Check a format of time stamp (7bytes/17bytes) */
344 if (!(*p->flags&ISO_SUSP_TSTAMP_FORM17)) {
345 if (*p->flags&ISO_SUSP_TSTAMP_CREAT)
348 if (*p->flags&ISO_SUSP_TSTAMP_MODIFY) {
349 cd9660_tstamp_conv7(ptime,&ana->inop->inode.iso_mtime,
353 bzero(&ana->inop->inode.iso_mtime,sizeof(struct timespec));
355 if (*p->flags&ISO_SUSP_TSTAMP_ACCESS) {
356 cd9660_tstamp_conv7(ptime,&ana->inop->inode.iso_atime,
360 ana->inop->inode.iso_atime = ana->inop->inode.iso_mtime;
362 if (*p->flags&ISO_SUSP_TSTAMP_ATTR)
363 cd9660_tstamp_conv7(ptime,&ana->inop->inode.iso_ctime,
366 ana->inop->inode.iso_ctime = ana->inop->inode.iso_mtime;
369 if (*p->flags&ISO_SUSP_TSTAMP_CREAT)
372 if (*p->flags&ISO_SUSP_TSTAMP_MODIFY) {
373 cd9660_tstamp_conv17(ptime,&ana->inop->inode.iso_mtime);
376 bzero(&ana->inop->inode.iso_mtime,sizeof(struct timespec));
378 if (*p->flags&ISO_SUSP_TSTAMP_ACCESS) {
379 cd9660_tstamp_conv17(ptime,&ana->inop->inode.iso_atime);
382 ana->inop->inode.iso_atime = ana->inop->inode.iso_mtime;
384 if (*p->flags&ISO_SUSP_TSTAMP_ATTR)
385 cd9660_tstamp_conv17(ptime,&ana->inop->inode.iso_ctime);
387 ana->inop->inode.iso_ctime = ana->inop->inode.iso_mtime;
390 ana->fields &= ~ISO_SUSP_TSTAMP;
391 return ISO_SUSP_TSTAMP;
395 cd9660_rrip_deftstamp(isodir,ana)
396 struct iso_directory_record *isodir;
397 ISO_RRIP_ANALYZE *ana;
399 cd9660_deftstamp(isodir,ana->inop,NULL,ISO_FTYPE_RRIP);
406 cd9660_rrip_device(p,ana)
408 ISO_RRIP_ANALYZE *ana;
412 high = isonum_733(p->dev_t_high);
413 low = isonum_733(p->dev_t_low);
416 ana->inop->inode.iso_rdev = makedev(umajor(low), uminor(low));
418 ana->inop->inode.iso_rdev = makedev(high, uminor(low));
419 ana->fields &= ~ISO_SUSP_DEVICE;
420 return ISO_SUSP_DEVICE;
427 cd9660_rrip_idflag(p,ana)
429 ISO_RRIP_ANALYZE *ana;
431 ana->fields &= isonum_711(p->flags)|~0xff; /* don't touch high bits */
432 /* special handling of RE field */
433 if (ana->fields&ISO_SUSP_RELDIR)
434 return cd9660_rrip_reldir(/* XXX */ (ISO_RRIP_RELDIR *)p,ana);
436 return ISO_SUSP_IDFLAG;
440 * Continuation pointer
443 cd9660_rrip_cont(p,ana)
445 ISO_RRIP_ANALYZE *ana;
447 ana->iso_ce_blk = isonum_733(p->location);
448 ana->iso_ce_off = isonum_733(p->offset);
449 ana->iso_ce_len = isonum_733(p->length);
450 return ISO_SUSP_CONT;
457 cd9660_rrip_stop(p,ana)
459 ISO_RRIP_ANALYZE *ana;
461 return ISO_SUSP_STOP;
465 * Extension reference
468 cd9660_rrip_extref(p,ana)
470 ISO_RRIP_ANALYZE *ana;
472 if (isonum_711(p->len_id) != 10
473 || bcmp((char *)p + 8,"RRIP_1991A",10)
474 || isonum_711(p->version) != 1)
476 ana->fields &= ~ISO_SUSP_EXTREF;
477 return ISO_SUSP_EXTREF;
481 cd9660_rrip_loop(isodir,ana,table)
482 struct iso_directory_record *isodir;
483 ISO_RRIP_ANALYZE *ana;
487 ISO_SUSP_HEADER *phead;
488 ISO_SUSP_HEADER *pend;
489 struct buf *bp = NULL;
495 * Note: If name length is odd,
496 * it will be padding 1 byte after the name
498 pwhead = isodir->name + isonum_711(isodir->name_len);
499 if (!(isonum_711(isodir->name_len)&1))
501 isochar(isodir->name, pwhead, ana->imp->joliet_level, &c, NULL,
502 ana->imp->im_flags, ana->imp->im_d2l);
504 /* If it's not the '.' entry of the root dir obey SP field */
505 if (c != 0 || isonum_733(isodir->extent) != ana->imp->root_extent)
506 pwhead += ana->imp->rr_skip;
508 pwhead += ana->imp->rr_skip0;
510 phead = (ISO_SUSP_HEADER *)pwhead;
511 pend = (ISO_SUSP_HEADER *)((char *)isodir + isonum_711(isodir->length));
517 * Note: "pend" should be more than one SUSP header
519 while (pend >= phead + 1) {
520 if (isonum_711(phead->version) == 1) {
521 for (ptable = table; ptable->func; ptable++) {
522 if (*phead->type == *ptable->type
523 && phead->type[1] == ptable->type[1]) {
524 result |= ptable->func(phead,ana);
531 if (result&ISO_SUSP_STOP) {
532 result &= ~ISO_SUSP_STOP;
535 /* plausibility check */
536 if (isonum_711(phead->length) < sizeof(*phead))
540 * Hopefully this works with newer versions, too
542 phead = (ISO_SUSP_HEADER *)((char *)phead + isonum_711(phead->length));
545 if (ana->fields && ana->iso_ce_len) {
546 if (ana->iso_ce_blk >= ana->imp->volume_space_size
547 || ana->iso_ce_off + ana->iso_ce_len > ana->imp->logical_block_size
548 || bread(ana->imp->im_devvp,
550 (ana->imp->im_bshift - DEV_BSHIFT),
551 ana->imp->logical_block_size, NOCRED, &bp))
552 /* what to do now? */
554 phead = (ISO_SUSP_HEADER *)(bp->b_data + ana->iso_ce_off);
555 pend = (ISO_SUSP_HEADER *) ((char *)phead + ana->iso_ce_len);
562 * If we don't find the Basic SUSP stuffs, just set default value
563 * (attribute/time stamp)
565 for (ptable = table; ptable->func2; ptable++)
566 if (!(ptable->result&result))
567 ptable->func2(isodir,ana);
576 * XXX the casts are bogus but will do for now.
578 #define BC (rrt_func_t *)
579 static RRIP_TABLE rrip_table_analyze[] = {
580 { "PX", BC cd9660_rrip_attr, cd9660_rrip_defattr, ISO_SUSP_ATTR },
581 { "TF", BC cd9660_rrip_tstamp, cd9660_rrip_deftstamp, ISO_SUSP_TSTAMP },
582 { "PN", BC cd9660_rrip_device, 0, ISO_SUSP_DEVICE },
583 { "RR", BC cd9660_rrip_idflag, 0, ISO_SUSP_IDFLAG },
584 { "CE", BC cd9660_rrip_cont, 0, ISO_SUSP_CONT },
585 { "ST", BC cd9660_rrip_stop, 0, ISO_SUSP_STOP },
590 cd9660_rrip_analyze(isodir,inop,imp)
591 struct iso_directory_record *isodir;
592 struct iso_node *inop;
595 ISO_RRIP_ANALYZE analyze;
599 analyze.fields = ISO_SUSP_ATTR|ISO_SUSP_TSTAMP|ISO_SUSP_DEVICE;
601 return cd9660_rrip_loop(isodir,&analyze,rrip_table_analyze);
605 * Get Alternate Name.
607 static RRIP_TABLE rrip_table_getname[] = {
608 { "NM", BC cd9660_rrip_altname, cd9660_rrip_defname, ISO_SUSP_ALTNAME },
609 { "CL", BC cd9660_rrip_pclink, 0, ISO_SUSP_CLINK|ISO_SUSP_PLINK },
610 { "PL", BC cd9660_rrip_pclink, 0, ISO_SUSP_CLINK|ISO_SUSP_PLINK },
611 { "RE", BC cd9660_rrip_reldir, 0, ISO_SUSP_RELDIR },
612 { "RR", BC cd9660_rrip_idflag, 0, ISO_SUSP_IDFLAG },
613 { "CE", BC cd9660_rrip_cont, 0, ISO_SUSP_CONT },
614 { "ST", BC cd9660_rrip_stop, 0, ISO_SUSP_STOP },
619 cd9660_rrip_getname(isodir,outbuf,outlen,inump,imp)
620 struct iso_directory_record *isodir;
626 ISO_RRIP_ANALYZE analyze;
630 analyze.outbuf = outbuf;
631 analyze.outlen = outlen;
632 analyze.maxlen = NAME_MAX;
633 analyze.inump = inump;
635 analyze.fields = ISO_SUSP_ALTNAME|ISO_SUSP_RELDIR|ISO_SUSP_CLINK|ISO_SUSP_PLINK;
638 isochar(isodir->name, isodir->name + isonum_711(isodir->name_len),
639 imp->joliet_level, &c, NULL, imp->im_flags, imp->im_d2l);
640 tab = rrip_table_getname;
641 if (c == 0 || c == 1) {
642 cd9660_rrip_defname(isodir,&analyze);
644 analyze.fields &= ~ISO_SUSP_ALTNAME;
648 return cd9660_rrip_loop(isodir,&analyze,tab);
654 static RRIP_TABLE rrip_table_getsymname[] = {
655 { "SL", BC cd9660_rrip_slink, 0, ISO_SUSP_SLINK },
656 { "RR", BC cd9660_rrip_idflag, 0, ISO_SUSP_IDFLAG },
657 { "CE", BC cd9660_rrip_cont, 0, ISO_SUSP_CONT },
658 { "ST", BC cd9660_rrip_stop, 0, ISO_SUSP_STOP },
663 cd9660_rrip_getsymname(isodir,outbuf,outlen,imp)
664 struct iso_directory_record *isodir;
669 ISO_RRIP_ANALYZE analyze;
671 analyze.outbuf = outbuf;
672 analyze.outlen = outlen;
674 analyze.maxlen = MAXPATHLEN;
675 analyze.cont = 1; /* don't start with a slash */
677 analyze.fields = ISO_SUSP_SLINK;
679 return (cd9660_rrip_loop(isodir,&analyze,rrip_table_getsymname)&ISO_SUSP_SLINK);
682 static RRIP_TABLE rrip_table_extref[] = {
683 { "ER", BC cd9660_rrip_extref, 0, ISO_SUSP_EXTREF },
684 { "CE", BC cd9660_rrip_cont, 0, ISO_SUSP_CONT },
685 { "ST", BC cd9660_rrip_stop, 0, ISO_SUSP_STOP },
690 * Check for Rock Ridge Extension and return offset of its fields.
691 * Note: We insist on the ER field.
694 cd9660_rrip_offset(isodir,imp)
695 struct iso_directory_record *isodir;
699 ISO_RRIP_ANALYZE analyze;
702 p = (ISO_RRIP_OFFSET *)(isodir->name + 1);
703 if (bcmp(p,"SP\7\1\276\357",6)) {
704 /* Maybe, it's a CDROM XA disc? */
706 p = (ISO_RRIP_OFFSET *)((char *)p + 15);
707 if (bcmp(p,"SP\7\1\276\357",6))
712 analyze.fields = ISO_SUSP_EXTREF;
713 if (!(cd9660_rrip_loop(isodir,&analyze,rrip_table_extref)&ISO_SUSP_EXTREF))
716 return isonum_711(p->skip);