// Created: 28/06/98
// RCS-ID: $Id$
// Copyright: (c) Guilhem Lavaux
-// Licence: wxWindows license
+// Licence: wxWindows license
/////////////////////////////////////////////////////////////////////////////
#ifdef __GNUG__
// wxTextInputStream
// ----------------------------------------------------------------------------
-wxTextInputStream::wxTextInputStream(wxInputStream& s, const wxChar &sep)
- : m_input(&s), m_string_separator(sep)
+wxTextInputStream::wxTextInputStream(wxInputStream &s, const wxString &sep)
+ : m_input(s), m_separators(sep)
{
}
{
}
-wxChar wxTextInputStream::NextNonWhiteSpace()
+wxChar wxTextInputStream::NextNonSeparators()
{
wxChar c = (wxChar) 0;
for (;;)
{
- c = m_input->GetC();
- if (!m_input) return (wxChar) 0;
-
- if (c != wxT('\n') &&
- c != wxT('\r') &&
- c != wxT('\t') &&
- c != wxT(' '))
- {
- 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 == wxT('\n'))
- {
- // eat on UNIX
- return;
- }
+ if (c == wxT('\n')) return TRUE; // eat on UNIX
- if (c == wxT('\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 == wxT('\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 == wxT('-') || c == wxT('+') || isdigit(c)) )
{
- m_input->Ungetch(c);
+ m_input.Ungetch(c);
return 0;
}
if (c == wxT('-'))
{
sign = -1;
- c = m_input->GetC();
+ c = m_input.GetC();
} else
if (c == wxT('+'))
{
sign = 1;
- c = m_input->GetC();
+ c = m_input.GetC();
} else
{
sign = 1;
while (isdigit(c))
{
i = i*10 + (c - (int)wxT('0'));
- c = m_input->GetC();
+ c = m_input.GetC();
}
SkipIfEndOfLine( c );
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 == wxT('.') || c == wxT('-') || c == wxT('+') || 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 == wxT('-'))
{
- sign = -1;
- c = m_input->GetC();
+ theSign = -1;
+ c = m_input.GetC();
} else
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 - wxT('0'));
- c = m_input->GetC();
+ c = m_input.GetC();
}
- if (c == wxT('.'))
+ if (c == wxT('.') || c == wxT(','))
{
double f_multiplicator = (double) 0.1;
- c = m_input->GetC();
+ c = m_input.GetC();
while (isdigit(c))
- {
+ {
f += (c-wxT('0'))*f_multiplicator;
f_multiplicator /= 10;
- c = m_input->GetC();
+ c = m_input.GetC();
}
if (c == wxT('e'))
- {
+ {
double f_multiplicator = 0.0;
int i, e;
- c = m_input->GetC();
+ c = m_input.GetC();
switch (c)
- {
+ {
case wxT('-'): f_multiplicator = 0.1; break;
- case wxT('+'): f_multiplicator = 10.0; 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();
+ return ReadLine();
}
wxString wxTextInputStream::ReadLine()
wxChar c;
wxString line;
- for (;;)
+ while ( !m_input.Eof() )
{
- c = m_input->GetC();
- if (!m_input) break;
-
- if (c == wxT('\n'))
- {
- // eat on UNIX
- break;
- }
-
- if (c == wxT('\r'))
- {
- // eat on both Mac and DOS
-
- wxChar c2 = m_input->GetC();
- if (!m_input) break;
-
- if (c2 == wxT('\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;
}
wxString wxTextInputStream::ReadWord()
{
- wxChar c;
wxString word;
- if (m_string_separator==wxT(' ')) c=NextNonWhiteSpace();
- else c = m_input->GetC();
+ if ( !m_input )
+ return word;
- for (;;)
+ wxChar c = NextNonSeparators();
+ if ( !c )
+ return word;
+
+ word += c;
+
+ while ( !m_input.Eof() )
{
- if (!m_input) break;
-
- if (c == m_string_separator)
- break;
-
- if (c == wxT('\n'))
- {
- // eat on UNIX
- break;
- }
-
- if (c == wxT('\r'))
- {
- // eat on both Mac and DOS
-
- wxChar c2 = m_input->GetC();
- if (!m_input) break;
-
- if (c2 == wxT('\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 (m_separators.Contains(c))
+ break;
+
+ if (EatEOL(c))
+ break;
+
word += c;
- c = m_input->GetC();
}
return word;
wxTextInputStream& wxTextInputStream::operator>>(wxString& word)
{
- word = ReadWord();
- 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 == wxT('\r'))
- {
- c = wxT('\n');
- wxChar c2 = m_input->GetC();
- if (!m_input) return *this;
-
- if (c2 != wxT('\n'))
- {
- // we are on a Mac
- m_input->Ungetch( c2 );
- }
- }
- else
- {
- c = c1;
- }
+ c = m_input.GetC();
+
+ if (EatEOL(c))
+ c = '\n';
return *this;
}
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;
void wxTextOutputStream::WriteString(const wxString& string)
{
- for (size_t i = 0; i < string.Len(); i++)
+ size_t len = string.length();
+
+ wxString out;
+ out.reserve(len);
+
+ for ( size_t i = 0; i < len; i++ )
{
- wxChar c = string[i];
- if (c == wxT('\n'))
+ const wxChar c = string[i];
+ if ( c == wxT('\n') )
{
-#if defined(__WINDOWS__)
- c = wxT('\r');
- m_output->Write( (const void*)(&c), sizeof(wxChar) );
- c = wxT('\n');
- m_output->Write( (const void*)(&c), sizeof(wxChar) );
-#elif defined(__UNIX__)
- c = wxT('\n');
- m_output->Write( (const void*)(&c), sizeof(wxChar) );
-#elif defined(__WXMAC__)
- c = wxT('\r');
- m_output->Write( (const void*)(&c), sizeof(wxChar) );
-#elif defined(__OS2__)
- c = wxT('\r');
- m_output->Write( (const void*)(&c), sizeof(wxChar) );
- c = wxT('\n');
- m_output->Write( (const void*)(&c), sizeof(wxChar) );
-#else
- #error "wxTextOutputStream: unsupported platform."
-#endif
- }
- else
- {
- m_output->Write( (const void*)(&c), sizeof(wxChar) );
+ 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)
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;
}