1N/A/*
1N/A * ISO 9660 filesystem backend for GRUB (GRand Unified Bootloader)
1N/A * including Rock Ridge Extensions support
1N/A *
1N/A * Copyright (C) 1998, 1999 Kousuke Takai <tak@kmc.kyoto-u.ac.jp>
1N/A *
1N/A * This program is free software; you can redistribute it and/or modify
1N/A * it under the terms of the GNU General Public License as published by
1N/A * the Free Software Foundation; either version 2 of the License, or
1N/A * (at your option) any later version.
1N/A *
1N/A * This program is distributed in the hope that it will be useful,
1N/A * but WITHOUT ANY WARRANTY; without even the implied warranty of
1N/A * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
1N/A * GNU General Public License for more details.
1N/A *
1N/A * You should have received a copy of the GNU General Public License
1N/A * along with this program; if not, write to the Free Software
1N/A * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
1N/A */
1N/A/*
1N/A * References:
1N/A * linux/fs/isofs/rock.[ch]
1N/A * mkisofs-1.11.1/diag/isoinfo.c
1N/A * mkisofs-1.11.1/iso9660.h
1N/A * (all are written by Eric Youngdale)
1N/A *
1N/A * Modifications by:
1N/A * Leonid Lisovskiy <lly@pisem.net> 2003
1N/A */
1N/A
1N/A#ifdef FSYS_ISO9660
1N/A
1N/A#include "shared.h"
1N/A#include "filesys.h"
1N/A#include "iso9660.h"
1N/A
1N/A/* iso9660 super-block data in memory */
1N/Astruct iso_sb_info {
1N/A unsigned long vol_sector;
1N/A
1N/A};
1N/A
1N/A/* iso fs inode data in memory */
1N/Astruct iso_inode_info {
1N/A unsigned long file_start;
1N/A};
1N/A
1N/A#define ISO_SUPER \
1N/A ((struct iso_sb_info *)(FSYS_BUF))
1N/A#define INODE \
1N/A ((struct iso_inode_info *)(FSYS_BUF+sizeof(struct iso_sb_info)))
1N/A#define PRIMDESC ((struct iso_primary_descriptor *)(FSYS_BUF + 2048))
1N/A#define DIRREC ((struct iso_directory_record *)(FSYS_BUF + 4096))
1N/A#define RRCONT_BUF ((unsigned char *)(FSYS_BUF + 6144))
1N/A#define NAME_BUF ((unsigned char *)(FSYS_BUF + 8192))
1N/A
1N/A
1N/Astatic inline unsigned long
1N/Agrub_log2 (unsigned long word)
1N/A{
1N/A asm volatile ("bsfl %1,%0"
1N/A : "=r" (word)
1N/A : "r" (word));
1N/A return word;
1N/A}
1N/A#define log2 grub_log2
1N/A
1N/Astatic int
1N/Aiso9660_devread (int sector, int byte_offset, int byte_len, char *buf)
1N/A{
1N/A static int read_count = 0, threshold = 2;
1N/A unsigned short sector_size_lg2 = log2(buf_geom.sector_size);
1N/A
1N/A /*
1N/A * We have to use own devread() function since BIOS return wrong geometry
1N/A */
1N/A if (sector < 0)
1N/A {
1N/A errnum = ERR_OUTSIDE_PART;
1N/A return 0;
1N/A }
1N/A if (byte_len <= 0)
1N/A return 1;
1N/A
1N/A sector += (byte_offset >> sector_size_lg2);
1N/A byte_offset &= (buf_geom.sector_size - 1);
1N/A asm volatile ("shl%L0 %1,%0"
1N/A : "=r"(sector)
1N/A : "Ic"((int8_t)(ISO_SECTOR_BITS - sector_size_lg2)),
1N/A "0"(sector));
1N/A
1N/A#if !defined(STAGE1_5)
1N/A if (disk_read_hook && debug)
1N/A printf ("<%d, %d, %d>", sector, byte_offset, byte_len);
1N/A#endif /* !STAGE1_5 */
1N/A
1N/A read_count += (byte_len >> 9);
1N/A if ((read_count >> 11) > threshold) {
1N/A noisy_printf(".");
1N/A threshold += 2; /* one dot every 2 MB */
1N/A }
1N/A return rawread(current_drive, part_start + sector, byte_offset, byte_len, buf);
1N/A}
1N/A
1N/Aint
1N/Aiso9660_mount (void)
1N/A{
1N/A unsigned int sector;
1N/A
1N/A /*
1N/A * Because there is no defined slice type ID for ISO-9660 filesystem,
1N/A * this test will pass only either (1) if entire disk is used, or
1N/A * (2) if current partition is BSD style sub-partition whose ID is
1N/A * ISO-9660.
1N/A */
1N/A if ((current_partition != 0xFFFFFF)
1N/A && !IS_PC_SLICE_TYPE_BSD_WITH_FS(current_slice, FS_ISO9660))
1N/A return 0;
1N/A
1N/A /*
1N/A * Currently, only FIRST session of MultiSession disks are supported !!!
1N/A */
1N/A for (sector = 16 ; sector < 32 ; sector++)
1N/A {
1N/A if (!iso9660_devread(sector, 0, sizeof(*PRIMDESC), (char *)PRIMDESC))
1N/A break;
1N/A /* check ISO_VD_PRIMARY and ISO_STANDARD_ID */
1N/A if (PRIMDESC->type.l == ISO_VD_PRIMARY
1N/A && !memcmp(PRIMDESC->id, ISO_STANDARD_ID, sizeof(PRIMDESC->id)))
1N/A {
1N/A ISO_SUPER->vol_sector = sector;
1N/A INODE->file_start = 0;
1N/A fsmax = PRIMDESC->volume_space_size.l;
1N/A return 1;
1N/A }
1N/A }
1N/A
1N/A return 0;
1N/A}
1N/A
1N/Aint
1N/Aiso9660_dir (char *dirname)
1N/A{
1N/A struct iso_directory_record *idr;
1N/A RR_ptr_t rr_ptr;
1N/A struct rock_ridge *ce_ptr;
1N/A unsigned int pathlen;
1N/A int size;
1N/A unsigned int extent;
1N/A unsigned char file_type;
1N/A unsigned int rr_len;
1N/A unsigned char rr_flag;
1N/A
1N/A idr = &PRIMDESC->root_directory_record;
1N/A INODE->file_start = 0;
1N/A
1N/A do
1N/A {
1N/A while (*dirname == '/') /* skip leading slashes */
1N/A dirname++;
1N/A /* pathlen = strcspn(dirname, "/\n\t "); */
1N/A for (pathlen = 0 ;
1N/A dirname[pathlen]
1N/A && !isspace(dirname[pathlen]) && dirname[pathlen] != '/' ;
1N/A pathlen++)
1N/A ;
1N/A
1N/A size = idr->size.l;
1N/A extent = idr->extent.l;
1N/A
1N/A while (size > 0)
1N/A {
1N/A if (!iso9660_devread(extent, 0, ISO_SECTOR_SIZE, (char *)DIRREC))
1N/A {
1N/A errnum = ERR_FSYS_CORRUPT;
1N/A return 0;
1N/A }
1N/A extent++;
1N/A
1N/A idr = (struct iso_directory_record *)DIRREC;
1N/A for (; idr->length.l > 0;
1N/A idr = (struct iso_directory_record *)((char *)idr + idr->length.l) )
1N/A {
1N/A const char *name = idr->name;
1N/A unsigned int name_len = idr->name_len.l;
1N/A
1N/A file_type = (idr->flags.l & 2) ? ISO_DIRECTORY : ISO_REGULAR;
1N/A if (name_len == 1)
1N/A {
1N/A if ((name[0] == 0) || /* self */
1N/A (name[0] == 1)) /* parent */
1N/A continue;
1N/A }
1N/A if (name_len > 2 && CHECK2(name + name_len - 2, ';', '1'))
1N/A {
1N/A name_len -= 2; /* truncate trailing file version */
1N/A if (name_len > 1 && name[name_len - 1] == '.')
1N/A name_len--; /* truncate trailing dot */
1N/A }
1N/A
1N/A /*
1N/A * Parse Rock-Ridge extension
1N/A */
1N/A rr_len = (idr->length.l - idr->name_len.l
1N/A - sizeof(struct iso_directory_record)
1N/A + sizeof(idr->name));
1N/A rr_ptr.ptr = ((unsigned char *)idr + idr->name_len.l
1N/A + sizeof(struct iso_directory_record)
1N/A - sizeof(idr->name));
1N/A if (rr_ptr.i & 1)
1N/A rr_ptr.i++, rr_len--;
1N/A ce_ptr = NULL;
1N/A rr_flag = RR_FLAG_NM | RR_FLAG_PX /*| RR_FLAG_SL*/;
1N/A
1N/A while (rr_len >= 4)
1N/A {
1N/A if (rr_ptr.rr->version != 1)
1N/A {
1N/A#ifndef STAGE1_5
1N/A if (debug)
1N/A printf(
1N/A "Non-supported version (%d) RockRidge chunk "
1N/A "`%c%c'\n", rr_ptr.rr->version,
1N/A rr_ptr.rr->signature & 0xFF,
1N/A rr_ptr.rr->signature >> 8);
1N/A#endif
1N/A }
1N/A else
1N/A {
1N/A switch (rr_ptr.rr->signature)
1N/A {
1N/A case RRMAGIC('R', 'R'):
1N/A if ( rr_ptr.rr->len >= (4+sizeof(struct RR)))
1N/A rr_flag &= rr_ptr.rr->u.rr.flags.l;
1N/A break;
1N/A case RRMAGIC('N', 'M'):
1N/A name = rr_ptr.rr->u.nm.name;
1N/A name_len = rr_ptr.rr->len - (4+sizeof(struct NM));
1N/A rr_flag &= ~RR_FLAG_NM;
1N/A break;
1N/A case RRMAGIC('P', 'X'):
1N/A if (rr_ptr.rr->len >= (4+sizeof(struct PX)))
1N/A {
1N/A file_type = ((rr_ptr.rr->u.px.mode.l & POSIX_S_IFMT)
1N/A == POSIX_S_IFREG
1N/A ? ISO_REGULAR
1N/A : ((rr_ptr.rr->u.px.mode.l & POSIX_S_IFMT)
1N/A == POSIX_S_IFDIR
1N/A ? ISO_DIRECTORY : ISO_OTHER));
1N/A rr_flag &= ~RR_FLAG_PX;
1N/A }
1N/A break;
1N/A case RRMAGIC('C', 'E'):
1N/A if (rr_ptr.rr->len >= (4+sizeof(struct CE)))
1N/A ce_ptr = rr_ptr.rr;
1N/A break;
1N/A#if 0 // RockRidge symlinks are not supported yet
1N/A case RRMAGIC('S', 'L'):
1N/A {
1N/A int slen;
1N/A unsigned char rootflag, prevflag;
1N/A char *rpnt = NAME_BUF+1024;
1N/A struct SL_component *slp;
1N/A
1N/A slen = rr_ptr.rr->len - (4+1);
1N/A slp = &rr_ptr.rr->u.sl.link;
1N/A while (slen > 1)
1N/A {
1N/A rootflag = 0;
1N/A switch (slp->flags.l)
1N/A {
1N/A case 0:
1N/A memcpy(rpnt, slp->text, slp->len);
1N/A rpnt += slp->len;
1N/A break;
1N/A case 4:
1N/A *rpnt++ = '.';
1N/A /* fallthru */
1N/A case 2:
1N/A *rpnt++ = '.';
1N/A break;
1N/A case 8:
1N/A rootflag = 1;
1N/A *rpnt++ = '/';
1N/A break;
1N/A default:
1N/A printf("Symlink component flag not implemented (%d)\n",
1N/A slp->flags.l);
1N/A slen = 0;
1N/A break;
1N/A }
1N/A slen -= slp->len + 2;
1N/A prevflag = slp->flags.l;
1N/A slp = (struct SL_component *) ((char *) slp + slp->len + 2);
1N/A
1N/A if (slen < 2)
1N/A {
1N/A /*
1N/A * If there is another SL record, and this component
1N/A * record isn't continued, then add a slash.
1N/A */
1N/A if ((!rootflag) && (rr_ptr.rr->u.sl.flags.l & 1) && !(prevflag & 1))
1N/A *rpnt++='/';
1N/A break;
1N/A }
1N/A
1N/A /*
1N/A * If this component record isn't continued, then append a '/'.
1N/A */
1N/A if (!rootflag && !(prevflag & 1))
1N/A *rpnt++ = '/';
1N/A }
1N/A *rpnt++ = '\0';
1N/A grub_putstr(NAME_BUF+1024);// debug print!
1N/A }
1N/A rr_flag &= ~RR_FLAG_SL;
1N/A break;
1N/A#endif
1N/A default:
1N/A break;
1N/A }
1N/A }
1N/A if (!rr_flag)
1N/A /*
1N/A * There is no more extension we expects...
1N/A */
1N/A break;
1N/A
1N/A rr_len -= rr_ptr.rr->len;
1N/A rr_ptr.ptr += rr_ptr.rr->len;
1N/A if (rr_len < 4 && ce_ptr != NULL)
1N/A {
1N/A /* preserve name before loading new extent. */
1N/A if( RRCONT_BUF <= (unsigned char *)name
1N/A && (unsigned char *)name < RRCONT_BUF + ISO_SECTOR_SIZE )
1N/A {
1N/A memcpy(NAME_BUF, name, name_len);
1N/A name = NAME_BUF;
1N/A }
1N/A rr_ptr.ptr = RRCONT_BUF + ce_ptr->u.ce.offset.l;
1N/A rr_len = ce_ptr->u.ce.size.l;
1N/A if (!iso9660_devread(ce_ptr->u.ce.extent.l, 0, ISO_SECTOR_SIZE, RRCONT_BUF))
1N/A {
1N/A errnum = 0; /* this is not fatal. */
1N/A break;
1N/A }
1N/A ce_ptr = NULL;
1N/A }
1N/A } /* rr_len >= 4 */
1N/A
1N/A filemax = MAXINT;
1N/A if (name_len >= pathlen
1N/A && !memcmp(name, dirname, pathlen))
1N/A {
1N/A if (dirname[pathlen] == '/' || !print_possibilities)
1N/A {
1N/A /*
1N/A * DIRNAME is directory component of pathname,
1N/A * or we are to open a file.
1N/A */
1N/A if (pathlen == name_len)
1N/A {
1N/A if (dirname[pathlen] == '/')
1N/A {
1N/A if (file_type != ISO_DIRECTORY)
1N/A {
1N/A errnum = ERR_BAD_FILETYPE;
1N/A return 0;
1N/A }
1N/A goto next_dir_level;
1N/A }
1N/A if (file_type != ISO_REGULAR)
1N/A {
1N/A errnum = ERR_BAD_FILETYPE;
1N/A return 0;
1N/A }
1N/A INODE->file_start = idr->extent.l;
1N/A filepos = 0;
1N/A filemax = idr->size.l;
1N/A return 1;
1N/A }
1N/A }
1N/A else /* Completion */
1N/A {
1N/A#ifndef STAGE1_5
1N/A if (print_possibilities > 0)
1N/A print_possibilities = -print_possibilities;
1N/A memcpy(NAME_BUF, name, name_len);
1N/A NAME_BUF[name_len] = '\0';
1N/A print_a_completion (NAME_BUF);
1N/A#endif
1N/A }
1N/A }
1N/A } /* for */
1N/A
1N/A size -= ISO_SECTOR_SIZE;
1N/A } /* size>0 */
1N/A
1N/A if (dirname[pathlen] == '/' || print_possibilities >= 0)
1N/A {
1N/A errnum = ERR_FILE_NOT_FOUND;
1N/A return 0;
1N/A }
1N/A
1N/A next_dir_level:
1N/A dirname += pathlen;
1N/A
1N/A } while (*dirname == '/');
1N/A
1N/A return 1;
1N/A}
1N/A
1N/Aint
1N/Aiso9660_read (char *buf, int len)
1N/A{
1N/A int sector, blkoffset, size, ret;
1N/A
1N/A if (INODE->file_start == 0)
1N/A return 0;
1N/A
1N/A ret = 0;
1N/A blkoffset = filepos & (ISO_SECTOR_SIZE - 1);
1N/A sector = filepos >> ISO_SECTOR_BITS;
1N/A while (len > 0)
1N/A {
1N/A size = ISO_SECTOR_SIZE - blkoffset;
1N/A if (size > len)
1N/A size = len;
1N/A
1N/A disk_read_func = disk_read_hook;
1N/A
1N/A if (!iso9660_devread(INODE->file_start + sector, blkoffset, size, buf))
1N/A return 0;
1N/A
1N/A disk_read_func = NULL;
1N/A
1N/A len -= size;
1N/A buf += size;
1N/A ret += size;
1N/A filepos += size;
1N/A sector++;
1N/A blkoffset = 0;
1N/A }
1N/A
1N/A return ret;
1N/A}
1N/A
1N/A#endif /* FSYS_ISO9660 */