1 // Copyright (c) 1998-1999 Matra Datavision
2 // Copyright (c) 1999-2014 OPEN CASCADE SAS
4 // This file is part of Open CASCADE Technology software library.
6 // This library is free software; you can redistribute it and/or modify it under
7 // the terms of the GNU Lesser General Public License version 2.1 as published
8 // by the Free Software Foundation, with special exception defined in the file
9 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
10 // distribution for complete text of the license and disclaimer of any warranty.
12 // Alternatively, this file may be used under the terms of Open CASCADE
13 // commercial license or contractual agreement.
18 #include <OSD_File.hxx>
19 #include <OSD_FileIterator.hxx>
20 #include <OSD_OSDError.hxx>
21 #include <OSD_Path.hxx>
22 #include <OSD_WhoAmI.hxx>
23 #include <TCollection_AsciiString.hxx>
28 #include <sys/types.h>
29 # define NAMLEN(dirent) strlen((dirent)->d_name)
31 extern char *vmsify PARAMS ((char *name, int type));
34 /* In GNU systems, <dirent.h> defines this macro for us. */
37 # define NAMLEN(d) _D_NAMLEN(d)
40 #if (defined (POSIX) || defined (VMS) || defined (WINDOWS32)) && !defined (__GNU_LIBRARY__)
41 /* Posix does not require that the d_ino field be present, and some
42 systems do not provide it. */
43 # define REAL_DIR_ENTRY(dp) 1
44 # define FAKE_DIR_ENTRY(dp)
46 # define REAL_DIR_ENTRY(dp) (dp->d_ino != 0)
47 # define FAKE_DIR_ENTRY(dp) (dp->d_ino = 1)
50 //const OSD_WhoAmI Iam = OSD_WFileIterator;
53 OSD_FileIterator::OSD_FileIterator() {
57 OSD_FileIterator::OSD_FileIterator(const OSD_Path& where,
58 const TCollection_AsciiString& Mask){
60 Initialize(where, Mask) ;
63 // For Windows NT compatibility
64 void OSD_FileIterator :: Destroy () {}
66 void OSD_FileIterator::Initialize(const OSD_Path& where,
67 const TCollection_AsciiString& Mask){
68 myFlag = Standard_False;
69 where.SystemName(myPlace);
70 if (myPlace.Length()==0) myPlace = ".";
73 closedir((DIR *)myDescr) ;
79 // Is there another file entry ?
81 Standard_Boolean OSD_FileIterator::More(){
84 myDescr = (Standard_Address) opendir(myPlace.ToCString());
85 if (myDescr) { // LD : Si repertoire inaccessible retourner False
86 myFlag = Standard_True;
88 Next(); // Now find first entry
94 // Private : See if file name matches with a mask (like "*.c")
96 static int strcmp_joker(const char *Mask,const char *Name)
100 for(p = Mask,s = Name ; *p && *p != '*' ; p++,s++)
101 if (*p != *s) return 0 ;
103 if (!*p) return !(*s) ;
104 while (*p == '*') p++ ;
107 if (strcmp_joker(p,s)) return 1 ;
112 // LD : ancienne version.
118 static int strcmp_joker(char *fileMask,char *fileName)
120 char *sauve_fileMask,*sauve_fileName;
122 int beginning = 1; // 0 if first character is a joker, otherwise 1
124 while (*fileName) { // Test end of AsciiString
126 if (*fileMask == NO_MASK) {
129 while(*fileMask == NO_MASK) fileMask++;
133 *fileName != *fileMask)
136 sauve_fileMask = fileMask; // Save strings
137 sauve_fileName = fileName;
139 else return(0); // fileMask ends with a joker
142 else { // Compare two characters
143 compare_result = *fileMask++ - *fileName++;
145 if (compare_result != 0)
147 return (compare_result); /* 1ere chaine pas de joker au debut */
148 else { // Look ahead for same string
149 fileMask = sauve_fileMask;
150 fileName = ++sauve_fileName;
152 *fileName != *fileMask)
154 sauve_fileName = fileName;
161 while(*fileMask == NO_MASK) fileMask++;
162 return(*fileMask - *fileName);
166 // Find next file entry in current directory
168 void OSD_FileIterator::Next(){
170 struct stat stat_buf;
173 myFlag = 0; // Initialize to nothing found
176 myEntry = readdir((DIR *)myDescr);
178 if (!myEntry){ // No file found
179 myEntry = NULL; // Keep pointer clean
180 myFlag = Standard_False; // No more files/directory
181 closedir((DIR *)myDescr) ; // so close directory
186 if (!strcmp(((struct dirent *)myEntry)->d_name,".")) continue;
187 if (!strcmp(((struct dirent *)myEntry)->d_name,"..")) continue;
191 sprintf(full_name,"%s/%s",myPlace.ToCString(),
192 ((struct dirent *)myEntry)->d_name); // LD debug
194 cout << "Place : " << myPlace << endl;
195 cout << "FName : " << full_name << endl;
197 stat(full_name, &stat_buf);
198 if (S_ISREG(stat_buf.st_mode)) // LD : Ensure me it's a regular file
199 if (strcmp_joker(myMask.ToCString(), ((struct dirent *)myEntry)->d_name)){
200 // Does it follow mask ?
201 myFlag = Standard_True;
210 // Get Name of selected file
212 OSD_File OSD_FileIterator::Values(){
214 TCollection_AsciiString Name;
215 TCollection_AsciiString Ext;
216 Standard_Integer position;
218 if (myEntry) Name = ((struct dirent *)myEntry)->d_name ;
220 position = Name.Search(".");
224 Ext.Remove(1,position-1);
225 Name.Remove( position,Ext.Length());
228 thisvalue.SetValues("", "", "", "", "", Name,Ext);
229 TheIterator.SetPath (thisvalue);
231 return (TheIterator);
235 void OSD_FileIterator::Reset(){
239 Standard_Boolean OSD_FileIterator::Failed()const{
240 return( myError.Failed());
243 void OSD_FileIterator::Perror() {
248 Standard_Integer OSD_FileIterator::Error()const{
249 return( myError.Error());
254 //------------------------------------------------------------------------
255 //------------------- Windows NT sources for OSD_FileIterator -----------
256 //------------------------------------------------------------------------
262 #include <OSD_File.hxx>
263 #include <OSD_FileIterator.hxx>
264 #include <OSD_OSDError.hxx>
265 #include <OSD_Path.hxx>
266 #include <TCollection_AsciiString.hxx>
267 #include <TCollection_ExtendedString.hxx>
269 #define _FD ( ( PWIN32_FIND_DATAW )myData )
271 void _osd_wnt_set_error ( OSD_Error&, OSD_WhoAmI, ... );
273 OSD_FileIterator :: OSD_FileIterator (
274 const OSD_Path& where,
275 const TCollection_AsciiString& Mask
278 myFlag = Standard_False;
279 myHandle = INVALID_HANDLE_VALUE;
281 where.SystemName ( myPlace );
283 if ( myPlace.Length () == 0 ) myPlace = ".";
290 void OSD_FileIterator :: Destroy () {
292 if ( myData != NULL ) HeapFree ( GetProcessHeap (), 0, myData );
294 if ( myHandle != INVALID_HANDLE_VALUE )
296 FindClose ( ( HANDLE )myHandle );
298 } // end OSD_DirectoryIterator :: Destroy
300 Standard_Boolean OSD_FileIterator :: More () {
302 if ( myHandle == INVALID_HANDLE_VALUE ) {
304 TCollection_AsciiString wc = myPlace + "/" + myMask;
307 GetProcessHeap (), HEAP_GENERATE_EXCEPTIONS, sizeof ( WIN32_FIND_DATAW )
310 // make wchar_t string from UTF-8
311 TCollection_ExtendedString wcW(wc);
312 myHandle = FindFirstFileW ((const wchar_t*)wcW.ToExtString(), (PWIN32_FIND_DATAW)myData);
314 if ( myHandle == INVALID_HANDLE_VALUE )
316 _osd_wnt_set_error ( myError, OSD_WDirectoryIterator );
320 myFlag = Standard_True;
321 myFirstCall = Standard_True;
327 } else if ( !myFlag ) {
329 FindClose ( ( HANDLE )myHandle );
330 myHandle = INVALID_HANDLE_VALUE;
336 } // end OSD_FileIterator :: More
338 void OSD_FileIterator :: Next () {
340 if ( myFirstCall && ( _FD -> dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY ) ||
346 if ( !FindNextFileW ( ( HANDLE )myHandle, _FD ) ) {
348 myFlag = Standard_False;
354 } while ( ( _FD -> dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY ) );
358 myFirstCall = Standard_False;
360 } // end OSD_FileIterator :: Next
362 OSD_File OSD_FileIterator :: Values () {
365 TCollection_AsciiString aFileName
366 (TCollection_ExtendedString( (Standard_ExtString) _FD -> cFileName) );
367 TheIterator.SetPath ( OSD_Path ( aFileName ) );
371 } // end OSD_FileIterator :: Values
373 Standard_Boolean OSD_FileIterator :: Failed () const {
375 return myError.Failed ();
377 } // end OSD_FileIterator :: Failed
379 void OSD_FileIterator :: Reset () {
383 } // end OSD_FileIterator :: Reset
385 void OSD_FileIterator :: Perror () {
389 } // end OSD_FileIterator :: Perror
391 Standard_Integer OSD_FileIterator :: Error () const {
393 return myError.Error ();
395 } // end OSD_FileIterator :: Error
397 // For compatibility with UNIX version
398 OSD_FileIterator::OSD_FileIterator() {}
400 void OSD_FileIterator::Initialize(
402 const TCollection_AsciiString&){}