/*
  This file is part of Ingen.
  Copyright 2007-2016 David Robillard <http://drobilla.net/>

  Ingen is free software: you can redistribute it and/or modify it under the
  terms of the GNU Affero General Public License as published by the Free
  Software Foundation, either version 3 of the License, or any later version.

  Ingen 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 Affero General Public License for details.

  You should have received a copy of the GNU Affero General Public License
  along with Ingen.  If not, see <http://www.gnu.org/licenses/>.
*/

#include "ArcImpl.hpp"

#include "Buffer.hpp"
#include "BufferFactory.hpp"
#include "InputPort.hpp"
#include "PortImpl.hpp"
#include "PortType.hpp"

#include "ingen/URIs.hpp"
#include "raul/Path.hpp"

#include <algorithm>
#include <cassert>
#include <string>

namespace ingen::server {

/** Constructor for an arc from a block's output port.
 *
 * This handles both polyphonic and monophonic blocks, transparently to the
 * user (InputPort).
 */
ArcImpl::ArcImpl(PortImpl* tail, PortImpl* head)
	: _tail(tail)
	, _head(head)
{
	assert(tail != head);
	assert(tail->path() != head->path());
}

ArcImpl::~ArcImpl()
{
	if (is_linked()) {
		auto* iport = dynamic_cast<InputPort*>(_head);
		if (iport) {
			iport->remove_arc(*this);
		}
	}
}

const raul::Path&
ArcImpl::tail_path() const
{
	return _tail->path();
}

const raul::Path&
ArcImpl::head_path() const
{
	return _head->path();
}

BufferRef
ArcImpl::buffer(const RunContext&, uint32_t voice) const
{
	return _tail->buffer(std::min(voice, _tail->poly() - 1));
}

bool
ArcImpl::must_mix() const
{
	return (_tail->poly() > _head->poly() ||
	        (_tail->buffer(0)->is_sequence() != _head->buffer(0)->is_sequence()));
}

bool
ArcImpl::can_connect(const PortImpl* src, const InputPort* dst)
{
	const ingen::URIs& uris = src->bufs().uris();
	return (
	    // (Audio | Control | CV) => (Audio | Control | CV)
	    ((src->is_a(PortType::CONTROL) || src->is_a(PortType::AUDIO) ||
	      src->is_a(PortType::CV)) &&
	     (dst->is_a(PortType::CONTROL) || dst->is_a(PortType::AUDIO) ||
	      dst->is_a(PortType::CV)))

	    // Equal types
	    ||
	    (src->type() == dst->type() && src->buffer_type() == dst->buffer_type())

	    // Control => atom:Float Value
	    || (src->is_a(PortType::CONTROL) && dst->supports(uris.atom_Float))

	    // Audio => atom:Sound Value
	    || (src->is_a(PortType::AUDIO) && dst->supports(uris.atom_Sound))

	    // atom:Float Value => Control
	    || (src->supports(uris.atom_Float) && dst->is_a(PortType::CONTROL))

	    // atom:Float Value => CV
	    || (src->supports(uris.atom_Float) && dst->is_a(PortType::CV))

	    // atom:Sound Value => Audio
	    || (src->supports(uris.atom_Sound) && dst->is_a(PortType::AUDIO)));
}

} // namespace ingen::server