#include <string.h>
#include <krb5.h>
#include <hdb.h>
#include <hx509.h>
#include <kdc.h>
#include <windc_plugin.h>

static krb5_error_code
windc_init(krb5_context context, void **ctx)
{
    krb5_warnx(context, "windc init");
    *ctx = NULL;
    return 0;
}

static void
windc_fini(void *ctx)
{
}

static krb5_error_code
pac_generate(void *ctx, krb5_context context,
	     struct hdb_entry_ex *client, krb5_pac *pac)
{
    krb5_error_code ret;
    krb5_data data;

    krb5_warnx(context, "pac generate");

    data.data = "\x00\x01";
    data.length = 2;

    ret = krb5_pac_init(context, pac);
    if (ret)
	return ret;

    ret = krb5_pac_add_buffer(context, *pac, 1, &data);
    if (ret)
	return ret;

    return 0;
}

static krb5_error_code
pac_verify(void *ctx, krb5_context context,
	   const krb5_principal new_ticket_client,
	   const krb5_principal delegation_proxy,
	   struct hdb_entry_ex * client,
	   struct hdb_entry_ex * server,
	   struct hdb_entry_ex * krbtgt,
	   krb5_pac *pac)
{
    krb5_error_code ret;
    krb5_data data;

    krb5_warnx(context, "pac_verify");

    ret = krb5_pac_get_buffer(context, *pac, 1, &data);
    if (ret)
	return ret;

    krb5_data_free(&data);

    return 0;
}

static krb5_error_code
client_access(void *ctx,
	      krb5_context context,
	      krb5_kdc_configuration *config,
	      hdb_entry_ex *client, const char *client_name,
	      hdb_entry_ex *server, const char *server_name,
	      KDC_REQ *req,
	      METHOD_DATA *data)
{
    krb5_warnx(context, "client_access");
    return 0;
}

static krb5plugin_windc_ftable windc = {
    KRB5_WINDC_PLUGING_MINOR,
    windc_init,
    windc_fini,
    pac_generate,
    pac_verify,
    client_access
};

static const krb5plugin_windc_ftable *const windc_plugins[] = {
    &windc
};

krb5_error_code
windc_plugin_load(krb5_context context,
		       krb5_get_instance_func_t *get_instance,
		       size_t *num_plugins,
		       const krb5plugin_windc_ftable *const **plugins);

static uintptr_t
windc_get_instance(const char *libname)
{
    if (strcmp(libname, "hdb") == 0)
	return hdb_get_instance(libname);
    else if (strcmp(libname, "krb5") == 0)
	return krb5_get_instance(libname);

    return 0;
}

krb5_error_code
windc_plugin_load(krb5_context context,
		  krb5_get_instance_func_t *get_instance,
		  size_t *num_plugins,
		  const krb5plugin_windc_ftable *const **plugins)
{
    *get_instance = windc_get_instance;
    *num_plugins = sizeof(windc_plugins) / sizeof(windc_plugins[0]);
    *plugins = windc_plugins;

    return 0;
}