Added long-filename functions & normalisation; patch to Watcom makefiles

[wxWidgets.git] / src / common / textfile.cpp

diff --git a/src/common/textfile.cpp b/src/common/textfile.cpp
index 2e6ad8bdd9209918e202c6b5c84ef31700e533c5..8dff698c9bc31a80057057b3f18729756ba50de2 100644 (file)
--- a/src/common/textfile.cpp
+++ b/src/common/textfile.cpp
@@ -14,27 +14,35 @@
 // ============================================================================
 
 #ifdef __GNUG__
 // ============================================================================
 
 #ifdef __GNUG__

-#pragma implementation "textfile.h"
+    #pragma implementation "textfile.h"

 #endif
 
 #include  "wx/wxprec.h"
 
 #ifdef    __BORLANDC__
 #endif
 
 #include  "wx/wxprec.h"
 
 #ifdef    __BORLANDC__

-  #pragma hdrstop
+    #pragma hdrstop

 #endif  //__BORLANDC__
 
 #endif  //__BORLANDC__
 

-#include  <wx/string.h>
-#include  <wx/intl.h>
-#include  <wx/file.h>
-#include  <wx/log.h>
-#include  <wx/textfile.h>
+#if !wxUSE_FILE
+    #undef wxUSE_TEXTFILE
+    #define wxUSE_TEXTFILE 0
+#endif // wxUSE_FILE
+
+#ifndef WX_PRECOMP
+    #include  "wx/string.h"
+    #include  "wx/intl.h"
+    #include  "wx/file.h"
+    #include  "wx/log.h"
+#endif
+
+#include  "wx/textfile.h"

 
 // ============================================================================
 // wxTextFile class implementation
 // ============================================================================
 
 // ----------------------------------------------------------------------------
 
 // ============================================================================
 // wxTextFile class implementation
 // ============================================================================
 
 // ----------------------------------------------------------------------------

-// static variables
+// static methods (always compiled in)

 // ----------------------------------------------------------------------------
 
 // default type is the native one
 // ----------------------------------------------------------------------------
 
 // default type is the native one


@@ -45,11 +53,91 @@ const wxTextFileType wxTextFile::typeDefault =
   wxTextFileType_Unix;
 #elif defined(__WXMAC__)
   wxTextFileType_Mac;
   wxTextFileType_Unix;
 #elif defined(__WXMAC__)
   wxTextFileType_Mac;

+#elif defined(__WXPM__)
+  wxTextFileType_Os2;

 #else
   wxTextFileType_None;
   #error  "wxTextFile: unsupported platform."
 #endif
 
 #else
   wxTextFileType_None;
   #error  "wxTextFile: unsupported platform."
 #endif
 

+const wxChar *wxTextFile::GetEOL(wxTextFileType type)
+{
+    switch ( type ) {
+      default:
+        wxFAIL_MSG(wxT("bad file type in wxTextFile::GetEOL."));
+        // fall through nevertheless - we must return something...
+
+      case wxTextFileType_None: return wxT("");
+      case wxTextFileType_Unix: return wxT("\n");
+      case wxTextFileType_Dos:  return wxT("\r\n");
+      case wxTextFileType_Mac:  return wxT("\r");
+    }
+}
+
+wxString wxTextFile::Translate(const wxString& text, wxTextFileType type)
+{
+    // don't do anything if there is nothing to do
+    if ( type == wxTextFileType_None )
+        return text;
+
+    // GRG: don't do anything either if it is empty
+    if ( text.IsEmpty() )
+        return text;
+
+    wxString eol = GetEOL(type), result;
+
+    // optimization: we know that the length of the new string will be about
+    // the same as the length of the old one, so prealloc memory to aviod
+    // unnecessary relocations
+    result.Alloc(text.Len());
+
+    wxChar chLast = 0;
+    for ( const wxChar *pc = text.c_str(); *pc; pc++ )
+    {
+        wxChar ch = *pc;
+        switch ( ch ) {
+            case _T('\n'):
+                // Dos/Unix line termination
+                result += eol;
+                chLast = 0;
+                break;
+
+            case _T('\r'):
+                if ( chLast == _T('\r') ) {
+                    // Mac empty line
+                    result += eol;
+                }
+                else {
+                    // just remember it: we don't know whether it is just "\r"
+                    // or "\r\n" yet
+                    chLast = _T('\r');
+                }
+                break;
+
+            default:
+                if ( chLast == _T('\r') ) {
+                    // Mac line termination
+                    result += eol;
+
+                    // reset chLast to avoid inserting another eol before the
+                    // next character
+                    chLast = 0;
+                }
+
+                // add to the current line
+                result += ch;
+        }
+    }
+
+    if ( chLast ) {
+        // trailing '\r'
+        result += eol;
+    }
+
+    return result;
+}
+
+#if wxUSE_TEXTFILE

 
 // ----------------------------------------------------------------------------
 // ctors & dtor
 
 // ----------------------------------------------------------------------------
 // ctors & dtor


@@ -57,6 +145,8 @@ const wxTextFileType wxTextFile::typeDefault =
 
 wxTextFile::wxTextFile(const wxString& strFile) : m_strFile(strFile)
 {
 
 wxTextFile::wxTextFile(const wxString& strFile) : m_strFile(strFile)
 {

+  m_nCurLine = 0;
+  m_isOpened = FALSE;

 }
 
 wxTextFile::~wxTextFile()
 }
 
 wxTextFile::~wxTextFile()


@@ -68,9 +158,41 @@ wxTextFile::~wxTextFile()
 // file operations
 // ----------------------------------------------------------------------------
 
 // file operations
 // ----------------------------------------------------------------------------
 

+bool wxTextFile::Exists() const
+{
+    return wxFile::Exists(m_strFile);
+}
+
+bool wxTextFile::Create(const wxString& strFile)
+{
+  m_strFile = strFile;
+
+  return Create();
+}
+
+bool wxTextFile::Create()
+{
+  // file name must be either given in ctor or in Create(const wxString&)
+  wxASSERT( !m_strFile.IsEmpty() );
+
+  // if the file already exists do nothing
+  if ( Exists() ) return FALSE;
+  
+  if ( m_file.Open(m_strFile, wxFile::write) )
+  {
+    m_file.Close();
+    return TRUE;
+  }
+  else
+  {
+    return FALSE;
+  }
+}
+

 bool wxTextFile::Open(const wxString& strFile)
 {
   m_strFile = strFile;
 bool wxTextFile::Open(const wxString& strFile)
 {
   m_strFile = strFile;

+

   return Open();
 }
 
   return Open();
 }
 


@@ -84,19 +206,18 @@ bool wxTextFile::Open()
     return FALSE;
 
   // read file into memory
     return FALSE;
 
   // read file into memory

-  bool bRet = Read();
+  m_isOpened = Read();

 
   m_file.Close();
 
 
   m_file.Close();
 

-  return bRet;
+  return m_isOpened;

 }
 
 // analyse some lines of the file trying to guess it's type.
 // if it fails, it assumes the native type for our platform.
 wxTextFileType wxTextFile::GuessType() const
 {
 }
 
 // analyse some lines of the file trying to guess it's type.
 // if it fails, it assumes the native type for our platform.
 wxTextFileType wxTextFile::GuessType() const
 {

-  // file should be opened and we must be in it's beginning
-  wxASSERT( m_file.IsOpened() && m_file.Tell() == 0 );
+  wxASSERT( IsOpened() );

 
   // scan the file lines
   size_t nUnix = 0,     // number of '\n's alone
 
   // scan the file lines
   size_t nUnix = 0,     // number of '\n's alone


@@ -126,7 +247,7 @@ wxTextFileType wxTextFile::GuessType() const
 
   #undef   AnalyseLine
 
 
   #undef   AnalyseLine
 

-  // interpret the results (@@ far from being even 50% fool proof)
+  // interpret the results (FIXME far from being even 50% fool proof)

   if ( nDos + nUnix + nMac == 0 ) {
     // no newlines at all
     wxLogWarning(_("'%s' is probably a binary file."), m_strFile.c_str());
   if ( nDos + nUnix + nMac == 0 ) {
     // no newlines at all
     wxLogWarning(_("'%s' is probably a binary file."), m_strFile.c_str());


@@ -134,13 +255,11 @@ wxTextFileType wxTextFile::GuessType() const
   else {
     #define   GREATER_OF(t1, t2) n##t1 == n##t2 ? typeDefault               \
                                                 : n##t1 > n##t2             \
   else {
     #define   GREATER_OF(t1, t2) n##t1 == n##t2 ? typeDefault               \
                                                 : n##t1 > n##t2             \

-                                                    ? wxTextFileType_##t1     \
+                                                    ? wxTextFileType_##t1   \

                                                     : wxTextFileType_##t2
 
                                                     : wxTextFileType_##t2
 

-// Watcom C++ doesn't seem to be able to handle the macro
-#if defined(__WATCOMC__)
-    return typeDefault;
-#else
+    // Watcom C++ doesn't seem to be able to handle the macro
+#if !defined(__WATCOMC__)

     if ( nDos > nUnix )
       return GREATER_OF(Dos, Mac);
     else if ( nDos < nUnix )
     if ( nDos > nUnix )
       return GREATER_OF(Dos, Mac);
     else if ( nDos < nUnix )


@@ -149,7 +268,7 @@ wxTextFileType wxTextFile::GuessType() const
       // nDos == nUnix
       return nMac > nDos ? wxTextFileType_Mac : typeDefault;
     }
       // nDos == nUnix
       return nMac > nDos ? wxTextFileType_Mac : typeDefault;
     }

-#endif
+#endif // __WATCOMC__

 
     #undef    GREATER_OF
   }
 
     #undef    GREATER_OF
   }


@@ -166,11 +285,10 @@ bool wxTextFile::Read()
   char ch, chLast = '\0';
   char buf[1024];
   int n, nRead;
   char ch, chLast = '\0';
   char buf[1024];
   int n, nRead;

-  while ( !m_file.Eof() ) {
+  do {

     nRead = m_file.Read(buf, WXSIZEOF(buf));
     if ( nRead == wxInvalidOffset ) {
       // read error (error message already given in wxFile::Read)
     nRead = m_file.Read(buf, WXSIZEOF(buf));
     if ( nRead == wxInvalidOffset ) {
       // read error (error message already given in wxFile::Read)

-      m_file.Close();

       return FALSE;
     }
 
       return FALSE;
     }
 


@@ -189,7 +307,7 @@ bool wxTextFile::Read()
         case '\r':
           if ( chLast == '\r' ) {
             // Mac empty line
         case '\r':
           if ( chLast == '\r' ) {
             // Mac empty line

-            m_aLines.Add("");
+            m_aLines.Add(wxEmptyString);

             m_aTypes.Add(wxTextFileType_Mac);
           }
           else
             m_aTypes.Add(wxTextFileType_Mac);
           }
           else


@@ -210,7 +328,7 @@ bool wxTextFile::Read()
           }
       }
     }
           }
       }
     }

-  }
+  } while ( nRead == WXSIZEOF(buf) );

 
   // anything in the last line?
   if ( !str.IsEmpty() ) {
 
   // anything in the last line?
   if ( !str.IsEmpty() ) {


@@ -221,6 +339,16 @@ bool wxTextFile::Read()
   return TRUE;
 }
 
   return TRUE;
 }
 

+bool wxTextFile::Close()
+{
+    m_aTypes.Clear();
+    m_aLines.Clear();
+    m_nCurLine = 0;
+    m_isOpened = FALSE;
+
+    return TRUE;
+}
+

 bool wxTextFile::Write(wxTextFileType typeNew)
 {
   wxTempFile fileTmp(m_strFile);
 bool wxTextFile::Write(wxTextFileType typeNew)
 {
   wxTempFile fileTmp(m_strFile);


@@ -241,17 +369,5 @@ bool wxTextFile::Write(wxTextFileType typeNew)
   return fileTmp.Commit();
 }
 
   return fileTmp.Commit();
 }
 

-const char *wxTextFile::GetEOL(wxTextFileType type)
-  {
-    switch ( type ) {
-      case wxTextFileType_None: return "";
-      case wxTextFileType_Unix: return "\n";
-      case wxTextFileType_Dos:  return "\r\n";
-      case wxTextFileType_Mac:  return "\r";
-
-      default:
-        wxFAIL_MSG("bad file type in wxTextFile::GetEOL.");
-        return (const char *) NULL;
-    }
-  }
+#endif // wxUSE_TEXTFILE