Blame qtools/qdir_unix.cpp

Packit Service 50c9f2
/****************************************************************************
Packit Service 50c9f2
** 
Packit Service 50c9f2
**
Packit Service 50c9f2
** Implementation of QDirclass
Packit Service 50c9f2
**
Packit Service 50c9f2
** Created : 950628
Packit Service 50c9f2
**
Packit Service 50c9f2
** Copyright (C) 1992-2000 Trolltech AS.  All rights reserved.
Packit Service 50c9f2
**
Packit Service 50c9f2
** This file is part of the tools module of the Qt GUI Toolkit.
Packit Service 50c9f2
**
Packit Service 50c9f2
** This file may be distributed under the terms of the Q Public License
Packit Service 50c9f2
** as defined by Trolltech AS of Norway and appearing in the file
Packit Service 50c9f2
** LICENSE.QPL included in the packaging of this file.
Packit Service 50c9f2
**
Packit Service 50c9f2
** This file may be distributed and/or modified under the terms of the
Packit Service 50c9f2
** GNU General Public License version 2 as published by the Free Software
Packit Service 50c9f2
** Foundation and appearing in the file LICENSE.GPL included in the
Packit Service 50c9f2
** packaging of this file.
Packit Service 50c9f2
**
Packit Service 50c9f2
** Licensees holding valid Qt Enterprise Edition or Qt Professional Edition
Packit Service 50c9f2
** licenses for Unix/X11 or for Qt/Embedded may use this file in accordance
Packit Service 50c9f2
** with the Qt Commercial License Agreement provided with the Software.
Packit Service 50c9f2
**
Packit Service 50c9f2
** This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
Packit Service 50c9f2
** WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
Packit Service 50c9f2
**
Packit Service 50c9f2
** See http://www.trolltech.com/pricing.html or email sales@trolltech.com for
Packit Service 50c9f2
**   information about Qt Commercial License Agreements.
Packit Service 50c9f2
** See http://www.trolltech.com/qpl/ for QPL licensing information.
Packit Service 50c9f2
** See http://www.trolltech.com/gpl/ for GPL licensing information.
Packit Service 50c9f2
**
Packit Service 50c9f2
** Contact info@trolltech.com if any conditions of this licensing are
Packit Service 50c9f2
** not clear to you.
Packit Service 50c9f2
**
Packit Service 50c9f2
**********************************************************************/
Packit Service 50c9f2
Packit Service 50c9f2
#include "qglobal.h"
Packit Service 50c9f2
Packit Service 50c9f2
#include "qdir.h"
Packit Service 50c9f2
#ifndef QT_NO_DIR
Packit Service 50c9f2
Packit Service 50c9f2
#include "qfileinfo.h"
Packit Service 50c9f2
#include "qfiledefs_p.h"
Packit Service 50c9f2
#include "qregexp.h"
Packit Service 50c9f2
#include "qstringlist.h"
Packit Service 50c9f2
#include <stdlib.h>
Packit Service 50c9f2
#include <ctype.h>
Packit Service 50c9f2
Packit Service 50c9f2
extern QStringList qt_makeFilterList( const QString &filter );
Packit Service 50c9f2
Packit Service 50c9f2
extern int qt_cmp_si_sortSpec;
Packit Service 50c9f2
Packit Service 50c9f2
#if defined(Q_C_CALLBACKS)
Packit Service 50c9f2
extern "C" {
Packit Service 50c9f2
#endif
Packit Service 50c9f2
Packit Service 50c9f2
extern int qt_cmp_si( const void *, const void * );
Packit Service 50c9f2
Packit Service 50c9f2
#if defined(Q_C_CALLBACKS)
Packit Service 50c9f2
}
Packit Service 50c9f2
#endif
Packit Service 50c9f2
Packit Service 50c9f2
Packit Service 50c9f2
void QDir::slashify( QString& )
Packit Service 50c9f2
{
Packit Service 50c9f2
}
Packit Service 50c9f2
Packit Service 50c9f2
QString QDir::homeDirPath()
Packit Service 50c9f2
{
Packit Service 50c9f2
    QString d;
Packit Service 50c9f2
    d = QFile::decodeName(getenv("HOME"));
Packit Service 50c9f2
    slashify( d );
Packit Service 50c9f2
    if ( d.isNull() )
Packit Service 50c9f2
	d = rootDirPath();
Packit Service 50c9f2
    return d;
Packit Service 50c9f2
}
Packit Service 50c9f2
Packit Service 50c9f2
QString QDir::canonicalPath() const
Packit Service 50c9f2
{
Packit Service 50c9f2
    QString r;
Packit Service 50c9f2
Packit Service 50c9f2
    char cur[PATH_MAX];
Packit Service 50c9f2
    char tmp[PATH_MAX];
Packit Service 50c9f2
    if (GETCWD( cur, PATH_MAX )) {
Packit Service 50c9f2
      if ( CHDIR(QFile::encodeName(dPath)) >= 0 ) {
Packit Service 50c9f2
  	if (GETCWD( tmp, PATH_MAX )) {
Packit Service 50c9f2
  	  r = QFile::decodeName(tmp);
Packit Service 50c9f2
        }
Packit Service 50c9f2
        (void)CHDIR( cur );
Packit Service 50c9f2
      }
Packit Service 50c9f2
    }
Packit Service 50c9f2
Packit Service 50c9f2
    slashify( r );
Packit Service 50c9f2
    return r;
Packit Service 50c9f2
}
Packit Service 50c9f2
Packit Service 50c9f2
bool QDir::mkdir( const QString &dirName, bool acceptAbsPath ) const
Packit Service 50c9f2
{
Packit Service 50c9f2
    return MKDIR( QFile::encodeName(filePath(dirName,acceptAbsPath)), 0777 ) 
Packit Service 50c9f2
	== 0;
Packit Service 50c9f2
}
Packit Service 50c9f2
Packit Service 50c9f2
bool QDir::rmdir( const QString &dirName, bool acceptAbsPath ) const
Packit Service 50c9f2
{
Packit Service 50c9f2
    return RMDIR( QFile::encodeName(filePath(dirName,acceptAbsPath)) ) == 0;
Packit Service 50c9f2
}
Packit Service 50c9f2
Packit Service 50c9f2
bool QDir::isReadable() const
Packit Service 50c9f2
{
Packit Service 50c9f2
    return ACCESS( QFile::encodeName(dPath), R_OK | X_OK ) == 0;
Packit Service 50c9f2
}
Packit Service 50c9f2
Packit Service 50c9f2
bool QDir::isRoot() const
Packit Service 50c9f2
{
Packit Service 50c9f2
    return dPath == QString::fromLatin1("/");
Packit Service 50c9f2
}
Packit Service 50c9f2
Packit Service 50c9f2
bool QDir::rename( const QString &name, const QString &newName,
Packit Service 50c9f2
		   bool acceptAbsPaths	)
Packit Service 50c9f2
{
Packit Service 50c9f2
    if ( name.isEmpty() || newName.isEmpty() ) {
Packit Service 50c9f2
#if defined(CHECK_NULL)
Packit Service 50c9f2
	qWarning( "QDir::rename: Empty or null file name(s)" );
Packit Service 50c9f2
#endif
Packit Service 50c9f2
	return FALSE;
Packit Service 50c9f2
    }
Packit Service 50c9f2
    QString fn1 = filePath( name, acceptAbsPaths );
Packit Service 50c9f2
    QString fn2 = filePath( newName, acceptAbsPaths );
Packit Service 50c9f2
    return ::rename( QFile::encodeName(fn1),
Packit Service 50c9f2
		     QFile::encodeName(fn2) ) == 0;
Packit Service 50c9f2
}
Packit Service 50c9f2
Packit Service 50c9f2
bool QDir::setCurrent( const QString &path )
Packit Service 50c9f2
{
Packit Service 50c9f2
    int r;
Packit Service 50c9f2
    r = CHDIR( QFile::encodeName(path) );
Packit Service 50c9f2
    return r >= 0;
Packit Service 50c9f2
}
Packit Service 50c9f2
Packit Service 50c9f2
QString QDir::currentDirPath()
Packit Service 50c9f2
{
Packit Service 50c9f2
    QString result;
Packit Service 50c9f2
Packit Service 50c9f2
    STATBUF st;
Packit Service 50c9f2
    if ( STAT( ".", &st ) == 0 ) {
Packit Service 50c9f2
	char currentName[PATH_MAX];
Packit Service 50c9f2
	if ( GETCWD( currentName, PATH_MAX ) != 0 )
Packit Service 50c9f2
	    result = QFile::decodeName(currentName);
Packit Service 50c9f2
#if defined(DEBUG)
Packit Service 50c9f2
	if ( result.isNull() )
Packit Service 50c9f2
	    qWarning( "QDir::currentDirPath: getcwd() failed" );
Packit Service 50c9f2
#endif
Packit Service 50c9f2
    } else {
Packit Service 50c9f2
#if defined(DEBUG)
Packit Service 50c9f2
	qWarning( "QDir::currentDirPath: stat(\".\") failed" );
Packit Service 50c9f2
#endif
Packit Service 50c9f2
    }
Packit Service 50c9f2
    slashify( result );
Packit Service 50c9f2
    return result;
Packit Service 50c9f2
}
Packit Service 50c9f2
Packit Service 50c9f2
QString QDir::rootDirPath()
Packit Service 50c9f2
{
Packit Service 50c9f2
    QString d = QString::fromLatin1( "/" );
Packit Service 50c9f2
    return d;
Packit Service 50c9f2
}
Packit Service 50c9f2
Packit Service 50c9f2
bool QDir::isRelativePath( const QString &path )
Packit Service 50c9f2
{
Packit Service 50c9f2
    int len = path.length();
Packit Service 50c9f2
    if ( len == 0 )
Packit Service 50c9f2
	return TRUE;
Packit Service 50c9f2
    return path[0] != '/';
Packit Service 50c9f2
}
Packit Service 50c9f2
Packit Service 50c9f2
bool QDir::readDirEntries( const QString &nameFilter,
Packit Service 50c9f2
			   int filterSpec, int sortSpec )
Packit Service 50c9f2
{
Packit Service 50c9f2
    int i;
Packit Service 50c9f2
    if ( !fList ) {
Packit Service 50c9f2
	fList  = new QStringList;
Packit Service 50c9f2
	CHECK_PTR( fList );
Packit Service 50c9f2
	fiList = new QFileInfoList;
Packit Service 50c9f2
	CHECK_PTR( fiList );
Packit Service 50c9f2
	fiList->setAutoDelete( TRUE );
Packit Service 50c9f2
    } else {
Packit Service 50c9f2
	fList->clear();
Packit Service 50c9f2
	fiList->clear();
Packit Service 50c9f2
    }
Packit Service 50c9f2
Packit Service 50c9f2
    QStringList filters = qt_makeFilterList( nameFilter );
Packit Service 50c9f2
Packit Service 50c9f2
    bool doDirs	    = (filterSpec & Dirs)	!= 0;
Packit Service 50c9f2
    bool doFiles    = (filterSpec & Files)	!= 0;
Packit Service 50c9f2
    bool noSymLinks = (filterSpec & NoSymLinks) != 0;
Packit Service 50c9f2
    bool doReadable = (filterSpec & Readable)	!= 0;
Packit Service 50c9f2
    bool doWritable = (filterSpec & Writable)	!= 0;
Packit Service 50c9f2
    bool doExecable = (filterSpec & Executable) != 0;
Packit Service 50c9f2
    bool doHidden   = (filterSpec & Hidden)	!= 0;
Packit Service 50c9f2
Packit Service 50c9f2
#if defined(_OS_OS2EMX_)
Packit Service 50c9f2
    //QRegExp   wc( nameFilter, FALSE, TRUE );	// wild card, case insensitive
Packit Service 50c9f2
#else
Packit Service 50c9f2
    //QRegExp   wc( nameFilter, TRUE, TRUE );	// wild card, case sensitive
Packit Service 50c9f2
#endif
Packit Service 50c9f2
    QFileInfo fi;
Packit Service 50c9f2
    DIR	     *dir;
Packit Service 50c9f2
    dirent   *file;
Packit Service 50c9f2
Packit Service 50c9f2
    dir = opendir( QFile::encodeName(dPath) );
Packit Service 50c9f2
    if ( !dir ) {
Packit Service 50c9f2
#if defined(CHECK_NULL)
Packit Service 50c9f2
	qWarning( "QDir::readDirEntries: Cannot read the directory: %s",
Packit Service 50c9f2
		  QFile::encodeName(dPath).data() );
Packit Service 50c9f2
#endif
Packit Service 50c9f2
	return FALSE;
Packit Service 50c9f2
    }
Packit Service 50c9f2
Packit Service 50c9f2
    while ( (file = readdir(dir)) ) {
Packit Service 50c9f2
	QString fn = QFile::decodeName(file->d_name);
Packit Service 50c9f2
	fi.setFile( *this, fn );
Packit Service 50c9f2
	if ( !match( filters, fn ) && !(allDirs && fi.isDir()) )
Packit Service 50c9f2
	     continue;
Packit Service 50c9f2
	if  ( (doDirs && fi.isDir()) || (doFiles && fi.isFile()) ) {
Packit Service 50c9f2
	    if ( noSymLinks && fi.isSymLink() )
Packit Service 50c9f2
	        continue;
Packit Service 50c9f2
	    if ( (filterSpec & RWEMask) != 0 )
Packit Service 50c9f2
	        if ( (doReadable && !fi.isReadable()) ||
Packit Service 50c9f2
	             (doWritable && !fi.isWritable()) ||
Packit Service 50c9f2
	             (doExecable && !fi.isExecutable()) )
Packit Service 50c9f2
	            continue;
Packit Service 50c9f2
	    if ( !doHidden && fn[0] == '.' &&
Packit Service 50c9f2
	         fn != QString::fromLatin1(".")
Packit Service 50c9f2
	         && fn != QString::fromLatin1("..") )
Packit Service 50c9f2
	        continue;
Packit Service 50c9f2
	    fiList->append( new QFileInfo( fi ) );
Packit Service 50c9f2
	}
Packit Service 50c9f2
    }
Packit Service 50c9f2
    if ( closedir(dir) != 0 ) {
Packit Service 50c9f2
#if defined(CHECK_NULL)
Packit Service 50c9f2
	qWarning( "QDir::readDirEntries: Cannot close the directory: %s",
Packit Service 50c9f2
		  dPath.local8Bit().data() );
Packit Service 50c9f2
#endif
Packit Service 50c9f2
    }
Packit Service 50c9f2
Packit Service 50c9f2
    // Sort...
Packit Service 50c9f2
    if(fiList->count()) {
Packit Service 50c9f2
	QDirSortItem* si= new QDirSortItem[fiList->count()];
Packit Service 50c9f2
	QFileInfo* itm;
Packit Service 50c9f2
	i=0;
Packit Service 50c9f2
	for (itm = fiList->first(); itm; itm = fiList->next())
Packit Service 50c9f2
	    si[i++].item = itm;
Packit Service 50c9f2
	qt_cmp_si_sortSpec = sortSpec;
Packit Service 50c9f2
	qsort( si, i, sizeof(si[0]), qt_cmp_si );
Packit Service 50c9f2
	// put them back in the list
Packit Service 50c9f2
	fiList->setAutoDelete( FALSE );
Packit Service 50c9f2
	fiList->clear();
Packit Service 50c9f2
	int j;
Packit Service 50c9f2
	for ( j=0; j
Packit Service 50c9f2
	    fiList->append( si[j].item );
Packit Service 50c9f2
	    fList->append( si[j].item->fileName() );
Packit Service 50c9f2
	}
Packit Service 50c9f2
	delete [] si;
Packit Service 50c9f2
	fiList->setAutoDelete( TRUE );
Packit Service 50c9f2
    }
Packit Service 50c9f2
Packit Service 50c9f2
    if ( filterSpec == (FilterSpec)filtS && sortSpec == (SortSpec)sortS &&
Packit Service 50c9f2
	 nameFilter == nameFilt )
Packit Service 50c9f2
	dirty = FALSE;
Packit Service 50c9f2
    else
Packit Service 50c9f2
	dirty = TRUE;
Packit Service 50c9f2
    return TRUE;
Packit Service 50c9f2
}
Packit Service 50c9f2
Packit Service 50c9f2
const QFileInfoList * QDir::drives()
Packit Service 50c9f2
{
Packit Service 50c9f2
    // at most one instance of QFileInfoList is leaked, and this variable
Packit Service 50c9f2
    // points to that list
Packit Service 50c9f2
    static QFileInfoList * knownMemoryLeak = 0;
Packit Service 50c9f2
Packit Service 50c9f2
    if ( !knownMemoryLeak ) {
Packit Service 50c9f2
	knownMemoryLeak = new QFileInfoList;
Packit Service 50c9f2
	// non-win32 versions both use just one root directory
Packit Service 50c9f2
	knownMemoryLeak->append( new QFileInfo( rootDirPath() ) );
Packit Service 50c9f2
    }
Packit Service 50c9f2
Packit Service 50c9f2
    return knownMemoryLeak;
Packit Service 50c9f2
}
Packit Service 50c9f2
#endif //QT_NO_DIR