InternalStream.cc

Go to the documentation of this file.

/*
 * InternalStream.cc
 *
 * Smalltalk like class library for C++
 * Abstract internal stream.
 *
 * Copyright (c) 2003 Milan Cermak
 */
/*
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */
#include <stlib/InternalStream.h>
#include <stlib/SequenceableCollection.h>
#include <stlib/String.h>

InternalStream::InternalStream(SequenceableCollection *coll)
{
    PositionableStream::initialize(coll);
}

/* Class-accessing protocol */
String *InternalStream::className(void) const
{
    return new String("InternalStream");
}

/* Accessing protocol */
SequenceableCollection *InternalStream::contents(void)
{
    read_limit = (read_limit < _position) ? _position : read_limit;
    return dynamic_cast<SequenceableCollection *>(collection->copy(0, read_limit));
}

void InternalStream::nextPutAll(const SequenceableCollection *coll,
                                long size, long startIndex)
{
    if (size <= 1) {
        PositionableStream::nextPutAll(coll, size, startIndex);
        return;
    }

    nextPut(coll->at(startIndex));

    long newPosition = _position + size - 1;
    if (newPosition > write_limit) {
        collection->growToAtLeast(newPosition);
        write_limit = collection->size();
    }

    collection->replace(_position, newPosition, coll, startIndex+1);
    _position = newPosition;
}

SequenceableCollection *InternalStream::upToEnd(void)
{
    SequenceableCollection *res;
    read_limit = (read_limit < _position) ? _position : read_limit;
    res = dynamic_cast<SequenceableCollection *>(collection->copy(_position, read_limit));
    _position = read_limit;
    return res;
}

/* Private protocol */
void InternalStream::pastEndPut(Object *object)
{
    collection->growToAtLeast(collection->size() + 1);
    write_limit = collection->size();
    collection->put(_position++, object);
}

---