/*
   Copyright (C) 2001-2006, William Joseph.
   All Rights Reserved.

   This file is part of GtkRadiant.

   GtkRadiant 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 2 of the License, or
   (at your option) any later version.

   GtkRadiant 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 GtkRadiant; if not, write to the Free Software
   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 */

#if !defined ( INCLUDED_SELECTIONLIB_H )
#define INCLUDED_SELECTIONLIB_H

#include "iselection.h"
#include "generic/callback.h"
#include "scenelib.h"
#include <stdlib.h>

class SelectableBool : public Selectable
{
bool m_selected;
public:
SelectableBool()
	: m_selected( false )
{}

void setSelected( bool select = true ){
	m_selected = select;
}
bool isSelected() const {
	return m_selected;
}
};

class ObservedSelectable : public Selectable
{
SelectionChangeCallback m_onchanged;
bool m_selected;
public:
ObservedSelectable( const SelectionChangeCallback& onchanged ) : m_onchanged( onchanged ), m_selected( false ){
}
ObservedSelectable( const ObservedSelectable& other ) : Selectable( other ), m_onchanged( other.m_onchanged ), m_selected( false ){
	setSelected( other.isSelected() );
}
ObservedSelectable& operator=( const ObservedSelectable& other ){
	setSelected( other.isSelected() );
	return *this;
}
~ObservedSelectable(){
	setSelected( false );
}

void setSelected( bool select ){
	if ( select ^ m_selected ) {
		m_selected = select;

		m_onchanged( *this );
	}
}
bool isSelected() const {
	return m_selected;
}
};

class SelectableInstance : public scene::Instance
{
class TypeCasts
{
InstanceTypeCastTable m_casts;
public:
TypeCasts(){
	InstanceContainedCast<SelectableInstance, Selectable>::install( m_casts );
}
InstanceTypeCastTable& get(){
	return m_casts;
}
};

ObservedSelectable m_selectable;
public:

typedef LazyStatic<TypeCasts> StaticTypeCasts;

SelectableInstance( const scene::Path& path, scene::Instance* parent, void* instance = 0, InstanceTypeCastTable& casts = StaticTypeCasts::instance().get() ) :
	Instance( path, parent, instance != 0 ? instance : this, casts ),
	m_selectable( SelectedChangedCaller( *this ) ){
}

Selectable& get( NullType<Selectable>){
	return m_selectable;
}

Selectable& getSelectable(){
	return m_selectable;
}
const Selectable& getSelectable() const {
	return m_selectable;
}

void selectedChanged( const Selectable& selectable ){
	GlobalSelectionSystem().getObserver ( SelectionSystem::ePrimitive )( selectable );
	GlobalSelectionSystem().onSelectedChanged( *this, selectable );

	Instance::selectedChanged();
}
typedef MemberCaller1<SelectableInstance, const Selectable&, &SelectableInstance::selectedChanged> SelectedChangedCaller;
};


template<typename Iterator>
inline bool range_check( Iterator start, Iterator finish, Iterator iter ){
	for (; start != finish; ++start )
	{
		if ( start == iter ) {
			return true;
		}
	}
	return false;
}

#include <list>

template<typename Selected>
class SelectionList
{
typedef std::list<Selected*> List;
List m_selection;
public:
typedef typename List::iterator iterator;
typedef typename List::const_iterator const_iterator;

iterator begin(){
	return m_selection.begin();
}
const_iterator begin() const {
	return m_selection.begin();
}
iterator end(){
	return m_selection.end();
}
const_iterator end() const {
	return m_selection.end();
}
bool empty() const {
	return m_selection.empty();
}
std::size_t size() const {
	return m_selection.size();
}
Selected& back(){
	return *m_selection.back();
}
Selected& back() const {
	return *m_selection.back();
}
void append( Selected& selected ){
	m_selection.push_back( &selected );
}
void erase( Selected& selected ){
	typename List::reverse_iterator i = std::find( m_selection.rbegin(), m_selection.rend(), &selected );
	ASSERT_MESSAGE( i != m_selection.rend(), "selection-tracking error" );
	ASSERT_MESSAGE( range_check( m_selection.begin(), m_selection.end(), --i.base() ), "selection-tracking error" );
	m_selection.erase( --i.base() );
}
};


#endif