/*
 * Copyright (c) 2002-2003 Matthijs Hollemans
 * 
 * Permission is hereby granted, free of charge, to any person obtaining a 
 * copy of this software and associated documentation files (the "Software"), 
 * to deal in the Software without restriction, including without limitation 
 * the rights to use, copy, modify, merge, publish, distribute, sublicense, 
 * and/or sell copies of the Software, and to permit persons to whom the 
 * Software is furnished to do so, subject to the following conditions:
 * 
 * The above copyright notice and this permission notice shall be included in 
 * all copies or substantial portions of the Software.
 * 
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE 
 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER 
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING 
 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER 
 * DEALINGS IN THE SOFTWARE.
 */

#include "debug.h"
#include "MidiConsumer.h"
#include "MidiProducer.h"
#include "MidiRoster.h"
#include "MidiRosterLooper.h"
#include "protocol.h"

//------------------------------------------------------------------------------

status_t BMidiProducer::Connect(BMidiConsumer* cons)
{
	if (cons == NULL)
	{
		WARN("Connect() does not accept a NULL consumer")
		return B_BAD_VALUE;
	}
	else if (!IsValid() || !cons->IsValid())
	{
		return B_ERROR;
	}
	else
	{
		return SendConnectRequest(cons, true);
	}
}

//------------------------------------------------------------------------------

status_t BMidiProducer::Disconnect(BMidiConsumer* cons)
{
	if (cons == NULL)
	{
		WARN("Disconnect() does not accept a NULL consumer")
		return B_BAD_VALUE;
	}
	else if (!IsValid() || !cons->IsValid())
	{
		return B_ERROR;
	}
	else
	{
		return SendConnectRequest(cons, false);
	}
}

//------------------------------------------------------------------------------

bool BMidiProducer::IsConnected(BMidiConsumer* cons) const
{
	bool isConnected = false;

	if (cons != NULL)
	{
		if (LockProducer())
		{
			isConnected = connections->HasItem(cons);
			UnlockProducer();
		}
	}
	
	return isConnected;
}

//------------------------------------------------------------------------------

BList* BMidiProducer::Connections() const
{
	BList* list = new BList();

	if (LockProducer())
	{
		for (int32 t = 0; t < CountConsumers(); ++t)
		{
			BMidiConsumer* cons = ConsumerAt(t);
			cons->Acquire();
			list->AddItem(cons);
		}

		UnlockProducer();
	}

	return list;
}

//------------------------------------------------------------------------------

BMidiProducer::BMidiProducer(const char* name)
	: BMidiEndpoint(name)
{
	isConsumer = false;
	connections = new BList;
	locker = new BLocker("MidiProducerLock");
}

//------------------------------------------------------------------------------

BMidiProducer::~BMidiProducer()
{
	delete connections;
	delete locker;
}

//------------------------------------------------------------------------------

void BMidiProducer::_Reserved1() { }
void BMidiProducer::_Reserved2() { }
void BMidiProducer::_Reserved3() { } 
void BMidiProducer::_Reserved4() { } 
void BMidiProducer::_Reserved5() { } 
void BMidiProducer::_Reserved6() { }
void BMidiProducer::_Reserved7() { }
void BMidiProducer::_Reserved8() { }

//------------------------------------------------------------------------------

status_t BMidiProducer::SendConnectRequest(
	BMidiConsumer* cons, bool mustConnect)
{
	ASSERT(cons != NULL)

	BMessage msg, reply;

	if (mustConnect)
	{
		msg.what = MSG_CONNECT_ENDPOINTS;
	}
	else
	{
		msg.what = MSG_DISCONNECT_ENDPOINTS;
	}

	msg.AddInt32("midi:producer", ID());
	msg.AddInt32("midi:consumer", cons->ID());

	status_t err = BMidiRoster::MidiRoster()->SendRequest(&msg, &reply);
	if (err != B_OK) { return err; }

	status_t res;
	if (reply.FindInt32("midi:result", &res) == B_OK) 
	{ 
		if (res == B_OK)
		{
			if (mustConnect)
			{
				ConnectionMade(cons);
			}
			else
			{
				ConnectionBroken(cons);
			}

			#ifdef DEBUG
			BMidiRoster::MidiRoster()->looper->DumpEndpoints();
			#endif
		}

		return res;
	}

	return B_ERROR;
}

//------------------------------------------------------------------------------

void BMidiProducer::ConnectionMade(BMidiConsumer* cons)
{
	ASSERT(cons != NULL)

	if (LockProducer())
	{
		ASSERT(!connections->HasItem(cons))

		connections->AddItem(cons);
		UnlockProducer();
	}

	if (IsLocal())
	{
		((BMidiLocalProducer*) this)->Connected(cons);
	}
}

//------------------------------------------------------------------------------

bool BMidiProducer::ConnectionBroken(BMidiConsumer* cons)
{
	ASSERT(cons != NULL)

	bool wasConnected = false;

	if (LockProducer())
	{
		wasConnected = connections->RemoveItem(cons);
		UnlockProducer();
	}

	if (wasConnected && IsLocal())
	{
		((BMidiLocalProducer*) this)->Disconnected(cons);
	}

	return wasConnected;
}

//------------------------------------------------------------------------------

int32 BMidiProducer::CountConsumers() const
{
	return connections->CountItems();
}

//------------------------------------------------------------------------------

BMidiConsumer* BMidiProducer::ConsumerAt(int32 index) const
{
	ASSERT(connections != NULL)
	ASSERT(index >= 0 && index < CountConsumers())

	return (BMidiConsumer*) connections->ItemAt(index);
}

//------------------------------------------------------------------------------

bool BMidiProducer::LockProducer() const
{
	return locker->Lock();
}

//------------------------------------------------------------------------------

void BMidiProducer::UnlockProducer() const
{
	locker->Unlock();
}

//------------------------------------------------------------------------------