1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/common/filefn.cpp
3 // Purpose: File- and directory-related functions
4 // Author: Julian Smart
8 // Copyright: (c) 1998 Julian Smart
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
12 // ============================================================================
14 // ============================================================================
16 // ----------------------------------------------------------------------------
18 // ----------------------------------------------------------------------------
20 // For compilers that support precompilation, includes "wx.h".
21 #include "wx/wxprec.h"
27 #include "wx/filefn.h"
36 #include "wx/dynarray.h"
38 #include "wx/filename.h"
41 #include "wx/tokenzr.h"
43 // there are just too many of those...
45 #pragma warning(disable:4706) // assignment within conditional expression
52 #if !wxONLY_WATCOM_EARLIER_THAN(1,4)
53 #if !(defined(_MSC_VER) && (_MSC_VER > 800))
58 #if defined(__WXMAC__)
59 #include "wx/mac/private.h" // includes mac headers
63 #include "wx/msw/private.h"
64 #include "wx/msw/mslu.h"
66 // sys/cygwin.h is needed for cygwin_conv_to_full_win32_path()
68 // note that it must be included after <windows.h>
71 #include <sys/cygwin.h>
73 #endif // __GNUWIN32__
75 // io.h is needed for _get_osfhandle()
76 // Already included by filefn.h for many Windows compilers
77 #if defined __MWERKS__ || defined __CYGWIN__
86 // TODO: Borland probably has _wgetcwd as well?
91 // ----------------------------------------------------------------------------
93 // ----------------------------------------------------------------------------
96 #define _MAXPATHLEN 1024
100 # include "MoreFilesX.h"
103 // ----------------------------------------------------------------------------
105 // ----------------------------------------------------------------------------
107 // MT-FIXME: get rid of this horror and all code using it
108 static wxChar wxFileFunctionsBuffer
[4*_MAXPATHLEN
];
110 #if defined(__VISAGECPP__) && __IBMCPP__ >= 400
112 // VisualAge C++ V4.0 cannot have any external linkage const decs
113 // in headers included by more than one primary source
115 const int wxInvalidOffset
= -1;
118 // ----------------------------------------------------------------------------
120 // ----------------------------------------------------------------------------
122 // translate the filenames before passing them to OS functions
123 #define OS_FILENAME(s) (s.fn_str())
125 // ============================================================================
127 // ============================================================================
129 // ----------------------------------------------------------------------------
130 // wrappers around standard POSIX functions
131 // ----------------------------------------------------------------------------
133 #if wxUSE_UNICODE && defined __BORLANDC__ \
134 && __BORLANDC__ >= 0x550 && __BORLANDC__ <= 0x551
136 // BCC 5.5 and 5.5.1 have a bug in _wopen where files are created read only
137 // regardless of the mode parameter. This hack works around the problem by
138 // setting the mode with _wchmod.
140 int wxCRT_Open(const wchar_t *pathname
, int flags
, mode_t mode
)
144 // we only want to fix the mode when the file is actually created, so
145 // when creating first try doing it O_EXCL so we can tell if the file
146 // was already there.
147 if ((flags
& O_CREAT
) && !(flags
& O_EXCL
) && (mode
& wxS_IWUSR
) != 0)
150 int fd
= _wopen(pathname
, flags
| moreflags
, mode
);
152 // the file was actually created and needs fixing
153 if (fd
!= -1 && (flags
& O_CREAT
) != 0 && (mode
& wxS_IWUSR
) != 0)
156 _wchmod(pathname
, mode
);
157 fd
= _wopen(pathname
, flags
& ~(O_EXCL
| O_CREAT
));
159 // the open failed, but it may have been because the added O_EXCL stopped
160 // the opening of an existing file, so try again without.
161 else if (fd
== -1 && moreflags
!= 0)
163 fd
= _wopen(pathname
, flags
& ~O_CREAT
);
171 // ----------------------------------------------------------------------------
173 // ----------------------------------------------------------------------------
175 bool wxPathList::Add(const wxString
& path
)
177 // add a path separator to force wxFileName to interpret it always as a directory
178 // (i.e. if we are called with '/home/user' we want to consider it a folder and
179 // not, as wxFileName would consider, a filename).
180 wxFileName
fn(path
+ wxFileName::GetPathSeparator());
182 // add only normalized relative/absolute paths
183 // NB: we won't do wxPATH_NORM_DOTS in order to avoid problems when trying to
184 // normalize paths which starts with ".." (which can be normalized only if
185 // we use also wxPATH_NORM_ABSOLUTE - which we don't want to use).
186 if (!fn
.Normalize(wxPATH_NORM_TILDE
|wxPATH_NORM_LONG
|wxPATH_NORM_ENV_VARS
))
189 wxString toadd
= fn
.GetPath();
190 if (Index(toadd
) == wxNOT_FOUND
)
191 wxArrayString::Add(toadd
); // do not add duplicates
196 void wxPathList::Add(const wxArrayString
&arr
)
198 for (size_t j
=0; j
< arr
.GetCount(); j
++)
202 // Add paths e.g. from the PATH environment variable
203 void wxPathList::AddEnvList (const wxString
& WXUNUSED_IN_WINCE(envVariable
))
205 // No environment variables on WinCE
208 // The space has been removed from the tokenizers, otherwise a
209 // path such as "C:\Program Files" would be split into 2 paths:
210 // "C:\Program" and "Files"; this is true for both Windows and Unix.
212 static const wxChar PATH_TOKS
[] =
213 #if defined(__WINDOWS__) || defined(__OS2__)
214 wxT(";"); // Don't separate with colon in DOS (used for drive)
220 if ( wxGetEnv(envVariable
, &val
) )
222 // split into an array of string the value of the env var
223 wxArrayString arr
= wxStringTokenize(val
, PATH_TOKS
);
224 WX_APPEND_ARRAY(*this, arr
);
226 #endif // !__WXWINCE__
229 // Given a full filename (with path), ensure that that file can
230 // be accessed again USING FILENAME ONLY by adding the path
231 // to the list if not already there.
232 bool wxPathList::EnsureFileAccessible (const wxString
& path
)
234 return Add(wxPathOnly(path
));
237 #if WXWIN_COMPATIBILITY_2_6
238 bool wxPathList::Member (const wxString
& path
) const
240 return Index(path
) != wxNOT_FOUND
;
244 wxString
wxPathList::FindValidPath (const wxString
& file
) const
246 // normalize the given string as it could be a path + a filename
247 // and not only a filename
251 // NB: normalize without making absolute otherwise calling this function with
252 // e.g. "b/c.txt" would result in removing the directory 'b' and the for loop
253 // below would only add to the paths of this list the 'c.txt' part when doing
254 // the existence checks...
255 // NB: we don't use wxPATH_NORM_DOTS here, too (see wxPathList::Add for more info)
256 if (!fn
.Normalize(wxPATH_NORM_TILDE
|wxPATH_NORM_LONG
|wxPATH_NORM_ENV_VARS
))
257 return wxEmptyString
;
259 wxASSERT_MSG(!fn
.IsDir(), wxT("Cannot search for directories; only for files"));
261 strend
= fn
.GetFullName(); // search for the file name and ignore the path part
263 strend
= fn
.GetFullPath();
265 for (size_t i
=0; i
<GetCount(); i
++)
267 wxString strstart
= Item(i
);
268 if (!strstart
.IsEmpty() && strstart
.Last() != wxFileName::GetPathSeparator())
269 strstart
+= wxFileName::GetPathSeparator();
271 if (wxFileExists(strstart
+ strend
))
272 return strstart
+ strend
; // Found!
275 return wxEmptyString
; // Not found
278 wxString
wxPathList::FindAbsoluteValidPath (const wxString
& file
) const
280 wxString f
= FindValidPath(file
);
281 if ( f
.empty() || wxIsAbsolutePath(f
) )
284 wxString buf
= ::wxGetCwd();
286 if ( !wxEndsWithPathSeparator(buf
) )
288 buf
+= wxFILE_SEP_PATH
;
295 // ----------------------------------------------------------------------------
296 // miscellaneous global functions (TOFIX!)
297 // ----------------------------------------------------------------------------
299 static inline wxChar
* MYcopystring(const wxString
& s
)
301 wxChar
* copy
= new wxChar
[s
.length() + 1];
302 return wxStrcpy(copy
, s
.c_str());
305 template<typename CharType
>
306 static inline CharType
* MYcopystring(const CharType
* s
)
308 CharType
* copy
= new CharType
[wxStrlen(s
) + 1];
309 return wxStrcpy(copy
, s
);
314 wxFileExists (const wxString
& filename
)
316 #if defined(__WXPALMOS__)
318 #elif defined(__WIN32__) && !defined(__WXMICROWIN__)
319 // we must use GetFileAttributes() instead of the ANSI C functions because
320 // it can cope with network (UNC) paths unlike them
321 DWORD ret
= ::GetFileAttributes(filename
.fn_str());
323 return (ret
!= (DWORD
)-1) && !(ret
& FILE_ATTRIBUTE_DIRECTORY
);
326 #define S_ISREG(mode) ((mode) & S_IFREG)
329 #ifndef wxNEED_WX_UNISTD_H
330 return (wxStat( filename
.fn_str() , &st
) == 0 && S_ISREG(st
.st_mode
))
332 || (errno
== EACCES
) // if access is denied something with that name
333 // exists and is opened in exclusive mode.
337 return wxStat( filename
, &st
) == 0 && S_ISREG(st
.st_mode
);
339 #endif // __WIN32__/!__WIN32__
343 wxIsAbsolutePath (const wxString
& filename
)
345 if (!filename
.empty())
347 #if defined(__WXMAC__) && !defined(__DARWIN__)
348 // Classic or Carbon CodeWarrior like
349 // Carbon with Apple DevTools is Unix like
351 // This seems wrong to me, but there is no fix. since
352 // "MacOS:MyText.txt" is absolute whereas "MyDir:MyText.txt"
353 // is not. Or maybe ":MyDir:MyText.txt" has to be used? RR.
354 if (filename
.Find(':') != wxNOT_FOUND
&& filename
[0] != ':')
357 // Unix like or Windows
358 if (filename
[0] == wxT('/'))
362 if ((filename
[0] == wxT('[') && filename
[1] != wxT('.')))
365 #if defined(__WINDOWS__) || defined(__OS2__)
367 if (filename
[0] == wxT('\\') || (wxIsalpha (filename
[0]) && filename
[1] == wxT(':')))
375 * Strip off any extension (dot something) from end of file,
376 * IF one exists. Inserts zero into buffer.
381 static void wxDoStripExtension(T
*buffer
)
383 int len
= wxStrlen(buffer
);
387 if (buffer
[i
] == wxT('.'))
396 void wxStripExtension(char *buffer
) { wxDoStripExtension(buffer
); }
397 void wxStripExtension(wchar_t *buffer
) { wxDoStripExtension(buffer
); }
399 void wxStripExtension(wxString
& buffer
)
401 //RN: Be careful about the handling the case where
402 //buffer.length() == 0
403 for(size_t i
= buffer
.length() - 1; i
!= wxString::npos
; --i
)
405 if (buffer
.GetChar(i
) == wxT('.'))
407 buffer
= buffer
.Left(i
);
413 // Destructive removal of /./ and /../ stuff
414 template<typename CharType
>
415 static CharType
*wxDoRealPath (CharType
*path
)
418 static const CharType SEP
= wxT('\\');
419 wxUnix2DosFilename(path
);
421 static const CharType SEP
= wxT('/');
423 if (path
[0] && path
[1]) {
424 /* MATTHEW: special case "/./x" */
426 if (path
[2] == SEP
&& path
[1] == wxT('.'))
434 if (p
[1] == wxT('.') && p
[2] == wxT('.') && (p
[3] == SEP
|| p
[3] == wxT('\0')))
437 for (q
= p
- 1; q
>= path
&& *q
!= SEP
; q
--)
442 if (q
[0] == SEP
&& (q
[1] != wxT('.') || q
[2] != wxT('.') || q
[3] != SEP
)
443 && (q
- 1 <= path
|| q
[-1] != SEP
))
446 if (path
[0] == wxT('\0'))
451 #if defined(__WXMSW__) || defined(__OS2__)
452 /* Check that path[2] is NULL! */
453 else if (path
[1] == wxT(':') && !path
[2])
462 else if (p
[1] == wxT('.') && (p
[2] == SEP
|| p
[2] == wxT('\0')))
470 char *wxRealPath(char *path
)
472 return wxDoRealPath(path
);
475 wchar_t *wxRealPath(wchar_t *path
)
477 return wxDoRealPath(path
);
480 wxString
wxRealPath(const wxString
& path
)
482 wxChar
*buf1
=MYcopystring(path
);
483 wxChar
*buf2
=wxRealPath(buf1
);
491 wxChar
*wxCopyAbsolutePath(const wxString
& filename
)
493 if (filename
.empty())
494 return (wxChar
*) NULL
;
496 if (! wxIsAbsolutePath(wxExpandPath(wxFileFunctionsBuffer
, filename
)))
498 wxString buf
= ::wxGetCwd();
499 wxChar ch
= buf
.Last();
501 if (ch
!= wxT('\\') && ch
!= wxT('/'))
507 buf
<< wxFileFunctionsBuffer
;
508 buf
= wxRealPath( buf
);
509 return MYcopystring( buf
);
511 return MYcopystring( wxFileFunctionsBuffer
);
517 ~user/ => user's home dir
518 If the environment variable a = "foo" and b = "bar" then:
535 /* input name in name, pathname output to buf. */
537 template<typename CharType
>
538 static CharType
*wxDoExpandPath(CharType
*buf
, const wxString
& name
)
540 register CharType
*d
, *s
, *nm
;
541 CharType lnm
[_MAXPATHLEN
];
544 // Some compilers don't like this line.
545 // const CharType trimchars[] = wxT("\n \t");
547 CharType trimchars
[4];
548 trimchars
[0] = wxT('\n');
549 trimchars
[1] = wxT(' ');
550 trimchars
[2] = wxT('\t');
554 const CharType SEP
= wxT('\\');
556 const CharType SEP
= wxT('/');
561 nm
= MYcopystring((const CharType
*)name
.c_str()); // Make a scratch copy
562 CharType
*nm_tmp
= nm
;
564 /* Skip leading whitespace and cr */
565 while (wxStrchr(trimchars
, *nm
) != NULL
)
567 /* And strip off trailing whitespace and cr */
568 s
= nm
+ (q
= wxStrlen(nm
)) - 1;
569 while (q
-- && wxStrchr(trimchars
, *s
) != NULL
)
577 q
= nm
[0] == wxT('\\') && nm
[1] == wxT('~');
580 /* Expand inline environment variables */
598 while ((*d
++ = *s
) != 0) {
600 if (*s
== wxT('\\')) {
601 if ((*(d
- 1) = *++s
)!=0) {
609 // No env variables on WinCE
612 if (*s
++ == wxT('$') && (*s
== wxT('{') || *s
== wxT(')')))
614 if (*s
++ == wxT('$'))
617 register CharType
*start
= d
;
618 register int braces
= (*s
== wxT('{') || *s
== wxT('('));
619 register CharType
*value
;
620 while ((*d
++ = *s
) != 0)
621 if (braces
? (*s
== wxT('}') || *s
== wxT(')')) : !(wxIsalnum(*s
) || *s
== wxT('_')) )
626 value
= wxGetenv(braces
? start
+ 1 : start
);
628 for ((d
= start
- 1); (*d
++ = *value
++) != 0;)
642 /* Expand ~ and ~user */
645 if (nm
[0] == wxT('~') && !q
)
648 if (nm
[1] == SEP
|| nm
[1] == 0)
650 homepath
= wxGetUserHome(wxEmptyString
);
651 if (!homepath
.empty()) {
652 s
= (CharType
*)(const CharType
*)homepath
.c_str();
657 { /* ~user/filename */
658 register CharType
*nnm
;
659 for (s
= nm
; *s
&& *s
!= SEP
; s
++)
663 int was_sep
; /* MATTHEW: Was there a separator, or NULL? */
664 was_sep
= (*s
== SEP
);
665 nnm
= *s
? s
+ 1 : s
;
667 homepath
= wxGetUserHome(wxString(nm
+ 1));
668 if (homepath
.empty())
670 if (was_sep
) /* replace only if it was there: */
677 s
= (CharType
*)(const CharType
*)homepath
.c_str();
683 if (s
&& *s
) { /* MATTHEW: s could be NULL if user '~' didn't exist */
685 while (wxT('\0') != (*d
++ = *s
++))
688 if (d
- 1 > buf
&& *(d
- 2) != SEP
)
692 while ((*d
++ = *s
++) != 0)
696 delete[] nm_tmp
; // clean up alloc
697 /* Now clean up the buffer */
698 return wxRealPath(buf
);
701 char *wxExpandPath(char *buf
, const wxString
& name
)
703 return wxDoExpandPath(buf
, name
);
706 wchar_t *wxExpandPath(wchar_t *buf
, const wxString
& name
)
708 return wxDoExpandPath(buf
, name
);
712 /* Contract Paths to be build upon an environment variable
715 example: "/usr/openwin/lib", OPENWINHOME --> ${OPENWINHOME}/lib
717 The call wxExpandPath can convert these back!
720 wxContractPath (const wxString
& filename
,
721 const wxString
& WXUNUSED_IN_WINCE(envname
),
722 const wxString
& user
)
724 static wxChar dest
[_MAXPATHLEN
];
726 if (filename
.empty())
727 return (wxChar
*) NULL
;
729 wxStrcpy (dest
, filename
);
731 wxUnix2DosFilename(dest
);
734 // Handle environment
738 if (!envname
.empty() && !(val
= wxGetenv (envname
)).empty() &&
739 (tcp
= wxStrstr (dest
, val
)) != NULL
)
741 wxStrcpy (wxFileFunctionsBuffer
, tcp
+ val
.length());
744 wxStrcpy (tcp
, envname
);
745 wxStrcat (tcp
, wxT("}"));
746 wxStrcat (tcp
, wxFileFunctionsBuffer
);
750 // Handle User's home (ignore root homes!)
751 val
= wxGetUserHome (user
);
755 const size_t len
= val
.length();
759 if (wxStrncmp(dest
, val
, len
) == 0)
761 wxStrcpy(wxFileFunctionsBuffer
, wxT("~"));
763 wxStrcat(wxFileFunctionsBuffer
, user
);
764 wxStrcat(wxFileFunctionsBuffer
, dest
+ len
);
765 wxStrcpy (dest
, wxFileFunctionsBuffer
);
771 // Return just the filename, not the path (basename)
772 wxChar
*wxFileNameFromPath (wxChar
*path
)
775 wxString n
= wxFileNameFromPath(p
);
777 return path
+ p
.length() - n
.length();
780 wxString
wxFileNameFromPath (const wxString
& path
)
783 wxFileName::SplitPath(path
, NULL
, &name
, &ext
);
785 wxString fullname
= name
;
788 fullname
<< wxFILE_SEP_EXT
<< ext
;
794 // Return just the directory, or NULL if no directory
796 wxPathOnly (wxChar
*path
)
800 static wxChar buf
[_MAXPATHLEN
];
803 wxStrcpy (buf
, path
);
805 int l
= wxStrlen(path
);
808 // Search backward for a backward or forward slash
811 #if defined(__WXMAC__) && !defined(__DARWIN__)
812 // Classic or Carbon CodeWarrior like
813 // Carbon with Apple DevTools is Unix like
814 if (path
[i
] == wxT(':') )
820 // Unix like or Windows
821 if (path
[i
] == wxT('/') || path
[i
] == wxT('\\'))
828 if (path
[i
] == wxT(']'))
837 #if defined(__WXMSW__) || defined(__OS2__)
838 // Try Drive specifier
839 if (wxIsalpha (buf
[0]) && buf
[1] == wxT(':'))
841 // A:junk --> A:. (since A:.\junk Not A:\junk)
848 return (wxChar
*) NULL
;
851 // Return just the directory, or NULL if no directory
852 wxString
wxPathOnly (const wxString
& path
)
856 wxChar buf
[_MAXPATHLEN
];
861 int l
= path
.length();
864 // Search backward for a backward or forward slash
867 #if defined(__WXMAC__) && !defined(__DARWIN__)
868 // Classic or Carbon CodeWarrior like
869 // Carbon with Apple DevTools is Unix like
870 if (path
[i
] == wxT(':') )
873 return wxString(buf
);
876 // Unix like or Windows
877 if (path
[i
] == wxT('/') || path
[i
] == wxT('\\'))
879 // Don't return an empty string
883 return wxString(buf
);
887 if (path
[i
] == wxT(']'))
890 return wxString(buf
);
896 #if defined(__WXMSW__) || defined(__OS2__)
897 // Try Drive specifier
898 if (wxIsalpha (buf
[0]) && buf
[1] == wxT(':'))
900 // A:junk --> A:. (since A:.\junk Not A:\junk)
903 return wxString(buf
);
907 return wxEmptyString
;
910 // Utility for converting delimiters in DOS filenames to UNIX style
911 // and back again - or we get nasty problems with delimiters.
912 // Also, convert to lower case, since case is significant in UNIX.
914 #if defined(__WXMAC__)
916 #if TARGET_API_MAC_OSX
917 #define kDefaultPathStyle kCFURLPOSIXPathStyle
919 #define kDefaultPathStyle kCFURLHFSPathStyle
922 wxString
wxMacFSRefToPath( const FSRef
*fsRef
, CFStringRef additionalPathComponent
)
925 fullURLRef
= CFURLCreateFromFSRef(NULL
, fsRef
);
926 if ( additionalPathComponent
)
928 CFURLRef parentURLRef
= fullURLRef
;
929 fullURLRef
= CFURLCreateCopyAppendingPathComponent(NULL
, parentURLRef
,
930 additionalPathComponent
,false);
931 CFRelease( parentURLRef
) ;
933 CFStringRef cfString
= CFURLCopyFileSystemPath(fullURLRef
, kDefaultPathStyle
);
934 CFRelease( fullURLRef
) ;
935 CFMutableStringRef cfMutableString
= CFStringCreateMutableCopy(NULL
, 0, cfString
);
936 CFRelease( cfString
);
937 CFStringNormalize(cfMutableString
,kCFStringNormalizationFormC
);
938 return wxMacCFStringHolder(cfMutableString
).AsString();
941 OSStatus
wxMacPathToFSRef( const wxString
&path
, FSRef
*fsRef
)
943 OSStatus err
= noErr
;
944 CFMutableStringRef cfMutableString
= CFStringCreateMutableCopy(NULL
, 0, wxMacCFStringHolder(path
));
945 CFStringNormalize(cfMutableString
,kCFStringNormalizationFormD
);
946 CFURLRef url
= CFURLCreateWithFileSystemPath(kCFAllocatorDefault
, cfMutableString
, kDefaultPathStyle
, false);
947 CFRelease( cfMutableString
);
950 if ( CFURLGetFSRef(url
, fsRef
) == false )
961 wxString
wxMacHFSUniStrToString( ConstHFSUniStr255Param uniname
)
963 CFStringRef cfname
= CFStringCreateWithCharacters( kCFAllocatorDefault
,
966 CFMutableStringRef cfMutableString
= CFStringCreateMutableCopy(NULL
, 0, cfname
);
968 CFStringNormalize(cfMutableString
,kCFStringNormalizationFormC
);
969 return wxMacCFStringHolder(cfMutableString
).AsString() ;
974 wxString
wxMacFSSpec2MacFilename( const FSSpec
*spec
)
977 if ( FSpMakeFSRef( spec
, &fsRef
) == noErr
)
979 return wxMacFSRefToPath( &fsRef
) ;
981 return wxEmptyString
;
984 void wxMacFilename2FSSpec( const wxString
& path
, FSSpec
*spec
)
986 OSStatus err
= noErr
;
988 wxMacPathToFSRef( path
, &fsRef
) ;
989 err
= FSRefMakeFSSpec( &fsRef
, spec
) ;
996 static void wxDoDos2UnixFilename(T
*s
)
1005 *s
= wxTolower(*s
); // Case INDEPENDENT
1011 void wxDos2UnixFilename(char *s
) { wxDoDos2UnixFilename(s
); }
1012 void wxDos2UnixFilename(wchar_t *s
) { wxDoDos2UnixFilename(s
); }
1014 template<typename T
>
1016 #if defined(__WXMSW__) || defined(__OS2__)
1017 wxDoUnix2DosFilename(T
*s
)
1019 wxDoUnix2DosFilename(T
*WXUNUSED(s
) )
1022 // Yes, I really mean this to happen under DOS only! JACS
1023 #if defined(__WXMSW__) || defined(__OS2__)
1034 void wxUnix2DosFilename(char *s
) { wxDoUnix2DosFilename(s
); }
1035 void wxUnix2DosFilename(wchar_t *s
) { wxDoUnix2DosFilename(s
); }
1037 // Concatenate two files to form third
1039 wxConcatFiles (const wxString
& file1
, const wxString
& file2
, const wxString
& file3
)
1043 wxFile
in1(file1
), in2(file2
);
1044 wxTempFile
out(file3
);
1046 if ( !in1
.IsOpened() || !in2
.IsOpened() || !out
.IsOpened() )
1050 unsigned char buf
[1024];
1052 for( int i
=0; i
<2; i
++)
1054 wxFile
*in
= i
==0 ? &in1
: &in2
;
1056 if ( (ofs
= in
->Read(buf
,WXSIZEOF(buf
))) == wxInvalidOffset
) return false;
1058 if ( !out
.Write(buf
,ofs
) )
1060 } while ( ofs
== (ssize_t
)WXSIZEOF(buf
) );
1063 return out
.Commit();
1075 // helper of generic implementation of wxCopyFile()
1076 #if !(defined(__WIN32__) || defined(__OS2__) || defined(__PALMOS__)) && \
1080 wxDoCopyFile(wxFile
& fileIn
,
1081 const wxStructStat
& fbuf
,
1082 const wxString
& filenameDst
,
1085 // reset the umask as we want to create the file with exactly the same
1086 // permissions as the original one
1089 // create file2 with the same permissions than file1 and open it for
1093 if ( !fileOut
.Create(filenameDst
, overwrite
, fbuf
.st_mode
& 0777) )
1096 // copy contents of file1 to file2
1100 ssize_t count
= fileIn
.Read(buf
, WXSIZEOF(buf
));
1101 if ( count
== wxInvalidOffset
)
1108 if ( fileOut
.Write(buf
, count
) < (size_t)count
)
1112 // we can expect fileIn to be closed successfully, but we should ensure
1113 // that fileOut was closed as some write errors (disk full) might not be
1114 // detected before doing this
1115 return fileIn
.Close() && fileOut
.Close();
1118 #endif // generic implementation of wxCopyFile
1122 wxCopyFile (const wxString
& file1
, const wxString
& file2
, bool overwrite
)
1124 #if defined(__WIN32__) && !defined(__WXMICROWIN__)
1125 // CopyFile() copies file attributes and modification time too, so use it
1126 // instead of our code if available
1128 // NB: 3rd parameter is bFailIfExists i.e. the inverse of overwrite
1129 if ( !::CopyFile(file1
.fn_str(), file2
.fn_str(), !overwrite
) )
1131 wxLogSysError(_("Failed to copy the file '%s' to '%s'"),
1132 file1
.c_str(), file2
.c_str());
1136 #elif defined(__OS2__)
1137 if ( ::DosCopy(file1
.c_str(), file2
.c_str(), overwrite
? DCPY_EXISTING
: 0) != 0 )
1139 #elif defined(__PALMOS__)
1140 // TODO with http://www.palmos.com/dev/support/docs/protein_books/Memory_Databases_Files/
1142 #elif wxUSE_FILE // !Win32
1145 // get permissions of file1
1146 if ( wxStat( file1
.c_str(), &fbuf
) != 0 )
1148 // the file probably doesn't exist or we haven't the rights to read
1150 wxLogSysError(_("Impossible to get permissions for file '%s'"),
1155 // open file1 for reading
1156 wxFile
fileIn(file1
, wxFile::read
);
1157 if ( !fileIn
.IsOpened() )
1160 // remove file2, if it exists. This is needed for creating
1161 // file2 with the correct permissions in the next step
1162 if ( wxFileExists(file2
) && (!overwrite
|| !wxRemoveFile(file2
)))
1164 wxLogSysError(_("Impossible to overwrite the file '%s'"),
1169 wxDoCopyFile(fileIn
, fbuf
, file2
, overwrite
);
1171 #if defined(__WXMAC__) || defined(__WXCOCOA__)
1172 // copy the resource fork of the file too if it's present
1173 wxString pathRsrcOut
;
1177 // suppress error messages from this block as resource forks don't have
1181 // it's not enough to check for file existence: it always does on HFS
1182 // but is empty for files without resources
1183 if ( fileRsrcIn
.Open(file1
+ wxT("/..namedfork/rsrc")) &&
1184 fileRsrcIn
.Length() > 0 )
1186 // we must be using HFS or another filesystem with resource fork
1187 // support, suppose that destination file system also is HFS[-like]
1188 pathRsrcOut
= file2
+ wxT("/..namedfork/rsrc");
1190 else // check if we have resource fork in separate file (non-HFS case)
1192 wxFileName
fnRsrc(file1
);
1193 fnRsrc
.SetName(wxT("._") + fnRsrc
.GetName());
1196 if ( fileRsrcIn
.Open( fnRsrc
.GetFullPath() ) )
1199 fnRsrc
.SetName(wxT("._") + fnRsrc
.GetName());
1201 pathRsrcOut
= fnRsrc
.GetFullPath();
1206 if ( !pathRsrcOut
.empty() )
1208 if ( !wxDoCopyFile(fileRsrcIn
, fbuf
, pathRsrcOut
, overwrite
) )
1211 #endif // wxMac || wxCocoa
1213 #if !defined(__VISAGECPP__) && !defined(__WXMAC__) || defined(__UNIX__)
1214 // no chmod in VA. Should be some permission API for HPFS386 partitions
1216 if ( chmod(OS_FILENAME(file2
), fbuf
.st_mode
) != 0 )
1218 wxLogSysError(_("Impossible to set permissions for the file '%s'"),
1222 #endif // OS/2 || Mac
1224 #else // !Win32 && ! wxUSE_FILE
1226 // impossible to simulate with wxWidgets API
1229 wxUnusedVar(overwrite
);
1232 #endif // __WXMSW__ && __WIN32__
1238 wxRenameFile(const wxString
& file1
, const wxString
& file2
, bool overwrite
)
1240 if ( !overwrite
&& wxFileExists(file2
) )
1244 _("Failed to rename the file '%s' to '%s' because the destination file already exists."),
1245 file1
.c_str(), file2
.c_str()
1251 #if !defined(__WXWINCE__) && !defined(__WXPALMOS__)
1252 // Normal system call
1253 if ( wxRename (file1
, file2
) == 0 )
1258 if (wxCopyFile(file1
, file2
, overwrite
)) {
1259 wxRemoveFile(file1
);
1266 bool wxRemoveFile(const wxString
& file
)
1268 #if defined(__VISUALC__) \
1269 || defined(__BORLANDC__) \
1270 || defined(__WATCOMC__) \
1271 || defined(__DMC__) \
1272 || defined(__GNUWIN32__) \
1273 || (defined(__MWERKS__) && defined(__MSL__))
1274 int res
= wxRemove(file
);
1275 #elif defined(__WXMAC__)
1276 int res
= unlink(file
.fn_str());
1277 #elif defined(__WXPALMOS__)
1279 // TODO with VFSFileDelete()
1281 int res
= unlink(OS_FILENAME(file
));
1287 bool wxMkdir(const wxString
& dir
, int perm
)
1289 #if defined(__WXPALMOS__)
1291 #elif defined(__WXMAC__) && !defined(__UNIX__)
1292 return (mkdir(dir
.fn_str() , 0 ) == 0);
1294 const wxChar
*dirname
= dir
.c_str();
1296 // assume mkdir() has 2 args on non Windows-OS/2 platforms and on Windows too
1297 // for the GNU compiler
1298 #if (!(defined(__WXMSW__) || defined(__OS2__) || defined(__DOS__))) || (defined(__GNUWIN32__) && !defined(__MINGW32__)) || defined(__WINE__) || defined(__WXMICROWIN__)
1301 if ( mkdir(wxFNCONV(dirname
)) != 0 )
1303 if ( mkdir(wxFNCONV(dirname
), perm
) != 0 )
1305 #elif defined(__OS2__)
1307 if (::DosCreateDir((PSZ
)dirname
, NULL
) != 0) // enhance for EAB's??
1308 #elif defined(__DOS__)
1309 #if defined(__WATCOMC__)
1311 if ( wxMkDir(wxFNSTRINGCAST
wxFNCONV(dirname
)) != 0 )
1312 #elif defined(__DJGPP__)
1313 if ( mkdir(wxFNCONV(dirname
), perm
) != 0 )
1315 #error "Unsupported DOS compiler!"
1317 #else // !MSW, !DOS and !OS/2 VAC++
1320 if ( !CreateDirectory(dirname
, NULL
) )
1322 if ( wxMkDir(dir
.fn_str()) != 0 )
1326 wxLogSysError(_("Directory '%s' couldn't be created"), dirname
);
1335 bool wxRmdir(const wxString
& dir
, int WXUNUSED(flags
))
1337 #if defined(__VMS__)
1338 return false; //to be changed since rmdir exists in VMS7.x
1339 #elif defined(__OS2__)
1340 return (::DosDeleteDir(dir
.c_str()) == 0);
1341 #elif defined(__WXWINCE__)
1342 return (RemoveDirectory(dir
) != 0);
1343 #elif defined(__WXPALMOS__)
1344 // TODO with VFSFileRename()
1347 return (wxRmDir(OS_FILENAME(dir
)) == 0);
1351 // does the path exists? (may have or not '/' or '\\' at the end)
1352 bool wxDirExists(const wxString
& pathName
)
1354 wxString
strPath(pathName
);
1356 #if defined(__WINDOWS__) || defined(__OS2__)
1357 // Windows fails to find directory named "c:\dir\" even if "c:\dir" exists,
1358 // so remove all trailing backslashes from the path - but don't do this for
1359 // the paths "d:\" (which are different from "d:") nor for just "\"
1360 while ( wxEndsWithPathSeparator(strPath
) )
1362 size_t len
= strPath
.length();
1363 if ( len
== 1 || (len
== 3 && strPath
[len
- 2] == _T(':')) )
1366 strPath
.Truncate(len
- 1);
1368 #endif // __WINDOWS__
1371 // OS/2 can't handle "d:", it wants either "d:\" or "d:."
1372 if (strPath
.length() == 2 && strPath
[1u] == _T(':'))
1376 #if defined(__WXPALMOS__)
1378 #elif defined(__WIN32__) && !defined(__WXMICROWIN__)
1379 // stat() can't cope with network paths
1380 DWORD ret
= ::GetFileAttributes(strPath
.fn_str());
1382 return (ret
!= (DWORD
)-1) && (ret
& FILE_ATTRIBUTE_DIRECTORY
);
1383 #elif defined(__OS2__)
1384 FILESTATUS3 Info
= {{0}};
1385 APIRET rc
= ::DosQueryPathInfo((PSZ
)(WXSTRINGCAST strPath
), FIL_STANDARD
,
1386 (void*) &Info
, sizeof(FILESTATUS3
));
1388 return ((rc
== NO_ERROR
) && (Info
.attrFile
& FILE_DIRECTORY
)) ||
1389 (rc
== ERROR_SHARING_VIOLATION
);
1390 // If we got a sharing violation, there must be something with this name.
1394 #ifndef __VISAGECPP__
1395 return wxStat(strPath
.c_str(), &st
) == 0 && ((st
.st_mode
& S_IFMT
) == S_IFDIR
);
1397 // S_IFMT not supported in VA compilers.. st_mode is a 2byte value only
1398 return wxStat(strPath
.c_str(), &st
) == 0 && (st
.st_mode
== S_IFDIR
);
1401 #endif // __WIN32__/!__WIN32__
1404 // Get a temporary filename, opening and closing the file.
1405 wxChar
*wxGetTempFileName(const wxString
& prefix
, wxChar
*buf
)
1408 if ( !wxGetTempFileName(prefix
, filename
) )
1412 wxStrcpy(buf
, filename
);
1414 buf
= MYcopystring(filename
);
1419 bool wxGetTempFileName(const wxString
& prefix
, wxString
& buf
)
1422 buf
= wxFileName::CreateTempFileName(prefix
);
1424 return !buf
.empty();
1425 #else // !wxUSE_FILE
1426 wxUnusedVar(prefix
);
1430 #endif // wxUSE_FILE/!wxUSE_FILE
1433 // Get first file name matching given wild card.
1435 static wxDir
*gs_dir
= NULL
;
1436 static wxString gs_dirPath
;
1438 wxString
wxFindFirstFile(const wxString
& spec
, int flags
)
1440 wxSplitPath(spec
, &gs_dirPath
, NULL
, NULL
);
1441 if ( gs_dirPath
.empty() )
1442 gs_dirPath
= wxT(".");
1443 if ( !wxEndsWithPathSeparator(gs_dirPath
) )
1444 gs_dirPath
<< wxFILE_SEP_PATH
;
1448 gs_dir
= new wxDir(gs_dirPath
);
1450 if ( !gs_dir
->IsOpened() )
1452 wxLogSysError(_("Can not enumerate files '%s'"), spec
);
1453 return wxEmptyString
;
1459 case wxDIR
: dirFlags
= wxDIR_DIRS
; break;
1460 case wxFILE
: dirFlags
= wxDIR_FILES
; break;
1461 default: dirFlags
= wxDIR_DIRS
| wxDIR_FILES
; break;
1465 gs_dir
->GetFirst(&result
, wxFileNameFromPath(spec
), dirFlags
);
1466 if ( result
.empty() )
1472 return gs_dirPath
+ result
;
1475 wxString
wxFindNextFile()
1477 wxASSERT_MSG( gs_dir
, wxT("You must call wxFindFirstFile before!") );
1480 gs_dir
->GetNext(&result
);
1482 if ( result
.empty() )
1488 return gs_dirPath
+ result
;
1492 // Get current working directory.
1493 // If buf is NULL, allocates space using new, else copies into buf.
1494 // wxGetWorkingDirectory() is obsolete, use wxGetCwd()
1495 // wxDoGetCwd() is their common core to be moved
1496 // to wxGetCwd() once wxGetWorkingDirectory() will be removed.
1497 // Do not expose wxDoGetCwd in headers!
1499 wxChar
*wxDoGetCwd(wxChar
*buf
, int sz
)
1501 #if defined(__WXPALMOS__)
1503 if(buf
&& sz
>0) buf
[0] = _T('\0');
1505 #elif defined(__WXWINCE__)
1507 if(buf
&& sz
>0) buf
[0] = _T('\0');
1512 buf
= new wxChar
[sz
+ 1];
1515 bool ok
wxDUMMY_INITIALIZE(false);
1517 // for the compilers which have Unicode version of _getcwd(), call it
1518 // directly, for the others call the ANSI version and do the translation
1521 #else // wxUSE_UNICODE
1522 bool needsANSI
= true;
1524 #if !defined(HAVE_WGETCWD) || wxUSE_UNICODE_MSLU
1525 char cbuf
[_MAXPATHLEN
];
1529 #if wxUSE_UNICODE_MSLU
1530 if ( wxGetOsVersion() != wxOS_WINDOWS_9X
)
1532 char *cbuf
= NULL
; // never really used because needsANSI will always be false
1535 ok
= _wgetcwd(buf
, sz
) != NULL
;
1541 #endif // wxUSE_UNICODE
1543 #if defined(_MSC_VER) || defined(__MINGW32__)
1544 ok
= _getcwd(cbuf
, sz
) != NULL
;
1545 #elif defined(__WXMAC__) && !defined(__DARWIN__)
1547 if ( getcwd( lbuf
, sizeof( lbuf
) ) )
1549 wxString
res( lbuf
, *wxConvCurrent
) ;
1550 wxStrcpy( buf
, res
) ;
1555 #elif defined(__OS2__)
1557 ULONG ulDriveNum
= 0;
1558 ULONG ulDriveMap
= 0;
1559 rc
= ::DosQueryCurrentDisk(&ulDriveNum
, &ulDriveMap
);
1564 rc
= ::DosQueryCurrentDir( 0 // current drive
1568 cbuf
[0] = char('A' + (ulDriveNum
- 1));
1573 #else // !Win32/VC++ !Mac !OS2
1574 ok
= getcwd(cbuf
, sz
) != NULL
;
1577 #if wxUSE_UNICODE && !(defined(__WXMAC__) && !defined(__DARWIN__))
1578 // finally convert the result to Unicode if needed
1579 wxConvFile
.MB2WC(buf
, cbuf
, sz
);
1580 #endif // wxUSE_UNICODE
1585 wxLogSysError(_("Failed to get the working directory"));
1587 // VZ: the old code used to return "." on error which didn't make any
1588 // sense at all to me - empty string is a better error indicator
1589 // (NULL might be even better but I'm afraid this could lead to
1590 // problems with the old code assuming the return is never NULL)
1593 else // ok, but we might need to massage the path into the right format
1596 // VS: DJGPP is a strange mix of DOS and UNIX API and returns paths
1597 // with / deliminers. We don't like that.
1598 for (wxChar
*ch
= buf
; *ch
; ch
++)
1600 if (*ch
== wxT('/'))
1605 // MBN: we hope that in the case the user is compiling a GTK+/Motif app,
1606 // he needs Unix as opposed to Win32 pathnames
1607 #if defined( __CYGWIN__ ) && defined( __WINDOWS__ )
1608 // another example of DOS/Unix mix (Cygwin)
1609 wxString pathUnix
= buf
;
1611 char bufA
[_MAXPATHLEN
];
1612 cygwin_conv_to_full_win32_path(pathUnix
.mb_str(wxConvFile
), bufA
);
1613 wxConvFile
.MB2WC(buf
, bufA
, sz
);
1615 cygwin_conv_to_full_win32_path(pathUnix
, buf
);
1616 #endif // wxUSE_UNICODE
1617 #endif // __CYGWIN__
1630 #if WXWIN_COMPATIBILITY_2_6
1631 wxChar
*wxGetWorkingDirectory(wxChar
*buf
, int sz
)
1633 return wxDoGetCwd(buf
,sz
);
1635 #endif // WXWIN_COMPATIBILITY_2_6
1640 wxDoGetCwd(wxStringBuffer(str
, _MAXPATHLEN
), _MAXPATHLEN
);
1644 bool wxSetWorkingDirectory(const wxString
& d
)
1646 #if defined(__OS2__)
1649 ::DosSetDefaultDisk(wxToupper(d
[0]) - _T('A') + 1);
1650 // do not call DosSetCurrentDir when just changing drive,
1651 // since it requires e.g. "d:." instead of "d:"!
1652 if (d
.length() == 2)
1655 return (::DosSetCurrentDir(d
.c_str()) == 0);
1656 #elif defined(__UNIX__) || defined(__WXMAC__) || defined(__DOS__)
1657 return (chdir(wxFNSTRINGCAST d
.fn_str()) == 0);
1658 #elif defined(__WINDOWS__)
1662 // No equivalent in WinCE
1666 return (bool)(SetCurrentDirectory(d
.fn_str()) != 0);
1669 // Must change drive, too.
1670 bool isDriveSpec
= ((strlen(d
) > 1) && (d
[1] == ':'));
1673 wxChar firstChar
= d
[0];
1677 firstChar
= firstChar
- 32;
1679 // To a drive number
1680 unsigned int driveNo
= firstChar
- 64;
1683 unsigned int noDrives
;
1684 _dos_setdrive(driveNo
, &noDrives
);
1687 bool success
= (chdir(WXSTRINGCAST d
) == 0);
1695 // Get the OS directory if appropriate (such as the Windows directory).
1696 // On non-Windows platform, probably just return the empty string.
1697 wxString
wxGetOSDirectory()
1700 return wxString(wxT("\\Windows"));
1701 #elif defined(__WINDOWS__) && !defined(__WXMICROWIN__)
1703 GetWindowsDirectory(buf
, 256);
1704 return wxString(buf
);
1705 #elif defined(__WXMAC__)
1706 return wxMacFindFolder(kOnSystemDisk
, 'macs', false);
1708 return wxEmptyString
;
1712 bool wxEndsWithPathSeparator(const wxString
& filename
)
1714 return !filename
.empty() && wxIsPathSeparator(filename
.Last());
1717 // find a file in a list of directories, returns false if not found
1718 bool wxFindFileInPath(wxString
*pStr
, const wxString
& szPath
, const wxString
& szFile
)
1720 // we assume that it's not empty
1721 wxCHECK_MSG( !szFile
.empty(), false,
1722 _T("empty file name in wxFindFileInPath"));
1724 // skip path separator in the beginning of the file name if present
1726 if ( wxIsPathSeparator(szFile
[0u]) )
1727 szFile2
= szFile
.Mid(1);
1731 wxStringTokenizer
tkn(szPath
, wxPATH_SEP
);
1733 while ( tkn
.HasMoreTokens() )
1735 wxString strFile
= tkn
.GetNextToken();
1736 if ( !wxEndsWithPathSeparator(strFile
) )
1737 strFile
+= wxFILE_SEP_PATH
;
1740 if ( wxFileExists(strFile
) )
1750 void WXDLLEXPORT
wxSplitPath(const wxString
& fileName
,
1755 wxFileName::SplitPath(fileName
, pstrPath
, pstrName
, pstrExt
);
1760 time_t WXDLLEXPORT
wxFileModificationTime(const wxString
& filename
)
1763 if ( !wxFileName(filename
).GetTimes(NULL
, &mtime
, NULL
) )
1766 return mtime
.GetTicks();
1769 #endif // wxUSE_DATETIME
1772 // Parses the filterStr, returning the number of filters.
1773 // Returns 0 if none or if there's a problem.
1774 // filterStr is in the form: "All files (*.*)|*.*|JPEG Files (*.jpeg)|*.jpeg"
1776 int WXDLLEXPORT
wxParseCommonDialogsFilter(const wxString
& filterStr
,
1777 wxArrayString
& descriptions
,
1778 wxArrayString
& filters
)
1780 descriptions
.Clear();
1783 wxString
str(filterStr
);
1785 wxString description
, filter
;
1787 while( pos
!= wxNOT_FOUND
)
1789 pos
= str
.Find(wxT('|'));
1790 if ( pos
== wxNOT_FOUND
)
1792 // if there are no '|'s at all in the string just take the entire
1793 // string as filter and make description empty for later autocompletion
1794 if ( filters
.IsEmpty() )
1796 descriptions
.Add(wxEmptyString
);
1797 filters
.Add(filterStr
);
1801 wxFAIL_MSG( _T("missing '|' in the wildcard string!") );
1807 description
= str
.Left(pos
);
1808 str
= str
.Mid(pos
+ 1);
1809 pos
= str
.Find(wxT('|'));
1810 if ( pos
== wxNOT_FOUND
)
1816 filter
= str
.Left(pos
);
1817 str
= str
.Mid(pos
+ 1);
1820 descriptions
.Add(description
);
1821 filters
.Add(filter
);
1824 #if defined(__WXMOTIF__)
1825 // split it so there is one wildcard per entry
1826 for( size_t i
= 0 ; i
< descriptions
.GetCount() ; i
++ )
1828 pos
= filters
[i
].Find(wxT(';'));
1829 if (pos
!= wxNOT_FOUND
)
1831 // first split only filters
1832 descriptions
.Insert(descriptions
[i
],i
+1);
1833 filters
.Insert(filters
[i
].Mid(pos
+1),i
+1);
1834 filters
[i
]=filters
[i
].Left(pos
);
1836 // autoreplace new filter in description with pattern:
1837 // C/C++ Files(*.cpp;*.c;*.h)|*.cpp;*.c;*.h
1838 // cause split into:
1839 // C/C++ Files(*.cpp)|*.cpp
1840 // C/C++ Files(*.c;*.h)|*.c;*.h
1841 // and next iteration cause another split into:
1842 // C/C++ Files(*.cpp)|*.cpp
1843 // C/C++ Files(*.c)|*.c
1844 // C/C++ Files(*.h)|*.h
1845 for ( size_t k
=i
;k
<i
+2;k
++ )
1847 pos
= descriptions
[k
].Find(filters
[k
]);
1848 if (pos
!= wxNOT_FOUND
)
1850 wxString before
= descriptions
[k
].Left(pos
);
1851 wxString after
= descriptions
[k
].Mid(pos
+filters
[k
].Len());
1852 pos
= before
.Find(_T('('),true);
1853 if (pos
>before
.Find(_T(')'),true))
1855 before
= before
.Left(pos
+1);
1856 before
<< filters
[k
];
1857 pos
= after
.Find(_T(')'));
1858 int pos1
= after
.Find(_T('('));
1859 if (pos
!= wxNOT_FOUND
&& (pos
<pos1
|| pos1
==wxNOT_FOUND
))
1861 before
<< after
.Mid(pos
);
1862 descriptions
[k
] = before
;
1872 for( size_t j
= 0 ; j
< descriptions
.GetCount() ; j
++ )
1874 if ( descriptions
[j
].empty() && !filters
[j
].empty() )
1876 descriptions
[j
].Printf(_("Files (%s)"), filters
[j
].c_str());
1880 return filters
.GetCount();
1883 #if defined(__WINDOWS__) && !(defined(__UNIX__) || defined(__OS2__))
1884 static bool wxCheckWin32Permission(const wxString
& path
, DWORD access
)
1886 // quoting the MSDN: "To obtain a handle to a directory, call the
1887 // CreateFile function with the FILE_FLAG_BACKUP_SEMANTICS flag", but this
1888 // doesn't work under Win9x/ME but then it's not needed there anyhow
1889 bool isdir
= wxDirExists(path
);
1890 if ( isdir
&& wxGetOsVersion() == wxOS_WINDOWS_9X
)
1892 // FAT directories always allow all access, even if they have the
1893 // readonly flag set
1897 HANDLE h
= ::CreateFile
1901 FILE_SHARE_READ
| FILE_SHARE_WRITE
| FILE_SHARE_DELETE
,
1904 isdir
? FILE_FLAG_BACKUP_SEMANTICS
: 0,
1907 if ( h
!= INVALID_HANDLE_VALUE
)
1910 return h
!= INVALID_HANDLE_VALUE
;
1912 #endif // __WINDOWS__
1914 bool wxIsWritable(const wxString
&path
)
1916 #if defined( __UNIX__ ) || defined(__OS2__)
1917 // access() will take in count also symbolic links
1918 return wxAccess(path
.fn_str(), W_OK
) == 0;
1919 #elif defined( __WINDOWS__ )
1920 return wxCheckWin32Permission(path
, GENERIC_WRITE
);
1928 bool wxIsReadable(const wxString
&path
)
1930 #if defined( __UNIX__ ) || defined(__OS2__)
1931 // access() will take in count also symbolic links
1932 return wxAccess(path
.fn_str(), R_OK
) == 0;
1933 #elif defined( __WINDOWS__ )
1934 return wxCheckWin32Permission(path
, GENERIC_READ
);
1942 bool wxIsExecutable(const wxString
&path
)
1944 #if defined( __UNIX__ ) || defined(__OS2__)
1945 // access() will take in count also symbolic links
1946 return wxAccess(path
.fn_str(), X_OK
) == 0;
1947 #elif defined( __WINDOWS__ )
1948 return wxCheckWin32Permission(path
, GENERIC_EXECUTE
);
1956 // Return the type of an open file
1958 // Some file types on some platforms seem seekable but in fact are not.
1959 // The main use of this function is to allow such cases to be detected
1960 // (IsSeekable() is implemented as wxGetFileKind() == wxFILE_KIND_DISK).
1962 // This is important for the archive streams, which benefit greatly from
1963 // being able to seek on a stream, but which will produce corrupt archives
1964 // if they unknowingly seek on a non-seekable stream.
1966 // wxFILE_KIND_DISK is a good catch all return value, since other values
1967 // disable features of the archive streams. Some other value must be returned
1968 // for a file type that appears seekable but isn't.
1971 // * Pipes on Windows
1972 // * Files on VMS with a record format other than StreamLF
1974 wxFileKind
wxGetFileKind(int fd
)
1976 #if defined __WXMSW__ && !defined __WXWINCE__ && defined wxGetOSFHandle
1977 switch (::GetFileType(wxGetOSFHandle(fd
)) & ~FILE_TYPE_REMOTE
)
1979 case FILE_TYPE_CHAR
:
1980 return wxFILE_KIND_TERMINAL
;
1981 case FILE_TYPE_DISK
:
1982 return wxFILE_KIND_DISK
;
1983 case FILE_TYPE_PIPE
:
1984 return wxFILE_KIND_PIPE
;
1987 return wxFILE_KIND_UNKNOWN
;
1989 #elif defined(__UNIX__)
1991 return wxFILE_KIND_TERMINAL
;
1996 if (S_ISFIFO(st
.st_mode
))
1997 return wxFILE_KIND_PIPE
;
1998 if (!S_ISREG(st
.st_mode
))
1999 return wxFILE_KIND_UNKNOWN
;
2001 #if defined(__VMS__)
2002 if (st
.st_fab_rfm
!= FAB$C_STMLF
)
2003 return wxFILE_KIND_UNKNOWN
;
2006 return wxFILE_KIND_DISK
;
2009 #define wxFILEKIND_STUB
2011 return wxFILE_KIND_DISK
;
2015 wxFileKind
wxGetFileKind(FILE *fp
)
2017 // Note: The watcom rtl dll doesn't have fileno (the static lib does).
2018 // Should be fixed in version 1.4.
2019 #if defined(wxFILEKIND_STUB) || wxONLY_WATCOM_EARLIER_THAN(1,4)
2021 return wxFILE_KIND_DISK
;
2022 #elif defined(__WINDOWS__) && !defined(__CYGWIN__) && !defined(__WATCOMC__) && !defined(__WINE__)
2023 return fp
? wxGetFileKind(_fileno(fp
)) : wxFILE_KIND_UNKNOWN
;
2025 return fp
? wxGetFileKind(fileno(fp
)) : wxFILE_KIND_UNKNOWN
;
2030 //------------------------------------------------------------------------
2031 // wild character routines
2032 //------------------------------------------------------------------------
2034 bool wxIsWild( const wxString
& pattern
)
2036 for ( wxString::const_iterator p
= pattern
.begin(); p
!= pattern
.end(); ++p
)
2038 switch ( (*p
).GetValue() )
2047 if ( ++p
== pattern
.end() )
2055 * Written By Douglas A. Lewis <dalewis@cs.Buffalo.EDU>
2057 * The match procedure is public domain code (from ircII's reg.c)
2058 * but modified to suit our tastes (RN: No "%" syntax I guess)
2061 bool wxMatchWild( const wxString
& pat
, const wxString
& text
, bool dot_special
)
2065 /* Match if both are empty. */
2069 const wxChar
*m
= pat
.c_str(),
2077 if (dot_special
&& (*n
== wxT('.')))
2079 /* Never match so that hidden Unix files
2080 * are never found. */
2093 else if (*m
== wxT('?'))
2101 if (*m
== wxT('\\'))
2104 /* Quoting "nothing" is a bad thing */
2111 * If we are out of both strings or we just
2112 * saw a wildcard, then we can say we have a
2123 * We could check for *n == NULL at this point, but
2124 * since it's more common to have a character there,
2125 * check to see if they match first (m and n) and
2126 * then if they don't match, THEN we can check for
2142 * If there are no more characters in the
2143 * string, but we still need to find another
2144 * character (*m != NULL), then it will be
2145 * impossible to match it
2164 #pragma warning(default:4706) // assignment within conditional expression