/*
 * Copyright 2015 Dario Casalinuovo
 * Copyright 2009-2012, Axel Dörfler, axeld@pinc-software.de.
 * Copyright 2008 Maurice Kalinowski, haiku@kaldience.com
 *
 * All rights reserved. Distributed under the terms of the MIT License.
 */

/*
 * Copyright (c) 2002-2006 Marcus Overhagen <Marcus@Overhagen.de>
 *
 * Permission is hereby granted, free of charge, to any person obtaining
 * a copy of this software and associated documentation files or portions
 * thereof (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:
 *
 *  * Redistributions of source code must retain the above copyright notice,
 *    this list of conditions and the following disclaimer.
 *
 *  * Redistributions in binary form must reproduce the above copyright notice
 *    in the  binary, as well as this list of conditions and the following
 *    disclaimer in the documentation and/or other materials provided with
 *    the distribution.
 *
 * 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.
 */


/* to comply with the license above, do not remove the following line */
char __dont_remove_copyright_from_binary[] = "Copyright (c) 2002-2006 Marcus "
	"Overhagen <Marcus@Overhagen.de>";


#include <MediaRoster.h>

#include <Application.h>
#include <Autolock.h>
#include <BufferConsumer.h>
#include <BufferProducer.h>
#include <Locker.h>
#include <Message.h>
#include <Messenger.h>
#include <MimeType.h>
#include <OS.h>
#include <ParameterWeb.h>
#include <Roster.h>
#include <StopWatch.h>
#include <String.h>
#include <TimeSource.h>

#include <new>

#include <AppMisc.h>
#include <DataExchange.h>
#include <MediaDebug.h>
#include <DormantNodeManager.h>
#include <MediaMisc.h>
#include <MediaRosterEx.h>
#include <Notifications.h>
#include <ServerInterface.h>
#include <SharedBufferList.h>
#include <TList.h>

#include "PortPool.h"
#include "TimeSourceObjectManager.h"


namespace BPrivate {
namespace media {


struct RosterNotification {
	BMessenger	messenger;
	int32		what;
};


struct SyncedMessage {
	BMessage* message;
};


struct LocalNode {
				LocalNode(BMediaNode* local_node)
					:
					node(local_node) {}

				LocalNode()
					:
					node(NULL) {}

	bool 		operator==(const LocalNode& a)
				{
					if (a.node == this->node)
						return true;
					return false;
				}

	BMediaNode* node;
};


static bool sServerIsUp = false;
static List<RosterNotification> sNotificationList;
static BLocker sInitLocker("BMediaRoster::Roster locker");
static List<LocalNode> sRegisteredNodes;


// This class takes care of all static initialization and destruction of
// libmedia objects. It guarantees that things are created and destroyed in
// the correct order, as well as performing some "garbage collecting" by being
// destructed automatically on application exit.
class MediaRosterUndertaker {
public:
	MediaRosterUndertaker()
	{
		gPortPool = new PortPool();
	}

	~MediaRosterUndertaker()
	{
		BAutolock _(sInitLocker);
		if (BMediaRoster::CurrentRoster() != NULL) {

			// Detect any forgotten node
			if (sRegisteredNodes.CountItems() > 0) {
				for (int32 i = 0; i < sRegisteredNodes.CountItems(); i++) {
					LocalNode* node = NULL;
					sRegisteredNodes.Get(i, &node);
					if (node != NULL) {
						ERROR("BMediaRoster: Node with ID %" B_PRId32
							" was not released correctly\n", node->node->ID());
					}
				}
			}

			if (be_app != NULL)
				be_app->UnregisterLooper(BMediaRoster::CurrentRoster());

			status_t err = B_ERROR;
			thread_id roster = BMediaRoster::CurrentRoster()->Thread();

			BMediaRoster::CurrentRoster()->PostMessage(B_QUIT_REQUESTED);

			wait_for_thread(roster, &err);
			if (err != B_OK)
				ERROR("BMediaRoster: wait_for_thread returned error");

			// Only now delete the port pool
			delete gPortPool;
		}
	}
};


static MediaRosterUndertaker sMediaRosterUndertaker;

}	// namespace media
}	// namespace BPrivate

using namespace BPrivate::media;


BMediaRosterEx::BMediaRosterEx(status_t* _error)
	:
	BMediaRoster(),
	fLaunchNotification(false),
	fAutoExit(false)
{
	gDormantNodeManager = new DormantNodeManager();
	gTimeSourceObjectManager = new TimeSourceObjectManager();

	*_error = BuildConnections();

	InitRosterDataExchange(BMessenger(this, this));

	if (be_roster->StartWatching(BMessenger(this, this),
			B_REQUEST_LAUNCHED | B_REQUEST_QUIT) != B_OK) {
		*_error = B_ERROR;
	}
	sServerIsUp = BMediaRoster::IsRunning();
}


void
BMediaRosterEx::Quit()
{
	if (be_roster->StopWatching(BMessenger(this, this)) != B_OK)
			TRACE("Can't unregister roster notifications");

	if (sNotificationList.CountItems() != 0)
		sNotificationList.MakeEmpty();

	BMediaRoster::Quit();
}


status_t
BMediaRosterEx::BuildConnections()
{
	InitServerDataExchange();
	// register this application with the media server
	server_register_app_request request;
	server_register_app_reply reply;
	request.team = BPrivate::current_team();
	request.messenger = BMessenger(NULL, this);
	status_t status = QueryServer(SERVER_REGISTER_APP, &request,
		sizeof(request), &reply, sizeof(reply));
	if (status != B_OK)
		return B_MEDIA_SYSTEM_FAILURE;

	return B_OK;
}


BMediaRosterEx::~BMediaRosterEx()
{
	CALLED();

	delete gTimeSourceObjectManager;
	delete gDormantNodeManager;

	// unregister this application with the media server
	server_unregister_app_request request;
	server_unregister_app_reply reply;
	request.team = BPrivate::current_team();
	QueryServer(SERVER_UNREGISTER_APP, &request, sizeof(request), &reply,
		sizeof(reply));

	BPrivate::SharedBufferList::Invalidate();
}


void
BMediaRosterEx::RegisterLocalNode(BMediaNode* node)
{
	sRegisteredNodes.Insert(LocalNode(node));
}


void
BMediaRosterEx::UnregisterLocalNode(BMediaNode* node)
{
	int32 index = sRegisteredNodes.Find(LocalNode(node));
	if (index != -1)
		sRegisteredNodes.Remove(index);
}


void
BMediaRosterEx::EnableLaunchNotification(bool enable, bool autoExit)
{
	// NOTE: in theory, we should personalize it depending on each
	// request, but we are using it just in launch/shutdown_media_server,
	// so we are enough safe to don't care about that.
	fLaunchNotification = enable;
	fAutoExit = autoExit;
}


status_t
BMediaRosterEx::SaveNodeConfiguration(BMediaNode* node)
{
	int32 flavorID;
	BMediaAddOn* addon = node->AddOn(&flavorID);
	if (addon == NULL) {
		// NOTE: This node could have been created by an application,
		// it does not mean there is an error.
		// TODO: this check incorrectly triggers on BeOS R5 BT848 node
		TRACE("BMediaRosterEx::SaveNodeConfiguration node %" B_PRId32 " not "
			"instantiated from BMediaAddOn!\n", node->ID());
		return B_ERROR;
	}

	media_addon_id addonID = addon->AddonID();

	// TODO: fix this
	printf("### BMediaRosterEx::SaveNodeConfiguration should save addon-id "
		"%" B_PRId32 ", flavor-id %" B_PRId32 " config NOW!\n", addonID,
		flavorID);
	return B_OK;
}


status_t
BMediaRosterEx::LoadNodeConfiguration(media_addon_id addonID, int32 flavorID,
	BMessage *_msg)
{
	// TODO: fix this
	_msg->MakeEmpty(); // to be fully R5 compliant
	printf("### BMediaRosterEx::LoadNodeConfiguration should load addon-id "
		"%" B_PRId32 ", flavor-id %" B_PRId32 " config NOW!\n", addonID,
		flavorID);
	return B_OK;
}


status_t
BMediaRosterEx::IncrementAddonFlavorInstancesCount(media_addon_id addonID,
	int32 flavorID)
{
	server_change_flavor_instances_count_request request;
	server_change_flavor_instances_count_reply reply;

	request.add_on_id = addonID;
	request.flavor_id = flavorID;
	request.delta = 1;
	request.team = BPrivate::current_team();
	return QueryServer(SERVER_CHANGE_FLAVOR_INSTANCES_COUNT, &request,
		sizeof(request), &reply, sizeof(reply));
}


status_t
BMediaRosterEx::DecrementAddonFlavorInstancesCount(media_addon_id addonID,
	int32 flavorID)
{
	server_change_flavor_instances_count_request request;
	server_change_flavor_instances_count_reply reply;

	request.add_on_id = addonID;
	request.flavor_id = flavorID;
	request.delta = -1;
	request.team = BPrivate::current_team();
	return QueryServer(SERVER_CHANGE_FLAVOR_INSTANCES_COUNT, &request,
		sizeof(request), &reply, sizeof(reply));
}


status_t
BMediaRosterEx::ReleaseNodeAll(const media_node& node)
{
		CALLED();
	if (IS_INVALID_NODE(node))
		return B_MEDIA_BAD_NODE;

	if (node.kind & NODE_KIND_NO_REFCOUNTING)
		return B_OK;

	server_release_node_request request;
	server_release_node_reply reply;
	status_t rv;

	request.node = node;
	request.team = BPrivate::current_team();

	TRACE("BMediaRoster::ReleaseNodeAll, node %" B_PRId32 ", port %" B_PRId32
		", team %" B_PRId32 "\n",
		node.node, node.port, BPrivate::current_team());

	rv = QueryServer(SERVER_RELEASE_NODE_ALL, &request, sizeof(request), &reply,
		sizeof(reply));
	if (rv != B_OK) {
		ERROR("BMediaRoster::ReleaseNodeAll failed to query media_server, "
			"retrying local, node %" B_PRId32 ", port %"
			B_PRId32 ", team %" B_PRId32 "!\n", node.node, node.port,
			BPrivate::current_team());
		node_final_release_command command;
		rv = SendToPort(node.port, NODE_FINAL_RELEASE, &command,
			sizeof(command));
		if (rv != B_OK) {
			ERROR("BMediaRoster::ReleaseNodeAll FAILED, node %" B_PRId32 ", port %"
				B_PRId32 ", team %" B_PRId32 "!\n", node.node, node.port,
				BPrivate::current_team());
		}
	}
	return rv;
}


status_t
BMediaRosterEx::SetNodeCreator(media_node_id node, team_id creator)
{
	server_set_node_creator_request request;
	server_set_node_creator_reply reply;

	request.node = node;
	request.creator = creator;
	return QueryServer(SERVER_SET_NODE_CREATOR, &request, sizeof(request),
		&reply, sizeof(reply));
}


status_t
BMediaRosterEx::GetNode(node_type type, media_node* out_node,
	int32* out_input_id, BString* out_input_name)
{
	if (out_node == NULL)
		return B_BAD_VALUE;

	server_get_node_request request;
	server_get_node_reply reply;
	status_t rv;

	request.type = type;
	request.team = BPrivate::current_team();
	rv = QueryServer(SERVER_GET_NODE, &request, sizeof(request), &reply,
		sizeof(reply));
	if (rv != B_OK)
		return rv;

	*out_node = reply.node;
	if (out_input_id)
		*out_input_id = reply.input_id;
	if (out_input_name)
		*out_input_name = reply.input_name;
	return rv;
}


status_t
BMediaRosterEx::SetNode(node_type type, const media_node* node,
	const dormant_node_info* info, const media_input* input)
{
	server_set_node_request request;
	server_set_node_reply reply;

	request.type = type;
	request.use_node = node != NULL;
	if (node != NULL)
		request.node = *node;
	request.use_dni = info != NULL;
	if (info != NULL)
		request.dni = *info;
	request.use_input = input != NULL;
	if (input != NULL)
		request.input = *input;

	return QueryServer(SERVER_SET_NODE, &request, sizeof(request), &reply,
		sizeof(reply));
}


status_t
BMediaRosterEx::GetAllOutputs(const media_node& node, List<media_output>* list)
{
	int32 cookie;
	status_t rv;
	status_t result;

	PRINT(4, "BMediaRosterEx::GetAllOutputs() node %" B_PRId32 ", port %"
		B_PRId32 "\n", node.node, node.port);

	if (!(node.kind & B_BUFFER_PRODUCER)) {
		ERROR("BMediaRosterEx::GetAllOutputs: node %" B_PRId32 " is not a "
			"B_BUFFER_PRODUCER\n", node.node);
		return B_MEDIA_BAD_NODE;
	}

	result = B_OK;
	cookie = 0;
	list->MakeEmpty();
	for (;;) {
		producer_get_next_output_request request;
		producer_get_next_output_reply reply;
		request.cookie = cookie;
		rv = QueryPort(node.port, PRODUCER_GET_NEXT_OUTPUT, &request,
			sizeof(request), &reply, sizeof(reply));
		if (rv != B_OK)
			break;
		cookie = reply.cookie;
		if (!list->Insert(reply.output)) {
			ERROR("GetAllOutputs: list->Insert failed\n");
			result = B_ERROR;
		}
		#if DEBUG >= 3
			PRINT(3," next cookie %" B_PRId32 ", ", cookie);
			PRINT_OUTPUT("output ", reply.output);
		#endif
	}

	producer_dispose_output_cookie_request request;
	producer_dispose_output_cookie_reply reply;
	QueryPort(node.port, PRODUCER_DISPOSE_OUTPUT_COOKIE, &request,
		sizeof(request), &reply, sizeof(reply));

	return result;
}


status_t
BMediaRosterEx::GetAllOutputs(BBufferProducer* node, List<media_output>* list)
{
	int32 cookie;
	status_t result;

	PRINT(4, "BMediaRosterEx::GetAllOutputs() (by pointer) node %" B_PRId32
		", port %" B_PRId32 "\n", node->ID(), node->ControlPort());

	result = B_OK;
	cookie = 0;
	list->MakeEmpty();
	for (;;) {
		media_output output;
		if (B_OK != node->GetNextOutput(&cookie, &output))
			break;
		if (!list->Insert(output)) {
			ERROR("GetAllOutputs: list->Insert failed\n");
			result = B_ERROR;
		}
		#if DEBUG >= 3
			PRINT(3," next cookie %" B_PRId32 ", ", cookie);
			PRINT_OUTPUT("output ", output);
		#endif
	}
	node->DisposeOutputCookie(cookie);
	return result;
}


status_t
BMediaRosterEx::GetAllInputs(const media_node& node, List<media_input>* list)
{
	int32 cookie;
	status_t rv;
	status_t result;

	PRINT(4, "BMediaRosterEx::GetAllInputs() node %" B_PRId32 ", port %"
		B_PRId32 "\n", node.node, node.port);

	if (!(node.kind & B_BUFFER_CONSUMER)) {
		ERROR("BMediaRosterEx::GetAllInputs: node %" B_PRId32 " is not a "
			"B_BUFFER_CONSUMER\n", node.node);
		return B_MEDIA_BAD_NODE;
	}

	result = B_OK;
	cookie = 0;
	list->MakeEmpty();
	for (;;) {
		consumer_get_next_input_request request;
		consumer_get_next_input_reply reply;
		request.cookie = cookie;
		rv = QueryPort(node.port, CONSUMER_GET_NEXT_INPUT, &request,
			sizeof(request), &reply, sizeof(reply));
		if (rv != B_OK)
			break;
		cookie = reply.cookie;
		if (!list->Insert(reply.input)) {
			ERROR("GetAllInputs: list->Insert failed\n");
			result = B_ERROR;
		}
		#if DEBUG >= 3
			PRINT(3," next cookie %" B_PRId32 ", ", cookie);
			PRINT_OUTPUT("input ", reply.input);
		#endif
	}

	consumer_dispose_input_cookie_request request;
	consumer_dispose_input_cookie_reply reply;
	QueryPort(node.port, CONSUMER_DISPOSE_INPUT_COOKIE, &request,
		sizeof(request), &reply, sizeof(reply));

	return result;
}


status_t
BMediaRosterEx::GetAllInputs(BBufferConsumer* node, List<media_input>* list)
{
	int32 cookie;
	status_t result;

	PRINT(4, "BMediaRosterEx::GetAllInputs() (by pointer) node %" B_PRId32
		", port %" B_PRId32 "\n", node->ID(), node->ControlPort());

	result = B_OK;
	cookie = 0;
	list->MakeEmpty();
	for (;;) {
		media_input input;
		if (B_OK != node->GetNextInput(&cookie, &input))
			break;
		if (!list->Insert(input)) {
			ERROR("GetAllInputs: list->Insert failed\n");
			result = B_ERROR;
		}
		#if DEBUG >= 3
			PRINT(3," next cookie %" B_PRId32 ", ", cookie);
			PRINT_INPUT("input ", input);
		#endif
	}
	node->DisposeInputCookie(cookie);
	return result;
}


status_t
BMediaRosterEx::PublishOutputs(const media_node& node, List<media_output>* list)
{
	server_publish_outputs_request request;
	server_publish_outputs_reply reply;
	media_output* output;
	media_output* outputs;
	int32 count;
	status_t rv;

	count = list->CountItems();
	TRACE("PublishOutputs: publishing %" B_PRId32 "\n", count);

	request.node = node;
	request.count = count;
	if (count > MAX_OUTPUTS) {
		void *start_addr;
		size_t size;
		size = ROUND_UP_TO_PAGE(count * sizeof(media_output));
		request.area = create_area("publish outputs", &start_addr,
			B_ANY_ADDRESS, size, B_NO_LOCK,
			B_READ_AREA | B_WRITE_AREA | B_CLONEABLE_AREA);
		if (request.area < B_OK) {
			ERROR("PublishOutputs: failed to create area, %#" B_PRIx32 "\n",
				request.area);
			return (status_t)request.area;
		}
		outputs = static_cast<media_output *>(start_addr);
	} else {
		request.area = -1;
		outputs = request.outputs;
	}
	TRACE("PublishOutputs: area %" B_PRId32 "\n", request.area);

	int i;
	for (i = 0, list->Rewind(); list->GetNext(&output); i++) {
		ASSERT(i < count);
		outputs[i] = *output;
	}

	rv = QueryServer(SERVER_PUBLISH_OUTPUTS, &request, sizeof(request),
		&reply, sizeof(reply));

	if (request.area != -1)
		delete_area(request.area);

	return rv;
}


status_t
BMediaRosterEx::PublishInputs(const media_node& node, List<media_input>* list)
{
	server_publish_inputs_request request;
	server_publish_inputs_reply reply;
	media_input* input;
	media_input* inputs;
	int32 count;
	status_t rv;

	count = list->CountItems();
	TRACE("PublishInputs: publishing %" B_PRId32 "\n", count);

	request.node = node;
	request.count = count;
	if (count > MAX_INPUTS) {
		void* start_addr;
		size_t size;
		size = ROUND_UP_TO_PAGE(count * sizeof(media_input));
		request.area = create_area("publish inputs", &start_addr,
			B_ANY_ADDRESS, size, B_NO_LOCK,
			B_READ_AREA | B_WRITE_AREA | B_CLONEABLE_AREA);
		if (request.area < B_OK) {
			ERROR("PublishInputs: failed to create area, %#" B_PRIx32 "\n",
				request.area);
			return (status_t)request.area;
		}
		inputs = static_cast<media_input *>(start_addr);
	} else {
		request.area = -1;
		inputs = request.inputs;
	}
	TRACE("PublishInputs: area %" B_PRId32 "\n", request.area);

	int i;
	for (i = 0, list->Rewind(); list->GetNext(&input); i++) {
		ASSERT(i < count);
		inputs[i] = *input;
	}

	rv = QueryServer(SERVER_PUBLISH_INPUTS, &request, sizeof(request),
		&reply, sizeof(reply));

	if (request.area != -1)
		delete_area(request.area);

	return rv;
}


BTimeSource*
BMediaRosterEx::MakeTimeSourceObject(media_node_id timeSourceID)
{
	media_node clone;
	status_t status = GetNodeFor(timeSourceID, &clone);
	if (status != B_OK) {
		ERROR("BMediaRosterEx::MakeTimeSourceObject: GetNodeFor failed: %s\n",
			strerror(status));
		return NULL;
	}

	BTimeSource* source = gTimeSourceObjectManager->GetTimeSource(clone);
	if (source == NULL) {
		ERROR("BMediaRosterEx::MakeTimeSourceObject: GetTimeSource failed\n");
		return NULL;
	}

	// TODO: release?
	ReleaseNode(clone);

	return source;
}


//	#pragma mark - public BMediaRoster


status_t
BMediaRoster::GetVideoInput(media_node* _node)
{
	CALLED();
	return MediaRosterEx(this)->GetNode(VIDEO_INPUT, _node);
}


status_t
BMediaRoster::GetAudioInput(media_node* _node)
{
	CALLED();
	return MediaRosterEx(this)->GetNode(AUDIO_INPUT, _node);
}


status_t
BMediaRoster::GetVideoOutput(media_node* _node)
{
	CALLED();
	return MediaRosterEx(this)->GetNode(VIDEO_OUTPUT, _node);
}


status_t
BMediaRoster::GetAudioMixer(media_node* _node)
{
	CALLED();
	return MediaRosterEx(this)->GetNode(AUDIO_MIXER, _node);
}


status_t
BMediaRoster::GetAudioOutput(media_node* _node)
{
	CALLED();
	return MediaRosterEx(this)->GetNode(AUDIO_OUTPUT, _node);
}


status_t
BMediaRoster::GetAudioOutput(media_node* _node, int32* _inputID,
	BString* _inputName)
{
	CALLED();
	return MediaRosterEx(this)->GetNode(AUDIO_OUTPUT_EX, _node, _inputID,
		_inputName);
}


status_t
BMediaRoster::GetTimeSource(media_node* _node)
{
	CALLED();
	status_t rv;

	// TODO: need to do this in a nicer way.

	rv = MediaRosterEx(this)->GetNode(TIME_SOURCE, _node);
	if (rv != B_OK)
		return rv;

	// We don't do reference counting for timesources, that's why we
	// release the node immediately.
	ReleaseNode(*_node);

	// we need to remember to not use this node with server side reference counting
	_node->kind |= NODE_KIND_NO_REFCOUNTING;
	return B_OK;
}


status_t
BMediaRoster::SetVideoInput(const media_node& producer)
{
	CALLED();
	return MediaRosterEx(this)->SetNode(VIDEO_INPUT, &producer);
}


status_t
BMediaRoster::SetVideoInput(const dormant_node_info& producer)
{
	CALLED();
	return MediaRosterEx(this)->SetNode(VIDEO_INPUT, NULL, &producer);
}


status_t
BMediaRoster::SetAudioInput(const media_node& producer)
{
	CALLED();
	return MediaRosterEx(this)->SetNode(AUDIO_INPUT, &producer);
}


status_t
BMediaRoster::SetAudioInput(const dormant_node_info& producer)
{
	CALLED();
	return MediaRosterEx(this)->SetNode(AUDIO_INPUT, NULL, &producer);
}


status_t
BMediaRoster::SetVideoOutput(const media_node& consumer)
{
	CALLED();
	return MediaRosterEx(this)->SetNode(VIDEO_OUTPUT, &consumer);
}


status_t
BMediaRoster::SetVideoOutput(const dormant_node_info& consumer)
{
	CALLED();
	return MediaRosterEx(this)->SetNode(VIDEO_OUTPUT, NULL, &consumer);
}


status_t
BMediaRoster::SetAudioOutput(const media_node& consumer)
{
	CALLED();
	return MediaRosterEx(this)->SetNode(AUDIO_OUTPUT, &consumer);
}


status_t
BMediaRoster::SetAudioOutput(const media_input& input)
{
	CALLED();
	return MediaRosterEx(this)->SetNode(AUDIO_OUTPUT, NULL, NULL, &input);
}


status_t
BMediaRoster::SetAudioOutput(const dormant_node_info& consumer)
{
	CALLED();
	return MediaRosterEx(this)->SetNode(AUDIO_OUTPUT, NULL, &consumer);
}


status_t
BMediaRoster::GetNodeFor(media_node_id node, media_node* clone)
{
	CALLED();
	if (clone == NULL)
		return B_BAD_VALUE;
	if (IS_INVALID_NODEID(node))
		return B_MEDIA_BAD_NODE;

	server_get_node_for_request request;
	server_get_node_for_reply reply;
	status_t rv;

	request.node_id = node;
	request.team = BPrivate::current_team();

	rv = QueryServer(SERVER_GET_NODE_FOR, &request, sizeof(request), &reply,
		sizeof(reply));
	if (rv != B_OK)
		return rv;

	*clone = reply.clone;
	return B_OK;
}


status_t
BMediaRoster::GetSystemTimeSource(media_node* clone)
{
	CALLED();
	status_t rv;

	// TODO: need to do this in a nicer way.

	rv = MediaRosterEx(this)->GetNode(SYSTEM_TIME_SOURCE, clone);
	if (rv != B_OK)
		return rv;

	// We don't do reference counting for timesources, that's why we
	// release the node immediately.
	ReleaseNode(*clone);

	// we need to remember to not use this node with server side reference
	// counting
	clone->kind |= NODE_KIND_NO_REFCOUNTING;

	return B_OK;
}


status_t
BMediaRoster::ReleaseNode(const media_node& node)
{
	CALLED();
	if (IS_INVALID_NODE(node))
		return B_MEDIA_BAD_NODE;

	if (node.kind & NODE_KIND_NO_REFCOUNTING) {
		TRACE("BMediaRoster::ReleaseNode, trying to release reference "
			"counting disabled timesource, node %" B_PRId32 ", port %" B_PRId32
			", team %" B_PRId32 "\n", node.node, node.port,
			BPrivate::current_team());
		return B_OK;
	}

	server_release_node_request request;
	server_release_node_reply reply;
	status_t rv;

	request.node = node;
	request.team = BPrivate::current_team();

	TRACE("BMediaRoster::ReleaseNode, node %" B_PRId32 ", port %" B_PRId32
		", team %" B_PRId32 "\n", node.node, node.port,
		BPrivate::current_team());

	rv = QueryServer(SERVER_RELEASE_NODE, &request, sizeof(request), &reply,
		sizeof(reply));
	if (rv != B_OK) {
		ERROR("BMediaRoster::ReleaseNode FAILED, node %" B_PRId32 ", port %"
			B_PRId32 ", team %" B_PRId32 "!\n", node.node, node.port,
			BPrivate::current_team());
	}
	return rv;
}


BTimeSource*
BMediaRoster::MakeTimeSourceFor(const media_node& forNode)
{
	// MakeTimeSourceFor() returns a BTimeSource object
	// corresponding to the specified node's time source.

	CALLED();

	if (IS_SYSTEM_TIMESOURCE(forNode)) {
		// special handling for the system time source
		TRACE("BMediaRoster::MakeTimeSourceFor, asked for system time "
			"source\n");
		return MediaRosterEx(this)->MakeTimeSourceObject(
			NODE_SYSTEM_TIMESOURCE_ID);
	}

	if (IS_INVALID_NODE(forNode)) {
		ERROR("BMediaRoster::MakeTimeSourceFor: for_node invalid, node %"
			B_PRId32 ", port %" B_PRId32 ", kinds 0x%" B_PRIx32 "\n",
			forNode.node, forNode.port, forNode.kind);
		return NULL;
	}

	TRACE("BMediaRoster::MakeTimeSourceFor: node %" B_PRId32 " enter\n",
		forNode.node);

	node_get_timesource_request request;
	node_get_timesource_reply reply;
	BTimeSource *source;
	status_t rv;

	// ask the node to get it's current timesource id
	rv = QueryPort(forNode.port, NODE_GET_TIMESOURCE, &request,
		sizeof(request), &reply, sizeof(reply));
	if (rv != B_OK) {
		ERROR("BMediaRoster::MakeTimeSourceFor: request failed\n");
		return NULL;
	}

	source = MediaRosterEx(this)->MakeTimeSourceObject(reply.timesource_id);

	TRACE("BMediaRoster::MakeTimeSourceFor: node %" B_PRId32 " leave\n",
		forNode.node);

	return source;
}


status_t
BMediaRoster::Connect(const media_source& from, const media_destination& to,
	media_format* _format, media_output* _output, media_input* _input)
{
	return BMediaRoster::Connect(from, to, _format, _output, _input, 0);
}


status_t
BMediaRoster::Connect(const media_source& from, const media_destination& to,
	media_format* io_format, media_output* out_output, media_input* out_input,
	uint32 in_flags, void* _reserved)
{
	CALLED();
	if (io_format == NULL || out_output == NULL || out_input == NULL)
		return B_BAD_VALUE;
	if (IS_INVALID_SOURCE(from)) {
		ERROR("BMediaRoster::Connect: media_source invalid\n");
		return B_MEDIA_BAD_SOURCE;
	}
	if (IS_INVALID_DESTINATION(to)) {
		ERROR("BMediaRoster::Connect: media_destination invalid\n");
		return B_MEDIA_BAD_DESTINATION;
	}

	status_t rv;

	// find the output and input nodes
	// TODO: isn't there a easier way?
	media_node sourcenode;
	media_node destnode;
	rv = GetNodeFor(NodeIDFor(from.port), &sourcenode);
	if (rv != B_OK) {
		ERROR("BMediaRoster::Connect: Can't find source node for port %"
			B_PRId32 "\n", from.port);
		return B_MEDIA_BAD_SOURCE;
	}
	ReleaseNode(sourcenode);
	rv = GetNodeFor(NodeIDFor(to.port), &destnode);
	if (rv != B_OK) {
		ERROR("BMediaRoster::Connect: Can't find destination node for port "
			"%" B_PRId32 "\n", to.port);
		return B_MEDIA_BAD_DESTINATION;
	}
	ReleaseNode(destnode);

	if (!(sourcenode.kind & B_BUFFER_PRODUCER)) {
		ERROR("BMediaRoster::Connect: source node %" B_PRId32 " is not a "
			"B_BUFFER_PRODUCER\n", sourcenode.node);
		return B_MEDIA_BAD_SOURCE;
	}
	if (!(destnode.kind & B_BUFFER_CONSUMER)) {
		ERROR("BMediaRoster::Connect: destination node %" B_PRId32 " is not a "
			"B_BUFFER_CONSUMER\n", destnode.node);
		return B_MEDIA_BAD_DESTINATION;
	}

	producer_format_proposal_request request1;
	producer_format_proposal_reply reply1;

	PRINT_FORMAT("BMediaRoster::Connect calling "
		"BBufferProducer::FormatProposal with format  ", *io_format);

	// BBufferProducer::FormatProposal
	request1.output = from;
	request1.format = *io_format;
	rv = QueryPort(from.port, PRODUCER_FORMAT_PROPOSAL, &request1,
		sizeof(request1), &reply1, sizeof(reply1));
	if (rv != B_OK) {
		ERROR("BMediaRoster::Connect: aborted after "
			"BBufferProducer::FormatProposal, status = %#" B_PRIx32 "\n",rv);
		return rv;
	}
	// reply1.format now contains the format proposed by the producer

	consumer_accept_format_request request2;
	consumer_accept_format_reply reply2;

	PRINT_FORMAT("BMediaRoster::Connect calling "
		"BBufferConsumer::AcceptFormat with format    ", reply1.format);

	// BBufferConsumer::AcceptFormat
	request2.dest = to;
	request2.format = reply1.format;
	rv = QueryPort(to.port, CONSUMER_ACCEPT_FORMAT, &request2,
		sizeof(request2), &reply2, sizeof(reply2));
	if (rv != B_OK) {
		ERROR("BMediaRoster::Connect: aborted after "
			"BBufferConsumer::AcceptFormat, status = %#" B_PRIx32 "\n",rv);
		return rv;
	}
	// reply2.format now contains the format accepted by the consumer

	// BBufferProducer::PrepareToConnect
	producer_prepare_to_connect_request request3;
	producer_prepare_to_connect_reply reply3;

	PRINT_FORMAT("BMediaRoster::Connect calling "
		"BBufferProducer::PrepareToConnect with format", reply2.format);

	request3.source = from;
	request3.destination = to;
	request3.format = reply2.format;
	strcpy(request3.name, "XXX some default name"); // TODO: fix this
	rv = QueryPort(from.port, PRODUCER_PREPARE_TO_CONNECT, &request3,
		sizeof(request3), &reply3, sizeof(reply3));
	if (rv != B_OK) {
		ERROR("BMediaRoster::Connect: aborted after "
			"BBufferProducer::PrepareToConnect, status = %#" B_PRIx32 "\n", rv);
		return rv;
	}
	// reply3.format is still our pretty media format
	// reply3.out_source the real source to be used for the connection
	// reply3.name the name BBufferConsumer::Connected will see in the
	// outInput->name argument

	// BBufferConsumer::Connected
	consumer_connected_request request4;
	consumer_connected_reply reply4;
	status_t con_status;

	PRINT_FORMAT("BMediaRoster::Connect calling BBufferConsumer::Connected() "
		"with format       ", reply3.format);

	request4.input.node = destnode;
	request4.input.source = reply3.out_source;
	request4.input.destination = to;
	request4.input.format = reply3.format;
	strcpy(request4.input.name, reply3.name);

	con_status = QueryPort(to.port, CONSUMER_CONNECTED, &request4,
		sizeof(request4), &reply4, sizeof(reply4));
	if (con_status != B_OK) {
		ERROR("BMediaRoster::Connect: aborting after "
			"BBufferConsumer::Connected, status = %#" B_PRIx32 "\n",
			con_status);
		// we do NOT return here!
	}
	// con_status contains the status code to be supplied to
	// BBufferProducer::Connect's status argument
	// reply4.input contains the media_input that describes the connection
	// from the consumer point of view

	// BBufferProducer::Connect
	producer_connect_request request5;
	producer_connect_reply reply5;

	PRINT_FORMAT("BMediaRoster::Connect calling BBufferProducer::Connect with "
		"format         ", reply4.input.format);

	request5.error = con_status;
	request5.source = reply3.out_source;
	request5.destination = reply4.input.destination;
	request5.format = reply4.input.format;
	strcpy(request5.name, reply4.input.name);
	rv = QueryPort(reply4.input.source.port, PRODUCER_CONNECT, &request5,
		sizeof(request5), &reply5, sizeof(reply5));
	if (con_status != B_OK) {
		ERROR("BMediaRoster::Connect: aborted\n");
		return con_status;
	}
	if (rv != B_OK) {
		ERROR("BMediaRoster::Connect: aborted after BBufferProducer::Connect()"
			", status = %#" B_PRIx32 "\n", rv);
		return rv;
	}
	// reply5.name contains the name assigned to the connection by the producer

	// initilize connection info
	*io_format = reply4.input.format;
	*out_input = reply4.input;
	out_output->node = sourcenode;
	out_output->source = reply4.input.source;
	out_output->destination = reply4.input.destination;
	out_output->format = reply4.input.format;
	strcpy(out_output->name, reply5.name);

	// the connection is now made
	PRINT_FORMAT("   format", *io_format);
	PRINT_INPUT("   input", *out_input);
	PRINT_OUTPUT("   output", *out_output);

	// TODO: register connection with server
	// TODO: we should just send a notification, instead of republishing all
	// endpoints
	List<media_output> outlist;
	List<media_input> inlist;
	if (MediaRosterEx(this)->GetAllOutputs(out_output->node , &outlist) == B_OK)
		MediaRosterEx(this)->PublishOutputs(out_output->node , &outlist);
	if (MediaRosterEx(this)->GetAllInputs(out_input->node , &inlist) == B_OK)
		MediaRosterEx(this)->PublishInputs(out_input->node, &inlist);

	// TODO: if (mute) BBufferProducer::EnableOutput(false)
	if (in_flags & B_CONNECT_MUTED) {
	}

	// send a notification
	BPrivate::media::notifications::ConnectionMade(*out_input, *out_output,
		*io_format);

	return B_OK;
};


status_t
BMediaRoster::Disconnect(media_node_id source_nodeid,
	const media_source& source, media_node_id destination_nodeid,
	const media_destination& destination)
{
	CALLED();
	if (IS_INVALID_NODEID(source_nodeid)) {
		ERROR("BMediaRoster::Disconnect: source media_node_id invalid\n");
		return B_MEDIA_BAD_SOURCE;
	}
	if (IS_INVALID_NODEID(destination_nodeid)) {
		ERROR("BMediaRoster::Disconnect: destination media_node_id invalid\n");
		return B_MEDIA_BAD_DESTINATION;
	}
	if (IS_INVALID_SOURCE(source)) {
		ERROR("BMediaRoster::Disconnect: media_source invalid\n");
		return B_MEDIA_BAD_SOURCE;
	}
	if (IS_INVALID_DESTINATION(destination)) {
		ERROR("BMediaRoster::Disconnect: media_destination invalid\n");
		return B_MEDIA_BAD_DESTINATION;
	}

	producer_disconnect_request request2;
	producer_disconnect_reply reply2;
	consumer_disconnected_request request1;
	consumer_disconnected_reply reply1;
	status_t rv1, rv2;

	// TODO: we should ask the server if this connection really exists

	request1.source = source;
	request1.destination = destination;
	request2.source = source;
	request2.destination = destination;

	rv1 = QueryPort(source.port, PRODUCER_DISCONNECT, &request1,
		sizeof(request1), &reply1, sizeof(reply1));
	rv2 = QueryPort(destination.port, CONSUMER_DISCONNECTED, &request2,
		sizeof(request2), &reply2, sizeof(reply2));

	// TODO: unregister connection with server
	// TODO: we should just send a notification, instead of republishing all
	// endpoints
	List<media_output> outlist;
	List<media_input> inlist;
	media_node sourcenode;
	media_node destnode;
	if (GetNodeFor(source_nodeid, &sourcenode) == B_OK) {
		if (!(sourcenode.kind & B_BUFFER_PRODUCER)) {
			ERROR("BMediaRoster::Disconnect: source_nodeid %" B_PRId32
				" is not a B_BUFFER_PRODUCER\n", source_nodeid);
		}
		if (MediaRosterEx(this)->GetAllOutputs(sourcenode , &outlist) == B_OK)
			MediaRosterEx(this)->PublishOutputs(sourcenode , &outlist);
		ReleaseNode(sourcenode);
	} else {
		ERROR("BMediaRoster::Disconnect: GetNodeFor source_nodeid %" B_PRId32
			" failed\n", source_nodeid);
	}
	if (GetNodeFor(destination_nodeid, &destnode) == B_OK) {
		if (!(destnode.kind & B_BUFFER_CONSUMER)) {
			ERROR("BMediaRoster::Disconnect: destination_nodeid %" B_PRId32
				" is not a B_BUFFER_CONSUMER\n", destination_nodeid);
		}
		if (MediaRosterEx(this)->GetAllInputs(destnode , &inlist) == B_OK)
			MediaRosterEx(this)->PublishInputs(destnode, &inlist);
		ReleaseNode(destnode);
	} else {
		ERROR("BMediaRoster::Disconnect: GetNodeFor destination_nodeid %"
			B_PRId32 " failed\n", destination_nodeid);
	}

	// send a notification
	BPrivate::media::notifications::ConnectionBroken(source, destination);

	return rv1 != B_OK || rv2 != B_OK ? B_ERROR : B_OK;
}


status_t
BMediaRoster::Disconnect(const media_output& output, const media_input& input)
{
	if (IS_INVALID_NODEID(output.node.node)) {
		printf("BMediaRoster::Disconnect: output.node.node %" B_PRId32
			" invalid\n", output.node.node);
		return B_MEDIA_BAD_SOURCE;
	}
	if (IS_INVALID_NODEID(input.node.node)) {
		printf("BMediaRoster::Disconnect: input.node.node %" B_PRId32
			" invalid\n", input.node.node);
		return B_MEDIA_BAD_DESTINATION;
	}
	if (!(output.node.kind & B_BUFFER_PRODUCER)) {
		printf("BMediaRoster::Disconnect: output.node.kind 0x%" B_PRIx32
			" is no B_BUFFER_PRODUCER\n", output.node.kind);
		return B_MEDIA_BAD_SOURCE;
	}
	if (!(input.node.kind & B_BUFFER_CONSUMER)) {
		printf("BMediaRoster::Disconnect: input.node.kind 0x%" B_PRIx32
			" is no B_BUFFER_PRODUCER\n", input.node.kind);
		return B_MEDIA_BAD_DESTINATION;
	}
	if (input.source.port != output.source.port) {
		printf("BMediaRoster::Disconnect: input.source.port %" B_PRId32
			" doesn't match output.source.port %" B_PRId32 "\n",
			input.source.port, output.source.port);
		return B_MEDIA_BAD_SOURCE;
	}
	if (input.source.id != output.source.id) {
		printf("BMediaRoster::Disconnect: input.source.id %" B_PRId32
			" doesn't match output.source.id %" B_PRId32 "\n", input.source.id,
			output.source.id);
		return B_MEDIA_BAD_SOURCE;
	}
	if (input.destination.port != output.destination.port) {
		printf("BMediaRoster::Disconnect: input.destination.port %" B_PRId32
			" doesn't match output.destination.port %" B_PRId32 "\n",
			input.destination.port, output.destination.port);
		return B_MEDIA_BAD_DESTINATION;
	}
	if (input.destination.id != output.destination.id) {
		printf("BMediaRoster::Disconnect: input.destination.id %" B_PRId32
			" doesn't match output.destination.id %" B_PRId32 "\n",
			input.destination.id, output.destination.id);
		return B_MEDIA_BAD_DESTINATION;
	}

	return Disconnect(output.node.node, output.source, input.node.node,
		input.destination);
}


status_t
BMediaRoster::StartNode(const media_node& node, bigtime_t atPerformanceTime)
{
	CALLED();
	if (node.node <= 0)
		return B_MEDIA_BAD_NODE;

	TRACE("BMediaRoster::StartNode, node %" B_PRId32 ", at perf %" B_PRId64
		"\n", node.node, atPerformanceTime);

	node_start_command command;
	command.performance_time = atPerformanceTime;

	return SendToPort(node.port, NODE_START, &command, sizeof(command));
}


status_t
BMediaRoster::StopNode(const media_node& node, bigtime_t atPerformanceTime,
	bool immediate)
{
	CALLED();
	if (IS_INVALID_NODE(node))
		return B_MEDIA_BAD_NODE;

	TRACE("BMediaRoster::StopNode, node %" B_PRId32 ", at perf %" B_PRId64
		" %s\n", node.node, atPerformanceTime, immediate ? "NOW" : "");

	node_stop_command command;
	command.performance_time = atPerformanceTime;
	command.immediate = immediate;

	return SendToPort(node.port, NODE_STOP, &command, sizeof(command));
}


status_t
BMediaRoster::SeekNode(const media_node& node, bigtime_t toMediaTime,
	bigtime_t atPerformanceTime)
{
	CALLED();
	if (IS_INVALID_NODE(node))
		return B_MEDIA_BAD_NODE;

	TRACE("BMediaRoster::SeekNode, node %" B_PRId32 ", at perf %" B_PRId64
		", to perf %" B_PRId64 "\n", node.node, atPerformanceTime, toMediaTime);

	node_seek_command command;
	command.media_time = toMediaTime;
	command.performance_time = atPerformanceTime;

	return SendToPort(node.port, NODE_SEEK, &command, sizeof(command));
}


status_t
BMediaRoster::StartTimeSource(const media_node& node, bigtime_t atRealTime)
{
	CALLED();
	if (IS_SYSTEM_TIMESOURCE(node)) {
		// TODO: debug this
		//ERROR("BMediaRoster::StartTimeSource node %" B_PRId32 " is system timesource\n", node.node);
		return B_OK;
	}
//	if (IS_SHADOW_TIMESOURCE(node)) {
//		// TODO: debug this
//		ERROR("BMediaRoster::StartTimeSource node %" B_PRId32 " is shadow timesource\n", node.node);
//		return B_OK;
//	}
	if (IS_INVALID_NODE(node)) {
		ERROR("BMediaRoster::StartTimeSource node %" B_PRId32 " invalid\n",
			node.node);
		return B_MEDIA_BAD_NODE;
	}
	if ((node.kind & B_TIME_SOURCE) == 0) {
		ERROR("BMediaRoster::StartTimeSource node %" B_PRId32
			" is no timesource\n", node.node);
		return B_MEDIA_BAD_NODE;
	}

	TRACE("BMediaRoster::StartTimeSource, node %" B_PRId32 ", at real %"
		B_PRId64 "\n", node.node, atRealTime);

	BTimeSource::time_source_op_info msg;
	msg.op = BTimeSource::B_TIMESOURCE_START;
	msg.real_time = atRealTime;

	return write_port(node.port, TIMESOURCE_OP, &msg, sizeof(msg));
}


status_t
BMediaRoster::StopTimeSource(const media_node& node, bigtime_t atRealTime,
	bool immediate)
{
	CALLED();
	if (IS_SYSTEM_TIMESOURCE(node)) {
		// TODO: debug this
		//ERROR("BMediaRoster::StopTimeSource node %ld is system timesource\n", node.node);
		return B_OK;
	}
//	if (IS_SHADOW_TIMESOURCE(node)) {
//		// TODO: debug this
//		ERROR("BMediaRoster::StopTimeSource node %ld is shadow timesource\n", node.node);
//		return B_OK;
//	}
	if (IS_INVALID_NODE(node)) {
		ERROR("BMediaRoster::StopTimeSource node %" B_PRId32 " invalid\n",
			node.node);
		return B_MEDIA_BAD_NODE;
	}
	if ((node.kind & B_TIME_SOURCE) == 0) {
		ERROR("BMediaRoster::StopTimeSource node %" B_PRId32 " is no "
			"timesource\n", node.node);
		return B_MEDIA_BAD_NODE;
	}

	TRACE("BMediaRoster::StopTimeSource, node %" B_PRId32 ", at real %" B_PRId64
		" %s\n", node.node, atRealTime, immediate ? "NOW" : "");

	BTimeSource::time_source_op_info msg;
	msg.op = immediate ? BTimeSource::B_TIMESOURCE_STOP_IMMEDIATELY
		: BTimeSource::B_TIMESOURCE_STOP;
	msg.real_time = atRealTime;

	return write_port(node.port, TIMESOURCE_OP, &msg, sizeof(msg));
}


status_t
BMediaRoster::SeekTimeSource(const media_node& node,
	bigtime_t toPerformanceTime, bigtime_t atRealTime)
{
	CALLED();
	if (IS_SYSTEM_TIMESOURCE(node)) {
		// TODO: debug this
		// ERROR("BMediaRoster::SeekTimeSource node %ld is system timesource\n", node.node);
		// you can't seek the system time source, but
		// returning B_ERROR would break StampTV
		return B_OK;
	}
//	if (IS_SHADOW_TIMESOURCE(node)) {
//		// TODO: debug this
//		ERROR("BMediaRoster::SeekTimeSource node %ld is shadow timesource\n", node.node);
//		return B_OK;
//	}
	if (IS_INVALID_NODE(node)) {
		ERROR("BMediaRoster::SeekTimeSource node %" B_PRId32 " invalid\n",
			node.node);
		return B_MEDIA_BAD_NODE;
	}
	if ((node.kind & B_TIME_SOURCE) == 0) {
		ERROR("BMediaRoster::SeekTimeSource node %" B_PRId32
			" is no timesource\n", node.node);
		return B_MEDIA_BAD_NODE;
	}

	TRACE("BMediaRoster::SeekTimeSource, node %" B_PRId32 ", at real %" B_PRId64
		", to perf %" B_PRId64 "\n", node.node, atRealTime, toPerformanceTime);

	BTimeSource::time_source_op_info msg;
	msg.op = BTimeSource::B_TIMESOURCE_SEEK;
	msg.real_time = atRealTime;
	msg.performance_time = toPerformanceTime;

	return write_port(node.port, TIMESOURCE_OP, &msg, sizeof(msg));
}


status_t
BMediaRoster::SyncToNode(const media_node& node, bigtime_t atTime,
	bigtime_t timeout)
{
	TRACE("BMediaRoster::SyncToNode, node %" B_PRId32 ", at real %" B_PRId64
		", at timeout %" B_PRId64 "\n", node.node, atTime, timeout);
	if (IS_INVALID_NODE(node))
		return B_MEDIA_BAD_NODE;

	port_id waitPort = create_port(1, "SyncToNode wait port");
	if (waitPort < B_OK)
		return waitPort;

	node_sync_to_request request;
	node_sync_to_reply reply;
	request.performance_time = atTime;
	request.port = waitPort;

	status_t status = QueryPort(node.port, NODE_SYNC_TO, &request,
		sizeof(request), &reply, sizeof(reply));

	if (status == B_OK) {
		ssize_t readSize = read_port_etc(waitPort, NULL, &status,
			sizeof(status), B_TIMEOUT, timeout);
		if (readSize < 0)
			status = readSize;
	}
	close_port(waitPort);
	delete_port(waitPort);
	return status;
}


status_t
BMediaRoster::SetRunModeNode(const media_node& node, BMediaNode::run_mode mode)
{
	TRACE("BMediaRoster::SetRunModeNode, node %" B_PRId32 ", mode %d\n",
		node.node, mode);
	if (IS_INVALID_NODE(node))
		return B_MEDIA_BAD_NODE;

	node_set_run_mode_command msg;
	msg.mode = mode;

	return write_port(node.port, NODE_SET_RUN_MODE, &msg, sizeof(msg));
}


status_t
BMediaRoster::PrerollNode(const media_node& node)
{
	CALLED();
	if (IS_INVALID_NODE(node))
		return B_MEDIA_BAD_NODE;

	char dummy = 0;
	return write_port(node.port, NODE_PREROLL, &dummy, sizeof(dummy));
}


status_t
BMediaRoster::RollNode(const media_node& node, bigtime_t startPerformance,
	bigtime_t stopPerformance, bigtime_t atMediaTime)
{
	CALLED();
	if (IS_INVALID_NODE(node))
		return B_MEDIA_BAD_NODE;

	TRACE("BMediaRoster::RollNode, node %" B_PRId32 ", at start perf %"
		B_PRId64 ", at stop perf %" B_PRId64 ", at media time %"
		B_PRId64 "\n", node.node, startPerformance,
		stopPerformance, atMediaTime);

	node_roll_command command;
	command.start_performance_time = startPerformance;
	command.stop_performance_time = stopPerformance;
	command.seek_media_time = atMediaTime;

	return write_port(node.port, NODE_ROLL, &command, sizeof(command));
}


status_t
BMediaRoster::SetProducerRunModeDelay(const media_node& node,
	bigtime_t delay, BMediaNode::run_mode mode)
{
	TRACE("BMediaRoster::SetProducerRunModeDelay, node %" B_PRId32 ", delay %"
		B_PRId64 ", mode %d\n", node.node, delay, mode);
	if (IS_INVALID_NODE(node))
		return B_MEDIA_BAD_NODE;
	if ((node.kind & B_BUFFER_PRODUCER) == 0)
		return B_MEDIA_BAD_NODE;

	producer_set_run_mode_delay_command command;
	command.mode = mode;
	command.delay = delay;

	return SendToPort(node.port, PRODUCER_SET_RUN_MODE_DELAY, &command,
		sizeof(command));
}


status_t
BMediaRoster::SetProducerRate(const media_node& producer, int32 numer,
	int32 denom)
{
	CALLED();
	if (IS_INVALID_NODE(producer))
		return B_MEDIA_BAD_NODE;
	if ((producer.kind & B_BUFFER_PRODUCER) == 0)
		return B_MEDIA_BAD_NODE;

	producer_set_play_rate_request request;
	request.numer = numer;
	request.denom = denom;
	status_t status = write_port(producer.node, PRODUCER_SET_PLAY_RATE,
		&request, sizeof(request));
	if (status != B_OK)
		return status;

	producer_set_play_rate_reply reply;
	int32 code;
	status = read_port(request.reply_port, &code, &reply, sizeof(reply));

	return status < B_OK ? status : reply.result;
}


/*!	Nodes will have available inputs/outputs as long as they are capable
	of accepting more connections. The node may create an additional
	output or input as the currently available is taken into usage.
*/
status_t
BMediaRoster::GetLiveNodeInfo(const media_node& node,
	live_node_info* out_live_info)
{
	CALLED();
	if (out_live_info == NULL)
		return B_BAD_VALUE;
	if (IS_INVALID_NODE(node))
		return B_MEDIA_BAD_NODE;

	server_get_live_node_info_request request;
	server_get_live_node_info_reply reply;
	status_t rv;

	request.node = node;

	rv = QueryServer(SERVER_GET_LIVE_NODE_INFO, &request, sizeof(request),
		&reply, sizeof(reply));
	if (rv != B_OK)
		return rv;

	*out_live_info = reply.live_info;
	return B_OK;
}


status_t
BMediaRoster::GetLiveNodes(live_node_info* liveNodes, int32* _totalCount,
	const media_format* hasInput, const media_format* hasOutput,
	const char* name, uint64 nodeKinds)
{
	CALLED();
	if (liveNodes == NULL || _totalCount == NULL || *_totalCount <= 0)
		return B_BAD_VALUE;

	// TODO: we also support the wildcard search as GetDormantNodes does.
	// This needs to be documented

	server_get_live_nodes_request request;
	request.team = BPrivate::current_team();

	request.max_count = *_totalCount;
	request.has_input = hasInput != NULL;
	if (hasInput != NULL) {
		// TODO: we should not make a flat copy of media_format
		request.input_format = *hasInput;
	}
	request.has_output = hasOutput != NULL;
	if (hasOutput != NULL) {
		// TODO: we should not make a flat copy of media_format
		request.output_format = *hasOutput;
	}
	request.has_name = name != NULL;
	if (name != NULL)
		strlcpy(request.name, name, sizeof(request.name));
	request.require_kinds = nodeKinds;

	server_get_live_nodes_reply reply;
	status_t status = QueryServer(SERVER_GET_LIVE_NODES, &request,
		sizeof(request), &reply, sizeof(reply));
	if (status != B_OK) {
		ERROR("BMediaRoster::GetLiveNodes failed querying server: %s\n",
			strerror(status));
		*_totalCount = 0;
		return status;
	}

	const live_node_info* info;
	if (reply.area >= 0)
		info = (live_node_info*)reply.address;
	else
		info = reply.live_info;

	for (int32 i = 0; i < reply.count; i++)
		liveNodes[i] = info[i];

	if (reply.area >= 0)
		delete_area(reply.area);

	*_totalCount = reply.count;
	return B_OK;
}


status_t
BMediaRoster::GetFreeInputsFor(const media_node& node,
	media_input * out_free_inputs, int32 buf_num_inputs,
	int32 * out_total_count, media_type filter_type)
{
	CALLED();
	if (IS_INVALID_NODE(node)) {
		ERROR("BMediaRoster::GetFreeInputsFor: node %" B_PRId32 ", port %"
			B_PRId32 " invalid\n", node.node, node.port);
		return B_MEDIA_BAD_NODE;
	}
	if ((node.kind & B_BUFFER_CONSUMER) == 0) {
		ERROR("BMediaRoster::GetFreeInputsFor: node %" B_PRId32 ", port %"
			B_PRId32 " is not a consumer\n", node.node, node.port);
		return B_MEDIA_BAD_NODE;
	}
	if (out_free_inputs == NULL || out_total_count == NULL)
		return B_BAD_VALUE;

	List<media_input> list;
	media_input *input;
	status_t rv;

	*out_total_count = 0;

	rv = MediaRosterEx(this)->GetAllInputs(node, &list);
	if (B_OK != rv)
		return rv;

	PRINT(4, "BMediaRoster::GetFreeInputsFor node %" B_PRId32 ", max %" B_PRId32
		", filter-type %" B_PRId32 "\n", node.node, buf_num_inputs,
		filter_type);

	int32 i;
	for (i = 0, list.Rewind(); list.GetNext(&input);) {
		if (filter_type != B_MEDIA_UNKNOWN_TYPE
			&& filter_type != input->format.type) {
			// media_type used, but doesn't match
			continue;
		}
		if (input->source != media_source::null) {
			// consumer source already connected
			continue;
		}

		out_free_inputs[i] = *input;
		*out_total_count += 1;
		buf_num_inputs -= 1;
		#if DEBUG >= 3
			PRINT_OUTPUT("  input", out_free_inputs[i]);
		#endif
		if (buf_num_inputs == 0)
			break;
		i++;
	}

	MediaRosterEx(this)->PublishInputs(node, &list);
	return B_OK;
}


status_t
BMediaRoster::GetConnectedInputsFor(const media_node& node,
	media_input* out_active_inputs, int32 buf_num_inputs,
	int32* out_total_count)
{
	CALLED();
	if (IS_INVALID_NODE(node) || (node.kind & B_BUFFER_CONSUMER) == 0)
		return B_MEDIA_BAD_NODE;
	if (out_active_inputs == NULL || out_total_count == NULL)
		return B_BAD_VALUE;

	List<media_input> list;
	media_input *input;
	status_t rv;

	*out_total_count = 0;

	rv = MediaRosterEx(this)->GetAllInputs(node, &list);
	if (B_OK != rv)
		return rv;

	PRINT(4, "BMediaRoster::GetConnectedInputsFor node %" B_PRId32 ", max %"
		B_PRId32 "\n", node.node, buf_num_inputs);

	int32 i;
	for (i = 0, list.Rewind(); list.GetNext(&input);) {
		if (input->source == media_source::null)
			continue; // consumer source not connected
		out_active_inputs[i] = *input;
		*out_total_count += 1;
		buf_num_inputs -= 1;
		#if DEBUG >= 3
			PRINT_OUTPUT("  input ", out_active_inputs[i]);
		#endif
		if (buf_num_inputs == 0)
			break;
		i++;
	}

	MediaRosterEx(this)->PublishInputs(node, &list);
	return B_OK;
}


status_t
BMediaRoster::GetAllInputsFor(const media_node& node, media_input* out_inputs,
	int32 buf_num_inputs, int32* out_total_count)
{
	CALLED();
	if (IS_INVALID_NODE(node) || (node.kind & B_BUFFER_CONSUMER) == 0)
		return B_MEDIA_BAD_NODE;
	if (out_inputs == NULL || out_total_count == NULL)
		return B_BAD_VALUE;

	List<media_input> list;
	media_input *input;
	status_t rv;

	*out_total_count = 0;

	rv = MediaRosterEx(this)->GetAllInputs(node, &list);
	if (B_OK != rv)
		return rv;

	PRINT(4, "BMediaRoster::GetAllInputsFor node %" B_PRId32 ", max %" B_PRId32
		"\n", node.node, buf_num_inputs);

	int32 i;
	for (i = 0, list.Rewind(); list.GetNext(&input); i++) {
		out_inputs[i] = *input;
		*out_total_count += 1;
		buf_num_inputs -= 1;
		#if DEBUG >= 3
			PRINT_OUTPUT("  input ", out_inputs[i]);
		#endif
		if (buf_num_inputs == 0)
			break;
	}

	MediaRosterEx(this)->PublishInputs(node, &list);
	return B_OK;
}


status_t
BMediaRoster::GetFreeOutputsFor(const media_node& node,
	media_output* out_free_outputs, int32 buf_num_outputs,
	int32* out_total_count, media_type filter_type)
{
	CALLED();
	if (IS_INVALID_NODE(node) || (node.kind & B_BUFFER_PRODUCER) == 0)
		return B_MEDIA_BAD_NODE;
	if (out_free_outputs == NULL || out_total_count == NULL)
		return B_BAD_VALUE;

	List<media_output> list;
	media_output *output;
	status_t rv;

	*out_total_count = 0;

	rv = MediaRosterEx(this)->GetAllOutputs(node, &list);
	if (B_OK != rv)
		return rv;

	PRINT(4, "BMediaRoster::GetFreeOutputsFor node %" B_PRId32 ", max %"
		B_PRId32 ", filter-type %" B_PRId32 "\n", node.node, buf_num_outputs,
		filter_type);

	int32 i;
	for (i = 0, list.Rewind(); list.GetNext(&output);) {
		if (filter_type != B_MEDIA_UNKNOWN_TYPE
			&& filter_type != output->format.type) {
			// media_type used, but doesn't match
			continue;
		}
		if (output->destination != media_destination::null) {
			// producer destination already connected
			continue;
		}

		out_free_outputs[i] = *output;
		*out_total_count += 1;
		buf_num_outputs -= 1;
		#if DEBUG >= 3
			PRINT_OUTPUT("  output ", out_free_outputs[i]);
		#endif
		if (buf_num_outputs == 0)
			break;
		i++;
	}

	MediaRosterEx(this)->PublishOutputs(node, &list);
	return B_OK;
}


status_t
BMediaRoster::GetConnectedOutputsFor(const media_node& node,
	media_output* out_active_outputs, int32 buf_num_outputs,
	int32* out_total_count)
{
	CALLED();
	if (IS_INVALID_NODE(node) || (node.kind & B_BUFFER_PRODUCER) == 0)
		return B_MEDIA_BAD_NODE;
	if (out_active_outputs == NULL || out_total_count == NULL)
		return B_BAD_VALUE;

	List<media_output> list;
	media_output *output;
	status_t rv;

	*out_total_count = 0;

	rv = MediaRosterEx(this)->GetAllOutputs(node, &list);
	if (B_OK != rv)
		return rv;

	PRINT(4, "BMediaRoster::GetConnectedOutputsFor node %" B_PRId32 ", max %"
		B_PRId32 "\n", node.node, buf_num_outputs);

	int32 i;
	for (i = 0, list.Rewind(); list.GetNext(&output);) {
		if (output->destination == media_destination::null) {
			// producer destination not connected
			continue;
		}
		out_active_outputs[i] = *output;
		*out_total_count += 1;
		buf_num_outputs -= 1;
		#if DEBUG >= 3
			PRINT_OUTPUT("  output ", out_active_outputs[i]);
		#endif
		if (buf_num_outputs == 0)
			break;
		i++;
	}

	MediaRosterEx(this)->PublishOutputs(node, &list);
	return B_OK;
}


status_t
BMediaRoster::GetAllOutputsFor(const media_node& node,
	media_output* out_outputs, int32 buf_num_outputs, int32* out_total_count)
{
	CALLED();
	if (IS_INVALID_NODE(node) || (node.kind & B_BUFFER_PRODUCER) == 0)
		return B_MEDIA_BAD_NODE;
	if (out_outputs == NULL || out_total_count == NULL)
		return B_BAD_VALUE;

	List<media_output> list;
	media_output *output;
	status_t rv;

	*out_total_count = 0;

	rv = MediaRosterEx(this)->GetAllOutputs(node, &list);
	if (B_OK != rv)
		return rv;

	PRINT(4, "BMediaRoster::GetAllOutputsFor node %" B_PRId32 ", max %" B_PRId32
		"\n", node.node, buf_num_outputs);

	int32 i;
	for (i = 0, list.Rewind(); list.GetNext(&output); i++) {
		out_outputs[i] = *output;
		*out_total_count += 1;
		buf_num_outputs -= 1;
		#if DEBUG >= 3
			PRINT_OUTPUT("  output ", out_outputs[i]);
		#endif
		if (buf_num_outputs == 0)
			break;
	}

	MediaRosterEx(this)->PublishOutputs(node, &list);
	return B_OK;
}


status_t
BMediaRoster::StartWatching(const BMessenger& where)
{
	CALLED();
	if (!where.IsValid()) {
		ERROR("BMediaRoster::StartWatching: messenger invalid!\n");
		return B_BAD_VALUE;
	}
	return BPrivate::media::notifications::Register(where, media_node::null,
		B_MEDIA_WILDCARD);
}


status_t
BMediaRoster::StartWatching(const BMessenger & where, int32 notificationType)
{
	CALLED();
	if (!where.IsValid()) {
		ERROR("BMediaRoster::StartWatching: messenger invalid!\n");
		return B_BAD_VALUE;
	}
	if (!BPrivate::media::notifications::IsValidNotificationRequest(false,
			notificationType)) {
		ERROR("BMediaRoster::StartWatching: notificationType invalid!\n");
		return B_BAD_VALUE;
	}

	// NOTE: we support only explicitly B_MEDIA_SERVER_STARTED/QUIT
	// notifications. This should be cleared in documentation.

	return BPrivate::media::notifications::Register(where, media_node::null,
		notificationType);
}


status_t
BMediaRoster::StartWatching(const BMessenger& where, const media_node& node,
	int32 notificationType)
{
	CALLED();
	if (!where.IsValid()) {
		ERROR("BMediaRoster::StartWatching: messenger invalid!\n");
		return B_BAD_VALUE;
	}
	if (IS_INVALID_NODE(node)) {
		ERROR("BMediaRoster::StartWatching: node invalid!\n");
		return B_MEDIA_BAD_NODE;
	}
	if (!BPrivate::media::notifications::IsValidNotificationRequest(true,
			notificationType)) {
		ERROR("BMediaRoster::StartWatching: notificationType invalid!\n");
		return B_BAD_VALUE;
	}
	return BPrivate::media::notifications::Register(where, node,
		notificationType);
}


status_t
BMediaRoster::StopWatching(const BMessenger& where)
{
	CALLED();
	// messenger may already be invalid, so we don't check this
	return BPrivate::media::notifications::Unregister(where, media_node::null,
		B_MEDIA_WILDCARD);
}


status_t
BMediaRoster::StopWatching(const BMessenger& where, int32 notificationType)
{
	CALLED();
	// messenger may already be invalid, so we don't check this
	if (!BPrivate::media::notifications::IsValidNotificationRequest(false,
			notificationType)) {
		ERROR("BMediaRoster::StopWatching: notificationType invalid!\n");
		return B_BAD_VALUE;
	}
	return BPrivate::media::notifications::Unregister(where, media_node::null,
		notificationType);
}


status_t
BMediaRoster::StopWatching(const BMessenger& where, const media_node& node,
	int32 notificationType)
{
	CALLED();
	// messenger may already be invalid, so we don't check this
	if (IS_INVALID_NODE(node)) {
		ERROR("BMediaRoster::StopWatching: node invalid!\n");
		return B_MEDIA_BAD_NODE;
	}
	if (!BPrivate::media::notifications::IsValidNotificationRequest(true,
			notificationType)) {
		ERROR("BMediaRoster::StopWatching: notificationType invalid!\n");
		return B_BAD_VALUE;
	}
	return BPrivate::media::notifications::Unregister(where, node,
		notificationType);
}


status_t
BMediaRoster::RegisterNode(BMediaNode* node)
{
	CALLED();
	// addon-id = -1 (unused), addon-flavor-id = 0 (unused, too)
	return MediaRosterEx(this)->RegisterNode(node, -1, 0);
}


status_t
BMediaRosterEx::RegisterNode(BMediaNode* node, media_addon_id addOnID,
	int32 flavorID)
{
	CALLED();
	if (node == NULL)
		return B_BAD_VALUE;

	// some sanity check
	// I'm not sure if the media kit warrants to call BMediaNode::AddOn() here.
	// Perhaps we don't need it.
	DEBUG_ONLY(
		int32 testFlavorID;
		BMediaAddOn* addon = node->AddOn(&testFlavorID);

		ASSERT(addOnID == (addon != NULL ? addon->AddonID() : -1));
//		ASSERT(flavorID == testFlavorID);
	);

	server_register_node_request request;
	server_register_node_reply reply;

	request.add_on_id = addOnID;
	request.flavor_id = flavorID;
	strcpy(request.name, node->Name());
	request.kinds = node->Kinds();
	request.port = node->ControlPort();
	request.team = BPrivate::current_team();
	request.timesource_id = node->fTimeSourceID;

	TRACE("BMediaRoster::RegisterNode: sending SERVER_REGISTER_NODE: port "
		"%" B_PRId32 ", kinds 0x%" B_PRIx64 ", team %" B_PRId32 ", name '%s'\n",
		request.port, request.kinds, request.team, request.name);

	status_t status = QueryServer(SERVER_REGISTER_NODE, &request,
		sizeof(request), &reply, sizeof(reply));
	if (status != B_OK) {
		ERROR("BMediaRoster::RegisterNode: failed to register node %s: %s\n",
			node->Name(), strerror(status));
		return status;
	}

	TRACE("BMediaRoster::RegisterNode: QueryServer SERVER_REGISTER_NODE "
		"finished\n");

	// we are a friend class of BMediaNode and initialize this member variable
	node->fNodeID = reply.node_id;
	ASSERT(reply.node_id == node->Node().node);
	ASSERT(reply.node_id == node->ID());

	// if the BMediaNode also inherits from BTimeSource, we need to call
	// BTimeSource::FinishCreate()
	if ((node->Kinds() & B_TIME_SOURCE) != 0) {
		if (BTimeSource* timeSource = dynamic_cast<BTimeSource*>(node))
			timeSource->FinishCreate();
	}

	// call the callback
	node->NodeRegistered();

	TRACE("BMediaRoster::RegisterNode: NodeRegistered callback finished\n");

	TRACE("BMediaRoster::RegisterNode: publishing inputs/outputs\n");

	// register existing inputs and outputs with the
	// media_server, this allows GetLiveNodes() to work
	// with created, but unconnected nodes.
	// The node control loop might not be running, or might deadlock
	// if we send a message and wait for a reply here.
	// We have a pointer to the node, and thus call the functions directly

	if ((node->Kinds() & B_BUFFER_PRODUCER) != 0) {
		if (BBufferProducer* producer = dynamic_cast<BBufferProducer*>(node)) {
			List<media_output> list;
			if (GetAllOutputs(producer, &list) == B_OK)
				PublishOutputs(node->Node(), &list);
		}
	}
	if ((node->Kinds() & B_BUFFER_CONSUMER) != 0) {
		if (BBufferConsumer* consumer = dynamic_cast<BBufferConsumer*>(node)) {
			List<media_input> list;
			if (GetAllInputs(consumer, &list) == B_OK)
				PublishInputs(node->Node(), &list);
		}
	}

	TRACE("BMediaRoster::RegisterNode: sending NodesCreated\n");

	BPrivate::media::notifications::NodesCreated(&reply.node_id, 1);

	TRACE("BMediaRoster::RegisterNode: finished\n");

/*
	TRACE("BMediaRoster::RegisterNode: registered node name '%s', id %ld,
		addon %ld, flavor %ld\n", node->Name(), node->ID(), addOnID, flavorID);
	TRACE("BMediaRoster::RegisterNode: node this               %p\n", node);
	TRACE("BMediaRoster::RegisterNode: node fConsumerThis      %p\n",
		node->fConsumerThis);
	TRACE("BMediaRoster::RegisterNode: node fProducerThis      %p\n",
		node->fProducerThis);
	TRACE("BMediaRoster::RegisterNode: node fFileInterfaceThis %p\n",
		node->fFileInterfaceThis);
	TRACE("BMediaRoster::RegisterNode: node fControllableThis  %p\n",
		node->fControllableThis);
	TRACE("BMediaRoster::RegisterNode: node fTimeSourceThis    %p\n",
		node->fTimeSourceThis);
*/
	return B_OK;
}


status_t
BMediaRoster::UnregisterNode(BMediaNode* node)
{
	CALLED();
	if (node == NULL)
		return B_BAD_VALUE;

	TRACE("BMediaRoster::UnregisterNode %"
		B_PRId32 " (%p)\n", node->ID(), node);

	if ((node->fKinds & NODE_KIND_NO_REFCOUNTING) !=0) {
		TRACE("BMediaRoster::UnregisterNode, trying to unregister reference "
			"counting disabled timesource, node %"
			B_PRId32 " , port %" B_PRId32 " , team %" B_PRId32 "\n",
			node->ID(), node->ControlPort(), BPrivate::current_team());
		return B_OK;
	}
	if (node->ID() == NODE_UNREGISTERED_ID) {
		PRINT(1, "Warning: BMediaRoster::UnregisterNode: node id %" B_PRId32
			", name '%s' already unregistered\n", node->ID(), node->Name());
		return B_OK;
	}
	if (node->fRefCount != 0) {
		PRINT(1, "Warning: BMediaRoster::UnregisterNode: node id %" B_PRId32
			", name '%s' has local reference count of %" B_PRId32 "\n",
			node->ID(), node->Name(), node->fRefCount);
		// no return here, we continue and unregister!
	}

	// Calling BMediaAddOn::GetConfigurationFor(BMediaNode *node,
	// BMessage *config) if this node was instanciated by an add-on needs to
	// be done *somewhere*
	// We can't do it here because it is already to late (destructor of the node
	// might have been called).

	server_unregister_node_request request;
	request.node_id = node->ID();
	request.team = BPrivate::current_team();

	// send a notification
	BPrivate::media::notifications::NodesDeleted(&request.node_id, 1);

	server_unregister_node_reply reply;
	reply.add_on_id = -1;
	status_t status = QueryServer(SERVER_UNREGISTER_NODE, &request,
		sizeof(request), &reply, sizeof(reply));
	if (status != B_OK) {
		ERROR("BMediaRoster::UnregisterNode: failed to unregister node id %"
			B_PRId32 ", name '%s': %s\n", node->ID(), node->Name(),
			strerror(status));
		BMediaAddOn *addon = node->AddOn(&reply.flavor_id);
		if (addon != NULL)
			reply.add_on_id = addon->AddonID();
	}

	if (reply.add_on_id != -1) {
		// TODO: this doesn't look right
		// Small problem here, we can't use DormantNodeManager::PutAddOn(), as
		// UnregisterNode() is called by a dormant node itself (by the
		// destructor).
		// The add-on that contains the node needs to remain in memory until the
		// destructor execution is finished.
		// DormantNodeManager::PutAddOnDelayed() will delay unloading.
		gDormantNodeManager->PutAddOnDelayed(reply.add_on_id);

		status = MediaRosterEx(this)->DecrementAddonFlavorInstancesCount(
			reply.add_on_id, reply.flavor_id);
		if (status != B_OK) {
			ERROR("BMediaRoster::UnregisterNode: "
				"DecrementAddonFlavorInstancesCount() failed\n");
			// this is really a problem, but we can't fail now
		}
	}

	// we are a friend class of BMediaNode and invalidate this member variable
	node->fNodeID = NODE_UNREGISTERED_ID;

	return status;
}


//!	Thread safe for multiple calls to Roster()
/*static*/ BMediaRoster*
BMediaRoster::Roster(status_t* out_error)
{
	BAutolock lock(sInitLocker);

	if (be_app == NULL)
		TRACE("Warning! You should have a valid BApplication.");

	if (!lock.IsLocked())
		return NULL;

	if (out_error)
		*out_error = B_OK;

	if (sDefaultInstance == NULL) {
		status_t err;
		sDefaultInstance = new (std::nothrow) BMediaRosterEx(&err);
		if (sDefaultInstance == NULL)
			err = B_NO_MEMORY;
		else if (err != B_OK) {
			if (sDefaultInstance) {
				sDefaultInstance->Lock();
				sDefaultInstance->Quit();
				sDefaultInstance = NULL;
			}
			if (out_error)
				*out_error = err;
		} else if (be_app != NULL) {
			be_app->RegisterLooper(sDefaultInstance);
		}
	}

	return sDefaultInstance;
}


/*static*/ BMediaRoster*
BMediaRoster::CurrentRoster()
{
	return sDefaultInstance;
}


status_t
BMediaRoster::SetTimeSourceFor(media_node_id node, media_node_id time_source)
{
	CALLED();
	if (IS_INVALID_NODEID(node) || IS_INVALID_NODEID(time_source))
		return B_BAD_VALUE;

	media_node clone;
	// We need to get a clone of the node to have a port id
	status_t result = GetNodeFor(node, &clone);
	if (result == B_OK) {
		// We just send the request to set time_source-id as
		// timesource to the node, the NODE_SET_TIMESOURCE handler
		// code will do the real assignment.
		result = B_OK;
		node_set_timesource_command cmd;
		cmd.timesource_id = time_source;
		result = SendToPort(clone.port, NODE_SET_TIMESOURCE,
			&cmd, sizeof(cmd));
		if (result != B_OK) {
			ERROR("BMediaRoster::SetTimeSourceFor"
				"sending NODE_SET_TIMESOURCE failed, node id %"
				B_PRId32 "\n", clone.node);
		}
		// We release the clone
		result = ReleaseNode(clone);
		if (result != B_OK) {
			ERROR("BMediaRoster::SetTimeSourceFor, ReleaseNode failed,"
				" node id %" B_PRId32 "\n", clone.node);
		}
	} else {
		ERROR("BMediaRoster::SetTimeSourceFor GetCloneForID failed, "
			"node id %" B_PRId32 "\n", node);
	}

	if (result == B_OK) {
		// Notify the server
		server_set_node_timesource_request request;
		server_set_node_timesource_reply reply;

		request.node_id = node;
		request.timesource_id = time_source;

		result = QueryServer(SERVER_SET_NODE_TIMESOURCE, &request,
			sizeof(request), &reply, sizeof(reply));
		if (result != B_OK) {
			ERROR("BMediaRoster::SetTimeSourceFor, sending NODE_SET_TIMESOURCE "
				"failed, node id %" B_PRId32 "\n", node);
		} else {
			TRACE("BMediaRoster::SetTimeSourceFor: node %" B_PRId32 " time source %"
				B_PRId32 " OK\n", node, time_source);
		}
	}
	return result;
}


status_t
BMediaRoster::GetParameterWebFor(const media_node& node, BParameterWeb** _web)
{
	CALLED();
	if (_web == NULL)
		return B_BAD_VALUE;
	if (IS_INVALID_NODE(node))
		return B_MEDIA_BAD_NODE;
	if ((node.kind & B_CONTROLLABLE) == 0)
		return B_MEDIA_BAD_NODE;

	controllable_get_parameter_web_request request;
	controllable_get_parameter_web_reply reply;
	int32 requestsize[] = {B_PAGE_SIZE, 4 * B_PAGE_SIZE, 16 * B_PAGE_SIZE,
		64 * B_PAGE_SIZE, 128 * B_PAGE_SIZE, 256 * B_PAGE_SIZE, 0};
	int32 size;

	// TODO: it might be better to query the node for the (current) parameter
	// size first
	for (int i = 0; (size = requestsize[i]) != 0; i++) {
		status_t rv;
		area_id area;
		void *data;
		area = create_area("parameter web data", &data, B_ANY_ADDRESS, size,
			B_NO_LOCK, B_READ_AREA | B_WRITE_AREA | B_CLONEABLE_AREA);
		if (area < B_OK) {
			ERROR("BMediaRoster::GetParameterWebFor couldn't create area of "
				"size %" B_PRId32 "\n", size);
			return B_ERROR;
		}
		request.max_size = size;
		request.area = area;
		rv = QueryPort(node.port, CONTROLLABLE_GET_PARAMETER_WEB, &request,
			sizeof(request), &reply, sizeof(reply));
		if (rv != B_OK) {
			ERROR("BMediaRoster::GetParameterWebFor "
				"CONTROLLABLE_GET_PARAMETER_WEB failed\n");
			delete_area(area);
			return B_ERROR;
		}
		if (reply.size == 0) {
			// no parameter web available
			// TODO: should we return an error?
			ERROR("BMediaRoster::GetParameterWebFor node %" B_PRId32
				" has no parameter web\n", node.node);
			*_web = new (std::nothrow) BParameterWeb();
			delete_area(area);
			return *_web != NULL ? B_OK : B_NO_MEMORY;
		}
		if (reply.size > 0) {
			// we got a flattened parameter web!
			BParameterWeb* web = new (std::nothrow) BParameterWeb();
			if (web == NULL)
				rv = B_NO_MEMORY;
			else {
				rv = web->Unflatten(reply.code, data, reply.size);
				if (rv != B_OK) {
					ERROR("BMediaRoster::GetParameterWebFor Unflatten failed, "
						"%s\n", strerror(rv));
					delete web;
				} else
					*_web = web;
			}

			delete_area(area);
			return rv;
		}
		delete_area(area);
		ASSERT(reply.size == -1);
		// parameter web data was too large
		// loop and try a larger size
	}
	ERROR("BMediaRoster::GetParameterWebFor node %" B_PRId32 " has no "
		"parameter web larger than %" B_PRId32 "\n", node.node, size);
	return B_ERROR;
}


status_t
BMediaRoster::StartControlPanel(const media_node& node, BMessenger* _messenger)
{
	CALLED();

	controllable_start_control_panel_request request;
	controllable_start_control_panel_reply reply;

	request.node = node;

	status_t rv;
	rv = QueryPort(node.port, CONTROLLABLE_START_CONTROL_PANEL, &request,
		sizeof(request), &reply, sizeof(reply));
	if (rv != B_OK)
		return rv;

	if (reply.team != -1 && _messenger != NULL)
		*_messenger = BMessenger(NULL, reply.team);

	return B_OK;
}


status_t
BMediaRoster::GetDormantNodes(dormant_node_info* _info, int32* _count,
	const media_format* hasInput, const media_format* hasOutput,
	const char* name, uint64 requireKinds, uint64 denyKinds)
{
	CALLED();
	if (_info == NULL || _count == NULL || *_count <= 0)
		return B_BAD_VALUE;

	server_get_dormant_nodes_request request;
	request.max_count = *_count;
	request.has_input = hasInput != NULL;
	if (hasInput != NULL) {
		// TODO: we should not make a flat copy of media_format
		request.input_format = *hasInput;
	}
	request.has_output = hasOutput != NULL;
	if (hasOutput != NULL) {
		// TODO: we should not make a flat copy of media_format
		request.output_format = *hasOutput;
	}

	request.has_name = name != NULL;
	if (name != NULL)
		strlcpy(request.name, name, sizeof(request.name));

	request.require_kinds = requireKinds;
	request.deny_kinds = denyKinds;

	server_get_dormant_nodes_reply reply;
	status_t status = QueryServer(SERVER_GET_DORMANT_NODES, &request,
		sizeof(request), &reply, sizeof(reply));
	if (status != B_OK)
		return status;

	*_count = reply.count;

	if (reply.count > 0) {
		int32 code;
		status = read_port(request.reply_port, &code, _info,
			reply.count * sizeof(dormant_node_info));
		if (status < B_OK)
			reply.result = status;
	}

	return reply.result;
}


/*!	This function is used to do the real work of instantiating a dormant node.
	It is either called by the media_addon_server to instantiate a global node,
	or it gets called from BMediaRoster::InstantiateDormantNode() to create a
	local one.

	Checks concerning global/local are not done here.
*/
status_t
BMediaRosterEx::InstantiateDormantNode(media_addon_id addonID, int32 flavorID,
	team_id creator, media_node *_node)
{
	// This function is always called from the correct context, if the node
	// is supposed to be global, it is called from the media_addon_server.

	// if B_FLAVOR_IS_GLOBAL, we need to use the BMediaAddOn object that
	// resides in the media_addon_server

	// RegisterNode() must be called for nodes instantiated from add-ons,
	// since the media kit warrants that it's done automatically.

	// addonID		Indicates the ID number of the media add-on in which the
	//				node resides.
	// flavorID		Indicates the internal ID number that the add-on uses to
	//				identify the flavor, this is the number that was published
	//				by BMediaAddOn::GetFlavorAt() in the
	//				flavor_info::internal_id field.
	// creator		The creator team is -1 if nodes are created locally. If
	//				created globally, it will contain (while called in
	//				media_addon_server context) the team-id of the team that
	//				requested the instantiation.

	TRACE("BMediaRosterEx::InstantiateDormantNode: addonID %" B_PRId32
		", flavorID %" B_PRId32 "\n", addonID, flavorID);

	// Get flavor_info from the server
	dormant_flavor_info info;
	status_t rv;
	rv = GetDormantFlavorInfo(addonID, flavorID, &info);
	if (rv != B_OK) {
		ERROR("BMediaRosterEx::InstantiateDormantNode error: failed to get "
			"dormant_flavor_info for addon-id %" B_PRId32 ", flavor-id %"
			B_PRId32 "\n", addonID, flavorID);
		return B_ERROR;
	}

	ASSERT(info.internal_id == flavorID);

	// load the BMediaAddOn object
	BMediaAddOn* addon = gDormantNodeManager->GetAddOn(addonID);
	if (addon == NULL) {
		ERROR("BMediaRosterEx::InstantiateDormantNode: GetAddon failed\n");
		return B_ERROR;
	}

	// Now we need to try to increment the use count of this addon flavor
	// in the server. This can fail if the total number instances of this
	// flavor is limited.
	rv = IncrementAddonFlavorInstancesCount(addonID, flavorID);
	if (rv != B_OK) {
		ERROR("BMediaRosterEx::InstantiateDormantNode error: can't create "
			"more nodes for addon-id %" B_PRId32 ", flavor-id %" B_PRId32 "\n",
			addonID, flavorID);
		// Put the addon back into the pool
		gDormantNodeManager->PutAddOn(addonID);
		return B_ERROR;
	}

	BMessage config;
	rv = LoadNodeConfiguration(addonID, flavorID, &config);
	if (rv != B_OK) {
		ERROR("BMediaRosterEx::InstantiateDormantNode: couldn't load "
			"configuration for addon-id %" B_PRId32 ", flavor-id %" B_PRId32
			"\n", addonID, flavorID);
		// do not return, this is a minor problem, not a reason to fail
	}

	status_t status = B_OK;
	BMediaNode* node = addon->InstantiateNodeFor(&info, &config, &status);
	if (node == NULL) {
		ERROR("BMediaRosterEx::InstantiateDormantNode: InstantiateNodeFor "
			"failed\n");

		// Put the addon back into the pool
		gDormantNodeManager->PutAddOn(addonID);

		// We must decrement the use count of this addon flavor in the
		// server to compensate the increment done in the beginning.
		rv = DecrementAddonFlavorInstancesCount(addonID, flavorID);
		if (rv != B_OK) {
			ERROR("BMediaRosterEx::InstantiateDormantNode: DecrementAddon"
				"FlavorInstancesCount failed\n");
		}
		return status != B_OK ? status : B_ERROR;
	}

	rv = RegisterNode(node, addonID, flavorID);
	if (rv != B_OK) {
		ERROR("BMediaRosterEx::InstantiateDormantNode: RegisterNode failed\n");
		delete node;
		// Put the addon back into the pool
		gDormantNodeManager->PutAddOn(addonID);
		// We must decrement the use count of this addon flavor in the
		// server to compensate the increment done in the beginning.
		rv = DecrementAddonFlavorInstancesCount(addonID, flavorID);
		if (rv != B_OK) {
			ERROR("BMediaRosterEx::InstantiateDormantNode: DecrementAddon"
				"FlavorInstancesCount failed\n");
		}
		return B_ERROR;
	}

	if (creator != -1) {
		// send a message to the server to assign team "creator" as creator
		// of node "node->ID()"
		printf("!!! BMediaRosterEx::InstantiateDormantNode assigning team %"
			B_PRId32 " as creator of node %" B_PRId32 "\n", creator,
			node->ID());

		rv = MediaRosterEx(this)->SetNodeCreator(node->ID(), creator);
		if (rv != B_OK) {
			ERROR("BMediaRosterEx::InstantiateDormantNode failed to assign "
				"team %" B_PRId32 " as creator of node %" B_PRId32 "\n",
				creator, node->ID());
			// do not return, this is a minor problem, not a reason to fail
		}
	}

	// RegisterNode() does remember the add-on id in the server
	// and UnregisterNode() will call DormantNodeManager::PutAddon()
	// when the node is unregistered.

	*_node = node->Node();

	TRACE("BMediaRosterEx::InstantiateDormantNode: addon-id %" B_PRId32
		", flavor_id %" B_PRId32 " instanciated as node %" B_PRId32 ", port %"
		B_PRId32 " in team %" B_PRId32 "\n", addonID, flavorID, _node->node,
		_node->port, BPrivate::current_team());

	return B_OK;
}


status_t
BMediaRoster::InstantiateDormantNode(const dormant_node_info& info,
	media_node* _node, uint32 flags)
{
	CALLED();
	if (_node == NULL)
		return B_BAD_VALUE;
	if (info.addon <= B_OK) {
		ERROR("BMediaRoster::InstantiateDormantNode error: addon-id %" B_PRId32
			" invalid.\n", info.addon);
		return B_BAD_VALUE;
	}

	printf("BMediaRoster::InstantiateDormantNode: addon-id %" B_PRId32
		", flavor_id %" B_PRId32 ", flags 0x%" B_PRIx32 "\n", info.addon,
		info.flavor_id, flags);

	// Get flavor_info from the server
	// TODO: this is a little overhead, as we get the full blown
	// dormant_flavor_info,
	// TODO: but only need the flags.
	dormant_flavor_info flavorInfo;
	status_t rv;
	rv = MediaRosterEx(this)->GetDormantFlavorInfo(info.addon, info.flavor_id,
		&flavorInfo);
	if (rv != B_OK) {
		ERROR("BMediaRoster::InstantiateDormantNode: failed to get "
			"dormant_flavor_info for addon-id %" B_PRId32 ", flavor-id %"
			B_PRId32 "\n", info.addon, info.flavor_id);
		return B_NAME_NOT_FOUND;
	}

	ASSERT(flavorInfo.internal_id == info.flavor_id);

#if DEBUG
	printf("BMediaRoster::InstantiateDormantNode: name \"%s\", info \"%s\", "
		"flavor_flags 0x%" B_PRIx32 ", internal_id %" B_PRId32
		", possible_count %" B_PRId32 "\n", flavorInfo.name, flavorInfo.info,
		flavorInfo.flavor_flags, flavorInfo.internal_id,
		flavorInfo.possible_count);

	if ((flags & B_FLAVOR_IS_LOCAL) != 0) {
		printf("BMediaRoster::InstantiateDormantNode: caller requested "
			"B_FLAVOR_IS_LOCAL\n");
	}
	if ((flags & B_FLAVOR_IS_GLOBAL) != 0) {
		printf("BMediaRoster::InstantiateDormantNode: caller requested "
			"B_FLAVOR_IS_GLOBAL\n");
	}
	if ((flavorInfo.flavor_flags & B_FLAVOR_IS_LOCAL) != 0) {
		printf("BMediaRoster::InstantiateDormantNode: node requires "
			"B_FLAVOR_IS_LOCAL\n");
	}
	if ((flavorInfo.flavor_flags & B_FLAVOR_IS_GLOBAL) != 0) {
		printf("BMediaRoster::InstantiateDormantNode: node requires "
			"B_FLAVOR_IS_GLOBAL\n");
	}
#endif

	// Make sure that flags demanded by the dormant node and those requested
	// by the caller are not incompatible.
	if ((flavorInfo.flavor_flags & B_FLAVOR_IS_GLOBAL) != 0
		&& (flags & B_FLAVOR_IS_LOCAL) != 0) {
		ERROR("BMediaRoster::InstantiateDormantNode: requested "
			"B_FLAVOR_IS_LOCAL, but dormant node has B_FLAVOR_IS_GLOBAL\n");
		return B_NAME_NOT_FOUND;
	}
	if ((flavorInfo.flavor_flags & B_FLAVOR_IS_LOCAL) != 0
		&& (flags & B_FLAVOR_IS_GLOBAL) != 0) {
		ERROR("BMediaRoster::InstantiateDormantNode: requested "
			"B_FLAVOR_IS_GLOBAL, but dormant node has B_FLAVOR_IS_LOCAL\n");
		return B_NAME_NOT_FOUND;
	}

	// If either the node, or the caller requested to make the instance global
	// we will do it by forwarding this request into the media_addon_server,
	// which in turn will call BMediaRosterEx::InstantiateDormantNode to create
	// the node there and make it globally available.
	if ((flavorInfo.flavor_flags & B_FLAVOR_IS_GLOBAL) != 0
		|| (flags & B_FLAVOR_IS_GLOBAL) != 0) {
		TRACE("BMediaRoster::InstantiateDormantNode: creating global object "
			"in media_addon_server\n");

		add_on_server_instantiate_dormant_node_request request;
		add_on_server_instantiate_dormant_node_reply reply;
		request.add_on_id = info.addon;
		request.flavor_id = info.flavor_id;
		request.creator_team = BPrivate::current_team();
			// creator team is allowed to also release global nodes
		rv = QueryAddOnServer(ADD_ON_SERVER_INSTANTIATE_DORMANT_NODE, &request,
			sizeof(request), &reply, sizeof(reply));
		if (rv == B_OK)
			*_node = reply.node;
	} else {
		// creator team = -1, as this is a local node
		rv = MediaRosterEx(this)->InstantiateDormantNode(info.addon,
			info.flavor_id, -1, _node);
	}
	if (rv != B_OK) {
		*_node = media_node::null;
		return B_NAME_NOT_FOUND;
	}
	return B_OK;
}


status_t
BMediaRoster::InstantiateDormantNode(const dormant_node_info& info,
	media_node* _node)
{
	return InstantiateDormantNode(info, _node, 0);
}


status_t
BMediaRoster::GetDormantNodeFor(const media_node& node,
	dormant_node_info* _info)
{
	CALLED();
	if (_info == NULL)
		return B_BAD_VALUE;
	if (IS_INVALID_NODE(node))
		return B_MEDIA_BAD_NODE;

	server_get_dormant_node_for_request request;
	server_get_dormant_node_for_reply reply;
	status_t rv;

	request.node = node;

	rv = QueryServer(SERVER_GET_DORMANT_NODE_FOR, &request, sizeof(request),
		&reply, sizeof(reply));
	if (rv != B_OK)
		return rv;

	*_info = reply.node_info;
	return B_OK;
}


status_t
BMediaRosterEx::GetDormantFlavorInfo(media_addon_id addonID, int32 flavorID,
	dormant_flavor_info* _flavor)
{
	CALLED();
	if (_flavor == NULL)
		return B_BAD_VALUE;

	// TODO: better use an area here as well!

	server_get_dormant_flavor_info_reply* reply
		= (server_get_dormant_flavor_info_reply*)malloc(16300);
	if (reply == NULL)
		return B_NO_MEMORY;

	server_get_dormant_flavor_info_request request;
	request.add_on_id = addonID;
	request.flavor_id = flavorID;

	status_t status = QueryServer(SERVER_GET_DORMANT_FLAVOR_INFO, &request,
		sizeof(request), reply, 16300);
	if (status != B_OK) {
		free(reply);
		return status;
	}

	if (reply->result == B_OK) {
		status = _flavor->Unflatten(reply->type, &reply->flattened_data,
			reply->flattened_size);
	} else
		status = reply->result;

	free(reply);
	return status;
}


status_t
BMediaRoster::GetDormantFlavorInfoFor(const dormant_node_info& dormant,
	dormant_flavor_info* _flavor)
{
	return MediaRosterEx(this)->GetDormantFlavorInfo(dormant.addon,
		dormant.flavor_id, _flavor);
}


// Reports in outLatency the maximum latency found downstream from
// the specified BBufferProducer, producer, given the current connections.
status_t
BMediaRoster::GetLatencyFor(const media_node& producer, bigtime_t* _latency)
{
	CALLED();
	if (_latency == NULL)
		return B_BAD_VALUE;
	if (IS_INVALID_NODE(producer)
		|| (producer.kind & B_BUFFER_PRODUCER) == 0)
		return B_MEDIA_BAD_NODE;

	producer_get_latency_request request;
	producer_get_latency_reply reply;
	status_t rv;

	rv = QueryPort(producer.port, PRODUCER_GET_LATENCY, &request,
		sizeof(request), &reply, sizeof(reply));
	if (rv != B_OK)
		return rv;

	*_latency = reply.latency;

//	printf("BMediaRoster::GetLatencyFor producer %ld has maximum latency %lld\n", producer.node, *out_latency);
	return B_OK;
}


status_t
BMediaRoster::GetInitialLatencyFor(const media_node& producer,
	bigtime_t* _latency, uint32* _flags)
{
	CALLED();
	if (_latency == NULL)
		return B_BAD_VALUE;
	if (IS_INVALID_NODE(producer)
		|| (producer.kind & B_BUFFER_PRODUCER) == 0)
		return B_MEDIA_BAD_NODE;

	producer_get_initial_latency_request request;
	producer_get_initial_latency_reply reply;
	status_t rv;

	rv = QueryPort(producer.port, PRODUCER_GET_INITIAL_LATENCY, &request,
		sizeof(request), &reply, sizeof(reply));
	if (rv != B_OK)
		return rv;

	*_latency = reply.initial_latency;
	if (_flags != NULL)
		*_flags = reply.flags;

	TRACE("BMediaRoster::GetInitialLatencyFor producer %" B_PRId32 " has "
		"maximum initial latency %" B_PRId64 "\n", producer.node, *_latency);
	return B_OK;
}


status_t
BMediaRoster::GetStartLatencyFor(const media_node& timeSource,
	bigtime_t* _latency)
{
	CALLED();
	if (_latency == NULL)
		return B_BAD_VALUE;
	if (IS_INVALID_NODE(timeSource)
		|| (timeSource.kind & B_TIME_SOURCE) == 0)
		return B_MEDIA_BAD_NODE;

	timesource_get_start_latency_request request;
	timesource_get_start_latency_reply reply;
	status_t rv;

	rv = QueryPort(timeSource.port, TIMESOURCE_GET_START_LATENCY, &request,
		sizeof(request), &reply, sizeof(reply));
	if (rv != B_OK)
		return rv;

	*_latency = reply.start_latency;

	TRACE("BMediaRoster::GetStartLatencyFor timesource %" B_PRId32 " has "
		"maximum initial latency %" B_PRId64 "\n", timeSource.node, *_latency);
	return B_OK;
}


status_t
BMediaRoster::GetFileFormatsFor(const media_node& fileInterface,
	media_file_format* _formats, int32* _numFormats)
{
	CALLED();

	if (IS_INVALID_NODE(fileInterface)
		|| (fileInterface.kind & B_FILE_INTERFACE) == 0)
		return B_MEDIA_BAD_NODE;

	if (_numFormats == NULL || *_numFormats < 1)
		return B_BAD_VALUE;

	fileinterface_get_formats_request request;
	fileinterface_get_formats_reply reply;

	media_file_format* formats;
	size_t needSize = sizeof(media_file_format) * *_numFormats;
	size_t size = (needSize + (B_PAGE_SIZE - 1)) & ~(B_PAGE_SIZE - 1);

	area_id area = create_area("formats area", (void**)&formats,
		B_ANY_ADDRESS, size, B_NO_LOCK,
		B_READ_AREA | B_WRITE_AREA);

	if (area < 0)
		return B_NO_MEMORY;

	request.num_formats = *_numFormats;
	request.data_area = area;

	status_t status = QueryPort(fileInterface.port,
		FILEINTERFACE_GET_FORMATS, &request,
		sizeof(request), &reply, sizeof(reply));

	if (status == B_OK) {
		memcpy(_formats, formats, sizeof(media_file_format)*reply.filled_slots);
		*_numFormats = reply.filled_slots;
	}
	delete_area(area);
	return status;
}


status_t
BMediaRoster::SetRefFor(const media_node& file_interface, const entry_ref& file,
	bool createAndTruncate, bigtime_t* _length)
{
	CALLED();

	if (IS_INVALID_NODE(file_interface)
		|| (file_interface.kind & B_FILE_INTERFACE) == 0)
		return B_MEDIA_BAD_NODE;

	fileinterface_set_ref_request request;
	fileinterface_set_ref_reply reply;
	status_t rv;

	request.device = file.device;
	request.directory = file.directory;
	strcpy(request.name, file.name);
	request.create = createAndTruncate;
	if (_length != NULL)
		request.duration = *_length;

	rv = QueryPort(file_interface.port, FILEINTERFACE_SET_REF, &request,
		sizeof(request), &reply, sizeof(reply));
	if (rv != B_OK)
		return rv;

	if (!createAndTruncate && _length)
		*_length = reply.duration;

	return B_OK;
}


status_t
BMediaRoster::GetRefFor(const media_node& node, entry_ref* _file,
	BMimeType* mimeType)
{
	CALLED();

	if (IS_INVALID_NODE(node)
		|| (node.kind & B_FILE_INTERFACE) == 0)
		return B_MEDIA_BAD_NODE;

	if (!_file)
		return B_BAD_VALUE;

	fileinterface_get_ref_request request;
	fileinterface_get_ref_reply reply;
	status_t rv;

	rv = QueryPort(node.port, FILEINTERFACE_GET_REF, &request, sizeof(request),
		&reply, sizeof(reply));
	if (rv != B_OK)
		return rv;

	*_file = entry_ref(reply.device, reply.directory, reply.name);

	if (mimeType)
		mimeType->SetTo(reply.mimetype);

	return B_OK;
}


status_t
BMediaRoster::SniffRefFor(const media_node& file_interface,
	const entry_ref& file, BMimeType* mimeType, float* _capability)
{
	CALLED();

	if (IS_INVALID_NODE(file_interface)
		|| (file_interface.kind & B_FILE_INTERFACE) == 0)
		return B_MEDIA_BAD_NODE;

	if (mimeType == NULL || _capability == NULL)
		return B_BAD_VALUE;

	fileinterface_sniff_ref_request request;
	fileinterface_sniff_ref_reply reply;
	status_t rv;

	request.device = file.device;
	request.directory = file.directory;
	strcpy(request.name, file.name);

	rv = QueryPort(file_interface.port, FILEINTERFACE_SNIFF_REF, &request,
		sizeof(request), &reply, sizeof(reply));
	if (rv != B_OK)
		return rv;

	mimeType->SetTo(reply.mimetype);
	*_capability = reply.capability;

	return B_OK;
}


/*!	This is the generic "here's a file, now can someone please play it"
	interface.
*/
status_t
BMediaRoster::SniffRef(const entry_ref& file, uint64 requireNodeKinds,
	dormant_node_info* _node, BMimeType* mimeType)
{
	CALLED();

	TRACE("BMediaRoster::SniffRef looking for a node to handle %s: 0x%" B_PRIx64
		"\n", file.name, requireNodeKinds);

	if (_node == NULL)
		return B_BAD_VALUE;

	BMimeType aMimeType;

	dormant_node_info nodes[30];
	int32 count = 30;
	int32 highestCapability = -1;
	float capability;

	media_node node;

	// Get all dormant nodes using GetDormantNodes
	if (GetDormantNodes(nodes, &count, NULL, NULL, NULL, requireNodeKinds | B_FILE_INTERFACE, 0) == B_OK) {
		// Call SniffRefFor on each node that matches requireNodeKinds
		for (int32 i=0;i<count;i++) {
			if (InstantiateDormantNode(nodes[i], &node) == B_OK) {

				if (SniffRefFor(node, file, &aMimeType, &capability) == B_OK) {
					// find the first node that has 100% capability
					TRACE("%s has a %f%% chance of playing file\n",nodes[i].name, capability * 100.0);
					if (capability == 1.0) {
						highestCapability = i;
						break;
					}
				}
				ReleaseNode(node);
			}
		}

		if (highestCapability != -1) {
			*_node = nodes[highestCapability];

			TRACE("BMediaRoster::SniffRef: found a node %s addon-id %" B_PRId32
				", flavor_id %" B_PRId32 "\n",
			nodes[highestCapability].name, nodes[highestCapability].addon,
				nodes[highestCapability].flavor_id);

			if (mimeType != NULL) {
				//*mimeType = aMimeType; -- need a copy constructor
			}

			return B_OK;
		}

	}

	return B_ERROR;
}


status_t
BMediaRoster::GetDormantNodeForType(const BMimeType& type,
	uint64 requireNodeKinds, dormant_node_info* _node)
{
	UNIMPLEMENTED();
	return B_ERROR;
}


status_t
BMediaRoster::GetReadFileFormatsFor(const dormant_node_info& node,
	media_file_format* _readFormats, int32 readCount, int32* _readCount)
{
	UNIMPLEMENTED();
	return B_ERROR;
}


status_t
BMediaRoster::GetWriteFileFormatsFor(const dormant_node_info& node,
	media_file_format* _write_formats, int32 writeCount, int32* _writeCount)
{
	UNIMPLEMENTED();
	return B_ERROR;
}


status_t
BMediaRoster::GetFormatFor(const media_output& output, media_format* _format,
	uint32 flags)
{
	CALLED();
	if (_format == NULL)
		return B_BAD_VALUE;
	if ((output.node.kind & B_BUFFER_PRODUCER) == 0)
		return B_MEDIA_BAD_NODE;
	if (IS_INVALID_SOURCE(output.source))
		return B_MEDIA_BAD_SOURCE;

	producer_format_suggestion_requested_request request;
	producer_format_suggestion_requested_reply reply;
	status_t rv;

	request.type = B_MEDIA_UNKNOWN_TYPE;
	request.quality = 0; // TODO: what should this be?

	rv = QueryPort(output.source.port, PRODUCER_FORMAT_SUGGESTION_REQUESTED,
		&request, sizeof(request), &reply, sizeof(reply));
	if (rv != B_OK)
		return rv;

	*_format = reply.format;
	return B_OK;
}


status_t
BMediaRoster::GetFormatFor(const media_input& input, media_format* _format,
	uint32 flags)
{
	CALLED();
	if (_format == NULL)
		return B_BAD_VALUE;
	if ((input.node.kind & B_BUFFER_CONSUMER) == 0)
		return B_MEDIA_BAD_NODE;
	if (IS_INVALID_DESTINATION(input.destination))
		return B_MEDIA_BAD_DESTINATION;

	consumer_accept_format_request request;
	consumer_accept_format_reply reply;
	status_t rv;

	request.dest = input.destination;
	request.format.Clear(); // wildcard

	rv = QueryPort(input.destination.port, CONSUMER_ACCEPT_FORMAT, &request,
		sizeof(request), &reply, sizeof(reply));
	if (rv != B_OK)
		return rv;

	*_format = reply.format;
	return B_OK;
}


status_t
BMediaRoster::GetFormatFor(const media_node& node, media_format* _format,
	float quality)
{
	UNIMPLEMENTED();
	if (_format == NULL)
		return B_BAD_VALUE;
	if (IS_INVALID_NODE(node))
		return B_MEDIA_BAD_NODE;
	if ((node.kind & (B_BUFFER_CONSUMER | B_BUFFER_PRODUCER)) == 0)
		return B_MEDIA_BAD_NODE;

	return B_ERROR;
}


ssize_t
BMediaRoster::GetNodeAttributesFor(const media_node& node,
	media_node_attribute* _array, size_t maxCount)
{
	CALLED();

	if (IS_INVALID_NODE(node))
		return B_MEDIA_BAD_NODE;

	node_get_attributes_for_request request;
	node_get_attributes_for_reply reply;
	status_t status;

	media_node_attribute* addr = NULL;
	size_t totalSize = maxCount*sizeof(media_node_attribute);
	size_t size = (totalSize + (B_PAGE_SIZE - 1)) & ~(B_PAGE_SIZE - 1);

	area_id dataArea = create_area("attributes area", (void**)&addr,
		B_ANY_ADDRESS, size, B_NO_LOCK,
		B_READ_AREA | B_WRITE_AREA);
	// No need to memset the padding
	memset(addr, 0, totalSize);

	if (dataArea < 0)
		return B_NO_MEMORY;

	request.count = maxCount;
	request.area = dataArea;

	status = QueryPort(node.port, NODE_GET_ATTRIBUTES_FOR, &request,
		sizeof(request), &reply, sizeof(reply));
	if (status != B_OK)
		return status;

	memcpy(_array, addr, reply.filled_count
		* sizeof(media_node_attribute));

	delete_area(dataArea);
	return reply.filled_count;
}


media_node_id
BMediaRoster::NodeIDFor(port_id port)
{
	CALLED();

	server_node_id_for_request request;
	server_node_id_for_reply reply;
	status_t rv;

	request.port = port;

	rv = QueryServer(SERVER_NODE_ID_FOR, &request, sizeof(request), &reply,
		sizeof(reply));
	if (rv != B_OK) {
		ERROR("BMediaRoster::NodeIDFor: failed (error %#" B_PRIx32 ")\n", rv);
		return -1;
	}

	return reply.node_id;
}


status_t
BMediaRoster::GetInstancesFor(media_addon_id addon, int32 flavor,
	media_node_id* _id, int32* _count)
{
	CALLED();
	if (_id == NULL)
		return B_BAD_VALUE;
	if (_count && *_count <= 0)
		return B_BAD_VALUE;

	server_get_instances_for_request request;
	server_get_instances_for_reply reply;
	status_t rv;

	request.max_count = (_count ? *_count : 1);
	request.add_on_id = addon;
	request.flavor_id = flavor;

	rv = QueryServer(SERVER_GET_INSTANCES_FOR, &request, sizeof(request),
		&reply, sizeof(reply));
	if (rv != B_OK) {
		ERROR("BMediaRoster::GetLiveNodes failed\n");
		return rv;
	}

	if (_count)
		*_count = reply.count;
	if (reply.count > 0)
		memcpy(_id, reply.node_id, sizeof(media_node_id) * reply.count);

	return B_OK;
}


bool
BMediaRoster::IsRunning()
{
	return be_roster->IsRunning(B_MEDIA_SERVER_SIGNATURE)
		&& be_roster->IsRunning(B_MEDIA_ADDON_SERVER_SIGNATURE);
}


ssize_t
BMediaRoster::AudioBufferSizeFor(int32 channelCount, uint32 sampleFormat,
	float frameRate, bus_type busKind)
{
	bigtime_t bufferDuration;
	ssize_t bufferSize;

	if (busKind == B_ISA_BUS || busKind == B_PCMCIA_BUS)
		bufferDuration = 25000;
	else
		bufferDuration = 10000;

	bufferSize = (sampleFormat & 0xf) * channelCount
		* (ssize_t)((frameRate * bufferDuration) / 1000000.0);

	printf("Suggested buffer duration %" B_PRId64 ", size %" B_PRIdSSIZE "\n",
		bufferDuration, bufferSize);

	return bufferSize;
}


/*!	Use MediaFlags to inquire about specific features of the Media Kit.
	Returns < 0 for "not present", positive size for output data size.
	0 means that the capability is present, but no data about it.
*/
/*static*/ ssize_t
BMediaRoster::MediaFlags(media_flags cap, void* buffer, size_t maxSize)
{
	UNIMPLEMENTED();
	return 0;
}


//	#pragma mark - BLooper overrides


void
BMediaRoster::MessageReceived(BMessage* message)
{
	switch (message->what) {
		case MEDIA_ROSTER_REQUEST_NOTIFICATIONS:
		{
			RosterNotification notification;
			if (message->FindInt32(NOTIFICATION_PARAM_WHAT, &notification.what)
					!= B_OK) {
				TRACE("BMediaRoster MEDIA_ROSTER_REQUEST_NOTIFICATIONS can't"
					"find what parameter");
				return;
			}
			if (message->FindMessenger(NOTIFICATION_PARAM_MESSENGER,
					&notification.messenger) != B_OK) {
				TRACE("BMediaRoster MEDIA_ROSTER_REQUEST_NOTIFICATIONS can't"
					"find messenger");
				return;
			}
			sNotificationList.Insert(notification);
			return;
		}

		case MEDIA_ROSTER_CANCEL_NOTIFICATIONS:
		{
			RosterNotification notification;
			if (message->FindInt32(NOTIFICATION_PARAM_WHAT, &notification.what)
					!= B_OK) {
				TRACE("BMediaRoster MEDIA_ROSTER_CANCEL_NOTIFICATIONS can't"
					"find what parameter");
				return;
			}
			if (message->FindMessenger(NOTIFICATION_PARAM_MESSENGER,
					&notification.messenger) != B_OK) {
				TRACE("BMediaRoster MEDIA_ROSTER_CANCEL_NOTIFICATIONS can't"
					"find messenger");
				return;
			}
			for (int32 i = 0; i < sNotificationList.CountItems(); i++) {
				RosterNotification* current;
				if (sNotificationList.Get(i, &current) != true)
					return;
				if (current->what == notification.what
						&& current->messenger == notification.messenger) {
					sNotificationList.Remove(i);
					return;
				}
			}
			return;
		}

		case B_SOME_APP_LAUNCHED:
		{
			BString mimeSig;
			if (message->FindString("be:signature", &mimeSig) != B_OK)
				return;
			if (mimeSig != B_MEDIA_ADDON_SERVER_SIGNATURE
					&& mimeSig != B_MEDIA_SERVER_SIGNATURE)
				return;

			TRACE("BMediaRoster::MessageReceived media services are going up.");

			if (BMediaRoster::IsRunning()) {
				// Wait for media services to wake up and restore our friendship
				if (MediaRosterEx(this)->BuildConnections() != B_OK) {
					TRACE("BMediaRoster::MessageReceived can't reconnect"
						"to media_server.");
				}
			}
			return;
		}

		case B_SOME_APP_QUIT:
		{
			BString mimeSig;
			if (message->FindString("be:signature", &mimeSig) != B_OK)
				return;
			if (mimeSig != B_MEDIA_ADDON_SERVER_SIGNATURE
					&& mimeSig != B_MEDIA_SERVER_SIGNATURE)
				return;

			TRACE("BMediaRoster::MessageReceived media services are down.");

			// Send the notification to our subscribers
			if (!BMediaRoster::IsRunning() && sServerIsUp == true) {
				sServerIsUp = false;
				for (int32 i = 0; i < sNotificationList.CountItems(); i++) {
					RosterNotification* current;
					if (sNotificationList.Get(i, &current) != true)
						return;
					if (current->what == B_MEDIA_SERVER_QUIT) {
						if (current->messenger.SendMessage(
								B_MEDIA_SERVER_QUIT) != B_OK) {
							if(!current->messenger.IsValid())
								sNotificationList.Remove(i);
						}
					}
				}
			}
			return;
		}

		case MEDIA_SERVER_ALIVE:
		{
			if (!BMediaRoster::IsRunning())
				return;

			sServerIsUp = true;

			TRACE("BMediaRoster::MessageReceived media services are"
				" finally up.");

			if (MediaRosterEx(this)->fLaunchNotification) {
				progress_startup(100, NULL, NULL);
				if (MediaRosterEx(this)->fAutoExit)
					MediaRosterEx(this)->fLaunchNotification = false;
			}

			// Send the notification to our subscribers
			for (int32 i = 0; i < sNotificationList.CountItems(); i++) {
				RosterNotification* current;
				if (sNotificationList.Get(i, &current) != true)
					return;
				if (current->what == B_MEDIA_SERVER_STARTED) {
					if (current->messenger.SendMessage(
							B_MEDIA_SERVER_STARTED) != B_OK) {
						if(!current->messenger.IsValid())
							sNotificationList.Remove(i);
					}
				}
			}
			return;
		}

		case NODE_FINAL_RELEASE:
		{
			// This function is called by a BMediaNode to delete
			// itself, as this needs to be done from another thread
			// context, it is done here.

			BMediaNode* node = NULL;
			status_t err = message->FindPointer("node",
				reinterpret_cast<void **>(&node));
			if (err == B_OK && node != NULL)
				node->Release();
			else {
				TRACE("BMediaRoster::MessageReceived: CRITICAL! received"
					"a release request but the node can't be found.");
			}
			return;
		}

		default:
			BLooper::MessageReceived(message);
			break;
	}
}


bool
BMediaRoster::QuitRequested()
{
	CALLED();
	return true;
}


BHandler*
BMediaRoster::ResolveSpecifier(BMessage* msg, int32 index, BMessage* specifier,
	int32 form, const char* property)
{
	return BLooper::ResolveSpecifier(msg, index, specifier, form, property);
}


status_t
BMediaRoster::GetSupportedSuites(BMessage* data)
{
	return BLooper::GetSupportedSuites(data);
}


BMediaRoster::~BMediaRoster()
{
	CALLED();

	// Unset the global instance pointer, the destructor is also called
	// if a client app calls Lock(); and Quit(); directly.
	sDefaultInstance = NULL;
}

//	#pragma mark - private BMediaRoster

// FBC reserved virtuals
status_t BMediaRoster::_Reserved_MediaRoster_0(void*) { return B_ERROR; }
status_t BMediaRoster::_Reserved_MediaRoster_1(void*) { return B_ERROR; }
status_t BMediaRoster::_Reserved_MediaRoster_2(void*) { return B_ERROR; }
status_t BMediaRoster::_Reserved_MediaRoster_3(void*) { return B_ERROR; }
status_t BMediaRoster::_Reserved_MediaRoster_4(void*) { return B_ERROR; }
status_t BMediaRoster::_Reserved_MediaRoster_5(void*) { return B_ERROR; }
status_t BMediaRoster::_Reserved_MediaRoster_6(void*) { return B_ERROR; }
status_t BMediaRoster::_Reserved_MediaRoster_7(void*) { return B_ERROR; }


BMediaRoster::BMediaRoster()
	:
	BLooper("_BMediaRoster_", B_URGENT_DISPLAY_PRIORITY,
		B_LOOPER_PORT_DEFAULT_CAPACITY)
{
	CALLED();

	// start the looper
	Run();
}

// #pragma mark - static variables

BMediaRoster* BMediaRoster::sDefaultInstance = NULL;