From 7b0eb64ef2e6f9d49a81653bd1e098221e23d3a0 Mon Sep 17 00:00:00 2001
From: DarioS <dario.sassi@egaltech.com>
Date: Tue, 13 Sep 2022 08:11:19 +0200
Subject: [PATCH] EgtGeneral 2.4h1 : - aggiunta funzione FindAllDirectories.

---
 EgtGeneral.rc | Bin 11630 -> 11630 bytes
 FileUtils.cpp |  25 +++++++++++++++++++++++++
 2 files changed, 25 insertions(+)

diff --git a/EgtGeneral.rc b/EgtGeneral.rc
index 3252eaa10c18fe7b6cdef056036cdb3f5df9d2de..817cf2720bf561fb39cf02711d31ed5a468880f2 100644
GIT binary patch
delta 102
zcmaDC^)70|H#SDg&8x-EGfjRctTQ=4kYn;MP8r6`&Hn{688<g@J28W$t(n0>t67kF
T*^HZmq#Ym%u<Msm4&nj;+#w{!

delta 102
zcmaDC^)70|H#SDo&8x-EGfjRctTQ=4kYn;MP8r73&Hn{688<g@J28W$t(n0>t67kF
T*^HZmq#Ym%u<Msm4&nj;)sZBo

diff --git a/FileUtils.cpp b/FileUtils.cpp
index 7cb6550..f298a96 100644
--- a/FileUtils.cpp
+++ b/FileUtils.cpp
@@ -296,3 +296,28 @@ EraseDirectory( const string& sDir)
    wstring sDirW = stringtoW( sDir) ;
    return( ::RemoveDirectoryW( sDirW.c_str()) != FALSE) ;
 }
+
+//-----------------------------------------------------------------------------
+bool
+FindAllDirectories( const string& sDirSpec, STRVECTOR& vsDirNames)
+{
+   wstring sDirSpecW = stringtoW( sDirSpec) ;
+   
+  // cerco i file che soddisfano le specifiche
+   intptr_t     hFile ;
+   _wfinddata_t c_file ;
+   if ( ( hFile = _wfindfirst( sDirSpecW.c_str(), &c_file)) != -1L) {
+      do {
+         if ( c_file.attrib == _A_SUBDIR) {
+            string sDir = LPSTR( WtoA( c_file.name)) ;
+            if ( ! EqualNoCase( sDir, ".")  &&  ! EqualNoCase( sDir, ".."))
+               vsDirNames.emplace_back( sDir) ; 
+         }
+      } while( _wfindnext( hFile, &c_file) == 0) ;
+      _findclose( hFile) ;
+      errno = 0 ;
+      return true ;
+   }
+
+   return false ;
+}