static int opal_if_base_register (mca_base_register_flag_t flags) { opal_if_do_not_resolve = false; (void) mca_base_framework_var_register (&opal_if_base_framework, "do_not_resolve", "If nonzero, do not attempt to resolve interfaces", MCA_BASE_VAR_TYPE_BOOL, NULL, 0, MCA_BASE_VAR_FLAG_SETTABLE, OPAL_INFO_LVL_9, MCA_BASE_VAR_SCOPE_ALL_EQ, &opal_if_do_not_resolve); opal_if_retain_loopback = false; (void) mca_base_framework_var_register (&opal_if_base_framework, "retain_loopback", "If nonzero, retain loopback interfaces", MCA_BASE_VAR_TYPE_BOOL, NULL, 0, MCA_BASE_VAR_FLAG_SETTABLE, OPAL_INFO_LVL_9, MCA_BASE_VAR_SCOPE_ALL_EQ, &opal_if_retain_loopback); return OPAL_SUCCESS; }
static int mca_plm_base_register(mca_base_register_flag_t flags) { orte_plm_globals.node_regex_threshold = 1024; (void) mca_base_framework_var_register (&orte_plm_base_framework, "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; }
int mca_base_framework_register (struct mca_base_framework_t *framework, mca_base_register_flag_t flags) { char *desc; int ret; assert (NULL != framework); if (framework_is_registered (framework)) { return OPAL_SUCCESS; } if (!(MCA_BASE_FRAMEWORK_FLAG_NOREGISTER & framework->framework_flags)) { /* register this framework with the MCA variable system */ ret = mca_base_var_group_register (framework->framework_project, framework->framework_name, NULL, framework->framework_description); if (0 > ret) { return ret; } asprintf (&desc, "Default selection set of components for the %s framework (<none>" " means use all components that can be found)", framework->framework_name); ret = mca_base_var_register (framework->framework_project, framework->framework_name, NULL, NULL, desc, MCA_BASE_VAR_TYPE_STRING, NULL, 0, MCA_BASE_VAR_FLAG_SETTABLE, OPAL_INFO_LVL_2, MCA_BASE_VAR_SCOPE_ALL_EQ, &framework->framework_selection); free (desc); if (0 > ret) { return ret; } /* register a verbosity variable for this framework */ asprintf (&desc, "Verbosity level for the %s framework (0 = no verbosity)", framework->framework_name); ret = mca_base_framework_var_register (framework, "verbose", desc, MCA_BASE_VAR_TYPE_INT, NULL, 0, MCA_BASE_VAR_FLAG_SETTABLE, OPAL_INFO_LVL_8, MCA_BASE_VAR_SCOPE_LOCAL, &framework->framework_verbose); free(desc); if (0 > ret) { return ret; } /* check the initial verbosity and open the output if necessary. we will recheck this on open */ framework_open_output (framework); /* register framework variables */ if (NULL != framework->framework_register) { ret = framework->framework_register (flags); if (OPAL_SUCCESS != ret) { return ret; } } /* register components variables */ ret = mca_base_framework_components_register (framework, flags); if (OPAL_SUCCESS != ret) { return ret; } } framework->framework_flags |= MCA_BASE_FRAMEWORK_FLAG_REGISTERED; /* framework did not provide a register function */ return OPAL_SUCCESS; }