/*

 * Copyright (C) Internet Systems Consortium, Inc. ("ISC")

 *

 * This Source Code Form is subject to the terms of the Mozilla Public

 * License, v. 2.0. If a copy of the MPL was not distributed with this

 * file, You can obtain one at http://mozilla.org/MPL/2.0/.

 *

 * See the COPYRIGHT file distributed with this work for additional

 * information regarding copyright ownership.

 */

#include <config.h>

#include <stdbool.h>

#include <unistd.h>

#include <isc/app.h>

#include <isc/magic.h>

#include <isc/mutex.h>

#include <isc/once.h>

#include <isc/util.h>

static isc_mutex_t createlock;

static isc_once_t once = ISC_ONCE_INIT;

static isc_appctxcreatefunc_t appctx_createfunc = NULL;

static isc_mutex_t runninglock;

static bool is_running = false;

#define ISCAPI_APPMETHODS_VALID(m) ISC_MAGIC_VALID(m, ISCAPI_APPMETHODS_MAGIC)

static void

initialize(void) {

	RUNTIME_CHECK(isc_mutex_init(&createlock) == ISC_R_SUCCESS);

	RUNTIME_CHECK(isc_mutex_init(&runninglock) == ISC_R_SUCCESS);

}

isc_result_t

isc_app_register(isc_appctxcreatefunc_t createfunc) {

	isc_result_t result = ISC_R_SUCCESS;

	RUNTIME_CHECK(isc_once_do(&once, initialize) == ISC_R_SUCCESS);

	LOCK(&createlock);

	if (appctx_createfunc == NULL)

		appctx_createfunc = createfunc;

	else

		result = ISC_R_EXISTS;

	UNLOCK(&createlock);

	return (result);

}

isc_result_t

isc_appctx_create(isc_mem_t *mctx, isc_appctx_t **ctxp) {

	isc_result_t result;

	if (isc_bind9)

		return (isc__appctx_create(mctx, ctxp));

	LOCK(&createlock);

	REQUIRE(appctx_createfunc != NULL);

	result = (*appctx_createfunc)(mctx, ctxp);

	UNLOCK(&createlock);

	return (result);

}

void

isc_appctx_destroy(isc_appctx_t **ctxp) {

	REQUIRE(ctxp != NULL && ISCAPI_APPCTX_VALID(*ctxp));

	if (isc_bind9)

		isc__appctx_destroy(ctxp);

	else

		(*ctxp)->methods->ctxdestroy(ctxp);

	ENSURE(*ctxp == NULL);

}

isc_result_t

isc_app_ctxstart(isc_appctx_t *ctx) {

	REQUIRE(ISCAPI_APPCTX_VALID(ctx));

	if (isc_bind9)

		return (isc__app_ctxstart(ctx));

	return (ctx->methods->ctxstart(ctx));

}

isc_result_t

isc_app_ctxrun(isc_appctx_t *ctx) {

	REQUIRE(ISCAPI_APPCTX_VALID(ctx));

	if (isc_bind9)

		return (isc__app_ctxrun(ctx));

	return (ctx->methods->ctxrun(ctx));

}

isc_result_t

isc_app_ctxonrun(isc_appctx_t *ctx, isc_mem_t *mctx,

		 isc_task_t *task, isc_taskaction_t action,

		 void *arg)

{

	REQUIRE(ISCAPI_APPCTX_VALID(ctx));

	if (isc_bind9)

		return (isc__app_ctxonrun(ctx, mctx, task, action, arg));

	return (ctx->methods->ctxonrun(ctx, mctx, task, action, arg));

}

isc_result_t

isc_app_ctxsuspend(isc_appctx_t *ctx) {

	REQUIRE(ISCAPI_APPCTX_VALID(ctx));

	if (isc_bind9)

		return (isc__app_ctxsuspend(ctx));

	return (ctx->methods->ctxsuspend(ctx));

}

isc_result_t

isc_app_ctxshutdown(isc_appctx_t *ctx) {

	REQUIRE(ISCAPI_APPCTX_VALID(ctx));

	if (isc_bind9)

		return (isc__app_ctxshutdown(ctx));

	return (ctx->methods->ctxshutdown(ctx));

}

void

isc_app_ctxfinish(isc_appctx_t *ctx) {

	REQUIRE(ISCAPI_APPCTX_VALID(ctx));

	if (isc_bind9)

		isc__app_ctxfinish(ctx);

	ctx->methods->ctxfinish(ctx);

}

void

isc_appctx_settaskmgr(isc_appctx_t *ctx, isc_taskmgr_t *taskmgr) {

	REQUIRE(ISCAPI_APPCTX_VALID(ctx));

	REQUIRE(taskmgr != NULL);

	if (isc_bind9)

		isc__appctx_settaskmgr(ctx, taskmgr);

	ctx->methods->settaskmgr(ctx, taskmgr);

}

void

isc_appctx_setsocketmgr(isc_appctx_t *ctx, isc_socketmgr_t *socketmgr) {

	REQUIRE(ISCAPI_APPCTX_VALID(ctx));

	REQUIRE(socketmgr != NULL);

	if (isc_bind9)

		isc__appctx_setsocketmgr(ctx, socketmgr);

	ctx->methods->setsocketmgr(ctx, socketmgr);

}

void

isc_appctx_settimermgr(isc_appctx_t *ctx, isc_timermgr_t *timermgr) {

	REQUIRE(ISCAPI_APPCTX_VALID(ctx));

	REQUIRE(timermgr != NULL);

	if (isc_bind9)

		isc__appctx_settimermgr(ctx, timermgr);

	ctx->methods->settimermgr(ctx, timermgr);

}

isc_result_t

isc_app_start(void) {

	if (isc_bind9)

		return (isc__app_start());

	return (ISC_R_NOTIMPLEMENTED);

}

isc_result_t

isc_app_onrun(isc_mem_t *mctx, isc_task_t *task,

	       isc_taskaction_t action, void *arg)

{

	if (isc_bind9)

		return (isc__app_onrun(mctx, task, action, arg));

	return (ISC_R_NOTIMPLEMENTED);

}

isc_result_t

isc_app_run() {

	if (isc_bind9) {

		isc_result_t result;

		RUNTIME_CHECK(isc_once_do(&once, initialize) == ISC_R_SUCCESS);

		LOCK(&runninglock);

		is_running = true;

		UNLOCK(&runninglock);

		result = isc__app_run();

		LOCK(&runninglock);

		is_running = false;

		UNLOCK(&runninglock);

		return (result);

	}

	return (ISC_R_NOTIMPLEMENTED);

}

bool

isc_app_isrunning() {

	bool running;

	RUNTIME_CHECK(isc_once_do(&once, initialize) == ISC_R_SUCCESS);

	LOCK(&runninglock);

	running = is_running;

	UNLOCK(&runninglock);

	return (running);

}

isc_result_t

isc_app_shutdown(void) {

	if (isc_bind9)

		return (isc__app_shutdown());

	return (ISC_R_NOTIMPLEMENTED);

}

isc_result_t

isc_app_reload(void) {

	if (isc_bind9)

		return (isc__app_reload());

	return (ISC_R_NOTIMPLEMENTED);

}

void

isc_app_finish(void) {

	if (!isc_bind9)

		return;

	isc__app_finish();

}

void

isc_app_block(void) {

	if (!isc_bind9)

		return;

	isc__app_block();

}

void

isc_app_unblock(void) {

	if (!isc_bind9)

		return;

	isc__app_unblock();

}