KArchiveDirectory *KArchive::findOrCreate(const QString &path)
{
//qCDebug(KArchiveLog) << path;
if (path.isEmpty() || path == QLatin1String("/") || path == QLatin1String(".")) { // root dir => found
//qCDebug(KArchiveLog) << "returning rootdir";
return rootDir();
}
// Important note : for tar files containing absolute paths
// (i.e. beginning with "/"), this means the leading "/" will
// be removed (no KDirectory for it), which is exactly the way
// the "tar" program works (though it displays a warning about it)
// See also KArchiveDirectory::entry().
// Already created ? => found
const KArchiveEntry *ent = rootDir()->entry(path);
if (ent) {
if (ent->isDirectory())
//qCDebug(KArchiveLog) << "found it";
{
const KArchiveDirectory *dir = static_cast<const KArchiveDirectory *>(ent);
return const_cast<KArchiveDirectory *>(dir);
} else {
const KArchiveFile *file = static_cast<const KArchiveFile *>(ent);
if (file->size() > 0) {
qCWarning(KArchiveLog) << path << "is normal file, but there are file paths in the archive assuming it is a directory, bailing out";
return nullptr;
}
qCDebug(KArchiveLog) << path << " is an empty file, assuming it is actually a directory and replacing";
KArchiveEntry *myEntry = const_cast<KArchiveEntry*>(ent);
rootDir()->removeEntry(myEntry);
delete myEntry;
}
}
// Otherwise go up and try again
int pos = path.lastIndexOf(QLatin1Char('/'));
KArchiveDirectory *parent;
QString dirname;
if (pos == -1) { // no more slash => create in root dir
parent = rootDir();
dirname = path;
} else {
QString left = path.left(pos);
dirname = path.mid(pos + 1);
parent = findOrCreate(left); // recursive call... until we find an existing dir.
}
//qCDebug(KArchiveLog) << "found parent " << parent->name() << " adding " << dirname << " to ensure " << path;
// Found -> add the missing piece
KArchiveDirectory *e = new KArchiveDirectory(this, dirname, d->rootDir->permissions(),
d->rootDir->date(), d->rootDir->user(),
d->rootDir->group(), QString());
parent->addEntry(e);
return e; // now a directory to <path> exists
}
KArchiveDirectory * KArchiveHandler::findOrCreate( const QString & path )
{
//qDebug() << path;
if ( path.isEmpty() || path == QLatin1String("/") || path == QLatin1String(".") ) // root dir => found
{
//qDebug() << "returning rootdir";
return rootDir();
}
// Important note : for tar files containing absolute paths
// (i.e. beginning with "/"), this means the leading "/" will
// be removed (no KDirectory for it), which is exactly the way
// the "tar" program works (though it displays a warning about it)
// See also KArchiveDirectory::entry().
// Already created ? => found
const KArchiveEntry* ent = rootDir()->entry( path );
if ( ent )
{
if ( ent->isDirectory() )
//qDebug() << "found it";
return (KArchiveDirectory *) ent;
else {
//qWarning() << "Found" << path << "but it's not a directory";
}
}
// Otherwise go up and try again
int pos = path.lastIndexOf( QLatin1Char('/') );
KArchiveDirectory * parent;
QString dirname;
if ( pos == -1 ) // no more slash => create in root dir
{
parent = rootDir();
dirname = path;
}
else
{
QString left = path.left( pos );
dirname = path.mid( pos + 1 );
parent = findOrCreate( left ); // recursive call... until we find an existing dir.
}
//qDebug() << "found parent " << parent->name() << " adding " << dirname << " to ensure " << path;
// Found -> add the missing piece
KArchiveDirectory * e = new KArchiveDirectory( d->archive, dirname, d->rootDir->permissions(),
d->rootDir->date(), d->rootDir->user(),
d->rootDir->group(), QString() );
parent->addEntry( e );
return e; // now a directory to <path> exists
}
bool KPak::openArchive(int mode) {
kdDebug(7000) << "openArchiving!";
if ( mode == IO_WriteOnly )
return true;
if ( mode != IO_ReadOnly && mode != IO_ReadWrite )
{
kdWarning(7000) << "Unsupported mode " << mode << endl;
return false;
}
QIODevice *dev = device();
if (!dev)
return false;
_pakFile = new libPak(dev);
if (!_pakFile->isValidPak()) {
kdWarning(7000) << "Invalid file magic" << endl;
return false;
}
QValueList<libPak::PakFile> files(_pakFile->getAllFiles());
for ( QValueList<libPak::PakFile>::Iterator it = files.begin(); it != files.end(); ++it ) {
QString temp((*it).filename.mid(1));
temp.replace("\\", "/");
int pos = temp.findRev("/");
QString file;
file = temp.mid(pos + 1);
// TODO: Add position and size
KArchiveEntry *e = new KArchiveFile(this, file, 0444, 0, /*uid*/0, /*gid*/0, /*symlink*/0, (int)(*it).offset, (*it).size);
if (pos == -1) {
rootDir()->addEntry(e);
} else {
QString path = QDir::cleanDirPath( (*it).filename.mid(1).replace("\\", "/").left(pos) );
KArchiveDirectory *d = findOrCreate(path);
d->addEntry(e);
}
}
return true;
}
bool KTar::openArchive( QIODevice::OpenMode mode ) {
if ( !(mode & QIODevice::ReadOnly) )
return true;
if ( !d->fillTempFile( fileName() ) )
return false;
// We'll use the permission and user/group of d->rootDir
// for any directory we emulate (see findOrCreate)
//struct stat buf;
//stat( fileName(), &buf );
d->dirList.clear();
QIODevice* dev = device();
if ( !dev )
return false;
// read dir information
char buffer[ 0x200 ];
bool ende = false;
do
{
QString name;
QString symlink;
// Read header
qint64 n = d->readHeader( buffer, name, symlink );
if (n < 0) return false;
if (n == 0x200)
{
bool isdir = false;
if ( name.endsWith( QLatin1Char( '/' ) ) )
{
isdir = true;
name.truncate( name.length() - 1 );
}
QByteArray prefix = QByteArray(buffer + 0x159, 155);
if (prefix[0] != '\0') {
name = (QString::fromLatin1(prefix.constData()) + QLatin1Char('/') + name);
}
int pos = name.lastIndexOf( QLatin1Char('/') );
QString nm = ( pos == -1 ) ? name : name.mid( pos + 1 );
// read access
buffer[ 0x6b ] = 0;
char *dummy;
const char* p = buffer + 0x64;
while( *p == ' ' ) ++p;
int access = (int)strtol( p, &dummy, 8 );
// read user and group
QString user = QString::fromLocal8Bit( buffer + 0x109 );
QString group = QString::fromLocal8Bit( buffer + 0x129 );
// read time
buffer[ 0x93 ] = 0;
p = buffer + 0x88;
while( *p == ' ' ) ++p;
uint time = (int)strtol( p, &dummy, 8 );
// read type flag
char typeflag = buffer[ 0x9c ];
// '0' for files, '1' hard link, '2' symlink, '5' for directory
// (and 'L' for longlink fileNames, 'K' for longlink symlink targets)
// 'D' for GNU tar extension DUMPDIR, 'x' for Extended header referring
// to the next file in the archive and 'g' for Global extended header
if ( typeflag == '5' )
isdir = true;
bool isDumpDir = false;
if ( typeflag == 'D' )
{
isdir = false;
isDumpDir = true;
}
//qDebug() << nm << "isdir=" << isdir << "pos=" << dev->pos() << "typeflag=" << typeflag << " islink=" << ( typeflag == '1' || typeflag == '2' );
if (typeflag == 'x' || typeflag == 'g') { // pax extended header, or pax global extended header
// Skip it for now. TODO: implement reading of extended header, as per http://pubs.opengroup.org/onlinepubs/009695399/utilities/pax.html
(void)dev->read( buffer, 0x200 );
continue;
}
if (isdir)
access |= S_IFDIR; // f*cking broken tar files
KArchiveEntry* e;
if ( isdir )
{
//qDebug() << "directory" << nm;
e = new KArchiveDirectory( this, nm, access, KArchivePrivate::time_tToDateTime(time), user, group, symlink );
}
else
{
// read size
QByteArray sizeBuffer( buffer + 0x7c, 12 );
qint64 size = sizeBuffer.trimmed().toLongLong( 0, 8 /*octal*/ );
//qDebug() << "sizeBuffer='" << sizeBuffer << "' -> size=" << size;
// for isDumpDir we will skip the additional info about that dirs contents
if ( isDumpDir )
{
//qDebug() << nm << "isDumpDir";
e = new KArchiveDirectory( this, nm, access, KArchivePrivate::time_tToDateTime(time), user, group, symlink );
}
else
{
// Let's hack around hard links. Our classes don't support that, so make them symlinks
if ( typeflag == '1' )
{
//qDebug() << "Hard link, setting size to 0 instead of" << size;
size = 0; // no contents
}
//qDebug() << "file" << nm << "size=" << size;
e = new KArchiveFile( this, nm, access, KArchivePrivate::time_tToDateTime(time), user, group, symlink,
dev->pos(), size );
}
// Skip contents + align bytes
qint64 rest = size % 0x200;
qint64 skip = size + (rest ? 0x200 - rest : 0);
//qDebug() << "pos()=" << dev->pos() << "rest=" << rest << "skipping" << skip;
if (! dev->seek( dev->pos() + skip ) ) {
//qWarning() << "skipping" << skip << "failed";
}
}
if ( pos == -1 )
{
if (nm == QLatin1String(".")) { // special case
Q_ASSERT( isdir );
if (isdir) {
setRootDir( static_cast<KArchiveDirectory *>( e ) );
}
} else {
rootDir()->addEntry( e );
}
}
else
{
// In some tar files we can find dir/./file => call cleanPath
QString path = QDir::cleanPath( name.left( pos ) );
// Ensure container directory exists, create otherwise
KArchiveDirectory * d = findOrCreate( path );
d->addEntry( e );
}
}
else
{
//qDebug("Terminating. Read %d bytes, first one is %d", n, buffer[0]);
d->tarEnd = dev->pos() - n; // Remember end of archive
ende = true;
}
} while( !ende );
return true;
}
bool KIso::openArchive(QIODevice::OpenMode mode)
{
KISOFUNC;
iso_vol_desc *desc;
QString path, uid, gid;
QT_STATBUF buf;
int tracks[2*100], trackno = 0, i, access, c_b, c_i, c_j;
KArchiveDirectory *root;
struct iso_directory_record* idr;
struct el_torito_boot_descriptor* bootdesc;
if (mode == QIODevice::WriteOnly)
return false;
readParams();
d->dirList.clear();
tracks[0] = 0;
if (m_startsec > 0) tracks[0] = m_startsec;
//qDebug() << " m_startsec: " << m_startsec << endl;
/* We'll use the permission and user/group of the 'host' file except
* in Rock Ridge, where the permissions are stored on the file system
*/
if (QT_STAT(m_filename.toLocal8Bit(), &buf) < 0) {
/* defaults, if stat fails */
memset(&buf, 0, sizeof(struct stat));
buf.st_mode = 0777;
} else {
/* If it's a block device, try to query the track layout (for multisession) */
if (m_startsec == -1 && S_ISBLK(buf.st_mode))
trackno = getTracks(m_filename.toLatin1(), (int*) & tracks);
}
uid.setNum(buf.st_uid);
gid.setNum(buf.st_gid);
access = buf.st_mode & ~S_IFMT;
//qDebug() << "KIso::openArchive number of tracks: " << trackno << endl;
if (trackno == 0) trackno = 1;
for (i = 0;i < trackno;++i) {
c_b = 1;c_i = 1;c_j = 1;
root = rootDir();
if (trackno > 1) {
path.clear();
QTextStream(&path) << "Track " << tracks[(i<<1)+1];
root = new KIsoDirectory(this, path, access | S_IFDIR,
buf.st_mtime, buf.st_atime, buf.st_ctime, uid, gid, QString());
rootDir()->addEntry(root);
}
desc = ReadISO9660(&readf, tracks[i<<1], this);
if (!desc) {
//qDebug() << "KIso::openArchive no volume descriptors" << endl;
continue;
}
while (desc) {
switch (isonum_711(desc->data.type)) {
case ISO_VD_BOOT:
bootdesc = (struct el_torito_boot_descriptor*) & (desc->data);
if (!memcmp(EL_TORITO_ID, bootdesc->system_id, ISODCL(8, 39))) {
path = "El Torito Boot";
if (c_b > 1) path += " (" + QString::number(c_b) + ')';
dirent = new KIsoDirectory(this, path, access | S_IFDIR,
buf.st_mtime, buf.st_atime, buf.st_ctime, uid, gid, QString());
root->addEntry(dirent);
addBoot(bootdesc);
c_b++;
}
break;
case ISO_VD_PRIMARY:
case ISO_VD_SUPPLEMENTARY:
idr = (struct iso_directory_record*) & (((struct iso_primary_descriptor*) & desc->data)->root_directory_record);
joliet = JolietLevel(&desc->data);
if (joliet) {
QTextStream(&path) << "Joliet level " << joliet;
if (c_j > 1) path += " (" + QString::number(c_j) + ')';
} else {
path = "ISO9660";
if (c_i > 1) path += " (" + QString::number(c_i) + ')';
}
dirent = new KIsoDirectory(this, path, access | S_IFDIR,
buf.st_mtime, buf.st_atime, buf.st_ctime, uid, gid, QString());
root->addEntry(dirent);
level = 0;
mycallb(idr, this);
if (joliet) c_j++; else c_i++;
break;
}
desc = desc->next;
}
free(desc);
}
device()->close();
return true;
}