/**
 * \brief  Manage object dependencies
 * \author Sebastian Sumpf
 * \date   2015-03-12
 */

/*
 * Copyright (C) 2015-2017 Genode Labs GmbH
 *
 * This file is part of the Genode OS framework, which is distributed
 * under the terms of the GNU Affero General Public License version 3.
 */

#include <linker.h>
#include <dynamic.h>
#include <init.h>


/**
 * Dependency node
 */
Linker::Dependency::Dependency(Env &env, Allocator &md_alloc,
                               char const *path, Root_object *root,
                               Fifo<Dependency> &deps,
                               Keep keep)
:
	_obj(load(env, md_alloc, path, *this, keep)),
	_root(root),
	_md_alloc(&md_alloc)
{
	deps.enqueue(this);
	load_needed(env, *_md_alloc, deps, keep);
}


Linker::Dependency::~Dependency()
{
	if (!_obj.unload())
		return;

	if (verbose_loading)
		log("Destroy: ", _obj.name());

	destroy(_md_alloc, &_obj);
}


bool Linker::Dependency::in_dep(char const *file, Fifo<Dependency> const &dep)
{
	for (Dependency const *d = dep.head(); d; d = d->next())
		if (!strcmp(file, d->obj().name()))
			return true;

	return false;
}


void Linker::Dependency::load_needed(Env &env, Allocator &md_alloc,
                                     Fifo<Dependency> &deps, Keep keep)
{
	_obj.dynamic().for_each_dependency([&] (char const *path) {

		if (!in_dep(Linker::file(path), deps))
			new (md_alloc) Dependency(env, md_alloc, path, _root, deps, keep);

		/* re-order initializer list, if needed object has been already added */
		else if (Object *o = Init::list()->contains(Linker::file(path)))
			Init::list()->reorder(o);
	});
}


Linker::Dependency const &Linker::Dependency::first() const
{
	return _root ? *_root->first_dep() : *this;
}


Linker::Root_object::Root_object(Env &env, Allocator &md_alloc,
                                 char const *path, Bind bind, Keep keep)
:
	_md_alloc(md_alloc)
{
	/*
	 * The life time of 'Dependency' objects is managed via reference
	 * counting. Hence, we don't need to remember them here.
	 */
	new (md_alloc) Dependency(env, md_alloc, path, this, _deps, keep);

	/* provide Genode base library access */
	new (md_alloc) Dependency(env, md_alloc, linker_name(), this, _deps, DONT_KEEP);

	/* relocate and call constructors */
	try {
		Init::list()->initialize(bind, STAGE_SO);
	} catch (...) {
		Init::list()->flush();
		while (Dependency *d = _deps.dequeue())
			destroy(_md_alloc, d);

		throw;
	}
}