#include <stdlib.h>
#include <string.h>
#include <konkret/konkret.h>
#include <sss_dbus.h>
#include "LMI_SSSDBackendProvider.h"
#include "utils.h"

static const CMPIBroker* _cb;

static void LMI_SSSDBackendProviderInitialize(const CMPIContext *ctx)
{
    lmi_init(PROVIDER_NAME, _cb, ctx, NULL);
}

static CMPIStatus LMI_SSSDBackendProviderCleanup( 
    CMPIInstanceMI* mi,
    const CMPIContext* cc, 
    CMPIBoolean term)
{
    CMReturn(CMPI_RC_OK);
}

static CMPIStatus LMI_SSSDBackendProviderEnumInstanceNames( 
    CMPIInstanceMI* mi,
    const CMPIContext* cc,
    const CMPIResult* cr,
    const CMPIObjectPath* cop)
{
    return KDefaultEnumerateInstanceNames(
        _cb, mi, cc, cr, cop);
}

static CMPIStatus LMI_SSSDBackendProviderEnumInstances( 
    CMPIInstanceMI* mi,
    const CMPIContext* cc, 
    const CMPIResult* cr, 
    const CMPIObjectPath* cop, 
    const char** properties) 
{
    LMI_SSSDBackendProvider association;
    LMI_SSSDBackendRef ref_backend;
    LMI_SSSDProviderRef ref_provider;
    const char *namespace = KNameSpace(cop);
    sss_dbus_ctx *dbus_ctx = NULL;
    sss_dbus_attr **attrs = NULL;
    sss_dbus_error error;
    char **paths = NULL;
    const char *backend_name = NULL;
    const char * const *providers = NULL;
    char *provider_type = NULL;
    char *provider_module = NULL;
    unsigned int num_providers;
    CMPIrc ret;
    unsigned int j;
    int i;

    error = sss_dbus_init(&dbus_ctx);
    check_sss_dbus_error(error, ret, CMPI_RC_ERR_FAILED, done);

    error = sss_dbus_invoke_list(dbus_ctx, SSSD_DBUS_LIST_BACKENDS, &paths,
                                 DBUS_TYPE_INVALID);
    check_sss_dbus_error(error, ret, CMPI_RC_ERR_FAILED, done);

    for (i = 0; paths[i] != NULL; i++) {
        error = sss_dbus_fetch_all_attrs(dbus_ctx, paths[i],
                                         SSS_DBUS_IFACE_COMPONENTS, &attrs);
        check_sss_dbus_error(error, ret, SSSD_METHOD_ERROR_IO, done);

        error = sss_dbus_find_attr_as_string(attrs, "name", &backend_name);
        check_sss_dbus_error(error, ret, SSSD_METHOD_ERROR_IO, done);

        error = sss_dbus_find_attr_as_string_array(attrs, "providers",
                                                   &num_providers, &providers);
        check_sss_dbus_error(error, ret, SSSD_METHOD_ERROR_IO, done);

        if (num_providers == 0) {
            sss_dbus_free_attrs(dbus_ctx, &attrs);
            continue;
        }

        LMI_SSSDBackendRef_Init(&ref_backend, _cb, namespace);
        LMI_SSSDBackendRef_Set_Name(&ref_backend, backend_name);

        for (j = 0; j < num_providers; j++) {
            /* provider is a key=value pair */
            provider_type = strdup(providers[j]);
            if (provider_type == NULL) {
                goto done;
            }

            provider_module = strchr(provider_type, '=');
            if (provider_module == NULL) {
                provider_module = "";
            } else {
                *provider_module = '\0';
                provider_module++;
            }

            LMI_SSSDProviderRef_Init(&ref_provider, _cb, namespace);
            LMI_SSSDProviderRef_Set_Type(&ref_provider, provider_type);
            LMI_SSSDProviderRef_Set_Module(&ref_provider, provider_module);
            free(provider_type);

            LMI_SSSDBackendProvider_Init(&association, _cb, namespace);
            LMI_SSSDBackendProvider_Set_Backend(&association, &ref_backend);
            LMI_SSSDBackendProvider_Set_Provider(&association, &ref_provider);

            KReturnInstance(cr, association);
        }

        sss_dbus_free_attrs(dbus_ctx, &attrs);
    }

    ret = CMPI_RC_OK;

done:
    if (attrs != NULL) {
        sss_dbus_free_attrs(dbus_ctx, &attrs);
    }

    sss_dbus_free_string_array(dbus_ctx, &paths);
    sss_dbus_free(&dbus_ctx);
    CMReturn(ret);
}

static CMPIStatus LMI_SSSDBackendProviderGetInstance( 
    CMPIInstanceMI* mi, 
    const CMPIContext* cc,
    const CMPIResult* cr, 
    const CMPIObjectPath* cop, 
    const char** properties) 
{
    return KDefaultGetInstance(
        _cb, mi, cc, cr, cop, properties);
}

static CMPIStatus LMI_SSSDBackendProviderCreateInstance( 
    CMPIInstanceMI* mi, 
    const CMPIContext* cc, 
    const CMPIResult* cr, 
    const CMPIObjectPath* cop, 
    const CMPIInstance* ci) 
{
    CMReturn(CMPI_RC_ERR_NOT_SUPPORTED);
}

static CMPIStatus LMI_SSSDBackendProviderModifyInstance( 
    CMPIInstanceMI* mi, 
    const CMPIContext* cc, 
    const CMPIResult* cr, 
    const CMPIObjectPath* cop,
    const CMPIInstance* ci, 
    const char**properties) 
{
    CMReturn(CMPI_RC_ERR_NOT_SUPPORTED);
}

static CMPIStatus LMI_SSSDBackendProviderDeleteInstance( 
    CMPIInstanceMI* mi, 
    const CMPIContext* cc, 
    const CMPIResult* cr, 
    const CMPIObjectPath* cop) 
{
    CMReturn(CMPI_RC_ERR_NOT_SUPPORTED);
}

static CMPIStatus LMI_SSSDBackendProviderExecQuery(
    CMPIInstanceMI* mi, 
    const CMPIContext* cc, 
    const CMPIResult* cr, 
    const CMPIObjectPath* cop, 
    const char* lang, 
    const char* query) 
{
    CMReturn(CMPI_RC_ERR_NOT_SUPPORTED);
}

static CMPIStatus LMI_SSSDBackendProviderAssociationCleanup( 
    CMPIAssociationMI* mi,
    const CMPIContext* cc, 
    CMPIBoolean term) 
{
    CMReturn(CMPI_RC_OK);
}

static CMPIStatus LMI_SSSDBackendProviderAssociators(
    CMPIAssociationMI* mi,
    const CMPIContext* cc,
    const CMPIResult* cr,
    const CMPIObjectPath* cop,
    const char* assocClass,
    const char* resultClass,
    const char* role,
    const char* resultRole,
    const char** properties)
{
    return KDefaultAssociators(
        _cb,
        mi,
        cc,
        cr,
        cop,
        LMI_SSSDBackendProvider_ClassName,
        assocClass,
        resultClass,
        role,
        resultRole,
        properties);
}

static CMPIStatus LMI_SSSDBackendProviderAssociatorNames(
    CMPIAssociationMI* mi,
    const CMPIContext* cc,
    const CMPIResult* cr,
    const CMPIObjectPath* cop,
    const char* assocClass,
    const char* resultClass,
    const char* role,
    const char* resultRole)
{
    return KDefaultAssociatorNames(
        _cb,
        mi,
        cc,
        cr,
        cop,
        LMI_SSSDBackendProvider_ClassName,
        assocClass,
        resultClass,
        role,
        resultRole);
}

static CMPIStatus LMI_SSSDBackendProviderReferences(
    CMPIAssociationMI* mi,
    const CMPIContext* cc,
    const CMPIResult* cr,
    const CMPIObjectPath* cop,
    const char* assocClass,
    const char* role,
    const char** properties)
{
    return KDefaultReferences(
        _cb,
        mi,
        cc,
        cr,
        cop,
        LMI_SSSDBackendProvider_ClassName,
        assocClass,
        role,
        properties);
}

static CMPIStatus LMI_SSSDBackendProviderReferenceNames(
    CMPIAssociationMI* mi,
    const CMPIContext* cc,
    const CMPIResult* cr,
    const CMPIObjectPath* cop,
    const char* assocClass,
    const char* role)
{
    return KDefaultReferenceNames(
        _cb,
        mi,
        cc,
        cr,
        cop,
        LMI_SSSDBackendProvider_ClassName,
        assocClass,
        role);
}

CMInstanceMIStub( 
    LMI_SSSDBackendProvider,
    LMI_SSSDBackendProvider,
    _cb,
    LMI_SSSDBackendProviderInitialize(ctx))

CMAssociationMIStub( 
    LMI_SSSDBackendProvider,
    LMI_SSSDBackendProvider,
    _cb,
    LMI_SSSDBackendProviderInitialize(ctx))

KONKRET_REGISTRATION(
    "root/cimv2",
    "LMI_SSSDBackendProvider",
    "LMI_SSSDBackendProvider",
    "instance association")