#include "Speckle/Database/BIMElementDatabase.h"

#include "Active/Database/Storage/Storage.h"
#include "Active/Serialise/UnboxedTransport.h"
#include "Speckle/Database/Identity/RecordID.h"
#include "Speckle/Database/Storage/ArchicadDBase/Element/ArchicadElementDBaseEngine.h"
#include "Speckle/Record/Element/Element.h"
#include "Speckle/Record/Element/Memo.h"

#include <array>

using namespace active::container;
using namespace active::database;
using namespace active::event;
using namespace active::serialise;
using namespace speckle::database;
using namespace speckle::record;
using namespace speckle::record::element;
using namespace speckle::database;
using namespace speckle::utility;

namespace speckle::database {
	
	///Define other platform engines here as required
#ifdef ARCHICAD
	using ElementDatabaseEngine = ArchicadElementDBaseEngine;
#endif

		///Element database engine declaration
	class BIMElementDatabase::Engine : public ElementDatabaseEngine {
		using base = ArchicadElementDBaseEngine;
		using base::base;
	};

		///Element database storage declaration
	class BIMElementDatabase::Store : public Storage<Element, UnboxedTransport, BIMRecordID, BIMRecordID,
			BIMRecordID, BIMRecordID, ElementStorage::TableType> {
		using base = Storage<Element, UnboxedTransport, BIMRecordID, BIMRecordID, BIMRecordID, BIMRecordID, ElementStorage::TableType>;
		using base::base;
	};
	
}

namespace {
	
		///The database storage identifier for elements
	const char* elementDBaseName = "speckle::database::BIMElementDatabase";
		///The primary model table, e.g. floor plan in Archicad
	const char* modelTableName = "Model";

}

/*--------------------------------------------------------------------
	Constructor
  --------------------------------------------------------------------*/
BIMElementDatabase::BIMElementDatabase() {
	m_engine = std::make_shared<Engine>(elementDBaseName,
			//Schema
		 DBaseSchema{active::utility::String{elementDBaseName},
				//Tables
			{
					//Model element table
				{
					modelTableName, 0, 0, {}	//The primary model. Additonal tables could be linked to other drawings/layouts in future
				}
			}
		}
	);
	m_store = std::make_shared<Store>(m_engine);
} //BIMElementDatabase::BIMElementDatabase


/*--------------------------------------------------------------------
	Destructor
  --------------------------------------------------------------------*/
BIMElementDatabase::~BIMElementDatabase() {}


/*--------------------------------------------------------------------
	Get the available element tables
 
	targetType: An optional filtr for table type to retrieve, e.g. get all sections (nullopt = all table types)
 
	return: A list of available tables
  --------------------------------------------------------------------*/
BIMRecordIDList BIMElementDatabase::getTables(std::optional<TableType> targetType) const {
	return m_engine->getTables(targetType);
} //BIMElementDatabase::getTables


/*--------------------------------------------------------------------
	Get the default dbase table
 
	return: The default dbase table (nullopt if no table is available)
  --------------------------------------------------------------------*/
std::optional<BIMRecordID> BIMElementDatabase::getDefaultTable() const {
	return m_engine->getDefaultTable();
} //BIMElementDatabase::getDefaultTable


/*--------------------------------------------------------------------
	Set the default dbase table
 
	tableID: The new default dbase table
  --------------------------------------------------------------------*/
void BIMElementDatabase::setDefaultTable(const BIMRecordID& tableID) const {
	m_engine->setDefaultTable(tableID);
} //BIMElementDatabase::setDefaultTable


/*--------------------------------------------------------------------
	Bring the view of this database to the front (i.e. so the user sees it)
 
	tableID: The ID of the table to bring to the front
  --------------------------------------------------------------------*/
void BIMElementDatabase::bringViewToFront(BIMRecordID tableID) const {
	m_engine->bringViewToFront(tableID);
} //BIMElementDatabase::bringViewToFront


/*--------------------------------------------------------------------
	Get the current user element selection
 
	return: A list of selected element IDs
  --------------------------------------------------------------------*/
BIMLinkList BIMElementDatabase::getSelection() const {
	return m_engine->getSelection();
} //BIMElementDatabase::getSelection


/*--------------------------------------------------------------------
	Set the element selection
  --------------------------------------------------------------------*/
void BIMElementDatabase::setSelection(const BIMLinkList& elementIDs) const {
	m_engine->setSelection(elementIDs);
} //BIMElementDatabase::setSelection


/*--------------------------------------------------------------------
	Clear the element selection
  --------------------------------------------------------------------*/
void BIMElementDatabase::clearSelection() const {
	m_engine->clearSelection();
} //BIMElementDatabase::clearSelection


/*--------------------------------------------------------------------
	Find a filtered list of objects
 
	filter: The object filter (nullptr = find all objects)
	subset: A subset of the database content to search (specified by record ID)
	tableID: Optional table ID (defaults to the first table)
	documentID: Optional document ID (filter for this document only - nullopt = all objects)
 
	return: A list containing IDs of found elements (empty if none found)
  --------------------------------------------------------------------*/
BIMRecordIDList BIMElementDatabase::findElements(const Filter* filter, const BIMRecordIDList& subset, std::optional<BIMRecordID> tableID,
												 std::optional<BIMRecordID> documentID) const {
	return m_engine->findObjects(filter, subset, tableID, documentID);
} //BIMElementDatabase::findElements


/*--------------------------------------------------------------------
	Get a specified element
 
	elementID: The ID of the target element
	tableID: Optional table ID (defaults to the first table)
	documentID: Optional document ID (filter for this document only - nullopt = all objects)
 
	return: The requested element (nullptr on failure)
  --------------------------------------------------------------------*/
Element::Unique BIMElementDatabase::getElement(const BIMRecordID& elementID, std::optional<BIMRecordID> tableID,
											   std::optional<BIMRecordID> documentID) const {
	return m_engine->getObject(elementID, tableID, documentID);
} //BIMElementDatabase::getElement


/*--------------------------------------------------------------------
	Get all elements
 
	tableID: Optional table ID (defaults to the first table)
	documentID: Optional document ID (filter for this document only - nullopt = all objects)
 
	return: All the elements
  --------------------------------------------------------------------*/
Vector<Element> BIMElementDatabase::getElements(std::optional<BIMRecordID> tableID,
												std::optional<BIMRecordID> documentID) const {
	return m_store->getObjects(tableID, documentID);
} //BIMElementDatabase::getElements


/*--------------------------------------------------------------------
	Get memo memo (supplementary) data for a specified element
 
	elementID: The of the source element
	filter: Filter for the required supplementary data
 
	return: The requested element memo data (nullptr on failure)
  --------------------------------------------------------------------*/
Memo::Unique BIMElementDatabase::getMemo(const BIMRecordID& elementID, Part::filter_bits filter) const {
		//NB: The filter bits are passed as the source document ID
	auto result = m_engine->getObject(elementID, ArchicadElementDBaseEngine::memoTable, Guid::fromInt(filter));
	if (auto memo = dynamic_cast<Memo*>(result.get()); memo != nullptr) {
		result.release();
		return Memo::Unique{memo};
	}
	return nullptr;
} //BIMElementDatabase::getMemo


/*--------------------------------------------------------------------
	Write an element to storage
 
	element: The element to write
  --------------------------------------------------------------------*/
void BIMElementDatabase::write(Element& element) const {
	m_store->write(element);
} //BIMElementDatabase::write


/*--------------------------------------------------------------------
	Erase an element
 
	elementID: The ID of the element to erase
  --------------------------------------------------------------------*/
void BIMElementDatabase::erase(const Guid& elementID) const {
	m_store->erase(elementID);
} //BIMElementDatabase::erase