274 lines
6.5 KiB
C
274 lines
6.5 KiB
C
/*
|
||
$Id: iso9660_fs.c,v 1.4 2003/08/31 14:26:06 rocky Exp $
|
||
|
||
Copyright (C) 2001 Herbert Valerio Riedel <hvr@gnu.org>
|
||
Copyright (C) 2003 Rocky Bernstein <rocky@panix.com>
|
||
|
||
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 <string.h>
|
||
#endif
|
||
|
||
#include <cdio/cdio.h>
|
||
#include <cdio/iso9660.h>
|
||
#include <cdio/util.h>
|
||
|
||
/* 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;
|
||
}
|
||
}
|
||
|