// Created: 08.12.99
// RCS-ID: $Id$
// Copyright: (c) 1999 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
-// Licence: wxWindows license
+// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
// ============================================================================
// headers
// ----------------------------------------------------------------------------
-#ifdef __GNUG__
+#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
#pragma implementation "dir.h"
#endif
#include "wx/filefn.h" // for wxMatchWild
#include <sys/types.h>
+#include <sys/stat.h>
+#include <unistd.h>
#include <dirent.h>
wxString path = m_dirname;
path += _T('/');
path.reserve(path.length() + 255);
+
+ wxString de_d_name;
while ( !matches )
{
de = readdir(m_dir);
if ( !de )
return FALSE;
+
+#if wxUSE_UNICODE
+ de_d_name = wxConvLibc.cMB2WC( de->d_name );
+#else
+ de_d_name = de->d_name;
+#endif
// don't return "." and ".." unless asked for
if ( de->d_name[0] == '.' &&
}
// check the type now
- if ( !(m_flags & wxDIR_FILES) && !wxDir::Exists(path + de->d_name) )
+ if ( !(m_flags & wxDIR_FILES) && !wxDir::Exists(path + de_d_name) )
{
// it's a file, but we don't want them
continue;
}
- else if ( !(m_flags & wxDIR_DIRS) && wxDir::Exists(path + de->d_name) )
+ else if ( !(m_flags & wxDIR_DIRS) && wxDir::Exists(path + de_d_name) )
{
// it's a dir, and we don't want it
continue;
else
{
// test against the pattern
- matches = wxMatchWild(m_filespec, de->d_name,
+ matches = wxMatchWild(m_filespec, de_d_name,
!(m_flags & wxDIR_HIDDEN));
}
}
- *filename = de->d_name;
+ *filename = de_d_name;
return TRUE;
}
return M_DIR->Read(filename);
}
+
+bool wxDir::HasSubDirs(const wxString& spec)
+{
+ wxCHECK_MSG( IsOpened(), FALSE, _T("must wxDir::Open() first") );
+
+ if ( spec.empty() )
+ {
+ // faster check for presence of any subdirectory: normally each subdir
+ // has a hard link to the parent directory and so, knowing that there
+ // are at least "." and "..", we have a subdirectory if and only if
+ // links number is > 2 - this is just a guess but it works fairly well
+ // in practice
+ //
+ // note that we may guess wrongly in one direction only: i.e. we may
+ // return true when there are no subdirectories but this is ok as the
+ // caller will learn it soon enough when it calls GetFirst(wxDIR)
+ // anyhow
+ wxStructStat stBuf;
+ if ( wxStat(M_DIR->GetName().c_str(), &stBuf) == 0 )
+ {
+ switch ( stBuf.st_nlink )
+ {
+ case 2:
+ // just "." and ".."
+ return FALSE;
+
+ case 0:
+ case 1:
+ // weird filesystem, don't try to guess for it, use dumb
+ // method below
+ break;
+
+ default:
+ // assume we have subdirs - may turn out to be wrong if we
+ // have other hard links to this directory but it's not
+ // that bad as explained above
+ return TRUE;
+ }
+ }
+ }
+
+ // just try to find first directory
+ wxString s;
+ return GetFirst(&s, spec, wxDIR_DIRS | wxDIR_HIDDEN);
+}
+