/////////////////////////////////////////////////////////////////////////////
-// Name: stream.cpp
+// Name: src/common/stream.cpp
// Purpose: wxStream base classes
// Author: Guilhem Lavaux
-// Modified by:
+// Modified by: VZ (23.11.00) to fix realloc()ing new[]ed memory,
+// general code review
// Created: 11/07/98
// RCS-ID: $Id$
// Copyright: (c) Guilhem Lavaux
-// Licence: wxWindows license
+// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
-#ifdef __GNUG__
-#pragma implementation "stream.h"
+// ============================================================================
+// declarations
+// ============================================================================
+
+// ----------------------------------------------------------------------------
+// headers
+// ----------------------------------------------------------------------------
+
+#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
+ #pragma implementation "stream.h"
#endif
// For compilers that support precompilation, includes "wx.h".
#include "wx/wxprec.h"
-#include <ctype.h>
-#include <wx/stream.h>
-#include <wx/datstrm.h>
-#include <wx/objstrm.h>
#ifdef __BORLANDC__
-#pragma hdrstop
+ #pragma hdrstop
#endif
+#ifndef WX_PRECOMP
+ #include "wx/defs.h"
+#endif
+
+#if wxUSE_STREAMS
+
+#include <ctype.h>
+#include "wx/stream.h"
+#include "wx/datstrm.h"
+#include "wx/textfile.h"
+#include "wx/log.h"
+
+// ----------------------------------------------------------------------------
+// constants
+// ----------------------------------------------------------------------------
+
+// the temporary buffer size used when copying from stream to stream
+#define BUF_TEMP_SIZE 4096
+
+// ============================================================================
+// implementation
+// ============================================================================
+
// ----------------------------------------------------------------------------
// wxStreamBuffer
// ----------------------------------------------------------------------------
-wxStreamBuffer::wxStreamBuffer(wxInputStream& i_stream)
- : m_buffer_start(NULL), m_buffer_end(NULL), m_buffer_pos(NULL),
- m_buffer_size(0), m_istream(&i_stream), m_ostream(NULL)
+void wxStreamBuffer::SetError(wxStreamError err)
+{
+ if ( m_stream && m_stream->m_lasterror == wxSTREAM_NO_ERROR )
+ m_stream->m_lasterror = err;
+}
+
+void wxStreamBuffer::InitBuffer()
{
+ m_buffer_start =
+ m_buffer_end =
+ m_buffer_pos = NULL;
+ m_buffer_size = 0;
+
+ // if we are going to allocate the buffer, we should free it later as well
+ m_destroybuf = TRUE;
+}
+
+void wxStreamBuffer::Init()
+{
+ InitBuffer();
+
+ m_fixed = TRUE;
+}
+
+wxStreamBuffer::wxStreamBuffer(BufMode mode)
+{
+ Init();
+
+ m_stream = NULL;
+ m_mode = mode;
+
+ m_flushable = FALSE;
}
-wxStreamBuffer::wxStreamBuffer(wxOutputStream& o_stream)
- : m_buffer_start(NULL), m_buffer_end(NULL), m_buffer_pos(NULL),
- m_buffer_size(0), m_istream(NULL), m_ostream(&o_stream)
+wxStreamBuffer::wxStreamBuffer(wxStreamBase& stream, BufMode mode)
{
+ Init();
+
+ m_stream = &stream;
+ m_mode = mode;
+
+ m_flushable = TRUE;
+}
+
+wxStreamBuffer::wxStreamBuffer(const wxStreamBuffer& buffer)
+{
+ // doing this has big chances to lead to a crash when the source buffer is
+ // destroyed (otherwise assume the caller knows what he does)
+ wxASSERT_MSG( !buffer.m_destroybuf,
+ _T("it's a bad idea to copy this buffer") );
+
+ m_buffer_start = buffer.m_buffer_start;
+ m_buffer_end = buffer.m_buffer_end;
+ m_buffer_pos = buffer.m_buffer_pos;
+ m_buffer_size = buffer.m_buffer_size;
+ m_fixed = buffer.m_fixed;
+ m_flushable = buffer.m_flushable;
+ m_stream = buffer.m_stream;
+ m_mode = buffer.m_mode;
+ m_destroybuf = FALSE;
+}
+
+void wxStreamBuffer::FreeBuffer()
+{
+ if ( m_destroybuf )
+ free(m_buffer_start);
}
wxStreamBuffer::~wxStreamBuffer()
{
+ FreeBuffer();
}
-void wxStreamBuffer::WriteBack(char c)
+wxInputStream *wxStreamBuffer::GetInputStream() const
{
- if (m_ostream)
- return;
+ return m_mode == write ? NULL : (wxInputStream *)m_stream;
+}
- // Assume that if we write "back" we have read a few bytes: so we have some
- // space.
+wxOutputStream *wxStreamBuffer::GetOutputStream() const
+{
+ return m_mode == read ? NULL : (wxOutputStream *)m_stream;
+}
- m_buffer_pos--;
- *m_buffer_pos = c;
+void wxStreamBuffer::SetBufferIO(void *buffer_start,
+ void *buffer_end,
+ bool takeOwnership)
+{
+ SetBufferIO(buffer_start, (char *)buffer_end - (char *)buffer_start,
+ takeOwnership);
}
-void wxStreamBuffer::SetBufferIO(char *buffer_start, char *buffer_end)
+void wxStreamBuffer::SetBufferIO(void *start,
+ size_t len,
+ bool takeOwnership)
{
- m_buffer_pos = m_buffer_start = buffer_start;
- m_buffer_end = buffer_end;
+ // start by freeing the old buffer
+ FreeBuffer();
+
+ m_buffer_start = (char *)start;
+ m_buffer_end = m_buffer_start + len;
+
+ m_buffer_size = len;
+
+ // if we own it, we free it
+ m_destroybuf = takeOwnership;
- m_buffer_size = m_buffer_end-m_buffer_start;
+ ResetBuffer();
}
void wxStreamBuffer::SetBufferIO(size_t bufsize)
{
- if (m_buffer_start)
- delete[] m_buffer_start;
+ // start by freeing the old buffer
+ FreeBuffer();
- if (!bufsize) {
- m_buffer_start = NULL;
- m_buffer_end = NULL;
- m_buffer_pos = NULL;
- m_buffer_size = 0;
- }
+ if ( bufsize )
+ {
+ SetBufferIO(malloc(bufsize), bufsize, TRUE /* take ownership */);
+ }
+ else // no buffer size => no buffer
+ {
+ InitBuffer();
+ }
+}
+
+void wxStreamBuffer::ResetBuffer()
+{
+ if ( m_stream )
+ {
+ m_stream->Reset();
+ m_stream->m_lastcount = 0;
+ }
- m_buffer_start = new char[bufsize];
- m_buffer_end = m_buffer_start + bufsize;
- if (m_istream)
- m_buffer_pos = m_buffer_end;
- else
+ m_buffer_pos = m_mode == read && m_flushable
+ ? m_buffer_end
+ : m_buffer_start;
+}
+
+// fill the buffer with as much data as possible (only for read buffers)
+bool wxStreamBuffer::FillBuffer()
+{
+ wxInputStream *inStream = GetInputStream();
+
+ // It's legal to have no stream, so we don't complain about it just return FALSE
+ if ( !inStream )
+ return FALSE;
+
+ size_t count = inStream->OnSysRead(m_buffer_start, m_buffer_size);
+ if ( !count )
+ return FALSE;
+
+ m_buffer_end = m_buffer_start + count;
m_buffer_pos = m_buffer_start;
- m_buffer_size = bufsize;
+
+ return TRUE;
}
-void wxStreamBuffer::ResetBuffer()
+// write the buffer contents to the stream (only for write buffers)
+bool wxStreamBuffer::FlushBuffer()
{
- if (m_istream)
- m_buffer_pos = m_buffer_end;
- else
+ wxCHECK_MSG( m_flushable, FALSE, _T("can't flush this buffer") );
+
+ // FIXME: what is this check for? (VZ)
+ if ( m_buffer_pos == m_buffer_start )
+ return FALSE;
+
+ wxOutputStream *outStream = GetOutputStream();
+
+ wxCHECK_MSG( outStream, FALSE, _T("should have a stream in wxStreamBuffer") );
+
+ size_t current = m_buffer_pos - m_buffer_start;
+ size_t count = outStream->OnSysWrite(m_buffer_start, current);
+ if ( count != current )
+ return FALSE;
+
m_buffer_pos = m_buffer_start;
+
+ return TRUE;
}
-void wxStreamBuffer::Read(void *buffer, size_t size)
+size_t wxStreamBuffer::GetDataLeft()
{
- wxASSERT(m_istream != NULL);
+ /* Why is this done? RR. */
+ if ( m_buffer_pos == m_buffer_end && m_flushable)
+ FillBuffer();
+
+ return GetBytesLeft();
+}
- // ------------------
- // Buffering disabled
- // ------------------
+// copy up to size bytes from our buffer into the provided one
+void wxStreamBuffer::GetFromBuffer(void *buffer, size_t size)
+{
+ // don't get more bytes than left in the buffer
+ size_t left = GetBytesLeft();
- if (!m_buffer_size) {
- m_istream->m_lastread = m_istream->DoRead(buffer, size);
- return;
- }
+ if ( size > left )
+ size = left;
- // -----------------
- // Buffering enabled
- // -----------------
- size_t buf_left, orig_size = size;
- size_t read_ret;
+ memcpy(buffer, m_buffer_pos, size);
+ m_buffer_pos += size;
+}
- while (size > 0) {
- buf_left = m_buffer_end - m_buffer_pos;
+// copy the contents of the provided buffer into this one
+void wxStreamBuffer::PutToBuffer(const void *buffer, size_t size)
+{
+ size_t left = GetBytesLeft();
+
+ if ( size > left )
+ {
+ if ( m_fixed )
+ {
+ // we can't realloc the buffer, so just copy what we can
+ size = left;
+ }
+ else // !m_fixed
+ {
+ // realloc the buffer to have enough space for the data
+ size_t delta = m_buffer_pos - m_buffer_start;
+
+ char *startOld = m_buffer_start;
+ m_buffer_size += size;
+ m_buffer_start = (char *)realloc(m_buffer_start, m_buffer_size);
+ if ( !m_buffer_start )
+ {
+ // don't leak memory if realloc() failed
+ m_buffer_start = startOld;
+ m_buffer_size -= size;
+
+ // what else can we do?
+ return;
+ }
+
+ // adjust the pointers invalidated by realloc()
+ m_buffer_pos = m_buffer_start + delta;
+ m_buffer_end = m_buffer_start + m_buffer_size;
+ }
+ }
- // First case: the requested buffer is larger than the stream buffer,
- // we split
- if (size > buf_left) {
- memcpy(buffer, m_buffer_pos, buf_left);
- size -= buf_left;
- buffer = (char *)buffer + buf_left; // ANSI C++ violation.
+ memcpy(m_buffer_pos, buffer, size);
+ m_buffer_pos += size;
+}
- read_ret = m_istream->DoRead(m_buffer_start, m_buffer_size);
+void wxStreamBuffer::PutChar(char c)
+{
+ wxOutputStream *outStream = GetOutputStream();
- // Read failed
- if (read_ret == 0) {
- m_istream->m_lastread = orig_size-size;
- m_buffer_pos = m_buffer_end = m_buffer_start;
- return;
- } else {
- m_buffer_end = m_buffer_start+read_ret;
- m_buffer_pos = m_buffer_start;
- }
- } else {
+ wxCHECK_RET( outStream, _T("should have a stream in wxStreamBuffer") );
- // Second case: we just copy from the stream buffer.
- memcpy(buffer, m_buffer_pos, size);
- m_buffer_pos += size;
- break;
+ // if we don't have buffer at all, just forward this call to the stream,
+ if ( !HasBuffer() )
+ {
+ outStream->OnSysWrite(&c, sizeof(c));
+ }
+ else
+ {
+ // otherwise check we have enough space left
+ if ( !GetDataLeft() && !FlushBuffer() )
+ {
+ // we don't
+ SetError(wxSTREAM_WRITE_ERROR);
+ }
+ else
+ {
+ PutToBuffer(&c, sizeof(c));
+ m_stream->m_lastcount = 1;
+ }
}
- }
- m_istream->m_lastread = orig_size;
}
-void wxStreamBuffer::Write(const void *buffer, size_t size)
+char wxStreamBuffer::Peek()
{
- wxASSERT(m_ostream != NULL);
+ wxCHECK_MSG( m_stream && HasBuffer(), 0,
+ _T("should have the stream and the buffer in wxStreamBuffer") );
+
+ if ( !GetDataLeft() )
+ {
+ SetError(wxSTREAM_READ_ERROR);
+ return 0;
+ }
- // ------------------
- // Buffering disabled
- // ------------------
+ char c;
+ GetFromBuffer(&c, sizeof(c));
+ m_buffer_pos--;
- if (!m_buffer_size) {
- m_ostream->m_lastwrite = m_ostream->DoWrite(buffer, size);
- return;
- }
+ return c;
+}
- // ------------------
- // Buffering enabled
- // ------------------
+char wxStreamBuffer::GetChar()
+{
+ wxInputStream *inStream = GetInputStream();
- size_t buf_left, orig_size = size;
- size_t write_ret;
+ wxCHECK_MSG( inStream, 0, _T("should have a stream in wxStreamBuffer") );
- while (size > 0) {
- buf_left = m_buffer_end - m_buffer_pos;
+ char c;
+ if ( !HasBuffer() )
+ {
+ inStream->OnSysRead(&c, sizeof(c));
+ }
+ else
+ {
+ if ( !GetDataLeft() )
+ {
+ SetError(wxSTREAM_READ_ERROR);
+ c = 0;
+ }
+ else
+ {
+ GetFromBuffer(&c, sizeof(c));
+ m_stream->m_lastcount = 1;
+ }
+ }
- // First case: the buffer to write is larger than the stream buffer,
- // we split it
- if (size > buf_left) {
- memcpy(m_buffer_pos, buffer, buf_left);
- size -= buf_left;
- buffer = (char *)buffer + buf_left; // ANSI C++ violation.
+ return c;
+}
- write_ret = m_ostream->DoWrite(m_buffer_start, m_buffer_size);
- if (write_ret != m_buffer_size) {
- m_ostream->m_bad = TRUE;
- m_ostream->m_lastwrite = orig_size-size;
- m_buffer_pos = m_buffer_end = m_buffer_start;
- return;
- }
- m_buffer_pos = m_buffer_start;
+size_t wxStreamBuffer::Read(void *buffer, size_t size)
+{
+ // lasterror is reset before all new IO calls
+ if ( m_stream )
+ m_stream->Reset();
- } else {
+ size_t read;
+ if ( !HasBuffer() )
+ {
+ wxInputStream *inStream = GetInputStream();
- // Second case: just copy it in the stream buffer.
+ wxCHECK_MSG( inStream, 0, _T("should have a stream in wxStreamBuffer") );
- memcpy(m_buffer_pos, buffer, size);
- m_buffer_pos += size;
- break;
+ read = inStream->OnSysRead(buffer, size);
+ }
+ else // we have a buffer, use it
+ {
+ size_t orig_size = size;
+
+ while ( size > 0 )
+ {
+ size_t left = GetDataLeft();
+
+ // if the requested number of bytes if greater than the buffer
+ // size, read data in chunks
+ if ( size > left )
+ {
+ GetFromBuffer(buffer, left);
+ size -= left;
+ buffer = (char *)buffer + left;
+
+ if ( !FillBuffer() )
+ {
+ SetError(wxSTREAM_EOF);
+ break;
+ }
+ }
+ else // otherwise just do it in one gulp
+ {
+ GetFromBuffer(buffer, size);
+ size = 0;
+ }
+ }
+
+ read = orig_size - size;
}
- }
- m_ostream->m_lastwrite = orig_size;
-}
-// ----------------------------------------------------------------------------
-// wxInputStream
-// ----------------------------------------------------------------------------
+ if ( m_stream )
+ m_stream->m_lastcount = read;
-wxInputStream::wxInputStream()
-{
- m_i_destroybuf = TRUE;
- m_i_streambuf = new wxStreamBuffer(*this);
- m_eof = FALSE;
+ return read;
}
-wxInputStream::wxInputStream(wxStreamBuffer *buffer)
+// this should really be called "Copy()"
+size_t wxStreamBuffer::Read(wxStreamBuffer *dbuf)
{
- m_i_destroybuf = FALSE;
- m_i_streambuf = buffer;
- m_eof = FALSE;
+ wxCHECK_MSG( m_mode != write, 0, _T("can't read from this buffer") );
+
+ char buf[BUF_TEMP_SIZE];
+ size_t nRead,
+ total = 0;
+
+ do
+ {
+ nRead = Read(dbuf, WXSIZEOF(buf));
+ if ( nRead )
+ {
+ nRead = dbuf->Write(buf, nRead);
+ total += nRead;
+ }
+ }
+ while ( nRead );
+
+ return total;
}
-wxInputStream::~wxInputStream()
+size_t wxStreamBuffer::Write(const void *buffer, size_t size)
{
- if (m_i_destroybuf)
- delete m_i_streambuf;
+ if (m_stream)
+ {
+ // lasterror is reset before all new IO calls
+ m_stream->Reset();
+ }
+
+ size_t ret = 0;
+
+ if ( !HasBuffer() && m_fixed )
+ {
+ wxOutputStream *outStream = GetOutputStream();
+
+ wxCHECK_MSG( outStream, 0, _T("should have a stream in wxStreamBuffer") );
+
+ // no buffer, just forward the call to the stream
+ ret = outStream->OnSysWrite(buffer, size);
+ }
+ else // we [may] have a buffer, use it
+ {
+ size_t orig_size = size;
+
+ while ( size > 0 )
+ {
+ size_t left = GetBytesLeft();
+
+ // if the buffer is too large to fit in the stream buffer, split
+ // it in smaller parts
+ //
+ // NB: If stream buffer isn't fixed (as for wxMemoryOutputStream),
+ // we always go to the second case.
+ //
+ // FIXME: fine, but if it fails we should (re)try writing it by
+ // chunks as this will (hopefully) always work (VZ)
+
+ if ( size > left && m_fixed )
+ {
+ PutToBuffer(buffer, left);
+ size -= left;
+ buffer = (char *)buffer + left;
+
+ if ( !FlushBuffer() )
+ {
+ SetError(wxSTREAM_WRITE_ERROR);
+
+ break;
+ }
+
+ m_buffer_pos = m_buffer_start;
+ }
+ else // we can do it in one gulp
+ {
+ PutToBuffer(buffer, size);
+ size = 0;
+ }
+ }
+
+ ret = orig_size - size;
+ }
+
+ if (m_stream)
+ {
+ // i am not entirely sure what we do this for
+ m_stream->m_lastcount = ret;
+ }
+
+ return ret;
}
-char wxInputStream::GetC()
+size_t wxStreamBuffer::Write(wxStreamBuffer *sbuf)
{
- char c;
- m_i_streambuf->Read(&c, 1);
- return c;
+ wxCHECK_MSG( m_mode != read, 0, _T("can't write to this buffer") );
+ wxCHECK_MSG( sbuf->m_mode != write, 0, _T("can't read from that buffer") );
+
+ char buf[BUF_TEMP_SIZE];
+ size_t nWrite,
+ total = 0;
+
+ do
+ {
+ size_t nRead = sbuf->Read(buf, WXSIZEOF(buf));
+ if ( nRead )
+ {
+ nWrite = Write(buf, nRead);
+ if ( nWrite < nRead )
+ {
+ // put back data we couldn't copy
+ wxInputStream *in_stream = (wxInputStream *)sbuf->GetStream();
+
+ in_stream->Ungetch(buf + nWrite, nRead - nWrite);
+ }
+
+ total += nWrite;
+ }
+ else
+ {
+ nWrite = 0;
+ }
+ }
+ while ( nWrite == WXSIZEOF(buf) );
+
+ return total;
}
-wxInputStream& wxInputStream::Read(void *buffer, size_t size)
+off_t wxStreamBuffer::Seek(off_t pos, wxSeekMode mode)
{
- m_i_streambuf->Read(buffer, size);
- // wxStreamBuffer sets all variables for us
- return *this;
-}
+ off_t ret_off, diff;
+
+ off_t last_access = GetLastAccess();
+
+ if ( !m_flushable )
+ {
+ switch (mode)
+ {
+ case wxFromStart:
+ diff = pos;
+ break;
+
+ case wxFromCurrent:
+ diff = pos + GetIntPosition();
+ break;
+
+ case wxFromEnd:
+ diff = pos + last_access;
+ break;
+
+ default:
+ wxFAIL_MSG( _T("invalid seek mode") );
+
+ return wxInvalidOffset;
+ }
+ if (diff < 0 || diff > last_access)
+ return wxInvalidOffset;
+ SetIntPosition(diff);
+ return diff;
+ }
-#define BUF_TEMP_SIZE 10000
+ switch ( mode )
+ {
+ case wxFromStart:
+ // We'll try to compute an internal position later ...
+ ret_off = m_stream->OnSysSeek(pos, wxFromStart);
+ ResetBuffer();
+ return ret_off;
+
+ case wxFromCurrent:
+ diff = pos + GetIntPosition();
+
+ if ( (diff > last_access) || (diff < 0) )
+ {
+ // We must take into account the fact that we have read
+ // something previously.
+ ret_off = m_stream->OnSysSeek(diff-last_access, wxFromCurrent);
+ ResetBuffer();
+ return ret_off;
+ }
+ else
+ {
+ SetIntPosition(diff);
+ return pos;
+ }
+
+ case wxFromEnd:
+ // Hard to compute: always seek to the requested position.
+ ret_off = m_stream->OnSysSeek(pos, wxFromEnd);
+ ResetBuffer();
+ return ret_off;
+ }
-wxInputStream& wxInputStream::Read(wxOutputStream& stream_out)
+ return wxInvalidOffset;
+}
+
+off_t wxStreamBuffer::Tell() const
{
- char buf[BUF_TEMP_SIZE];
- size_t bytes_read = BUF_TEMP_SIZE;
+ off_t pos;
+
+ // ask the stream for position if we have a real one
+ if ( m_stream )
+ {
+ pos = m_stream->OnSysTell();
+ if ( pos == wxInvalidOffset )
+ return wxInvalidOffset;
+ }
+ else // no associated stream
+ {
+ pos = 0;
+ }
+
+ pos += GetIntPosition();
- while (bytes_read == BUF_TEMP_SIZE && !stream_out.Bad()) {
- bytes_read = Read(buf, bytes_read).LastRead();
+ if ( m_mode == read && m_flushable )
+ pos -= GetLastAccess();
- stream_out.Write(buf, bytes_read);
- }
- return *this;
+ return pos;
}
-wxInputStream& wxInputStream::operator>>(wxString& line)
+// ----------------------------------------------------------------------------
+// wxStreamBase
+// ----------------------------------------------------------------------------
+
+wxStreamBase::wxStreamBase()
{
- wxDataInputStream s(*this);
+ m_lasterror = wxSTREAM_NO_ERROR;
+ m_lastcount = 0;
+}
- line = s.ReadLine();
- return *this;
+wxStreamBase::~wxStreamBase()
+{
}
-wxInputStream& wxInputStream::operator>>(char& c)
+off_t wxStreamBase::OnSysSeek(off_t WXUNUSED(seek), wxSeekMode WXUNUSED(mode))
{
- c = GetC();
- return *this;
+ return wxInvalidOffset;
}
-wxInputStream& wxInputStream::operator>>(short& i)
+off_t wxStreamBase::OnSysTell() const
{
- long l;
+ return wxInvalidOffset;
+}
- *this >> l;
- i = (short)l;
- return *this;
+// ----------------------------------------------------------------------------
+// wxInputStream
+// ----------------------------------------------------------------------------
+
+wxInputStream::wxInputStream()
+{
+ m_wback = NULL;
+ m_wbacksize =
+ m_wbackcur = 0;
}
-wxInputStream& wxInputStream::operator>>(int& i)
+wxInputStream::~wxInputStream()
{
- long l;
+ free(m_wback);
+}
- *this >> l;
- i = (short)l;
- return *this;
+bool wxInputStream::CanRead() const
+{
+ // we don't know if there is anything to read or not and by default we
+ // prefer to be optimistic and try to read data unless we know for sure
+ // there is no more of it
+ return m_lasterror != wxSTREAM_EOF;
}
-wxInputStream& wxInputStream::operator>>(long& i)
+bool wxInputStream::Eof() const
{
- /* I only implemented a simple integer parser */
- int c, sign;
+ // the only way the base class can know we're at EOF is when we'd already
+ // tried to read beyond it in which case last error is set accordingly
+ return GetLastError() == wxSTREAM_EOF;
+}
- while (isspace( c = GetC() ) )
- /* Do nothing */ ;
+char *wxInputStream::AllocSpaceWBack(size_t needed_size)
+{
+ // get number of bytes left from previous wback buffer
+ size_t toget = m_wbacksize - m_wbackcur;
- i = 0;
- if (! (c == '-' || isdigit(c)) ) {
- InputStreamBuffer()->WriteBack(c);
- return *this;
- }
+ // allocate a buffer large enough to hold prev + new data
+ char *temp_b = (char *)malloc(needed_size + toget);
- if (c == '-') {
- sign = -1;
- c = GetC();
- } else
- sign = 1;
+ if (!temp_b)
+ return NULL;
- while (isdigit(c)) {
- i = i*10 + c;
- c = GetC();
- }
+ // copy previous data (and free old buffer) if needed
+ if (m_wback)
+ {
+ memmove(temp_b + needed_size, m_wback + m_wbackcur, toget);
+ free(m_wback);
+ }
- i *= sign;
+ // done
+ m_wback = temp_b;
+ m_wbackcur = 0;
+ m_wbacksize = needed_size + toget;
- return *this;
+ return m_wback;
}
-wxInputStream& wxInputStream::operator>>(float& f)
+size_t wxInputStream::GetWBack(void *buf, size_t size)
{
- /* I only implemented a simple float parser */
- int c, sign;
+ if (!m_wback)
+ return 0;
- while (isspace( c = GetC() ) )
- /* Do nothing */ ;
+ // how many bytes do we have in the buffer?
+ size_t toget = m_wbacksize - m_wbackcur;
- f = 0.0;
- if (! (c == '-' || isdigit(c)) ) {
- InputStreamBuffer()->WriteBack(c);
- return *this;
- }
+ if ( size < toget )
+ {
+ // we won't read everything
+ toget = size;
+ }
- if (c == '-') {
- sign = -1;
- c = GetC();
- } else
- sign = 1;
+ // copy the data from the cache
+ memcpy(buf, m_wback + m_wbackcur, toget);
+
+ m_wbackcur += toget;
+ if ( m_wbackcur == m_wbacksize )
+ {
+ // TODO: should we really free it here all the time? maybe keep it?
+ free(m_wback);
+ m_wback = NULL;
+ m_wbacksize = 0;
+ m_wbackcur = 0;
+ }
- while (isdigit(c)) {
- f = f*10 + c;
- c = GetC();
- }
+ // return the number of bytes copied
+ return toget;
+}
- if (c == '.') {
- float f_multiplicator = 0.1;
- c = GetC();
+size_t wxInputStream::Ungetch(const void *buf, size_t bufsize)
+{
+ if ( m_lasterror != wxSTREAM_NO_ERROR && m_lasterror != wxSTREAM_EOF )
+ {
+ // can't operate on this stream until the error is cleared
+ return 0;
+ }
+
+ char *ptrback = AllocSpaceWBack(bufsize);
+ if (!ptrback)
+ return 0;
+
+ // Eof() shouldn't return TRUE any longer
+ if ( m_lasterror == wxSTREAM_EOF )
+ m_lasterror = wxSTREAM_NO_ERROR;
+
+ memcpy(ptrback, buf, bufsize);
+ return bufsize;
+}
+
+bool wxInputStream::Ungetch(char c)
+{
+ return Ungetch(&c, sizeof(c)) != 0;
+}
+
+char wxInputStream::GetC()
+{
+ char c;
+ Read(&c, sizeof(c));
+ return c;
+}
- while (isdigit(c)) {
- f += c*f_multiplicator;
- f_multiplicator /= 10;
- c = GetC();
+wxInputStream& wxInputStream::Read(void *buf, size_t size)
+{
+ char *p = (char *)buf;
+ m_lastcount = 0;
+
+ size_t read = GetWBack(buf, size);
+ for ( ;; )
+ {
+ size -= read;
+ m_lastcount += read;
+ p += read;
+
+ if ( !size )
+ {
+ // we read the requested amount of data
+ break;
+ }
+
+ if ( p != buf && !CanRead() )
+ {
+ // we have already read something and we would block in OnSysRead()
+ // now: don't do it but return immediately
+ break;
+ }
+
+ read = OnSysRead(p, size);
+ if ( !read )
+ {
+ // no more data available
+ break;
+ }
}
- }
- f *= sign;
+ return *this;
+}
+
+char wxInputStream::Peek()
+{
+ char c;
+ Read(&c, sizeof(c));
+ if (m_lasterror == wxSTREAM_NO_ERROR)
+ {
+ Ungetch(c);
+ return c;
+ }
- return *this;
+ return 0;
}
-wxInputStream& wxInputStream::operator>>(wxObject *& obj)
+wxInputStream& wxInputStream::Read(wxOutputStream& stream_out)
{
- wxObjectInputStream obj_s(*this);
- obj = obj_s.LoadObject();
- return *this;
+ char buf[BUF_TEMP_SIZE];
+
+ for ( ;; )
+ {
+ size_t bytes_read = Read(buf, WXSIZEOF(buf)).LastRead();
+ if ( !bytes_read )
+ break;
+
+ if ( stream_out.Write(buf, bytes_read).LastWrite() != bytes_read )
+ break;
+ }
+
+ return *this;
}
off_t wxInputStream::SeekI(off_t pos, wxSeekMode mode)
{
- off_t ret_off;
-
- switch (mode) {
- case wxFromStart:
- if ( (unsigned)abs (DoTellInput()-pos) > m_i_streambuf->GetLastAccess() ) {
- ret_off = DoSeekInput(pos, wxFromStart);
- m_i_streambuf->ResetBuffer();
- return ret_off;
- } else {
- m_i_streambuf->SetIntPosition(DoTellInput() - pos);
- return pos;
- }
- case wxFromCurrent:
- if ( ((unsigned)pos > m_i_streambuf->GetLastAccess()) || (pos < 0) ) {
- ret_off = DoSeekInput(pos, wxFromCurrent);
- m_i_streambuf->ResetBuffer();
- return ret_off;
- } else {
- m_i_streambuf->SetIntPosition(pos);
- return pos;
- }
- case wxFromEnd:
- // Hard to compute: always seek to the requested position.
- ret_off = DoSeekInput(pos, wxFromEnd);
- m_i_streambuf->ResetBuffer();
- return ret_off;
- }
- return wxInvalidOffset;
+ // RR: This code is duplicated in wxBufferedInputStream. This is
+ // not really a good design, but buffered stream are different
+ // from all other in that they handle two stream-related objects,
+ // the stream buffer and parent stream.
+
+ // I don't know whether it should be put as well in wxFileInputStream::OnSysSeek
+ if (m_lasterror==wxSTREAM_EOF)
+ m_lasterror=wxSTREAM_NO_ERROR;
+
+ /* RR: A call to SeekI() will automatically invalidate any previous
+ call to Ungetch(), otherwise it would be possible to SeekI() to
+ one position, unread some bytes there, SeekI() to another position
+ and the data would be corrupted.
+
+ GRG: Could add code here to try to navigate within the wback
+ buffer if possible, but is it really needed? It would only work
+ when seeking in wxFromCurrent mode, else it would invalidate
+ anyway... */
+
+ if (m_wback)
+ {
+ wxLogDebug( wxT("Seeking in stream which has data written back to it.") );
+
+ free(m_wback);
+ m_wback = NULL;
+ m_wbacksize = 0;
+ m_wbackcur = 0;
+ }
+
+ return OnSysSeek(pos, mode);
}
off_t wxInputStream::TellI() const
{
- return DoTellInput() - m_i_streambuf->GetLastAccess() +
- m_i_streambuf->GetIntPosition();
+ off_t pos = OnSysTell();
+
+ if (pos != wxInvalidOffset)
+ pos -= (m_wbacksize - m_wbackcur);
+
+ return pos;
}
+
// ----------------------------------------------------------------------------
// wxOutputStream
// ----------------------------------------------------------------------------
+
wxOutputStream::wxOutputStream()
{
- m_o_destroybuf = TRUE;
- m_o_streambuf = new wxStreamBuffer(*this);
}
-wxOutputStream::wxOutputStream(wxStreamBuffer *buffer)
+wxOutputStream::~wxOutputStream()
{
- m_o_destroybuf = FALSE;
- m_o_streambuf = buffer;
}
-wxOutputStream::~wxOutputStream()
+size_t wxOutputStream::OnSysWrite(const void * WXUNUSED(buffer),
+ size_t WXUNUSED(bufsize))
{
- if (m_o_destroybuf)
- delete m_o_streambuf;
+ return 0;
+}
+
+void wxOutputStream::PutC(char c)
+{
+ Write(&c, sizeof(c));
}
wxOutputStream& wxOutputStream::Write(const void *buffer, size_t size)
{
- m_o_streambuf->Write(buffer, size);
- return *this;
+ m_lastcount = OnSysWrite(buffer, size);
+ return *this;
}
wxOutputStream& wxOutputStream::Write(wxInputStream& stream_in)
{
- stream_in.Read(*this);
- return *this;
+ stream_in.Read(*this);
+ return *this;
}
-off_t wxOutputStream::SeekO(off_t pos, wxSeekMode mode)
+off_t wxOutputStream::TellO() const
{
- off_t ret_off;
-
- switch (mode) {
- case wxFromStart:
- if ( (unsigned)abs (DoTellOutput()-pos) > m_o_streambuf->GetLastAccess() ) {
- ret_off = DoSeekOutput(pos, wxFromStart);
- m_o_streambuf->ResetBuffer();
- return ret_off;
- } else {
- m_o_streambuf->SetIntPosition( DoTellOutput() - pos);
- return pos;
- }
- case wxFromCurrent:
- if ( ((unsigned)pos > m_o_streambuf->GetLastAccess()) || (pos < 0) ) {
- ret_off = DoSeekOutput(pos, wxFromCurrent);
- m_o_streambuf->ResetBuffer();
- return ret_off;
- } else {
- m_o_streambuf->SetIntPosition(pos);
- return pos;
- }
- case wxFromEnd:
- // Hard to compute: always seek to the requested position.
- ret_off = DoSeekOutput(pos, wxFromEnd);
- m_o_streambuf->ResetBuffer();
- return ret_off;
- }
- return wxInvalidOffset;
+ return OnSysTell();
}
-off_t wxOutputStream::TellO() const
+off_t wxOutputStream::SeekO(off_t pos, wxSeekMode mode)
{
- return DoTellOutput() - m_o_streambuf->GetLastAccess()
- + m_o_streambuf->GetIntPosition();
+ return OnSysSeek(pos, mode);
}
void wxOutputStream::Sync()
{
- DoWrite(m_o_streambuf->GetBufferStart(), m_o_streambuf->GetIntPosition());
-
- m_o_streambuf->ResetBuffer();
}
-wxOutputStream& wxOutputStream::operator<<(const char *string)
+
+// ----------------------------------------------------------------------------
+// wxCountingOutputStream
+// ----------------------------------------------------------------------------
+
+wxCountingOutputStream::wxCountingOutputStream ()
{
- return Write(string, strlen(string));
+ m_currentPos = 0;
}
-wxOutputStream& wxOutputStream::operator<<(wxString& string)
+size_t wxCountingOutputStream::GetSize() const
{
- return Write(string, string.Len());
+ return m_lastcount;
}
-wxOutputStream& wxOutputStream::operator<<(char c)
+size_t wxCountingOutputStream::OnSysWrite(const void *WXUNUSED(buffer),
+ size_t size)
{
- return Write(&c, 1);
+ m_currentPos += size;
+ if (m_currentPos > m_lastcount)
+ m_lastcount = m_currentPos;
+
+ return m_currentPos;
}
-wxOutputStream& wxOutputStream::operator<<(short i)
+off_t wxCountingOutputStream::OnSysSeek(off_t pos, wxSeekMode mode)
{
- wxString strint;
+ switch ( mode )
+ {
+ case wxFromStart:
+ m_currentPos = pos;
+ break;
+
+ case wxFromEnd:
+ m_currentPos = m_lastcount + pos;
+ break;
+
+ case wxFromCurrent:
+ m_currentPos += pos;
+ break;
+
+ default:
+ wxFAIL_MSG( _T("invalid seek mode") );
+ return wxInvalidOffset;
+ }
+
+ if (m_currentPos > m_lastcount)
+ m_lastcount = m_currentPos;
- strint.Printf("%i", i);
- return Write(strint, strint.Len());
+ return m_currentPos;
}
-wxOutputStream& wxOutputStream::operator<<(int i)
+off_t wxCountingOutputStream::OnSysTell() const
{
- wxString strint;
+ return m_currentPos;
+}
- strint.Printf("%i", i);
- return Write(strint, strint.Len());
+// ----------------------------------------------------------------------------
+// wxFilterInputStream
+// ----------------------------------------------------------------------------
+
+wxFilterInputStream::wxFilterInputStream()
+{
+ m_parent_i_stream = NULL;
}
-wxOutputStream& wxOutputStream::operator<<(long i)
+wxFilterInputStream::wxFilterInputStream(wxInputStream& stream)
{
- wxString strlong;
+ m_parent_i_stream = &stream;
+}
- strlong.Printf("%i", i);
- return Write((const char *)strlong, strlong.Len());
+wxFilterInputStream::~wxFilterInputStream()
+{
}
-wxOutputStream& wxOutputStream::operator<<(double f)
+// ----------------------------------------------------------------------------
+// wxFilterOutputStream
+// ----------------------------------------------------------------------------
+
+wxFilterOutputStream::wxFilterOutputStream()
{
- wxString strfloat;
+ m_parent_o_stream = NULL;
+}
- strfloat.Printf("%f", f);
- return Write(strfloat, strfloat.Len());
+wxFilterOutputStream::wxFilterOutputStream(wxOutputStream& stream)
+{
+ m_parent_o_stream = &stream;
}
-wxOutputStream& wxOutputStream::operator<<(wxObject& obj)
+wxFilterOutputStream::~wxFilterOutputStream()
{
- wxObjectOutputStream obj_s(*this);
- obj_s.SaveObject(obj);
- return *this;
}
// ----------------------------------------------------------------------------
-// wxFilterInputStream
+// wxBufferedInputStream
// ----------------------------------------------------------------------------
-wxFilterInputStream::wxFilterInputStream(wxInputStream& stream)
- : wxInputStream(NULL)
+
+wxBufferedInputStream::wxBufferedInputStream(wxInputStream& s,
+ wxStreamBuffer *buffer)
+ : wxFilterInputStream(s)
{
- m_parent_i_stream = &stream;
- m_i_streambuf = stream.InputStreamBuffer();
+ if ( buffer )
+ {
+ // use the buffer provided by the user
+ m_i_streambuf = buffer;
+ }
+ else // create a default buffer
+ {
+ m_i_streambuf = new wxStreamBuffer(*this, wxStreamBuffer::read);
+
+ m_i_streambuf->SetBufferIO(1024);
+ }
}
-wxFilterInputStream::~wxFilterInputStream()
+wxBufferedInputStream::~wxBufferedInputStream()
{
+ m_parent_i_stream->SeekI(-(off_t)m_i_streambuf->GetBytesLeft(),
+ wxFromCurrent);
+
+ delete m_i_streambuf;
}
-size_t wxFilterInputStream::DoRead(void *buffer, size_t size)
+char wxBufferedInputStream::Peek()
{
- return m_parent_i_stream->Read(buffer, size).LastRead();
+ return m_i_streambuf->Peek();
}
-off_t wxFilterInputStream::DoSeekInput(off_t pos, wxSeekMode mode)
+wxInputStream& wxBufferedInputStream::Read(void *buf, size_t size)
{
- return m_parent_i_stream->SeekI(pos, mode);
+ // reset the error flag
+ Reset();
+
+ // first read from the already cached data
+ m_lastcount = GetWBack(buf, size);
+
+ // do we have to read anything more?
+ if ( m_lastcount < size )
+ {
+ size -= m_lastcount;
+ buf = (char *)buf + m_lastcount;
+
+ // the call to wxStreamBuffer::Read() below will reset our m_lastcount,
+ // so save it
+ size_t countOld = m_lastcount;
+
+ m_i_streambuf->Read(buf, size);
+
+ m_lastcount += countOld;
+ }
+
+ return *this;
}
-off_t wxFilterInputStream::DoTellInput() const
+off_t wxBufferedInputStream::SeekI(off_t pos, wxSeekMode mode)
{
- return m_parent_i_stream->TellI();
+ // RR: Look at wxInputStream for comments.
+
+ if (m_lasterror==wxSTREAM_EOF)
+ Reset();
+
+ if (m_wback)
+ {
+ wxLogDebug( wxT("Seeking in stream which has data written back to it.") );
+
+ free(m_wback);
+ m_wback = NULL;
+ m_wbacksize = 0;
+ m_wbackcur = 0;
+ }
+
+ return m_i_streambuf->Seek(pos, mode);
+}
+
+off_t wxBufferedInputStream::TellI() const
+{
+ off_t pos = m_i_streambuf->Tell();
+
+ if (pos != wxInvalidOffset)
+ pos -= (m_wbacksize - m_wbackcur);
+
+ return pos;
+}
+
+size_t wxBufferedInputStream::OnSysRead(void *buffer, size_t bufsize)
+{
+ return m_parent_i_stream->Read(buffer, bufsize).LastRead();
}
+off_t wxBufferedInputStream::OnSysSeek(off_t seek, wxSeekMode mode)
+{
+ return m_parent_i_stream->SeekI(seek, mode);
+}
+
+off_t wxBufferedInputStream::OnSysTell() const
+{
+ return m_parent_i_stream->TellI();
+}
+
+void wxBufferedInputStream::SetInputStreamBuffer(wxStreamBuffer *buffer)
+{
+ wxCHECK_RET( buffer, _T("wxBufferedInputStream needs buffer") );
+
+ delete m_i_streambuf;
+ m_i_streambuf = buffer;
+}
// ----------------------------------------------------------------------------
-// wxFilterOutputStream
+// wxBufferedOutputStream
// ----------------------------------------------------------------------------
-wxFilterOutputStream::wxFilterOutputStream(wxOutputStream& stream)
- : wxOutputStream(NULL)
+
+wxBufferedOutputStream::wxBufferedOutputStream(wxOutputStream& s,
+ wxStreamBuffer *buffer)
+ : wxFilterOutputStream(s)
{
- m_parent_o_stream = &stream;
- m_o_streambuf = stream.OutputStreamBuffer();
+ if ( buffer )
+ {
+ m_o_streambuf = buffer;
+ }
+ else // create a default one
+ {
+ m_o_streambuf = new wxStreamBuffer(*this, wxStreamBuffer::write);
+
+ m_o_streambuf->SetBufferIO(1024);
+ }
}
-wxFilterOutputStream::~wxFilterOutputStream()
+wxBufferedOutputStream::~wxBufferedOutputStream()
{
+ Sync();
+ delete m_o_streambuf;
+}
+
+wxOutputStream& wxBufferedOutputStream::Write(const void *buffer, size_t size)
+{
+ m_lastcount = 0;
+ m_o_streambuf->Write(buffer, size);
+ return *this;
}
-size_t wxFilterOutputStream::DoWrite(const void *buffer, size_t size)
+off_t wxBufferedOutputStream::SeekO(off_t pos, wxSeekMode mode)
{
- return m_parent_o_stream->Write(buffer, size).LastWrite();
+ Sync();
+ return m_o_streambuf->Seek(pos, mode);
}
-off_t wxFilterOutputStream::DoSeekOutput(off_t pos, wxSeekMode mode)
+off_t wxBufferedOutputStream::TellO() const
{
- return m_parent_o_stream->SeekO(pos, mode);
+ return m_o_streambuf->Tell();
}
-off_t wxFilterOutputStream::DoTellOutput() const
+void wxBufferedOutputStream::Sync()
{
- return m_parent_o_stream->TellO();
+ m_o_streambuf->FlushBuffer();
+ m_parent_o_stream->Sync();
+}
+
+size_t wxBufferedOutputStream::OnSysWrite(const void *buffer, size_t bufsize)
+{
+ return m_parent_o_stream->Write(buffer, bufsize).LastWrite();
+}
+
+off_t wxBufferedOutputStream::OnSysSeek(off_t seek, wxSeekMode mode)
+{
+ return m_parent_o_stream->SeekO(seek, mode);
+}
+
+off_t wxBufferedOutputStream::OnSysTell() const
+{
+ return m_parent_o_stream->TellO();
+}
+
+size_t wxBufferedOutputStream::GetSize() const
+{
+ return m_parent_o_stream->GetSize() + m_o_streambuf->GetIntPosition();
+}
+
+void wxBufferedOutputStream::SetOutputStreamBuffer(wxStreamBuffer *buffer)
+{
+ wxCHECK_RET( buffer, _T("wxBufferedOutputStream needs buffer") );
+
+ delete m_o_streambuf;
+ m_o_streambuf = buffer;
}
// ----------------------------------------------------------------------------
wxOutputStream& wxEndL(wxOutputStream& stream)
{
-#ifdef __MSW__
- return stream.Write("\r\n", 2);
-#else
- return stream.Write("\n", 1);
-#endif
+ static const wxChar *eol = wxTextFile::GetEOL();
+
+ return stream.Write(eol, wxStrlen(eol));
}
+
+#endif
+ // wxUSE_STREAMS