]> git.saurik.com Git - wxWidgets.git/blobdiff - src/common/file.cpp
there is no sqrt(int) in standard C++ (although glibc seems to provide it); select...
[wxWidgets.git] / src / common / file.cpp
index 6c6ae4acc553a189c3bfd92bc01dcaa30e43fa5f..58e36f221899a1557a96c7015cb2871b53b73092 100644 (file)
@@ -1,5 +1,5 @@
 /////////////////////////////////////////////////////////////////////////////
-// Name:        file.cpp
+// Name:        src/common/file.cpp
 // Purpose:     wxFile - encapsulates low-level "file descriptor"
 //              wxTempFile
 // Author:      Vadim Zeitlin
 // Created:     29/01/98
 // RCS-ID:      $Id$
 // Copyright:   (c) 1998 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
-// Licence:    wxWindows license
+// Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 
 // ----------------------------------------------------------------------------
 // headers
 // ----------------------------------------------------------------------------
 
-#ifdef __GNUG__
-#pragma implementation "file.h"
-#endif
-
 // For compilers that support precompilation, includes "wx.h".
 #include "wx/wxprec.h"
-#include "wx/defs.h"
 
 #ifdef __BORLANDC__
-#pragma hdrstop
+  #pragma hdrstop
 #endif
 
+#if wxUSE_FILE
+
 // standard
-#if    defined(__WINDOWS__) && !defined(__GNUWIN32__)
-  #include  <io.h>
+#if defined(__WXMSW__) && !defined(__GNUWIN32__) && !defined(__WXMICROWIN__) && !defined(__WXWINCE__)
+
+#define   WIN32_LEAN_AND_MEAN
+#define   NOSERVICE
+#define   NOIME
+#define   NOATOM
+#define   NOGDI
+#define   NOGDICAPMASKS
+#define   NOMETAFILE
+#define   NOMINMAX
+#define   NOMSG
+#define   NOOPENFILE
+#define   NORASTEROPS
+#define   NOSCROLL
+#define   NOSOUND
+#define   NOSYSMETRICS
+#define   NOTEXTMETRIC
+#define   NOWH
+#define   NOCOMM
+#define   NOKANJI
+#define   NOCRYPT
+#define   NOMCX
+
+#elif defined(__WXMSW__) && defined(__WXWINCE__)
+    #include  "wx/msw/missing.h"
+#elif (defined(__OS2__))
+    #include <io.h>
 #elif (defined(__UNIX__) || defined(__GNUWIN32__))
-  #include  <unistd.h>
+    #include  <unistd.h>
+    #include  <time.h>
+    #include  <sys/stat.h>
+    #ifdef __GNUWIN32__
+        #include "wx/msw/wrapwin.h"
+    #endif
+#elif defined(__DOS__)
+    #if defined(__WATCOMC__)
+       #include <io.h>
+    #elif defined(__DJGPP__)
+       #include <io.h>
+       #include <unistd.h>
+       #include <stdio.h>
+    #else
+        #error  "Please specify the header with file functions declarations."
+    #endif
+#elif (defined(__WXSTUBS__))
+    // Have to ifdef this for different environments
+    #include <io.h>
+#elif (defined(__WXMAC__))
+#if __MSL__ < 0x6000
+    int access( const char *path, int mode ) { return 0 ; }
 #else
-       #error  "Please specify the header with file functions declarations."
+    int _access( const char *path, int mode ) { return 0 ; }
+#endif
+    char* mktemp( char * path ) { return path ;}
+    #include <stat.h>
+    #include <unistd.h>
+#elif defined(__WXPALMOS__)
+    #include "wx/palmos/missing.h"
+#else
+    #error  "Please specify the header with file functions declarations."
 #endif  //Win/UNIX
 
 #include  <stdio.h>       // SEEK_xxx constants
-#include  <fcntl.h>       // O_RDONLY &c
-#include  <sys/types.h>   // needed for stat
-#include  <sys/stat.h>    // stat
-
-// Microsoft compiler loves underscores, feed them to it
-#ifdef    _MSC_VER
-  // functions
-  #define   open        _open
-  #define   close       _close
-  #define   read        _read
-  #define   write       _write
-  #define   lseek       _lseek
-  #define   fsync       _commit
-  #define   access      _access
-  #define   eof         _eof
-
-  // types
-  #define   stat        _stat
-
-  // constants
-  #define   O_RDONLY    _O_RDONLY
-  #define   O_WRONLY    _O_WRONLY
-  #define   O_RDWR      _O_RDWR
-  #define   O_EXCL      _O_EXCL
-  #define   O_CREAT     _O_CREAT
-  #define   O_BINARY    _O_BINARY
-
-  #define   S_IFDIR     _S_IFDIR
-  #define   S_IFREG     _S_IFREG
-
-  #define   S_IREAD     _S_IREAD
-  #define   S_IWRITE    _S_IWRITE
-#else
-  #define   tell(fd)    lseek(fd, 0, SEEK_CUR)
-#endif  //_MSC_VER
 
-// there is no distinction between text and binary files under Unix
-#ifdef         __UNIX__
-       #define         O_BINARY                (0)
-#endif //__UNIX__
+// Windows compilers don't have these constants
+#ifndef W_OK
+    enum
+    {
+        F_OK = 0,   // test for existence
+        X_OK = 1,   //          execute permission
+        W_OK = 2,   //          write
+        R_OK = 4    //          read
+    };
+#endif // W_OK
+
+// wxWidgets
+#ifndef WX_PRECOMP
+    #include  "wx/string.h"
+    #include  "wx/intl.h"
+    #include  "wx/log.h"
+    #include "wx/crt.h"
+#endif // !WX_PRECOMP
+
+#include  "wx/filename.h"
+#include  "wx/file.h"
+#include  "wx/filefn.h"
+
+// there is no distinction between text and binary files under Unix, so define
+// O_BINARY as 0 if the system headers don't do it already
+#if defined(__UNIX__) && !defined(O_BINARY)
+    #define   O_BINARY    (0)
+#endif  //__UNIX__
+
+#ifdef __WXMSW__
+    #include "wx/msw/mslu.h"
+#endif
 
-// wxWindows
-#include  <wx/string.h>
-#include  <wx/intl.h>
-#include  <wx/file.h>
-#include  <wx/log.h>
+#ifdef __WXWINCE__
+    #include "wx/msw/private.h"
+#endif
 
+#ifndef MAX_PATH
+    #define MAX_PATH 512
+#endif
 
 // ============================================================================
 // implementation of wxFile
 // ----------------------------------------------------------------------------
 // static functions
 // ----------------------------------------------------------------------------
-bool wxFile::Exists(const char *sz)
-{ 
-  struct stat st; 
-  return !access(sz, 0) && !stat(sz, &st) && (st.st_mode & S_IFREG);
+
+bool wxFile::Exists(const wxString& name)
+{
+    return wxFileExists(name);
+}
+
+bool wxFile::Access(const wxString& name, OpenMode mode)
+{
+    int how;
+
+    switch ( mode )
+    {
+        default:
+            wxFAIL_MSG(wxT("bad wxFile::Access mode parameter."));
+            // fall through
+
+        case read:
+            how = R_OK;
+            break;
+
+        case write:
+            how = W_OK;
+            break;
+
+        case read_write:
+            how = R_OK | W_OK;
+            break;
+    }
+
+    return wxAccess(name, how) == 0;
 }
 
 // ----------------------------------------------------------------------------
@@ -102,77 +173,100 @@ bool wxFile::Exists(const char *sz)
 // ----------------------------------------------------------------------------
 
 // ctors
-wxFile::wxFile(const char *szFileName, OpenMode mode)
+wxFile::wxFile(const wxString& fileName, OpenMode mode)
 {
-  m_fd = fd_invalid;
-
-  Open(szFileName, mode);
-}
+    m_fd = fd_invalid;
+    m_error = false;
 
-// dtor
-wxFile::~wxFile()
-{
-  Close();
+    Open(fileName, mode);
 }
 
 // create the file, fail if it already exists and bOverwrite
-bool wxFile::Create(const char *szFileName, bool bOverwrite)
+bool wxFile::Create(const wxString& fileName, bool bOverwrite, int accessMode)
 {
-  // if bOverwrite we create a new file or truncate the existing one,
-  // otherwise we only create the new file and fail if it already exists
-  int fd = bOverwrite ? creat(szFileName, 0) 
-                      : open(szFileName, O_CREAT | O_EXCL);
-
-  if ( fd == -1 ) {
-    wxLogSysError("can't create file '%s'", szFileName);
-    return FALSE;
-  }
-  else {
+    // if bOverwrite we create a new file or truncate the existing one,
+    // otherwise we only create the new file and fail if it already exists
+    int fd = wxOpen( fileName,
+                     O_BINARY | O_WRONLY | O_CREAT |
+                     (bOverwrite ? O_TRUNC : O_EXCL),
+                     accessMode );
+    if ( fd == -1 )
+    {
+        wxLogSysError(_("can't create file '%s'"), fileName);
+        return false;
+    }
+
     Attach(fd);
-    return TRUE;
-  }
+    return true;
 }
 
 // open the file
-bool wxFile::Open(const char *szFileName, OpenMode mode)
+bool wxFile::Open(const wxString& fileName, OpenMode mode, int accessMode)
 {
-  int flags = O_BINARY;
-
-  switch ( mode ) {
-    case read:      
-      flags |= O_RDONLY; 
-      break;
+    int flags = O_BINARY;
+
+    switch ( mode )
+    {
+        case read:
+            flags |= O_RDONLY;
+            break;
+
+        case write_append:
+            if ( wxFile::Exists(fileName) )
+            {
+                flags |= O_WRONLY | O_APPEND;
+                break;
+            }
+            //else: fall through as write_append is the same as write if the
+            //      file doesn't exist
+
+        case write:
+            flags |= O_WRONLY | O_CREAT | O_TRUNC;
+            break;
+
+        case write_excl:
+            flags |= O_WRONLY | O_CREAT | O_EXCL;
+            break;
+
+        case read_write:
+            flags |= O_RDWR;
+            break;
+    }
 
-    case write:     
-      flags |= O_WRONLY | O_CREAT; 
-      break;
+#ifdef __WINDOWS__
+    // only read/write bits for "all" are supported by this function under
+    // Windows, and VC++ 8 returns EINVAL if any other bits are used in
+    // accessMode, so clear them as they have at best no effect anyhow
+    accessMode &= wxS_IRUSR | wxS_IWUSR;
+#endif // __WINDOWS__
 
-    case read_write: 
-      flags |= O_RDWR;
-      break;
-  }
+    int fd = wxOpen( fileName, flags, accessMode);
 
-  int fd = open(szFileName, flags, S_IREAD | S_IWRITE);
+    if ( fd == -1 )
+    {
+        wxLogSysError(_("can't open file '%s'"), fileName);
+        return false;
+    }
 
-  if ( fd == -1 ) {
-    wxLogSysError("can't open file '%s'", szFileName);
-    return FALSE;
-  }
-  else {
     Attach(fd);
-    return TRUE;
-  }
+    return true;
 }
 
 // close
-void wxFile::Close()
+bool wxFile::Close()
 {
-  if ( IsOpened() ) {
-    if ( close(m_fd) == -1 )
-      wxLogSysError("can't close file descriptor %d", m_fd);
+    if ( IsOpened() ) {
+        if (wxClose(m_fd) == -1)
+        {
+            wxLogSysError(_("can't close file descriptor %d"), m_fd);
+            m_fd = fd_invalid;
+            return false;
+        }
+        else
+            m_fd = fd_invalid;
+    }
 
-    m_fd = fd_invalid;
-  }
+    return true;
 }
 
 // ----------------------------------------------------------------------------
@@ -180,46 +274,65 @@ void wxFile::Close()
 // ----------------------------------------------------------------------------
 
 // read
-off_t wxFile::Read(void *pBuf, off_t nCount)
+ssize_t wxFile::Read(void *pBuf, size_t nCount)
 {
-  wxCHECK_RET( (pBuf != NULL) && IsOpened(), 0 );
-
-  int iRc = ::read(m_fd, pBuf, nCount);
-  if ( iRc == -1 ) {
-    wxLogSysError("can't read from file descriptor %d", m_fd);
-    return ofsInvalid;
-  }
-  else
-    return (uint)iRc;
+    wxCHECK( (pBuf != NULL) && IsOpened(), 0 );
+
+    ssize_t iRc = wxRead(m_fd, pBuf, nCount);
+
+    if ( iRc == -1 )
+    {
+        wxLogSysError(_("can't read from file descriptor %d"), m_fd);
+        return wxInvalidOffset;
+    }
+
+    return iRc;
 }
 
 // write
-bool wxFile::Write(const void *pBuf, uint nCount)
+size_t wxFile::Write(const void *pBuf, size_t nCount)
 {
-  wxCHECK_RET( (pBuf != NULL) && IsOpened(), 0 );
-
-  int iRc = ::write(m_fd, pBuf, nCount);
-  if ( iRc == -1 ) {
-    wxLogSysError("can't write to file descriptor %d", m_fd);
-    return FALSE;
-  }
-  else
-    return TRUE;
+    wxCHECK( (pBuf != NULL) && IsOpened(), 0 );
+
+    ssize_t iRc = wxWrite(m_fd, pBuf, nCount);
+
+    if ( iRc == -1 )
+    {
+        wxLogSysError(_("can't write to file descriptor %d"), m_fd);
+        m_error = true;
+        iRc = 0;
+    }
+
+    return iRc;
+}
+
+bool wxFile::Write(const wxString& s, const wxMBConv& conv)
+{
+  const wxWX2MBbuf buf = s.mb_str(conv);
+  if ( !buf )
+      return false;
+
+  const size_t size = strlen(buf); // FIXME: use buf.length() when available
+  return Write(buf, size) == size;
 }
 
 // flush
 bool wxFile::Flush()
 {
-  if ( IsOpened() ) {
-               // ## fsync() is not ANSI (BSDish)
-//    if ( fsync(m_fd) == -1 ) { // TODO
-      if (TRUE) {
-      wxLogSysError("can't flush file descriptor %d", m_fd);
-      return FALSE;
+#ifdef HAVE_FSYNC
+    // fsync() only works on disk files and returns errors for pipes, don't
+    // call it then
+    if ( IsOpened() && GetKind() == wxFILE_KIND_DISK )
+    {
+        if ( wxFsync(m_fd) == -1 )
+        {
+            wxLogSysError(_("can't flush file descriptor %d"), m_fd);
+            return false;
+        }
     }
-  }
+#endif // HAVE_FSYNC
 
-  return TRUE;
+    return true;
 }
 
 // ----------------------------------------------------------------------------
@@ -227,122 +340,126 @@ bool wxFile::Flush()
 // ----------------------------------------------------------------------------
 
 // seek
-off_t wxFile::Seek(off_t ofs, SeekMode mode)
+wxFileOffset wxFile::Seek(wxFileOffset ofs, wxSeekMode mode)
 {
-  wxASSERT( IsOpened() );
-
-  int flag = -1;
-  switch ( mode ) {
-    case FromStart:
-      flag = SEEK_SET;
-      break;
-
-    case FromCurrent:
-      flag = SEEK_CUR;
-      break;
-
-    case FromEnd:
-      flag = SEEK_END;
-      break;
-
-    default:
-      wxFAIL_MSG("unknown seek origin");
-  }
-
-  int iRc = lseek(m_fd, ofs, flag);
-  if ( iRc == -1 ) {
-    wxLogSysError("can't seek on file descriptor %d", m_fd);
-    return ofsInvalid;
-  }
-  else
-    return (off_t)iRc;
+    wxASSERT_MSG( IsOpened(), _T("can't seek on closed file") );
+    wxCHECK_MSG( ofs != wxInvalidOffset || mode != wxFromStart,
+                 wxInvalidOffset,
+                 _T("invalid absolute file offset") );
+
+    int origin;
+    switch ( mode ) {
+        default:
+            wxFAIL_MSG(_T("unknown seek origin"));
+
+        case wxFromStart:
+            origin = SEEK_SET;
+            break;
+
+        case wxFromCurrent:
+            origin = SEEK_CUR;
+            break;
+
+        case wxFromEnd:
+            origin = SEEK_END;
+            break;
+    }
+
+    wxFileOffset iRc = wxSeek(m_fd, ofs, origin);
+    if ( iRc == wxInvalidOffset )
+    {
+        wxLogSysError(_("can't seek on file descriptor %d"), m_fd);
+    }
+
+    return iRc;
 }
 
-// get current off_t
-off_t wxFile::Tell() const
+// get current file offset
+wxFileOffset wxFile::Tell() const
 {
-  wxASSERT( IsOpened() );
-
-  int iRc = tell(m_fd);
-  if ( iRc == -1 ) {
-    wxLogSysError("can't get seek position on file descriptor %d", m_fd);
-    return ofsInvalid;
-  }
-  else
-    return (off_t)iRc;
+    wxASSERT( IsOpened() );
+
+    wxFileOffset iRc = wxTell(m_fd);
+    if ( iRc == wxInvalidOffset )
+    {
+        wxLogSysError(_("can't get seek position on file descriptor %d"), m_fd);
+    }
+
+    return iRc;
 }
 
 // get current file length
-off_t wxFile::Length() const
+wxFileOffset wxFile::Length() const
 {
-  wxASSERT( IsOpened() );
-
-  #ifdef  _MSC_VER
-    int iRc = _filelength(m_fd);
-  #else
-    int iRc = tell(m_fd);
-    if ( iRc != -1 ) {
-                       // # have to use const_cast :-(
-      int iLen = ((wxFile *)this)->SeekEnd();
-      if ( iLen != -1 ) {
-        // restore old position
-        if ( ((wxFile *)this)->Seek(iRc) == -1 ) {
-          // error
-          iLen = -1;
+    wxASSERT( IsOpened() );
+
+    // we use a special method for Linux systems where files in sysfs (i.e.
+    // those under /sys typically) return length of 4096 bytes even when
+    // they're much smaller -- this is a problem as it results in errors later
+    // when we try reading 4KB from them
+#ifdef __LINUX__
+    struct stat st;
+    if ( fstat(m_fd, &st) == 0 )
+    {
+        // returning 0 for the special files indicates to the caller that they
+        // are not seekable
+        return st.st_blocks ? st.st_size : 0;
+    }
+    //else: failed to stat, try the normal method
+#endif // __LINUX__
+
+    wxFileOffset iRc = Tell();
+    if ( iRc != wxInvalidOffset ) {
+        // have to use const_cast :-(
+        wxFileOffset iLen = ((wxFile *)this)->SeekEnd();
+        if ( iLen != wxInvalidOffset ) {
+            // restore old position
+            if ( ((wxFile *)this)->Seek(iRc) == wxInvalidOffset ) {
+                // error
+                iLen = wxInvalidOffset;
+            }
         }
-      }
 
-      iRc = iLen;
+        iRc = iLen;
     }
 
-  #endif  //_MSC_VER
+    if ( iRc == wxInvalidOffset )
+    {
+        wxLogSysError(_("can't find length of file on file descriptor %d"), m_fd);
+    }
 
-  if ( iRc == -1 ) {
-    wxLogSysError("can't find length of file on file descriptor %d", m_fd);
-    return ofsInvalid;
-  }
-  else
-    return (off_t)iRc;
+    return iRc;
 }
 
 // is end of file reached?
 bool wxFile::Eof() const
 {
-  wxASSERT( IsOpened() );
-
-  // TODO: no eof in GnuWin32
-  
-#ifdef __LINUX__
-
-  int iRc = Tell() == Length();
-
-#else  
-  
-#if defined(__GNUWIN32__)
-  int iRc = -1;
-#else
-  int iRc = eof(m_fd);
-#endif
-
-#endif
-
-  switch ( iRc ) {
-    case 1:
-      break;
-
-    case 0:
-      return FALSE;
-
-    case -1:
-      wxLogSysError("can't determine if the end of file is reached on "
-                    "descriptor %d", m_fd);
-      break;
-
-    default:
-      wxFAIL_MSG("invalid eof() return value.");
-  }
-
-  return TRUE;
+    wxASSERT( IsOpened() );
+
+    wxFileOffset iRc;
+
+#if defined(__DOS__) || defined(__UNIX__) || defined(__GNUWIN32__) || defined( __MWERKS__ )
+    // @@ this doesn't work, of course, on unseekable file descriptors
+    wxFileOffset ofsCur = Tell(),
+    ofsMax = Length();
+    if ( ofsCur == wxInvalidOffset || ofsMax == wxInvalidOffset )
+        iRc = wxInvalidOffset;
+    else
+        iRc = ofsCur == ofsMax;
+#else  // Windows and "native" compiler
+    iRc = wxEof(m_fd);
+#endif // Windows/Unix
+
+    if ( iRc == 1)
+        {}
+    else if ( iRc == 0 )
+        return false;
+    else if ( iRc == wxInvalidOffset )
+        wxLogSysError(_("can't determine if the end of file is reached on descriptor %d"), m_fd);
+    else
+        wxFAIL_MSG(_T("invalid eof() return value."));
+
+    return true;
 }
 
 // ============================================================================
@@ -352,16 +469,64 @@ bool wxFile::Eof() const
 // ----------------------------------------------------------------------------
 // construction
 // ----------------------------------------------------------------------------
+
 wxTempFile::wxTempFile(const wxString& strName)
 {
-  Open(strName);
+    Open(strName);
 }
 
 bool wxTempFile::Open(const wxString& strName)
 {
-  m_strName = strName;
-  m_strTemp = tmpnam(NULL);
-  return m_file.Open(m_strTemp, wxFile::write);
+    // we must have an absolute filename because otherwise CreateTempFileName()
+    // would create the temp file in $TMP (i.e. the system standard location
+    // for the temp files) which might be on another volume/drive/mount and
+    // wxRename()ing it later to m_strName from Commit() would then fail
+    //
+    // with the absolute filename, the temp file is created in the same
+    // directory as this one which ensures that wxRename() may work later
+    wxFileName fn(strName);
+    if ( !fn.IsAbsolute() )
+    {
+        fn.Normalize(wxPATH_NORM_ABSOLUTE);
+    }
+
+    m_strName = fn.GetFullPath();
+
+    m_strTemp = wxFileName::CreateTempFileName(m_strName, &m_file);
+
+    if ( m_strTemp.empty() )
+    {
+        // CreateTempFileName() failed
+        return false;
+    }
+
+#ifdef __UNIX__
+    // the temp file should have the same permissions as the original one
+    mode_t mode;
+
+    wxStructStat st;
+    if ( stat( (const char*) m_strName.fn_str(), &st) == 0 )
+    {
+        mode = st.st_mode;
+    }
+    else
+    {
+        // file probably didn't exist, just give it the default mode _using_
+        // user's umask (new files creation should respect umask)
+        mode_t mask = umask(0777);
+        mode = 0666 & ~mask;
+        umask(mask);
+    }
+
+    if ( chmod( (const char*) m_strTemp.fn_str(), mode) == -1 )
+    {
+#ifndef __OS2__
+        wxLogSysError(_("Failed to set temporary file permissions"));
+#endif
+    }
+#endif // Unix
+
+    return true;
 }
 
 // ----------------------------------------------------------------------------
@@ -370,30 +535,33 @@ bool wxTempFile::Open(const wxString& strName)
 
 wxTempFile::~wxTempFile()
 {
-  if ( IsOpened() )
-    Discard();
+    if ( IsOpened() )
+        Discard();
 }
 
 bool wxTempFile::Commit()
 {
-  m_file.Close();
+    m_file.Close();
 
-  if ( wxFile::Exists(m_strName) && remove(m_strName) != 0 ) {
-    wxLogSysError("can't remove file '%s'", m_strName.c_str());
-    return FALSE;
-  }
+    if ( wxFile::Exists(m_strName) && wxRemove(m_strName) != 0 ) {
+        wxLogSysError(_("can't remove file '%s'"), m_strName.c_str());
+        return false;
+    }
 
-  if ( rename(m_strTemp, m_strName) != 0 ) {
-    wxLogSysError("can't commit changes to file '%s'", m_strName.c_str());
-    return FALSE;
-  }
+    if ( !wxRenameFile(m_strTemp, m_strName)  ) {
+        wxLogSysError(_("can't commit changes to file '%s'"), m_strName.c_str());
+        return false;
+    }
 
-  return TRUE;
+    return true;
 }
 
 void wxTempFile::Discard()
 {
-  m_file.Close();
-  if ( remove(m_strTemp) != 0 )
-    wxLogSysError("can't remove temporary file '%s'", m_strTemp.c_str());
+    m_file.Close();
+    if ( wxRemove(m_strTemp) != 0 )
+        wxLogSysError(_("can't remove temporary file '%s'"), m_strTemp.c_str());
 }
+
+#endif // wxUSE_FILE
+