/* $Id: iso9660_fs.c,v 1.4 2003/08/31 14:26:06 rocky Exp $ Copyright (C) 2001 Herbert Valerio Riedel Copyright (C) 2003 Rocky Bernstein This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #ifdef HAVE_CONFIG_H # include "config.h" #endif #ifdef HAVE_STRING_H #include #endif #include #include #include /* Private headers */ #include "cdio_assert.h" #include "bytesex.h" #include "ds.h" static const char _rcsid[] = "$Id: iso9660_fs.c,v 1.4 2003/08/31 14:26:06 rocky Exp $"; static void _idr2statbuf (const iso9660_dir_t *idr, iso9660_stat_t *buf) { iso9660_xa_t *xa_data = NULL; int su_length = 0; memset ((void *) buf, 0, sizeof (iso9660_stat_t)); if (!iso9660_get_dir_len(idr)) return; cdio_assert (iso9660_get_dir_len(idr) >= sizeof (iso9660_dir_t)); buf->type = (idr->flags & ISO_DIRECTORY) ? _STAT_DIR : _STAT_FILE; buf->lsn = from_733 (idr->extent); buf->size = from_733 (idr->size); buf->secsize = _cdio_len2blocks (buf->size, ISO_BLOCKSIZE); su_length = iso9660_get_dir_len(idr) - sizeof (iso9660_dir_t); su_length -= idr->name_len; if (su_length % 2) su_length--; if (su_length < 0 || su_length < sizeof (iso9660_xa_t)) return; xa_data = (void *) (((char *) idr) + (iso9660_get_dir_len(idr) - su_length)); if (xa_data->signature[0] != 'X' || xa_data->signature[1] != 'A') { cdio_warn ("XA signature not found in ISO9660's system use area;" " ignoring XA attributes for this file entry."); cdio_debug ("%d %d %d, '%c%c' (%d, %d)", iso9660_get_dir_len(idr), idr->name_len, su_length, xa_data->signature[0], xa_data->signature[1], xa_data->signature[0], xa_data->signature[1]); return; } buf->xa = *xa_data; } static char * _idr2name (const iso9660_dir_t *idr) { char namebuf[256] = { 0, }; if (!iso9660_get_dir_len(idr)) return NULL; cdio_assert (iso9660_get_dir_len(idr) >= sizeof (iso9660_dir_t)); /* (idr->flags & ISO_DIRECTORY) */ if (idr->name[0] == '\0') strcpy (namebuf, "."); else if (idr->name[0] == '\1') strcpy (namebuf, ".."); else strncpy (namebuf, idr->name, idr->name_len); return strdup (namebuf); } static void _fs_stat_root (CdIo *obj, iso9660_stat_t *buf, bool is_mode2) { char block[ISO_BLOCKSIZE] = { 0, }; const iso9660_pvd_t *pvd = (void *) █ const iso9660_dir_t *idr = (void *) pvd->root_directory_record; if (is_mode2) { if (cdio_read_mode2_sector (obj, &block, ISO_PVD_SECTOR, false)) cdio_assert_not_reached (); } else { if (cdio_read_mode1_sector (obj, &block, ISO_PVD_SECTOR, false)) cdio_assert_not_reached (); } _idr2statbuf (idr, buf); } static int _fs_stat_traverse (CdIo *obj, const iso9660_stat_t *_root, char **splitpath, iso9660_stat_t *buf) { unsigned offset = 0; uint8_t *_dirbuf = NULL; if (!splitpath[0]) { *buf = *_root; return 0; } if (_root->type == _STAT_FILE) return -1; cdio_assert (_root->type == _STAT_DIR); if (_root->size != ISO_BLOCKSIZE * _root->secsize) { cdio_warn ("bad size for ISO9660 directory (%ud) should be (%d)!", (unsigned) _root->size, ISO_BLOCKSIZE * _root->secsize); } _dirbuf = _cdio_malloc (_root->secsize * ISO_BLOCKSIZE); if (cdio_read_mode2_sectors (obj, _dirbuf, _root->lsn, false, _root->secsize)) cdio_assert_not_reached (); while (offset < (_root->secsize * ISO_BLOCKSIZE)) { const iso9660_dir_t *idr = (void *) &_dirbuf[offset]; iso9660_stat_t _stat; char *_name; if (!iso9660_get_dir_len(idr)) { offset++; continue; } _name = _idr2name (idr); _idr2statbuf (idr, &_stat); if (!strcmp (splitpath[0], _name)) { int retval = _fs_stat_traverse (obj, &_stat, &splitpath[1], buf); free (_name); free (_dirbuf); return retval; } free (_name); offset += iso9660_get_dir_len(idr); } cdio_assert (offset == (_root->secsize * ISO_BLOCKSIZE)); /* not found */ free (_dirbuf); return -1; } int iso9660_fs_stat (CdIo *obj, const char pathname[], iso9660_stat_t *buf, bool is_mode2) { iso9660_stat_t _root; int retval; char **splitpath; cdio_assert (obj != NULL); cdio_assert (pathname != NULL); cdio_assert (buf != NULL); _fs_stat_root (obj, &_root, is_mode2); splitpath = _cdio_strsplit (pathname, '/'); retval = _fs_stat_traverse (obj, &_root, splitpath, buf); _cdio_strfreev (splitpath); return retval; } void * /* list of char* -- caller must free it */ iso9660_fs_readdir (CdIo *obj, const char pathname[], bool is_mode2) { iso9660_stat_t _stat; cdio_assert (obj != NULL); cdio_assert (pathname != NULL); if (iso9660_fs_stat (obj, pathname, &_stat, is_mode2)) return NULL; if (_stat.type != _STAT_DIR) return NULL; { unsigned offset = 0; uint8_t *_dirbuf = NULL; CdioList *retval = _cdio_list_new (); if (_stat.size != ISO_BLOCKSIZE * _stat.secsize) { cdio_warn ("bad size for ISO9660 directory (%ud) should be (%d)!", (unsigned) _stat.size, ISO_BLOCKSIZE * _stat.secsize); } _dirbuf = _cdio_malloc (_stat.secsize * ISO_BLOCKSIZE); if (is_mode2) { if (cdio_read_mode2_sectors (obj, _dirbuf, _stat.lsn, false, _stat.secsize)) cdio_assert_not_reached (); } else { if (cdio_read_mode1_sectors (obj, _dirbuf, _stat.lsn, false, _stat.secsize)) cdio_assert_not_reached (); } while (offset < (_stat.secsize * ISO_BLOCKSIZE)) { const iso9660_dir_t *idr = (void *) &_dirbuf[offset]; if (!iso9660_get_dir_len(idr)) { offset++; continue; } _cdio_list_append (retval, _idr2name (idr)); offset += iso9660_get_dir_len(idr); } cdio_assert (offset == (_stat.secsize * ISO_BLOCKSIZE)); free (_dirbuf); return retval; } }