Intravision/reactos
1
0
Fork 0
mirror of https://github.com/reactos/reactos.git synced 2025-07-23 10:53:42 +00:00
Code Issues Projects Releases Packages Wiki Activity

Git conversion: Make reactos the root directory, move rosapps, rostests, wallpapers into modules, and delete rossubsys.

Browse source
This commit is contained in:
Colin Finck 2017-10-03 07:45:34 +00:00
parent b94e2d8ca0
commit c2c66aff7d
24198 changed files with 0 additions and 37285 deletions
Download patch file Download diff file Expand all files Collapse all files

92
modules/rosapps/applications/sysutils/utils/sdkparse/EnumFilesImpl.h Normal file
View file

@ -0,0 +1,92 @@
//
// EnumFilesImpl.h
//
#include "EnumFiles.h"
#include "FixLFN.h"
#include "safestr.h"
#ifndef UNDER_CE
#include <direct.h>
#endif//UNDER_CE
#include <stdio.h>
BOOL EnumFilesInDirectory ( const TCHAR* szDirectory_, const TCHAR* szFileSpec, MYENUMFILESPROC pProc, long lParam, BOOL bSubsToo, BOOL bSubsMustMatchFileSpec )
{
TCHAR szDirectory[MAX_PATH+1];
TCHAR szSearchPath[MAX_PATH+1];
TCHAR szTemp[MAX_PATH+1];
if ( safestrlen(szDirectory_) > MAX_PATH || !szFileSpec || !pProc )
return FALSE;
if ( szDirectory_ )
_tcscpy ( szDirectory, szDirectory_ );
else
#ifdef UNDER_CE
_tcscpy ( szDirectory, _T("") );
#else//UNDER_CE
getcwd ( szDirectory, sizeof(szDirectory)-1 );
#endif//UNDER_CE
int dirlen = _tcslen(szDirectory);
if ( dirlen > 0 && szDirectory[dirlen-1] != '\\' )
_tcscat ( szDirectory, _T("\\") );
// first search for all files in directory that match szFileSpec...
_sntprintf ( szSearchPath, sizeof(szSearchPath)-1, _T("%s%s"), szDirectory, szFileSpec );
WIN32_FIND_DATA wfd;
HANDLE hfind = FindFirstFile ( szSearchPath, &wfd );
if ( hfind != INVALID_HANDLE_VALUE )
{
do
{
if ( !_tcscmp ( wfd.cFileName, _T(".") ) || !_tcscmp ( wfd.cFileName, _T("..") ) )
continue;
if ( wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY )
{
if ( !bSubsMustMatchFileSpec )
continue;
_sntprintf ( szTemp, sizeof(szTemp)-1, _T("%s%s"), szDirectory, wfd.cFileName );
if ( bSubsToo )
{
if ( !EnumFilesInDirectory ( szTemp, szFileSpec, pProc, lParam, bSubsToo, bSubsMustMatchFileSpec ) )
{
FindClose ( hfind );
return FALSE;
}
}
}
_sntprintf ( szTemp, sizeof(szTemp)-1, _T("%s%s"), szDirectory, wfd.cFileName );
FixLFN(szTemp,szTemp);
if ( !pProc ( &wfd, szTemp, lParam ) )
{
FindClose ( hfind );
return FALSE;
}
} while ( FindNextFile ( hfind, &wfd ) );
FindClose ( hfind );
}
if ( !bSubsToo || bSubsMustMatchFileSpec )
return TRUE;
// now search for all subdirectories...
_sntprintf ( szSearchPath, sizeof(szSearchPath)-1, _T("%s*.*"), szDirectory );
hfind = FindFirstFile ( szSearchPath, &wfd );
if ( hfind != INVALID_HANDLE_VALUE )
{
do
{
if ( !_tcscmp ( wfd.cFileName, _T(".") ) || !_tcscmp ( wfd.cFileName, _T("..") ) )
continue;
if ( !(wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) )
continue;
_sntprintf ( szTemp, sizeof(szTemp)-1, _T("%s%s"), szDirectory, wfd.cFileName );
if ( FALSE == EnumFilesInDirectory ( szTemp, szFileSpec, pProc, lParam, bSubsToo, bSubsMustMatchFileSpec ) )
{
FindClose ( hfind );
return FALSE;
}
} while ( FindNextFile ( hfind, &wfd ) );
FindClose ( hfind );
}
return TRUE;
}