/*
  Copyright 2008-2011 David Robillard <http://drobilla.net>

  Permission to use, copy, modify, and/or distribute this software for any
  purpose with or without fee is hereby granted, provided that the above
  copyright notice and this permission notice appear in all copies.

  THIS SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
  WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
  MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
  ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
  ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
  OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
*/

#include <glib.h>

#include "slv2_internal.h"

/* Generic collection functions */

static inline SLV2Collection
slv2_collection_new(GDestroyNotify destructor)
{
	return g_sequence_new(destructor);
}

SLV2_API
void
slv2_collection_free(SLV2Collection coll)
{
	if (coll)
		g_sequence_free((GSequence*)coll);
}

SLV2_API
unsigned
slv2_collection_size(SLV2Collection coll)
{
	return (coll ? g_sequence_get_length((GSequence*)coll) : 0);
}

SLV2_API
void*
slv2_collection_get_at(SLV2Collection coll, unsigned index)
{
	if (!coll || index >= slv2_collection_size(coll)) {
		return NULL;
	} else {
		GSequenceIter* i = g_sequence_get_iter_at_pos((GSequence*)coll, (int)index);
		return g_sequence_get(i);
	}
}

SLV2_API
SLV2Iter
slv2_collection_begin(SLV2Collection collection)
{
	return collection ? g_sequence_get_begin_iter(collection) : NULL;
}

SLV2_API
void*
slv2_collection_get(SLV2Collection collection,
                    SLV2Iter       i)
{
	return g_sequence_get((GSequenceIter*)i);
}

/* Constructors */

SLV2_API
SLV2ScalePoints
slv2_scale_points_new(void)
{
	return slv2_collection_new((GDestroyNotify)slv2_scale_point_free);
}

SLV2_API
SLV2Values
slv2_values_new(void)
{
	return slv2_collection_new((GDestroyNotify)slv2_value_free);
}

SLV2UIs
slv2_uis_new(void)
{
	return slv2_collection_new((GDestroyNotify)slv2_ui_free);
}

SLV2PluginClasses
slv2_plugin_classes_new(void)
{
	return slv2_collection_new((GDestroyNotify)slv2_plugin_class_free);
}

/* URI based accessors (for collections of things with URIs) */

SLV2_API
SLV2PluginClass
slv2_plugin_classes_get_by_uri(SLV2PluginClasses coll, SLV2Value uri)
{
	return (SLV2PluginClass)slv2_sequence_get_by_uri(coll, uri);
}

SLV2_API
SLV2UI
slv2_uis_get_by_uri(SLV2UIs coll, SLV2Value uri)
{
	return (SLV2UIs)slv2_sequence_get_by_uri(coll, uri);
}

/* Plugins */

SLV2Plugins
slv2_plugins_new()
{
	return g_sequence_new(NULL);
}

SLV2_API
SLV2Plugin
slv2_plugins_get_by_uri(SLV2Plugins list, SLV2Value uri)
{
	return (SLV2Plugin)slv2_sequence_get_by_uri(list, uri);
}

/* Values */

SLV2_API
bool
slv2_values_contains(SLV2Values list, SLV2Value value)
{
	SLV2_FOREACH(i, list)
		if (slv2_value_equals(slv2_values_get(list, i), value))
			return true;

	return false;
}

/* Iterator */

SLV2_API
SLV2Iter
slv2_iter_next(SLV2Iter i)
{
	return g_sequence_iter_next((GSequenceIter*)i);
}

SLV2_API
bool
slv2_iter_end(SLV2Iter i)
{
	return !i || g_sequence_iter_is_end((GSequenceIter*)i);
}

#define SLV2_COLLECTION_IMPL(prefix, CT, ET) \
SLV2_API \
unsigned \
prefix##_size(CT collection) { \
	return slv2_collection_size(collection); \
} \
\
SLV2_API \
SLV2Iter \
prefix##_begin(CT collection) { \
	return slv2_collection_begin(collection); \
} \
\
SLV2_API \
ET \
prefix##_get(CT collection, SLV2Iter i) { \
	return (ET)slv2_collection_get(collection, i); \
} \
\
SLV2_DEPRECATED \
SLV2_API \
ET \
prefix##_get_at(CT collection, unsigned index) { \
	return (ET)slv2_collection_get_at(collection, index); \
}

SLV2_COLLECTION_IMPL(slv2_plugin_classes, SLV2PluginClasses, SLV2PluginClass)
SLV2_COLLECTION_IMPL(slv2_scale_points, SLV2ScalePoints, SLV2ScalePoint)
SLV2_COLLECTION_IMPL(slv2_uis, SLV2UIs, SLV2UI)
SLV2_COLLECTION_IMPL(slv2_values, SLV2Values, SLV2Value)
SLV2_COLLECTION_IMPL(slv2_plugins, SLV2Plugins, SLV2Plugin)

SLV2_API
void
slv2_plugin_classes_free(SLV2PluginClasses collection) {
	slv2_collection_free(collection);
}

SLV2_API
void
slv2_scale_points_free(SLV2ScalePoints collection) {
	slv2_collection_free(collection);
}

SLV2_API
void
slv2_uis_free(SLV2UIs collection) {
	slv2_collection_free(collection);
}

SLV2_API
void
slv2_values_free(SLV2Values collection) {
	slv2_collection_free(collection);
}

SLV2_API
void
slv2_plugins_free(SLV2World world, SLV2Plugins plugins){
}

SLV2_API
SLV2Value
slv2_values_get_first(SLV2Values collection) {
	return (SLV2Value)slv2_collection_get(collection,
	                                      slv2_collection_begin(collection));
}