/*
  This file is part of Ingen.
  Copyright 2007-2015 David Robillard <http://drobilla.net/>

  Ingen is free software: you can redistribute it and/or modify it under the
  terms of the GNU Affero General Public License as published by the Free
  Software Foundation, either version 3 of the License, or any later version.

  Ingen 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 Affero General Public License for details.

  You should have received a copy of the GNU Affero General Public License
  along with Ingen.  If not, see <http://www.gnu.org/licenses/>.
*/

#include <list>
#include <string>

#include <boost/variant/get.hpp>

#include "ingen/client/SigClientInterface.hpp"

#include "App.hpp"
#include "BreadCrumbs.hpp"

namespace Ingen {
namespace GUI {

using std::string;

BreadCrumbs::BreadCrumbs(App& app)
	: Gtk::HBox()
	, _active_path("/")
	, _full_path("/")
	, _enable_signal(true)
{
	app.client()->signal_message().connect(
		sigc::mem_fun(this, &BreadCrumbs::message));

	set_can_focus(false);
}

SPtr<GraphView>
BreadCrumbs::view(const Raul::Path& path)
{
	for (const auto& b : _breadcrumbs) {
		if (b->path() == path) {
			return b->view();
		}
	}

	return SPtr<GraphView>();
}

/** Sets up the crumbs to display `path`.
 *
 * If `path` is already part of the shown path, it will be selected and the
 * children preserved.
 */
void
BreadCrumbs::build(Raul::Path path, SPtr<GraphView> view)
{
	bool old_enable_signal = _enable_signal;
	_enable_signal = false;

	if (!_breadcrumbs.empty() && (path.is_parent_of(_full_path) || path == _full_path)) {
		// Moving to a path we already contain, just switch the active button
		for (const auto& b : _breadcrumbs) {
			if (b->path() == path) {
				b->set_active(true);
				if (!b->view()) {
					b->set_view(view);
				}

				// views are expensive, having two around for the same graph is a bug
				assert(b->view() == view);

			} else {
				b->set_active(false);
			}
		}

		_active_path = path;
		_enable_signal = old_enable_signal;

	} else if (!_breadcrumbs.empty() && path.is_child_of(_full_path)) {
		// Moving to a child of the full path, just append crumbs (preserve view cache)

		string suffix = path.substr(_full_path.length());
		while (suffix.length() > 0) {
			if (suffix[0] == '/') {
				suffix = suffix.substr(1);
			}
			const string name = suffix.substr(0, suffix.find("/"));
			_full_path = _full_path.child(Raul::Symbol(name));
			BreadCrumb* but = create_crumb(_full_path, view);
			pack_start(*but, false, false, 1);
			_breadcrumbs.push_back(but);
			but->show();
			if (suffix.find("/") == string::npos) {
				break;
			} else {
				suffix = suffix.substr(suffix.find("/")+1);
			}
		}

		for (const auto& b : _breadcrumbs) {
			b->set_active(false);
		}
		_breadcrumbs.back()->set_active(true);

	} else {
		// Rebuild from scratch
		// Getting here is bad unless absolutely necessary, since the GraphView cache is lost

		_full_path = path;
		_active_path = path;

		// Empty existing breadcrumbs
		for (const auto& b : _breadcrumbs) {
			remove(*b);
		}
		_breadcrumbs.clear();

		// Add root
		BreadCrumb* root_but = create_crumb(Raul::Path("/"), view);
		pack_start(*root_but, false, false, 1);
		_breadcrumbs.push_front(root_but);
		root_but->set_active(root_but->path() == _active_path);

		Raul::Path working_path("/");
		string suffix = path.substr(1);
		while (suffix.length() > 0) {
			if (suffix[0] == '/') {
				suffix = suffix.substr(1);
			}
			const string name = suffix.substr(0, suffix.find("/"));
			working_path = working_path.child(Raul::Symbol(name));
			BreadCrumb* but = create_crumb(working_path, view);
			pack_start(*but, false, false, 1);
			_breadcrumbs.push_back(but);
			but->set_active(working_path == _active_path);
			but->show();
			if (suffix.find("/") == string::npos) {
				break;
			} else {
				suffix = suffix.substr(suffix.find("/")+1);
			}
		}
	}

	_enable_signal = old_enable_signal;
}

/** Create a new crumb, assigning it a reference to `view` if their paths
 * match, otherwise ignoring `view`.
 */
BreadCrumbs::BreadCrumb*
BreadCrumbs::create_crumb(const Raul::Path& path,
                          SPtr<GraphView>   view)
{
	BreadCrumb* but = manage(
		new BreadCrumb(path,
		               ((view && path == view->graph()->path())
		                ? view : SPtr<GraphView>())));

	but->signal_toggled().connect(
		sigc::bind(sigc::mem_fun(this, &BreadCrumbs::breadcrumb_clicked),
		           but));

	return but;
}

void
BreadCrumbs::breadcrumb_clicked(BreadCrumb* crumb)
{
	if (_enable_signal) {
		_enable_signal = false;

		if (!crumb->get_active()) {
			// Tried to turn off the current active button, bad user, no cookie
			crumb->set_active(true);
		} else {
			signal_graph_selected.emit(crumb->path(), crumb->view());
			if (crumb->path() != _active_path) {
				crumb->set_active(false);
			}
		}
		_enable_signal = true;
	}
}

void
BreadCrumbs::message(const Message& msg)
{
	if (const Del* const del = boost::get<Del>(&msg)) {
		object_destroyed(del->uri);
	}
}

void
BreadCrumbs::object_destroyed(const Raul::URI& uri)
{
	for (auto i = _breadcrumbs.begin(); i != _breadcrumbs.end(); ++i) {
		if ((*i)->path() == uri.c_str()) {
			// Remove all crumbs after the removed one (inclusive)
			for (auto j = i; j != _breadcrumbs.end(); ) {
				BreadCrumb* bc = *j;
				j = _breadcrumbs.erase(j);
				remove(*bc);
			}
			break;
		}
	}
}

void
BreadCrumbs::object_moved(const Raul::Path& old_path, const Raul::Path& new_path)
{
	for (const auto& b : _breadcrumbs) {
		if (b->path() == old_path) {
			b->set_path(new_path);
		}
	}
}

} // namespace GUI
} // namespace Ingen