1
1
openmpi/opal/mca/sec/base/sec_base_frame.c
2015-06-23 20:59:57 -07:00

74 строки
1.8 KiB
C

/*
* Copyright (c) 2014-2015 Intel, Inc. All rights reserved.
* Copyright (c) 2015 Research Organization for Information Science
* and Technology (RIST). All rights reserved.
* $COPYRIGHT$
*
* Additional copyrights may follow
*
* $HEADER$
*/
#include "opal_config.h"
#include "opal/constants.h"
#include "opal/mca/mca.h"
#include "opal/util/output.h"
#include "opal/mca/base/base.h"
#include "opal/dss/dss_types.h"
#include "opal/mca/sec/base/base.h"
/*
* The following file was created by configure. It contains extern
* secments and the definition of an array of pointers to each
* module's public mca_base_module_t struct.
*/
#include "opal/mca/sec/base/static-components.h"
opal_sec_API_module_t opal_sec = {
opal_sec_base_get_cred,
opal_sec_base_validate
};
opal_list_t opal_sec_base_actives = {{0}};
static int opal_sec_base_close(void)
{
opal_sec_handle_t *hdl;
/* let the selected modules finalize */
OPAL_LIST_FOREACH(hdl, &opal_sec_base_actives, opal_sec_handle_t) {
if (NULL != hdl->module->finalize) {
hdl->module->finalize();
}
}
OPAL_LIST_DESTRUCT(&opal_sec_base_actives);
return mca_base_framework_components_close(&opal_sec_base_framework, NULL);
}
static int opal_sec_base_open(mca_base_open_flag_t flags)
{
OBJ_CONSTRUCT(&opal_sec_base_actives, opal_list_t);
/* Open up all available components */
return mca_base_framework_components_open(&opal_sec_base_framework, flags);
}
MCA_BASE_FRAMEWORK_DECLARE(opal, sec, NULL, NULL, opal_sec_base_open, opal_sec_base_close,
mca_sec_base_static_components, 0);
static void hcon(opal_sec_handle_t *p)
{
p->pri = 0;
p->module = NULL;
p->component = NULL;
}
OBJ_CLASS_INSTANCE(opal_sec_handle_t,
opal_list_item_t,
hcon, NULL);