]>
Commit | Line | Data |
---|---|---|
1 | ///////////////////////////////////////////////////////////////////////////// | |
2 | // Name: src/common/filefn.cpp | |
3 | // Purpose: File- and directory-related functions | |
4 | // Author: Julian Smart | |
5 | // Modified by: | |
6 | // Created: 29/01/98 | |
7 | // Copyright: (c) 1998 Julian Smart | |
8 | // Licence: wxWindows licence | |
9 | ///////////////////////////////////////////////////////////////////////////// | |
10 | ||
11 | // ============================================================================ | |
12 | // declarations | |
13 | // ============================================================================ | |
14 | ||
15 | // ---------------------------------------------------------------------------- | |
16 | // headers | |
17 | // ---------------------------------------------------------------------------- | |
18 | ||
19 | // For compilers that support precompilation, includes "wx.h". | |
20 | #include "wx/wxprec.h" | |
21 | ||
22 | #ifdef __BORLANDC__ | |
23 | #pragma hdrstop | |
24 | #endif | |
25 | ||
26 | #include "wx/filefn.h" | |
27 | ||
28 | #ifndef WX_PRECOMP | |
29 | #include "wx/intl.h" | |
30 | #include "wx/log.h" | |
31 | #include "wx/utils.h" | |
32 | #include "wx/crt.h" | |
33 | #endif | |
34 | ||
35 | #include "wx/dynarray.h" | |
36 | #include "wx/file.h" | |
37 | #include "wx/filename.h" | |
38 | #include "wx/dir.h" | |
39 | ||
40 | #include "wx/tokenzr.h" | |
41 | ||
42 | // there are just too many of those... | |
43 | #ifdef __VISUALC__ | |
44 | #pragma warning(disable:4706) // assignment within conditional expression | |
45 | #endif // VC++ | |
46 | ||
47 | #include <ctype.h> | |
48 | #include <stdio.h> | |
49 | #include <stdlib.h> | |
50 | #include <string.h> | |
51 | #if !wxONLY_WATCOM_EARLIER_THAN(1,4) | |
52 | #if !(defined(_MSC_VER) && (_MSC_VER > 800)) | |
53 | #include <errno.h> | |
54 | #endif | |
55 | #endif | |
56 | ||
57 | #if defined(__WXMAC__) | |
58 | #include "wx/osx/private.h" // includes mac headers | |
59 | #endif | |
60 | ||
61 | #ifdef __WINDOWS__ | |
62 | #include "wx/msw/private.h" | |
63 | #include "wx/msw/missing.h" | |
64 | #include "wx/msw/mslu.h" | |
65 | ||
66 | // sys/cygwin.h is needed for cygwin_conv_to_full_win32_path() | |
67 | // and for cygwin_conv_path() | |
68 | // | |
69 | // note that it must be included after <windows.h> | |
70 | #ifdef __GNUWIN32__ | |
71 | #ifdef __CYGWIN__ | |
72 | #include <sys/cygwin.h> | |
73 | #include <cygwin/version.h> | |
74 | #endif | |
75 | #endif // __GNUWIN32__ | |
76 | ||
77 | // io.h is needed for _get_osfhandle() | |
78 | // Already included by filefn.h for many Windows compilers | |
79 | #if defined __CYGWIN__ | |
80 | #include <io.h> | |
81 | #endif | |
82 | #endif // __WINDOWS__ | |
83 | ||
84 | #if defined(__VMS__) | |
85 | #include <fab.h> | |
86 | #endif | |
87 | ||
88 | // TODO: Borland probably has _wgetcwd as well? | |
89 | #ifdef _MSC_VER | |
90 | #define HAVE_WGETCWD | |
91 | #endif | |
92 | ||
93 | // ---------------------------------------------------------------------------- | |
94 | // constants | |
95 | // ---------------------------------------------------------------------------- | |
96 | ||
97 | #ifndef _MAXPATHLEN | |
98 | #define _MAXPATHLEN 1024 | |
99 | #endif | |
100 | ||
101 | // ---------------------------------------------------------------------------- | |
102 | // private globals | |
103 | // ---------------------------------------------------------------------------- | |
104 | ||
105 | #if WXWIN_COMPATIBILITY_2_8 | |
106 | static wxChar wxFileFunctionsBuffer[4*_MAXPATHLEN]; | |
107 | #endif | |
108 | ||
109 | #if defined(__VISAGECPP__) && __IBMCPP__ >= 400 | |
110 | // | |
111 | // VisualAge C++ V4.0 cannot have any external linkage const decs | |
112 | // in headers included by more than one primary source | |
113 | // | |
114 | const int wxInvalidOffset = -1; | |
115 | #endif | |
116 | ||
117 | // ============================================================================ | |
118 | // implementation | |
119 | // ============================================================================ | |
120 | ||
121 | // ---------------------------------------------------------------------------- | |
122 | // wrappers around standard POSIX functions | |
123 | // ---------------------------------------------------------------------------- | |
124 | ||
125 | #if wxUSE_UNICODE && defined __BORLANDC__ \ | |
126 | && __BORLANDC__ >= 0x550 && __BORLANDC__ <= 0x551 | |
127 | ||
128 | // BCC 5.5 and 5.5.1 have a bug in _wopen where files are created read only | |
129 | // regardless of the mode parameter. This hack works around the problem by | |
130 | // setting the mode with _wchmod. | |
131 | // | |
132 | int wxCRT_OpenW(const wchar_t *pathname, int flags, mode_t mode) | |
133 | { | |
134 | int moreflags = 0; | |
135 | ||
136 | // we only want to fix the mode when the file is actually created, so | |
137 | // when creating first try doing it O_EXCL so we can tell if the file | |
138 | // was already there. | |
139 | if ((flags & O_CREAT) && !(flags & O_EXCL) && (mode & wxS_IWUSR) != 0) | |
140 | moreflags = O_EXCL; | |
141 | ||
142 | int fd = _wopen(pathname, flags | moreflags, mode); | |
143 | ||
144 | // the file was actually created and needs fixing | |
145 | if (fd != -1 && (flags & O_CREAT) != 0 && (mode & wxS_IWUSR) != 0) | |
146 | { | |
147 | close(fd); | |
148 | _wchmod(pathname, mode); | |
149 | fd = _wopen(pathname, flags & ~(O_EXCL | O_CREAT)); | |
150 | } | |
151 | // the open failed, but it may have been because the added O_EXCL stopped | |
152 | // the opening of an existing file, so try again without. | |
153 | else if (fd == -1 && moreflags != 0) | |
154 | { | |
155 | fd = _wopen(pathname, flags & ~O_CREAT); | |
156 | } | |
157 | ||
158 | return fd; | |
159 | } | |
160 | ||
161 | #endif | |
162 | ||
163 | // ---------------------------------------------------------------------------- | |
164 | // wxPathList | |
165 | // ---------------------------------------------------------------------------- | |
166 | ||
167 | bool wxPathList::Add(const wxString& path) | |
168 | { | |
169 | // add a path separator to force wxFileName to interpret it always as a directory | |
170 | // (i.e. if we are called with '/home/user' we want to consider it a folder and | |
171 | // not, as wxFileName would consider, a filename). | |
172 | wxFileName fn(path + wxFileName::GetPathSeparator()); | |
173 | ||
174 | // add only normalized relative/absolute paths | |
175 | // NB: we won't do wxPATH_NORM_DOTS in order to avoid problems when trying to | |
176 | // normalize paths which starts with ".." (which can be normalized only if | |
177 | // we use also wxPATH_NORM_ABSOLUTE - which we don't want to use). | |
178 | if (!fn.Normalize(wxPATH_NORM_TILDE|wxPATH_NORM_LONG|wxPATH_NORM_ENV_VARS)) | |
179 | return false; | |
180 | ||
181 | wxString toadd = fn.GetPath(); | |
182 | if (Index(toadd) == wxNOT_FOUND) | |
183 | wxArrayString::Add(toadd); // do not add duplicates | |
184 | ||
185 | return true; | |
186 | } | |
187 | ||
188 | void wxPathList::Add(const wxArrayString &arr) | |
189 | { | |
190 | for (size_t j=0; j < arr.GetCount(); j++) | |
191 | Add(arr[j]); | |
192 | } | |
193 | ||
194 | // Add paths e.g. from the PATH environment variable | |
195 | void wxPathList::AddEnvList (const wxString& WXUNUSED_IN_WINCE(envVariable)) | |
196 | { | |
197 | // No environment variables on WinCE | |
198 | #ifndef __WXWINCE__ | |
199 | ||
200 | // The space has been removed from the tokenizers, otherwise a | |
201 | // path such as "C:\Program Files" would be split into 2 paths: | |
202 | // "C:\Program" and "Files"; this is true for both Windows and Unix. | |
203 | ||
204 | static const wxChar PATH_TOKS[] = | |
205 | #if defined(__WINDOWS__) || defined(__OS2__) | |
206 | wxT(";"); // Don't separate with colon in DOS (used for drive) | |
207 | #else | |
208 | wxT(":;"); | |
209 | #endif | |
210 | ||
211 | wxString val; | |
212 | if ( wxGetEnv(envVariable, &val) ) | |
213 | { | |
214 | // split into an array of string the value of the env var | |
215 | wxArrayString arr = wxStringTokenize(val, PATH_TOKS); | |
216 | WX_APPEND_ARRAY(*this, arr); | |
217 | } | |
218 | #endif // !__WXWINCE__ | |
219 | } | |
220 | ||
221 | // Given a full filename (with path), ensure that that file can | |
222 | // be accessed again USING FILENAME ONLY by adding the path | |
223 | // to the list if not already there. | |
224 | bool wxPathList::EnsureFileAccessible (const wxString& path) | |
225 | { | |
226 | return Add(wxPathOnly(path)); | |
227 | } | |
228 | ||
229 | #if WXWIN_COMPATIBILITY_2_6 | |
230 | bool wxPathList::Member (const wxString& path) const | |
231 | { | |
232 | return Index(path) != wxNOT_FOUND; | |
233 | } | |
234 | #endif | |
235 | ||
236 | wxString wxPathList::FindValidPath (const wxString& file) const | |
237 | { | |
238 | // normalize the given string as it could be a path + a filename | |
239 | // and not only a filename | |
240 | wxFileName fn(file); | |
241 | wxString strend; | |
242 | ||
243 | // NB: normalize without making absolute otherwise calling this function with | |
244 | // e.g. "b/c.txt" would result in removing the directory 'b' and the for loop | |
245 | // below would only add to the paths of this list the 'c.txt' part when doing | |
246 | // the existence checks... | |
247 | // NB: we don't use wxPATH_NORM_DOTS here, too (see wxPathList::Add for more info) | |
248 | if (!fn.Normalize(wxPATH_NORM_TILDE|wxPATH_NORM_LONG|wxPATH_NORM_ENV_VARS)) | |
249 | return wxEmptyString; | |
250 | ||
251 | wxASSERT_MSG(!fn.IsDir(), wxT("Cannot search for directories; only for files")); | |
252 | if (fn.IsAbsolute()) | |
253 | strend = fn.GetFullName(); // search for the file name and ignore the path part | |
254 | else | |
255 | strend = fn.GetFullPath(); | |
256 | ||
257 | for (size_t i=0; i<GetCount(); i++) | |
258 | { | |
259 | wxString strstart = Item(i); | |
260 | if (!strstart.IsEmpty() && strstart.Last() != wxFileName::GetPathSeparator()) | |
261 | strstart += wxFileName::GetPathSeparator(); | |
262 | ||
263 | if (wxFileExists(strstart + strend)) | |
264 | return strstart + strend; // Found! | |
265 | } | |
266 | ||
267 | return wxEmptyString; // Not found | |
268 | } | |
269 | ||
270 | wxString wxPathList::FindAbsoluteValidPath (const wxString& file) const | |
271 | { | |
272 | wxString f = FindValidPath(file); | |
273 | if ( f.empty() || wxIsAbsolutePath(f) ) | |
274 | return f; | |
275 | ||
276 | wxString buf = ::wxGetCwd(); | |
277 | ||
278 | if ( !wxEndsWithPathSeparator(buf) ) | |
279 | { | |
280 | buf += wxFILE_SEP_PATH; | |
281 | } | |
282 | buf += f; | |
283 | ||
284 | return buf; | |
285 | } | |
286 | ||
287 | // ---------------------------------------------------------------------------- | |
288 | // miscellaneous global functions | |
289 | // ---------------------------------------------------------------------------- | |
290 | ||
291 | #if WXWIN_COMPATIBILITY_2_8 | |
292 | static inline wxChar* MYcopystring(const wxString& s) | |
293 | { | |
294 | wxChar* copy = new wxChar[s.length() + 1]; | |
295 | return wxStrcpy(copy, s.c_str()); | |
296 | } | |
297 | ||
298 | template<typename CharType> | |
299 | static inline CharType* MYcopystring(const CharType* s) | |
300 | { | |
301 | CharType* copy = new CharType[wxStrlen(s) + 1]; | |
302 | return wxStrcpy(copy, s); | |
303 | } | |
304 | #endif | |
305 | ||
306 | ||
307 | bool | |
308 | wxFileExists (const wxString& filename) | |
309 | { | |
310 | return wxFileName::FileExists(filename); | |
311 | } | |
312 | ||
313 | bool | |
314 | wxIsAbsolutePath (const wxString& filename) | |
315 | { | |
316 | if (!filename.empty()) | |
317 | { | |
318 | // Unix like or Windows | |
319 | if (filename[0] == wxT('/')) | |
320 | return true; | |
321 | #ifdef __VMS__ | |
322 | if ((filename[0] == wxT('[') && filename[1] != wxT('.'))) | |
323 | return true; | |
324 | #endif | |
325 | #if defined(__WINDOWS__) || defined(__OS2__) | |
326 | // MSDOS like | |
327 | if (filename[0] == wxT('\\') || (wxIsalpha (filename[0]) && filename[1] == wxT(':'))) | |
328 | return true; | |
329 | #endif | |
330 | } | |
331 | return false ; | |
332 | } | |
333 | ||
334 | #if WXWIN_COMPATIBILITY_2_8 | |
335 | /* | |
336 | * Strip off any extension (dot something) from end of file, | |
337 | * IF one exists. Inserts zero into buffer. | |
338 | * | |
339 | */ | |
340 | ||
341 | template<typename T> | |
342 | static void wxDoStripExtension(T *buffer) | |
343 | { | |
344 | int len = wxStrlen(buffer); | |
345 | int i = len-1; | |
346 | while (i > 0) | |
347 | { | |
348 | if (buffer[i] == wxT('.')) | |
349 | { | |
350 | buffer[i] = 0; | |
351 | break; | |
352 | } | |
353 | i --; | |
354 | } | |
355 | } | |
356 | ||
357 | void wxStripExtension(char *buffer) { wxDoStripExtension(buffer); } | |
358 | void wxStripExtension(wchar_t *buffer) { wxDoStripExtension(buffer); } | |
359 | ||
360 | void wxStripExtension(wxString& buffer) | |
361 | { | |
362 | buffer = wxFileName::StripExtension(buffer); | |
363 | } | |
364 | ||
365 | // Destructive removal of /./ and /../ stuff | |
366 | template<typename CharType> | |
367 | static CharType *wxDoRealPath (CharType *path) | |
368 | { | |
369 | static const CharType SEP = wxFILE_SEP_PATH; | |
370 | #ifdef __WINDOWS__ | |
371 | wxUnix2DosFilename(path); | |
372 | #endif | |
373 | if (path[0] && path[1]) { | |
374 | /* MATTHEW: special case "/./x" */ | |
375 | CharType *p; | |
376 | if (path[2] == SEP && path[1] == wxT('.')) | |
377 | p = &path[0]; | |
378 | else | |
379 | p = &path[2]; | |
380 | for (; *p; p++) | |
381 | { | |
382 | if (*p == SEP) | |
383 | { | |
384 | if (p[1] == wxT('.') && p[2] == wxT('.') && (p[3] == SEP || p[3] == wxT('\0'))) | |
385 | { | |
386 | CharType *q; | |
387 | for (q = p - 1; q >= path && *q != SEP; q--) | |
388 | { | |
389 | // Empty | |
390 | } | |
391 | ||
392 | if (q[0] == SEP && (q[1] != wxT('.') || q[2] != wxT('.') || q[3] != SEP) | |
393 | && (q - 1 <= path || q[-1] != SEP)) | |
394 | { | |
395 | wxStrcpy (q, p + 3); | |
396 | if (path[0] == wxT('\0')) | |
397 | { | |
398 | path[0] = SEP; | |
399 | path[1] = wxT('\0'); | |
400 | } | |
401 | #if defined(__WINDOWS__) || defined(__OS2__) | |
402 | /* Check that path[2] is NULL! */ | |
403 | else if (path[1] == wxT(':') && !path[2]) | |
404 | { | |
405 | path[2] = SEP; | |
406 | path[3] = wxT('\0'); | |
407 | } | |
408 | #endif | |
409 | p = q - 1; | |
410 | } | |
411 | } | |
412 | else if (p[1] == wxT('.') && (p[2] == SEP || p[2] == wxT('\0'))) | |
413 | wxStrcpy (p, p + 2); | |
414 | } | |
415 | } | |
416 | } | |
417 | return path; | |
418 | } | |
419 | ||
420 | char *wxRealPath(char *path) | |
421 | { | |
422 | return wxDoRealPath(path); | |
423 | } | |
424 | ||
425 | wchar_t *wxRealPath(wchar_t *path) | |
426 | { | |
427 | return wxDoRealPath(path); | |
428 | } | |
429 | ||
430 | wxString wxRealPath(const wxString& path) | |
431 | { | |
432 | wxChar *buf1=MYcopystring(path); | |
433 | wxChar *buf2=wxRealPath(buf1); | |
434 | wxString buf(buf2); | |
435 | delete [] buf1; | |
436 | return buf; | |
437 | } | |
438 | ||
439 | ||
440 | // Must be destroyed | |
441 | wxChar *wxCopyAbsolutePath(const wxString& filename) | |
442 | { | |
443 | if (filename.empty()) | |
444 | return NULL; | |
445 | ||
446 | if (! wxIsAbsolutePath(wxExpandPath(wxFileFunctionsBuffer, filename))) | |
447 | { | |
448 | wxString buf = ::wxGetCwd(); | |
449 | wxChar ch = buf.Last(); | |
450 | #ifdef __WINDOWS__ | |
451 | if (ch != wxT('\\') && ch != wxT('/')) | |
452 | buf << wxT("\\"); | |
453 | #else | |
454 | if (ch != wxT('/')) | |
455 | buf << wxT("/"); | |
456 | #endif | |
457 | buf << wxFileFunctionsBuffer; | |
458 | buf = wxRealPath( buf ); | |
459 | return MYcopystring( buf ); | |
460 | } | |
461 | return MYcopystring( wxFileFunctionsBuffer ); | |
462 | } | |
463 | ||
464 | /*- | |
465 | Handles: | |
466 | ~/ => home dir | |
467 | ~user/ => user's home dir | |
468 | If the environment variable a = "foo" and b = "bar" then: | |
469 | Unix: | |
470 | $a => foo | |
471 | $a$b => foobar | |
472 | $a.c => foo.c | |
473 | xxx$a => xxxfoo | |
474 | ${a}! => foo! | |
475 | $(b)! => bar! | |
476 | \$a => \$a | |
477 | MSDOS: | |
478 | $a ==> $a | |
479 | $(a) ==> foo | |
480 | $(a)$b ==> foo$b | |
481 | $(a)$(b)==> foobar | |
482 | test.$$ ==> test.$$ | |
483 | */ | |
484 | ||
485 | /* input name in name, pathname output to buf. */ | |
486 | ||
487 | template<typename CharType> | |
488 | static CharType *wxDoExpandPath(CharType *buf, const wxString& name) | |
489 | { | |
490 | register CharType *d, *s, *nm; | |
491 | CharType lnm[_MAXPATHLEN]; | |
492 | int q; | |
493 | ||
494 | // Some compilers don't like this line. | |
495 | // const CharType trimchars[] = wxT("\n \t"); | |
496 | ||
497 | CharType trimchars[4]; | |
498 | trimchars[0] = wxT('\n'); | |
499 | trimchars[1] = wxT(' '); | |
500 | trimchars[2] = wxT('\t'); | |
501 | trimchars[3] = 0; | |
502 | ||
503 | static const CharType SEP = wxFILE_SEP_PATH; | |
504 | #ifdef __WINDOWS__ | |
505 | //wxUnix2DosFilename(path); | |
506 | #endif | |
507 | ||
508 | buf[0] = wxT('\0'); | |
509 | if (name.empty()) | |
510 | return buf; | |
511 | nm = ::MYcopystring(static_cast<const CharType*>(name.c_str())); // Make a scratch copy | |
512 | CharType *nm_tmp = nm; | |
513 | ||
514 | /* Skip leading whitespace and cr */ | |
515 | while (wxStrchr(trimchars, *nm) != NULL) | |
516 | nm++; | |
517 | /* And strip off trailing whitespace and cr */ | |
518 | s = nm + (q = wxStrlen(nm)) - 1; | |
519 | while (q-- && wxStrchr(trimchars, *s) != NULL) | |
520 | *s = wxT('\0'); | |
521 | ||
522 | s = nm; | |
523 | d = lnm; | |
524 | #ifdef __WINDOWS__ | |
525 | q = FALSE; | |
526 | #else | |
527 | q = nm[0] == wxT('\\') && nm[1] == wxT('~'); | |
528 | #endif | |
529 | ||
530 | /* Expand inline environment variables */ | |
531 | #ifdef __VISAGECPP__ | |
532 | while (*d) | |
533 | { | |
534 | *d++ = *s; | |
535 | if(*s == wxT('\\')) | |
536 | { | |
537 | *(d - 1) = *++s; | |
538 | if (*d) | |
539 | { | |
540 | s++; | |
541 | continue; | |
542 | } | |
543 | else | |
544 | break; | |
545 | } | |
546 | else | |
547 | #else | |
548 | while ((*d++ = *s) != 0) { | |
549 | # ifndef __WINDOWS__ | |
550 | if (*s == wxT('\\')) { | |
551 | if ((*(d - 1) = *++s)!=0) { | |
552 | s++; | |
553 | continue; | |
554 | } else | |
555 | break; | |
556 | } else | |
557 | # endif | |
558 | #endif | |
559 | // No env variables on WinCE | |
560 | #ifndef __WXWINCE__ | |
561 | #ifdef __WINDOWS__ | |
562 | if (*s++ == wxT('$') && (*s == wxT('{') || *s == wxT(')'))) | |
563 | #else | |
564 | if (*s++ == wxT('$')) | |
565 | #endif | |
566 | { | |
567 | register CharType *start = d; | |
568 | register int braces = (*s == wxT('{') || *s == wxT('(')); | |
569 | register CharType *value; | |
570 | while ((*d++ = *s) != 0) | |
571 | if (braces ? (*s == wxT('}') || *s == wxT(')')) : !(wxIsalnum(*s) || *s == wxT('_')) ) | |
572 | break; | |
573 | else | |
574 | s++; | |
575 | *--d = 0; | |
576 | value = wxGetenv(braces ? start + 1 : start); | |
577 | if (value) { | |
578 | for ((d = start - 1); (*d++ = *value++) != 0;) | |
579 | { | |
580 | // Empty | |
581 | } | |
582 | ||
583 | d--; | |
584 | if (braces && *s) | |
585 | s++; | |
586 | } | |
587 | } | |
588 | #endif | |
589 | // __WXWINCE__ | |
590 | } | |
591 | ||
592 | /* Expand ~ and ~user */ | |
593 | wxString homepath; | |
594 | nm = lnm; | |
595 | if (nm[0] == wxT('~') && !q) | |
596 | { | |
597 | /* prefix ~ */ | |
598 | if (nm[1] == SEP || nm[1] == 0) | |
599 | { /* ~/filename */ | |
600 | homepath = wxGetUserHome(wxEmptyString); | |
601 | if (!homepath.empty()) { | |
602 | s = (CharType*)(const CharType*)homepath.c_str(); | |
603 | if (*++nm) | |
604 | nm++; | |
605 | } | |
606 | } else | |
607 | { /* ~user/filename */ | |
608 | register CharType *nnm; | |
609 | for (s = nm; *s && *s != SEP; s++) | |
610 | { | |
611 | // Empty | |
612 | } | |
613 | int was_sep; /* MATTHEW: Was there a separator, or NULL? */ | |
614 | was_sep = (*s == SEP); | |
615 | nnm = *s ? s + 1 : s; | |
616 | *s = 0; | |
617 | homepath = wxGetUserHome(wxString(nm + 1)); | |
618 | if (homepath.empty()) | |
619 | { | |
620 | if (was_sep) /* replace only if it was there: */ | |
621 | *s = SEP; | |
622 | s = NULL; | |
623 | } | |
624 | else | |
625 | { | |
626 | nm = nnm; | |
627 | s = (CharType*)(const CharType*)homepath.c_str(); | |
628 | } | |
629 | } | |
630 | } | |
631 | ||
632 | d = buf; | |
633 | if (s && *s) { /* MATTHEW: s could be NULL if user '~' didn't exist */ | |
634 | /* Copy home dir */ | |
635 | while (wxT('\0') != (*d++ = *s++)) | |
636 | /* loop */; | |
637 | // Handle root home | |
638 | if (d - 1 > buf && *(d - 2) != SEP) | |
639 | *(d - 1) = SEP; | |
640 | } | |
641 | s = nm; | |
642 | while ((*d++ = *s++) != 0) | |
643 | { | |
644 | // Empty | |
645 | } | |
646 | delete[] nm_tmp; // clean up alloc | |
647 | /* Now clean up the buffer */ | |
648 | return wxRealPath(buf); | |
649 | } | |
650 | ||
651 | char *wxExpandPath(char *buf, const wxString& name) | |
652 | { | |
653 | return wxDoExpandPath(buf, name); | |
654 | } | |
655 | ||
656 | wchar_t *wxExpandPath(wchar_t *buf, const wxString& name) | |
657 | { | |
658 | return wxDoExpandPath(buf, name); | |
659 | } | |
660 | ||
661 | ||
662 | /* Contract Paths to be build upon an environment variable | |
663 | component: | |
664 | ||
665 | example: "/usr/openwin/lib", OPENWINHOME --> ${OPENWINHOME}/lib | |
666 | ||
667 | The call wxExpandPath can convert these back! | |
668 | */ | |
669 | wxChar * | |
670 | wxContractPath (const wxString& filename, | |
671 | const wxString& WXUNUSED_IN_WINCE(envname), | |
672 | const wxString& user) | |
673 | { | |
674 | static wxChar dest[_MAXPATHLEN]; | |
675 | ||
676 | if (filename.empty()) | |
677 | return NULL; | |
678 | ||
679 | wxStrcpy (dest, filename); | |
680 | #ifdef __WINDOWS__ | |
681 | wxUnix2DosFilename(dest); | |
682 | #endif | |
683 | ||
684 | // Handle environment | |
685 | wxString val; | |
686 | #ifndef __WXWINCE__ | |
687 | wxChar *tcp; | |
688 | if (!envname.empty() && !(val = wxGetenv (envname)).empty() && | |
689 | (tcp = wxStrstr (dest, val)) != NULL) | |
690 | { | |
691 | wxStrcpy (wxFileFunctionsBuffer, tcp + val.length()); | |
692 | *tcp++ = wxT('$'); | |
693 | *tcp++ = wxT('{'); | |
694 | wxStrcpy (tcp, envname); | |
695 | wxStrcat (tcp, wxT("}")); | |
696 | wxStrcat (tcp, wxFileFunctionsBuffer); | |
697 | } | |
698 | #endif | |
699 | ||
700 | // Handle User's home (ignore root homes!) | |
701 | val = wxGetUserHome (user); | |
702 | if (val.empty()) | |
703 | return dest; | |
704 | ||
705 | const size_t len = val.length(); | |
706 | if (len <= 2) | |
707 | return dest; | |
708 | ||
709 | if (wxStrncmp(dest, val, len) == 0) | |
710 | { | |
711 | wxStrcpy(wxFileFunctionsBuffer, wxT("~")); | |
712 | if (!user.empty()) | |
713 | wxStrcat(wxFileFunctionsBuffer, user); | |
714 | wxStrcat(wxFileFunctionsBuffer, dest + len); | |
715 | wxStrcpy (dest, wxFileFunctionsBuffer); | |
716 | } | |
717 | ||
718 | return dest; | |
719 | } | |
720 | ||
721 | #endif // #if WXWIN_COMPATIBILITY_2_8 | |
722 | ||
723 | // Return just the filename, not the path (basename) | |
724 | wxChar *wxFileNameFromPath (wxChar *path) | |
725 | { | |
726 | wxString p = path; | |
727 | wxString n = wxFileNameFromPath(p); | |
728 | ||
729 | return path + p.length() - n.length(); | |
730 | } | |
731 | ||
732 | wxString wxFileNameFromPath (const wxString& path) | |
733 | { | |
734 | return wxFileName(path).GetFullName(); | |
735 | } | |
736 | ||
737 | // Return just the directory, or NULL if no directory | |
738 | wxChar * | |
739 | wxPathOnly (wxChar *path) | |
740 | { | |
741 | if (path && *path) | |
742 | { | |
743 | static wxChar buf[_MAXPATHLEN]; | |
744 | ||
745 | int l = wxStrlen(path); | |
746 | int i = l - 1; | |
747 | if ( i >= _MAXPATHLEN ) | |
748 | return NULL; | |
749 | ||
750 | // Local copy | |
751 | wxStrcpy (buf, path); | |
752 | ||
753 | // Search backward for a backward or forward slash | |
754 | while (i > -1) | |
755 | { | |
756 | // Unix like or Windows | |
757 | if (path[i] == wxT('/') || path[i] == wxT('\\')) | |
758 | { | |
759 | buf[i] = 0; | |
760 | return buf; | |
761 | } | |
762 | #ifdef __VMS__ | |
763 | if (path[i] == wxT(']')) | |
764 | { | |
765 | buf[i+1] = 0; | |
766 | return buf; | |
767 | } | |
768 | #endif | |
769 | i --; | |
770 | } | |
771 | ||
772 | #if defined(__WINDOWS__) || defined(__OS2__) | |
773 | // Try Drive specifier | |
774 | if (wxIsalpha (buf[0]) && buf[1] == wxT(':')) | |
775 | { | |
776 | // A:junk --> A:. (since A:.\junk Not A:\junk) | |
777 | buf[2] = wxT('.'); | |
778 | buf[3] = wxT('\0'); | |
779 | return buf; | |
780 | } | |
781 | #endif | |
782 | } | |
783 | return NULL; | |
784 | } | |
785 | ||
786 | // Return just the directory, or NULL if no directory | |
787 | wxString wxPathOnly (const wxString& path) | |
788 | { | |
789 | if (!path.empty()) | |
790 | { | |
791 | wxChar buf[_MAXPATHLEN]; | |
792 | ||
793 | int l = path.length(); | |
794 | int i = l - 1; | |
795 | ||
796 | if ( i >= _MAXPATHLEN ) | |
797 | return wxString(); | |
798 | ||
799 | // Local copy | |
800 | wxStrcpy(buf, path); | |
801 | ||
802 | // Search backward for a backward or forward slash | |
803 | while (i > -1) | |
804 | { | |
805 | // Unix like or Windows | |
806 | if (path[i] == wxT('/') || path[i] == wxT('\\')) | |
807 | { | |
808 | // Don't return an empty string | |
809 | if (i == 0) | |
810 | i ++; | |
811 | buf[i] = 0; | |
812 | return wxString(buf); | |
813 | } | |
814 | #ifdef __VMS__ | |
815 | if (path[i] == wxT(']')) | |
816 | { | |
817 | buf[i+1] = 0; | |
818 | return wxString(buf); | |
819 | } | |
820 | #endif | |
821 | i --; | |
822 | } | |
823 | ||
824 | #if defined(__WINDOWS__) || defined(__OS2__) | |
825 | // Try Drive specifier | |
826 | if (wxIsalpha (buf[0]) && buf[1] == wxT(':')) | |
827 | { | |
828 | // A:junk --> A:. (since A:.\junk Not A:\junk) | |
829 | buf[2] = wxT('.'); | |
830 | buf[3] = wxT('\0'); | |
831 | return wxString(buf); | |
832 | } | |
833 | #endif | |
834 | } | |
835 | return wxEmptyString; | |
836 | } | |
837 | ||
838 | // Utility for converting delimiters in DOS filenames to UNIX style | |
839 | // and back again - or we get nasty problems with delimiters. | |
840 | // Also, convert to lower case, since case is significant in UNIX. | |
841 | ||
842 | #if defined(__WXMAC__) && !defined(__WXOSX_IPHONE__) | |
843 | ||
844 | #define kDefaultPathStyle kCFURLPOSIXPathStyle | |
845 | ||
846 | wxString wxMacFSRefToPath( const FSRef *fsRef , CFStringRef additionalPathComponent ) | |
847 | { | |
848 | CFURLRef fullURLRef; | |
849 | fullURLRef = CFURLCreateFromFSRef(NULL, fsRef); | |
850 | if ( fullURLRef == NULL) | |
851 | return wxEmptyString; | |
852 | ||
853 | if ( additionalPathComponent ) | |
854 | { | |
855 | CFURLRef parentURLRef = fullURLRef ; | |
856 | fullURLRef = CFURLCreateCopyAppendingPathComponent(NULL, parentURLRef, | |
857 | additionalPathComponent,false); | |
858 | CFRelease( parentURLRef ) ; | |
859 | } | |
860 | wxCFStringRef cfString( CFURLCopyFileSystemPath(fullURLRef, kDefaultPathStyle )); | |
861 | CFRelease( fullURLRef ) ; | |
862 | ||
863 | return wxCFStringRef::AsStringWithNormalizationFormC(cfString); | |
864 | } | |
865 | ||
866 | OSStatus wxMacPathToFSRef( const wxString&path , FSRef *fsRef ) | |
867 | { | |
868 | OSStatus err = noErr ; | |
869 | CFMutableStringRef cfMutableString = CFStringCreateMutableCopy(NULL, 0, wxCFStringRef(path)); | |
870 | CFStringNormalize(cfMutableString,kCFStringNormalizationFormD); | |
871 | CFURLRef url = CFURLCreateWithFileSystemPath(kCFAllocatorDefault, cfMutableString , kDefaultPathStyle, false); | |
872 | CFRelease( cfMutableString ); | |
873 | if ( NULL != url ) | |
874 | { | |
875 | if ( CFURLGetFSRef(url, fsRef) == false ) | |
876 | err = fnfErr ; | |
877 | CFRelease( url ) ; | |
878 | } | |
879 | else | |
880 | { | |
881 | err = fnfErr ; | |
882 | } | |
883 | return err ; | |
884 | } | |
885 | ||
886 | wxString wxMacHFSUniStrToString( ConstHFSUniStr255Param uniname ) | |
887 | { | |
888 | wxCFStringRef cfname( CFStringCreateWithCharacters( kCFAllocatorDefault, | |
889 | uniname->unicode, | |
890 | uniname->length ) ); | |
891 | return wxCFStringRef::AsStringWithNormalizationFormC(cfname); | |
892 | } | |
893 | ||
894 | #ifndef __LP64__ | |
895 | ||
896 | wxString wxMacFSSpec2MacFilename( const FSSpec *spec ) | |
897 | { | |
898 | FSRef fsRef ; | |
899 | if ( FSpMakeFSRef( spec , &fsRef) == noErr ) | |
900 | { | |
901 | return wxMacFSRefToPath( &fsRef ) ; | |
902 | } | |
903 | return wxEmptyString ; | |
904 | } | |
905 | ||
906 | void wxMacFilename2FSSpec( const wxString& path , FSSpec *spec ) | |
907 | { | |
908 | OSStatus err = noErr; | |
909 | FSRef fsRef; | |
910 | wxMacPathToFSRef( path , &fsRef ); | |
911 | err = FSGetCatalogInfo(&fsRef, kFSCatInfoNone, NULL, NULL, spec, NULL); | |
912 | verify_noerr( err ); | |
913 | } | |
914 | #endif | |
915 | ||
916 | #endif // __WXMAC__ | |
917 | ||
918 | ||
919 | #if WXWIN_COMPATIBILITY_2_8 | |
920 | ||
921 | template<typename T> | |
922 | static void wxDoDos2UnixFilename(T *s) | |
923 | { | |
924 | if (s) | |
925 | while (*s) | |
926 | { | |
927 | if (*s == wxT('\\')) | |
928 | *s = wxT('/'); | |
929 | #ifdef __WINDOWS__ | |
930 | else | |
931 | *s = wxTolower(*s); // Case INDEPENDENT | |
932 | #endif | |
933 | s++; | |
934 | } | |
935 | } | |
936 | ||
937 | void wxDos2UnixFilename(char *s) { wxDoDos2UnixFilename(s); } | |
938 | void wxDos2UnixFilename(wchar_t *s) { wxDoDos2UnixFilename(s); } | |
939 | ||
940 | template<typename T> | |
941 | static void | |
942 | #if defined(__WINDOWS__) || defined(__OS2__) | |
943 | wxDoUnix2DosFilename(T *s) | |
944 | #else | |
945 | wxDoUnix2DosFilename(T *WXUNUSED(s) ) | |
946 | #endif | |
947 | { | |
948 | // Yes, I really mean this to happen under DOS only! JACS | |
949 | #if defined(__WINDOWS__) || defined(__OS2__) | |
950 | if (s) | |
951 | while (*s) | |
952 | { | |
953 | if (*s == wxT('/')) | |
954 | *s = wxT('\\'); | |
955 | s++; | |
956 | } | |
957 | #endif | |
958 | } | |
959 | ||
960 | void wxUnix2DosFilename(char *s) { wxDoUnix2DosFilename(s); } | |
961 | void wxUnix2DosFilename(wchar_t *s) { wxDoUnix2DosFilename(s); } | |
962 | ||
963 | #endif // #if WXWIN_COMPATIBILITY_2_8 | |
964 | ||
965 | // Concatenate two files to form third | |
966 | bool | |
967 | wxConcatFiles (const wxString& file1, const wxString& file2, const wxString& file3) | |
968 | { | |
969 | #if wxUSE_FILE | |
970 | ||
971 | wxFile in1(file1), in2(file2); | |
972 | wxTempFile out(file3); | |
973 | ||
974 | if ( !in1.IsOpened() || !in2.IsOpened() || !out.IsOpened() ) | |
975 | return false; | |
976 | ||
977 | ssize_t ofs; | |
978 | unsigned char buf[1024]; | |
979 | ||
980 | for( int i=0; i<2; i++) | |
981 | { | |
982 | wxFile *in = i==0 ? &in1 : &in2; | |
983 | do{ | |
984 | if ( (ofs = in->Read(buf,WXSIZEOF(buf))) == wxInvalidOffset ) return false; | |
985 | if ( ofs > 0 ) | |
986 | if ( !out.Write(buf,ofs) ) | |
987 | return false; | |
988 | } while ( ofs == (ssize_t)WXSIZEOF(buf) ); | |
989 | } | |
990 | ||
991 | return out.Commit(); | |
992 | ||
993 | #else | |
994 | ||
995 | wxUnusedVar(file1); | |
996 | wxUnusedVar(file2); | |
997 | wxUnusedVar(file3); | |
998 | return false; | |
999 | ||
1000 | #endif | |
1001 | } | |
1002 | ||
1003 | // helper of generic implementation of wxCopyFile() | |
1004 | #if !(defined(__WIN32__) || defined(__OS2__)) && wxUSE_FILE | |
1005 | ||
1006 | static bool | |
1007 | wxDoCopyFile(wxFile& fileIn, | |
1008 | const wxStructStat& fbuf, | |
1009 | const wxString& filenameDst, | |
1010 | bool overwrite) | |
1011 | { | |
1012 | // reset the umask as we want to create the file with exactly the same | |
1013 | // permissions as the original one | |
1014 | wxCHANGE_UMASK(0); | |
1015 | ||
1016 | // create file2 with the same permissions than file1 and open it for | |
1017 | // writing | |
1018 | ||
1019 | wxFile fileOut; | |
1020 | if ( !fileOut.Create(filenameDst, overwrite, fbuf.st_mode & 0777) ) | |
1021 | return false; | |
1022 | ||
1023 | // copy contents of file1 to file2 | |
1024 | char buf[4096]; | |
1025 | for ( ;; ) | |
1026 | { | |
1027 | ssize_t count = fileIn.Read(buf, WXSIZEOF(buf)); | |
1028 | if ( count == wxInvalidOffset ) | |
1029 | return false; | |
1030 | ||
1031 | // end of file? | |
1032 | if ( !count ) | |
1033 | break; | |
1034 | ||
1035 | if ( fileOut.Write(buf, count) < (size_t)count ) | |
1036 | return false; | |
1037 | } | |
1038 | ||
1039 | // we can expect fileIn to be closed successfully, but we should ensure | |
1040 | // that fileOut was closed as some write errors (disk full) might not be | |
1041 | // detected before doing this | |
1042 | return fileIn.Close() && fileOut.Close(); | |
1043 | } | |
1044 | ||
1045 | #endif // generic implementation of wxCopyFile | |
1046 | ||
1047 | // Copy files | |
1048 | bool | |
1049 | wxCopyFile (const wxString& file1, const wxString& file2, bool overwrite) | |
1050 | { | |
1051 | #if defined(__WIN32__) && !defined(__WXMICROWIN__) | |
1052 | // CopyFile() copies file attributes and modification time too, so use it | |
1053 | // instead of our code if available | |
1054 | // | |
1055 | // NB: 3rd parameter is bFailIfExists i.e. the inverse of overwrite | |
1056 | if ( !::CopyFile(file1.t_str(), file2.t_str(), !overwrite) ) | |
1057 | { | |
1058 | wxLogSysError(_("Failed to copy the file '%s' to '%s'"), | |
1059 | file1.c_str(), file2.c_str()); | |
1060 | ||
1061 | return false; | |
1062 | } | |
1063 | #elif defined(__OS2__) | |
1064 | if ( ::DosCopy(file1.c_str(), file2.c_str(), overwrite ? DCPY_EXISTING : 0) != 0 ) | |
1065 | return false; | |
1066 | #elif wxUSE_FILE // !Win32 | |
1067 | ||
1068 | wxStructStat fbuf; | |
1069 | // get permissions of file1 | |
1070 | if ( wxStat( file1, &fbuf) != 0 ) | |
1071 | { | |
1072 | // the file probably doesn't exist or we haven't the rights to read | |
1073 | // from it anyhow | |
1074 | wxLogSysError(_("Impossible to get permissions for file '%s'"), | |
1075 | file1.c_str()); | |
1076 | return false; | |
1077 | } | |
1078 | ||
1079 | // open file1 for reading | |
1080 | wxFile fileIn(file1, wxFile::read); | |
1081 | if ( !fileIn.IsOpened() ) | |
1082 | return false; | |
1083 | ||
1084 | // remove file2, if it exists. This is needed for creating | |
1085 | // file2 with the correct permissions in the next step | |
1086 | if ( wxFileExists(file2) && (!overwrite || !wxRemoveFile(file2))) | |
1087 | { | |
1088 | wxLogSysError(_("Impossible to overwrite the file '%s'"), | |
1089 | file2.c_str()); | |
1090 | return false; | |
1091 | } | |
1092 | ||
1093 | wxDoCopyFile(fileIn, fbuf, file2, overwrite); | |
1094 | ||
1095 | #if defined(__WXMAC__) || defined(__WXCOCOA__) | |
1096 | // copy the resource fork of the file too if it's present | |
1097 | wxString pathRsrcOut; | |
1098 | wxFile fileRsrcIn; | |
1099 | ||
1100 | { | |
1101 | // suppress error messages from this block as resource forks don't have | |
1102 | // to exist | |
1103 | wxLogNull noLog; | |
1104 | ||
1105 | // it's not enough to check for file existence: it always does on HFS | |
1106 | // but is empty for files without resources | |
1107 | if ( fileRsrcIn.Open(file1 + wxT("/..namedfork/rsrc")) && | |
1108 | fileRsrcIn.Length() > 0 ) | |
1109 | { | |
1110 | // we must be using HFS or another filesystem with resource fork | |
1111 | // support, suppose that destination file system also is HFS[-like] | |
1112 | pathRsrcOut = file2 + wxT("/..namedfork/rsrc"); | |
1113 | } | |
1114 | else // check if we have resource fork in separate file (non-HFS case) | |
1115 | { | |
1116 | wxFileName fnRsrc(file1); | |
1117 | fnRsrc.SetName(wxT("._") + fnRsrc.GetName()); | |
1118 | ||
1119 | fileRsrcIn.Close(); | |
1120 | if ( fileRsrcIn.Open( fnRsrc.GetFullPath() ) ) | |
1121 | { | |
1122 | fnRsrc = file2; | |
1123 | fnRsrc.SetName(wxT("._") + fnRsrc.GetName()); | |
1124 | ||
1125 | pathRsrcOut = fnRsrc.GetFullPath(); | |
1126 | } | |
1127 | } | |
1128 | } | |
1129 | ||
1130 | if ( !pathRsrcOut.empty() ) | |
1131 | { | |
1132 | if ( !wxDoCopyFile(fileRsrcIn, fbuf, pathRsrcOut, overwrite) ) | |
1133 | return false; | |
1134 | } | |
1135 | #endif // wxMac || wxCocoa | |
1136 | ||
1137 | #if !defined(__VISAGECPP__) && !defined(__WXMAC__) || defined(__UNIX__) | |
1138 | // no chmod in VA. Should be some permission API for HPFS386 partitions | |
1139 | // however | |
1140 | if ( chmod(file2.fn_str(), fbuf.st_mode) != 0 ) | |
1141 | { | |
1142 | wxLogSysError(_("Impossible to set permissions for the file '%s'"), | |
1143 | file2.c_str()); | |
1144 | return false; | |
1145 | } | |
1146 | #endif // OS/2 || Mac | |
1147 | ||
1148 | #else // !Win32 && ! wxUSE_FILE | |
1149 | ||
1150 | // impossible to simulate with wxWidgets API | |
1151 | wxUnusedVar(file1); | |
1152 | wxUnusedVar(file2); | |
1153 | wxUnusedVar(overwrite); | |
1154 | return false; | |
1155 | ||
1156 | #endif // __WINDOWS__ && __WIN32__ | |
1157 | ||
1158 | return true; | |
1159 | } | |
1160 | ||
1161 | bool | |
1162 | wxRenameFile(const wxString& file1, const wxString& file2, bool overwrite) | |
1163 | { | |
1164 | if ( !overwrite && wxFileExists(file2) ) | |
1165 | { | |
1166 | wxLogSysError | |
1167 | ( | |
1168 | _("Failed to rename the file '%s' to '%s' because the destination file already exists."), | |
1169 | file1.c_str(), file2.c_str() | |
1170 | ); | |
1171 | ||
1172 | return false; | |
1173 | } | |
1174 | ||
1175 | #if !defined(__WXWINCE__) | |
1176 | // Normal system call | |
1177 | if ( wxRename (file1, file2) == 0 ) | |
1178 | return true; | |
1179 | #endif | |
1180 | ||
1181 | // Try to copy | |
1182 | if (wxCopyFile(file1, file2, overwrite)) { | |
1183 | wxRemoveFile(file1); | |
1184 | return true; | |
1185 | } | |
1186 | // Give up | |
1187 | wxLogSysError(_("File '%s' couldn't be renamed '%s'"), file1, file2); | |
1188 | return false; | |
1189 | } | |
1190 | ||
1191 | bool wxRemoveFile(const wxString& file) | |
1192 | { | |
1193 | #if defined(__VISUALC__) \ | |
1194 | || (defined(__WINDOWS__) && defined(__INTELC__)) \ | |
1195 | || defined(__BORLANDC__) \ | |
1196 | || defined(__WATCOMC__) \ | |
1197 | || defined(__DMC__) \ | |
1198 | || defined(__GNUWIN32__) | |
1199 | int res = wxRemove(file); | |
1200 | #elif defined(__WXMAC__) | |
1201 | int res = unlink(file.fn_str()); | |
1202 | #else | |
1203 | int res = unlink(file.fn_str()); | |
1204 | #endif | |
1205 | if ( res ) | |
1206 | { | |
1207 | wxLogSysError(_("File '%s' couldn't be removed"), file); | |
1208 | } | |
1209 | return res == 0; | |
1210 | } | |
1211 | ||
1212 | bool wxMkdir(const wxString& dir, int perm) | |
1213 | { | |
1214 | #if defined(__WXMAC__) && !defined(__UNIX__) | |
1215 | if ( mkdir(dir.fn_str(), 0) != 0 ) | |
1216 | ||
1217 | // assume mkdir() has 2 args on non Windows-OS/2 platforms and on Windows too | |
1218 | // for the GNU compiler | |
1219 | #elif (!(defined(__WINDOWS__) || defined(__OS2__) || defined(__DOS__))) || \ | |
1220 | (defined(__GNUWIN32__) && !defined(__MINGW32__)) || \ | |
1221 | defined(__WINE__) || defined(__WXMICROWIN__) | |
1222 | const wxChar *dirname = dir.c_str(); | |
1223 | #if defined(MSVCRT) | |
1224 | wxUnusedVar(perm); | |
1225 | if ( mkdir(wxFNCONV(dirname)) != 0 ) | |
1226 | #else | |
1227 | if ( mkdir(wxFNCONV(dirname), perm) != 0 ) | |
1228 | #endif | |
1229 | #elif defined(__OS2__) | |
1230 | wxUnusedVar(perm); | |
1231 | if (::DosCreateDir(dir.c_str(), NULL) != 0) // enhance for EAB's?? | |
1232 | #elif defined(__DOS__) | |
1233 | const wxChar *dirname = dir.c_str(); | |
1234 | #if defined(__WATCOMC__) | |
1235 | (void)perm; | |
1236 | if ( wxMkDir(wxFNSTRINGCAST wxFNCONV(dirname)) != 0 ) | |
1237 | #elif defined(__DJGPP__) | |
1238 | if ( mkdir(wxFNCONV(dirname), perm) != 0 ) | |
1239 | #else | |
1240 | #error "Unsupported DOS compiler!" | |
1241 | #endif | |
1242 | #else // !MSW, !DOS and !OS/2 VAC++ | |
1243 | wxUnusedVar(perm); | |
1244 | #ifdef __WXWINCE__ | |
1245 | if ( CreateDirectory(dir.fn_str(), NULL) == 0 ) | |
1246 | #else | |
1247 | if ( wxMkDir(dir.fn_str()) != 0 ) | |
1248 | #endif | |
1249 | #endif // !MSW/MSW | |
1250 | { | |
1251 | wxLogSysError(_("Directory '%s' couldn't be created"), dir); | |
1252 | return false; | |
1253 | } | |
1254 | ||
1255 | return true; | |
1256 | } | |
1257 | ||
1258 | bool wxRmdir(const wxString& dir, int WXUNUSED(flags)) | |
1259 | { | |
1260 | #if defined(__VMS__) | |
1261 | return false; //to be changed since rmdir exists in VMS7.x | |
1262 | #else | |
1263 | #if defined(__OS2__) | |
1264 | if ( ::DosDeleteDir(dir.c_str()) != 0 ) | |
1265 | #elif defined(__WXWINCE__) | |
1266 | if ( RemoveDirectory(dir.fn_str()) == 0 ) | |
1267 | #else | |
1268 | if ( wxRmDir(dir.fn_str()) != 0 ) | |
1269 | #endif | |
1270 | { | |
1271 | wxLogSysError(_("Directory '%s' couldn't be deleted"), dir); | |
1272 | return false; | |
1273 | } | |
1274 | ||
1275 | return true; | |
1276 | #endif | |
1277 | } | |
1278 | ||
1279 | // does the path exists? (may have or not '/' or '\\' at the end) | |
1280 | bool wxDirExists(const wxString& pathName) | |
1281 | { | |
1282 | return wxFileName::DirExists(pathName); | |
1283 | } | |
1284 | ||
1285 | #if WXWIN_COMPATIBILITY_2_8 | |
1286 | ||
1287 | // Get a temporary filename, opening and closing the file. | |
1288 | wxChar *wxGetTempFileName(const wxString& prefix, wxChar *buf) | |
1289 | { | |
1290 | wxString filename; | |
1291 | if ( !wxGetTempFileName(prefix, filename) ) | |
1292 | return NULL; | |
1293 | ||
1294 | if ( buf ) | |
1295 | wxStrcpy(buf, filename); | |
1296 | else | |
1297 | buf = MYcopystring(filename); | |
1298 | ||
1299 | return buf; | |
1300 | } | |
1301 | ||
1302 | bool wxGetTempFileName(const wxString& prefix, wxString& buf) | |
1303 | { | |
1304 | #if wxUSE_FILE | |
1305 | buf = wxFileName::CreateTempFileName(prefix); | |
1306 | ||
1307 | return !buf.empty(); | |
1308 | #else // !wxUSE_FILE | |
1309 | wxUnusedVar(prefix); | |
1310 | wxUnusedVar(buf); | |
1311 | ||
1312 | return false; | |
1313 | #endif // wxUSE_FILE/!wxUSE_FILE | |
1314 | } | |
1315 | ||
1316 | #endif // #if WXWIN_COMPATIBILITY_2_8 | |
1317 | ||
1318 | // Get first file name matching given wild card. | |
1319 | ||
1320 | static wxDir *gs_dir = NULL; | |
1321 | static wxString gs_dirPath; | |
1322 | ||
1323 | wxString wxFindFirstFile(const wxString& spec, int flags) | |
1324 | { | |
1325 | wxFileName::SplitPath(spec, &gs_dirPath, NULL, NULL); | |
1326 | if ( gs_dirPath.empty() ) | |
1327 | gs_dirPath = wxT("."); | |
1328 | if ( !wxEndsWithPathSeparator(gs_dirPath ) ) | |
1329 | gs_dirPath << wxFILE_SEP_PATH; | |
1330 | ||
1331 | delete gs_dir; // can be NULL, this is ok | |
1332 | gs_dir = new wxDir(gs_dirPath); | |
1333 | ||
1334 | if ( !gs_dir->IsOpened() ) | |
1335 | { | |
1336 | wxLogSysError(_("Cannot enumerate files '%s'"), spec); | |
1337 | return wxEmptyString; | |
1338 | } | |
1339 | ||
1340 | int dirFlags; | |
1341 | switch (flags) | |
1342 | { | |
1343 | case wxDIR: dirFlags = wxDIR_DIRS; break; | |
1344 | case wxFILE: dirFlags = wxDIR_FILES; break; | |
1345 | default: dirFlags = wxDIR_DIRS | wxDIR_FILES; break; | |
1346 | } | |
1347 | ||
1348 | wxString result; | |
1349 | gs_dir->GetFirst(&result, wxFileNameFromPath(spec), dirFlags); | |
1350 | if ( result.empty() ) | |
1351 | { | |
1352 | wxDELETE(gs_dir); | |
1353 | return result; | |
1354 | } | |
1355 | ||
1356 | return gs_dirPath + result; | |
1357 | } | |
1358 | ||
1359 | wxString wxFindNextFile() | |
1360 | { | |
1361 | wxCHECK_MSG( gs_dir, "", "You must call wxFindFirstFile before!" ); | |
1362 | ||
1363 | wxString result; | |
1364 | if ( !gs_dir->GetNext(&result) || result.empty() ) | |
1365 | { | |
1366 | wxDELETE(gs_dir); | |
1367 | return result; | |
1368 | } | |
1369 | ||
1370 | return gs_dirPath + result; | |
1371 | } | |
1372 | ||
1373 | ||
1374 | // Get current working directory. | |
1375 | // If buf is NULL, allocates space using new, else copies into buf. | |
1376 | // wxGetWorkingDirectory() is obsolete, use wxGetCwd() | |
1377 | // wxDoGetCwd() is their common core to be moved | |
1378 | // to wxGetCwd() once wxGetWorkingDirectory() will be removed. | |
1379 | // Do not expose wxDoGetCwd in headers! | |
1380 | ||
1381 | wxChar *wxDoGetCwd(wxChar *buf, int sz) | |
1382 | { | |
1383 | #if defined(__WXWINCE__) | |
1384 | // TODO | |
1385 | if(buf && sz>0) buf[0] = wxT('\0'); | |
1386 | return buf; | |
1387 | #else | |
1388 | if ( !buf ) | |
1389 | { | |
1390 | buf = new wxChar[sz + 1]; | |
1391 | } | |
1392 | ||
1393 | bool ok = false; | |
1394 | ||
1395 | // for the compilers which have Unicode version of _getcwd(), call it | |
1396 | // directly, for the others call the ANSI version and do the translation | |
1397 | #if !wxUSE_UNICODE | |
1398 | #define cbuf buf | |
1399 | #else // wxUSE_UNICODE | |
1400 | bool needsANSI = true; | |
1401 | ||
1402 | #if !defined(HAVE_WGETCWD) || wxUSE_UNICODE_MSLU | |
1403 | char cbuf[_MAXPATHLEN]; | |
1404 | #endif | |
1405 | ||
1406 | #ifdef HAVE_WGETCWD | |
1407 | #if wxUSE_UNICODE_MSLU | |
1408 | if ( wxGetOsVersion() != wxOS_WINDOWS_9X ) | |
1409 | #else | |
1410 | char *cbuf = NULL; // never really used because needsANSI will always be false | |
1411 | #endif | |
1412 | { | |
1413 | ok = _wgetcwd(buf, sz) != NULL; | |
1414 | needsANSI = false; | |
1415 | } | |
1416 | #endif | |
1417 | ||
1418 | if ( needsANSI ) | |
1419 | #endif // wxUSE_UNICODE | |
1420 | { | |
1421 | #if defined(_MSC_VER) || defined(__MINGW32__) | |
1422 | ok = _getcwd(cbuf, sz) != NULL; | |
1423 | #elif defined(__OS2__) | |
1424 | APIRET rc; | |
1425 | ULONG ulDriveNum = 0; | |
1426 | ULONG ulDriveMap = 0; | |
1427 | rc = ::DosQueryCurrentDisk(&ulDriveNum, &ulDriveMap); | |
1428 | ok = rc == 0; | |
1429 | if (ok) | |
1430 | { | |
1431 | sz -= 3; | |
1432 | rc = ::DosQueryCurrentDir( 0 // current drive | |
1433 | ,(PBYTE)cbuf + 3 | |
1434 | ,(PULONG)&sz | |
1435 | ); | |
1436 | cbuf[0] = char('A' + (ulDriveNum - 1)); | |
1437 | cbuf[1] = ':'; | |
1438 | cbuf[2] = '\\'; | |
1439 | ok = rc == 0; | |
1440 | } | |
1441 | #else // !Win32/VC++ !Mac !OS2 | |
1442 | ok = getcwd(cbuf, sz) != NULL; | |
1443 | #endif // platform | |
1444 | ||
1445 | #if wxUSE_UNICODE | |
1446 | // finally convert the result to Unicode if needed | |
1447 | wxConvFile.MB2WC(buf, cbuf, sz); | |
1448 | #endif // wxUSE_UNICODE | |
1449 | } | |
1450 | ||
1451 | if ( !ok ) | |
1452 | { | |
1453 | wxLogSysError(_("Failed to get the working directory")); | |
1454 | ||
1455 | // VZ: the old code used to return "." on error which didn't make any | |
1456 | // sense at all to me - empty string is a better error indicator | |
1457 | // (NULL might be even better but I'm afraid this could lead to | |
1458 | // problems with the old code assuming the return is never NULL) | |
1459 | buf[0] = wxT('\0'); | |
1460 | } | |
1461 | else // ok, but we might need to massage the path into the right format | |
1462 | { | |
1463 | #ifdef __DJGPP__ | |
1464 | // VS: DJGPP is a strange mix of DOS and UNIX API and returns paths | |
1465 | // with / deliminers. We don't like that. | |
1466 | for (wxChar *ch = buf; *ch; ch++) | |
1467 | { | |
1468 | if (*ch == wxT('/')) | |
1469 | *ch = wxT('\\'); | |
1470 | } | |
1471 | #endif // __DJGPP__ | |
1472 | ||
1473 | // MBN: we hope that in the case the user is compiling a GTK+/Motif app, | |
1474 | // he needs Unix as opposed to Win32 pathnames | |
1475 | #if defined( __CYGWIN__ ) && defined( __WINDOWS__ ) | |
1476 | // another example of DOS/Unix mix (Cygwin) | |
1477 | wxString pathUnix = buf; | |
1478 | #if wxUSE_UNICODE | |
1479 | #if CYGWIN_VERSION_DLL_MAJOR >= 1007 | |
1480 | cygwin_conv_path(CCP_POSIX_TO_WIN_W, pathUnix.mb_str(wxConvFile), buf, sz); | |
1481 | #else | |
1482 | char bufA[_MAXPATHLEN]; | |
1483 | cygwin_conv_to_full_win32_path(pathUnix.mb_str(wxConvFile), bufA); | |
1484 | wxConvFile.MB2WC(buf, bufA, sz); | |
1485 | #endif | |
1486 | #else | |
1487 | #if CYGWIN_VERSION_DLL_MAJOR >= 1007 | |
1488 | cygwin_conv_path(CCP_POSIX_TO_WIN_A, pathUnix, buf, sz); | |
1489 | #else | |
1490 | cygwin_conv_to_full_win32_path(pathUnix, buf); | |
1491 | #endif | |
1492 | #endif // wxUSE_UNICODE | |
1493 | #endif // __CYGWIN__ | |
1494 | } | |
1495 | ||
1496 | return buf; | |
1497 | ||
1498 | #if !wxUSE_UNICODE | |
1499 | #undef cbuf | |
1500 | #endif | |
1501 | ||
1502 | #endif | |
1503 | // __WXWINCE__ | |
1504 | } | |
1505 | ||
1506 | #if WXWIN_COMPATIBILITY_2_6 | |
1507 | wxChar *wxGetWorkingDirectory(wxChar *buf, int sz) | |
1508 | { | |
1509 | return wxDoGetCwd(buf,sz); | |
1510 | } | |
1511 | #endif // WXWIN_COMPATIBILITY_2_6 | |
1512 | ||
1513 | wxString wxGetCwd() | |
1514 | { | |
1515 | wxString str; | |
1516 | wxDoGetCwd(wxStringBuffer(str, _MAXPATHLEN), _MAXPATHLEN); | |
1517 | return str; | |
1518 | } | |
1519 | ||
1520 | bool wxSetWorkingDirectory(const wxString& d) | |
1521 | { | |
1522 | bool success = false; | |
1523 | #if defined(__OS2__) | |
1524 | if (d[1] == ':') | |
1525 | { | |
1526 | ::DosSetDefaultDisk(wxToupper(d[0]) - wxT('A') + 1); | |
1527 | // do not call DosSetCurrentDir when just changing drive, | |
1528 | // since it requires e.g. "d:." instead of "d:"! | |
1529 | if (d.length() == 2) | |
1530 | return true; | |
1531 | } | |
1532 | success = (::DosSetCurrentDir(d.c_str()) == 0); | |
1533 | #elif defined(__UNIX__) || defined(__WXMAC__) || defined(__DOS__) | |
1534 | success = (chdir(wxFNSTRINGCAST d.fn_str()) == 0); | |
1535 | #elif defined(__WINDOWS__) | |
1536 | ||
1537 | #ifdef __WIN32__ | |
1538 | #ifdef __WXWINCE__ | |
1539 | // No equivalent in WinCE | |
1540 | wxUnusedVar(d); | |
1541 | #else | |
1542 | success = (SetCurrentDirectory(d.t_str()) != 0); | |
1543 | #endif | |
1544 | #else | |
1545 | // Must change drive, too. | |
1546 | bool isDriveSpec = ((strlen(d) > 1) && (d[1] == ':')); | |
1547 | if (isDriveSpec) | |
1548 | { | |
1549 | wxChar firstChar = d[0]; | |
1550 | ||
1551 | // To upper case | |
1552 | if (firstChar > 90) | |
1553 | firstChar = firstChar - 32; | |
1554 | ||
1555 | // To a drive number | |
1556 | unsigned int driveNo = firstChar - 64; | |
1557 | if (driveNo > 0) | |
1558 | { | |
1559 | unsigned int noDrives; | |
1560 | _dos_setdrive(driveNo, &noDrives); | |
1561 | } | |
1562 | } | |
1563 | success = (chdir(WXSTRINGCAST d) == 0); | |
1564 | #endif | |
1565 | ||
1566 | #endif | |
1567 | if ( !success ) | |
1568 | { | |
1569 | wxLogSysError(_("Could not set current working directory")); | |
1570 | } | |
1571 | return success; | |
1572 | } | |
1573 | ||
1574 | // Get the OS directory if appropriate (such as the Windows directory). | |
1575 | // On non-Windows platform, probably just return the empty string. | |
1576 | wxString wxGetOSDirectory() | |
1577 | { | |
1578 | #ifdef __WXWINCE__ | |
1579 | return wxString(wxT("\\Windows")); | |
1580 | #elif defined(__WINDOWS__) && !defined(__WXMICROWIN__) | |
1581 | wxChar buf[MAX_PATH]; | |
1582 | if ( !GetWindowsDirectory(buf, MAX_PATH) ) | |
1583 | { | |
1584 | wxLogLastError(wxS("GetWindowsDirectory")); | |
1585 | } | |
1586 | ||
1587 | return wxString(buf); | |
1588 | #elif defined(__WXMAC__) && wxOSX_USE_CARBON | |
1589 | return wxMacFindFolderNoSeparator(kOnSystemDisk, 'macs', false); | |
1590 | #else | |
1591 | return wxEmptyString; | |
1592 | #endif | |
1593 | } | |
1594 | ||
1595 | bool wxEndsWithPathSeparator(const wxString& filename) | |
1596 | { | |
1597 | return !filename.empty() && wxIsPathSeparator(filename.Last()); | |
1598 | } | |
1599 | ||
1600 | // find a file in a list of directories, returns false if not found | |
1601 | bool wxFindFileInPath(wxString *pStr, const wxString& szPath, const wxString& szFile) | |
1602 | { | |
1603 | // we assume that it's not empty | |
1604 | wxCHECK_MSG( !szFile.empty(), false, | |
1605 | wxT("empty file name in wxFindFileInPath")); | |
1606 | ||
1607 | // skip path separator in the beginning of the file name if present | |
1608 | wxString szFile2; | |
1609 | if ( wxIsPathSeparator(szFile[0u]) ) | |
1610 | szFile2 = szFile.Mid(1); | |
1611 | else | |
1612 | szFile2 = szFile; | |
1613 | ||
1614 | wxStringTokenizer tkn(szPath, wxPATH_SEP); | |
1615 | ||
1616 | while ( tkn.HasMoreTokens() ) | |
1617 | { | |
1618 | wxString strFile = tkn.GetNextToken(); | |
1619 | if ( !wxEndsWithPathSeparator(strFile) ) | |
1620 | strFile += wxFILE_SEP_PATH; | |
1621 | strFile += szFile2; | |
1622 | ||
1623 | if ( wxFileExists(strFile) ) | |
1624 | { | |
1625 | *pStr = strFile; | |
1626 | return true; | |
1627 | } | |
1628 | } | |
1629 | ||
1630 | return false; | |
1631 | } | |
1632 | ||
1633 | #if WXWIN_COMPATIBILITY_2_8 | |
1634 | void WXDLLIMPEXP_BASE wxSplitPath(const wxString& fileName, | |
1635 | wxString *pstrPath, | |
1636 | wxString *pstrName, | |
1637 | wxString *pstrExt) | |
1638 | { | |
1639 | wxFileName::SplitPath(fileName, pstrPath, pstrName, pstrExt); | |
1640 | } | |
1641 | #endif // #if WXWIN_COMPATIBILITY_2_8 | |
1642 | ||
1643 | #if wxUSE_DATETIME | |
1644 | ||
1645 | time_t WXDLLIMPEXP_BASE wxFileModificationTime(const wxString& filename) | |
1646 | { | |
1647 | wxDateTime mtime; | |
1648 | if ( !wxFileName(filename).GetTimes(NULL, &mtime, NULL) ) | |
1649 | return (time_t)-1; | |
1650 | ||
1651 | return mtime.GetTicks(); | |
1652 | } | |
1653 | ||
1654 | #endif // wxUSE_DATETIME | |
1655 | ||
1656 | ||
1657 | // Parses the filterStr, returning the number of filters. | |
1658 | // Returns 0 if none or if there's a problem. | |
1659 | // filterStr is in the form: "All files (*.*)|*.*|JPEG Files (*.jpeg)|*.jpeg" | |
1660 | ||
1661 | int WXDLLIMPEXP_BASE wxParseCommonDialogsFilter(const wxString& filterStr, | |
1662 | wxArrayString& descriptions, | |
1663 | wxArrayString& filters) | |
1664 | { | |
1665 | descriptions.Clear(); | |
1666 | filters.Clear(); | |
1667 | ||
1668 | wxString str(filterStr); | |
1669 | ||
1670 | wxString description, filter; | |
1671 | int pos = 0; | |
1672 | while( pos != wxNOT_FOUND ) | |
1673 | { | |
1674 | pos = str.Find(wxT('|')); | |
1675 | if ( pos == wxNOT_FOUND ) | |
1676 | { | |
1677 | // if there are no '|'s at all in the string just take the entire | |
1678 | // string as filter and make description empty for later autocompletion | |
1679 | if ( filters.IsEmpty() ) | |
1680 | { | |
1681 | descriptions.Add(wxEmptyString); | |
1682 | filters.Add(filterStr); | |
1683 | } | |
1684 | else | |
1685 | { | |
1686 | wxFAIL_MSG( wxT("missing '|' in the wildcard string!") ); | |
1687 | } | |
1688 | ||
1689 | break; | |
1690 | } | |
1691 | ||
1692 | description = str.Left(pos); | |
1693 | str = str.Mid(pos + 1); | |
1694 | pos = str.Find(wxT('|')); | |
1695 | if ( pos == wxNOT_FOUND ) | |
1696 | { | |
1697 | filter = str; | |
1698 | } | |
1699 | else | |
1700 | { | |
1701 | filter = str.Left(pos); | |
1702 | str = str.Mid(pos + 1); | |
1703 | } | |
1704 | ||
1705 | descriptions.Add(description); | |
1706 | filters.Add(filter); | |
1707 | } | |
1708 | ||
1709 | #if defined(__WXMOTIF__) | |
1710 | // split it so there is one wildcard per entry | |
1711 | for( size_t i = 0 ; i < descriptions.GetCount() ; i++ ) | |
1712 | { | |
1713 | pos = filters[i].Find(wxT(';')); | |
1714 | if (pos != wxNOT_FOUND) | |
1715 | { | |
1716 | // first split only filters | |
1717 | descriptions.Insert(descriptions[i],i+1); | |
1718 | filters.Insert(filters[i].Mid(pos+1),i+1); | |
1719 | filters[i]=filters[i].Left(pos); | |
1720 | ||
1721 | // autoreplace new filter in description with pattern: | |
1722 | // C/C++ Files(*.cpp;*.c;*.h)|*.cpp;*.c;*.h | |
1723 | // cause split into: | |
1724 | // C/C++ Files(*.cpp)|*.cpp | |
1725 | // C/C++ Files(*.c;*.h)|*.c;*.h | |
1726 | // and next iteration cause another split into: | |
1727 | // C/C++ Files(*.cpp)|*.cpp | |
1728 | // C/C++ Files(*.c)|*.c | |
1729 | // C/C++ Files(*.h)|*.h | |
1730 | for ( size_t k=i;k<i+2;k++ ) | |
1731 | { | |
1732 | pos = descriptions[k].Find(filters[k]); | |
1733 | if (pos != wxNOT_FOUND) | |
1734 | { | |
1735 | wxString before = descriptions[k].Left(pos); | |
1736 | wxString after = descriptions[k].Mid(pos+filters[k].Len()); | |
1737 | pos = before.Find(wxT('('),true); | |
1738 | if (pos>before.Find(wxT(')'),true)) | |
1739 | { | |
1740 | before = before.Left(pos+1); | |
1741 | before << filters[k]; | |
1742 | pos = after.Find(wxT(')')); | |
1743 | int pos1 = after.Find(wxT('(')); | |
1744 | if (pos != wxNOT_FOUND && (pos<pos1 || pos1==wxNOT_FOUND)) | |
1745 | { | |
1746 | before << after.Mid(pos); | |
1747 | descriptions[k] = before; | |
1748 | } | |
1749 | } | |
1750 | } | |
1751 | } | |
1752 | } | |
1753 | } | |
1754 | #endif | |
1755 | ||
1756 | // autocompletion | |
1757 | for( size_t j = 0 ; j < descriptions.GetCount() ; j++ ) | |
1758 | { | |
1759 | if ( descriptions[j].empty() && !filters[j].empty() ) | |
1760 | { | |
1761 | descriptions[j].Printf(_("Files (%s)"), filters[j].c_str()); | |
1762 | } | |
1763 | } | |
1764 | ||
1765 | return filters.GetCount(); | |
1766 | } | |
1767 | ||
1768 | #if defined(__WINDOWS__) && !(defined(__UNIX__) || defined(__OS2__)) | |
1769 | static bool wxCheckWin32Permission(const wxString& path, DWORD access) | |
1770 | { | |
1771 | // quoting the MSDN: "To obtain a handle to a directory, call the | |
1772 | // CreateFile function with the FILE_FLAG_BACKUP_SEMANTICS flag", but this | |
1773 | // doesn't work under Win9x/ME but then it's not needed there anyhow | |
1774 | const DWORD dwAttr = ::GetFileAttributes(path.t_str()); | |
1775 | if ( dwAttr == INVALID_FILE_ATTRIBUTES ) | |
1776 | { | |
1777 | // file probably doesn't exist at all | |
1778 | return false; | |
1779 | } | |
1780 | ||
1781 | if ( wxGetOsVersion() == wxOS_WINDOWS_9X ) | |
1782 | { | |
1783 | // FAT directories always allow all access, even if they have the | |
1784 | // readonly flag set, and FAT files can only be read-only | |
1785 | return (dwAttr & FILE_ATTRIBUTE_DIRECTORY) || | |
1786 | (access != GENERIC_WRITE || | |
1787 | !(dwAttr & FILE_ATTRIBUTE_READONLY)); | |
1788 | } | |
1789 | ||
1790 | HANDLE h = ::CreateFile | |
1791 | ( | |
1792 | path.t_str(), | |
1793 | access, | |
1794 | FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE, | |
1795 | NULL, | |
1796 | OPEN_EXISTING, | |
1797 | dwAttr & FILE_ATTRIBUTE_DIRECTORY | |
1798 | ? FILE_FLAG_BACKUP_SEMANTICS | |
1799 | : 0, | |
1800 | NULL | |
1801 | ); | |
1802 | if ( h != INVALID_HANDLE_VALUE ) | |
1803 | CloseHandle(h); | |
1804 | ||
1805 | return h != INVALID_HANDLE_VALUE; | |
1806 | } | |
1807 | #endif // __WINDOWS__ | |
1808 | ||
1809 | bool wxIsWritable(const wxString &path) | |
1810 | { | |
1811 | #if defined( __UNIX__ ) || defined(__OS2__) | |
1812 | // access() will take in count also symbolic links | |
1813 | return wxAccess(path.c_str(), W_OK) == 0; | |
1814 | #elif defined( __WINDOWS__ ) | |
1815 | return wxCheckWin32Permission(path, GENERIC_WRITE); | |
1816 | #else | |
1817 | wxUnusedVar(path); | |
1818 | // TODO | |
1819 | return false; | |
1820 | #endif | |
1821 | } | |
1822 | ||
1823 | bool wxIsReadable(const wxString &path) | |
1824 | { | |
1825 | #if defined( __UNIX__ ) || defined(__OS2__) | |
1826 | // access() will take in count also symbolic links | |
1827 | return wxAccess(path.c_str(), R_OK) == 0; | |
1828 | #elif defined( __WINDOWS__ ) | |
1829 | return wxCheckWin32Permission(path, GENERIC_READ); | |
1830 | #else | |
1831 | wxUnusedVar(path); | |
1832 | // TODO | |
1833 | return false; | |
1834 | #endif | |
1835 | } | |
1836 | ||
1837 | bool wxIsExecutable(const wxString &path) | |
1838 | { | |
1839 | #if defined( __UNIX__ ) || defined(__OS2__) | |
1840 | // access() will take in count also symbolic links | |
1841 | return wxAccess(path.c_str(), X_OK) == 0; | |
1842 | #elif defined( __WINDOWS__ ) | |
1843 | return wxCheckWin32Permission(path, GENERIC_EXECUTE); | |
1844 | #else | |
1845 | wxUnusedVar(path); | |
1846 | // TODO | |
1847 | return false; | |
1848 | #endif | |
1849 | } | |
1850 | ||
1851 | // Return the type of an open file | |
1852 | // | |
1853 | // Some file types on some platforms seem seekable but in fact are not. | |
1854 | // The main use of this function is to allow such cases to be detected | |
1855 | // (IsSeekable() is implemented as wxGetFileKind() == wxFILE_KIND_DISK). | |
1856 | // | |
1857 | // This is important for the archive streams, which benefit greatly from | |
1858 | // being able to seek on a stream, but which will produce corrupt archives | |
1859 | // if they unknowingly seek on a non-seekable stream. | |
1860 | // | |
1861 | // wxFILE_KIND_DISK is a good catch all return value, since other values | |
1862 | // disable features of the archive streams. Some other value must be returned | |
1863 | // for a file type that appears seekable but isn't. | |
1864 | // | |
1865 | // Known examples: | |
1866 | // * Pipes on Windows | |
1867 | // * Files on VMS with a record format other than StreamLF | |
1868 | // | |
1869 | wxFileKind wxGetFileKind(int fd) | |
1870 | { | |
1871 | #if defined __WINDOWS__ && !defined __WXWINCE__ && defined wxGetOSFHandle | |
1872 | switch (::GetFileType(wxGetOSFHandle(fd)) & ~FILE_TYPE_REMOTE) | |
1873 | { | |
1874 | case FILE_TYPE_CHAR: | |
1875 | return wxFILE_KIND_TERMINAL; | |
1876 | case FILE_TYPE_DISK: | |
1877 | return wxFILE_KIND_DISK; | |
1878 | case FILE_TYPE_PIPE: | |
1879 | return wxFILE_KIND_PIPE; | |
1880 | } | |
1881 | ||
1882 | return wxFILE_KIND_UNKNOWN; | |
1883 | ||
1884 | #elif defined(__UNIX__) | |
1885 | if (isatty(fd)) | |
1886 | return wxFILE_KIND_TERMINAL; | |
1887 | ||
1888 | struct stat st; | |
1889 | fstat(fd, &st); | |
1890 | ||
1891 | if (S_ISFIFO(st.st_mode)) | |
1892 | return wxFILE_KIND_PIPE; | |
1893 | if (!S_ISREG(st.st_mode)) | |
1894 | return wxFILE_KIND_UNKNOWN; | |
1895 | ||
1896 | #if defined(__VMS__) | |
1897 | if (st.st_fab_rfm != FAB$C_STMLF) | |
1898 | return wxFILE_KIND_UNKNOWN; | |
1899 | #endif | |
1900 | ||
1901 | return wxFILE_KIND_DISK; | |
1902 | ||
1903 | #else | |
1904 | #define wxFILEKIND_STUB | |
1905 | (void)fd; | |
1906 | return wxFILE_KIND_DISK; | |
1907 | #endif | |
1908 | } | |
1909 | ||
1910 | wxFileKind wxGetFileKind(FILE *fp) | |
1911 | { | |
1912 | // Note: The watcom rtl dll doesn't have fileno (the static lib does). | |
1913 | // Should be fixed in version 1.4. | |
1914 | #if defined(wxFILEKIND_STUB) || wxONLY_WATCOM_EARLIER_THAN(1,4) | |
1915 | (void)fp; | |
1916 | return wxFILE_KIND_DISK; | |
1917 | #elif defined(__WINDOWS__) && !defined(__CYGWIN__) && !defined(__WATCOMC__) && !defined(__WINE__) | |
1918 | return fp ? wxGetFileKind(_fileno(fp)) : wxFILE_KIND_UNKNOWN; | |
1919 | #else | |
1920 | return fp ? wxGetFileKind(fileno(fp)) : wxFILE_KIND_UNKNOWN; | |
1921 | #endif | |
1922 | } | |
1923 | ||
1924 | ||
1925 | //------------------------------------------------------------------------ | |
1926 | // wild character routines | |
1927 | //------------------------------------------------------------------------ | |
1928 | ||
1929 | bool wxIsWild( const wxString& pattern ) | |
1930 | { | |
1931 | for ( wxString::const_iterator p = pattern.begin(); p != pattern.end(); ++p ) | |
1932 | { | |
1933 | switch ( (*p).GetValue() ) | |
1934 | { | |
1935 | case wxT('?'): | |
1936 | case wxT('*'): | |
1937 | case wxT('['): | |
1938 | case wxT('{'): | |
1939 | return true; | |
1940 | ||
1941 | case wxT('\\'): | |
1942 | if ( ++p == pattern.end() ) | |
1943 | return false; | |
1944 | } | |
1945 | } | |
1946 | return false; | |
1947 | } | |
1948 | ||
1949 | /* | |
1950 | * Written By Douglas A. Lewis <dalewis@cs.Buffalo.EDU> | |
1951 | * | |
1952 | * The match procedure is public domain code (from ircII's reg.c) | |
1953 | * but modified to suit our tastes (RN: No "%" syntax I guess) | |
1954 | */ | |
1955 | ||
1956 | bool wxMatchWild( const wxString& pat, const wxString& text, bool dot_special ) | |
1957 | { | |
1958 | if (text.empty()) | |
1959 | { | |
1960 | /* Match if both are empty. */ | |
1961 | return pat.empty(); | |
1962 | } | |
1963 | ||
1964 | const wxChar *m = pat.c_str(), | |
1965 | *n = text.c_str(), | |
1966 | *ma = NULL, | |
1967 | *na = NULL; | |
1968 | int just = 0, | |
1969 | acount = 0, | |
1970 | count = 0; | |
1971 | ||
1972 | if (dot_special && (*n == wxT('.'))) | |
1973 | { | |
1974 | /* Never match so that hidden Unix files | |
1975 | * are never found. */ | |
1976 | return false; | |
1977 | } | |
1978 | ||
1979 | for (;;) | |
1980 | { | |
1981 | if (*m == wxT('*')) | |
1982 | { | |
1983 | ma = ++m; | |
1984 | na = n; | |
1985 | just = 1; | |
1986 | acount = count; | |
1987 | } | |
1988 | else if (*m == wxT('?')) | |
1989 | { | |
1990 | m++; | |
1991 | if (!*n++) | |
1992 | return false; | |
1993 | } | |
1994 | else | |
1995 | { | |
1996 | if (*m == wxT('\\')) | |
1997 | { | |
1998 | m++; | |
1999 | /* Quoting "nothing" is a bad thing */ | |
2000 | if (!*m) | |
2001 | return false; | |
2002 | } | |
2003 | if (!*m) | |
2004 | { | |
2005 | /* | |
2006 | * If we are out of both strings or we just | |
2007 | * saw a wildcard, then we can say we have a | |
2008 | * match | |
2009 | */ | |
2010 | if (!*n) | |
2011 | return true; | |
2012 | if (just) | |
2013 | return true; | |
2014 | just = 0; | |
2015 | goto not_matched; | |
2016 | } | |
2017 | /* | |
2018 | * We could check for *n == NULL at this point, but | |
2019 | * since it's more common to have a character there, | |
2020 | * check to see if they match first (m and n) and | |
2021 | * then if they don't match, THEN we can check for | |
2022 | * the NULL of n | |
2023 | */ | |
2024 | just = 0; | |
2025 | if (*m == *n) | |
2026 | { | |
2027 | m++; | |
2028 | count++; | |
2029 | n++; | |
2030 | } | |
2031 | else | |
2032 | { | |
2033 | ||
2034 | not_matched: | |
2035 | ||
2036 | /* | |
2037 | * If there are no more characters in the | |
2038 | * string, but we still need to find another | |
2039 | * character (*m != NULL), then it will be | |
2040 | * impossible to match it | |
2041 | */ | |
2042 | if (!*n) | |
2043 | return false; | |
2044 | ||
2045 | if (ma) | |
2046 | { | |
2047 | m = ma; | |
2048 | n = ++na; | |
2049 | count = acount; | |
2050 | } | |
2051 | else | |
2052 | return false; | |
2053 | } | |
2054 | } | |
2055 | } | |
2056 | } | |
2057 | ||
2058 | #ifdef __VISUALC__ | |
2059 | #pragma warning(default:4706) // assignment within conditional expression | |
2060 | #endif // VC++ |