32e71e5c6c
that were set on the command line. This was techinically exactly the
way the code was designed, but it certainly violated the Law of Least
Astonishment (even to its designer ;-) ). So now if you execute
something like this:
mpirun -mca pls_rsh_debug 1 -np 4 hello
You'll see debugging output from the rsh pls component, as you would
expect (this was not previously the case -- the MCA pls_rsh_debug
parame would be set to 1 in the 4 spawned hello processes, but *not*
in the orterun process).
More specifically, MCA parameters will be set in the orterun process
in the following cases:
- The new command line switch "--gmca" (or "-gmca") is used,
indicating that the MCA parameter is "global". --gmca also means
that that MCA parameter will be applied to all context app's. For
example:
mpirun -gmca foo bar -np 1 hello : -np 2 goodbye
The foo MCA param will be set in both the hello and goodbye
processes.
- If there is only one context app. For example:
mpirun -mca pls_rsh_debug 1 -np 4 hello
will set pls_rsh_debug to 1 in both the orterun process and the 4
spawned hello processes.
Also added a few more comments inside orterun to document a somewhat
confusing use of a state variable in a recursive case.
This commit was SVN r6764.
175 строки
5.7 KiB
C
175 строки
5.7 KiB
C
/*
|
|
* Copyright (c) 2004-2005 The Trustees of Indiana University.
|
|
* All rights reserved.
|
|
* Copyright (c) 2004-2005 The Trustees of the University of Tennessee.
|
|
* 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$
|
|
*
|
|
* Additional copyrights may follow
|
|
*
|
|
* $HEADER$
|
|
*/
|
|
|
|
#ifndef MCA_BASE_H
|
|
#define MCA_BASE_H
|
|
|
|
#include "ompi_config.h"
|
|
|
|
#if OMPI_WANT_LIBLTDL
|
|
#include "libltdl/ltdl.h"
|
|
#endif
|
|
|
|
#include "opal/class/opal_object.h"
|
|
|
|
/*
|
|
* These units are large enough to warrant their own .h files
|
|
*/
|
|
#include "mca/mca.h"
|
|
#include "mca/base/mca_base_param.h"
|
|
#include "mca/base/mca_base_msgbuf.h"
|
|
|
|
#if defined(c_plusplus) || defined(__cplusplus)
|
|
extern "C" {
|
|
#endif
|
|
|
|
/*
|
|
* Structure for making plain lists of components
|
|
*/
|
|
struct mca_base_component_list_item_t {
|
|
opal_list_item_t super;
|
|
const mca_base_component_t *cli_component;
|
|
};
|
|
typedef struct mca_base_component_list_item_t mca_base_component_list_item_t;
|
|
OBJ_CLASS_DECLARATION(mca_base_component_list_item_t);
|
|
|
|
|
|
/*
|
|
* Structure for making priority lists of components
|
|
*/
|
|
struct mca_base_component_priority_list_item_t {
|
|
mca_base_component_list_item_t super;
|
|
|
|
int cpli_priority;
|
|
};
|
|
typedef struct mca_base_component_priority_list_item_t
|
|
mca_base_component_priority_list_item_t;
|
|
OBJ_CLASS_DECLARATION(mca_base_component_priority_list_item_t);
|
|
|
|
|
|
/*
|
|
* Public variables
|
|
*/
|
|
OMPI_DECLSPEC extern int mca_base_param_component_path;
|
|
|
|
|
|
/*
|
|
* Public functions
|
|
*/
|
|
|
|
/**
|
|
* First function called in the MCA.
|
|
*
|
|
* @return OMPI_SUCCESS Upon success
|
|
* @return OMPI_ERROR Upon failure
|
|
*
|
|
* This function starts up the entire MCA. It initializes a bunch
|
|
* of built-in MCA parameters, and initialized the MCA component
|
|
* repository.
|
|
*
|
|
* It must be the first MCA function invoked. It is normally
|
|
* invoked during ompi_mpi_init() and specifically invoked in the
|
|
* special case of the laminfo command.
|
|
*/
|
|
OMPI_DECLSPEC int mca_base_open(void);
|
|
|
|
/**
|
|
* Last function called in the MCA
|
|
*
|
|
* @return OMPI_SUCCESS Upon success
|
|
* @return OMPI_ERROR Upon failure
|
|
*
|
|
* This function closes down the entire MCA. It clears all MCA
|
|
* parameters and closes down the MCA component respository.
|
|
*
|
|
* It must be the last MCA function invoked. It is normally invoked
|
|
* during ompi_mpi_finalize() and specifically invoked during the
|
|
* special case of the laminfo command.
|
|
*/
|
|
OMPI_DECLSPEC int mca_base_close(void);
|
|
|
|
/* mca_base_cmd_line.c */
|
|
|
|
OMPI_DECLSPEC int mca_base_cmd_line_setup(opal_cmd_line_t *cmd);
|
|
OMPI_DECLSPEC int mca_base_cmd_line_process_args(opal_cmd_line_t *cmd,
|
|
char ***app_env,
|
|
char ***global_env);
|
|
|
|
/* mca_base_component_compare.c */
|
|
|
|
OMPI_DECLSPEC int mca_base_component_compare_priority(mca_base_component_priority_list_item_t *a,
|
|
mca_base_component_priority_list_item_t *b);
|
|
OMPI_DECLSPEC int mca_base_component_compare(const mca_base_component_t *a,
|
|
const mca_base_component_t *b);
|
|
int mca_base_component_compatible(const mca_base_component_t *a,
|
|
const mca_base_component_t *b);
|
|
|
|
/* mca_base_component_find.c */
|
|
|
|
OMPI_DECLSPEC int mca_base_component_find(const char *directory, const char *type,
|
|
const mca_base_component_t *static_components[],
|
|
opal_list_t *found_components,
|
|
bool open_dso_components);
|
|
|
|
/* mca_base_component_register.c */
|
|
|
|
#if ! OMPI_WANT_LIBLTDL
|
|
/* if we don't have libltdl, provide dummy handle type */
|
|
typedef void* lt_dlhandle;
|
|
#endif
|
|
|
|
OMPI_DECLSPEC int mca_base_component_repository_initialize(void);
|
|
OMPI_DECLSPEC int mca_base_component_repository_retain(char *type,
|
|
lt_dlhandle component_handle,
|
|
const mca_base_component_t *component_struct);
|
|
OMPI_DECLSPEC int mca_base_component_repository_retain_component(const char *type,
|
|
const char *name);
|
|
OMPI_DECLSPEC int mca_base_component_repository_link(const char *src_type,
|
|
const char *src_name,
|
|
const char *depend_type,
|
|
const char *depend_name);
|
|
OMPI_DECLSPEC void mca_base_component_repository_release(const mca_base_component_t *component);
|
|
OMPI_DECLSPEC void mca_base_component_repository_finalize(void);
|
|
|
|
/* mca_base_components_open.c */
|
|
|
|
OMPI_DECLSPEC int mca_base_components_open(const char *type_name, int output_id,
|
|
const mca_base_component_t **static_components,
|
|
opal_list_t *components_available,
|
|
bool open_dso_components);
|
|
|
|
/* mca_base_components_close.c */
|
|
|
|
OMPI_DECLSPEC int mca_base_components_close(int output_id, opal_list_t *components_available,
|
|
const mca_base_component_t *skip);
|
|
|
|
#if 0
|
|
/* JMS Not implemented yet */
|
|
int mca_base_init_callback(mca_base_init_cb_t func);
|
|
int mca_base_init_callbacks_invoke(void);
|
|
int mca_base_component_select(int requested);
|
|
|
|
int mca_base_param_associate(int index, int keyval);
|
|
int mca_base_param_lookup_int(int index, MPI_Comm comm);
|
|
char *mca_base_param_lookup_string(int index, MPI_Comm comm);
|
|
#endif
|
|
|
|
#if defined(c_plusplus) || defined(__cplusplus)
|
|
}
|
|
#endif
|
|
|
|
#endif /* MCA_BASE_H */
|