// -*- mode: c++; c-basic-offset:4 -*-

// This file is part of libdap, A C++ implementation of the OPeNDAP Data

// Access Protocol.

// Copyright (c) 2013 OPeNDAP, Inc.

// Author: James Gallagher <jgallagher@opendap.org>

//

// 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

//

// You can contact OPeNDAP, Inc. at PO Box 112, Saunderstown, RI. 02874-0112.

#include "config.h"

//#define DODS_DEBUG

#include "TestD4Sequence.h"

#include "TestCommon.h"

#include "debug.h"

void

TestD4Sequence::m_duplicate(const TestD4Sequence &ts)

{

    d_current = ts.d_current;

    d_len = ts.d_len;

    d_series_values = ts.d_series_values;

}

BaseType *

TestD4Sequence::ptr_duplicate()

{

    return new TestD4Sequence(*this);

}

TestD4Sequence::TestD4Sequence(const string &n) : D4Sequence(n), d_len(4),

	d_current(0), d_series_values(false)

{

}

TestD4Sequence::TestD4Sequence(const string &n, const string &d)

    : D4Sequence(n, d), d_len(4), d_current(0), d_series_values(false)

{

}

TestD4Sequence::TestD4Sequence(const TestD4Sequence &rhs) : D4Sequence(rhs), TestCommon(rhs)

{

    m_duplicate(rhs);

}

TestD4Sequence::~TestD4Sequence()

{

}

TestD4Sequence &

TestD4Sequence::operator=(const TestD4Sequence &rhs)

{

    if (this == &rhs)

        return *this;

    dynamic_cast<D4Sequence &>(*this) = rhs;

    m_duplicate(rhs);

    return *this;

}

void

TestD4Sequence::output_values(std::ostream &out)

{

    print_val(out, "", false);

}

/**

 * In DAP2, TestSequence::read() also reads the child sequence data. However,

 * in DAP4 it's up to each sequence to read its own data.

 */

bool

TestD4Sequence::read()

{

    if (read_p())

        return true;

    if (d_current < d_len) {

    	for (Vars_iter i = var_begin(), e = var_end(); i != e; ++i) {

            if ((*i)->type() != dods_sequence_c && ((*i)->send_p() || (*i)->is_in_selection())) {

                DBGN(cerr << __PRETTY_FUNCTION__ << "Calling " << (*i)->name() << "->read()" << endl);

                (*i)->read();

            }

    	}

    	++d_current;

    	return false;

    }

    else {

        return true;                // No more values

    }

}

void

TestD4Sequence::set_series_values(bool sv)

{

    Vars_iter i = var_begin();

    while (i != var_end()) {

        dynamic_cast<TestCommon&>(*(*i)).set_series_values(sv);

        ++i;

    }

    d_series_values = sv;

}