1 files changed, 71 insertions, 23 deletions

diff --git a/qmake/tools/qdir.cpp b/qmake/tools/qdir.cpp
index 418ea49..5714878 100644
--- a/qmake/tools/qdir.cpp
+++ b/qmake/tools/qdir.cpp
@@ -1,76 +1,81 @@
 /****************************************************************************
 ** $Id$
 **
 ** Implementation of QDir class
 **
 ** Created : 950427
 **
-** Copyright (C) 1992-2002 Trolltech AS.  All rights reserved.
+** Copyright (C) 1992-2003 Trolltech AS.  All rights reserved.
 **
 ** This file is part of the tools module of the Qt GUI Toolkit.
 **
 ** This file may be distributed under the terms of the Q Public License
 ** as defined by Trolltech AS of Norway and appearing in the file
 ** LICENSE.QPL included in the packaging of this file.
 **
 ** This file may be distributed and/or modified under the terms of the
 ** GNU General Public License version 2 as published by the Free Software
 ** Foundation and appearing in the file LICENSE.GPL included in the
 ** packaging of this file.
 **
 ** Licensees holding valid Qt Enterprise Edition or Qt Professional Edition
 ** licenses may use this file in accordance with the Qt Commercial License
 ** Agreement provided with the Software.
 **
 ** This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
 ** WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
 **
 ** See http://www.trolltech.com/pricing.html or email sales@trolltech.com for
 **   information about Qt Commercial License Agreements.
 ** See http://www.trolltech.com/qpl/ for QPL licensing information.
 ** See http://www.trolltech.com/gpl/ for GPL licensing information.
 **
 ** Contact info@trolltech.com if any conditions of this licensing are
 ** not clear to you.
 **
 **********************************************************************/
 
 #include "qplatformdefs.h"
 #include "qdir.h"
 
 #ifndef QT_NO_DIR
 #include <private/qdir_p.h>
 #include "qfileinfo.h"
 #include "qregexp.h"
 #include "qstringlist.h"
-#include <stdlib.h>
-#include <ctype.h>
+#include <limits.h>
 
+#if defined(Q_FS_FAT) && !defined(Q_OS_UNIX)
+const bool CaseSensitiveFS = FALSE;
+#else
+const bool CaseSensitiveFS = TRUE;
+#endif
 
 
 /*!
     \class QDir
+    \reentrant
     \brief The QDir class provides access to directory structures and their contents in a platform-independent way.
 
     \ingroup io
     \mainclass
 
     A QDir is used to manipulate path names, access information
     regarding paths and files, and manipulate the underlying file
     system.
 
     A QDir can point to a file using either a relative or an absolute
     path. Absolute paths begin with the directory separator "/"
     (optionally preceded by a drive specification under Windows). If
     you always use "/" as a directory separator, Qt will translate
     your paths to conform to the underlying operating system. Relative
     file names begin with a directory name or a file name and specify
     a path relative to the current directory.
 
     The "current" path refers to the application's working directory.
     A QDir's own path is set and retrieved with setPath() and path().
 
     An example of an absolute path is the string "/tmp/quartz", a
     relative path might look like "src/fatlib". You can use the
     function isRelative() to check if a QDir is using a relative or an
     absolute file path. Call convertToAbs() to convert a relative QDir
@@ -209,48 +214,56 @@ QDir::QDir( const QString &path, const QString &nameFilter,
     if ( nameFilt.isEmpty() )
         nameFilt = QString::fromLatin1("*");
     filtS = (FilterSpec)filterSpec;
     sortS = (SortSpec)sortSpec;
 }
 
 /*!
     Constructs a QDir that is a copy of the directory \a d.
 
     \sa operator=()
 */
 
 QDir::QDir( const QDir &d )
 {
     dPath = d.dPath;
     fList = 0;
     fiList = 0;
     nameFilt = d.nameFilt;
     dirty = TRUE;
     allDirs = d.allDirs;
     filtS = d.filtS;
     sortS = d.sortS;
 }
 
+/*!
+    Refreshes the directory information.
+*/
+void QDir::refresh() const
+{
+    QDir* that = (QDir*) this;
+    that->dirty = TRUE;
+}
 
 void QDir::init()
 {
     fList = 0;
     fiList = 0;
     nameFilt = QString::fromLatin1("*");
     dirty = TRUE;
     allDirs = FALSE;
     filtS = All;
     sortS = SortSpec(Name | IgnoreCase);
 }
 
 /*!
     Destroys the QDir frees up its resources.
 */
 
 QDir::~QDir()
 {
     delete fList;
     delete fiList;
 }
 
 
 /*!
@@ -361,52 +374,78 @@ QString QDir::filePath( const QString &fileName,
     return tmp;
 }
 
 /*!
     Returns the absolute path name of a file in the directory. Does \e
     not check if the file actually exists in the directory. Redundant
     multiple separators or "." and ".." directories in \a fileName
     will not be removed (see cleanDirPath()).
 
     If \a acceptAbsPath is TRUE a \a fileName starting with a
     separator "/" will be returned without change. If \a acceptAbsPath
     is FALSE an absolute path will be prepended to the fileName and
     the resultant string returned.
 
     \sa filePath()
 */
 
 QString QDir::absFilePath( const QString &fileName,
                            bool acceptAbsPath ) const
 {
     if ( acceptAbsPath && !isRelativePath( fileName ) )
         return fileName;
 
     QString tmp = absPath();
-    if ( tmp.isEmpty() || (tmp[(int)tmp.length()-1] != '/' && !!fileName &&
-                           fileName[0] != '/') )
-        tmp += '/';
-    tmp += fileName;
+#ifdef Q_OS_WIN32
+    if ( fileName[0].isLetter() && fileName[1] == ':' ) {
+        int drv = fileName.upper()[0].latin1() - 'A' + 1;
+        if ( _getdrive() != drv ) {
+            if ( qt_winunicode ) {
+                TCHAR buf[PATH_MAX];
+                ::_tgetdcwd( drv, buf, PATH_MAX );
+                tmp.setUnicodeCodes( (ushort*)buf, ::_tcslen(buf) );
+            } else {
+                char buf[PATH_MAX];
+                ::_getdcwd( drv, buf, PATH_MAX );
+                tmp = buf;
+            }
+            if ( !tmp.endsWith("\\") )
+                tmp += "\\";
+            tmp += fileName.right( fileName.length() - 2 );
+            int x;
+            for ( x = 0; x < (int) tmp.length(); x++ ) {
+                if ( tmp[x] == '\\' )
+                    tmp[x] = '/';
+            }
+        }
+    } else
+#endif
+    {
+        if ( tmp.isEmpty() || (tmp[(int)tmp.length()-1] != '/' && !!fileName &&
+                               fileName[0] != '/') )
+            tmp += '/';
+        tmp += fileName;
+    }
     return tmp;
 }
 
 
 /*!
     Returns \a pathName with the '/' separators converted to
     separators that are appropriate for the underlying operating
     system.
 
     On Windows, convertSeparators("c:/winnt/system32") returns
     "c:\winnt\system32".
 
     The returned string may be the same as the argument on some
     operating systems, for example on Unix.
 */
 
 QString QDir::convertSeparators( const QString &pathName )
 {
     QString n( pathName );
 #if defined(Q_FS_FAT) || defined(Q_OS_OS2EMX)
     for ( int i=0; i<(int)n.length(); i++ ) {
         if ( n[i] == '/' )
             n[i] = '\\';
     }
@@ -913,64 +952,66 @@ QDir &QDir::operator=( const QDir &d )
 
     Sets the directory path to be the given \a path.
 */
 
 QDir &QDir::operator=( const QString &path )
 {
     dPath = cleanDirPath( path );
     dirty = TRUE;
     return *this;
 }
 
 
 /*!
     \fn bool QDir::operator!=( const QDir &d ) const
 
     Returns TRUE if directory \a d and this directory have different
     paths or different sort or filter settings; otherwise returns
     FALSE.
 
     Example:
     \code
     // The current directory is "/usr/local"
     QDir d1( "/usr/local/bin" );
     QDir d2( "bin" );
-    if ( d1 != d2 ) qDebug( "They differ\n" ); // This is printed
+    if ( d1 != d2 )
+        qDebug( "They differ" );
     \endcode
 */
 
 /*!
     Returns TRUE if directory \a d and this directory have the same
     path and their sort and filter settings are the same; otherwise
     returns FALSE.
 
     Example:
     \code
     // The current directory is "/usr/local"
     QDir d1( "/usr/local/bin" );
     QDir d2( "bin" );
     d2.convertToAbs();
-    if ( d1 == d2 ) qDebug( "They're the same\n" ); // This is printed
+    if ( d1 == d2 )
+        qDebug( "They're the same" );
     \endcode
 */
 
 bool QDir::operator==( const QDir &d ) const
 {
     return dPath    == d.dPath &&
            nameFilt == d.nameFilt &&
            allDirs  == d.allDirs &&
            filtS    == d.filtS &&
            sortS    == d.sortS;
 }
 
 
 /*!
     Removes the file, \a fileName.
 
     If \a acceptAbsPath is TRUE a path starting with separator "/"
     will remove the file with the absolute path. If \a acceptAbsPath
     is FALSE any number of separators at the beginning of \a fileName
     will be removed and the resultant file name will be removed.
 
     Returns TRUE if the file is removed successfully; otherwise
     returns FALSE.
 */
@@ -1066,110 +1107,117 @@ QDir QDir::current()
 QDir QDir::home()
 {
     return QDir( homeDirPath() );
 }
 
 /*!
     Returns the root directory.
 
     \sa rootDirPath() drives()
 */
 
 QDir QDir::root()
 {
     return QDir( rootDirPath() );
 }
 
 /*!
     \fn QString QDir::homeDirPath()
 
     Returns the absolute path of the user's home directory.
 
     \sa home()
 */
 
-QStringList qt_makeFilterList( const QString &filter )
+QValueList<QRegExp> qt_makeFilterList( const QString &filter )
 {
+    QValueList<QRegExp> regExps;
     if ( filter.isEmpty() )
-        return QStringList();
+        return regExps;
 
     QChar sep( ';' );
     int i = filter.find( sep, 0 );
     if ( i == -1 && filter.find( ' ', 0 ) != -1 )
         sep = QChar( ' ' );
 
     QStringList list = QStringList::split( sep, filter );
     QStringList::Iterator it = list.begin();
-    QStringList list2;
+    while ( it != list.end() ) {
+        regExps << QRegExp( (*it).stripWhiteSpace(), CaseSensitiveFS, TRUE );
+        ++it;
+    }
+    return regExps;
+}
 
-    for ( ; it != list.end(); ++it ) {
-        QString s = *it;
-        list2 << s.stripWhiteSpace();
+bool qt_matchFilterList( const QValueList<QRegExp>& filters,
+                         const QString &fileName )
+{
+    QValueList<QRegExp>::ConstIterator rit = filters.begin();
+    while ( rit != filters.end() ) {
+        if ( (*rit).exactMatch(fileName) )
+            return TRUE;
+        ++rit;
     }
-    return list2;
+    return FALSE;
 }
 
+
 /*!
     \overload
 
     Returns TRUE if the \a fileName matches any of the wildcard (glob)
     patterns in the list of \a filters; otherwise returns FALSE.
 
     (See \link qregexp.html#wildcard-matching QRegExp wildcard
     matching.\endlink)
     \sa QRegExp::match()
 */
 
 bool QDir::match( const QStringList &filters, const QString &fileName )
 {
     QStringList::ConstIterator sit = filters.begin();
     while ( sit != filters.end() ) {
-#if defined(Q_FS_FAT) && !defined(Q_OS_UNIX)
-        QRegExp rx( *sit, FALSE, TRUE ); // The FAT FS is not case sensitive..
-#else
-        QRegExp rx( *sit, TRUE, TRUE );  // ..while others are.
-#endif
+        QRegExp rx( *sit, CaseSensitiveFS, TRUE );
         if ( rx.exactMatch(fileName) )
             return TRUE;
         ++sit;
     }
     return FALSE;
 }
 
 /*!
     Returns TRUE if the \a fileName matches the wildcard (glob)
     pattern \a filter; otherwise returns FALSE. The \a filter may
     contain multiple patterns separated by spaces or semicolons.
 
     (See \link qregexp.html#wildcard-matching QRegExp wildcard
     matching.\endlink)
     \sa QRegExp::match()
 */
 
 bool QDir::match( const QString &filter, const QString &fileName )
 {
-    QStringList lst = qt_makeFilterList( filter );
-    return match( lst, fileName );
+    return qt_matchFilterList( qt_makeFilterList(filter), fileName );
 }
 
 
 /*!
     Removes all multiple directory separators "/" and resolves any
     "."s or ".."s found in the path, \a filePath.
 
     Symbolic links are kept. This function does not return the
     canonical path, but rather the simplest version of the input.
     For example, "./local" becomes "local", "local/../bin" becomes
     "bin" and "/local/usr/../bin" becomes "/local/bin".
 
     \sa absPath() canonicalPath()
 */
 
 QString QDir::cleanDirPath( const QString &filePath )
 {
     QString name = filePath;
     QString newPath;
 
     if ( name.isEmpty() )
         return name;
 
     slashify( name );