X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/eb4e516dd9774b4d14abedd8229dc4c9bcff8439..59d04dff037f66e9e73b389de72835211f5f0bcd:/src/common/stream.cpp diff --git a/src/common/stream.cpp b/src/common/stream.cpp index 4f24cfc97a..a1d8cb04cc 100644 --- a/src/common/stream.cpp +++ b/src/common/stream.cpp @@ -1,823 +1,1229 @@ ///////////////////////////////////////////////////////////////////////////// -// 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 ///////////////////////////////////////////////////////////////////////////// +// ============================================================================ +// declarations +// ============================================================================ + +// ---------------------------------------------------------------------------- +// headers +// ---------------------------------------------------------------------------- + #ifdef __GNUG__ -#pragma implementation "stream.h" + #pragma implementation "stream.h" #endif // For compilers that support precompilation, includes "wx.h". #include "wx/wxprec.h" -#include -#include -#include -#include #ifdef __BORLANDC__ -#pragma hdrstop + #pragma hdrstop #endif +#ifndef WX_PRECOMP + #include "wx/defs.h" +#endif + +#if wxUSE_STREAMS + +#include +#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 10000 +// ============================================================================ +// implementation +// ============================================================================ + // ---------------------------------------------------------------------------- // wxStreamBuffer // ---------------------------------------------------------------------------- -#define CHECK_ERROR(err) \ - if (m_stream->m_lasterror == wxStream_NOERROR) \ - m_stream->m_lasterror = err - -wxStreamBuffer::wxStreamBuffer(wxStreamBase& stream, BufMode mode) - : m_buffer_start(NULL), m_buffer_end(NULL), m_buffer_pos(NULL), - m_buffer_size(0), m_wback(NULL), m_wbacksize(0), m_wbackcur(0), - m_fixed(TRUE), m_flushable(TRUE), m_stream(&stream), - m_mode(mode), m_destroybuf(FALSE), m_destroystream(FALSE) +void wxStreamBuffer::SetError(wxStreamError err) { + if ( m_stream->m_lasterror == wxStream_NOERROR ) + m_stream->m_lasterror = err; } -wxStreamBuffer::wxStreamBuffer(BufMode mode) - : m_buffer_start(NULL), m_buffer_end(NULL), m_buffer_pos(NULL), - m_buffer_size(0), m_wback(NULL), m_wbacksize(0), m_wbackcur(0), - m_fixed(TRUE), m_flushable(FALSE), m_stream(NULL), - m_mode(mode), m_destroybuf(FALSE), m_destroystream(TRUE) +void wxStreamBuffer::InitBuffer() { - m_stream = new wxStreamBase(); -} + m_buffer_start = + m_buffer_end = + m_buffer_pos = NULL; + m_buffer_size = 0; -wxStreamBuffer::wxStreamBuffer(const wxStreamBuffer& 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; - m_destroystream = FALSE; - m_wback = NULL; - m_wbacksize = 0; - m_wbackcur = 0; + // if we are going to allocate the buffer, we should free it later as well + m_destroybuf = TRUE; } -wxStreamBuffer::~wxStreamBuffer() +void wxStreamBuffer::Init() { - if (m_wback) - free(m_wback); - if (m_destroybuf) - wxDELETEA(m_buffer_start); - if (m_destroystream) - delete m_stream; + InitBuffer(); + + m_fixed = TRUE; } -size_t wxStreamBuffer::WriteBack(const char *buf, size_t bufsize) +wxStreamBuffer::wxStreamBuffer(wxStreamBase& stream, BufMode mode) { - char *ptrback; + Init(); - ptrback = AllocSpaceWBack(bufsize); - if (!ptrback) - return 0; + m_stream = &stream; + m_mode = mode; - memcpy(ptrback, buf, bufsize); - return bufsize; + m_flushable = TRUE; + m_destroystream = FALSE; } -bool wxStreamBuffer::WriteBack(char c) +wxStreamBuffer::wxStreamBuffer(BufMode mode) { - char *ptrback; + Init(); - ptrback = AllocSpaceWBack(1); - if (!ptrback) - return FALSE; + wxASSERT_MSG(mode != read_write, wxT("you have to use the other ctor for read_write mode") ); + if ( mode == read ) + m_stream = new wxInputStream; + else if ( mode == write) + m_stream = new wxOutputStream; + else + m_stream = NULL; - *ptrback = c; - return TRUE; + m_mode = mode; + + m_flushable = FALSE; + m_destroystream = TRUE; } -void wxStreamBuffer::SetBufferIO(char *buffer_start, char *buffer_end) +wxStreamBuffer::wxStreamBuffer(const wxStreamBuffer& buffer) { - if (m_destroybuf) - wxDELETEA(m_buffer_start); - m_buffer_start = buffer_start; - m_buffer_end = buffer_end; + // doing this has big chances to lead to a crashwhen the source buffer is + // destroyed (otherwise assume the caller knows what he does) + wxASSERT_MSG( !buffer.m_destroybuf && !buffer.m_destroystream, + _T("it's a bad idea to copy this buffer") ); - m_buffer_size = m_buffer_end-m_buffer_start; - m_destroybuf = FALSE; - ResetBuffer(); + 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; + m_destroystream = FALSE; } -void wxStreamBuffer::SetBufferIO(size_t bufsize) +void wxStreamBuffer::FreeBuffer() { - char *b_start; + if ( m_destroybuf ) + free(m_buffer_start); +} - if (m_destroybuf) - wxDELETEA(m_buffer_start); +wxStreamBuffer::~wxStreamBuffer() +{ + FreeBuffer(); - if (!bufsize) { - m_buffer_start = NULL; - m_buffer_end = NULL; - m_buffer_pos = NULL; - m_buffer_size = 0; - return; - } + if ( m_destroystream ) + delete m_stream; +} - b_start = new char[bufsize]; - SetBufferIO(b_start, b_start + bufsize); - m_destroybuf = TRUE; +wxInputStream *wxStreamBuffer::GetInputStream() const +{ + return m_mode == write ? NULL : (wxInputStream *)m_stream; } -void wxStreamBuffer::ResetBuffer() +wxOutputStream *wxStreamBuffer::GetOutputStream() const { - if (m_mode == read) - m_buffer_pos = m_buffer_end; - else - m_buffer_pos = m_buffer_start; + return m_mode == read ? NULL : (wxOutputStream *)m_stream; +} + +void wxStreamBuffer::SetBufferIO(void *buffer_start, + void *buffer_end, + bool takeOwnership) +{ + SetBufferIO(buffer_start, (char *)buffer_end - (char *)buffer_start, + takeOwnership); } -char *wxStreamBuffer::AllocSpaceWBack(size_t needed_size) +void wxStreamBuffer::SetBufferIO(void *start, + size_t len, + bool takeOwnership) { - char *temp_b; + // start by freeing the old buffer + FreeBuffer(); + + m_buffer_start = (char *)start; + m_buffer_end = m_buffer_start + len; - m_wbacksize += needed_size; + m_buffer_size = len; - if (!m_wback) - temp_b = (char *)malloc(m_wbacksize); - else - temp_b = (char *)realloc(m_wback, m_wbacksize); + // if we own it, we free it + m_destroybuf = takeOwnership; - if (!temp_b) - return NULL; - m_wback = temp_b; - printf("Buffer(0x%x)->Write: 0x%x, %d\n", this, m_wback, m_wbacksize); - return (char *)(m_wback+(m_wbacksize-needed_size)); + ResetBuffer(); } -size_t wxStreamBuffer::GetWBack(char *buf, size_t bsize) +void wxStreamBuffer::SetBufferIO(size_t bufsize) { - size_t s_toget = m_wbacksize-m_wbackcur; + // start by freeing the old buffer + FreeBuffer(); - printf("Buffer(0x%x): 0x%x, %d\n", this, m_wback, m_wbacksize); - if (bsize < s_toget) - s_toget = bsize; + if ( bufsize ) + { + SetBufferIO(malloc(bufsize), bufsize, TRUE /* take ownership */); + } + else // no buffer size => no buffer + { + InitBuffer(); + } +} - memcpy(buf, (m_wback+m_wbackcur), s_toget); +void wxStreamBuffer::ResetBuffer() +{ + wxCHECK_RET( m_stream, _T("should have a stream in wxStreamBuffer") ); - m_wbackcur += s_toget; - if (m_wbackcur == m_wbacksize) { - free(m_wback); - m_wback = (char *)NULL; - m_wbacksize = 0; - m_wbackcur = 0; - } - - return s_toget; + m_stream->m_lasterror = wxStream_NOERROR; + m_stream->m_lastcount = 0; + if (m_mode == read && m_flushable) + m_buffer_pos = m_buffer_end; + else + m_buffer_pos = m_buffer_start; } +// fill the buffer with as much data as possible (only for read buffers) bool wxStreamBuffer::FillBuffer() { - size_t count; + wxInputStream *inStream = GetInputStream(); - count = m_stream->OnSysRead(m_buffer_start, m_buffer_size); - m_buffer_end = m_buffer_start+count; - m_buffer_pos = m_buffer_start; + wxCHECK_MSG( inStream, FALSE, _T("should have a stream in wxStreamBuffer") ); - if (count == 0) - return FALSE; - return TRUE; + 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; + + return TRUE; } +// write the buffer contents to the stream (only for write buffers) bool wxStreamBuffer::FlushBuffer() { - size_t count, current; + wxCHECK_MSG( m_flushable, FALSE, _T("can't flush this buffer") ); - if (m_buffer_pos == m_buffer_start || !m_flushable) - return FALSE; + // FIXME: what is this check for? (VZ) + if ( m_buffer_pos == m_buffer_start ) + return FALSE; - current = m_buffer_pos-m_buffer_start; - count = m_stream->OnSysWrite(m_buffer_start, current); - if (count != current) - return FALSE; - m_buffer_pos = m_buffer_start; + wxOutputStream *outStream = GetOutputStream(); + + wxCHECK_MSG( outStream, FALSE, _T("should have a stream in wxStreamBuffer") ); - return TRUE; + 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; } +size_t wxStreamBuffer::GetDataLeft() +{ + /* Why is this done? RR. */ + if ( m_buffer_pos == m_buffer_end && m_flushable) + FillBuffer(); + + return GetBytesLeft(); +} + +// copy up to size bytes from our buffer into the provided one void wxStreamBuffer::GetFromBuffer(void *buffer, size_t size) { - size_t s_toget = m_buffer_end-m_buffer_pos; + // don't get more bytes than left in the buffer + size_t left = GetBytesLeft(); - if (size < s_toget) - s_toget = size; + if ( size > left ) + size = left; - memcpy(buffer, m_buffer_pos, s_toget); - m_buffer_pos += s_toget; + memcpy(buffer, m_buffer_pos, size); + m_buffer_pos += size; } +// copy the contents of the provided buffer into this one void wxStreamBuffer::PutToBuffer(const void *buffer, size_t size) { - size_t s_toput = m_buffer_end-m_buffer_pos; + 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; + } + } - if (s_toput < size && !m_fixed) { - m_buffer_start = (char *)realloc(m_buffer_start, m_buffer_size+size); - // I round a bit - m_buffer_size += size; - m_buffer_end = m_buffer_start+m_buffer_size; - s_toput = size; - } - if (s_toput > size) - s_toput = size; - memcpy(m_buffer_pos, buffer, s_toput); - m_buffer_pos += s_toput; + memcpy(m_buffer_pos, buffer, size); + m_buffer_pos += size; } void wxStreamBuffer::PutChar(char c) { - wxASSERT(m_stream != NULL); - - if (!m_buffer_size) { - m_stream->OnSysWrite(&c, 1); - return; - } + wxOutputStream *outStream = GetOutputStream(); - if (!GetDataLeft() && !FlushBuffer()) { - CHECK_ERROR(wxStream_READ_ERR); - return; - } + wxCHECK_RET( outStream, _T("should have a stream in wxStreamBuffer") ); - PutToBuffer(&c, 1); - m_stream->m_lastcount = 1; + // if we don't have buffer at all, just forward this call to the stream, + if ( !HasBuffer() ) + { + outStream->OnSysWrite(&c, 1); + } + else + { + // otherwise check we have enough space left + if ( !GetDataLeft() && !FlushBuffer() ) + { + // we don't + SetError(wxStream_WRITE_ERR); + } + else + { + PutToBuffer(&c, 1); + m_stream->m_lastcount = 1; + } + } } -char wxStreamBuffer::GetChar() +char wxStreamBuffer::Peek() { - char c; + wxCHECK_MSG( m_stream && HasBuffer(), 0, + _T("should have the stream and the buffer in wxStreamBuffer") ); + + if ( !GetDataLeft() ) + { + SetError(wxStream_READ_ERR); + return 0; + } - wxASSERT(m_stream != NULL); + char c; + GetFromBuffer(&c, 1); + m_buffer_pos--; - if (!m_buffer_size) { - m_stream->OnSysRead(&c, 1); return c; - } +} - if (!GetDataLeft()) { - CHECK_ERROR(wxStream_READ_ERR); - return 0; - } +char wxStreamBuffer::GetChar() +{ + wxInputStream *inStream = GetInputStream(); - GetFromBuffer(&c, 1); - m_stream->m_lastcount = 1; - return c; + wxCHECK_MSG( inStream, 0, _T("should have a stream in wxStreamBuffer") ); + + char c; + if ( !HasBuffer() ) + { + inStream->OnSysRead(&c, 1); + } + else + { + if ( !GetDataLeft() ) + { + SetError(wxStream_READ_ERR); + c = 0; + } + else + { + GetFromBuffer(&c, 1); + m_stream->m_lastcount = 1; + } + } + + return c; } size_t wxStreamBuffer::Read(void *buffer, size_t size) { - wxASSERT(m_stream != NULL); + wxInputStream *inStream = GetInputStream(); - // ------------------ - // Buffering disabled - // ------------------ + wxCHECK_MSG( inStream, 0, _T("should have a stream in wxStreamBuffer") ); + + // lasterror is reset before all new IO calls + m_stream->m_lasterror = wxStream_NOERROR; + + if ( !HasBuffer() ) + { + m_stream->m_lastcount = 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; + } + } + + m_stream->m_lastcount = orig_size - size; + } - m_stream->m_lastcount = GetWBack((char *)buffer, size); - size -= m_stream->m_lastcount; - if (size == 0) return m_stream->m_lastcount; +} - buffer = (void *)((char *)buffer+m_stream->m_lastcount); +// this should really be called "Copy()" +size_t wxStreamBuffer::Read(wxStreamBuffer *dbuf) +{ + wxCHECK_MSG( m_mode != write, 0, _T("can't read from this buffer") ); + + char buf[BUF_TEMP_SIZE]; + size_t nRead, + total = 0; - if (!m_buffer_size) - return (m_stream->m_lastcount += m_stream->OnSysRead(buffer, size)); + do + { + nRead = Read(dbuf, WXSIZEOF(buf)); + if ( nRead ) + { + nRead = dbuf->Write(buf, nRead); + total += nRead; + } + } + while ( nRead ); - // ----------------- - // Buffering enabled - // ----------------- - size_t buf_left, orig_size = size; + return total; +} - while (size > 0) { - buf_left = GetDataLeft(); +size_t wxStreamBuffer::Write(const void *buffer, size_t size) +{ + wxOutputStream *outStream = GetOutputStream(); - // First case: the requested buffer is larger than the stream buffer, - // we split it. - if (size > buf_left) { - GetFromBuffer(buffer, buf_left); - size -= buf_left; - buffer = (char *)buffer + buf_left; // ANSI C++ violation. + wxCHECK_MSG( outStream, 0, _T("should have a stream in wxStreamBuffer") ); - if (!FillBuffer()) { - CHECK_ERROR(wxStream_READ_ERR); - return (m_stream->m_lastcount = orig_size-size); - } - } else { + // lasterror is reset before all new IO calls + m_stream->m_lasterror = wxStream_NOERROR; - // Second case: we just copy from the stream buffer. - GetFromBuffer(buffer, size); - break; + if ( !HasBuffer() && m_fixed ) + { + // no buffer, just forward the call to the stream + m_stream->m_lastcount = 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_ERR); + + break; + } + + m_buffer_pos = m_buffer_start; + } + else // we can do it in one gulp + { + PutToBuffer(buffer, size); + size = 0; + } + } + + m_stream->m_lastcount = orig_size - size; } - } - return (m_stream->m_lastcount += orig_size); + + return m_stream->m_lastcount; } -size_t wxStreamBuffer::Read(wxStreamBuffer *s_buf) +size_t wxStreamBuffer::Write(wxStreamBuffer *sbuf) { - char buf[BUF_TEMP_SIZE]; - size_t s = 0, bytes_read = BUF_TEMP_SIZE; + 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) ); - while (bytes_read == BUF_TEMP_SIZE) { - bytes_read = Read(buf, bytes_read); - bytes_read = s_buf->Write(buf, bytes_read); - s += bytes_read; - } - return s; + return total; } -size_t wxStreamBuffer::Write(const void *buffer, size_t size) +off_t wxStreamBuffer::Seek(off_t pos, wxSeekMode mode) { - wxASSERT(m_stream != NULL); - - // ------------------ - // Buffering disabled - // ------------------ + off_t ret_off, diff; - if (!m_buffer_size) - return (m_stream->m_lastcount = m_stream->OnSysWrite(buffer, size)); + off_t last_access = GetLastAccess(); - // ------------------ - // Buffering enabled - // ------------------ + if ( !m_flushable ) + { + switch (mode) + { + case wxFromStart: + diff = pos; + break; - size_t buf_left, orig_size = size; + case wxFromCurrent: + diff = pos + GetIntPosition(); + break; - while (size > 0) { - buf_left = m_buffer_end - m_buffer_pos; + case wxFromEnd: + diff = pos + last_access; + break; - // First case: the buffer to write is larger than the stream buffer, - // we split it - if (size > buf_left) { - PutToBuffer(buffer, buf_left); - size -= buf_left; - buffer = (char *)buffer + buf_left; // ANSI C++ violation. + default: + wxFAIL_MSG( _T("invalid seek mode") ); - if (!FlushBuffer()) { - CHECK_ERROR(wxStream_WRITE_ERR); - return (m_stream->m_lastcount = orig_size-size); - } - - m_buffer_pos = m_buffer_start; - - } else { + return wxInvalidOffset; + } + if (diff < 0 || diff > last_access) + return wxInvalidOffset; + SetIntPosition(diff); + return diff; + } - // Second case: just copy it in the stream buffer. - PutToBuffer(buffer, size); - break; + 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; } - } - return (m_stream->m_lastcount = orig_size); + + return wxInvalidOffset; } -size_t wxStreamBuffer::Write(wxStreamBuffer *sbuf) +off_t wxStreamBuffer::Tell() const { - char buf[BUF_TEMP_SIZE]; - size_t s = 0, bytes_count = BUF_TEMP_SIZE, b_count2; + off_t pos; - while (bytes_count == BUF_TEMP_SIZE) { - b_count2 = sbuf->Read(buf, bytes_count); - bytes_count = Write(buf, b_count2); - if (b_count2 > bytes_count) - sbuf->WriteBack(buf+bytes_count, b_count2-bytes_count); - s += bytes_count; - } - return s; -} + // only ask the stream for position if we have a real stream and not a + // dummy one which we created ourselves, otherwise we'd call + // wxStream::OnSysTell() which would always return wxInvalidOffset + if ( !m_destroystream ) + { + pos = m_stream->OnSysTell(); + if ( pos == wxInvalidOffset ) + return wxInvalidOffset; + } + else // no associated stream + { + pos = 0; + } -off_t wxStreamBuffer::Seek(off_t pos, wxSeekMode mode) -{ - off_t ret_off, diff, last_access; + pos += GetIntPosition(); - last_access = GetLastAccess(); + if ( m_mode == read && m_flushable ) + pos -= GetLastAccess(); - if (!m_flushable) { - diff = pos + GetIntPosition(); - if (diff < 0 || diff > last_access) - return wxInvalidOffset; - SetIntPosition(diff); - return diff; - } + return pos; +} - 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) ) { - ret_off = m_stream->OnSysSeek(pos, 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; - } - return wxInvalidOffset; +// ---------------------------------------------------------------------------- +// wxStreamBase +// ---------------------------------------------------------------------------- + +wxStreamBase::wxStreamBase() +{ + m_lasterror = wxStream_NOERROR; + m_lastcount = 0; } -off_t wxStreamBuffer::Tell() const +wxStreamBase::~wxStreamBase() { - off_t pos; +} - if (m_flushable) { - pos = m_stream->OnSysTell(); - if (pos == wxInvalidOffset) - return wxInvalidOffset; - return pos - GetLastAccess() + GetIntPosition(); - } else - return GetIntPosition(); +off_t wxStreamBase::OnSysSeek(off_t WXUNUSED(seek), wxSeekMode WXUNUSED(mode)) +{ + return wxInvalidOffset; } -size_t wxStreamBuffer::GetDataLeft() +off_t wxStreamBase::OnSysTell() const { - if (m_buffer_end == m_buffer_pos && m_flushable) - FillBuffer(); - return m_buffer_end-m_buffer_pos; + return wxInvalidOffset; } // ---------------------------------------------------------------------------- -// wxStreamBase +// wxInputStream // ---------------------------------------------------------------------------- -wxStreamBase::wxStreamBase() +wxInputStream::wxInputStream() { - m_lasterror = wxStream_NOERROR; - m_lastcount = 0; + m_wback = NULL; + m_wbacksize = + m_wbackcur = 0; } -wxStreamBase::~wxStreamBase() +wxInputStream::~wxInputStream() { + free(m_wback); } -size_t wxStreamBase::OnSysRead(void *WXUNUSED(buffer), size_t WXUNUSED(size)) +size_t wxInputStream::OnSysRead(void * WXUNUSED(buffer), + size_t WXUNUSED(bufsize)) { - return 0; + return 0; } -size_t wxStreamBase::OnSysWrite(const void *WXUNUSED(buffer), size_t WXUNUSED(bufsize)) +bool wxInputStream::Eof() const { - return 0; + wxInputStream *self = wxConstCast(this, wxInputStream); + + char c; + self->Read(&c, 1); + + // some streams can know that they're at EOF before actually trying to + // read beyond the end of stream (e.g. files) while others have no way of + // knowing it, so to provide the same behaviour in all cases we only + // return TRUE from here if the character really couldn't be read + if ( !self->LastRead() && GetLastError() == wxSTREAM_EOF ) + { + return TRUE; + } + + self->Ungetch(c); + + return FALSE; } -off_t wxStreamBase::OnSysSeek(off_t WXUNUSED(seek), wxSeekMode WXUNUSED(mode)) +char *wxInputStream::AllocSpaceWBack(size_t needed_size) { - return wxInvalidOffset; + // get number of bytes left from previous wback buffer + size_t toget = m_wbacksize - m_wbackcur; + + // allocate a buffer large enough to hold prev + new data + char *temp_b = (char *)malloc(needed_size + toget); + + if (!temp_b) + return NULL; + + // 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); + } + + // done + m_wback = temp_b; + m_wbackcur = 0; + m_wbacksize = needed_size + toget; + + return m_wback; } -off_t wxStreamBase::OnSysTell() const +size_t wxInputStream::GetWBack(void *buf, size_t bsize) { - return wxInvalidOffset; -} + if (!m_wback) + return 0; -// ---------------------------------------------------------------------------- -// wxInputStream -// ---------------------------------------------------------------------------- + // how many bytes do we have in the buffer? + size_t toget = m_wbacksize - m_wbackcur; -wxInputStream::wxInputStream() - : wxStreamBase() -{ - m_i_destroybuf = TRUE; - m_i_streambuf = new wxStreamBuffer(*this, wxStreamBuffer::read); + if ( bsize < toget ) + { + // we won't read everything + toget = bsize; + } + + // 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; + } + + // return the number of bytes copied + return toget; } -wxInputStream::wxInputStream(wxStreamBuffer *buffer) - : wxStreamBase() +size_t wxInputStream::Ungetch(const void *buf, size_t bufsize) { - m_i_destroybuf = FALSE; - m_i_streambuf = buffer; + 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; } -wxInputStream::~wxInputStream() +bool wxInputStream::Ungetch(char c) { - if (m_i_destroybuf) - delete m_i_streambuf; + return Ungetch(&c, sizeof(char)) != 0; } char wxInputStream::GetC() { - char c; - m_i_streambuf->Read(&c, 1); - return c; + char c; + Read(&c, 1); + return c; } -wxInputStream& wxInputStream::Read(void *buffer, size_t size) +wxInputStream& wxInputStream::Read(void *buf, size_t size) { - m_i_streambuf->Read(buffer, size); - // wxStreamBuffer sets all variables for us - return *this; + 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; + } + + read = OnSysRead(buf, size); + if ( !read ) + { + // no more data available + break; + } + } + + return *this; } char wxInputStream::Peek() { - m_i_streambuf->GetDataLeft(); + char c; + Read(&c, 1); + if (m_lasterror == wxStream_NOERROR) + { + Ungetch(c); + return c; + } - return *(m_i_streambuf->GetBufferPos()); + return 0; } - wxInputStream& wxInputStream::Read(wxOutputStream& stream_out) { - char buf[BUF_TEMP_SIZE]; - size_t bytes_read = BUF_TEMP_SIZE; + char buf[BUF_TEMP_SIZE]; + size_t bytes_read = BUF_TEMP_SIZE; - while (bytes_read == BUF_TEMP_SIZE) { - bytes_read = Read(buf, bytes_read).LastRead(); - bytes_read = stream_out.Write(buf, bytes_read).LastWrite(); - } - return *this; + while (bytes_read == BUF_TEMP_SIZE) + { + bytes_read = Read(buf, bytes_read).LastRead(); + bytes_read = stream_out.Write(buf, bytes_read).LastWrite(); + } + return *this; } off_t wxInputStream::SeekI(off_t pos, wxSeekMode mode) { - return m_i_streambuf->Seek(pos, mode); + // 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_NOERROR; + + /* 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 m_i_streambuf->Tell(); + off_t pos = OnSysTell(); + + if (pos != wxInvalidOffset) + pos -= (m_wbacksize - m_wbackcur); + + return pos; } -// -------------------- -// Overloaded operators -// -------------------- -wxInputStream& wxInputStream::operator>>(wxString& line) +// ---------------------------------------------------------------------------- +// wxOutputStream +// ---------------------------------------------------------------------------- + +wxOutputStream::wxOutputStream() +{ +} + +wxOutputStream::~wxOutputStream() { - wxDataInputStream s(*this); +} - line = s.ReadLine(); - return *this; +size_t wxOutputStream::OnSysWrite(const void * WXUNUSED(buffer), + size_t WXUNUSED(bufsize)) +{ + return 0; } -wxInputStream& wxInputStream::operator>>(char& c) +void wxOutputStream::PutC(char c) { - c = GetC(); - return *this; + Write(&c, 1); } -wxInputStream& wxInputStream::operator>>(short& i) +wxOutputStream& wxOutputStream::Write(const void *buffer, size_t size) { - long l; + m_lastcount = OnSysWrite(buffer, size); + return *this; +} - *this >> l; - i = (short)l; - return *this; +wxOutputStream& wxOutputStream::Write(wxInputStream& stream_in) +{ + stream_in.Read(*this); + return *this; } -wxInputStream& wxInputStream::operator>>(int& i) +off_t wxOutputStream::TellO() const { - long l; + return OnSysTell(); +} - *this >> l; - i = (short)l; - return *this; +off_t wxOutputStream::SeekO(off_t pos, wxSeekMode mode) +{ + return OnSysSeek(pos, mode); } -wxInputStream& wxInputStream::operator>>(long& i) +void wxOutputStream::Sync() { - /* I only implemented a simple integer parser */ - int c, sign; +} - while (isspace( c = GetC() ) ) - /* Do nothing */ ; - i = 0; - if (! (c == '-' || isdigit(c)) ) { - InputStreamBuffer()->WriteBack(c); - return *this; - } +// ---------------------------------------------------------------------------- +// wxCountingOutputStream +// ---------------------------------------------------------------------------- - if (c == '-') { - sign = -1; - c = GetC(); - } else - sign = 1; +wxCountingOutputStream::wxCountingOutputStream () +{ + m_currentPos = 0; +} - while (isdigit(c)) { - i = i*10 + c; - c = GetC(); - } +size_t wxCountingOutputStream::GetSize() const +{ + return m_lastcount; +} - i *= sign; +size_t wxCountingOutputStream::OnSysWrite(const void *WXUNUSED(buffer), + size_t size) +{ + m_currentPos += size; + if (m_currentPos > m_lastcount) + m_lastcount = m_currentPos; - return *this; + return m_currentPos; } -wxInputStream& wxInputStream::operator>>(double& f) +off_t wxCountingOutputStream::OnSysSeek(off_t pos, wxSeekMode mode) { - /* I only implemented a simple float parser */ - int c, sign; + switch ( mode ) + { + case wxFromStart: + m_currentPos = pos; + break; - while (isspace( c = GetC() ) ) - /* Do nothing */ ; + case wxFromEnd: + m_currentPos = m_lastcount + pos; + break; - f = 0.0; - if (! (c == '-' || isdigit(c)) ) { - InputStreamBuffer()->WriteBack(c); - return *this; - } + case wxFromCurrent: + m_currentPos += pos; + break; - if (c == '-') { - sign = -1; - c = GetC(); - } else - sign = 1; + default: + wxFAIL_MSG( _T("invalid seek mode") ); + return wxInvalidOffset; + } - while (isdigit(c)) { - f = f*10 + (c - '0'); - c = GetC(); - } + if (m_currentPos > m_lastcount) + m_lastcount = m_currentPos; - if (c == '.') { - double f_multiplicator = (double) 0.1; - c = GetC(); + return m_currentPos; +} - while (isdigit(c)) { - f += (c-'0')*f_multiplicator; - f_multiplicator /= 10; - c = GetC(); - } - } +off_t wxCountingOutputStream::OnSysTell() const +{ + return m_currentPos; +} - f *= sign; +// ---------------------------------------------------------------------------- +// wxFilterInputStream +// ---------------------------------------------------------------------------- - return *this; +wxFilterInputStream::wxFilterInputStream() +{ + m_parent_i_stream = NULL; } -#if wxUSE_SERIAL -wxInputStream& wxInputStream::operator>>(wxObject *& obj) +wxFilterInputStream::wxFilterInputStream(wxInputStream& stream) { - wxObjectInputStream obj_s(*this); - obj = obj_s.LoadObject(); - return *this; + m_parent_i_stream = &stream; } -#endif +wxFilterInputStream::~wxFilterInputStream() +{ +} // ---------------------------------------------------------------------------- -// wxOutputStream +// wxFilterOutputStream // ---------------------------------------------------------------------------- -wxOutputStream::wxOutputStream() - : wxStreamBase() + +wxFilterOutputStream::wxFilterOutputStream() { - m_o_destroybuf = TRUE; - m_o_streambuf = new wxStreamBuffer(*this, wxStreamBuffer::write); + m_parent_o_stream = NULL; } -wxOutputStream::wxOutputStream(wxStreamBuffer *buffer) - : wxStreamBase() +wxFilterOutputStream::wxFilterOutputStream(wxOutputStream& stream) { - m_o_destroybuf = FALSE; - m_o_streambuf = buffer; + m_parent_o_stream = &stream; } -wxOutputStream::~wxOutputStream() +wxFilterOutputStream::~wxFilterOutputStream() { - if (m_o_destroybuf) - delete m_o_streambuf; } -wxOutputStream& wxOutputStream::Write(const void *buffer, size_t size) +// ---------------------------------------------------------------------------- +// wxBufferedInputStream +// ---------------------------------------------------------------------------- + +wxBufferedInputStream::wxBufferedInputStream(wxInputStream& s, + wxStreamBuffer *buffer) + : wxFilterInputStream(s) { - m_o_streambuf->Write(buffer, size); - return *this; + 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); + } } -wxOutputStream& wxOutputStream::Write(wxInputStream& stream_in) +wxBufferedInputStream::~wxBufferedInputStream() { - stream_in.Read(*this); - return *this; + m_parent_i_stream->SeekI(-(off_t)m_i_streambuf->GetBytesLeft(), + wxFromCurrent); + + delete m_i_streambuf; } -off_t wxOutputStream::TellO() const +char wxBufferedInputStream::Peek() { - return m_o_streambuf->Tell(); + return m_i_streambuf->Peek(); } -off_t wxOutputStream::SeekO(off_t pos, wxSeekMode mode) +wxInputStream& wxBufferedInputStream::Read(void *buf, size_t size) { - return m_o_streambuf->Seek(pos, mode); + // reset the error flag + m_lasterror = wxStream_NOERROR; + + // 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; } -void wxOutputStream::Sync() +off_t wxBufferedInputStream::SeekI(off_t pos, wxSeekMode mode) { - m_o_streambuf->FlushBuffer(); + // RR: Look at wxInputStream for comments. + + if (m_lasterror==wxSTREAM_EOF) + m_lasterror=wxSTREAM_NOERROR; + + 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); } -wxOutputStream& wxOutputStream::operator<<(const char *string) +off_t wxBufferedInputStream::TellI() const { - return Write(string, strlen(string)); + off_t pos = m_i_streambuf->Tell(); + + if (pos != wxInvalidOffset) + pos -= (m_wbacksize - m_wbackcur); + + return pos; } -wxOutputStream& wxOutputStream::operator<<(wxString& string) +size_t wxBufferedInputStream::OnSysRead(void *buffer, size_t bufsize) { - return Write(string, string.Len()); + return m_parent_i_stream->Read(buffer, bufsize).LastRead(); } -wxOutputStream& wxOutputStream::operator<<(char c) +off_t wxBufferedInputStream::OnSysSeek(off_t seek, wxSeekMode mode) { - return Write(&c, 1); + return m_parent_i_stream->SeekI(seek, mode); } -wxOutputStream& wxOutputStream::operator<<(short i) +off_t wxBufferedInputStream::OnSysTell() const { - wxString strint; - - strint.Printf("%i", i); - return Write(strint, strint.Len()); + return m_parent_i_stream->TellI(); } -wxOutputStream& wxOutputStream::operator<<(int i) +void wxBufferedInputStream::SetInputStreamBuffer(wxStreamBuffer *buffer) { - wxString strint; + wxCHECK_RET( buffer, _T("wxBufferedInputStream needs buffer") ); - strint.Printf("%i", i); - return Write(strint, strint.Len()); + delete m_i_streambuf; + m_i_streambuf = buffer; } -wxOutputStream& wxOutputStream::operator<<(long i) +// ---------------------------------------------------------------------------- +// wxBufferedOutputStream +// ---------------------------------------------------------------------------- + +wxBufferedOutputStream::wxBufferedOutputStream(wxOutputStream& s, + wxStreamBuffer *buffer) + : wxFilterOutputStream(s) { - wxString strlong; + if ( buffer ) + { + m_o_streambuf = buffer; + } + else // create a default one + { + m_o_streambuf = new wxStreamBuffer(*this, wxStreamBuffer::write); - strlong.Printf("%i", i); - return Write((const char *)strlong, strlong.Len()); + m_o_streambuf->SetBufferIO(1024); + } } -wxOutputStream& wxOutputStream::operator<<(double f) +wxBufferedOutputStream::~wxBufferedOutputStream() { - wxString strfloat; + Sync(); + delete m_o_streambuf; +} - strfloat.Printf("%f", f); - return Write(strfloat, strfloat.Len()); +wxOutputStream& wxBufferedOutputStream::Write(const void *buffer, size_t size) +{ + m_lastcount = 0; + m_o_streambuf->Write(buffer, size); + return *this; } -#if wxUSE_SERIAL -wxOutputStream& wxOutputStream::operator<<(wxObject& obj) +off_t wxBufferedOutputStream::SeekO(off_t pos, wxSeekMode mode) { - wxObjectOutputStream obj_s(*this); - obj_s.SaveObject(obj); - return *this; + Sync(); + return m_o_streambuf->Seek(pos, mode); } -#endif -// ---------------------------------------------------------------------------- -// wxFilterInputStream -// ---------------------------------------------------------------------------- -wxFilterInputStream::wxFilterInputStream() - : wxInputStream(NULL) +off_t wxBufferedOutputStream::TellO() const { - // WARNING streambuf set to NULL ! + return m_o_streambuf->Tell(); } -wxFilterInputStream::wxFilterInputStream(wxInputStream& stream) - : wxInputStream(stream.InputStreamBuffer()) +void wxBufferedOutputStream::Sync() { - m_parent_i_stream = &stream; + m_o_streambuf->FlushBuffer(); + m_parent_o_stream->Sync(); } -wxFilterInputStream::~wxFilterInputStream() +size_t wxBufferedOutputStream::OnSysWrite(const void *buffer, size_t bufsize) { + return m_parent_o_stream->Write(buffer, bufsize).LastWrite(); } -// ---------------------------------------------------------------------------- -// wxFilterOutputStream -// ---------------------------------------------------------------------------- -wxFilterOutputStream::wxFilterOutputStream() - : wxOutputStream(NULL) +off_t wxBufferedOutputStream::OnSysSeek(off_t seek, wxSeekMode mode) { + return m_parent_o_stream->SeekO(seek, mode); } -wxFilterOutputStream::wxFilterOutputStream(wxOutputStream& stream) - : wxOutputStream(stream.OutputStreamBuffer()) +off_t wxBufferedOutputStream::OnSysTell() const { - m_parent_o_stream = &stream; + return m_parent_o_stream->TellO(); } -wxFilterOutputStream::~wxFilterOutputStream() +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; } // ---------------------------------------------------------------------------- @@ -826,9 +1232,10 @@ wxFilterOutputStream::~wxFilterOutputStream() 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