/*
 * Copyright (C) 2017, University of the Basque Country (UPV/EHU)
 * Contact for licensing options: <licensing-mcpttclient(at)mcopenplatform(dot)com>
 *
 * The original file was part of Open Source Doubango Framework
 * Copyright (C) 2010-2011 Mamadou Diop.
 * Copyright (C) 2012 Doubango Telecom <http://doubango.org>
 *
 * This file is part of Open Source Doubango Framework.
 *
 * DOUBANGO is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * DOUBANGO is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with DOUBANGO.
 *
 */
 #include "ProxyPluginMgr.h"
 
 #include "ProxyConsumer.h"
 #include "ProxyProducer.h"
 
 //
 //	"twrap_proxy_plugin_t" Declarations
 //
 typedef struct twrap_proxy_plugin_s
 {
 	TSK_DECLARE_OBJECT;
 	ProxyPlugin* plugin;
 }
 twrap_proxy_plugin_t;
 #define TWRAP_PROXY_PLUGIN(self) ((twrap_proxy_plugin_t*)(self))
 static int pred_find_plugin_by_value(const tsk_list_item_t *item, const void *proxyPlugin);
 static twrap_proxy_plugin_t* twrap_proxy_plugin_create(ProxyPlugin** plugin);
 
 
 //
 //	"ProxyPluginMgr" Class Implementation
 //
 ProxyPluginMgr* ProxyPluginMgr::instance = tsk_null;
 static uint64_t __uniqueId = 0;
 
 ProxyPluginMgr::ProxyPluginMgr(ProxyPluginMgrCallback* _callback)
 :callback(_callback)
 {
 	this->plugins = tsk_list_create();
 	if(!this->callback){
 		TSK_DEBUG_WARN("Callback function is Null => You will have big problems as we won't check it before call");
 	}
 }
 
 ProxyPluginMgr::~ProxyPluginMgr()
 {
 	if(this == ProxyPluginMgr::instance){
 		ProxyPluginMgr::instance = tsk_null;
 	}
 	TSK_OBJECT_SAFE_FREE(this->plugins);
 }
 
 ProxyPluginMgr* ProxyPluginMgr::createInstance(ProxyPluginMgrCallback* pCallback)
 {
 	if(!ProxyPluginMgr::instance){
 		ProxyPluginMgr::instance = new ProxyPluginMgr(pCallback);
 	}
 	else{
 		TSK_DEBUG_WARN("Plugin instance already exist");
 		ProxyPluginMgr::instance->callback = pCallback;
 	}
 	return ProxyPluginMgr::instance;
 }
 
 void ProxyPluginMgr::destroyInstance(ProxyPluginMgr** ppInstance)
 {
 	if(ppInstance && *ppInstance){
 		bool bMatch = ProxyPluginMgr::instance && (*ppInstance == ProxyPluginMgr::instance);
 		delete *ppInstance, *ppInstance = tsk_null;
 		if(bMatch){
 			ProxyPluginMgr::instance = tsk_null;
 		}
 	}
 }
 
 ProxyPluginMgr* ProxyPluginMgr::getInstance()
 {
 	if(!ProxyPluginMgr::instance){
 		TSK_DEBUG_ERROR("No instance of the manager could be found");
 	}
 	return ProxyPluginMgr::instance;
 }
 
 uint64_t ProxyPluginMgr::getUniqueId()
 {
 	return ++__uniqueId;
 }
 
 int ProxyPluginMgr::addPlugin(ProxyPlugin** plugin)
 {
 	twrap_proxy_plugin_t* twrap_plugin;
 	int ret = -1;
 
 	tsk_list_lock(this->plugins);
 
 	if(!plugin || !*plugin){
 		TSK_DEBUG_ERROR("Invalid parameter");
 		goto bail;
 	}
 
 	if(tsk_list_find_item_by_pred(this->plugins, pred_find_plugin_by_value, *plugin)){
 		TSK_DEBUG_ERROR("Plugin already exist");
 		goto bail;
 	}
 	
 	if((twrap_plugin = twrap_proxy_plugin_create(plugin))){
 		tsk_list_push_back_data(this->plugins, (void**)&twrap_plugin);
 		ret = 0;
 	}
 	else{
 		TSK_DEBUG_ERROR("Failed to create plugin");
 		goto bail;
 	}
 
 bail:
 	tsk_list_unlock(this->plugins);
 
 	return ret;
 }
 
 int ProxyPluginMgr::removePlugin(ProxyPlugin** plugin)
 {
 	if(!plugin || !*plugin){
 		TSK_DEBUG_ERROR("Invalid parameter");
 		return -1;
 	}
 	return this->removePlugin((*plugin)->getId());
 }
 
 const ProxyPlugin* ProxyPluginMgr::findPlugin(uint64_t id)
 {
 	ProxyPlugin* ret = tsk_null;
 
 	tsk_list_item_t* item;
 
 	tsk_list_lock(this->plugins);
 	tsk_list_foreach(item, this->plugins){
 		if(TWRAP_PROXY_PLUGIN(item->data)->plugin->getId() == id){
 			ret = TWRAP_PROXY_PLUGIN(item->data)->plugin;
 			break;
 		}
 	}
 	tsk_list_unlock(this->plugins);
 
 	return ret;
 }
 
 const ProxyPlugin* ProxyPluginMgr::findPlugin(tsk_object_t* wrapped_plugin)
 {
 	ProxyPlugin* ret = tsk_null;
 
 	tsk_list_item_t* item;
 
 	if(!wrapped_plugin){
 		TSK_DEBUG_ERROR("Invalid parameter");
 		return tsk_null;
 	}
 
 	tsk_list_lock(this->plugins);
 	tsk_list_foreach(item, this->plugins){
 		if(TWRAP_PROXY_PLUGIN(item->data)->plugin->isWrapping(wrapped_plugin)){
 			ret = TWRAP_PROXY_PLUGIN(item->data)->plugin;
 			break;
 		}
 	}
 	tsk_list_unlock(this->plugins);
 
 	return ret;
 }
 
 int ProxyPluginMgr::removePlugin(uint64_t id)
 {
 	tsk_list_item_t* item;
 
 	tsk_list_lock(this->plugins);
 
 	tsk_list_foreach(item, this->plugins){
 		if(TWRAP_PROXY_PLUGIN(item->data)->plugin->getId() == id){
 			tsk_list_remove_item(this->plugins, item);
 			break;
 		}
 	}
 
 	tsk_list_unlock(this->plugins);
 	return 0;
 }
 
 const ProxyAudioConsumer* ProxyPluginMgr::findAudioConsumer(uint64_t id)
 {
 	const ProxyPlugin* audioConsumer = this->findPlugin(id);
 	if(audioConsumer && audioConsumer->getType() == twrap_proxy_plugin_audio_consumer){
 		return dyn_cast<const ProxyAudioConsumer*>(audioConsumer);
 	}
 	return tsk_null;
 }
 
 const ProxyVideoConsumer* ProxyPluginMgr::findVideoConsumer(uint64_t id)
 {
 	const ProxyPlugin* videoConsumer = this->findPlugin(id);
 	if(videoConsumer && videoConsumer->getType() == twrap_proxy_plugin_video_consumer){
 		return dyn_cast<const ProxyVideoConsumer*>(videoConsumer);
 	}
 	return tsk_null;
 }
 
 const ProxyAudioProducer* ProxyPluginMgr::findAudioProducer(uint64_t id)
 {
 	const ProxyPlugin* audioProducer = this->findPlugin(id);
 	if(audioProducer && audioProducer->getType() == twrap_proxy_plugin_audio_producer){
 		return dyn_cast<const ProxyAudioProducer*>(audioProducer);
 	}
 	return tsk_null;
 }
 
 const ProxyVideoProducer* ProxyPluginMgr::findVideoProducer(uint64_t id)
 {
 	const ProxyPlugin* videoProducer = this->findPlugin(id);
 	if(videoProducer && videoProducer->getType() == twrap_proxy_plugin_video_producer){
 		return dyn_cast<const ProxyVideoProducer*>(videoProducer);
 	}
 	return tsk_null;
 }
 
 
 //
 //	"twrap_proxy_plugin_t" Implementations
 //
 static tsk_object_t* twrap_proxy_plugin_ctor(tsk_object_t * self, va_list * app)
 {
 	twrap_proxy_plugin_t *_self = dyn_cast<twrap_proxy_plugin_t *>(TWRAP_PROXY_PLUGIN(self));
 	if(_self){
 	}
 	return self;
 }
 
 static tsk_object_t* twrap_proxy_plugin_dtor(tsk_object_t * self)
 { 
 	twrap_proxy_plugin_t *_self = dyn_cast<twrap_proxy_plugin_t *>(TWRAP_PROXY_PLUGIN(self));
 	if(_self){
 		if(_self->plugin){
 			delete _self->plugin, _self->plugin = tsk_null;
 		}
 	}
 
 	return self;
 }
 
 static int twrap_proxy_plugin_cmp(const tsk_object_t *_c1, const tsk_object_t *_c2)
 {
 	const twrap_proxy_plugin_t *c1 = dyn_cast<const twrap_proxy_plugin_t *>(TWRAP_PROXY_PLUGIN(_c1));
 	const twrap_proxy_plugin_t *c2 = dyn_cast<const twrap_proxy_plugin_t *>(TWRAP_PROXY_PLUGIN(_c2));
 
 	if(c1 && c2){
 		return (c1->plugin == c2->plugin); // See "ProxyPlugin::operator =="
 	}
 	else if(!c1 && !c2) return 0;
 	else return -1;
 }
 
 static const tsk_object_def_t twrap_proxy_plugin_def_s = 
 {
 	sizeof(twrap_proxy_plugin_t),
 	twrap_proxy_plugin_ctor, 
 	twrap_proxy_plugin_dtor,
 	twrap_proxy_plugin_cmp, 
 };
 const tsk_object_def_t *twrap_proxy_plugin_def_t = &twrap_proxy_plugin_def_s;
 
 static int pred_find_plugin_by_value(const tsk_list_item_t *item, const void *proxyPlugin)
 {
 	if(item && item->data){
 		const twrap_proxy_plugin_t *twrap_plugin = dyn_cast<const twrap_proxy_plugin_t *>(TWRAP_PROXY_PLUGIN(item->data));
 		return (twrap_plugin->plugin == dyn_cast<const ProxyPlugin *>((const ProxyPlugin*)proxyPlugin)) ? 0 : -1;
 	}
 	return -1;
 }
 
 static twrap_proxy_plugin_t* twrap_proxy_plugin_create(ProxyPlugin** plugin)
 {
 	if(!plugin || !*plugin){
 		TSK_DEBUG_ERROR("Invalid parameter");
 		return tsk_null;
 	}
 
 	twrap_proxy_plugin_t* twrap_plugin = (twrap_proxy_plugin_t*)tsk_object_new(twrap_proxy_plugin_def_t);
 	if(!twrap_plugin){
 		TSK_DEBUG_ERROR("Failed to create new instance of 'twrap_proxy_plugin_t'");
 		return tsk_null;
 	}
 
 	twrap_plugin->plugin = *plugin, 
 		*plugin = tsk_null;
 	return twrap_plugin;
 }