1
1
openmpi/opal/mca/crs/blcr/crs_blcr_component.c
Jeff Squyres 0af7ac53f2 Fixes trac:1392, #1400
* add "register" function to mca_base_component_t
   * converted coll:basic and paffinity:linux and paffinity:solaris to
     use this function
   * we'll convert the rest over time (I'll file a ticket once all
     this is committed)
 * add 32 bytes of "reserved" space to the end of mca_base_component_t
   and mca_base_component_data_2_0_0_t to make future upgrades
   [slightly] easier
   * new mca_base_component_t size: 196 bytes
   * new mca_base_component_data_2_0_0_t size: 36 bytes
 * MCA base version bumped to v2.0
   * '''We now refuse to load components that are not MCA v2.0.x'''
 * all MCA frameworks versions bumped to v2.0
 * be a little more explicit about version numbers in the MCA base
   * add big comment in mca.h about versioning philosophy

This commit was SVN r19073.

The following Trac tickets were found above:
  Ticket 1392 --> https://svn.open-mpi.org/trac/ompi/ticket/1392
2008-07-28 22:40:57 +00:00

119 строки
3.8 KiB
C

/*
* Copyright (c) 2004-2008 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$
*/
#include "opal_config.h"
#include "opal/util/output.h"
#include "opal/constants.h"
#include "opal/mca/crs/crs.h"
#include "opal/mca/crs/base/base.h"
#include "crs_blcr.h"
/*
* Local functionality
*/
static int crs_blcr_open(void);
static int crs_blcr_close(void);
/*
* Instantiate the public struct with all of our public information
* and pointer to our public functions in it
*/
opal_crs_blcr_component_t mca_crs_blcr_component = {
/* First do the base component stuff */
{
/* Handle the general mca_component_t struct containing
* meta information about the component itself
*/
{
OPAL_CRS_BASE_VERSION_2_0_0,
/* Component name and version */
"blcr",
OMPI_MAJOR_VERSION,
OMPI_MINOR_VERSION,
OMPI_RELEASE_VERSION,
/* Component open and close functions */
crs_blcr_open,
crs_blcr_close,
opal_crs_blcr_component_query
},
{
/* The component is checkpoint ready */
MCA_BASE_METADATA_PARAM_CHECKPOINT
},
/* Verbosity level */
0,
/* opal_output handler */
-1,
/* Default priority */
50
}
};
static int crs_blcr_open(void)
{
mca_base_param_reg_int(&mca_crs_blcr_component.super.base_version,
"priority",
"Priority of the CRS blcr component",
false, false,
mca_crs_blcr_component.super.priority,
&mca_crs_blcr_component.super.priority);
mca_base_param_reg_int(&mca_crs_blcr_component.super.base_version,
"verbose",
"Verbose level for the CRS blcr component",
false, false,
mca_crs_blcr_component.super.verbose,
&mca_crs_blcr_component.super.verbose);
/* If there is a custom verbose level for this component than use it
* otherwise take our parents level and output channel
*/
if ( 0 != mca_crs_blcr_component.super.verbose) {
mca_crs_blcr_component.super.output_handle = opal_output_open(NULL);
opal_output_set_verbosity(mca_crs_blcr_component.super.output_handle,
mca_crs_blcr_component.super.verbose);
} else {
mca_crs_blcr_component.super.output_handle = opal_crs_base_output;
}
/*
* Debug output
*/
opal_output_verbose(10, mca_crs_blcr_component.super.output_handle,
"crs:blcr: open()");
opal_output_verbose(20, mca_crs_blcr_component.super.output_handle,
"crs:blcr: open: priority = %d",
mca_crs_blcr_component.super.priority);
opal_output_verbose(20, mca_crs_blcr_component.super.output_handle,
"crs:blcr: open: verbosity = %d",
mca_crs_blcr_component.super.verbose);
return OPAL_SUCCESS;
}
static int crs_blcr_close(void)
{
opal_output_verbose(10, mca_crs_blcr_component.super.output_handle,
"crs:blcr: close()");
return OPAL_SUCCESS;
}