X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/e90c1d2a19361551eb07778280f22be3e759cf64..aba4387c4c71fb812c6a07a7abb495606c5ef4af:/src/common/txtstrm.cpp

diff --git a/src/common/txtstrm.cpp b/src/common/txtstrm.cpp
index 100e6ec689..8fd6ffaaaf 100644
--- a/src/common/txtstrm.cpp
+++ b/src/common/txtstrm.cpp
@@ -6,7 +6,7 @@
 // Created:     28/06/98
 // RCS-ID:      $Id$
 // Copyright:   (c) Guilhem Lavaux
-// Licence:   	wxWindows license
+// Licence:     wxWindows license
 /////////////////////////////////////////////////////////////////////////////
 
 #ifdef __GNUG__
@@ -38,8 +38,8 @@
 // wxTextInputStream
 // ----------------------------------------------------------------------------
 
-wxTextInputStream::wxTextInputStream(wxInputStream& s)
-  : m_input(&s)
+wxTextInputStream::wxTextInputStream(wxInputStream &s, const wxString &sep)
+  : m_input(s), m_separators(sep)
 {
 }
 
@@ -47,85 +47,72 @@ wxTextInputStream::~wxTextInputStream()
 {
 }
 
-wxChar wxTextInputStream::NextNonWhiteSpace()
+wxChar wxTextInputStream::NextNonSeparators()
 {
     wxChar c = (wxChar) 0;
     for (;;)
     {
-        c = m_input->GetC();
-	if (!m_input) return (wxChar) 0;
-	
-	if (c != T('\n') &&
-	    c != T('\r') &&
-	    c != T('\t') &&
-	    c != T(' '))
-	{
-	    return c;
-	}
+        if (!m_input) return (wxChar) 0;
+        c = m_input.GetC();
+
+        if (c != wxT('\n') &&
+            c != wxT('\r') &&
+            !m_separators.Contains(c))
+          return c;
     }
 
-    // this shouldn't happen
-    return (wxChar) 0;
 }
 
-void wxTextInputStream::SkipIfEndOfLine( wxChar c )
+bool wxTextInputStream::EatEOL(const wxChar &c)
 {
-    if (c == T('\n'))
-    {
-        // eat on UNIX
-	return;
-    }
+    if (c == wxT('\n')) return TRUE; // eat on UNIX
 
-    if (c == T('\r'))
+    if (c == wxT('\r')) // eat on both Mac and DOS
     {
-        // eat on both Mac and DOS
-	
-        wxChar c2 = m_input->GetC();
-        if (!m_input) return;
-	
-        if (c2 == T('\n'))
-        {
-	    // eat on DOS
-	    return;
-	}
-        else
-	{
-	    // Don't eat on Mac
-            m_input->Ungetch( c2 );
-	}
-    }
-    else
-    {
-        // no line terminator
-        m_input->Ungetch( c );
+        if (!m_input) return TRUE;
+        wxChar c2 = m_input.GetC();
+
+        if (c2 != wxT('\n'))  m_input.Ungetch( c2 ); // Don't eat on Mac
+        return TRUE;
     }
+
+    return FALSE;
+}
+
+void wxTextInputStream::SkipIfEndOfLine( wxChar c )
+{
+    if (EatEOL(c)) return;
+    else m_input.Ungetch( c );  // no line terminator
 }
 
 wxUint32 wxTextInputStream::Read32()
 {
     /* I only implemented a simple integer parser */
+    // VZ: what about using strtol()?? (TODO)
+
     int sign;
     wxInt32 i;
 
-    int c = NextNonWhiteSpace();
     if (!m_input) return 0;
+    int c = NextNonSeparators();
+    if (c==(wxChar)0) return 0;
 
     i = 0;
-    if (! (c == T('-') || c == T('+') || isdigit(c)) )
+    if (! (c == wxT('-') || c == wxT('+') || isdigit(c)) )
     {
-        m_input->Ungetch(c);
+        m_input.Ungetch(c);
         return 0;
     }
 
-    if (c == T('-'))
+    if (c == wxT('-'))
     {
         sign = -1;
-        c = m_input->GetC();
+        c = m_input.GetC();
     } else
-    if (c == T('+'))
+    if (c == wxT('+'))
     {
         sign = 1;
-        c = m_input->GetC();
+        c = m_input.GetC();
     } else
     {
         sign = 1;
@@ -133,8 +120,8 @@ wxUint32 wxTextInputStream::Read32()
 
     while (isdigit(c))
     {
-        i = i*10 + (c - (int)T('0'));
-        c = m_input->GetC();
+        i = i*10 + (c - (int)wxT('0'));
+        c = m_input.GetC();
     }
 
     SkipIfEndOfLine( c );
@@ -156,158 +143,166 @@ wxUint8 wxTextInputStream::Read8()
 
 double wxTextInputStream::ReadDouble()
 {
-    /* I only implemented a simple float parser */
+    /* I only implemented a simple float parser
+     * VZ: what about using strtod()?? (TODO)
+     */
+
     double f;
-    int sign;
+    int theSign;
 
-    int c = NextNonWhiteSpace();
-    if (!m_input) return 0.0;
+    if (!m_input)
+        return 0;
+
+    int c = NextNonSeparators();
+    if (c==(wxChar)0) return 0;
 
     f = 0.0;
-    if (! (c == T('.') || c == T('-') || c == T('+') || isdigit(c)) )
+    if (! (c == wxT('.') || c == wxT(',') || c == wxT('-') || c == wxT('+') || isdigit(c)) )
     {
-        m_input->Ungetch(c);
-        return 0.0;
+        m_input.Ungetch(c);
+        return 0;
     }
 
-    if (c == T('-'))
+    if (c == wxT('-'))
     {
-        sign = -1;
-        c = m_input->GetC();
+        theSign = -1;
+        c = m_input.GetC();
     } else
-    if (c == T('+'))
+    if (c == wxT('+'))
     {
-        sign = 1;
-        c = m_input->GetC();
+        theSign = 1;
+        c = m_input.GetC();
     }
     else
     {
-        sign = 1;
+        theSign = 1;
     }
 
     while (isdigit(c))
     {
-        f = f*10 + (c - T('0'));
-        c = m_input->GetC();
+        f = f*10 + (c - wxT('0'));
+        c = m_input.GetC();
     }
 
-    if (c == T('.'))
+    if (c == wxT('.') || c == wxT(','))
     {
         double f_multiplicator = (double) 0.1;
 
-        c = m_input->GetC();
+        c = m_input.GetC();
 
         while (isdigit(c))
-	{
-            f += (c-T('0'))*f_multiplicator;
+        {
+            f += (c-wxT('0'))*f_multiplicator;
             f_multiplicator /= 10;
-            c = m_input->GetC();
+            c = m_input.GetC();
         }
 
-        if (c == T('e'))
-	{
+        if (c == wxT('e'))
+        {
             double f_multiplicator = 0.0;
             int i, e;
 
-            c = m_input->GetC();
+            c = m_input.GetC();
 
             switch (c)
-	    {
-                case T('-'): f_multiplicator = 0.1;  break;
-		case T('+'): f_multiplicator = 10.0; break;
-	    }
+            {
+                case wxT('-'): f_multiplicator = 0.1;  break;
+                case wxT('+'): f_multiplicator = 10.0; break;
+            }
 
             e = Read8();  // why only max 256 ?
 
             for (i=0;i<e;i++)
                 f *= f_multiplicator;
         }
-	else
-	    SkipIfEndOfLine( c );
+        else
+            SkipIfEndOfLine( c );
     }
     else
     {
-        m_input->Ungetch(c);
+        m_input.Ungetch(c);
     }
 
-    f *= sign;
-
+    f *= theSign;
     return f;
 }
 
 wxString wxTextInputStream::ReadString()
+{
+    return ReadLine();
+}
+
+wxString wxTextInputStream::ReadLine()
 {
     wxChar c;
     wxString line;
 
-    for (;;)
+    while ( !m_input.Eof() )
     {
-        c = m_input->GetC();
-        if (!m_input) break;
-	
-        if (c == T('\n'))
-        {
-	    // eat on UNIX
-	    break;
-	}
-	
-        if (c == T('\r'))
-        {
-            // eat on both Mac and DOS
-	
-            wxChar c2 = m_input->GetC();
-	    if (!m_input) break;
-	
-	    if (c2 == T('\n'))
-            {
-	        // eat on DOS
-		break;
-	    }
-            else
-	    {
-	        // Don't eat on Mac
-                m_input->Ungetch( c2 );
-		break;
-	    }
-        }
-	
+        c = m_input.GetC();
+        
+        if ( !m_input )
+            break;
+
+        if (EatEOL(c))
+            break;
+
         line += c;
     }
 
     return line;
 }
 
-wxTextInputStream& wxTextInputStream::operator>>(wxString& line)
+wxString wxTextInputStream::ReadWord()
+{
+    wxString word;
+
+    if ( !m_input )
+        return word;
+
+    wxChar c = NextNonSeparators();
+    if ( !c )
+        return word;
+
+    word += c;
+    
+    while ( !m_input.Eof() )
+    {
+        c = m_input.GetC();
+        
+        if (!m_input)
+            break;
+            
+        if (m_separators.Contains(c))
+            break;
+
+        if (EatEOL(c))
+            break;
+
+        word += c;
+    }
+
+    return word;
+}
+
+wxTextInputStream& wxTextInputStream::operator>>(wxString& word)
 {
-  line = ReadString();
-  return *this;
+    word = ReadWord();
+    return *this;
 }
 
-wxTextInputStream& wxTextInputStream::operator>>(wxChar& c)
+wxTextInputStream& wxTextInputStream::operator>>(char& c)
 {
-    wxChar c1 = m_input->GetC();
     if (!m_input)
     {
-        c = (wxChar) 0;
+        c = 0;
         return *this;
     }
 
-    if (c1 == T('\r'))
-    {
-        c = T('\n');
-        wxChar c2 = m_input->GetC();
-	if (!m_input) return *this;
-	
-	if (c2 != T('\n'))
-	{
-	    // we are on a Mac
-            m_input->Ungetch( c2 );
-	}
-    }
-    else
-    {
-        c = c1;
-    }
+    c = m_input.GetC();
+
+    if (EatEOL(c))
+        c = '\n';
 
     return *this;
 }
@@ -348,19 +343,45 @@ wxTextInputStream& wxTextInputStream::operator>>(float& f)
     return *this;
 }
 
-wxTextOutputStream::wxTextOutputStream(wxOutputStream& s)
-  : m_output(&s)
+wxTextOutputStream::wxTextOutputStream(wxOutputStream& s, wxEOL mode)
+  : m_output(s)
 {
+    m_mode = mode;
+    if (m_mode == wxEOL_NATIVE)
+    {
+#if defined(__WXMSW__) || defined(__WXPM__)
+        m_mode = wxEOL_DOS;
+#elif defined(__WXMAC__)
+        m_mode = wxEOL_MAC;
+#else
+        m_mode = wxEOL_UNIX;
+#endif
+    }
 }
 
 wxTextOutputStream::~wxTextOutputStream()
 {
 }
 
+void wxTextOutputStream::SetMode(wxEOL mode)
+{
+    m_mode = mode;
+    if (m_mode == wxEOL_NATIVE)
+    {
+#if defined(__WXMSW__) || defined(__WXPM__)
+        m_mode = wxEOL_DOS;
+#elif defined(__WXMAC__)
+        m_mode = wxEOL_MAC;
+#else
+        m_mode = wxEOL_UNIX;
+#endif
+    }
+}
+
 void wxTextOutputStream::Write32(wxUint32 i)
 {
     wxString str;
-    str.Printf(T("%u"), i);
+    str.Printf(wxT("%u"), i);
 
     WriteString(str);
 }
@@ -368,7 +389,7 @@ void wxTextOutputStream::Write32(wxUint32 i)
 void wxTextOutputStream::Write16(wxUint16 i)
 {
     wxString str;
-    str.Printf(T("%u"), i);
+    str.Printf(wxT("%u"), i);
 
     WriteString(str);
 }
@@ -376,7 +397,7 @@ void wxTextOutputStream::Write16(wxUint16 i)
 void wxTextOutputStream::Write8(wxUint8 i)
 {
     wxString str;
-    str.Printf(T("%u"), i);
+    str.Printf(wxT("%u"), i);
 
     WriteString(str);
 }
@@ -385,7 +406,7 @@ void wxTextOutputStream::WriteDouble(double d)
 {
     wxString str;
 
-    str.Printf(T("%f"), d);
+    str.Printf(wxT("%f"), d);
     WriteString(str);
 }
 
@@ -394,31 +415,28 @@ void wxTextOutputStream::WriteString(const wxString& string)
     for (size_t i = 0; i < string.Len(); i++)
     {
         wxChar c = string[i];
-        if (c == T('\n'))
+        if (c == wxT('\n'))
         {
-#if   defined(__WINDOWS__)
-            c = T('\r');
-            m_output->Write( (const void*)(&c), sizeof(wxChar) );
-            c = T('\n');
-            m_output->Write( (const void*)(&c), sizeof(wxChar) );
-#elif defined(__UNIX__)
-            c = T('\n');
-            m_output->Write( (const void*)(&c), sizeof(wxChar) );
-#elif defined(__WXMAC__)
-            c = T('\r');
-            m_output->Write( (const void*)(&c), sizeof(wxChar) );
-#elif   defined(__OS2__)
-            c = T('\r');
-            m_output->Write( (const void*)(&c), sizeof(wxChar) );
-            c = T('\n');
-            m_output->Write( (const void*)(&c), sizeof(wxChar) );
-#else
-            #error  "wxTextOutputStream: unsupported platform."
-#endif
+            if (m_mode == wxEOL_DOS)
+            {
+                 c = wxT('\r');
+                 m_output.Write( (const void*)(&c), sizeof(wxChar) );
+                 c = wxT('\n');
+                 m_output.Write( (const void*)(&c), sizeof(wxChar) );
+            } else
+            if (m_mode == wxEOL_MAC)
+            {
+                 c = wxT('\r');
+                 m_output.Write( (const void*)(&c), sizeof(wxChar) );
+            } else
+            {
+                 c = wxT('\n');
+                 m_output.Write( (const void*)(&c), sizeof(wxChar) );
+            }
         }
         else
         {
-            m_output->Write( (const void*)(&c), sizeof(wxChar) );
+            m_output.Write( (const void*)(&c), sizeof(wxChar) );
         }
    }
 }
@@ -435,33 +453,50 @@ wxTextOutputStream& wxTextOutputStream::operator<<(const wxString& string)
     return *this;
 }
 
-wxTextOutputStream& wxTextOutputStream::operator<<(wxChar c)
+wxTextOutputStream& wxTextOutputStream::operator<<(char c)
 {
-    WriteString( wxString(c) );
+    // these strange manipulations are needed in Unicode mode
+    char buf[2];
+    buf[0] = c;
+    buf[1] = 0;
+
+    WriteString( wxString(buf) );
     return *this;
 }
 
 wxTextOutputStream& wxTextOutputStream::operator<<(wxInt16 c)
 {
-    Write16( (wxUint16)c );
+    wxString str;
+    str.Printf(wxT("%d"), (signed int)c);
+    WriteString(str);
+
     return *this;
 }
 
 wxTextOutputStream& wxTextOutputStream::operator<<(wxInt32 c)
 {
-    Write32( (wxUint32)c );
+    wxString str;
+    str.Printf(wxT("%ld"), (signed long)c);
+    WriteString(str);
+
     return *this;
 }
 
 wxTextOutputStream& wxTextOutputStream::operator<<(wxUint16 c)
 {
-    Write16(c);
+    wxString str;
+    str.Printf(wxT("%u"), (unsigned int)c);
+    WriteString(str);
+
     return *this;
 }
 
 wxTextOutputStream& wxTextOutputStream::operator<<(wxUint32 c)
 {
-    Write32(c);
+    wxString str;
+    str.Printf(wxT("%lu"), (unsigned long)c);
+    WriteString(str);
+
     return *this;
 }
 
@@ -479,7 +514,7 @@ wxTextOutputStream& wxTextOutputStream::operator<<(float f)
 
 wxTextOutputStream &endl( wxTextOutputStream &stream )
 {
-    return stream << T('\n');
+    return stream << wxT('\n');
 }
 
 #endif