]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/common/filename.cpp
Update the text part of combobox when changing text of selected item in wxGTK.
[wxWidgets.git] / src / common / filename.cpp
... / ...
CommitLineData
1/////////////////////////////////////////////////////////////////////////////
2// Name: src/common/filename.cpp
3// Purpose: wxFileName - encapsulates a file path
4// Author: Robert Roebling, Vadim Zeitlin
5// Modified by:
6// Created: 28.12.2000
7// RCS-ID: $Id$
8// Copyright: (c) 2000 Robert Roebling
9// Licence: wxWindows licence
10/////////////////////////////////////////////////////////////////////////////
11
12/*
13 Here are brief descriptions of the filename formats supported by this class:
14
15 wxPATH_UNIX: standard Unix format, used under Darwin as well, absolute file
16 names have the form:
17 /dir1/dir2/.../dirN/filename, "." and ".." stand for the
18 current and parent directory respectively, "~" is parsed as the
19 user HOME and "~username" as the HOME of that user
20
21 wxPATH_DOS: DOS/Windows format, absolute file names have the form:
22 drive:\dir1\dir2\...\dirN\filename.ext where drive is a single
23 letter. "." and ".." as for Unix but no "~".
24
25 There are also UNC names of the form \\share\fullpath and
26 MSW unique volume names of the form \\?\Volume{GUID}\fullpath.
27
28 The latter provide a uniform way to access a volume regardless of
29 its current mount point, i.e. you can change a volume's mount
30 point from D: to E:, or even remove it, and still be able to
31 access it through its unique volume name. More on the subject can
32 be found in MSDN's article "Naming a Volume" that is currently at
33 http://msdn.microsoft.com/en-us/library/aa365248(VS.85).aspx.
34
35
36 wxPATH_MAC: Mac OS 8/9 and Mac OS X under CodeWarrior 7 format, absolute file
37 names have the form
38 volume:dir1:...:dirN:filename
39 and the relative file names are either
40 :dir1:...:dirN:filename
41 or just
42 filename
43 (although :filename works as well).
44 Since the volume is just part of the file path, it is not
45 treated like a separate entity as it is done under DOS and
46 VMS, it is just treated as another dir.
47
48 wxPATH_VMS: VMS native format, absolute file names have the form
49 <device>:[dir1.dir2.dir3]file.txt
50 or
51 <device>:[000000.dir1.dir2.dir3]file.txt
52
53 the <device> is the physical device (i.e. disk). 000000 is the
54 root directory on the device which can be omitted.
55
56 Note that VMS uses different separators unlike Unix:
57 : always after the device. If the path does not contain : than
58 the default (the device of the current directory) is assumed.
59 [ start of directory specification
60 . separator between directory and subdirectory
61 ] between directory and file
62 */
63
64// ============================================================================
65// declarations
66// ============================================================================
67
68// ----------------------------------------------------------------------------
69// headers
70// ----------------------------------------------------------------------------
71
72// For compilers that support precompilation, includes "wx.h".
73#include "wx/wxprec.h"
74
75#ifdef __BORLANDC__
76#pragma hdrstop
77#endif
78
79#ifndef WX_PRECOMP
80 #ifdef __WINDOWS__
81 #include "wx/msw/wrapwin.h" // For GetShort/LongPathName
82 #endif
83 #include "wx/dynarray.h"
84 #include "wx/intl.h"
85 #include "wx/log.h"
86 #include "wx/utils.h"
87 #include "wx/crt.h"
88#endif
89
90#include "wx/filename.h"
91#include "wx/private/filename.h"
92#include "wx/tokenzr.h"
93#include "wx/config.h" // for wxExpandEnvVars
94#include "wx/dynlib.h"
95#include "wx/dir.h"
96
97#if defined(__WIN32__) && defined(__MINGW32__)
98 #include "wx/msw/gccpriv.h"
99#endif
100
101#ifdef __WINDOWS__
102#include "wx/msw/private.h"
103#endif
104
105#if defined(__WXMAC__)
106 #include "wx/osx/private.h" // includes mac headers
107#endif
108
109// utime() is POSIX so should normally be available on all Unices
110#ifdef __UNIX_LIKE__
111#include <sys/types.h>
112#include <utime.h>
113#include <sys/stat.h>
114#include <unistd.h>
115#endif
116
117#ifdef __DJGPP__
118#include <unistd.h>
119#endif
120
121#ifdef __MWERKS__
122#ifdef __MACH__
123#include <sys/types.h>
124#include <utime.h>
125#include <sys/stat.h>
126#include <unistd.h>
127#else
128#include <stat.h>
129#include <unistd.h>
130#include <unix.h>
131#endif
132#endif
133
134#ifdef __WATCOMC__
135#include <io.h>
136#include <sys/utime.h>
137#include <sys/stat.h>
138#endif
139
140#ifdef __VISAGECPP__
141#ifndef MAX_PATH
142#define MAX_PATH 256
143#endif
144#endif
145
146#ifdef __EMX__
147#include <os2.h>
148#define MAX_PATH _MAX_PATH
149#endif
150
151#ifndef S_ISREG
152 #define S_ISREG(mode) ((mode) & S_IFREG)
153#endif
154#ifndef S_ISDIR
155 #define S_ISDIR(mode) ((mode) & S_IFDIR)
156#endif
157
158#if wxUSE_LONGLONG
159extern const wxULongLong wxInvalidSize = (unsigned)-1;
160#endif // wxUSE_LONGLONG
161
162namespace
163{
164
165// ----------------------------------------------------------------------------
166// private classes
167// ----------------------------------------------------------------------------
168
169// small helper class which opens and closes the file - we use it just to get
170// a file handle for the given file name to pass it to some Win32 API function
171#if defined(__WIN32__) && !defined(__WXMICROWIN__)
172
173class wxFileHandle
174{
175public:
176 enum OpenMode
177 {
178 ReadAttr,
179 WriteAttr
180 };
181
182 wxFileHandle(const wxString& filename, OpenMode mode, int flags = 0)
183 {
184 // be careful and use FILE_{READ,WRITE}_ATTRIBUTES here instead of the
185 // usual GENERIC_{READ,WRITE} as we don't want the file access time to
186 // be changed when we open it because this class is used for setting
187 // access time (see #10567)
188 m_hFile = ::CreateFile
189 (
190 filename.t_str(), // name
191 mode == ReadAttr ? FILE_READ_ATTRIBUTES // access mask
192 : FILE_WRITE_ATTRIBUTES,
193 FILE_SHARE_READ | // sharing mode
194 FILE_SHARE_WRITE, // (allow everything)
195 NULL, // no secutity attr
196 OPEN_EXISTING, // creation disposition
197 flags, // flags
198 NULL // no template file
199 );
200
201 if ( m_hFile == INVALID_HANDLE_VALUE )
202 {
203 if ( mode == ReadAttr )
204 {
205 wxLogSysError(_("Failed to open '%s' for reading"),
206 filename.c_str());
207 }
208 else
209 {
210 wxLogSysError(_("Failed to open '%s' for writing"),
211 filename.c_str());
212 }
213 }
214 }
215
216 ~wxFileHandle()
217 {
218 if ( m_hFile != INVALID_HANDLE_VALUE )
219 {
220 if ( !::CloseHandle(m_hFile) )
221 {
222 wxLogSysError(_("Failed to close file handle"));
223 }
224 }
225 }
226
227 // return true only if the file could be opened successfully
228 bool IsOk() const { return m_hFile != INVALID_HANDLE_VALUE; }
229
230 // get the handle
231 operator HANDLE() const { return m_hFile; }
232
233private:
234 HANDLE m_hFile;
235};
236
237#endif // __WIN32__
238
239// ----------------------------------------------------------------------------
240// private functions
241// ----------------------------------------------------------------------------
242
243#if wxUSE_DATETIME && defined(__WIN32__) && !defined(__WXMICROWIN__)
244
245// convert between wxDateTime and FILETIME which is a 64-bit value representing
246// the number of 100-nanosecond intervals since January 1, 1601.
247
248static void ConvertFileTimeToWx(wxDateTime *dt, const FILETIME &ft)
249{
250 FILETIME ftcopy = ft;
251 FILETIME ftLocal;
252 if ( !::FileTimeToLocalFileTime(&ftcopy, &ftLocal) )
253 {
254 wxLogLastError(wxT("FileTimeToLocalFileTime"));
255 }
256
257 SYSTEMTIME st;
258 if ( !::FileTimeToSystemTime(&ftLocal, &st) )
259 {
260 wxLogLastError(wxT("FileTimeToSystemTime"));
261 }
262
263 dt->Set(st.wDay, wxDateTime::Month(st.wMonth - 1), st.wYear,
264 st.wHour, st.wMinute, st.wSecond, st.wMilliseconds);
265}
266
267static void ConvertWxToFileTime(FILETIME *ft, const wxDateTime& dt)
268{
269 SYSTEMTIME st;
270 st.wDay = dt.GetDay();
271 st.wMonth = (WORD)(dt.GetMonth() + 1);
272 st.wYear = (WORD)dt.GetYear();
273 st.wHour = dt.GetHour();
274 st.wMinute = dt.GetMinute();
275 st.wSecond = dt.GetSecond();
276 st.wMilliseconds = dt.GetMillisecond();
277
278 FILETIME ftLocal;
279 if ( !::SystemTimeToFileTime(&st, &ftLocal) )
280 {
281 wxLogLastError(wxT("SystemTimeToFileTime"));
282 }
283
284 if ( !::LocalFileTimeToFileTime(&ftLocal, ft) )
285 {
286 wxLogLastError(wxT("LocalFileTimeToFileTime"));
287 }
288}
289
290#endif // wxUSE_DATETIME && __WIN32__
291
292// return a string with the volume par
293static wxString wxGetVolumeString(const wxString& volume, wxPathFormat format)
294{
295 wxString path;
296
297 if ( !volume.empty() )
298 {
299 format = wxFileName::GetFormat(format);
300
301 // Special Windows UNC paths hack, part 2: undo what we did in
302 // SplitPath() and make an UNC path if we have a drive which is not a
303 // single letter (hopefully the network shares can't be one letter only
304 // although I didn't find any authoritative docs on this)
305 if ( format == wxPATH_DOS && volume.length() > 1 )
306 {
307 // We also have to check for Windows unique volume names here and
308 // return it with '\\?\' prepended to it
309 if ( wxFileName::IsMSWUniqueVolumeNamePath("\\\\?\\" + volume + "\\",
310 format) )
311 {
312 path << "\\\\?\\" << volume;
313 }
314 else
315 {
316 // it must be a UNC path
317 path << wxFILE_SEP_PATH_DOS << wxFILE_SEP_PATH_DOS << volume;
318 }
319 }
320 else if ( format == wxPATH_DOS || format == wxPATH_VMS )
321 {
322 path << volume << wxFileName::GetVolumeSeparator(format);
323 }
324 // else ignore
325 }
326
327 return path;
328}
329
330// return true if the character is a DOS path separator i.e. either a slash or
331// a backslash
332inline bool IsDOSPathSep(wxUniChar ch)
333{
334 return ch == wxFILE_SEP_PATH_DOS || ch == wxFILE_SEP_PATH_UNIX;
335}
336
337// return true if the format used is the DOS/Windows one and the string looks
338// like a UNC path
339static bool IsUNCPath(const wxString& path, wxPathFormat format)
340{
341 return format == wxPATH_DOS &&
342 path.length() >= 4 && // "\\a" can't be a UNC path
343 IsDOSPathSep(path[0u]) &&
344 IsDOSPathSep(path[1u]) &&
345 !IsDOSPathSep(path[2u]);
346}
347
348// ----------------------------------------------------------------------------
349// private constants
350// ----------------------------------------------------------------------------
351
352// length of \\?\Volume{xxxxxxxx-xxxx-xxxx-xxxx-xxxxxxxxxxxx}\ string
353static const size_t wxMSWUniqueVolumePrefixLength = 49;
354
355} // anonymous namespace
356
357// ============================================================================
358// implementation
359// ============================================================================
360
361// ----------------------------------------------------------------------------
362// wxFileName construction
363// ----------------------------------------------------------------------------
364
365void wxFileName::Assign( const wxFileName &filepath )
366{
367 m_volume = filepath.GetVolume();
368 m_dirs = filepath.GetDirs();
369 m_name = filepath.GetName();
370 m_ext = filepath.GetExt();
371 m_relative = filepath.m_relative;
372 m_hasExt = filepath.m_hasExt;
373}
374
375void wxFileName::Assign(const wxString& volume,
376 const wxString& path,
377 const wxString& name,
378 const wxString& ext,
379 bool hasExt,
380 wxPathFormat format)
381{
382 // we should ignore paths which look like UNC shares because we already
383 // have the volume here and the UNC notation (\\server\path) is only valid
384 // for paths which don't start with a volume, so prevent SetPath() from
385 // recognizing "\\foo\bar" in "c:\\foo\bar" as an UNC path
386 //
387 // note also that this is a rather ugly way to do what we want (passing
388 // some kind of flag telling to ignore UNC paths to SetPath() would be
389 // better) but this is the safest thing to do to avoid breaking backwards
390 // compatibility in 2.8
391 if ( IsUNCPath(path, format) )
392 {
393 // remove one of the 2 leading backslashes to ensure that it's not
394 // recognized as an UNC path by SetPath()
395 wxString pathNonUNC(path, 1, wxString::npos);
396 SetPath(pathNonUNC, format);
397 }
398 else // no UNC complications
399 {
400 SetPath(path, format);
401 }
402
403 m_volume = volume;
404 m_ext = ext;
405 m_name = name;
406
407 m_hasExt = hasExt;
408}
409
410void wxFileName::SetPath( const wxString& pathOrig, wxPathFormat format )
411{
412 m_dirs.Clear();
413
414 if ( pathOrig.empty() )
415 {
416 // no path at all
417 m_relative = true;
418
419 return;
420 }
421
422 format = GetFormat( format );
423
424 // 0) deal with possible volume part first
425 wxString volume,
426 path;
427 SplitVolume(pathOrig, &volume, &path, format);
428 if ( !volume.empty() )
429 {
430 m_relative = false;
431
432 SetVolume(volume);
433 }
434
435 // 1) Determine if the path is relative or absolute.
436
437 if ( path.empty() )
438 {
439 // we had only the volume
440 return;
441 }
442
443 wxChar leadingChar = path[0u];
444
445 switch (format)
446 {
447 case wxPATH_MAC:
448 m_relative = leadingChar == wxT(':');
449
450 // We then remove a leading ":". The reason is in our
451 // storage form for relative paths:
452 // ":dir:file.txt" actually means "./dir/file.txt" in
453 // DOS notation and should get stored as
454 // (relative) (dir) (file.txt)
455 // "::dir:file.txt" actually means "../dir/file.txt"
456 // stored as (relative) (..) (dir) (file.txt)
457 // This is important only for the Mac as an empty dir
458 // actually means <UP>, whereas under DOS, double
459 // slashes can be ignored: "\\\\" is the same as "\\".
460 if (m_relative)
461 path.erase( 0, 1 );
462 break;
463
464 case wxPATH_VMS:
465 // TODO: what is the relative path format here?
466 m_relative = false;
467 break;
468
469 default:
470 wxFAIL_MSG( wxT("Unknown path format") );
471 // !! Fall through !!
472
473 case wxPATH_UNIX:
474 m_relative = leadingChar != wxT('/');
475 break;
476
477 case wxPATH_DOS:
478 m_relative = !IsPathSeparator(leadingChar, format);
479 break;
480
481 }
482
483 // 2) Break up the path into its members. If the original path
484 // was just "/" or "\\", m_dirs will be empty. We know from
485 // the m_relative field, if this means "nothing" or "root dir".
486
487 wxStringTokenizer tn( path, GetPathSeparators(format) );
488
489 while ( tn.HasMoreTokens() )
490 {
491 wxString token = tn.GetNextToken();
492
493 // Remove empty token under DOS and Unix, interpret them
494 // as .. under Mac.
495 if (token.empty())
496 {
497 if (format == wxPATH_MAC)
498 m_dirs.Add( wxT("..") );
499 // else ignore
500 }
501 else
502 {
503 m_dirs.Add( token );
504 }
505 }
506}
507
508void wxFileName::Assign(const wxString& fullpath,
509 wxPathFormat format)
510{
511 wxString volume, path, name, ext;
512 bool hasExt;
513 SplitPath(fullpath, &volume, &path, &name, &ext, &hasExt, format);
514
515 Assign(volume, path, name, ext, hasExt, format);
516}
517
518void wxFileName::Assign(const wxString& fullpathOrig,
519 const wxString& fullname,
520 wxPathFormat format)
521{
522 // always recognize fullpath as directory, even if it doesn't end with a
523 // slash
524 wxString fullpath = fullpathOrig;
525 if ( !fullpath.empty() && !wxEndsWithPathSeparator(fullpath) )
526 {
527 fullpath += GetPathSeparator(format);
528 }
529
530 wxString volume, path, name, ext;
531 bool hasExt;
532
533 // do some consistency checks: the name should be really just the filename
534 // and the path should be really just a path
535 wxString volDummy, pathDummy, nameDummy, extDummy;
536
537 SplitPath(fullname, &volDummy, &pathDummy, &name, &ext, &hasExt, format);
538
539 wxASSERT_MSG( volDummy.empty() && pathDummy.empty(),
540 wxT("the file name shouldn't contain the path") );
541
542 SplitPath(fullpath, &volume, &path, &nameDummy, &extDummy, format);
543
544#ifndef __VMS
545 // This test makes no sense on an OpenVMS system.
546 wxASSERT_MSG( nameDummy.empty() && extDummy.empty(),
547 wxT("the path shouldn't contain file name nor extension") );
548#endif
549 Assign(volume, path, name, ext, hasExt, format);
550}
551
552void wxFileName::Assign(const wxString& pathOrig,
553 const wxString& name,
554 const wxString& ext,
555 wxPathFormat format)
556{
557 wxString volume,
558 path;
559 SplitVolume(pathOrig, &volume, &path, format);
560
561 Assign(volume, path, name, ext, format);
562}
563
564void wxFileName::AssignDir(const wxString& dir, wxPathFormat format)
565{
566 Assign(dir, wxEmptyString, format);
567}
568
569void wxFileName::Clear()
570{
571 m_dirs.Clear();
572
573 m_volume =
574 m_name =
575 m_ext = wxEmptyString;
576
577 // we don't have any absolute path for now
578 m_relative = true;
579
580 // nor any extension
581 m_hasExt = false;
582}
583
584/* static */
585wxFileName wxFileName::FileName(const wxString& file, wxPathFormat format)
586{
587 return wxFileName(file, format);
588}
589
590/* static */
591wxFileName wxFileName::DirName(const wxString& dir, wxPathFormat format)
592{
593 wxFileName fn;
594 fn.AssignDir(dir, format);
595 return fn;
596}
597
598// ----------------------------------------------------------------------------
599// existence tests
600// ----------------------------------------------------------------------------
601
602namespace
603{
604
605// Flags for wxFileSystemObjectExists() asking it to check for:
606enum
607{
608 wxFileSystemObject_File = 1, // file existence
609 wxFileSystemObject_Dir = 2, // directory existence
610 wxFileSystemObject_Other = 4, // existence of something else, e.g.
611 // device, socket, FIFO under Unix
612 wxFileSystemObject_Any = 7 // existence of anything at all
613};
614
615#if defined(__WINDOWS__) && !defined(__WXMICROWIN__)
616
617void RemoveTrailingSeparatorsFromPath(wxString& strPath)
618{
619 // Windows fails to find directory named "c:\dir\" even if "c:\dir" exists,
620 // so remove all trailing backslashes from the path - but don't do this for
621 // the paths "d:\" (which are different from "d:"), for just "\" or for
622 // windows unique volume names ("\\?\Volume{GUID}\")
623 while ( wxEndsWithPathSeparator( strPath ) )
624 {
625 size_t len = strPath.length();
626 if ( len == 1 || (len == 3 && strPath[len - 2] == wxT(':')) ||
627 (len == wxMSWUniqueVolumePrefixLength &&
628 wxFileName::IsMSWUniqueVolumeNamePath(strPath)))
629 {
630 break;
631 }
632
633 strPath.Truncate(len - 1);
634 }
635}
636
637#endif // __WINDOWS__ || __OS2__
638
639bool wxFileSystemObjectExists(const wxString& path, int flags)
640{
641 // Should the existence of file/directory with this name be accepted, i.e.
642 // result in the true return value from this function?
643 const bool acceptFile = (flags & wxFileSystemObject_File) != 0;
644 const bool acceptDir = (flags & wxFileSystemObject_Dir) != 0;
645
646 wxString strPath(path);
647
648#if defined(__WINDOWS__) && !defined(__WXMICROWIN__)
649 if ( acceptDir )
650 {
651 // Ensure that the path doesn't have any trailing separators when
652 // checking for directories.
653 RemoveTrailingSeparatorsFromPath(strPath);
654 }
655
656 // we must use GetFileAttributes() instead of the ANSI C functions because
657 // it can cope with network (UNC) paths unlike them
658 DWORD ret = ::GetFileAttributes(path.t_str());
659
660 if ( ret == INVALID_FILE_ATTRIBUTES )
661 return false;
662
663 if ( ret & FILE_ATTRIBUTE_DIRECTORY )
664 return acceptDir;
665
666 // Anything else must be a file (perhaps we should check for
667 // FILE_ATTRIBUTE_REPARSE_POINT?)
668 return acceptFile;
669#elif defined(__OS2__)
670 if ( acceptDir )
671 {
672 // OS/2 can't handle "d:", it wants either "d:\" or "d:."
673 if (strPath.length() == 2 && strPath[1u] == wxT(':'))
674 strPath << wxT('.');
675 }
676
677 FILESTATUS3 Info = {{0}};
678 APIRET rc = ::DosQueryPathInfo((PSZ)(WXSTRINGCAST strPath), FIL_STANDARD,
679 (void*) &Info, sizeof(FILESTATUS3));
680
681 if ( rc == NO_ERROR )
682 {
683 if ( Info.attrFile & FILE_DIRECTORY )
684 return acceptDir;
685 else
686 return acceptFile;
687 }
688
689 // We consider that the path must exist if we get a sharing violation for
690 // it but we don't know what is it in this case.
691 if ( rc == ERROR_SHARING_VIOLATION )
692 return flags & wxFileSystemObject_Other;
693
694 // Any other error (usually ERROR_PATH_NOT_FOUND), means there is nothing
695 // there.
696 return false;
697#else // Non-MSW, non-OS/2
698 wxStructStat st;
699 if ( wxStat(strPath, &st) != 0 )
700 return false;
701
702 if ( S_ISREG(st.st_mode) )
703 return acceptFile;
704 if ( S_ISDIR(st.st_mode) )
705 return acceptDir;
706
707 return flags & wxFileSystemObject_Other;
708#endif // Platforms
709}
710
711} // anonymous namespace
712
713bool wxFileName::FileExists() const
714{
715 return wxFileName::FileExists( GetFullPath() );
716}
717
718/* static */
719bool wxFileName::FileExists( const wxString &filePath )
720{
721 return wxFileSystemObjectExists(filePath, wxFileSystemObject_File);
722}
723
724bool wxFileName::DirExists() const
725{
726 return wxFileName::DirExists( GetPath() );
727}
728
729/* static */
730bool wxFileName::DirExists( const wxString &dirPath )
731{
732 return wxFileSystemObjectExists(dirPath, wxFileSystemObject_Dir);
733}
734
735/* static */
736bool wxFileName::Exists(const wxString& path)
737{
738 return wxFileSystemObjectExists(path, wxFileSystemObject_Any);
739}
740
741// ----------------------------------------------------------------------------
742// CWD and HOME stuff
743// ----------------------------------------------------------------------------
744
745void wxFileName::AssignCwd(const wxString& volume)
746{
747 AssignDir(wxFileName::GetCwd(volume));
748}
749
750/* static */
751wxString wxFileName::GetCwd(const wxString& volume)
752{
753 // if we have the volume, we must get the current directory on this drive
754 // and to do this we have to chdir to this volume - at least under Windows,
755 // I don't know how to get the current drive on another volume elsewhere
756 // (TODO)
757 wxString cwdOld;
758 if ( !volume.empty() )
759 {
760 cwdOld = wxGetCwd();
761 SetCwd(volume + GetVolumeSeparator());
762 }
763
764 wxString cwd = ::wxGetCwd();
765
766 if ( !volume.empty() )
767 {
768 SetCwd(cwdOld);
769 }
770
771 return cwd;
772}
773
774bool wxFileName::SetCwd() const
775{
776 return wxFileName::SetCwd( GetPath() );
777}
778
779bool wxFileName::SetCwd( const wxString &cwd )
780{
781 return ::wxSetWorkingDirectory( cwd );
782}
783
784void wxFileName::AssignHomeDir()
785{
786 AssignDir(wxFileName::GetHomeDir());
787}
788
789wxString wxFileName::GetHomeDir()
790{
791 return ::wxGetHomeDir();
792}
793
794
795// ----------------------------------------------------------------------------
796// CreateTempFileName
797// ----------------------------------------------------------------------------
798
799#if wxUSE_FILE || wxUSE_FFILE
800
801
802#if !defined wx_fdopen && defined HAVE_FDOPEN
803 #define wx_fdopen fdopen
804#endif
805
806// NB: GetTempFileName() under Windows creates the file, so using
807// O_EXCL there would fail
808#ifdef __WINDOWS__
809 #define wxOPEN_EXCL 0
810#else
811 #define wxOPEN_EXCL O_EXCL
812#endif
813
814
815#ifdef wxOpenOSFHandle
816#define WX_HAVE_DELETE_ON_CLOSE
817// On Windows create a file with the FILE_FLAGS_DELETE_ON_CLOSE flags.
818//
819static int wxOpenWithDeleteOnClose(const wxString& filename)
820{
821 DWORD access = GENERIC_READ | GENERIC_WRITE;
822
823 DWORD disposition = OPEN_ALWAYS;
824
825 DWORD attributes = FILE_ATTRIBUTE_TEMPORARY |
826 FILE_FLAG_DELETE_ON_CLOSE;
827
828 HANDLE h = ::CreateFile(filename.fn_str(), access, 0, NULL,
829 disposition, attributes, NULL);
830
831 return wxOpenOSFHandle(h, wxO_BINARY);
832}
833#endif // wxOpenOSFHandle
834
835
836// Helper to open the file
837//
838static int wxTempOpen(const wxString& path, bool *deleteOnClose)
839{
840#ifdef WX_HAVE_DELETE_ON_CLOSE
841 if (*deleteOnClose)
842 return wxOpenWithDeleteOnClose(path);
843#endif
844
845 *deleteOnClose = false;
846
847 return wxOpen(path, wxO_BINARY | O_RDWR | O_CREAT | wxOPEN_EXCL, 0600);
848}
849
850
851#if wxUSE_FFILE
852// Helper to open the file and attach it to the wxFFile
853//
854static bool wxTempOpen(wxFFile *file, const wxString& path, bool *deleteOnClose)
855{
856#ifndef wx_fdopen
857 *deleteOnClose = false;
858 return file->Open(path, wxT("w+b"));
859#else // wx_fdopen
860 int fd = wxTempOpen(path, deleteOnClose);
861 if (fd == -1)
862 return false;
863 file->Attach(wx_fdopen(fd, "w+b"), path);
864 return file->IsOpened();
865#endif // wx_fdopen
866}
867#endif // wxUSE_FFILE
868
869
870#if !wxUSE_FILE
871 #define WXFILEARGS(x, y) y
872#elif !wxUSE_FFILE
873 #define WXFILEARGS(x, y) x
874#else
875 #define WXFILEARGS(x, y) x, y
876#endif
877
878
879// Implementation of wxFileName::CreateTempFileName().
880//
881static wxString wxCreateTempImpl(
882 const wxString& prefix,
883 WXFILEARGS(wxFile *fileTemp, wxFFile *ffileTemp),
884 bool *deleteOnClose = NULL)
885{
886#if wxUSE_FILE && wxUSE_FFILE
887 wxASSERT(fileTemp == NULL || ffileTemp == NULL);
888#endif
889 wxString path, dir, name;
890 bool wantDeleteOnClose = false;
891
892 if (deleteOnClose)
893 {
894 // set the result to false initially
895 wantDeleteOnClose = *deleteOnClose;
896 *deleteOnClose = false;
897 }
898 else
899 {
900 // easier if it alwasys points to something
901 deleteOnClose = &wantDeleteOnClose;
902 }
903
904 // use the directory specified by the prefix
905 wxFileName::SplitPath(prefix, &dir, &name, NULL /* extension */);
906
907 if (dir.empty())
908 {
909 dir = wxFileName::GetTempDir();
910 }
911
912#if defined(__WXWINCE__)
913 path = dir + wxT("\\") + name;
914 int i = 1;
915 while (wxFileName::FileExists(path))
916 {
917 path = dir + wxT("\\") + name ;
918 path << i;
919 i ++;
920 }
921
922#elif defined(__WINDOWS__) && !defined(__WXMICROWIN__)
923 if (!::GetTempFileName(dir.t_str(), name.t_str(), 0,
924 wxStringBuffer(path, MAX_PATH + 1)))
925 {
926 wxLogLastError(wxT("GetTempFileName"));
927
928 path.clear();
929 }
930
931#else // !Windows
932 path = dir;
933
934 if ( !wxEndsWithPathSeparator(dir) &&
935 (name.empty() || !wxIsPathSeparator(name[0u])) )
936 {
937 path += wxFILE_SEP_PATH;
938 }
939
940 path += name;
941
942#if defined(HAVE_MKSTEMP)
943 // scratch space for mkstemp()
944 path += wxT("XXXXXX");
945
946 // we need to copy the path to the buffer in which mkstemp() can modify it
947 wxCharBuffer buf(path.fn_str());
948
949 // cast is safe because the string length doesn't change
950 int fdTemp = mkstemp( (char*)(const char*) buf );
951 if ( fdTemp == -1 )
952 {
953 // this might be not necessary as mkstemp() on most systems should have
954 // already done it but it doesn't hurt neither...
955 path.clear();
956 }
957 else // mkstemp() succeeded
958 {
959 path = wxConvFile.cMB2WX( (const char*) buf );
960
961 #if wxUSE_FILE
962 // avoid leaking the fd
963 if ( fileTemp )
964 {
965 fileTemp->Attach(fdTemp);
966 }
967 else
968 #endif
969
970 #if wxUSE_FFILE
971 if ( ffileTemp )
972 {
973 #ifdef wx_fdopen
974 ffileTemp->Attach(wx_fdopen(fdTemp, "r+b"), path);
975 #else
976 ffileTemp->Open(path, wxT("r+b"));
977 close(fdTemp);
978 #endif
979 }
980 else
981 #endif
982
983 {
984 close(fdTemp);
985 }
986 }
987#else // !HAVE_MKSTEMP
988
989#ifdef HAVE_MKTEMP
990 // same as above
991 path += wxT("XXXXXX");
992
993 wxCharBuffer buf = wxConvFile.cWX2MB( path );
994 if ( !mktemp( (char*)(const char*) buf ) )
995 {
996 path.clear();
997 }
998 else
999 {
1000 path = wxConvFile.cMB2WX( (const char*) buf );
1001 }
1002#else // !HAVE_MKTEMP (includes __DOS__)
1003 // generate the unique file name ourselves
1004 #if !defined(__DOS__) && (!defined(__MWERKS__) || defined(__DARWIN__) )
1005 path << (unsigned int)getpid();
1006 #endif
1007
1008 wxString pathTry;
1009
1010 static const size_t numTries = 1000;
1011 for ( size_t n = 0; n < numTries; n++ )
1012 {
1013 // 3 hex digits is enough for numTries == 1000 < 4096
1014 pathTry = path + wxString::Format(wxT("%.03x"), (unsigned int) n);
1015 if ( !wxFileName::FileExists(pathTry) )
1016 {
1017 break;
1018 }
1019
1020 pathTry.clear();
1021 }
1022
1023 path = pathTry;
1024#endif // HAVE_MKTEMP/!HAVE_MKTEMP
1025
1026#endif // HAVE_MKSTEMP/!HAVE_MKSTEMP
1027
1028#endif // Windows/!Windows
1029
1030 if ( path.empty() )
1031 {
1032 wxLogSysError(_("Failed to create a temporary file name"));
1033 }
1034 else
1035 {
1036 bool ok = true;
1037
1038 // open the file - of course, there is a race condition here, this is
1039 // why we always prefer using mkstemp()...
1040 #if wxUSE_FILE
1041 if ( fileTemp && !fileTemp->IsOpened() )
1042 {
1043 *deleteOnClose = wantDeleteOnClose;
1044 int fd = wxTempOpen(path, deleteOnClose);
1045 if (fd != -1)
1046 fileTemp->Attach(fd);
1047 else
1048 ok = false;
1049 }
1050 #endif
1051
1052 #if wxUSE_FFILE
1053 if ( ffileTemp && !ffileTemp->IsOpened() )
1054 {
1055 *deleteOnClose = wantDeleteOnClose;
1056 ok = wxTempOpen(ffileTemp, path, deleteOnClose);
1057 }
1058 #endif
1059
1060 if ( !ok )
1061 {
1062 // FIXME: If !ok here should we loop and try again with another
1063 // file name? That is the standard recourse if open(O_EXCL)
1064 // fails, though of course it should be protected against
1065 // possible infinite looping too.
1066
1067 wxLogError(_("Failed to open temporary file."));
1068
1069 path.clear();
1070 }
1071 }
1072
1073 return path;
1074}
1075
1076
1077static bool wxCreateTempImpl(
1078 const wxString& prefix,
1079 WXFILEARGS(wxFile *fileTemp, wxFFile *ffileTemp),
1080 wxString *name)
1081{
1082 bool deleteOnClose = true;
1083
1084 *name = wxCreateTempImpl(prefix,
1085 WXFILEARGS(fileTemp, ffileTemp),
1086 &deleteOnClose);
1087
1088 bool ok = !name->empty();
1089
1090 if (deleteOnClose)
1091 name->clear();
1092#ifdef __UNIX__
1093 else if (ok && wxRemoveFile(*name))
1094 name->clear();
1095#endif
1096
1097 return ok;
1098}
1099
1100
1101static void wxAssignTempImpl(
1102 wxFileName *fn,
1103 const wxString& prefix,
1104 WXFILEARGS(wxFile *fileTemp, wxFFile *ffileTemp))
1105{
1106 wxString tempname;
1107 tempname = wxCreateTempImpl(prefix, WXFILEARGS(fileTemp, ffileTemp));
1108
1109 if ( tempname.empty() )
1110 {
1111 // error, failed to get temp file name
1112 fn->Clear();
1113 }
1114 else // ok
1115 {
1116 fn->Assign(tempname);
1117 }
1118}
1119
1120
1121void wxFileName::AssignTempFileName(const wxString& prefix)
1122{
1123 wxAssignTempImpl(this, prefix, WXFILEARGS(NULL, NULL));
1124}
1125
1126/* static */
1127wxString wxFileName::CreateTempFileName(const wxString& prefix)
1128{
1129 return wxCreateTempImpl(prefix, WXFILEARGS(NULL, NULL));
1130}
1131
1132#endif // wxUSE_FILE || wxUSE_FFILE
1133
1134
1135#if wxUSE_FILE
1136
1137wxString wxCreateTempFileName(const wxString& prefix,
1138 wxFile *fileTemp,
1139 bool *deleteOnClose)
1140{
1141 return wxCreateTempImpl(prefix, WXFILEARGS(fileTemp, NULL), deleteOnClose);
1142}
1143
1144bool wxCreateTempFile(const wxString& prefix,
1145 wxFile *fileTemp,
1146 wxString *name)
1147{
1148 return wxCreateTempImpl(prefix, WXFILEARGS(fileTemp, NULL), name);
1149}
1150
1151void wxFileName::AssignTempFileName(const wxString& prefix, wxFile *fileTemp)
1152{
1153 wxAssignTempImpl(this, prefix, WXFILEARGS(fileTemp, NULL));
1154}
1155
1156/* static */
1157wxString
1158wxFileName::CreateTempFileName(const wxString& prefix, wxFile *fileTemp)
1159{
1160 return wxCreateTempFileName(prefix, fileTemp);
1161}
1162
1163#endif // wxUSE_FILE
1164
1165
1166#if wxUSE_FFILE
1167
1168wxString wxCreateTempFileName(const wxString& prefix,
1169 wxFFile *fileTemp,
1170 bool *deleteOnClose)
1171{
1172 return wxCreateTempImpl(prefix, WXFILEARGS(NULL, fileTemp), deleteOnClose);
1173}
1174
1175bool wxCreateTempFile(const wxString& prefix,
1176 wxFFile *fileTemp,
1177 wxString *name)
1178{
1179 return wxCreateTempImpl(prefix, WXFILEARGS(NULL, fileTemp), name);
1180
1181}
1182
1183void wxFileName::AssignTempFileName(const wxString& prefix, wxFFile *fileTemp)
1184{
1185 wxAssignTempImpl(this, prefix, WXFILEARGS(NULL, fileTemp));
1186}
1187
1188/* static */
1189wxString
1190wxFileName::CreateTempFileName(const wxString& prefix, wxFFile *fileTemp)
1191{
1192 return wxCreateTempFileName(prefix, fileTemp);
1193}
1194
1195#endif // wxUSE_FFILE
1196
1197
1198// ----------------------------------------------------------------------------
1199// directory operations
1200// ----------------------------------------------------------------------------
1201
1202// helper of GetTempDir(): check if the given directory exists and return it if
1203// it does or an empty string otherwise
1204namespace
1205{
1206
1207wxString CheckIfDirExists(const wxString& dir)
1208{
1209 return wxFileName::DirExists(dir) ? dir : wxString();
1210}
1211
1212} // anonymous namespace
1213
1214wxString wxFileName::GetTempDir()
1215{
1216 // first try getting it from environment: this allows overriding the values
1217 // used by default if the user wants to create temporary files in another
1218 // directory
1219 wxString dir = CheckIfDirExists(wxGetenv("TMPDIR"));
1220 if ( dir.empty() )
1221 {
1222 dir = CheckIfDirExists(wxGetenv("TMP"));
1223 if ( dir.empty() )
1224 dir = CheckIfDirExists(wxGetenv("TEMP"));
1225 }
1226
1227 // if no environment variables are set, use the system default
1228 if ( dir.empty() )
1229 {
1230#if defined(__WXWINCE__)
1231 dir = CheckIfDirExists(wxT("\\temp"));
1232#elif defined(__WINDOWS__) && !defined(__WXMICROWIN__)
1233 if ( !::GetTempPath(MAX_PATH, wxStringBuffer(dir, MAX_PATH + 1)) )
1234 {
1235 wxLogLastError(wxT("GetTempPath"));
1236 }
1237#elif defined(__WXMAC__) && wxOSX_USE_CARBON
1238 dir = wxMacFindFolderNoSeparator(short(kOnSystemDisk), kTemporaryFolderType, kCreateFolder);
1239#endif // systems with native way
1240 }
1241 else // we got directory from an environment variable
1242 {
1243 // remove any trailing path separators, we don't want to ever return
1244 // them from this function for consistency
1245 const size_t lastNonSep = dir.find_last_not_of(GetPathSeparators());
1246 if ( lastNonSep == wxString::npos )
1247 {
1248 // the string consists entirely of separators, leave only one
1249 dir = GetPathSeparator();
1250 }
1251 else
1252 {
1253 dir.erase(lastNonSep + 1);
1254 }
1255 }
1256
1257 // fall back to hard coded value
1258 if ( dir.empty() )
1259 {
1260#ifdef __UNIX_LIKE__
1261 dir = CheckIfDirExists("/tmp");
1262 if ( dir.empty() )
1263#endif // __UNIX_LIKE__
1264 dir = ".";
1265 }
1266
1267 return dir;
1268}
1269
1270bool wxFileName::Mkdir( int perm, int flags ) const
1271{
1272 return wxFileName::Mkdir(GetPath(), perm, flags);
1273}
1274
1275bool wxFileName::Mkdir( const wxString& dir, int perm, int flags )
1276{
1277 if ( flags & wxPATH_MKDIR_FULL )
1278 {
1279 // split the path in components
1280 wxFileName filename;
1281 filename.AssignDir(dir);
1282
1283 wxString currPath;
1284 if ( filename.HasVolume())
1285 {
1286 currPath << wxGetVolumeString(filename.GetVolume(), wxPATH_NATIVE);
1287 }
1288
1289 wxArrayString dirs = filename.GetDirs();
1290 size_t count = dirs.GetCount();
1291 for ( size_t i = 0; i < count; i++ )
1292 {
1293 if ( i > 0 || filename.IsAbsolute() )
1294 currPath += wxFILE_SEP_PATH;
1295 currPath += dirs[i];
1296
1297 if (!DirExists(currPath))
1298 {
1299 if (!wxMkdir(currPath, perm))
1300 {
1301 // no need to try creating further directories
1302 return false;
1303 }
1304 }
1305 }
1306
1307 return true;
1308
1309 }
1310
1311 return ::wxMkdir( dir, perm );
1312}
1313
1314bool wxFileName::Rmdir(int flags) const
1315{
1316 return wxFileName::Rmdir( GetPath(), flags );
1317}
1318
1319bool wxFileName::Rmdir(const wxString& dir, int flags)
1320{
1321#ifdef __WINDOWS__
1322 if ( flags & wxPATH_RMDIR_RECURSIVE )
1323 {
1324 // SHFileOperation needs double null termination string
1325 // but without separator at the end of the path
1326 wxString path(dir);
1327 if ( path.Last() == wxFILE_SEP_PATH )
1328 path.RemoveLast();
1329 path += wxT('\0');
1330
1331 SHFILEOPSTRUCT fileop;
1332 wxZeroMemory(fileop);
1333 fileop.wFunc = FO_DELETE;
1334 #if defined(__CYGWIN__) && defined(wxUSE_UNICODE)
1335 fileop.pFrom = path.wc_str();
1336 #else
1337 fileop.pFrom = path.fn_str();
1338 #endif
1339 fileop.fFlags = FOF_SILENT | FOF_NOCONFIRMATION;
1340 #ifndef __WXWINCE__
1341 // FOF_NOERRORUI is not defined in WinCE
1342 fileop.fFlags |= FOF_NOERRORUI;
1343 #endif
1344
1345 int ret = SHFileOperation(&fileop);
1346 if ( ret != 0 )
1347 {
1348 // SHFileOperation may return non-Win32 error codes, so the error
1349 // message can be incorrect
1350 wxLogApiError(wxT("SHFileOperation"), ret);
1351 return false;
1352 }
1353
1354 return true;
1355 }
1356 else if ( flags & wxPATH_RMDIR_FULL )
1357#else // !__WINDOWS__
1358 if ( flags != 0 ) // wxPATH_RMDIR_FULL or wxPATH_RMDIR_RECURSIVE
1359#endif // !__WINDOWS__
1360 {
1361 wxString path(dir);
1362 if ( path.Last() != wxFILE_SEP_PATH )
1363 path += wxFILE_SEP_PATH;
1364
1365 wxDir d(path);
1366
1367 if ( !d.IsOpened() )
1368 return false;
1369
1370 wxString filename;
1371
1372 // first delete all subdirectories
1373 bool cont = d.GetFirst(&filename, "", wxDIR_DIRS | wxDIR_HIDDEN);
1374 while ( cont )
1375 {
1376 wxFileName::Rmdir(path + filename, flags);
1377 cont = d.GetNext(&filename);
1378 }
1379
1380#ifndef __WINDOWS__
1381 if ( flags & wxPATH_RMDIR_RECURSIVE )
1382 {
1383 // delete all files too
1384 cont = d.GetFirst(&filename, "", wxDIR_FILES | wxDIR_HIDDEN);
1385 while ( cont )
1386 {
1387 ::wxRemoveFile(path + filename);
1388 cont = d.GetNext(&filename);
1389 }
1390 }
1391#endif // !__WINDOWS__
1392 }
1393
1394 return ::wxRmdir(dir);
1395}
1396
1397// ----------------------------------------------------------------------------
1398// path normalization
1399// ----------------------------------------------------------------------------
1400
1401bool wxFileName::Normalize(int flags,
1402 const wxString& cwd,
1403 wxPathFormat format)
1404{
1405 // deal with env vars renaming first as this may seriously change the path
1406 if ( flags & wxPATH_NORM_ENV_VARS )
1407 {
1408 wxString pathOrig = GetFullPath(format);
1409 wxString path = wxExpandEnvVars(pathOrig);
1410 if ( path != pathOrig )
1411 {
1412 Assign(path);
1413 }
1414 }
1415
1416 // the existing path components
1417 wxArrayString dirs = GetDirs();
1418
1419 // the path to prepend in front to make the path absolute
1420 wxFileName curDir;
1421
1422 format = GetFormat(format);
1423
1424 // set up the directory to use for making the path absolute later
1425 if ( (flags & wxPATH_NORM_ABSOLUTE) && !IsAbsolute(format) )
1426 {
1427 if ( cwd.empty() )
1428 {
1429 curDir.AssignCwd(GetVolume());
1430 }
1431 else // cwd provided
1432 {
1433 curDir.AssignDir(cwd);
1434 }
1435 }
1436
1437 // handle ~ stuff under Unix only
1438 if ( (format == wxPATH_UNIX) && (flags & wxPATH_NORM_TILDE) && m_relative )
1439 {
1440 if ( !dirs.IsEmpty() )
1441 {
1442 wxString dir = dirs[0u];
1443 if ( !dir.empty() && dir[0u] == wxT('~') )
1444 {
1445 // to make the path absolute use the home directory
1446 curDir.AssignDir(wxGetUserHome(dir.c_str() + 1));
1447 dirs.RemoveAt(0u);
1448 }
1449 }
1450 }
1451
1452 // transform relative path into abs one
1453 if ( curDir.IsOk() )
1454 {
1455 // this path may be relative because it doesn't have the volume name
1456 // and still have m_relative=true; in this case we shouldn't modify
1457 // our directory components but just set the current volume
1458 if ( !HasVolume() && curDir.HasVolume() )
1459 {
1460 SetVolume(curDir.GetVolume());
1461
1462 if ( !m_relative )
1463 {
1464 // yes, it was the case - we don't need curDir then
1465 curDir.Clear();
1466 }
1467 }
1468
1469 // finally, prepend curDir to the dirs array
1470 wxArrayString dirsNew = curDir.GetDirs();
1471 WX_PREPEND_ARRAY(dirs, dirsNew);
1472
1473 // if we used e.g. tilde expansion previously and wxGetUserHome didn't
1474 // return for some reason an absolute path, then curDir maybe not be absolute!
1475 if ( !curDir.m_relative )
1476 {
1477 // we have prepended an absolute path and thus we are now an absolute
1478 // file name too
1479 m_relative = false;
1480 }
1481 // else if (flags & wxPATH_NORM_ABSOLUTE):
1482 // should we warn the user that we didn't manage to make the path absolute?
1483 }
1484
1485 // now deal with ".", ".." and the rest
1486 m_dirs.Empty();
1487 size_t count = dirs.GetCount();
1488 for ( size_t n = 0; n < count; n++ )
1489 {
1490 wxString dir = dirs[n];
1491
1492 if ( flags & wxPATH_NORM_DOTS )
1493 {
1494 if ( dir == wxT(".") )
1495 {
1496 // just ignore
1497 continue;
1498 }
1499
1500 if ( dir == wxT("..") )
1501 {
1502 if ( m_dirs.empty() )
1503 {
1504 // We have more ".." than directory components so far.
1505 // Don't treat this as an error as the path could have been
1506 // entered by user so try to handle it reasonably: if the
1507 // path is absolute, just ignore the extra ".." because
1508 // "/.." is the same as "/". Otherwise, i.e. for relative
1509 // paths, keep ".." unchanged because removing it would
1510 // modify the file a relative path refers to.
1511 if ( !m_relative )
1512 continue;
1513
1514 }
1515 else // Normal case, go one step up.
1516 {
1517 m_dirs.pop_back();
1518 continue;
1519 }
1520 }
1521 }
1522
1523 m_dirs.Add(dir);
1524 }
1525
1526#if defined(__WIN32__) && !defined(__WXWINCE__) && wxUSE_OLE
1527 if ( (flags & wxPATH_NORM_SHORTCUT) )
1528 {
1529 wxString filename;
1530 if (GetShortcutTarget(GetFullPath(format), filename))
1531 {
1532 m_relative = false;
1533 Assign(filename);
1534 }
1535 }
1536#endif
1537
1538#if defined(__WIN32__)
1539 if ( (flags & wxPATH_NORM_LONG) && (format == wxPATH_DOS) )
1540 {
1541 Assign(GetLongPath());
1542 }
1543#endif // Win32
1544
1545 // Change case (this should be kept at the end of the function, to ensure
1546 // that the path doesn't change any more after we normalize its case)
1547 if ( (flags & wxPATH_NORM_CASE) && !IsCaseSensitive(format) )
1548 {
1549 m_volume.MakeLower();
1550 m_name.MakeLower();
1551 m_ext.MakeLower();
1552
1553 // directory entries must be made lower case as well
1554 count = m_dirs.GetCount();
1555 for ( size_t i = 0; i < count; i++ )
1556 {
1557 m_dirs[i].MakeLower();
1558 }
1559 }
1560
1561 return true;
1562}
1563
1564#ifndef __WXWINCE__
1565bool wxFileName::ReplaceEnvVariable(const wxString& envname,
1566 const wxString& replacementFmtString,
1567 wxPathFormat format)
1568{
1569 // look into stringForm for the contents of the given environment variable
1570 wxString val;
1571 if (envname.empty() ||
1572 !wxGetEnv(envname, &val))
1573 return false;
1574 if (val.empty())
1575 return false;
1576
1577 wxString stringForm = GetPath(wxPATH_GET_VOLUME, format);
1578 // do not touch the file name and the extension
1579
1580 wxString replacement = wxString::Format(replacementFmtString, envname);
1581 stringForm.Replace(val, replacement);
1582
1583 // Now assign ourselves the modified path:
1584 Assign(stringForm, GetFullName(), format);
1585
1586 return true;
1587}
1588#endif
1589
1590bool wxFileName::ReplaceHomeDir(wxPathFormat format)
1591{
1592 wxString homedir = wxGetHomeDir();
1593 if (homedir.empty())
1594 return false;
1595
1596 wxString stringForm = GetPath(wxPATH_GET_VOLUME, format);
1597 // do not touch the file name and the extension
1598
1599 stringForm.Replace(homedir, "~");
1600
1601 // Now assign ourselves the modified path:
1602 Assign(stringForm, GetFullName(), format);
1603
1604 return true;
1605}
1606
1607// ----------------------------------------------------------------------------
1608// get the shortcut target
1609// ----------------------------------------------------------------------------
1610
1611// WinCE (3) doesn't have CLSID_ShellLink, IID_IShellLink definitions.
1612// The .lnk file is a plain text file so it should be easy to
1613// make it work. Hint from Google Groups:
1614// "If you open up a lnk file, you'll see a
1615// number, followed by a pound sign (#), followed by more text. The
1616// number is the number of characters that follows the pound sign. The
1617// characters after the pound sign are the command line (which _can_
1618// include arguments) to be executed. Any path (e.g. \windows\program
1619// files\myapp.exe) that includes spaces needs to be enclosed in
1620// quotation marks."
1621
1622#if defined(__WIN32__) && !defined(__WXWINCE__) && wxUSE_OLE
1623// The following lines are necessary under WinCE
1624// #include "wx/msw/private.h"
1625// #include <ole2.h>
1626#include <shlobj.h>
1627#if defined(__WXWINCE__)
1628#include <shlguid.h>
1629#endif
1630
1631bool wxFileName::GetShortcutTarget(const wxString& shortcutPath,
1632 wxString& targetFilename,
1633 wxString* arguments) const
1634{
1635 wxString path, file, ext;
1636 wxFileName::SplitPath(shortcutPath, & path, & file, & ext);
1637
1638 HRESULT hres;
1639 IShellLink* psl;
1640 bool success = false;
1641
1642 // Assume it's not a shortcut if it doesn't end with lnk
1643 if (ext.CmpNoCase(wxT("lnk"))!=0)
1644 return false;
1645
1646 // create a ShellLink object
1647 hres = CoCreateInstance(CLSID_ShellLink, NULL, CLSCTX_INPROC_SERVER,
1648 IID_IShellLink, (LPVOID*) &psl);
1649
1650 if (SUCCEEDED(hres))
1651 {
1652 IPersistFile* ppf;
1653 hres = psl->QueryInterface( IID_IPersistFile, (LPVOID *) &ppf);
1654 if (SUCCEEDED(hres))
1655 {
1656 WCHAR wsz[MAX_PATH];
1657
1658 MultiByteToWideChar(CP_ACP, MB_PRECOMPOSED, shortcutPath.mb_str(), -1, wsz,
1659 MAX_PATH);
1660
1661 hres = ppf->Load(wsz, 0);
1662 ppf->Release();
1663
1664 if (SUCCEEDED(hres))
1665 {
1666 wxChar buf[2048];
1667 // Wrong prototype in early versions
1668#if defined(__MINGW32__) && !wxCHECK_W32API_VERSION(2, 2)
1669 psl->GetPath((CHAR*) buf, 2048, NULL, SLGP_UNCPRIORITY);
1670#else
1671 psl->GetPath(buf, 2048, NULL, SLGP_UNCPRIORITY);
1672#endif
1673 targetFilename = wxString(buf);
1674 success = (shortcutPath != targetFilename);
1675
1676 psl->GetArguments(buf, 2048);
1677 wxString args(buf);
1678 if (!args.empty() && arguments)
1679 {
1680 *arguments = args;
1681 }
1682 }
1683 }
1684
1685 psl->Release();
1686 }
1687 return success;
1688}
1689
1690#endif // __WIN32__ && !__WXWINCE__
1691
1692
1693// ----------------------------------------------------------------------------
1694// absolute/relative paths
1695// ----------------------------------------------------------------------------
1696
1697bool wxFileName::IsAbsolute(wxPathFormat format) const
1698{
1699 // unix paths beginning with ~ are reported as being absolute
1700 if ( format == wxPATH_UNIX )
1701 {
1702 if ( !m_dirs.IsEmpty() )
1703 {
1704 wxString dir = m_dirs[0u];
1705
1706 if (!dir.empty() && dir[0u] == wxT('~'))
1707 return true;
1708 }
1709 }
1710
1711 // if our path doesn't start with a path separator, it's not an absolute
1712 // path
1713 if ( m_relative )
1714 return false;
1715
1716 if ( !GetVolumeSeparator(format).empty() )
1717 {
1718 // this format has volumes and an absolute path must have one, it's not
1719 // enough to have the full path to be an absolute file under Windows
1720 if ( GetVolume().empty() )
1721 return false;
1722 }
1723
1724 return true;
1725}
1726
1727bool wxFileName::MakeRelativeTo(const wxString& pathBase, wxPathFormat format)
1728{
1729 wxFileName fnBase = wxFileName::DirName(pathBase, format);
1730
1731 // get cwd only once - small time saving
1732 wxString cwd = wxGetCwd();
1733 Normalize(wxPATH_NORM_ALL & ~wxPATH_NORM_CASE, cwd, format);
1734 fnBase.Normalize(wxPATH_NORM_ALL & ~wxPATH_NORM_CASE, cwd, format);
1735
1736 bool withCase = IsCaseSensitive(format);
1737
1738 // we can't do anything if the files live on different volumes
1739 if ( !GetVolume().IsSameAs(fnBase.GetVolume(), withCase) )
1740 {
1741 // nothing done
1742 return false;
1743 }
1744
1745 // same drive, so we don't need our volume
1746 m_volume.clear();
1747
1748 // remove common directories starting at the top
1749 while ( !m_dirs.IsEmpty() && !fnBase.m_dirs.IsEmpty() &&
1750 m_dirs[0u].IsSameAs(fnBase.m_dirs[0u], withCase) )
1751 {
1752 m_dirs.RemoveAt(0);
1753 fnBase.m_dirs.RemoveAt(0);
1754 }
1755
1756 // add as many ".." as needed
1757 size_t count = fnBase.m_dirs.GetCount();
1758 for ( size_t i = 0; i < count; i++ )
1759 {
1760 m_dirs.Insert(wxT(".."), 0u);
1761 }
1762
1763 if ( format == wxPATH_UNIX || format == wxPATH_DOS )
1764 {
1765 // a directory made relative with respect to itself is '.' under Unix
1766 // and DOS, by definition (but we don't have to insert "./" for the
1767 // files)
1768 if ( m_dirs.IsEmpty() && IsDir() )
1769 {
1770 m_dirs.Add(wxT('.'));
1771 }
1772 }
1773
1774 m_relative = true;
1775
1776 // we were modified
1777 return true;
1778}
1779
1780// ----------------------------------------------------------------------------
1781// filename kind tests
1782// ----------------------------------------------------------------------------
1783
1784bool wxFileName::SameAs(const wxFileName& filepath, wxPathFormat format) const
1785{
1786 wxFileName fn1 = *this,
1787 fn2 = filepath;
1788
1789 // get cwd only once - small time saving
1790 wxString cwd = wxGetCwd();
1791 fn1.Normalize(wxPATH_NORM_ALL | wxPATH_NORM_CASE, cwd, format);
1792 fn2.Normalize(wxPATH_NORM_ALL | wxPATH_NORM_CASE, cwd, format);
1793
1794 if ( fn1.GetFullPath() == fn2.GetFullPath() )
1795 return true;
1796
1797#if defined(__UNIX__)
1798 wxStructStat st1, st2;
1799 if ( wxStat(fn1.GetFullPath(), &st1) == 0 &&
1800 wxStat(fn2.GetFullPath(), &st2) == 0 )
1801 {
1802 if ( st1.st_ino == st2.st_ino && st1.st_dev == st2.st_dev )
1803 return true;
1804 }
1805 //else: It's not an error if one or both files don't exist.
1806#endif // defined __UNIX__
1807
1808 return false;
1809}
1810
1811/* static */
1812bool wxFileName::IsCaseSensitive( wxPathFormat format )
1813{
1814 // only Unix filenames are truely case-sensitive
1815 return GetFormat(format) == wxPATH_UNIX;
1816}
1817
1818/* static */
1819wxString wxFileName::GetForbiddenChars(wxPathFormat format)
1820{
1821 // Inits to forbidden characters that are common to (almost) all platforms.
1822 wxString strForbiddenChars = wxT("*?");
1823
1824 // If asserts, wxPathFormat has been changed. In case of a new path format
1825 // addition, the following code might have to be updated.
1826 wxCOMPILE_TIME_ASSERT(wxPATH_MAX == 5, wxPathFormatChanged);
1827 switch ( GetFormat(format) )
1828 {
1829 default :
1830 wxFAIL_MSG( wxT("Unknown path format") );
1831 // !! Fall through !!
1832
1833 case wxPATH_UNIX:
1834 break;
1835
1836 case wxPATH_MAC:
1837 // On a Mac even names with * and ? are allowed (Tested with OS
1838 // 9.2.1 and OS X 10.2.5)
1839 strForbiddenChars = wxEmptyString;
1840 break;
1841
1842 case wxPATH_DOS:
1843 strForbiddenChars += wxT("\\/:\"<>|");
1844 break;
1845
1846 case wxPATH_VMS:
1847 break;
1848 }
1849
1850 return strForbiddenChars;
1851}
1852
1853/* static */
1854wxString wxFileName::GetVolumeSeparator(wxPathFormat WXUNUSED_IN_WINCE(format))
1855{
1856#ifdef __WXWINCE__
1857 return wxEmptyString;
1858#else
1859 wxString sepVol;
1860
1861 if ( (GetFormat(format) == wxPATH_DOS) ||
1862 (GetFormat(format) == wxPATH_VMS) )
1863 {
1864 sepVol = wxFILE_SEP_DSK;
1865 }
1866 //else: leave empty
1867
1868 return sepVol;
1869#endif
1870}
1871
1872/* static */
1873wxString wxFileName::GetPathSeparators(wxPathFormat format)
1874{
1875 wxString seps;
1876 switch ( GetFormat(format) )
1877 {
1878 case wxPATH_DOS:
1879 // accept both as native APIs do but put the native one first as
1880 // this is the one we use in GetFullPath()
1881 seps << wxFILE_SEP_PATH_DOS << wxFILE_SEP_PATH_UNIX;
1882 break;
1883
1884 default:
1885 wxFAIL_MSG( wxT("Unknown wxPATH_XXX style") );
1886 // fall through
1887
1888 case wxPATH_UNIX:
1889 seps = wxFILE_SEP_PATH_UNIX;
1890 break;
1891
1892 case wxPATH_MAC:
1893 seps = wxFILE_SEP_PATH_MAC;
1894 break;
1895
1896 case wxPATH_VMS:
1897 seps = wxFILE_SEP_PATH_VMS;
1898 break;
1899 }
1900
1901 return seps;
1902}
1903
1904/* static */
1905wxString wxFileName::GetPathTerminators(wxPathFormat format)
1906{
1907 format = GetFormat(format);
1908
1909 // under VMS the end of the path is ']', not the path separator used to
1910 // separate the components
1911 return format == wxPATH_VMS ? wxString(wxT(']')) : GetPathSeparators(format);
1912}
1913
1914/* static */
1915bool wxFileName::IsPathSeparator(wxChar ch, wxPathFormat format)
1916{
1917 // wxString::Find() doesn't work as expected with NUL - it will always find
1918 // it, so test for it separately
1919 return ch != wxT('\0') && GetPathSeparators(format).Find(ch) != wxNOT_FOUND;
1920}
1921
1922/* static */
1923bool
1924wxFileName::IsMSWUniqueVolumeNamePath(const wxString& path, wxPathFormat format)
1925{
1926 // return true if the format used is the DOS/Windows one and the string begins
1927 // with a Windows unique volume name ("\\?\Volume{guid}\")
1928 return format == wxPATH_DOS &&
1929 path.length() >= wxMSWUniqueVolumePrefixLength &&
1930 path.StartsWith(wxS("\\\\?\\Volume{")) &&
1931 path[wxMSWUniqueVolumePrefixLength - 1] == wxFILE_SEP_PATH_DOS;
1932}
1933
1934// ----------------------------------------------------------------------------
1935// path components manipulation
1936// ----------------------------------------------------------------------------
1937
1938/* static */ bool wxFileName::IsValidDirComponent(const wxString& dir)
1939{
1940 if ( dir.empty() )
1941 {
1942 wxFAIL_MSG( wxT("empty directory passed to wxFileName::InsertDir()") );
1943
1944 return false;
1945 }
1946
1947 const size_t len = dir.length();
1948 for ( size_t n = 0; n < len; n++ )
1949 {
1950 if ( dir[n] == GetVolumeSeparator() || IsPathSeparator(dir[n]) )
1951 {
1952 wxFAIL_MSG( wxT("invalid directory component in wxFileName") );
1953
1954 return false;
1955 }
1956 }
1957
1958 return true;
1959}
1960
1961void wxFileName::AppendDir( const wxString& dir )
1962{
1963 if ( IsValidDirComponent(dir) )
1964 m_dirs.Add( dir );
1965}
1966
1967void wxFileName::PrependDir( const wxString& dir )
1968{
1969 InsertDir(0, dir);
1970}
1971
1972void wxFileName::InsertDir(size_t before, const wxString& dir)
1973{
1974 if ( IsValidDirComponent(dir) )
1975 m_dirs.Insert(dir, before);
1976}
1977
1978void wxFileName::RemoveDir(size_t pos)
1979{
1980 m_dirs.RemoveAt(pos);
1981}
1982
1983// ----------------------------------------------------------------------------
1984// accessors
1985// ----------------------------------------------------------------------------
1986
1987void wxFileName::SetFullName(const wxString& fullname)
1988{
1989 SplitPath(fullname, NULL /* no volume */, NULL /* no path */,
1990 &m_name, &m_ext, &m_hasExt);
1991}
1992
1993wxString wxFileName::GetFullName() const
1994{
1995 wxString fullname = m_name;
1996 if ( m_hasExt )
1997 {
1998 fullname << wxFILE_SEP_EXT << m_ext;
1999 }
2000
2001 return fullname;
2002}
2003
2004wxString wxFileName::GetPath( int flags, wxPathFormat format ) const
2005{
2006 format = GetFormat( format );
2007
2008 wxString fullpath;
2009
2010 // return the volume with the path as well if requested
2011 if ( flags & wxPATH_GET_VOLUME )
2012 {
2013 fullpath += wxGetVolumeString(GetVolume(), format);
2014 }
2015
2016 // the leading character
2017 switch ( format )
2018 {
2019 case wxPATH_MAC:
2020 if ( m_relative )
2021 fullpath += wxFILE_SEP_PATH_MAC;
2022 break;
2023
2024 case wxPATH_DOS:
2025 if ( !m_relative )
2026 fullpath += wxFILE_SEP_PATH_DOS;
2027 break;
2028
2029 default:
2030 wxFAIL_MSG( wxT("Unknown path format") );
2031 // fall through
2032
2033 case wxPATH_UNIX:
2034 if ( !m_relative )
2035 {
2036 fullpath += wxFILE_SEP_PATH_UNIX;
2037 }
2038 break;
2039
2040 case wxPATH_VMS:
2041 // no leading character here but use this place to unset
2042 // wxPATH_GET_SEPARATOR flag: under VMS it doesn't make sense
2043 // as, if I understand correctly, there should never be a dot
2044 // before the closing bracket
2045 flags &= ~wxPATH_GET_SEPARATOR;
2046 }
2047
2048 if ( m_dirs.empty() )
2049 {
2050 // there is nothing more
2051 return fullpath;
2052 }
2053
2054 // then concatenate all the path components using the path separator
2055 if ( format == wxPATH_VMS )
2056 {
2057 fullpath += wxT('[');
2058 }
2059
2060 const size_t dirCount = m_dirs.GetCount();
2061 for ( size_t i = 0; i < dirCount; i++ )
2062 {
2063 switch (format)
2064 {
2065 case wxPATH_MAC:
2066 if ( m_dirs[i] == wxT(".") )
2067 {
2068 // skip appending ':', this shouldn't be done in this
2069 // case as "::" is interpreted as ".." under Unix
2070 continue;
2071 }
2072
2073 // convert back from ".." to nothing
2074 if ( !m_dirs[i].IsSameAs(wxT("..")) )
2075 fullpath += m_dirs[i];
2076 break;
2077
2078 default:
2079 wxFAIL_MSG( wxT("Unexpected path format") );
2080 // still fall through
2081
2082 case wxPATH_DOS:
2083 case wxPATH_UNIX:
2084 fullpath += m_dirs[i];
2085 break;
2086
2087 case wxPATH_VMS:
2088 // TODO: What to do with ".." under VMS
2089
2090 // convert back from ".." to nothing
2091 if ( !m_dirs[i].IsSameAs(wxT("..")) )
2092 fullpath += m_dirs[i];
2093 break;
2094 }
2095
2096 if ( (flags & wxPATH_GET_SEPARATOR) || (i != dirCount - 1) )
2097 fullpath += GetPathSeparator(format);
2098 }
2099
2100 if ( format == wxPATH_VMS )
2101 {
2102 fullpath += wxT(']');
2103 }
2104
2105 return fullpath;
2106}
2107
2108wxString wxFileName::GetFullPath( wxPathFormat format ) const
2109{
2110 // we already have a function to get the path
2111 wxString fullpath = GetPath(wxPATH_GET_VOLUME | wxPATH_GET_SEPARATOR,
2112 format);
2113
2114 // now just add the file name and extension to it
2115 fullpath += GetFullName();
2116
2117 return fullpath;
2118}
2119
2120// Return the short form of the path (returns identity on non-Windows platforms)
2121wxString wxFileName::GetShortPath() const
2122{
2123 wxString path(GetFullPath());
2124
2125#if defined(__WINDOWS__) && defined(__WIN32__) && !defined(__WXMICROWIN__) && !defined(__WXWINCE__)
2126 DWORD sz = ::GetShortPathName(path.t_str(), NULL, 0);
2127 if ( sz != 0 )
2128 {
2129 wxString pathOut;
2130 if ( ::GetShortPathName
2131 (
2132 path.t_str(),
2133 wxStringBuffer(pathOut, sz),
2134 sz
2135 ) != 0 )
2136 {
2137 return pathOut;
2138 }
2139 }
2140#endif // Windows
2141
2142 return path;
2143}
2144
2145// Return the long form of the path (returns identity on non-Windows platforms)
2146wxString wxFileName::GetLongPath() const
2147{
2148 wxString pathOut,
2149 path = GetFullPath();
2150
2151#if defined(__WIN32__) && !defined(__WXWINCE__) && !defined(__WXMICROWIN__)
2152
2153#if wxUSE_DYNLIB_CLASS
2154 typedef DWORD (WINAPI *GET_LONG_PATH_NAME)(const wxChar *, wxChar *, DWORD);
2155
2156 // this is MT-safe as in the worst case we're going to resolve the function
2157 // twice -- but as the result is the same in both threads, it's ok
2158 static GET_LONG_PATH_NAME s_pfnGetLongPathName = NULL;
2159 if ( !s_pfnGetLongPathName )
2160 {
2161 static bool s_triedToLoad = false;
2162
2163 if ( !s_triedToLoad )
2164 {
2165 s_triedToLoad = true;
2166
2167 wxDynamicLibrary dllKernel(wxT("kernel32"));
2168
2169 const wxChar* GetLongPathName = wxT("GetLongPathName")
2170#if wxUSE_UNICODE
2171 wxT("W");
2172#else // ANSI
2173 wxT("A");
2174#endif // Unicode/ANSI
2175
2176 if ( dllKernel.HasSymbol(GetLongPathName) )
2177 {
2178 s_pfnGetLongPathName = (GET_LONG_PATH_NAME)
2179 dllKernel.GetSymbol(GetLongPathName);
2180 }
2181
2182 // note that kernel32.dll can be unloaded, it stays in memory
2183 // anyhow as all Win32 programs link to it and so it's safe to call
2184 // GetLongPathName() even after unloading it
2185 }
2186 }
2187
2188 if ( s_pfnGetLongPathName )
2189 {
2190 DWORD dwSize = (*s_pfnGetLongPathName)(path.t_str(), NULL, 0);
2191 if ( dwSize > 0 )
2192 {
2193 if ( (*s_pfnGetLongPathName)
2194 (
2195 path.t_str(),
2196 wxStringBuffer(pathOut, dwSize),
2197 dwSize
2198 ) != 0 )
2199 {
2200 return pathOut;
2201 }
2202 }
2203 }
2204#endif // wxUSE_DYNLIB_CLASS
2205
2206 // The OS didn't support GetLongPathName, or some other error.
2207 // We need to call FindFirstFile on each component in turn.
2208
2209 WIN32_FIND_DATA findFileData;
2210 HANDLE hFind;
2211
2212 if ( HasVolume() )
2213 pathOut = GetVolume() +
2214 GetVolumeSeparator(wxPATH_DOS) +
2215 GetPathSeparator(wxPATH_DOS);
2216 else
2217 pathOut = wxEmptyString;
2218
2219 wxArrayString dirs = GetDirs();
2220 dirs.Add(GetFullName());
2221
2222 wxString tmpPath;
2223
2224 size_t count = dirs.GetCount();
2225 for ( size_t i = 0; i < count; i++ )
2226 {
2227 const wxString& dir = dirs[i];
2228
2229 // We're using pathOut to collect the long-name path, but using a
2230 // temporary for appending the last path component which may be
2231 // short-name
2232 tmpPath = pathOut + dir;
2233
2234 // We must not process "." or ".." here as they would be (unexpectedly)
2235 // replaced by the corresponding directory names so just leave them
2236 // alone
2237 //
2238 // And we can't pass a drive and root dir to FindFirstFile (VZ: why?)
2239 if ( tmpPath.empty() || dir == '.' || dir == ".." ||
2240 tmpPath.Last() == GetVolumeSeparator(wxPATH_DOS) )
2241 {
2242 tmpPath += wxFILE_SEP_PATH;
2243 pathOut = tmpPath;
2244 continue;
2245 }
2246
2247 hFind = ::FindFirstFile(tmpPath.t_str(), &findFileData);
2248 if (hFind == INVALID_HANDLE_VALUE)
2249 {
2250 // Error: most likely reason is that path doesn't exist, so
2251 // append any unprocessed parts and return
2252 for ( i += 1; i < count; i++ )
2253 tmpPath += wxFILE_SEP_PATH + dirs[i];
2254
2255 return tmpPath;
2256 }
2257
2258 pathOut += findFileData.cFileName;
2259 if ( (i < (count-1)) )
2260 pathOut += wxFILE_SEP_PATH;
2261
2262 ::FindClose(hFind);
2263 }
2264#else // !Win32
2265 pathOut = path;
2266#endif // Win32/!Win32
2267
2268 return pathOut;
2269}
2270
2271wxPathFormat wxFileName::GetFormat( wxPathFormat format )
2272{
2273 if (format == wxPATH_NATIVE)
2274 {
2275#if defined(__WINDOWS__) || defined(__OS2__) || defined(__DOS__)
2276 format = wxPATH_DOS;
2277#elif defined(__VMS)
2278 format = wxPATH_VMS;
2279#else
2280 format = wxPATH_UNIX;
2281#endif
2282 }
2283 return format;
2284}
2285
2286#ifdef wxHAS_FILESYSTEM_VOLUMES
2287
2288/* static */
2289wxString wxFileName::GetVolumeString(char drive, int flags)
2290{
2291 wxASSERT_MSG( !(flags & ~wxPATH_GET_SEPARATOR), "invalid flag specified" );
2292
2293 wxString vol(drive);
2294 vol += wxFILE_SEP_DSK;
2295 if ( flags & wxPATH_GET_SEPARATOR )
2296 vol += wxFILE_SEP_PATH;
2297
2298 return vol;
2299}
2300
2301#endif // wxHAS_FILESYSTEM_VOLUMES
2302
2303// ----------------------------------------------------------------------------
2304// path splitting function
2305// ----------------------------------------------------------------------------
2306
2307/* static */
2308void
2309wxFileName::SplitVolume(const wxString& fullpathWithVolume,
2310 wxString *pstrVolume,
2311 wxString *pstrPath,
2312 wxPathFormat format)
2313{
2314 format = GetFormat(format);
2315
2316 wxString fullpath = fullpathWithVolume;
2317
2318 if ( IsMSWUniqueVolumeNamePath(fullpath, format) )
2319 {
2320 // special Windows unique volume names hack: transform
2321 // \\?\Volume{guid}\path into Volume{guid}:path
2322 // note: this check must be done before the check for UNC path
2323
2324 // we know the last backslash from the unique volume name is located
2325 // there from IsMSWUniqueVolumeNamePath
2326 fullpath[wxMSWUniqueVolumePrefixLength - 1] = wxFILE_SEP_DSK;
2327
2328 // paths starting with a unique volume name should always be absolute
2329 fullpath.insert(wxMSWUniqueVolumePrefixLength, 1, wxFILE_SEP_PATH_DOS);
2330
2331 // remove the leading "\\?\" part
2332 fullpath.erase(0, 4);
2333 }
2334 else if ( IsUNCPath(fullpath, format) )
2335 {
2336 // special Windows UNC paths hack: transform \\share\path into share:path
2337
2338 fullpath.erase(0, 2);
2339
2340 size_t posFirstSlash =
2341 fullpath.find_first_of(GetPathTerminators(format));
2342 if ( posFirstSlash != wxString::npos )
2343 {
2344 fullpath[posFirstSlash] = wxFILE_SEP_DSK;
2345
2346 // UNC paths are always absolute, right? (FIXME)
2347 fullpath.insert(posFirstSlash + 1, 1, wxFILE_SEP_PATH_DOS);
2348 }
2349 }
2350
2351 // We separate the volume here
2352 if ( format == wxPATH_DOS || format == wxPATH_VMS )
2353 {
2354 wxString sepVol = GetVolumeSeparator(format);
2355
2356 // we have to exclude the case of a colon in the very beginning of the
2357 // string as it can't be a volume separator (nor can this be a valid
2358 // DOS file name at all but we'll leave dealing with this to our caller)
2359 size_t posFirstColon = fullpath.find_first_of(sepVol);
2360 if ( posFirstColon && posFirstColon != wxString::npos )
2361 {
2362 if ( pstrVolume )
2363 {
2364 *pstrVolume = fullpath.Left(posFirstColon);
2365 }
2366
2367 // remove the volume name and the separator from the full path
2368 fullpath.erase(0, posFirstColon + sepVol.length());
2369 }
2370 }
2371
2372 if ( pstrPath )
2373 *pstrPath = fullpath;
2374}
2375
2376/* static */
2377void wxFileName::SplitPath(const wxString& fullpathWithVolume,
2378 wxString *pstrVolume,
2379 wxString *pstrPath,
2380 wxString *pstrName,
2381 wxString *pstrExt,
2382 bool *hasExt,
2383 wxPathFormat format)
2384{
2385 format = GetFormat(format);
2386
2387 wxString fullpath;
2388 SplitVolume(fullpathWithVolume, pstrVolume, &fullpath, format);
2389
2390 // find the positions of the last dot and last path separator in the path
2391 size_t posLastDot = fullpath.find_last_of(wxFILE_SEP_EXT);
2392 size_t posLastSlash = fullpath.find_last_of(GetPathTerminators(format));
2393
2394 // check whether this dot occurs at the very beginning of a path component
2395 if ( (posLastDot != wxString::npos) &&
2396 (posLastDot == 0 ||
2397 IsPathSeparator(fullpath[posLastDot - 1]) ||
2398 (format == wxPATH_VMS && fullpath[posLastDot - 1] == wxT(']'))) )
2399 {
2400 // dot may be (and commonly -- at least under Unix -- is) the first
2401 // character of the filename, don't treat the entire filename as
2402 // extension in this case
2403 posLastDot = wxString::npos;
2404 }
2405
2406 // if we do have a dot and a slash, check that the dot is in the name part
2407 if ( (posLastDot != wxString::npos) &&
2408 (posLastSlash != wxString::npos) &&
2409 (posLastDot < posLastSlash) )
2410 {
2411 // the dot is part of the path, not the start of the extension
2412 posLastDot = wxString::npos;
2413 }
2414
2415 // now fill in the variables provided by user
2416 if ( pstrPath )
2417 {
2418 if ( posLastSlash == wxString::npos )
2419 {
2420 // no path at all
2421 pstrPath->Empty();
2422 }
2423 else
2424 {
2425 // take everything up to the path separator but take care to make
2426 // the path equal to something like '/', not empty, for the files
2427 // immediately under root directory
2428 size_t len = posLastSlash;
2429
2430 // this rule does not apply to mac since we do not start with colons (sep)
2431 // except for relative paths
2432 if ( !len && format != wxPATH_MAC)
2433 len++;
2434
2435 *pstrPath = fullpath.Left(len);
2436
2437 // special VMS hack: remove the initial bracket
2438 if ( format == wxPATH_VMS )
2439 {
2440 if ( (*pstrPath)[0u] == wxT('[') )
2441 pstrPath->erase(0, 1);
2442 }
2443 }
2444 }
2445
2446 if ( pstrName )
2447 {
2448 // take all characters starting from the one after the last slash and
2449 // up to, but excluding, the last dot
2450 size_t nStart = posLastSlash == wxString::npos ? 0 : posLastSlash + 1;
2451 size_t count;
2452 if ( posLastDot == wxString::npos )
2453 {
2454 // take all until the end
2455 count = wxString::npos;
2456 }
2457 else if ( posLastSlash == wxString::npos )
2458 {
2459 count = posLastDot;
2460 }
2461 else // have both dot and slash
2462 {
2463 count = posLastDot - posLastSlash - 1;
2464 }
2465
2466 *pstrName = fullpath.Mid(nStart, count);
2467 }
2468
2469 // finally deal with the extension here: we have an added complication that
2470 // extension may be empty (but present) as in "foo." where trailing dot
2471 // indicates the empty extension at the end -- and hence we must remember
2472 // that we have it independently of pstrExt
2473 if ( posLastDot == wxString::npos )
2474 {
2475 // no extension
2476 if ( pstrExt )
2477 pstrExt->clear();
2478 if ( hasExt )
2479 *hasExt = false;
2480 }
2481 else
2482 {
2483 // take everything after the dot
2484 if ( pstrExt )
2485 *pstrExt = fullpath.Mid(posLastDot + 1);
2486 if ( hasExt )
2487 *hasExt = true;
2488 }
2489}
2490
2491/* static */
2492void wxFileName::SplitPath(const wxString& fullpath,
2493 wxString *path,
2494 wxString *name,
2495 wxString *ext,
2496 wxPathFormat format)
2497{
2498 wxString volume;
2499 SplitPath(fullpath, &volume, path, name, ext, format);
2500
2501 if ( path )
2502 {
2503 path->Prepend(wxGetVolumeString(volume, format));
2504 }
2505}
2506
2507/* static */
2508wxString wxFileName::StripExtension(const wxString& fullpath)
2509{
2510 wxFileName fn(fullpath);
2511 fn.SetExt("");
2512 return fn.GetFullPath();
2513}
2514
2515// ----------------------------------------------------------------------------
2516// time functions
2517// ----------------------------------------------------------------------------
2518
2519#if wxUSE_DATETIME
2520
2521bool wxFileName::SetTimes(const wxDateTime *dtAccess,
2522 const wxDateTime *dtMod,
2523 const wxDateTime *dtCreate) const
2524{
2525#if defined(__WIN32__)
2526 FILETIME ftAccess, ftCreate, ftWrite;
2527
2528 if ( dtCreate )
2529 ConvertWxToFileTime(&ftCreate, *dtCreate);
2530 if ( dtAccess )
2531 ConvertWxToFileTime(&ftAccess, *dtAccess);
2532 if ( dtMod )
2533 ConvertWxToFileTime(&ftWrite, *dtMod);
2534
2535 wxString path;
2536 int flags;
2537 if ( IsDir() )
2538 {
2539 if ( wxGetOsVersion() == wxOS_WINDOWS_9X )
2540 {
2541 wxLogError(_("Setting directory access times is not supported "
2542 "under this OS version"));
2543 return false;
2544 }
2545
2546 path = GetPath();
2547 flags = FILE_FLAG_BACKUP_SEMANTICS;
2548 }
2549 else // file
2550 {
2551 path = GetFullPath();
2552 flags = 0;
2553 }
2554
2555 wxFileHandle fh(path, wxFileHandle::WriteAttr, flags);
2556 if ( fh.IsOk() )
2557 {
2558 if ( ::SetFileTime(fh,
2559 dtCreate ? &ftCreate : NULL,
2560 dtAccess ? &ftAccess : NULL,
2561 dtMod ? &ftWrite : NULL) )
2562 {
2563 return true;
2564 }
2565 }
2566#elif defined(__UNIX_LIKE__) || (defined(__DOS__) && defined(__WATCOMC__))
2567 wxUnusedVar(dtCreate);
2568
2569 if ( !dtAccess && !dtMod )
2570 {
2571 // can't modify the creation time anyhow, don't try
2572 return true;
2573 }
2574
2575 // if dtAccess or dtMod is not specified, use the other one (which must be
2576 // non NULL because of the test above) for both times
2577 utimbuf utm;
2578 utm.actime = dtAccess ? dtAccess->GetTicks() : dtMod->GetTicks();
2579 utm.modtime = dtMod ? dtMod->GetTicks() : dtAccess->GetTicks();
2580 if ( utime(GetFullPath().fn_str(), &utm) == 0 )
2581 {
2582 return true;
2583 }
2584#else // other platform
2585 wxUnusedVar(dtAccess);
2586 wxUnusedVar(dtMod);
2587 wxUnusedVar(dtCreate);
2588#endif // platforms
2589
2590 wxLogSysError(_("Failed to modify file times for '%s'"),
2591 GetFullPath().c_str());
2592
2593 return false;
2594}
2595
2596bool wxFileName::Touch() const
2597{
2598#if defined(__UNIX_LIKE__)
2599 // under Unix touching file is simple: just pass NULL to utime()
2600 if ( utime(GetFullPath().fn_str(), NULL) == 0 )
2601 {
2602 return true;
2603 }
2604
2605 wxLogSysError(_("Failed to touch the file '%s'"), GetFullPath().c_str());
2606
2607 return false;
2608#else // other platform
2609 wxDateTime dtNow = wxDateTime::Now();
2610
2611 return SetTimes(&dtNow, &dtNow, NULL /* don't change create time */);
2612#endif // platforms
2613}
2614
2615bool wxFileName::GetTimes(wxDateTime *dtAccess,
2616 wxDateTime *dtMod,
2617 wxDateTime *dtCreate) const
2618{
2619#if defined(__WIN32__)
2620 // we must use different methods for the files and directories under
2621 // Windows as CreateFile(GENERIC_READ) doesn't work for the directories and
2622 // CreateFile(FILE_FLAG_BACKUP_SEMANTICS) works -- but only under NT and
2623 // not 9x
2624 bool ok;
2625 FILETIME ftAccess, ftCreate, ftWrite;
2626 if ( IsDir() )
2627 {
2628 // implemented in msw/dir.cpp
2629 extern bool wxGetDirectoryTimes(const wxString& dirname,
2630 FILETIME *, FILETIME *, FILETIME *);
2631
2632 // we should pass the path without the trailing separator to
2633 // wxGetDirectoryTimes()
2634 ok = wxGetDirectoryTimes(GetPath(wxPATH_GET_VOLUME),
2635 &ftAccess, &ftCreate, &ftWrite);
2636 }
2637 else // file
2638 {
2639 wxFileHandle fh(GetFullPath(), wxFileHandle::ReadAttr);
2640 if ( fh.IsOk() )
2641 {
2642 ok = ::GetFileTime(fh,
2643 dtCreate ? &ftCreate : NULL,
2644 dtAccess ? &ftAccess : NULL,
2645 dtMod ? &ftWrite : NULL) != 0;
2646 }
2647 else
2648 {
2649 ok = false;
2650 }
2651 }
2652
2653 if ( ok )
2654 {
2655 if ( dtCreate )
2656 ConvertFileTimeToWx(dtCreate, ftCreate);
2657 if ( dtAccess )
2658 ConvertFileTimeToWx(dtAccess, ftAccess);
2659 if ( dtMod )
2660 ConvertFileTimeToWx(dtMod, ftWrite);
2661
2662 return true;
2663 }
2664#elif defined(__UNIX_LIKE__) || defined(__WXMAC__) || defined(__OS2__) || (defined(__DOS__) && defined(__WATCOMC__))
2665 // no need to test for IsDir() here
2666 wxStructStat stBuf;
2667 if ( wxStat( GetFullPath(), &stBuf) == 0 )
2668 {
2669 // Android defines st_*time fields as unsigned long, but time_t as long,
2670 // hence the static_casts.
2671 if ( dtAccess )
2672 dtAccess->Set(static_cast<time_t>(stBuf.st_atime));
2673 if ( dtMod )
2674 dtMod->Set(static_cast<time_t>(stBuf.st_mtime));
2675 if ( dtCreate )
2676 dtCreate->Set(static_cast<time_t>(stBuf.st_ctime));
2677
2678 return true;
2679 }
2680#else // other platform
2681 wxUnusedVar(dtAccess);
2682 wxUnusedVar(dtMod);
2683 wxUnusedVar(dtCreate);
2684#endif // platforms
2685
2686 wxLogSysError(_("Failed to retrieve file times for '%s'"),
2687 GetFullPath().c_str());
2688
2689 return false;
2690}
2691
2692#endif // wxUSE_DATETIME
2693
2694
2695// ----------------------------------------------------------------------------
2696// file size functions
2697// ----------------------------------------------------------------------------
2698
2699#if wxUSE_LONGLONG
2700
2701/* static */
2702wxULongLong wxFileName::GetSize(const wxString &filename)
2703{
2704 if (!wxFileExists(filename))
2705 return wxInvalidSize;
2706
2707#if defined(__WIN32__)
2708 wxFileHandle f(filename, wxFileHandle::ReadAttr);
2709 if (!f.IsOk())
2710 return wxInvalidSize;
2711
2712 DWORD lpFileSizeHigh;
2713 DWORD ret = GetFileSize(f, &lpFileSizeHigh);
2714 if ( ret == INVALID_FILE_SIZE && ::GetLastError() != NO_ERROR )
2715 return wxInvalidSize;
2716
2717 return wxULongLong(lpFileSizeHigh, ret);
2718#else // ! __WIN32__
2719 wxStructStat st;
2720 if (wxStat( filename, &st) != 0)
2721 return wxInvalidSize;
2722 return wxULongLong(st.st_size);
2723#endif
2724}
2725
2726/* static */
2727wxString wxFileName::GetHumanReadableSize(const wxULongLong &bs,
2728 const wxString &nullsize,
2729 int precision,
2730 wxSizeConvention conv)
2731{
2732 // deal with trivial case first
2733 if ( bs == 0 || bs == wxInvalidSize )
2734 return nullsize;
2735
2736 // depending on the convention used the multiplier may be either 1000 or
2737 // 1024 and the binary infix may be empty (for "KB") or "i" (for "KiB")
2738 double multiplier = 1024.;
2739 wxString biInfix;
2740
2741 switch ( conv )
2742 {
2743 case wxSIZE_CONV_TRADITIONAL:
2744 // nothing to do, this corresponds to the default values of both
2745 // the multiplier and infix string
2746 break;
2747
2748 case wxSIZE_CONV_IEC:
2749 biInfix = "i";
2750 break;
2751
2752 case wxSIZE_CONV_SI:
2753 multiplier = 1000;
2754 break;
2755 }
2756
2757 const double kiloByteSize = multiplier;
2758 const double megaByteSize = multiplier * kiloByteSize;
2759 const double gigaByteSize = multiplier * megaByteSize;
2760 const double teraByteSize = multiplier * gigaByteSize;
2761
2762 const double bytesize = bs.ToDouble();
2763
2764 wxString result;
2765 if ( bytesize < kiloByteSize )
2766 result.Printf("%s B", bs.ToString());
2767 else if ( bytesize < megaByteSize )
2768 result.Printf("%.*f K%sB", precision, bytesize/kiloByteSize, biInfix);
2769 else if (bytesize < gigaByteSize)
2770 result.Printf("%.*f M%sB", precision, bytesize/megaByteSize, biInfix);
2771 else if (bytesize < teraByteSize)
2772 result.Printf("%.*f G%sB", precision, bytesize/gigaByteSize, biInfix);
2773 else
2774 result.Printf("%.*f T%sB", precision, bytesize/teraByteSize, biInfix);
2775
2776 return result;
2777}
2778
2779wxULongLong wxFileName::GetSize() const
2780{
2781 return GetSize(GetFullPath());
2782}
2783
2784wxString wxFileName::GetHumanReadableSize(const wxString& failmsg,
2785 int precision,
2786 wxSizeConvention conv) const
2787{
2788 return GetHumanReadableSize(GetSize(), failmsg, precision, conv);
2789}
2790
2791#endif // wxUSE_LONGLONG
2792
2793// ----------------------------------------------------------------------------
2794// Mac-specific functions
2795// ----------------------------------------------------------------------------
2796
2797#if defined( __WXOSX_MAC__ ) && wxOSX_USE_CARBON
2798
2799namespace
2800{
2801
2802class MacDefaultExtensionRecord
2803{
2804public:
2805 MacDefaultExtensionRecord()
2806 {
2807 m_type =
2808 m_creator = 0 ;
2809 }
2810
2811 // default copy ctor, assignment operator and dtor are ok
2812
2813 MacDefaultExtensionRecord(const wxString& ext, OSType type, OSType creator)
2814 : m_ext(ext)
2815 {
2816 m_type = type;
2817 m_creator = creator;
2818 }
2819
2820 wxString m_ext;
2821 OSType m_type;
2822 OSType m_creator;
2823};
2824
2825WX_DECLARE_OBJARRAY(MacDefaultExtensionRecord, MacDefaultExtensionArray);
2826
2827bool gMacDefaultExtensionsInited = false;
2828
2829#include "wx/arrimpl.cpp"
2830
2831WX_DEFINE_EXPORTED_OBJARRAY(MacDefaultExtensionArray);
2832
2833MacDefaultExtensionArray gMacDefaultExtensions;
2834
2835// load the default extensions
2836const MacDefaultExtensionRecord gDefaults[] =
2837{
2838 MacDefaultExtensionRecord( "txt", 'TEXT', 'ttxt' ),
2839 MacDefaultExtensionRecord( "tif", 'TIFF', '****' ),
2840 MacDefaultExtensionRecord( "jpg", 'JPEG', '****' ),
2841};
2842
2843void MacEnsureDefaultExtensionsLoaded()
2844{
2845 if ( !gMacDefaultExtensionsInited )
2846 {
2847 // we could load the pc exchange prefs here too
2848 for ( size_t i = 0 ; i < WXSIZEOF( gDefaults ) ; ++i )
2849 {
2850 gMacDefaultExtensions.Add( gDefaults[i] ) ;
2851 }
2852 gMacDefaultExtensionsInited = true;
2853 }
2854}
2855
2856} // anonymous namespace
2857
2858bool wxFileName::MacSetTypeAndCreator( wxUint32 type , wxUint32 creator )
2859{
2860 FSRef fsRef ;
2861 FSCatalogInfo catInfo;
2862 FileInfo *finfo ;
2863
2864 if ( wxMacPathToFSRef( GetFullPath() , &fsRef ) == noErr )
2865 {
2866 if ( FSGetCatalogInfo (&fsRef, kFSCatInfoFinderInfo, &catInfo, NULL, NULL, NULL) == noErr )
2867 {
2868 finfo = (FileInfo*)&catInfo.finderInfo;
2869 finfo->fileType = type ;
2870 finfo->fileCreator = creator ;
2871 FSSetCatalogInfo( &fsRef, kFSCatInfoFinderInfo, &catInfo ) ;
2872 return true ;
2873 }
2874 }
2875 return false ;
2876}
2877
2878bool wxFileName::MacGetTypeAndCreator( wxUint32 *type , wxUint32 *creator ) const
2879{
2880 FSRef fsRef ;
2881 FSCatalogInfo catInfo;
2882 FileInfo *finfo ;
2883
2884 if ( wxMacPathToFSRef( GetFullPath() , &fsRef ) == noErr )
2885 {
2886 if ( FSGetCatalogInfo (&fsRef, kFSCatInfoFinderInfo, &catInfo, NULL, NULL, NULL) == noErr )
2887 {
2888 finfo = (FileInfo*)&catInfo.finderInfo;
2889 *type = finfo->fileType ;
2890 *creator = finfo->fileCreator ;
2891 return true ;
2892 }
2893 }
2894 return false ;
2895}
2896
2897bool wxFileName::MacSetDefaultTypeAndCreator()
2898{
2899 wxUint32 type , creator ;
2900 if ( wxFileName::MacFindDefaultTypeAndCreator(GetExt() , &type ,
2901 &creator ) )
2902 {
2903 return MacSetTypeAndCreator( type , creator ) ;
2904 }
2905 return false;
2906}
2907
2908bool wxFileName::MacFindDefaultTypeAndCreator( const wxString& ext , wxUint32 *type , wxUint32 *creator )
2909{
2910 MacEnsureDefaultExtensionsLoaded() ;
2911 wxString extl = ext.Lower() ;
2912 for( int i = gMacDefaultExtensions.Count() - 1 ; i >= 0 ; --i )
2913 {
2914 if ( gMacDefaultExtensions.Item(i).m_ext == extl )
2915 {
2916 *type = gMacDefaultExtensions.Item(i).m_type ;
2917 *creator = gMacDefaultExtensions.Item(i).m_creator ;
2918 return true ;
2919 }
2920 }
2921 return false ;
2922}
2923
2924void wxFileName::MacRegisterDefaultTypeAndCreator( const wxString& ext , wxUint32 type , wxUint32 creator )
2925{
2926 MacEnsureDefaultExtensionsLoaded();
2927 MacDefaultExtensionRecord rec(ext.Lower(), type, creator);
2928 gMacDefaultExtensions.Add( rec );
2929}
2930
2931#endif // defined( __WXOSX_MAC__ ) && wxOSX_USE_CARBON