Add a proper help message for the mca_verbose MCA param (and shuffle
the code to be slightly more efficient). This commit was SVN r24256.
Этот коммит содержится в:
родитель
fd7ef7a1f1
Коммит
189b541dbd
@ -9,6 +9,7 @@
|
|||||||
* University of Stuttgart. All rights reserved.
|
* University of Stuttgart. All rights reserved.
|
||||||
* Copyright (c) 2004-2005 The Regents of the University of California.
|
* Copyright (c) 2004-2005 The Regents of the University of California.
|
||||||
* All rights reserved.
|
* All rights reserved.
|
||||||
|
* Copyright (c) 2011 Cisco Systems, Inc. All rights reserved.
|
||||||
* $COPYRIGHT$
|
* $COPYRIGHT$
|
||||||
*
|
*
|
||||||
* Additional copyrights may follow
|
* Additional copyrights may follow
|
||||||
@ -56,7 +57,6 @@ static void parse_verbose(char *e, opal_output_stream_t *lds);
|
|||||||
*/
|
*/
|
||||||
int mca_base_open(void)
|
int mca_base_open(void)
|
||||||
{
|
{
|
||||||
int param_index;
|
|
||||||
char *value;
|
char *value;
|
||||||
opal_output_stream_t lds;
|
opal_output_stream_t lds;
|
||||||
char hostname[64];
|
char hostname[64];
|
||||||
@ -91,10 +91,7 @@ int mca_base_open(void)
|
|||||||
"Path where to look for Open MPI and ORTE components",
|
"Path where to look for Open MPI and ORTE components",
|
||||||
false, false, value, NULL);
|
false, false, value, NULL);
|
||||||
free(value);
|
free(value);
|
||||||
param_index = mca_base_param_reg_string_name("mca", "verbose",
|
|
||||||
"Top-level verbosity parameter",
|
|
||||||
false, false, NULL, NULL);
|
|
||||||
|
|
||||||
mca_base_param_reg_int_name("mca", "component_show_load_errors",
|
mca_base_param_reg_int_name("mca", "component_show_load_errors",
|
||||||
"Whether to show errors for components that failed to load or not",
|
"Whether to show errors for components that failed to load or not",
|
||||||
false, false, 1, NULL);
|
false, false, 1, NULL);
|
||||||
@ -103,9 +100,11 @@ int mca_base_open(void)
|
|||||||
"Whether to attempt to disable opening dynamic components or not",
|
"Whether to attempt to disable opening dynamic components or not",
|
||||||
false, false, 0, NULL);
|
false, false, 0, NULL);
|
||||||
|
|
||||||
/* What verbosity level do we want? */
|
/* What verbosity level do we want for the default 0 stream? */
|
||||||
|
|
||||||
mca_base_param_lookup_string(param_index, &value);
|
mca_base_param_reg_string_name("mca", "verbose",
|
||||||
|
"Specifies where the default error output stream goes (this is separate from distinct help messages). Accepts a comma-delimited list of: stderr, stdout, syslog, syslogpri:<notice|info|debug>, syslogid:<str> (where str is the prefix string for all syslog notices), file[:filename] (if filename is not specified, a default filename is used), fileappend (if not specified, the file is opened for truncation), level[:N] (if specified, integer verbose level; otherwise, 0 is implied)",
|
||||||
|
false, false, "stderr", &value);
|
||||||
memset(&lds, 0, sizeof(lds));
|
memset(&lds, 0, sizeof(lds));
|
||||||
if (NULL != value) {
|
if (NULL != value) {
|
||||||
parse_verbose(value, &lds);
|
parse_verbose(value, &lds);
|
||||||
@ -118,6 +117,7 @@ int mca_base_open(void)
|
|||||||
opal_output_reopen(0, &lds);
|
opal_output_reopen(0, &lds);
|
||||||
opal_output_verbose(5, 0, "mca: base: opening components");
|
opal_output_verbose(5, 0, "mca: base: opening components");
|
||||||
free(lds.lds_prefix);
|
free(lds.lds_prefix);
|
||||||
|
|
||||||
/* Open up the component repository */
|
/* Open up the component repository */
|
||||||
|
|
||||||
return mca_base_component_repository_init();
|
return mca_base_component_repository_init();
|
||||||
|
Загрузка…
Ссылка в новой задаче
Block a user