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

//#define DODS_DEBUG

#include "config.h"

#include "TestD4Group.h"

#include "debug.h"

void

TestD4Group::m_duplicate(const TestD4Group &ts)

{

    d_series_values = ts.d_series_values;

}

TestD4Group *

TestD4Group::ptr_duplicate()

{

    return new TestD4Group(*this);

}

TestD4Group::TestD4Group(const TestD4Group &rhs) : D4Group(rhs), TestCommon(rhs)

{

    m_duplicate(rhs);

}

TestD4Group &

TestD4Group::operator=(const TestD4Group &rhs)

{

    if (this == &rhs)

	return *this;

    dynamic_cast<D4Group &>(*this) = rhs; // run Constructor=

    m_duplicate(rhs);

    return *this;

}

TestD4Group::TestD4Group(const string &n) : D4Group(n), d_series_values(false)

{

}

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

    : D4Group(n, d), d_series_values(false)

{

}

TestD4Group::~TestD4Group()

{

}

void

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

{

    out << "{ " ;

    bool value_written = false;

    Vars_citer i = var_begin();

    // Write the first (and maybe only) value.

    while(i != var_end() && ! value_written) {

        if ((*i)->send_p()) {

            (*i++)->print_val(out, "", false);

            value_written = true;

        }

        else {

            ++i;

        }

    }

    // Each subsequent value will be preceded by a comma

    while(i != var_end()) {

        if ((*i)->send_p()) {

            out << ", ";

            (*i++)->print_val(out, "", false);

        }

        else {

            ++i;

        }

    }

    out << " }" ;

}

bool TestD4Group::read()

{

	if (read_p()) return true;

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

		if (!(*i)->read()) {

			return false;

		}

	}

	set_read_p(true);

	return true;

}

void TestD4Group::set_series_values(bool sv)

{

	Vars_iter i = var_begin();

	while (i != var_end()) {

		TestCommon *tc = dynamic_cast<TestCommon*>(*i);

		if (!tc)

		    throw InternalErr (__FILE__, __LINE__, "Variable '" + (*i)->name() + "' is not a TestCommon.");

		tc->set_series_values(sv);

		++i;

	}

	d_series_values = sv;

}