799152e7fb
This parameter can be used to set the node regex max length that can be passed to the orted command line. For testing purpose, it can be set to zero in order to force the node regex being retrieved by orted from its parent. Signed-off-by: Gilles Gouaillardet <gilles@rist.or.jp>
106 строки
3.4 KiB
C
106 строки
3.4 KiB
C
/*
|
|
* Copyright (c) 2004-2005 The Trustees of Indiana University and Indiana
|
|
* University Research and Technology
|
|
* Corporation. All rights reserved.
|
|
* Copyright (c) 2004-2005 The University of Tennessee and The University
|
|
* of Tennessee Research Foundation. All rights
|
|
* reserved.
|
|
* Copyright (c) 2004-2005 High Performance Computing Center Stuttgart,
|
|
* University of Stuttgart. All rights reserved.
|
|
* Copyright (c) 2004-2005 The Regents of the University of California.
|
|
* All rights reserved.
|
|
* Copyright (c) 2011-2013 Los Alamos National Security, LLC.
|
|
* All rights reserved.
|
|
* Copyright (c) 2015-2017 Research Organization for Information Science
|
|
* and Technology (RIST). All rights reserved.
|
|
* $COPYRIGHT$
|
|
*
|
|
* Additional copyrights may follow
|
|
*
|
|
* $HEADER$
|
|
*/
|
|
|
|
|
|
#include "orte_config.h"
|
|
#include "orte/constants.h"
|
|
|
|
#include "opal/util/output.h"
|
|
#include "orte/mca/mca.h"
|
|
#include "opal/mca/base/base.h"
|
|
|
|
#include "orte/mca/errmgr/errmgr.h"
|
|
#include "orte/mca/plm/plm.h"
|
|
#include "orte/mca/plm/base/plm_private.h"
|
|
#include "orte/mca/plm/base/base.h"
|
|
|
|
/*
|
|
* The following file was created by configure. It contains extern
|
|
* statements and the definition of an array of pointers to each
|
|
* module's public mca_base_module_t struct.
|
|
*/
|
|
|
|
#include "orte/mca/plm/base/static-components.h"
|
|
|
|
/*
|
|
* Global variables for use within PLM frameworks
|
|
*/
|
|
orte_plm_globals_t orte_plm_globals = {0};
|
|
|
|
/*
|
|
* The default module
|
|
*/
|
|
orte_plm_base_module_t orte_plm = {0};
|
|
|
|
|
|
static int mca_plm_base_register(mca_base_register_flag_t flags)
|
|
{
|
|
orte_plm_globals.node_regex_threshold = 1024;
|
|
(void) mca_base_var_register("orte", "pml", "base", "node_regex_threshold",
|
|
"Only pass the node regex on the orted command line if smaller than this threshold",
|
|
MCA_BASE_VAR_TYPE_SIZE_T, NULL, 0,
|
|
MCA_BASE_VAR_FLAG_INTERNAL,
|
|
OPAL_INFO_LVL_9,
|
|
MCA_BASE_VAR_SCOPE_READONLY,
|
|
&orte_plm_globals.node_regex_threshold);
|
|
return ORTE_SUCCESS;
|
|
}
|
|
|
|
static int orte_plm_base_close(void)
|
|
{
|
|
int rc;
|
|
|
|
/* Close the selected component */
|
|
if( NULL != orte_plm.finalize ) {
|
|
orte_plm.finalize();
|
|
}
|
|
|
|
/* if we are the HNP, then stop our receive */
|
|
if (ORTE_PROC_IS_HNP) {
|
|
if (ORTE_SUCCESS != (rc = orte_plm_base_comm_stop())) {
|
|
ORTE_ERROR_LOG(rc);
|
|
return rc;
|
|
}
|
|
}
|
|
|
|
return mca_base_framework_components_close(&orte_plm_base_framework, NULL);
|
|
}
|
|
|
|
/**
|
|
* Function for finding and opening either all MCA components,
|
|
* or the one that was specifically requested via a MCA parameter.
|
|
*/
|
|
static int orte_plm_base_open(mca_base_open_flag_t flags)
|
|
{
|
|
/* init the next jobid */
|
|
orte_plm_globals.next_jobid = 1;
|
|
|
|
/* default to assigning daemons to nodes at launch */
|
|
orte_plm_globals.daemon_nodes_assigned_at_launch = true;
|
|
|
|
/* Open up all available components */
|
|
return mca_base_framework_components_open(&orte_plm_base_framework, flags);
|
|
}
|
|
|
|
MCA_BASE_FRAMEWORK_DECLARE(orte, plm, NULL, mca_plm_base_register, orte_plm_base_open, orte_plm_base_close,
|
|
mca_plm_base_static_components, 0);
|