9eab9a1ed3
Revamp the event notification integration to rely on the PMIx event chaining and remove the duplicate chaining in OPAL. This ensures we get system-level events that target non-default handlers. Restore the hostname entries for MPI-level error messages, but provide an MCA param (orte_hostname_cutoff) to remove them for large clusters where the memory footprint is problematic. Set the default at 1000 nodes in the job (not the allocation). Begin first cut at memory profiler Some minor cleanups of memprobe Signed-off-by: Ralph Castain <rhc@open-mpi.org>
111 строки
3.2 KiB
C
111 строки
3.2 KiB
C
/*
|
|
* Copyright (c) 2014-2017 Intel, Inc. All rights reserved.
|
|
* Copyright (c) 2014-2015 Research Organization for Information Science
|
|
* and Technology (RIST). All rights reserved.
|
|
* Copyright (c) 2016 Cisco Systems, Inc. All rights reserved.
|
|
* $COPYRIGHT$
|
|
*
|
|
* Additional copyrights may follow
|
|
*
|
|
* $HEADER$
|
|
*
|
|
* These symbols are in a file by themselves to provide nice linker
|
|
* semantics. Since linkers generally pull in symbols by object
|
|
* files, keeping these symbols as the only symbols in this file
|
|
* prevents utility programs such as "ompi_info" from having to import
|
|
* entire components just to query their version and parameters.
|
|
*/
|
|
|
|
#include "opal_config.h"
|
|
|
|
#include "opal/constants.h"
|
|
#include "opal/class/opal_list.h"
|
|
#include "opal/util/proc.h"
|
|
#include "opal/mca/pmix/pmix.h"
|
|
#include "pmix2x.h"
|
|
|
|
/*
|
|
* Public string showing the pmix external component version number
|
|
*/
|
|
const char *opal_pmix_pmix2x_component_version_string =
|
|
"OPAL pmix2x MCA component version " OPAL_VERSION;
|
|
|
|
/*
|
|
* Local function
|
|
*/
|
|
static int external_open(void);
|
|
static int external_close(void);
|
|
static int external_component_query(mca_base_module_t **module, int *priority);
|
|
|
|
|
|
/*
|
|
* Instantiate the public struct with all of our public information
|
|
* and pointers to our public functions in it
|
|
*/
|
|
|
|
mca_pmix_pmix2x_component_t mca_pmix_pmix2x_component = {
|
|
{
|
|
/* First, the mca_component_t struct containing meta information
|
|
about the component itself */
|
|
|
|
.base_version = {
|
|
/* Indicate that we are a pmix v1.1.0 component (which also
|
|
implies a specific MCA version) */
|
|
|
|
OPAL_PMIX_BASE_VERSION_2_0_0,
|
|
|
|
/* Component name and version */
|
|
|
|
.mca_component_name = "pmix2x",
|
|
MCA_BASE_MAKE_VERSION(component, OPAL_MAJOR_VERSION, OPAL_MINOR_VERSION,
|
|
OPAL_RELEASE_VERSION),
|
|
|
|
/* Component open and close functions */
|
|
|
|
.mca_open_component = external_open,
|
|
.mca_close_component = external_close,
|
|
.mca_query_component = external_component_query,
|
|
},
|
|
/* Next the MCA v1.0.0 component meta data */
|
|
.base_data = {
|
|
/* The component is checkpoint ready */
|
|
MCA_BASE_METADATA_PARAM_CHECKPOINT
|
|
}
|
|
},
|
|
.native_launch = false
|
|
};
|
|
|
|
static int external_open(void)
|
|
{
|
|
mca_pmix_pmix2x_component.evindex = 0;
|
|
OBJ_CONSTRUCT(&mca_pmix_pmix2x_component.jobids, opal_list_t);
|
|
OBJ_CONSTRUCT(&mca_pmix_pmix2x_component.events, opal_list_t);
|
|
|
|
return OPAL_SUCCESS;
|
|
}
|
|
|
|
static int external_close(void)
|
|
{
|
|
OPAL_LIST_DESTRUCT(&mca_pmix_pmix2x_component.jobids);
|
|
OPAL_LIST_DESTRUCT(&mca_pmix_pmix2x_component.events);
|
|
return OPAL_SUCCESS;
|
|
}
|
|
|
|
|
|
static int external_component_query(mca_base_module_t **module, int *priority)
|
|
{
|
|
char *t, *id;
|
|
|
|
/* see if a PMIx server is present */
|
|
if (NULL != (t = getenv("PMIX_SERVER_URI")) ||
|
|
NULL != (id = getenv("PMIX_ID"))) {
|
|
/* if PMIx is present, then we are a client and need to use it */
|
|
*priority = 100;
|
|
} else {
|
|
/* we could be a server, so we still need to be considered */
|
|
*priority = 5;
|
|
}
|
|
*module = (mca_base_module_t *)&opal_pmix_pmix2x_module;
|
|
return OPAL_SUCCESS;
|
|
}
|