Move over reading ISO-9660 filesytems from vcdimager. Handling of XA
attributes also moved over.
This commit is contained in:
rocky
331
lib/iso9660_fs.c
Normal file
331
lib/iso9660_fs.c
Normal file
@@ -0,0 +1,331 @@
|
||||
/*
|
||||
$Id: iso9660_fs.c,v 1.1 2003/08/31 06:59:23 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
|
||||
|
||||
#include <string.h>
|
||||
|
||||
#include <cdio/cdio.h>
|
||||
#include <cdio/iso9660.h>
|
||||
|
||||
/* Private headers */
|
||||
#include "iso9660_fs.h"
|
||||
|
||||
static const char _rcsid[] = "$Id: iso9660_fs.c,v 1.1 2003/08/31 06:59:23 rocky Exp $";
|
||||
|
||||
#define BUF_COUNT 16
|
||||
#define BUF_SIZE 80
|
||||
|
||||
/* Return a pointer to a internal free buffer */
|
||||
static char *
|
||||
_getbuf (void)
|
||||
{
|
||||
static char _buf[BUF_COUNT][BUF_SIZE];
|
||||
static int _num = -1;
|
||||
|
||||
_num++;
|
||||
_num %= BUF_COUNT;
|
||||
|
||||
memset (_buf[_num], 0, BUF_SIZE);
|
||||
|
||||
return _buf[_num];
|
||||
}
|
||||
|
||||
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)
|
||||
{
|
||||
char block[ISO_BLOCKSIZE] = { 0, };
|
||||
const iso9660_pvd_t *pvd = (void *) █
|
||||
const iso9660_dir_t *idr = (void *) pvd->root_directory_record;
|
||||
|
||||
if (cdio_read_mode2_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)
|
||||
{
|
||||
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);
|
||||
|
||||
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[])
|
||||
{
|
||||
iso9660_stat_t _stat;
|
||||
|
||||
cdio_assert (obj != NULL);
|
||||
cdio_assert (pathname != NULL);
|
||||
|
||||
if (iso9660_fs_stat (obj, pathname, &_stat))
|
||||
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 (cdio_read_mode2_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;
|
||||
}
|
||||
}
|
||||
|
||||
/*!
|
||||
Returns a string which interpreting the extended attribute xa_attr.
|
||||
For example:
|
||||
\verbatim
|
||||
d---1xrxrxr
|
||||
---2--r-r-r
|
||||
-a--1xrxrxr
|
||||
\endverbatim
|
||||
|
||||
A description of the characters in the string follows
|
||||
The 1st character is either "d" if the entry is a directory, or "-" if not.
|
||||
The 2nd character is either "a" if the entry is CDDA (audio), or "-" if not.
|
||||
The 3rd character is either "i" if the entry is interleaved, or "-" if not.
|
||||
The 4th character is either "2" if the entry is mode2 form2 or "-" if not.
|
||||
The 5th character is either "1" if the entry is mode2 form1 or "-" if not.
|
||||
Note that an entry will either be in mode2 form1 or mode form2. That
|
||||
is you will either see "2-" or "-1" in the 4th & 5th positions.
|
||||
|
||||
The 6th and 7th characters refer to permissions for everyone while the
|
||||
the 8th and 9th characters refer to permissions for a group while, and
|
||||
the 10th and 11th characters refer to permissions for a user.
|
||||
|
||||
In each of these pairs the first character (6, 8, 10) is "x" if the
|
||||
entry is executable. For a directory this means the directory is
|
||||
allowed to be listed or "searched".
|
||||
The second character of a pair (7, 9, 11) is "r" if the entry is allowed
|
||||
to be read.
|
||||
*/
|
||||
|
||||
const char *
|
||||
iso9660_get_xa_attr_str (uint16_t xa_attr)
|
||||
{
|
||||
char *result = _getbuf();
|
||||
|
||||
xa_attr = uint16_from_be (xa_attr);
|
||||
|
||||
result[0] = (xa_attr & XA_ATTR_DIRECTORY) ? 'd' : '-';
|
||||
result[1] = (xa_attr & XA_ATTR_CDDA) ? 'a' : '-';
|
||||
result[2] = (xa_attr & XA_ATTR_INTERLEAVED) ? 'i' : '-';
|
||||
result[3] = (xa_attr & XA_ATTR_MODE2FORM2) ? '2' : '-';
|
||||
result[4] = (xa_attr & XA_ATTR_MODE2FORM1) ? '1' : '-';
|
||||
|
||||
result[5] = (xa_attr & XA_ATTR_O_EXEC) ? 'x' : '-';
|
||||
result[6] = (xa_attr & XA_ATTR_O_READ) ? 'r' : '-';
|
||||
|
||||
result[7] = (xa_attr & XA_ATTR_G_EXEC) ? 'x' : '-';
|
||||
result[8] = (xa_attr & XA_ATTR_G_READ) ? 'r' : '-';
|
||||
|
||||
result[9] = (xa_attr & XA_ATTR_U_EXEC) ? 'x' : '-';
|
||||
result[10] = (xa_attr & XA_ATTR_U_READ) ? 'r' : '-';
|
||||
|
||||
result[11] = '\0';
|
||||
|
||||
return result;
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user