-/////////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////
// Name: txtstrm.cpp
// Purpose: Text stream classes
// Author: Guilhem Lavaux
// Modified by:
// Created: 28/06/98
// RCS-ID: $Id$
-// Copyright: (c) Guilhem Lavaux
-// Licence: wxWindows license
+// Copyright: (c) Guilhem Lavaux
+// Licence: wxWindows license
/////////////////////////////////////////////////////////////////////////////
#ifdef __GNUG__
#if wxUSE_STREAMS
#include "wx/txtstrm.h"
+#include <ctype.h>
-wxTextInputStream::wxTextInputStream(wxInputStream& s)
- : m_input(&s)
+
+// ----------------------------------------------------------------------------
+// constants
+// ----------------------------------------------------------------------------
+
+// Unix: "\n"
+// Dos: "\r\n"
+// Mac: "\r"
+
+// ----------------------------------------------------------------------------
+// wxTextInputStream
+// ----------------------------------------------------------------------------
+
+wxTextInputStream::wxTextInputStream(wxInputStream &s, const wxString &sep)
+ : m_input(s), m_separators(sep)
{
}
{
}
+wxChar wxTextInputStream::NextNonSeparators()
+{
+ wxChar c = (wxChar) 0;
+ for (;;)
+ {
+ if (!m_input) return (wxChar) 0;
+ c = m_input.GetC();
+
+ if (c != wxT('\n') &&
+ c != wxT('\r') &&
+ !m_separators.Contains(c))
+ return c;
+ }
+
+}
+
+bool wxTextInputStream::EatEOL(const wxChar &c)
+{
+ if (c == wxT('\n')) return TRUE; // eat on UNIX
+
+ if (c == wxT('\r')) // eat on both Mac and DOS
+ {
+ 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 */
- int c;
- int sign;
- wxInt32 i;
+ /* I only implemented a simple integer parser */
+ // VZ: what about using strtol()?? (TODO)
- while (isspace( c = m_input->GetC() ) )
- /* Do nothing */ ;
+ int sign;
+ wxInt32 i;
- i = 0;
- if (! (c == '-' || isdigit(c)) ) {
- m_input->Ungetch(c);
- return 0;
- }
+ if (!m_input) return 0;
+ int c = NextNonSeparators();
+ if (c==(wxChar)0) return 0;
- if (c == '-') {
- sign = -1;
- c = m_input->GetC();
- } else if (c == '+') {
- sign = 1;
- c = m_input->GetC();
- } else {
- sign = 1;
- }
+ i = 0;
+ if (! (c == wxT('-') || c == wxT('+') || isdigit(c)) )
+ {
+ m_input.Ungetch(c);
+ return 0;
+ }
- while (isdigit(c)) {
- i = i*10 + (c - (int)'0');
- c = m_input->GetC();
- }
+ if (c == wxT('-'))
+ {
+ sign = -1;
+ c = m_input.GetC();
+ } else
+ if (c == wxT('+'))
+ {
+ sign = 1;
+ c = m_input.GetC();
+ } else
+ {
+ sign = 1;
+ }
- if (c != '\n' && c != '\r')
- m_input->Ungetch(c);
+ while (isdigit(c))
+ {
+ i = i*10 + (c - (int)wxT('0'));
+ c = m_input.GetC();
+ }
+
+ SkipIfEndOfLine( c );
- i *= sign;
+ i *= sign;
- return (wxUint32)i;
+ return (wxUint32)i;
}
wxUint16 wxTextInputStream::Read16()
{
- return (wxUint16)Read32();
+ return (wxUint16)Read32();
}
wxUint8 wxTextInputStream::Read8()
{
- return (wxUint8)Read32();
+ return (wxUint8)Read32();
}
double wxTextInputStream::ReadDouble()
{
- /* I only implemented a simple float parser */
- double f;
- int c, sign;
-
- while (isspace( c = m_input->GetC() ) || c == '\n' || c == '\r')
- /* Do nothing */ ;
-
- f = 0.0;
- if (! (c == '-' || isdigit(c)) ) {
- m_input->Ungetch(c);
- return 0.0;
- }
-
- if (c == '-') {
- sign = -1;
- c = m_input->GetC();
- } else if (c == '+') {
- sign = 1;
- c = m_input->GetC();
- } else {
- sign = 1;
- }
-
- while (isdigit(c)) {
- f = f*10 + (c - '0');
- c = m_input->GetC();
- }
-
- if (c == '.') {
- double f_multiplicator = (double) 0.1;
-
- c = m_input->GetC();
-
- while (isdigit(c)) {
- f += (c-'0')*f_multiplicator;
- f_multiplicator /= 10;
- c = m_input->GetC();
+ /* I only implemented a simple float parser
+ * VZ: what about using strtod()?? (TODO)
+ */
+
+ double f;
+ int theSign;
+
+ if (!m_input)
+ return 0;
+
+ int c = NextNonSeparators();
+ if (c==(wxChar)0) return 0;
+
+ f = 0.0;
+ if (! (c == wxT('.') || c == wxT(',') || c == wxT('-') || c == wxT('+') || isdigit(c)) )
+ {
+ m_input.Ungetch(c);
+ return 0;
+ }
+
+ if (c == wxT('-'))
+ {
+ theSign = -1;
+ c = m_input.GetC();
+ } else
+ if (c == wxT('+'))
+ {
+ theSign = 1;
+ c = m_input.GetC();
+ }
+ else
+ {
+ theSign = 1;
+ }
+
+ while (isdigit(c))
+ {
+ f = f*10 + (c - wxT('0'));
+ c = m_input.GetC();
}
- if (c == 'e') {
- double f_multiplicator = 0.0;
- int i, e;
+ if (c == wxT('.') || c == wxT(','))
+ {
+ double f_multiplicator = (double) 0.1;
- c = m_input->GetC();
+ c = m_input.GetC();
- switch(c) {
- case '-':
- f_multiplicator = 0.1;
- break;
- case '+':
- f_multiplicator = 10.0;
- break;
- }
+ while (isdigit(c))
+ {
+ f += (c-wxT('0'))*f_multiplicator;
+ f_multiplicator /= 10;
+ c = m_input.GetC();
+ }
- e = Read8();
+ if (c == wxT('e'))
+ {
+ double f_multiplicator = 0.0;
+ int i, e;
- for (i=0;i<e;i++)
- f *= f_multiplicator;
- } else if (c != '\n' && c != '\r')
- m_input->Ungetch(c);
-
- }
+ c = m_input.GetC();
- f *= sign;
+ switch (c)
+ {
+ case wxT('-'): f_multiplicator = 0.1; break;
+ case wxT('+'): f_multiplicator = 10.0; break;
+ }
- return f;
+ e = Read8(); // why only max 256 ?
+
+ for (i=0;i<e;i++)
+ f *= f_multiplicator;
+ }
+ else
+ SkipIfEndOfLine( c );
+ }
+ else
+ {
+ m_input.Ungetch(c);
+ }
+
+ f *= theSign;
+ return f;
}
wxString wxTextInputStream::ReadString()
{
- char c, last_endl = 0;
- bool end_line = FALSE;
- wxString line;
+ return ReadLine();
+}
+
+wxString wxTextInputStream::ReadLine()
+{
+ wxChar c;
+ wxString line;
+
+ while ( !m_input.Eof() )
+ {
+ c = m_input.GetC();
+
+ if ( !m_input )
+ break;
- while (!end_line) {
- c = m_input->GetC();
- if (m_input->LastError() != wxStream_NOERROR)
- break;
+ if (EatEOL(c))
+ break;
+
+ line += c;
+ }
- switch (c) {
- case '\n':
- end_line = TRUE;
- break;
- case '\r':
- last_endl = '\r';
- break;
- default:
- if (last_endl == '\r') {
- end_line = TRUE;
- m_input->Ungetch(c);
- break;
- }
- line += c;
- break;
- }
- }
- return line;
+ return line;
}
-
-wxTextInputStream& wxTextInputStream::operator>>(wxString& line)
+
+wxString wxTextInputStream::ReadWord()
{
- line = ReadString();
- return *this;
+ 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>>(wxInt8& c)
+wxTextInputStream& wxTextInputStream::operator>>(wxString& word)
{
- c = (wxInt8)Read8();
- return *this;
+ word = ReadWord();
+ return *this;
}
-wxTextInputStream& wxTextInputStream::operator>>(wxInt16& i)
+wxTextInputStream& wxTextInputStream::operator>>(char& c)
{
- i = (wxInt16)Read16();
- return *this;
+ if (!m_input)
+ {
+ c = 0;
+ return *this;
+ }
+
+ c = m_input.GetC();
+
+ if (EatEOL(c))
+ c = '\n';
+
+ return *this;
}
-wxTextInputStream& wxTextInputStream::operator>>(wxInt32& i)
+wxTextInputStream& wxTextInputStream::operator>>(wxInt16& i)
{
- i = (wxInt32)Read32();
- return *this;
+ i = (wxInt16)Read16();
+ return *this;
}
-wxTextInputStream& wxTextInputStream::operator>>(wxUint8& c)
+wxTextInputStream& wxTextInputStream::operator>>(wxInt32& i)
{
- c = Read8();
- return *this;
+ i = (wxInt32)Read32();
+ return *this;
}
wxTextInputStream& wxTextInputStream::operator>>(wxUint16& i)
{
- i = Read16();
- return *this;
+ i = Read16();
+ return *this;
}
wxTextInputStream& wxTextInputStream::operator>>(wxUint32& i)
{
- i = Read32();
- return *this;
+ i = Read32();
+ return *this;
}
wxTextInputStream& wxTextInputStream::operator>>(double& i)
{
- i = ReadDouble();
- return *this;
+ i = ReadDouble();
+ return *this;
}
wxTextInputStream& wxTextInputStream::operator>>(float& f)
{
- f = (float)ReadDouble();
- return *this;
+ f = (float)ReadDouble();
+ 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__) && !defined(__DARWIN__)
+ 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__) && !defined(__DARWIN__)
+ m_mode = wxEOL_MAC;
+#else
+ m_mode = wxEOL_UNIX;
+#endif
+ }
+}
+
void wxTextOutputStream::Write32(wxUint32 i)
{
- wxString str;
+ wxString str;
+ str.Printf(wxT("%u"), i);
- str.Printf(_T("%u"), i);
- WriteString(str);
+ WriteString(str);
}
void wxTextOutputStream::Write16(wxUint16 i)
{
- wxString str;
+ wxString str;
+ str.Printf(wxT("%u"), i);
- str.Printf(_T("%u"), i);
- WriteString(str);
+ WriteString(str);
}
void wxTextOutputStream::Write8(wxUint8 i)
{
- wxString str;
+ wxString str;
+ str.Printf(wxT("%u"), i);
- str.Printf(_T("%u"), i);
- WriteString(str);
+ WriteString(str);
}
void wxTextOutputStream::WriteDouble(double d)
{
- wxString str;
+ wxString str;
- str.Printf(_T("%f"), d);
- WriteString(str);
+ str.Printf(wxT("%f"), d);
+ WriteString(str);
}
void wxTextOutputStream::WriteString(const wxString& string)
{
-#if wxUSE_UNICODE
- const wxWX2MBbuf buf = string.mb_str();
- m_output->Write(buf, string.Len());
-#else
- m_output->Write(string, string.Len());
-#endif
+ size_t len = string.length();
+
+ wxString out;
+ out.reserve(len);
+
+ for ( size_t i = 0; i < len; i++ )
+ {
+ const wxChar c = string[i];
+ if ( c == wxT('\n') )
+ {
+ switch ( m_mode )
+ {
+ case wxEOL_DOS:
+ out << _T("\r\n");
+ continue;
+
+ case wxEOL_MAC:
+ out << _T('\r');
+ continue;
+
+ default:
+ wxFAIL_MSG( _T("unknown EOL mode in wxTextOutputStream") );
+ // fall through
+
+ case wxEOL_UNIX:
+ // don't treat '\n' specially
+ ;
+ }
+ }
+
+ out << c;
+ }
+
+ // NB: we don't need to write the trailing NUL here
+ m_output.Write(out.c_str(), out.length() * sizeof(wxChar));
}
wxTextOutputStream& wxTextOutputStream::operator<<(const wxChar *string)
{
- WriteString(wxString(string));
- return *this;
+ WriteString( wxString(string) );
+ return *this;
}
wxTextOutputStream& wxTextOutputStream::operator<<(const wxString& string)
{
- WriteString(string);
- return *this;
+ WriteString( string );
+ return *this;
}
-wxTextOutputStream& wxTextOutputStream::operator<<(wxInt8 c)
+wxTextOutputStream& wxTextOutputStream::operator<<(char c)
{
- Write8((wxUint8)c);
- return *this;
+ // 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);
- return *this;
+ wxString str;
+ str.Printf(wxT("%d"), (signed int)c);
+ WriteString(str);
+
+ return *this;
}
wxTextOutputStream& wxTextOutputStream::operator<<(wxInt32 c)
{
- Write32((wxUint32)c);
- return *this;
-}
+ wxString str;
+ str.Printf(wxT("%ld"), (signed long)c);
+ WriteString(str);
-wxTextOutputStream& wxTextOutputStream::operator<<(wxUint8 c)
-{
- Write8(c);
- return *this;
+ return *this;
}
wxTextOutputStream& wxTextOutputStream::operator<<(wxUint16 c)
{
- Write16(c);
- return *this;
+ wxString str;
+ str.Printf(wxT("%u"), (unsigned int)c);
+ WriteString(str);
+
+ return *this;
}
wxTextOutputStream& wxTextOutputStream::operator<<(wxUint32 c)
{
- Write32(c);
- return *this;
+ wxString str;
+ str.Printf(wxT("%lu"), (unsigned long)c);
+ WriteString(str);
+
+ return *this;
}
wxTextOutputStream &wxTextOutputStream::operator<<(double f)
{
- WriteDouble(f);
- return *this;
+ WriteDouble(f);
+ return *this;
}
wxTextOutputStream& wxTextOutputStream::operator<<(float f)
{
- WriteDouble((double)f);
- return *this;
+ WriteDouble((double)f);
+ return *this;
+}
+
+wxTextOutputStream &endl( wxTextOutputStream &stream )
+{
+ return stream << wxT('\n');
}
#endif