This is actually a much smaller commit than it appears at first glance - it just touches a lot of files. The --without-rte-support configuration option has never really been implemented completely. The option caused various objects not to be defined and conditionally compiled some base functions, but did nothing to prevent build of the component libraries. Unfortunately, since many of those components use objects covered by the option, it caused builds to break if those components were allowed to build.
Brian dealt with this in the past by creating platform files and using "no-build" to block the components. This was clunky, but acceptable when only one organization was using that option. However, that number has now expanded to at least two more locations. Accordingly, make --without-rte-support actually work by adding appropriate configury to prevent components from building when they shouldn't. While doing so, remove two frameworks (db and rmcast) that are no longer used as ORCM comes to a close (besides, they belonged in ORCM now anyway). Do some minor cleanups along the way. This commit was SVN r25497.
Этот коммит содержится в:
Ralph Castain
родитель
cce0949bda
Коммит
9b59d8de6f
@ -21,8 +21,8 @@ r2_sources = \
|
|||||||
bml_r2.c \
|
bml_r2.c \
|
||||||
bml_r2.h \
|
bml_r2.h \
|
||||||
bml_r2_component.c \
|
bml_r2_component.c \
|
||||||
bml_r2_ft.c \
|
bml_r2_ft.c \
|
||||||
bml_r2_ft.h
|
bml_r2_ft.h
|
||||||
|
|
||||||
dist_pkgdata_DATA = help-mca-bml-r2.txt
|
dist_pkgdata_DATA = help-mca-bml-r2.txt
|
||||||
|
|
||||||
|
|||||||
@ -38,6 +38,7 @@
|
|||||||
|
|
||||||
int mca_bml_r2_ft_event(int state)
|
int mca_bml_r2_ft_event(int state)
|
||||||
{
|
{
|
||||||
|
#if !ORTE_DISABLE_FULL_SUPPORT
|
||||||
static bool first_continue_pass = false;
|
static bool first_continue_pass = false;
|
||||||
ompi_proc_t** procs = NULL;
|
ompi_proc_t** procs = NULL;
|
||||||
size_t num_procs;
|
size_t num_procs;
|
||||||
@ -297,6 +298,7 @@ int mca_bml_r2_ft_event(int state)
|
|||||||
else {
|
else {
|
||||||
;
|
;
|
||||||
}
|
}
|
||||||
|
#endif
|
||||||
|
|
||||||
return OMPI_SUCCESS;
|
return OMPI_SUCCESS;
|
||||||
}
|
}
|
||||||
|
|||||||
21
ompi/mca/dpm/orte/configure.m4
Обычный файл
21
ompi/mca/dpm/orte/configure.m4
Обычный файл
@ -0,0 +1,21 @@
|
|||||||
|
# -*- shell-script -*-
|
||||||
|
#
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
#
|
||||||
|
# $COPYRIGHT$
|
||||||
|
#
|
||||||
|
# Additional copyrights may follow
|
||||||
|
#
|
||||||
|
# $HEADER$
|
||||||
|
#
|
||||||
|
|
||||||
|
# MCA_dpm_orte_CONFIG([action-if-found], [action-if-not-found])
|
||||||
|
# -----------------------------------------------------------
|
||||||
|
AC_DEFUN([MCA_ompi_dpm_orte_CONFIG],[
|
||||||
|
AC_CONFIG_FILES([ompi/mca/dpm/orte/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
|
])dnl
|
||||||
21
ompi/mca/pubsub/orte/configure.m4
Обычный файл
21
ompi/mca/pubsub/orte/configure.m4
Обычный файл
@ -0,0 +1,21 @@
|
|||||||
|
# -*- shell-script -*-
|
||||||
|
#
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
#
|
||||||
|
# $COPYRIGHT$
|
||||||
|
#
|
||||||
|
# Additional copyrights may follow
|
||||||
|
#
|
||||||
|
# $HEADER$
|
||||||
|
#
|
||||||
|
|
||||||
|
# MCA_pubsub_orte_CONFIG([action-if-found], [action-if-not-found])
|
||||||
|
# -----------------------------------------------------------
|
||||||
|
AC_DEFUN([MCA_ompi_pubsub_orte_CONFIG],[
|
||||||
|
AC_CONFIG_FILES([ompi/mca/pubsub/orte/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
|
])dnl
|
||||||
@ -10,7 +10,7 @@
|
|||||||
* 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) 2006-2010 Cisco Systems, Inc. All rights reserved.
|
* Copyright (c) 2006-2010 Cisco Systems, Inc. All rights reserved.
|
||||||
* Copyright (c) 2010 Los Alamos National Security, LLC.
|
* Copyright (c) 2010-2011 Los Alamos National Security, LLC.
|
||||||
* All rights reserved.
|
* All rights reserved.
|
||||||
* Copyright (c) 2011 University of Houston. All rights reserved.
|
* Copyright (c) 2011 University of Houston. All rights reserved.
|
||||||
* $COPYRIGHT$
|
* $COPYRIGHT$
|
||||||
@ -103,15 +103,13 @@
|
|||||||
#include "orte/mca/errmgr/base/base.h"
|
#include "orte/mca/errmgr/base/base.h"
|
||||||
#include "orte/mca/grpcomm/grpcomm.h"
|
#include "orte/mca/grpcomm/grpcomm.h"
|
||||||
#include "orte/mca/grpcomm/base/base.h"
|
#include "orte/mca/grpcomm/base/base.h"
|
||||||
#include "orte/mca/db/db.h"
|
|
||||||
#include "orte/mca/db/base/base.h"
|
|
||||||
#include "orte/mca/ess/ess.h"
|
#include "orte/mca/ess/ess.h"
|
||||||
#include "orte/mca/ess/base/base.h"
|
#include "orte/mca/ess/base/base.h"
|
||||||
#include "orte/mca/notifier/notifier.h"
|
|
||||||
#include "orte/mca/notifier/base/base.h"
|
|
||||||
#include "orte/util/show_help.h"
|
#include "orte/util/show_help.h"
|
||||||
#include "orte/util/proc_info.h"
|
#include "orte/util/proc_info.h"
|
||||||
#if !ORTE_DISABLE_FULL_SUPPORT
|
#if !ORTE_DISABLE_FULL_SUPPORT
|
||||||
|
#include "orte/mca/notifier/notifier.h"
|
||||||
|
#include "orte/mca/notifier/base/base.h"
|
||||||
#include "orte/mca/debugger/debugger.h"
|
#include "orte/mca/debugger/debugger.h"
|
||||||
#include "orte/mca/debugger/base/base.h"
|
#include "orte/mca/debugger/base/base.h"
|
||||||
#include "orte/mca/iof/iof.h"
|
#include "orte/mca/iof/iof.h"
|
||||||
@ -124,8 +122,6 @@
|
|||||||
#include "orte/mca/ras/base/ras_private.h"
|
#include "orte/mca/ras/base/ras_private.h"
|
||||||
#include "orte/mca/rmaps/rmaps.h"
|
#include "orte/mca/rmaps/rmaps.h"
|
||||||
#include "orte/mca/rmaps/base/base.h"
|
#include "orte/mca/rmaps/base/base.h"
|
||||||
#include "orte/mca/rmcast/rmcast.h"
|
|
||||||
#include "orte/mca/rmcast/base/base.h"
|
|
||||||
#include "orte/mca/rml/rml.h"
|
#include "orte/mca/rml/rml.h"
|
||||||
#include "orte/mca/rml/base/base.h"
|
#include "orte/mca/rml/base/base.h"
|
||||||
#include "orte/mca/routed/routed.h"
|
#include "orte/mca/routed/routed.h"
|
||||||
@ -418,14 +414,6 @@ void ompi_info_open_components(void)
|
|||||||
map->components = &orte_grpcomm_base.components_available;
|
map->components = &orte_grpcomm_base.components_available;
|
||||||
opal_pointer_array_add(&component_map, map);
|
opal_pointer_array_add(&component_map, map);
|
||||||
|
|
||||||
if (ORTE_SUCCESS != orte_db_base_open()) {
|
|
||||||
goto error;
|
|
||||||
}
|
|
||||||
map = OBJ_NEW(ompi_info_component_map_t);
|
|
||||||
map->type = strdup("db");
|
|
||||||
map->components = &orte_db_base_components_available;
|
|
||||||
opal_pointer_array_add(&component_map, map);
|
|
||||||
|
|
||||||
if (ORTE_SUCCESS != orte_ess_base_open()) {
|
if (ORTE_SUCCESS != orte_ess_base_open()) {
|
||||||
goto error;
|
goto error;
|
||||||
}
|
}
|
||||||
@ -434,6 +422,7 @@ void ompi_info_open_components(void)
|
|||||||
map->components = &orte_ess_base_components_available;
|
map->components = &orte_ess_base_components_available;
|
||||||
opal_pointer_array_add(&component_map, map);
|
opal_pointer_array_add(&component_map, map);
|
||||||
|
|
||||||
|
#if !ORTE_DISABLE_FULL_SUPPORT
|
||||||
if (ORTE_SUCCESS != orte_notifier_base_open()) {
|
if (ORTE_SUCCESS != orte_notifier_base_open()) {
|
||||||
goto error;
|
goto error;
|
||||||
}
|
}
|
||||||
@ -442,7 +431,6 @@ void ompi_info_open_components(void)
|
|||||||
map->components = &orte_notifier_base_components_available;
|
map->components = &orte_notifier_base_components_available;
|
||||||
opal_pointer_array_add(&component_map, map);
|
opal_pointer_array_add(&component_map, map);
|
||||||
|
|
||||||
#if !ORTE_DISABLE_FULL_SUPPORT
|
|
||||||
if (ORTE_SUCCESS != orte_debugger_base_open()) {
|
if (ORTE_SUCCESS != orte_debugger_base_open()) {
|
||||||
goto error;
|
goto error;
|
||||||
}
|
}
|
||||||
@ -491,14 +479,6 @@ void ompi_info_open_components(void)
|
|||||||
map->components = &orte_rmaps_base.available_components;
|
map->components = &orte_rmaps_base.available_components;
|
||||||
opal_pointer_array_add(&component_map, map);
|
opal_pointer_array_add(&component_map, map);
|
||||||
|
|
||||||
if (ORTE_SUCCESS != orte_rmcast_base_open()) {
|
|
||||||
goto error;
|
|
||||||
}
|
|
||||||
map = OBJ_NEW(ompi_info_component_map_t);
|
|
||||||
map->type = strdup("rmcast");
|
|
||||||
map->components = &orte_rmcast_base.rmcast_opened;
|
|
||||||
opal_pointer_array_add(&component_map, map);
|
|
||||||
|
|
||||||
if (ORTE_SUCCESS != orte_rml_base_open()) {
|
if (ORTE_SUCCESS != orte_rml_base_open()) {
|
||||||
goto error;
|
goto error;
|
||||||
}
|
}
|
||||||
@ -799,8 +779,6 @@ void ompi_info_close_components()
|
|||||||
(void) ompi_osc_base_close();
|
(void) ompi_osc_base_close();
|
||||||
|
|
||||||
(void) orte_grpcomm_base_close();
|
(void) orte_grpcomm_base_close();
|
||||||
(void) orte_db_base_close();
|
|
||||||
(void) orte_notifier_base_close();
|
|
||||||
(void) orte_ess_base_close();
|
(void) orte_ess_base_close();
|
||||||
(void) orte_show_help_finalize();
|
(void) orte_show_help_finalize();
|
||||||
#if !ORTE_DISABLE_FULL_SUPPORT
|
#if !ORTE_DISABLE_FULL_SUPPORT
|
||||||
@ -808,6 +786,7 @@ void ompi_info_close_components()
|
|||||||
(void) orte_snapc_base_close();
|
(void) orte_snapc_base_close();
|
||||||
(void) orte_sstore_base_close();
|
(void) orte_sstore_base_close();
|
||||||
#endif
|
#endif
|
||||||
|
(void) orte_notifier_base_close();
|
||||||
(void) orte_filem_base_close();
|
(void) orte_filem_base_close();
|
||||||
(void) orte_iof_base_close();
|
(void) orte_iof_base_close();
|
||||||
(void) orte_plm_base_close();
|
(void) orte_plm_base_close();
|
||||||
@ -818,7 +797,6 @@ void ompi_info_close_components()
|
|||||||
(void) orte_routed_base_close();
|
(void) orte_routed_base_close();
|
||||||
(void) mca_oob_base_close();
|
(void) mca_oob_base_close();
|
||||||
|
|
||||||
(void) orte_rmcast_base_close();
|
|
||||||
#endif
|
#endif
|
||||||
(void) orte_errmgr_base_close();
|
(void) orte_errmgr_base_close();
|
||||||
|
|
||||||
|
|||||||
@ -239,7 +239,6 @@ int main(int argc, char *argv[])
|
|||||||
opal_pointer_array_add(&mca_types, "odls");
|
opal_pointer_array_add(&mca_types, "odls");
|
||||||
opal_pointer_array_add(&mca_types, "ras");
|
opal_pointer_array_add(&mca_types, "ras");
|
||||||
opal_pointer_array_add(&mca_types, "rmaps");
|
opal_pointer_array_add(&mca_types, "rmaps");
|
||||||
opal_pointer_array_add(&mca_types, "rmcast");
|
|
||||||
opal_pointer_array_add(&mca_types, "rml");
|
opal_pointer_array_add(&mca_types, "rml");
|
||||||
opal_pointer_array_add(&mca_types, "routed");
|
opal_pointer_array_add(&mca_types, "routed");
|
||||||
opal_pointer_array_add(&mca_types, "plm");
|
opal_pointer_array_add(&mca_types, "plm");
|
||||||
@ -256,7 +255,6 @@ int main(int argc, char *argv[])
|
|||||||
opal_pointer_array_add(&mca_types, "errmgr");
|
opal_pointer_array_add(&mca_types, "errmgr");
|
||||||
opal_pointer_array_add(&mca_types, "ess");
|
opal_pointer_array_add(&mca_types, "ess");
|
||||||
opal_pointer_array_add(&mca_types, "grpcomm");
|
opal_pointer_array_add(&mca_types, "grpcomm");
|
||||||
opal_pointer_array_add(&mca_types, "db");
|
|
||||||
opal_pointer_array_add(&mca_types, "notifier");
|
opal_pointer_array_add(&mca_types, "notifier");
|
||||||
|
|
||||||
/* Execute the desired action(s) */
|
/* Execute the desired action(s) */
|
||||||
|
|||||||
@ -77,25 +77,6 @@ AC_DEFINE_UNQUOTED([ORTE_WANT_ORTERUN_PREFIX_BY_DEFAULT],
|
|||||||
[$orte_want_orterun_prefix_by_default],
|
[$orte_want_orterun_prefix_by_default],
|
||||||
[Whether we want orterun to effect "--prefix $prefix" by default])
|
[Whether we want orterun to effect "--prefix $prefix" by default])
|
||||||
|
|
||||||
#
|
|
||||||
# Do we want reliable multicast enabled?
|
|
||||||
#
|
|
||||||
|
|
||||||
AC_MSG_CHECKING([if want reliable multicast])
|
|
||||||
AC_ARG_ENABLE([multicast],
|
|
||||||
[AC_HELP_STRING([--enable-multicast],
|
|
||||||
[Enable reliable multicast messaging (default: disabled)])])
|
|
||||||
if test "$enable_multicast" = "yes"; then
|
|
||||||
AC_MSG_RESULT([yes])
|
|
||||||
orte_want_multicast=1
|
|
||||||
else
|
|
||||||
AC_MSG_RESULT([no])
|
|
||||||
orte_want_multicast=0
|
|
||||||
fi
|
|
||||||
AC_DEFINE_UNQUOTED([ORTE_ENABLE_MULTICAST],
|
|
||||||
[$orte_want_multicast],
|
|
||||||
[Whether we want multicast messaging enabled])
|
|
||||||
|
|
||||||
#
|
#
|
||||||
# Do we want sensors enabled?
|
# Do we want sensors enabled?
|
||||||
|
|
||||||
@ -135,16 +116,22 @@ AC_DEFINE_UNQUOTED([ORTE_ENABLE_HEARTBEAT],
|
|||||||
#
|
#
|
||||||
# Compile in resilient runtime code
|
# Compile in resilient runtime code
|
||||||
#
|
#
|
||||||
|
AC_MSG_CHECKING([if want resilient runtime code enabled])
|
||||||
AC_ARG_ENABLE(resilient-orte,
|
AC_ARG_ENABLE(resilient-orte,
|
||||||
[AC_HELP_STRING([--enable-resilient-orte], [Enable the resilient runtime code.])])
|
[AC_HELP_STRING([--enable-resilient-orte], [Enable the resilient runtime code.])])
|
||||||
AS_IF( [test "$enable_resilient_orte" = "yes"], [result=1], [result=0] )
|
if test "$enable_resilient_orte" = "yes"; then
|
||||||
|
AC_MSG_RESULT([yes])
|
||||||
|
orte_enable_resilient_code=1
|
||||||
|
else
|
||||||
|
AC_MSG_RESULT([no])
|
||||||
|
orte_enable_resilient_code=0
|
||||||
|
fi
|
||||||
AM_CONDITIONAL(ORTE_RESIL_ORTE, [test "$enable_resilient_orte" = "yes"])
|
AM_CONDITIONAL(ORTE_RESIL_ORTE, [test "$enable_resilient_orte" = "yes"])
|
||||||
AC_DEFINE_UNQUOTED([ORTE_RESIL_ORTE], [$result],
|
AC_DEFINE_UNQUOTED([ORTE_RESIL_ORTE], [$orte_enable_resilient_code],
|
||||||
[Compile a resilient version of Open MPI])
|
[Compile a resilient version of Open MPI])
|
||||||
|
|
||||||
AM_CONDITIONAL(ORTE_ENABLE_EPOCH, [test "$enable_resilient_orte" = "yes"])
|
AM_CONDITIONAL(ORTE_ENABLE_EPOCH, [test "$enable_resilient_orte" = "yes"])
|
||||||
AC_DEFINE_UNQUOTED([ORTE_ENABLE_EPOCH], [$result],
|
AC_DEFINE_UNQUOTED([ORTE_ENABLE_EPOCH], [$orte_enable_resilient_code],
|
||||||
[Support for epoch in the ORTE process name enabled or not])
|
[Support for epoch in the ORTE process name enabled or not])
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
@ -1,32 +0,0 @@
|
|||||||
#
|
|
||||||
# Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
# $COPYRIGHT$
|
|
||||||
#
|
|
||||||
# Additional copyrights may follow
|
|
||||||
#
|
|
||||||
# $HEADER$
|
|
||||||
#
|
|
||||||
|
|
||||||
AM_CPPFLAGS = $(LTDLINCL)
|
|
||||||
|
|
||||||
# main library setup
|
|
||||||
noinst_LTLIBRARIES = libmca_db.la
|
|
||||||
libmca_db_la_SOURCES =
|
|
||||||
|
|
||||||
# pkgdata setup
|
|
||||||
dist_pkgdata_DATA =
|
|
||||||
|
|
||||||
# local files
|
|
||||||
headers = db.h
|
|
||||||
libmca_db_la_SOURCES += $(headers)
|
|
||||||
|
|
||||||
# Conditionally install the header files
|
|
||||||
if WANT_INSTALL_HEADERS
|
|
||||||
ortedir = $(includedir)/openmpi/$(subdir)
|
|
||||||
nobase_orte_HEADERS = $(headers)
|
|
||||||
endif
|
|
||||||
|
|
||||||
include base/Makefile.am
|
|
||||||
|
|
||||||
distclean-local:
|
|
||||||
rm -f base/static-components.h
|
|
||||||
@ -1,18 +0,0 @@
|
|||||||
#
|
|
||||||
# Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
# $COPYRIGHT$
|
|
||||||
#
|
|
||||||
# Additional copyrights may follow
|
|
||||||
#
|
|
||||||
# $HEADER$
|
|
||||||
#
|
|
||||||
|
|
||||||
dist_pkgdata_DATA += base/help-db-base.txt
|
|
||||||
|
|
||||||
headers += \
|
|
||||||
base/base.h
|
|
||||||
|
|
||||||
libmca_db_la_SOURCES += \
|
|
||||||
base/db_base_open.c \
|
|
||||||
base/db_base_close.c \
|
|
||||||
base/db_base_select.c
|
|
||||||
@ -1,54 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
* $COPYRIGHT$
|
|
||||||
*
|
|
||||||
* Additional copyrights may follow
|
|
||||||
*
|
|
||||||
* $HEADER$
|
|
||||||
*/
|
|
||||||
/** @file:
|
|
||||||
*/
|
|
||||||
|
|
||||||
#ifndef MCA_DB_BASE_H
|
|
||||||
#define MCA_DB_BASE_H
|
|
||||||
|
|
||||||
#include "orte_config.h"
|
|
||||||
#include "orte/types.h"
|
|
||||||
|
|
||||||
#include "opal/mca/mca.h"
|
|
||||||
#include "opal/class/opal_list.h"
|
|
||||||
|
|
||||||
#include "orte/mca/db/db.h"
|
|
||||||
|
|
||||||
BEGIN_C_DECLS
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Global functions for MCA overall collective open and close
|
|
||||||
*/
|
|
||||||
|
|
||||||
/**
|
|
||||||
* Open the db framework
|
|
||||||
*/
|
|
||||||
ORTE_DECLSPEC int orte_db_base_open(void);
|
|
||||||
|
|
||||||
/**
|
|
||||||
* Select a db module
|
|
||||||
*/
|
|
||||||
ORTE_DECLSPEC int orte_db_base_select(void);
|
|
||||||
|
|
||||||
/**
|
|
||||||
* Close the db framework
|
|
||||||
*/
|
|
||||||
ORTE_DECLSPEC int orte_db_base_close(void);
|
|
||||||
|
|
||||||
/*
|
|
||||||
* The verbose channel for debug output
|
|
||||||
*/
|
|
||||||
ORTE_DECLSPEC extern int orte_db_base_output;
|
|
||||||
|
|
||||||
ORTE_DECLSPEC extern opal_list_t orte_db_base_components_available;
|
|
||||||
|
|
||||||
|
|
||||||
END_C_DECLS
|
|
||||||
|
|
||||||
#endif
|
|
||||||
@ -1,50 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
* $COPYRIGHT$
|
|
||||||
*
|
|
||||||
* Additional copyrights may follow
|
|
||||||
*
|
|
||||||
* $HEADER$
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "orte_config.h"
|
|
||||||
#include "orte/constants.h"
|
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
|
|
||||||
#include "opal/mca/mca.h"
|
|
||||||
#include "opal/util/output.h"
|
|
||||||
#include "opal/mca/base/base.h"
|
|
||||||
#include "opal/mca/base/mca_base_component_repository.h"
|
|
||||||
|
|
||||||
#include "orte/mca/db/base/base.h"
|
|
||||||
|
|
||||||
extern opal_list_t orte_db_base_components_available;
|
|
||||||
|
|
||||||
int
|
|
||||||
orte_db_base_close(void)
|
|
||||||
{
|
|
||||||
opal_list_item_t *item;
|
|
||||||
mca_base_component_list_item_t *cli;
|
|
||||||
|
|
||||||
if (NULL != orte_db.finalize) {
|
|
||||||
orte_db.finalize();
|
|
||||||
}
|
|
||||||
|
|
||||||
/* unload all remaining components */
|
|
||||||
while (NULL != (item = opal_list_remove_first(&orte_db_base_components_available))) {
|
|
||||||
orte_db_base_component_t* component;
|
|
||||||
cli = (mca_base_component_list_item_t *) item;
|
|
||||||
component = (orte_db_base_component_t*) cli->cli_component;
|
|
||||||
opal_output_verbose(10, 0,
|
|
||||||
"orte_db_base_close: module %s unloaded",
|
|
||||||
component->base_version.mca_component_name);
|
|
||||||
mca_base_component_repository_release((mca_base_component_t *) component);
|
|
||||||
OBJ_RELEASE(item);
|
|
||||||
}
|
|
||||||
|
|
||||||
OBJ_DESTRUCT(&orte_db_base_components_available);
|
|
||||||
opal_output_close(orte_db_base_output);
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
@ -1,97 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
* $COPYRIGHT$
|
|
||||||
*
|
|
||||||
* Additional copyrights may follow
|
|
||||||
*
|
|
||||||
* $HEADER$
|
|
||||||
*/
|
|
||||||
|
|
||||||
|
|
||||||
#include "orte_config.h"
|
|
||||||
#include "orte/constants.h"
|
|
||||||
|
|
||||||
#include "opal/mca/mca.h"
|
|
||||||
#include "opal/util/output.h"
|
|
||||||
#include "opal/mca/base/base.h"
|
|
||||||
#include "opal/dss/dss_types.h"
|
|
||||||
|
|
||||||
#include "orte/mca/db/base/base.h"
|
|
||||||
|
|
||||||
|
|
||||||
/*
|
|
||||||
* The following file was created by configure. It contains extern
|
|
||||||
* dbments and the definition of an array of pointers to each
|
|
||||||
* module's public mca_base_module_t struct.
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "orte/mca/db/base/static-components.h"
|
|
||||||
|
|
||||||
opal_list_t orte_db_base_components_available;
|
|
||||||
|
|
||||||
/* provide "NULL" functions */
|
|
||||||
static int init(void);
|
|
||||||
static int finalize(void);
|
|
||||||
static int store(char *key, void *object, opal_data_type_t type);
|
|
||||||
static int set_source(orte_process_name_t *name);
|
|
||||||
static int fetch(char *key, void *object, opal_data_type_t type);
|
|
||||||
static int update(char *key, void *object, opal_data_type_t type);
|
|
||||||
static int remove_data(char *key);
|
|
||||||
|
|
||||||
orte_db_base_module_t orte_db = {
|
|
||||||
init,
|
|
||||||
finalize,
|
|
||||||
store,
|
|
||||||
set_source,
|
|
||||||
fetch,
|
|
||||||
update,
|
|
||||||
remove_data
|
|
||||||
};
|
|
||||||
int orte_db_base_output;
|
|
||||||
|
|
||||||
int
|
|
||||||
orte_db_base_open(void)
|
|
||||||
{
|
|
||||||
orte_db_base_output = opal_output_open(NULL);
|
|
||||||
|
|
||||||
OBJ_CONSTRUCT(&orte_db_base_components_available, opal_list_t);
|
|
||||||
|
|
||||||
/* Open up all available components */
|
|
||||||
if (ORTE_SUCCESS !=
|
|
||||||
mca_base_components_open("db", orte_db_base_output, mca_db_base_static_components,
|
|
||||||
&orte_db_base_components_available,
|
|
||||||
true)) {
|
|
||||||
return ORTE_ERROR;
|
|
||||||
}
|
|
||||||
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int init(void)
|
|
||||||
{
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
static int finalize(void)
|
|
||||||
{
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
static int store(char *key, void *object, opal_data_type_t type)
|
|
||||||
{
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
static int set_source(orte_process_name_t *name)
|
|
||||||
{
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
static int fetch(char *key, void *object, opal_data_type_t type)
|
|
||||||
{
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
static int update(char *key, void *object, opal_data_type_t type)
|
|
||||||
{
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
static int remove_data(char *key)
|
|
||||||
{
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
@ -1,48 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
* $COPYRIGHT$
|
|
||||||
*
|
|
||||||
* Additional copyrights may follow
|
|
||||||
*
|
|
||||||
* $HEADER$
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "orte_config.h"
|
|
||||||
#include "orte/constants.h"
|
|
||||||
|
|
||||||
#include "opal/class/opal_list.h"
|
|
||||||
#include "opal/mca/mca.h"
|
|
||||||
#include "opal/mca/base/base.h"
|
|
||||||
#include "opal/mca/base/mca_base_component_repository.h"
|
|
||||||
|
|
||||||
#include "orte/mca/db/base/base.h"
|
|
||||||
|
|
||||||
extern opal_list_t orte_db_base_components_available;
|
|
||||||
|
|
||||||
int
|
|
||||||
orte_db_base_select(void)
|
|
||||||
{
|
|
||||||
orte_db_base_component_t *best_component = NULL;
|
|
||||||
orte_db_base_module_t *best_module = NULL;
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Select the best component
|
|
||||||
*/
|
|
||||||
if( OPAL_SUCCESS != mca_base_select("db", orte_db_base_output,
|
|
||||||
&orte_db_base_components_available,
|
|
||||||
(mca_base_module_t **) &best_module,
|
|
||||||
(mca_base_component_t **) &best_component) ) {
|
|
||||||
/* It is okay to not select a component - default
|
|
||||||
* to using the base NULL component
|
|
||||||
*/
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Save and init the winner */
|
|
||||||
orte_db = *best_module;
|
|
||||||
if (NULL != orte_db.init) {
|
|
||||||
orte_db.init();
|
|
||||||
}
|
|
||||||
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
@ -1,19 +0,0 @@
|
|||||||
-*- text -*-
|
|
||||||
#
|
|
||||||
# Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
#
|
|
||||||
# $COPYRIGHT$
|
|
||||||
#
|
|
||||||
# Additional copyrights may follow
|
|
||||||
#
|
|
||||||
# $HEADER$
|
|
||||||
#
|
|
||||||
# This is the US/English general help file for ORTE Errmgr HNP module.
|
|
||||||
#
|
|
||||||
[errmgr-hnp:unknown-job-error]
|
|
||||||
An error has occurred in an unknown job. This generally should not happen
|
|
||||||
except due to an internal ORTE error.
|
|
||||||
|
|
||||||
Job state: %s
|
|
||||||
|
|
||||||
This information should probably be reported to the OMPI developers.
|
|
||||||
@ -1,38 +0,0 @@
|
|||||||
#
|
|
||||||
# Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
# $COPYRIGHT$
|
|
||||||
#
|
|
||||||
# Additional copyrights may follow
|
|
||||||
#
|
|
||||||
# $HEADER$
|
|
||||||
#
|
|
||||||
|
|
||||||
sources = \
|
|
||||||
db_daemon.h \
|
|
||||||
db_daemon_component.c \
|
|
||||||
db_daemon.c
|
|
||||||
|
|
||||||
# Make the output library in this directory, and name it either
|
|
||||||
# mca_<type>_<name>.la (for DSO builds) or libmca_<type>_<name>.la
|
|
||||||
# (for static builds).
|
|
||||||
|
|
||||||
if MCA_BUILD_orte_db_daemon_DSO
|
|
||||||
component_noinst =
|
|
||||||
component_install = mca_db_daemon.la
|
|
||||||
else
|
|
||||||
component_noinst = libmca_db_daemon.la
|
|
||||||
component_install =
|
|
||||||
endif
|
|
||||||
|
|
||||||
mcacomponentdir = $(pkglibdir)
|
|
||||||
mcacomponent_LTLIBRARIES = $(component_install)
|
|
||||||
mca_db_daemon_la_CPPFLAGS = $(db_daemon_CPPFLAGS)
|
|
||||||
mca_db_daemon_la_SOURCES = $(sources)
|
|
||||||
mca_db_daemon_la_LDFLAGS = -module -avoid-version $(db_daemon_LDFLAGS)
|
|
||||||
mca_db_daemon_la_LIBADD = $(db_daemon_LIBS)
|
|
||||||
|
|
||||||
noinst_LTLIBRARIES = $(component_noinst)
|
|
||||||
libmca_db_daemon_la_CPPFLAGS = $(db_daemon_CPPFLAGS)
|
|
||||||
libmca_db_daemon_la_SOURCES =$(sources)
|
|
||||||
libmca_db_daemon_la_LDFLAGS = -module -avoid-version $(db_daemon_LDFLAGS)
|
|
||||||
libmca_db_daemon_la_LIBADD = $(db_daemon_LIBS)
|
|
||||||
@ -1,19 +0,0 @@
|
|||||||
# -*- shell-script -*-
|
|
||||||
#
|
|
||||||
# Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
# $COPYRIGHT$
|
|
||||||
#
|
|
||||||
# Additional copyrights may follow
|
|
||||||
#
|
|
||||||
# $HEADER$
|
|
||||||
#
|
|
||||||
|
|
||||||
# MCA_db_daemon_CONFIG([action-if-found], [action-if-not-found])
|
|
||||||
# -----------------------------------------------------------
|
|
||||||
AC_DEFUN([MCA_orte_db_daemon_CONFIG], [
|
|
||||||
AC_CONFIG_FILES([orte/mca/db/daemon/Makefile])
|
|
||||||
|
|
||||||
# cant run this component without multicast
|
|
||||||
AS_IF([test "$orte_want_multicast" = "1"],
|
|
||||||
[$1], [$2])
|
|
||||||
])dnl
|
|
||||||
@ -1,440 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
* Copyright (c) 2004-2011 The University of Tennessee and The University
|
|
||||||
* of Tennessee Research Foundation. All rights
|
|
||||||
* reserved.
|
|
||||||
* $COPYRIGHT$
|
|
||||||
*
|
|
||||||
* Additional copyrights may follow
|
|
||||||
*
|
|
||||||
* $HEADER$
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "orte_config.h"
|
|
||||||
#include "orte/constants.h"
|
|
||||||
|
|
||||||
#include <time.h>
|
|
||||||
|
|
||||||
#include "opal/class/opal_pointer_array.h"
|
|
||||||
#include "opal/dss/dss_types.h"
|
|
||||||
#include "opal/util/output.h"
|
|
||||||
|
|
||||||
#include "orte/util/show_help.h"
|
|
||||||
#include "orte/util/name_fns.h"
|
|
||||||
#include "orte/mca/errmgr/errmgr.h"
|
|
||||||
#include "orte/mca/rmcast/rmcast.h"
|
|
||||||
#include "orte/runtime/orte_globals.h"
|
|
||||||
#include "orte/runtime/orte_wait.h"
|
|
||||||
|
|
||||||
#include "orte/mca/db/base/base.h"
|
|
||||||
#include "db_daemon.h"
|
|
||||||
|
|
||||||
static int init(void);
|
|
||||||
static int finalize(void);
|
|
||||||
static int store(char *key, void *object, opal_data_type_t type);
|
|
||||||
static int set_source(orte_process_name_t *name);
|
|
||||||
static int fetch(char *key, void *object, opal_data_type_t type);
|
|
||||||
static int update(char *key, void *object, opal_data_type_t type);
|
|
||||||
static int remove_data(char *key);
|
|
||||||
|
|
||||||
orte_db_base_module_t orte_db_daemon_module = {
|
|
||||||
init,
|
|
||||||
finalize,
|
|
||||||
store,
|
|
||||||
set_source,
|
|
||||||
fetch,
|
|
||||||
update,
|
|
||||||
remove_data
|
|
||||||
};
|
|
||||||
|
|
||||||
/* local types */
|
|
||||||
typedef struct {
|
|
||||||
opal_object_t super;
|
|
||||||
orte_process_name_t name;
|
|
||||||
char *key;
|
|
||||||
int32_t size;
|
|
||||||
uint8_t *bytes;
|
|
||||||
} orte_db_data_t;
|
|
||||||
static void dtconstructor(orte_db_data_t *dt)
|
|
||||||
{
|
|
||||||
dt->key = NULL;
|
|
||||||
dt->bytes = NULL;
|
|
||||||
dt->size = 0;
|
|
||||||
}
|
|
||||||
static void dtdestructor(orte_db_data_t *dt)
|
|
||||||
{
|
|
||||||
if (NULL != dt->key) {
|
|
||||||
free(dt->key);
|
|
||||||
}
|
|
||||||
if (NULL != dt->bytes) {
|
|
||||||
free(dt->bytes);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
OBJ_CLASS_INSTANCE(orte_db_data_t,
|
|
||||||
opal_object_t,
|
|
||||||
dtconstructor,
|
|
||||||
dtdestructor);
|
|
||||||
|
|
||||||
/* local variables */
|
|
||||||
static orte_vpid_t num_recvd;
|
|
||||||
static bool ack_reqd;
|
|
||||||
static opal_pointer_array_t datastore;
|
|
||||||
static orte_rmcast_channel_t my_group_channel;
|
|
||||||
|
|
||||||
/* local functions */
|
|
||||||
static void callback_fn(int status,
|
|
||||||
orte_rmcast_channel_t channel,
|
|
||||||
orte_rmcast_seq_t seq_num,
|
|
||||||
orte_rmcast_tag_t tag,
|
|
||||||
orte_process_name_t *sender,
|
|
||||||
opal_buffer_t *buf, void* cbdata);
|
|
||||||
|
|
||||||
static void recv_cmd(int status,
|
|
||||||
orte_rmcast_channel_t channel,
|
|
||||||
orte_rmcast_seq_t seq_num,
|
|
||||||
orte_rmcast_tag_t tag,
|
|
||||||
orte_process_name_t *sender,
|
|
||||||
opal_buffer_t *buf, void* cbdata);
|
|
||||||
|
|
||||||
static void recv_ack(int status,
|
|
||||||
orte_rmcast_channel_t channel,
|
|
||||||
orte_rmcast_seq_t seq_num,
|
|
||||||
orte_rmcast_tag_t tag,
|
|
||||||
orte_process_name_t *sender,
|
|
||||||
opal_buffer_t *buf, void* cbdata);
|
|
||||||
|
|
||||||
#include MCA_timer_IMPLEMENTATION_HEADER
|
|
||||||
static inline double gettime(void) __opal_attribute_always_inline__;
|
|
||||||
static inline double gettime(void)
|
|
||||||
{
|
|
||||||
double wtime;
|
|
||||||
#if OPAL_TIMER_USEC_NATIVE
|
|
||||||
wtime = ((double) opal_timer_base_get_usec()) / 1000000.0;
|
|
||||||
#else
|
|
||||||
struct timeval tv;
|
|
||||||
gettimeofday(&tv, NULL);
|
|
||||||
wtime = tv.tv_sec;
|
|
||||||
wtime += (double)tv.tv_usec / 1000000.0;
|
|
||||||
#endif
|
|
||||||
return wtime;
|
|
||||||
}
|
|
||||||
#define TIMER_START(x) (x) = gettime();
|
|
||||||
#define TIMER_STOP(y,x) (y) = (gettime() - (x));
|
|
||||||
|
|
||||||
static int init(void)
|
|
||||||
{
|
|
||||||
int rc;
|
|
||||||
|
|
||||||
if (ORTE_PROC_IS_DAEMON || ORTE_PROC_IS_HNP) {
|
|
||||||
/* daemons recv data server cmds */
|
|
||||||
if (ORTE_SUCCESS != (rc = orte_rmcast.recv_buffer_nb(ORTE_RMCAST_DATA_SERVER_CHANNEL,
|
|
||||||
ORTE_RMCAST_TAG_DATA,
|
|
||||||
ORTE_RMCAST_PERSISTENT,
|
|
||||||
recv_cmd, NULL))) {
|
|
||||||
ORTE_ERROR_LOG(rc);
|
|
||||||
}
|
|
||||||
OBJ_CONSTRUCT(&datastore, opal_pointer_array_t);
|
|
||||||
opal_pointer_array_init(&datastore, 16, INT_MAX, 16);
|
|
||||||
} else if (ORTE_PROC_IS_APP) {
|
|
||||||
/* get my multicast output group */
|
|
||||||
orte_rmcast.query_channel(&my_group_channel, NULL);
|
|
||||||
|
|
||||||
/* recv responses */
|
|
||||||
if (ORTE_SUCCESS != (rc = orte_rmcast.recv_buffer_nb(my_group_channel,
|
|
||||||
ORTE_RMCAST_TAG_CMD_ACK,
|
|
||||||
ORTE_RMCAST_PERSISTENT,
|
|
||||||
recv_ack, NULL))) {
|
|
||||||
ORTE_ERROR_LOG(rc);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int finalize(void)
|
|
||||||
{
|
|
||||||
int i;
|
|
||||||
orte_db_data_t *dat;
|
|
||||||
|
|
||||||
/* cancel the callbacks */
|
|
||||||
if (ORTE_PROC_IS_DAEMON || ORTE_PROC_IS_HNP) {
|
|
||||||
orte_rmcast.cancel_recv(ORTE_RMCAST_DATA_SERVER_CHANNEL, ORTE_RMCAST_TAG_DATA);
|
|
||||||
for (i=0; i < datastore.size; i++) {
|
|
||||||
if (NULL != (dat = (orte_db_data_t*)opal_pointer_array_get_item(&datastore, i))) {
|
|
||||||
OBJ_RELEASE(dat);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
OBJ_DESTRUCT(&datastore);
|
|
||||||
} else if (ORTE_PROC_IS_APP) {
|
|
||||||
orte_rmcast.cancel_recv(my_group_channel, ORTE_RMCAST_TAG_WILDCARD);
|
|
||||||
}
|
|
||||||
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int send_data(orte_db_cmd_t cmd, char *key, void *object, opal_data_type_t type)
|
|
||||||
{
|
|
||||||
opal_buffer_t *buf, dat;
|
|
||||||
orte_job_t *jdata;
|
|
||||||
orte_proc_t *proc;
|
|
||||||
orte_job_state_t *job_state;
|
|
||||||
orte_proc_state_t *proc_state;
|
|
||||||
int rc;
|
|
||||||
bool got_response;
|
|
||||||
opal_byte_object_t bo;
|
|
||||||
|
|
||||||
/* construct the buffer we will use for packing the data */
|
|
||||||
buf = OBJ_NEW(opal_buffer_t);
|
|
||||||
opal_dss.pack(buf, &cmd, 1, ORTE_DB_CMD_T); /* add cmd */
|
|
||||||
opal_dss.pack(buf, &my_group_channel, 1, ORTE_RMCAST_CHANNEL_T); /* tell the server my channel */
|
|
||||||
opal_dss.pack(buf, &key, 1, OPAL_STRING); /* pack the key */
|
|
||||||
|
|
||||||
if (NULL != object) {
|
|
||||||
OBJ_CONSTRUCT(&dat, opal_buffer_t);
|
|
||||||
/* pack the data */
|
|
||||||
switch (type) {
|
|
||||||
case ORTE_JOB:
|
|
||||||
jdata = (orte_job_t*)object;
|
|
||||||
opal_dss.pack(&dat, &jdata, 1, ORTE_JOB);
|
|
||||||
break;
|
|
||||||
case ORTE_JOB_STATE:
|
|
||||||
job_state = (orte_job_state_t*)object;
|
|
||||||
opal_dss.pack(&dat, job_state, 1, ORTE_JOB_STATE);
|
|
||||||
break;
|
|
||||||
|
|
||||||
case ORTE_PROC:
|
|
||||||
proc = (orte_proc_t*)object;
|
|
||||||
opal_dss.pack(&dat, &proc, 1, ORTE_PROC);
|
|
||||||
break;
|
|
||||||
case ORTE_PROC_STATE:
|
|
||||||
proc_state = (orte_proc_state_t*)object;
|
|
||||||
opal_dss.pack(&dat, proc_state, 1, ORTE_PROC_STATE);
|
|
||||||
break;
|
|
||||||
|
|
||||||
default:
|
|
||||||
orte_show_help("help-db-base.txt", "unrecognized-type", true, type);
|
|
||||||
rc = ORTE_ERR_BAD_PARAM;
|
|
||||||
goto cleanup;
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
opal_dss.unload(&dat, (void**)&bo.bytes, &bo.size);
|
|
||||||
opal_dss.pack(buf, &bo.size, 1, OPAL_INT32);
|
|
||||||
opal_dss.pack(buf, &bo.bytes, bo.size, OPAL_UINT8);
|
|
||||||
OBJ_DESTRUCT(&dat);
|
|
||||||
free(bo.bytes);
|
|
||||||
}
|
|
||||||
|
|
||||||
got_response = false;
|
|
||||||
num_recvd = 0;
|
|
||||||
ack_reqd = true;
|
|
||||||
|
|
||||||
/* send the data to all the daemons */
|
|
||||||
if (ORTE_SUCCESS != (rc = orte_rmcast.send_buffer_nb(ORTE_RMCAST_DATA_SERVER_CHANNEL,
|
|
||||||
ORTE_RMCAST_TAG_DATA, buf,
|
|
||||||
callback_fn, NULL))) {
|
|
||||||
ORTE_ERROR_LOG(rc);
|
|
||||||
}
|
|
||||||
/* wait for all daemons to ack the request */
|
|
||||||
ORTE_PROGRESSED_WAIT(got_response, num_recvd, orte_process_info.num_daemons);
|
|
||||||
ack_reqd = false;
|
|
||||||
|
|
||||||
cleanup:
|
|
||||||
return rc;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int store(char *key, void *object, opal_data_type_t type)
|
|
||||||
{
|
|
||||||
int rc;
|
|
||||||
double start;
|
|
||||||
double cpu_time_used;
|
|
||||||
|
|
||||||
TIMER_START(start);
|
|
||||||
|
|
||||||
if (ORTE_SUCCESS != (rc = send_data(ORTE_DB_STORE_CMD, key, object, type))) {
|
|
||||||
ORTE_ERROR_LOG(rc);
|
|
||||||
}
|
|
||||||
|
|
||||||
TIMER_STOP(cpu_time_used, start);
|
|
||||||
opal_output(0, "%s TOOK %g usecs TO STORE",
|
|
||||||
ORTE_NAME_PRINT(ORTE_PROC_MY_NAME),
|
|
||||||
cpu_time_used * 1000000.0);
|
|
||||||
|
|
||||||
return rc;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int set_source(orte_process_name_t *name)
|
|
||||||
{
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int fetch(char *key, void *object, opal_data_type_t type)
|
|
||||||
{
|
|
||||||
int rc;
|
|
||||||
double cpu_time_used, start;
|
|
||||||
|
|
||||||
TIMER_START(start);
|
|
||||||
|
|
||||||
if (ORTE_SUCCESS != (rc = send_data(ORTE_DB_FETCH_CMD, key, NULL, OPAL_INT32))) {
|
|
||||||
ORTE_ERROR_LOG(rc);
|
|
||||||
}
|
|
||||||
|
|
||||||
TIMER_STOP(cpu_time_used, start);
|
|
||||||
opal_output(0, "%s TOOK %g usecs TO FETCH",
|
|
||||||
ORTE_NAME_PRINT(ORTE_PROC_MY_NAME),
|
|
||||||
cpu_time_used * 1000000.0);
|
|
||||||
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int update(char *key, void *object, opal_data_type_t type)
|
|
||||||
{
|
|
||||||
int rc;
|
|
||||||
double start;
|
|
||||||
double cpu_time_used;
|
|
||||||
|
|
||||||
TIMER_START(start);
|
|
||||||
|
|
||||||
if (ORTE_SUCCESS != (rc = send_data(ORTE_DB_UPDATE_CMD, key, object, type))) {
|
|
||||||
ORTE_ERROR_LOG(rc);
|
|
||||||
}
|
|
||||||
|
|
||||||
TIMER_STOP(cpu_time_used, start);
|
|
||||||
opal_output(0, "%s TOOK %g usecs TO UPDATE",
|
|
||||||
ORTE_NAME_PRINT(ORTE_PROC_MY_NAME),
|
|
||||||
cpu_time_used * 1000000.0);
|
|
||||||
|
|
||||||
return rc;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int remove_data(char *key)
|
|
||||||
{
|
|
||||||
int rc;
|
|
||||||
double start;
|
|
||||||
double cpu_time_used;
|
|
||||||
|
|
||||||
TIMER_START(start);
|
|
||||||
|
|
||||||
if (ORTE_SUCCESS != (rc = send_data(ORTE_DB_REMOVE_CMD, key, NULL, OPAL_INT32))) {
|
|
||||||
ORTE_ERROR_LOG(rc);
|
|
||||||
}
|
|
||||||
|
|
||||||
TIMER_STOP(cpu_time_used, start);
|
|
||||||
opal_output(0, "%s TOOK %g usecs TO REMOVE",
|
|
||||||
ORTE_NAME_PRINT(ORTE_PROC_MY_NAME),
|
|
||||||
cpu_time_used * 1000000.0);
|
|
||||||
|
|
||||||
return rc;
|
|
||||||
}
|
|
||||||
|
|
||||||
static void callback_fn(int status,
|
|
||||||
orte_rmcast_channel_t channel,
|
|
||||||
orte_rmcast_seq_t seq_num,
|
|
||||||
orte_rmcast_tag_t tag,
|
|
||||||
orte_process_name_t *sender,
|
|
||||||
opal_buffer_t *buf, void* cbdata)
|
|
||||||
{
|
|
||||||
OBJ_RELEASE(buf);
|
|
||||||
}
|
|
||||||
|
|
||||||
static void recv_ack(int status,
|
|
||||||
orte_rmcast_channel_t channel,
|
|
||||||
orte_rmcast_seq_t seq_num,
|
|
||||||
orte_rmcast_tag_t tag,
|
|
||||||
orte_process_name_t *sender,
|
|
||||||
opal_buffer_t *buf, void* cbdata)
|
|
||||||
{
|
|
||||||
if (ack_reqd) {
|
|
||||||
num_recvd++;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
static void recv_cmd(int status,
|
|
||||||
orte_rmcast_channel_t channel,
|
|
||||||
orte_rmcast_seq_t seq_num,
|
|
||||||
orte_rmcast_tag_t tag,
|
|
||||||
orte_process_name_t *sender,
|
|
||||||
opal_buffer_t *buf, void* cbdata)
|
|
||||||
{
|
|
||||||
orte_db_cmd_t cmd;
|
|
||||||
opal_buffer_t *ans;
|
|
||||||
int count, i;
|
|
||||||
int32_t rc;
|
|
||||||
char *key;
|
|
||||||
orte_db_data_t *dat;
|
|
||||||
orte_rmcast_channel_t ch;
|
|
||||||
char *ch_name;
|
|
||||||
|
|
||||||
OPAL_OUTPUT_VERBOSE((2, orte_db_base_output,
|
|
||||||
"%s db:daemon: cmd recvd from %s",
|
|
||||||
ORTE_NAME_PRINT(ORTE_PROC_MY_NAME),
|
|
||||||
ORTE_NAME_PRINT(sender)));
|
|
||||||
|
|
||||||
count=1;
|
|
||||||
opal_dss.unpack(buf, &cmd, &count, ORTE_DB_CMD_T);
|
|
||||||
count=1;
|
|
||||||
opal_dss.unpack(buf, &ch, &count, ORTE_RMCAST_CHANNEL_T);
|
|
||||||
count=1;
|
|
||||||
opal_dss.unpack(buf, &ch_name, &count, OPAL_STRING);
|
|
||||||
count=1;
|
|
||||||
opal_dss.unpack(buf, &key, &count, OPAL_STRING);
|
|
||||||
|
|
||||||
ans = OBJ_NEW(opal_buffer_t);
|
|
||||||
opal_dss.pack(ans, &cmd, 1, ORTE_DB_CMD_T);
|
|
||||||
|
|
||||||
switch (cmd) {
|
|
||||||
case ORTE_DB_STORE_CMD:
|
|
||||||
dat = OBJ_NEW(orte_db_data_t);
|
|
||||||
dat->name.jobid = sender->jobid;
|
|
||||||
dat->name.vpid = sender->vpid;
|
|
||||||
ORTE_EPOCH_SET(dat->name.epoch,sender->epoch);
|
|
||||||
dat->key = key;
|
|
||||||
count=1;
|
|
||||||
opal_dss.unpack(buf, &dat->size, &count, OPAL_INT32);
|
|
||||||
dat->bytes = (uint8_t*)malloc(dat->size);
|
|
||||||
opal_dss.unpack(buf, dat->bytes, &dat->size, OPAL_UINT8);
|
|
||||||
opal_pointer_array_add(&datastore, dat);
|
|
||||||
OPAL_OUTPUT_VERBOSE((2, orte_db_base_output,
|
|
||||||
"%s db:daemon: data from %s stored: key %s",
|
|
||||||
ORTE_NAME_PRINT(ORTE_PROC_MY_NAME),
|
|
||||||
ORTE_NAME_PRINT(sender), key));
|
|
||||||
rc = ORTE_SUCCESS;
|
|
||||||
opal_dss.pack(ans, &rc, 1, OPAL_INT32);
|
|
||||||
break;
|
|
||||||
case ORTE_DB_FETCH_CMD:
|
|
||||||
/* find the key */
|
|
||||||
for (i=0; i < datastore.size; i++) {
|
|
||||||
if (NULL == (dat = (orte_db_data_t*)opal_pointer_array_get_item(&datastore, i))) {
|
|
||||||
continue;
|
|
||||||
}
|
|
||||||
if (0 != strcmp(key, dat->key)) {
|
|
||||||
continue;
|
|
||||||
}
|
|
||||||
/* found the data - return it */
|
|
||||||
rc = ORTE_SUCCESS;
|
|
||||||
opal_dss.pack(ans, &rc, 1, OPAL_INT32);
|
|
||||||
opal_dss.pack(ans, &dat->size, 1, OPAL_INT32);
|
|
||||||
opal_dss.pack(ans, dat->bytes, dat->size, OPAL_UINT8);
|
|
||||||
OPAL_OUTPUT_VERBOSE((2, orte_db_base_output,
|
|
||||||
"%s db:daemon: data fetched for %s: key %s",
|
|
||||||
ORTE_NAME_PRINT(ORTE_PROC_MY_NAME),
|
|
||||||
ORTE_NAME_PRINT(sender), key));
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
rc = ORTE_ERR_NOT_FOUND;
|
|
||||||
opal_dss.pack(ans, &rc, 1, OPAL_INT32);
|
|
||||||
OPAL_OUTPUT_VERBOSE((2, orte_db_base_output,
|
|
||||||
"%s db:daemon: data fetch request from %s not found: key %s",
|
|
||||||
ORTE_NAME_PRINT(ORTE_PROC_MY_NAME),
|
|
||||||
ORTE_NAME_PRINT(sender), key));
|
|
||||||
break;
|
|
||||||
|
|
||||||
default:
|
|
||||||
rc = ORTE_ERR_NOT_FOUND;
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ensure the return channel is open */
|
|
||||||
orte_rmcast.open_channel(ch, ch_name, NULL, -1, NULL, ORTE_RMCAST_XMIT);
|
|
||||||
|
|
||||||
orte_rmcast.send_buffer_nb(ch, ORTE_RMCAST_TAG_CMD_ACK, ans, callback_fn, NULL);
|
|
||||||
}
|
|
||||||
@ -1,31 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
* $COPYRIGHT$
|
|
||||||
*
|
|
||||||
* Additional copyrights may follow
|
|
||||||
*
|
|
||||||
* $HEADER$
|
|
||||||
*/
|
|
||||||
|
|
||||||
#ifndef ORTE_DB_DAEMON_H
|
|
||||||
#define ORTE_DB_DAEMON_H
|
|
||||||
|
|
||||||
#include "orte/mca/db/db.h"
|
|
||||||
|
|
||||||
BEGIN_C_DECLS
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Module open / close
|
|
||||||
*/
|
|
||||||
int orte_db_daemon_component_open(void);
|
|
||||||
int orte_db_daemon_component_close(void);
|
|
||||||
int orte_db_daemon_component_query(mca_base_module_t **module, int *priority);
|
|
||||||
|
|
||||||
|
|
||||||
ORTE_MODULE_DECLSPEC extern orte_db_base_component_t mca_db_daemon_component;
|
|
||||||
ORTE_DECLSPEC extern orte_db_base_module_t orte_db_daemon_module;
|
|
||||||
extern char *orte_db_daemon_directory;
|
|
||||||
|
|
||||||
END_C_DECLS
|
|
||||||
|
|
||||||
#endif /* ORTE_DB_DAEMON_H */
|
|
||||||
@ -1,91 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
* $COPYRIGHT$
|
|
||||||
*
|
|
||||||
* Additional copyrights may follow
|
|
||||||
*
|
|
||||||
* $HEADER$
|
|
||||||
*
|
|
||||||
* These symbols are in a file by themselves to provide nice linker
|
|
||||||
* semantics. Since linkers generally pull in symbols by object
|
|
||||||
* files, keeping these symbols as the only symbols in this file
|
|
||||||
* prevents utility programs such as "ompi_info" from having to import
|
|
||||||
* entire components just to query their version and parameters.
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "orte_config.h"
|
|
||||||
#include "orte/constants.h"
|
|
||||||
|
|
||||||
#ifdef HAVE_STRINGS_H
|
|
||||||
#include <strings.h>
|
|
||||||
#endif
|
|
||||||
|
|
||||||
#include "opal/mca/base/base.h"
|
|
||||||
#include "opal/mca/base/mca_base_param.h"
|
|
||||||
|
|
||||||
#include "orte/util/proc_info.h"
|
|
||||||
|
|
||||||
#include "orte/mca/db/db.h"
|
|
||||||
#include "orte/mca/db/base/base.h"
|
|
||||||
#include "db_daemon.h"
|
|
||||||
|
|
||||||
extern orte_db_base_module_t orte_db_daemon_module;
|
|
||||||
char *orte_db_daemon_directory;
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Instantiate the public struct with all of our public information
|
|
||||||
* and pointers to our public functions in it
|
|
||||||
*/
|
|
||||||
orte_db_base_component_t mca_db_daemon_component = {
|
|
||||||
{
|
|
||||||
ORTE_DB_BASE_VERSION_1_0_0,
|
|
||||||
|
|
||||||
/* Component name and version */
|
|
||||||
"daemon",
|
|
||||||
ORTE_MAJOR_VERSION,
|
|
||||||
ORTE_MINOR_VERSION,
|
|
||||||
ORTE_RELEASE_VERSION,
|
|
||||||
|
|
||||||
/* Component open and close functions */
|
|
||||||
orte_db_daemon_component_open,
|
|
||||||
orte_db_daemon_component_close,
|
|
||||||
orte_db_daemon_component_query
|
|
||||||
},
|
|
||||||
{
|
|
||||||
/* The component is checkpoint ready */
|
|
||||||
MCA_BASE_METADATA_PARAM_CHECKPOINT
|
|
||||||
}
|
|
||||||
};
|
|
||||||
|
|
||||||
|
|
||||||
int
|
|
||||||
orte_db_daemon_component_open(void)
|
|
||||||
{
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* only select us if specifically requested */
|
|
||||||
int orte_db_daemon_component_query(mca_base_module_t **module, int *priority)
|
|
||||||
{
|
|
||||||
char *req;
|
|
||||||
|
|
||||||
if (NULL != (req = getenv("OMPI_MCA_db"))) {
|
|
||||||
if (0 == strcasecmp(req, "daemon")) {
|
|
||||||
*priority = 100;
|
|
||||||
*module = (mca_base_module_t*)&orte_db_daemon_module;
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
*priority = 0;
|
|
||||||
*module = NULL;
|
|
||||||
return ORTE_ERROR;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
int
|
|
||||||
orte_db_daemon_component_close(void)
|
|
||||||
{
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
110
orte/mca/db/db.h
110
orte/mca/db/db.h
@ -1,110 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
* $COPYRIGHT$
|
|
||||||
*
|
|
||||||
* Additional copyrights may follow
|
|
||||||
*
|
|
||||||
* $HEADER$
|
|
||||||
*/
|
|
||||||
/** @file:
|
|
||||||
*
|
|
||||||
* The OpenRTE State Save/Recovery Service
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
|
|
||||||
#ifndef ORTE_DB_H
|
|
||||||
#define ORTE_DB_H
|
|
||||||
|
|
||||||
#include "orte_config.h"
|
|
||||||
#include "orte/types.h"
|
|
||||||
|
|
||||||
#include "opal/mca/mca.h"
|
|
||||||
#include "opal/dss/dss_types.h"
|
|
||||||
|
|
||||||
BEGIN_C_DECLS
|
|
||||||
|
|
||||||
/*
|
|
||||||
* API functions
|
|
||||||
*/
|
|
||||||
|
|
||||||
typedef uint8_t orte_db_cmd_t;
|
|
||||||
#define ORTE_DB_CMD_T OPAL_UINT8
|
|
||||||
|
|
||||||
#define ORTE_DB_STORE_CMD 0x01
|
|
||||||
#define ORTE_DB_FETCH_CMD 0X02
|
|
||||||
#define ORTE_DB_UPDATE_CMD 0x03
|
|
||||||
#define ORTE_DB_REMOVE_CMD 0x04
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Initialize the module
|
|
||||||
*/
|
|
||||||
typedef int (*orte_db_base_module_init_fn_t)(void);
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Finalize the module
|
|
||||||
*/
|
|
||||||
typedef int (*orte_db_base_module_finalize_fn_t)(void);
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Save the db of the provided object
|
|
||||||
*/
|
|
||||||
typedef int (*orte_db_base_module_store_fn_t)(char *key, void *object, opal_data_type_t type);
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Set the source for recovering db info
|
|
||||||
*/
|
|
||||||
typedef int (*orte_db_base_module_set_source_fn_t)(orte_process_name_t *name);
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Retrieve data
|
|
||||||
*/
|
|
||||||
typedef int (*orte_db_base_module_fetch_fn_t)(char *key, void *object, opal_data_type_t type);
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Update data
|
|
||||||
*/
|
|
||||||
typedef int (*orte_db_base_module_update_fn_t)(char *key, void *object, opal_data_type_t type);
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Delete data
|
|
||||||
*/
|
|
||||||
typedef int (*orte_db_base_module_remove_fn_t)(char *key);
|
|
||||||
|
|
||||||
/*
|
|
||||||
* the standard module data structure
|
|
||||||
*/
|
|
||||||
struct orte_db_base_module_1_0_0_t {
|
|
||||||
orte_db_base_module_init_fn_t init;
|
|
||||||
orte_db_base_module_finalize_fn_t finalize;
|
|
||||||
orte_db_base_module_store_fn_t store;
|
|
||||||
orte_db_base_module_set_source_fn_t set_source;
|
|
||||||
orte_db_base_module_fetch_fn_t fetch;
|
|
||||||
orte_db_base_module_update_fn_t update;
|
|
||||||
orte_db_base_module_remove_fn_t remove;
|
|
||||||
};
|
|
||||||
typedef struct orte_db_base_module_1_0_0_t orte_db_base_module_1_0_0_t;
|
|
||||||
typedef struct orte_db_base_module_1_0_0_t orte_db_base_module_t;
|
|
||||||
|
|
||||||
/*
|
|
||||||
* the standard component data structure
|
|
||||||
*/
|
|
||||||
struct orte_db_base_component_1_0_0_t {
|
|
||||||
mca_base_component_t base_version;
|
|
||||||
mca_base_component_data_t base_data;
|
|
||||||
};
|
|
||||||
typedef struct orte_db_base_component_1_0_0_t orte_db_base_component_1_0_0_t;
|
|
||||||
typedef struct orte_db_base_component_1_0_0_t orte_db_base_component_t;
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Macro for use in components that are of type db
|
|
||||||
*/
|
|
||||||
#define ORTE_DB_BASE_VERSION_1_0_0 \
|
|
||||||
MCA_BASE_VERSION_2_0_0, \
|
|
||||||
"db", 1, 0, 0
|
|
||||||
|
|
||||||
/* Global structure for accessing DB functions */
|
|
||||||
ORTE_DECLSPEC extern orte_db_base_module_t orte_db; /* holds selected module's function pointers */
|
|
||||||
|
|
||||||
END_C_DECLS
|
|
||||||
|
|
||||||
#endif
|
|
||||||
@ -1,38 +0,0 @@
|
|||||||
#
|
|
||||||
# Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
# $COPYRIGHT$
|
|
||||||
#
|
|
||||||
# Additional copyrights may follow
|
|
||||||
#
|
|
||||||
# $HEADER$
|
|
||||||
#
|
|
||||||
|
|
||||||
sources = \
|
|
||||||
db_dbase.h \
|
|
||||||
db_dbase_component.c \
|
|
||||||
db_dbase.c
|
|
||||||
|
|
||||||
# Make the output library in this directory, and name it either
|
|
||||||
# mca_<type>_<name>.la (for DSO builds) or libmca_<type>_<name>.la
|
|
||||||
# (for static builds).
|
|
||||||
|
|
||||||
if MCA_BUILD_orte_db_dbase_DSO
|
|
||||||
component_noinst =
|
|
||||||
component_install = mca_db_dbase.la
|
|
||||||
else
|
|
||||||
component_noinst = libmca_db_dbase.la
|
|
||||||
component_install =
|
|
||||||
endif
|
|
||||||
|
|
||||||
mcacomponentdir = $(pkglibdir)
|
|
||||||
mcacomponent_LTLIBRARIES = $(component_install)
|
|
||||||
mca_db_dbase_la_CPPFLAGS = $(db_dbase_CPPFLAGS)
|
|
||||||
mca_db_dbase_la_SOURCES = $(sources)
|
|
||||||
mca_db_dbase_la_LDFLAGS = -module -avoid-version $(db_dbase_LDFLAGS)
|
|
||||||
mca_db_dbase_la_LIBADD = $(db_dbase_LIBS)
|
|
||||||
|
|
||||||
noinst_LTLIBRARIES = $(component_noinst)
|
|
||||||
libmca_db_dbase_la_CPPFLAGS = $(db_dbase_CPPFLAGS)
|
|
||||||
libmca_db_dbase_la_SOURCES =$(sources)
|
|
||||||
libmca_db_dbase_la_LDFLAGS = -module -avoid-version $(db_dbase_LDFLAGS)
|
|
||||||
libmca_db_dbase_la_LIBADD = $(db_dbase_LIBS)
|
|
||||||
@ -1,30 +0,0 @@
|
|||||||
dnl -*- shell-script -*-
|
|
||||||
dnl
|
|
||||||
dnl Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
dnl $COPYRIGHT$
|
|
||||||
dnl
|
|
||||||
dnl Additional copyrights may follow
|
|
||||||
dnl
|
|
||||||
dnl $HEADER$
|
|
||||||
dnl
|
|
||||||
|
|
||||||
# MCA_db_dbase_CONFIG([action-if-found], [action-if-not-found])
|
|
||||||
# -----------------------------------------------------------
|
|
||||||
AC_DEFUN([MCA_orte_db_dbase_CONFIG], [
|
|
||||||
AC_CONFIG_FILES([orte/mca/db/dbase/Makefile])
|
|
||||||
|
|
||||||
# only build if db.h and its corresponding library are found
|
|
||||||
OMPI_CHECK_PACKAGE([db_db],
|
|
||||||
[db.h],
|
|
||||||
[db],
|
|
||||||
[dbopen],
|
|
||||||
[],
|
|
||||||
[],
|
|
||||||
[],
|
|
||||||
[$1],
|
|
||||||
[$2])])
|
|
||||||
|
|
||||||
AC_SUBST(db_dbase_CPPFLAGS)
|
|
||||||
AC_SUBST(db_dbase_LDFLAGS)
|
|
||||||
AC_SUBST(db_dbase_LIBS)
|
|
||||||
])dnl
|
|
||||||
@ -1,224 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
* $COPYRIGHT$
|
|
||||||
*
|
|
||||||
* Additional copyrights may follow
|
|
||||||
*
|
|
||||||
* $HEADER$
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "orte_config.h"
|
|
||||||
#include "orte/constants.h"
|
|
||||||
|
|
||||||
#include <string.h>
|
|
||||||
#include <sys/types.h>
|
|
||||||
#ifdef HAVE_LIMITS_H
|
|
||||||
#include <limits.h>
|
|
||||||
#endif
|
|
||||||
#include <stdio.h>
|
|
||||||
#ifdef HAVE_FCNTL_H
|
|
||||||
#include <fcntl.h>
|
|
||||||
#endif
|
|
||||||
#ifdef HAVE_UNISTD_H
|
|
||||||
#include <unistd.h>
|
|
||||||
#endif
|
|
||||||
#include <db.h>
|
|
||||||
|
|
||||||
#include "opal/dss/dss_types.h"
|
|
||||||
#include "opal/util/os_dirpath.h"
|
|
||||||
#include "opal/util/os_path.h"
|
|
||||||
#include "opal/util/output.h"
|
|
||||||
#include "opal/util/malloc.h"
|
|
||||||
#include "opal/util/basename.h"
|
|
||||||
#include "opal/mca/pstat/base/base.h"
|
|
||||||
#include "opal/mca/paffinity/base/base.h"
|
|
||||||
#include "opal/mca/sysinfo/base/base.h"
|
|
||||||
|
|
||||||
#include "orte/util/show_help.h"
|
|
||||||
#include "orte/mca/errmgr/base/base.h"
|
|
||||||
#include "orte/runtime/orte_globals.h"
|
|
||||||
|
|
||||||
#include "db_dbase.h"
|
|
||||||
|
|
||||||
static int init(void);
|
|
||||||
static int finalize(void);
|
|
||||||
static int insert(char *key, void *object, opal_data_type_t type);
|
|
||||||
static int set_recover_source(orte_process_name_t *name);
|
|
||||||
static int select_data(char *key, void *object, opal_data_type_t type);
|
|
||||||
static int update(char *key, void *object, opal_data_type_t type);
|
|
||||||
static int delete_data(char *key);
|
|
||||||
|
|
||||||
orte_db_base_module_t orte_db_dbase_module = {
|
|
||||||
init,
|
|
||||||
finalize,
|
|
||||||
insert,
|
|
||||||
set_recover_source,
|
|
||||||
select_data,
|
|
||||||
update,
|
|
||||||
delete_data
|
|
||||||
};
|
|
||||||
|
|
||||||
/* local variables */
|
|
||||||
static DB *save_dbase=NULL, *recover_dbase=NULL;
|
|
||||||
|
|
||||||
static int init(void)
|
|
||||||
{
|
|
||||||
char *path, *name;
|
|
||||||
|
|
||||||
/* setup the database */
|
|
||||||
if (ORTE_SUCCESS != opal_os_dirpath_create(orte_db_dbase_directory, S_IRWXU)) {
|
|
||||||
orte_show_help("help-db-dbase.txt", "cannot-create-dir", true,
|
|
||||||
orte_db_dbase_directory);
|
|
||||||
return ORTE_ERR_FILE_OPEN_FAILURE;
|
|
||||||
}
|
|
||||||
orte_util_convert_process_name_to_string(&name, ORTE_PROC_MY_NAME);
|
|
||||||
path = opal_os_path(false, orte_db_dbase_directory, name, NULL);
|
|
||||||
free(name);
|
|
||||||
if (NULL == (save_dbase = dbaseopen(path, O_CREAT | O_RDWR | O_TRUNC, S_IRWXU, DB_HASH, NULL))) {
|
|
||||||
orte_show_help("help-db-dbase.txt", "cannot-create-dbase", true, path);
|
|
||||||
free(path);
|
|
||||||
return ORTE_ERR_FILE_OPEN_FAILURE;
|
|
||||||
}
|
|
||||||
free(path);
|
|
||||||
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int finalize(void)
|
|
||||||
{
|
|
||||||
/* if we are normally terminating, remove the recovery file */
|
|
||||||
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int insert(char *inkey, void *object, opal_data_type_t type)
|
|
||||||
{
|
|
||||||
DBT key, data;
|
|
||||||
opal_buffer_t buf;
|
|
||||||
orte_job_t *jdata;
|
|
||||||
orte_proc_t *proc;
|
|
||||||
int rc=ORTE_SUCCESS, size;
|
|
||||||
|
|
||||||
/* construct the buffer we will use for packing the data */
|
|
||||||
OBJ_CONSTRUCT(&buf, opal_buffer_t);
|
|
||||||
key.data = inkey;
|
|
||||||
key.size = strlen(key.data);
|
|
||||||
|
|
||||||
switch (type) {
|
|
||||||
case ORTE_JOB:
|
|
||||||
jdata = (orte_job_t*)object;
|
|
||||||
opal_dss.pack(&buf, &jdata, 1, ORTE_JOB);
|
|
||||||
break;
|
|
||||||
case ORTE_PROC:
|
|
||||||
proc = (orte_proc_t*)object;
|
|
||||||
opal_dss.pack(&buf, &proc, 1, ORTE_PROC);
|
|
||||||
break;
|
|
||||||
default:
|
|
||||||
orte_show_help("help-db-dbase.txt", "unrecognized-type", true, type);
|
|
||||||
rc = ORTE_ERR_BAD_PARAM;
|
|
||||||
goto cleanup;
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* unload the data */
|
|
||||||
opal_dss.unload(&buf, (void**)&data.data, &size);
|
|
||||||
data.size = size;
|
|
||||||
OBJ_DESTRUCT(&buf);
|
|
||||||
|
|
||||||
/* put the info into the dbase */
|
|
||||||
if (0 > save_dbase->put(save_dbase, &key, &data, 0)) {
|
|
||||||
orte_show_help("help-db-dbase.txt", "error-writing-dbase", true, (char*)key.data, strerror(errno));
|
|
||||||
rc = ORTE_ERR_FILE_WRITE_FAILURE;
|
|
||||||
}
|
|
||||||
/* sync it to force it to disk */
|
|
||||||
if (0 > save_dbase->sync(save_dbase, 0)) {
|
|
||||||
orte_show_help("help-db-dbase.txt", "error-syncing-dbase", true, (char*)key.data, strerror(errno));
|
|
||||||
rc = ORTE_ERR_FILE_WRITE_FAILURE;
|
|
||||||
}
|
|
||||||
|
|
||||||
cleanup:
|
|
||||||
/* cleanup */
|
|
||||||
if (NULL != key.data) {
|
|
||||||
free(key.data);
|
|
||||||
}
|
|
||||||
if (NULL != data.data) {
|
|
||||||
free(data.data);
|
|
||||||
}
|
|
||||||
return rc;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int set_recover_source(orte_process_name_t *name)
|
|
||||||
{
|
|
||||||
char *path, *pname;
|
|
||||||
int rc=ORTE_SUCCESS;
|
|
||||||
|
|
||||||
/* setup the database */
|
|
||||||
orte_util_convert_process_name_to_string(&pname, name);
|
|
||||||
path = opal_os_path(false, orte_db_dbase_directory, pname, NULL);
|
|
||||||
free(pname);
|
|
||||||
if (NULL == (recover_dbase = dbaseopen(path, O_RDONLY, S_IRWXU, DB_HASH, NULL))) {
|
|
||||||
orte_show_help("help-db-dbase.txt", "cannot-open-dbase", true, path);
|
|
||||||
free(path);
|
|
||||||
return ORTE_ERR_FILE_OPEN_FAILURE;
|
|
||||||
}
|
|
||||||
free(path);
|
|
||||||
|
|
||||||
return rc;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int select_data(char *inkey, void *object, opal_data_type_t type)
|
|
||||||
{
|
|
||||||
DBT key, data;
|
|
||||||
opal_buffer_t buf;
|
|
||||||
orte_job_t *jdata;
|
|
||||||
orte_proc_t *proc;
|
|
||||||
int rc=ORTE_SUCCESS;
|
|
||||||
int32_t n;
|
|
||||||
|
|
||||||
if (NULL == recover_dbase) {
|
|
||||||
orte_show_help("help-db-dbase.txt", "recover-source-undef", true);
|
|
||||||
rc = ORTE_ERR_NOT_FOUND;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* construct the buffer we will use for unpacking the data */
|
|
||||||
OBJ_CONSTRUCT(&buf, opal_buffer_t);
|
|
||||||
key.data = inkey;
|
|
||||||
key.size = strlen(key.data);
|
|
||||||
|
|
||||||
/* get the specified data */
|
|
||||||
if (0 > recover_dbase->get(recover_dbase, &key, &data, 0)) {
|
|
||||||
orte_show_help("help-db-dbase.txt", "error-reading-dbase", true, (char*)key.data, strerror(errno));
|
|
||||||
rc = ORTE_ERR_FILE_READ_FAILURE;
|
|
||||||
goto cleanup;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* populate the recovered info */
|
|
||||||
opal_dss.load(&buf, data.data, data.size);
|
|
||||||
switch (type) {
|
|
||||||
case ORTE_JOB:
|
|
||||||
n=1;
|
|
||||||
opal_dss.unpack(&buf, &jdata, &n, ORTE_JOB);
|
|
||||||
break;
|
|
||||||
case ORTE_PROC:
|
|
||||||
n=1;
|
|
||||||
opal_dss.unpack(&buf, &proc, &n, ORTE_PROC);
|
|
||||||
break;
|
|
||||||
default:
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
|
|
||||||
cleanup:
|
|
||||||
OBJ_DESTRUCT(&buf);
|
|
||||||
return rc;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int update(char *key, void *object, opal_data_type_t type)
|
|
||||||
{
|
|
||||||
return ORTE_ERR_NOT_IMPLEMENTED;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int delete_data(char *key)
|
|
||||||
{
|
|
||||||
return ORTE_ERR_NOT_IMPLEMENTED;
|
|
||||||
}
|
|
||||||
@ -1,31 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
* $COPYRIGHT$
|
|
||||||
*
|
|
||||||
* Additional copyrights may follow
|
|
||||||
*
|
|
||||||
* $HEADER$
|
|
||||||
*/
|
|
||||||
|
|
||||||
#ifndef ORTE_DB_DBASE_H
|
|
||||||
#define ORTE_DB_DBASE_H
|
|
||||||
|
|
||||||
#include "orte/mca/db/db.h"
|
|
||||||
|
|
||||||
BEGIN_C_DECLS
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Module open / close
|
|
||||||
*/
|
|
||||||
int orte_db_dbase_component_open(void);
|
|
||||||
int orte_db_dbase_component_close(void);
|
|
||||||
int orte_db_dbase_component_query(mca_base_module_t **module, int *priority);
|
|
||||||
|
|
||||||
|
|
||||||
ORTE_MODULE_DECLSPEC extern orte_db_base_component_t mca_db_dbase_component;
|
|
||||||
ORTE_DECLSPEC extern orte_db_base_module_t orte_db_dbase_module;
|
|
||||||
extern char *orte_db_dbase_directory;
|
|
||||||
|
|
||||||
END_C_DECLS
|
|
||||||
|
|
||||||
#endif /* ORTE_DB_DBASE_H */
|
|
||||||
@ -1,101 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
* $COPYRIGHT$
|
|
||||||
*
|
|
||||||
* Additional copyrights may follow
|
|
||||||
*
|
|
||||||
* $HEADER$
|
|
||||||
*
|
|
||||||
* These symbols are in a file by themselves to provide nice linker
|
|
||||||
* semantics. Since linkers generally pull in symbols by object
|
|
||||||
* files, keeping these symbols as the only symbols in this file
|
|
||||||
* prevents utility programs such as "ompi_info" from having to import
|
|
||||||
* entire components just to query their version and parameters.
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "orte_config.h"
|
|
||||||
#include "orte/constants.h"
|
|
||||||
|
|
||||||
#include "opal/mca/base/base.h"
|
|
||||||
#include "opal/mca/base/mca_base_param.h"
|
|
||||||
|
|
||||||
#include "orte/util/proc_info.h"
|
|
||||||
|
|
||||||
#include "orte/mca/db/db.h"
|
|
||||||
#include "orte/mca/db/base/base.h"
|
|
||||||
#include "db_dbase.h"
|
|
||||||
|
|
||||||
extern orte_db_base_module_t orte_db_dbase_module;
|
|
||||||
char *orte_db_dbase_directory;
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Instantiate the public struct with all of our public information
|
|
||||||
* and pointers to our public functions in it
|
|
||||||
*/
|
|
||||||
orte_db_base_component_t mca_db_dbase_component = {
|
|
||||||
{
|
|
||||||
ORTE_DB_BASE_VERSION_1_0_0,
|
|
||||||
|
|
||||||
/* Component name and version */
|
|
||||||
"dbase",
|
|
||||||
ORTE_MAJOR_VERSION,
|
|
||||||
ORTE_MINOR_VERSION,
|
|
||||||
ORTE_RELEASE_VERSION,
|
|
||||||
|
|
||||||
/* Component open and close functions */
|
|
||||||
orte_db_dbase_component_open,
|
|
||||||
orte_db_dbase_component_close,
|
|
||||||
orte_db_dbase_component_query
|
|
||||||
},
|
|
||||||
{
|
|
||||||
/* The component is checkpoint ready */
|
|
||||||
MCA_BASE_METADATA_PARAM_CHECKPOINT
|
|
||||||
}
|
|
||||||
};
|
|
||||||
|
|
||||||
|
|
||||||
int
|
|
||||||
orte_db_dbase_component_open(void)
|
|
||||||
{
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
int orte_db_dbase_component_query(mca_base_module_t **module, int *priority)
|
|
||||||
{
|
|
||||||
|
|
||||||
/* we are the file module - we need to be selected
|
|
||||||
* IFF we are requested
|
|
||||||
*/
|
|
||||||
bool is_required = false;
|
|
||||||
mca_base_component_t *c = &mca_db_dbase_component.base_version;
|
|
||||||
|
|
||||||
/* retrieve the name of the file to be used */
|
|
||||||
mca_base_param_reg_string(c, "dir",
|
|
||||||
"Name of directory to be used for storing and recovering db information",
|
|
||||||
false, false, NULL, &orte_db_dbase_directory);
|
|
||||||
|
|
||||||
mca_base_is_component_required(&orte_db_base_components_available,
|
|
||||||
&mca_db_dbase_component.base_version,
|
|
||||||
true,
|
|
||||||
&is_required);
|
|
||||||
|
|
||||||
if (is_required && NULL != orte_db_dbase_directory) {
|
|
||||||
*priority = 1000;
|
|
||||||
*module = (mca_base_module_t*)&orte_db_dbase_module;
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
*priority = 0;
|
|
||||||
*module = NULL;
|
|
||||||
return ORTE_ERROR;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
int
|
|
||||||
orte_db_dbase_component_close(void)
|
|
||||||
{
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
@ -1,38 +0,0 @@
|
|||||||
#
|
|
||||||
# Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
# $COPYRIGHT$
|
|
||||||
#
|
|
||||||
# Additional copyrights may follow
|
|
||||||
#
|
|
||||||
# $HEADER$
|
|
||||||
#
|
|
||||||
|
|
||||||
sources = \
|
|
||||||
db_dbm.h \
|
|
||||||
db_dbm_component.c \
|
|
||||||
db_dbm.c
|
|
||||||
|
|
||||||
# Make the output library in this directory, and name it either
|
|
||||||
# mca_<type>_<name>.la (for DSO builds) or libmca_<type>_<name>.la
|
|
||||||
# (for static builds).
|
|
||||||
|
|
||||||
if MCA_BUILD_orte_db_dbm_DSO
|
|
||||||
component_noinst =
|
|
||||||
component_install = mca_db_dbm.la
|
|
||||||
else
|
|
||||||
component_noinst = libmca_db_dbm.la
|
|
||||||
component_install =
|
|
||||||
endif
|
|
||||||
|
|
||||||
mcacomponentdir = $(pkglibdir)
|
|
||||||
mcacomponent_LTLIBRARIES = $(component_install)
|
|
||||||
mca_db_dbm_la_CPPFLAGS = $(db_dbm_CPPFLAGS)
|
|
||||||
mca_db_dbm_la_SOURCES = $(sources)
|
|
||||||
mca_db_dbm_la_LDFLAGS = -module -avoid-version $(db_dbm_LDFLAGS)
|
|
||||||
mca_db_dbm_la_LIBADD = $(db_dbm_LIBS)
|
|
||||||
|
|
||||||
noinst_LTLIBRARIES = $(component_noinst)
|
|
||||||
libmca_db_dbm_la_CPPFLAGS = $(db_dbm_CPPFLAGS)
|
|
||||||
libmca_db_dbm_la_SOURCES =$(sources)
|
|
||||||
libmca_db_dbm_la_LDFLAGS = -module -avoid-version $(db_dbm_LDFLAGS)
|
|
||||||
libmca_db_dbm_la_LIBADD = $(db_dbm_LIBS)
|
|
||||||
@ -1,30 +0,0 @@
|
|||||||
dnl -*- shell-script -*-
|
|
||||||
dnl
|
|
||||||
dnl Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
dnl $COPYRIGHT$
|
|
||||||
dnl
|
|
||||||
dnl Additional copyrights may follow
|
|
||||||
dnl
|
|
||||||
dnl $HEADER$
|
|
||||||
dnl
|
|
||||||
|
|
||||||
# MCA_db_dbm_CONFIG([action-if-found], [action-if-not-found])
|
|
||||||
# -----------------------------------------------------------
|
|
||||||
AC_DEFUN([MCA_orte_db_dbm_CONFIG], [
|
|
||||||
AC_CONFIG_FILES([orte/mca/db/dbm/Makefile])
|
|
||||||
|
|
||||||
# only build if ndbm.h and its library are found
|
|
||||||
OMPI_CHECK_PACKAGE([db_dbm],
|
|
||||||
[ndbm.h],
|
|
||||||
[dbm],
|
|
||||||
[dbm_open],
|
|
||||||
[],
|
|
||||||
[],
|
|
||||||
[],
|
|
||||||
[$1],
|
|
||||||
[$2])])
|
|
||||||
|
|
||||||
AC_SUBST(db_dbm_CPPFLAGS)
|
|
||||||
AC_SUBST(db_dbm_LDFLAGS)
|
|
||||||
AC_SUBST(db_dbm_LIBS)
|
|
||||||
])dnl
|
|
||||||
@ -1,221 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
* $COPYRIGHT$
|
|
||||||
*
|
|
||||||
* Additional copyrights may follow
|
|
||||||
*
|
|
||||||
* $HEADER$
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "orte_config.h"
|
|
||||||
#include "orte/constants.h"
|
|
||||||
|
|
||||||
#include <string.h>
|
|
||||||
#include <sys/types.h>
|
|
||||||
#ifdef HAVE_LIMITS_H
|
|
||||||
#include <limits.h>
|
|
||||||
#endif
|
|
||||||
#include <stdio.h>
|
|
||||||
#ifdef HAVE_FCNTL_H
|
|
||||||
#include <fcntl.h>
|
|
||||||
#endif
|
|
||||||
#ifdef HAVE_UNISTD_H
|
|
||||||
#include <unistd.h>
|
|
||||||
#endif
|
|
||||||
#include <ndbm.h>
|
|
||||||
|
|
||||||
#include "opal/dss/dss_types.h"
|
|
||||||
#include "opal/util/os_dirpath.h"
|
|
||||||
#include "opal/util/os_path.h"
|
|
||||||
#include "opal/util/output.h"
|
|
||||||
#include "opal/util/malloc.h"
|
|
||||||
#include "opal/util/basename.h"
|
|
||||||
#include "opal/mca/pstat/base/base.h"
|
|
||||||
#include "opal/mca/paffinity/base/base.h"
|
|
||||||
|
|
||||||
#include "orte/util/show_help.h"
|
|
||||||
#include "orte/mca/errmgr/base/base.h"
|
|
||||||
#include "orte/runtime/orte_globals.h"
|
|
||||||
|
|
||||||
#include "db_dbm.h"
|
|
||||||
|
|
||||||
static int init(void);
|
|
||||||
static int finalize(void);
|
|
||||||
static int insert(char *key, void *object, opal_data_type_t type);
|
|
||||||
static int set_recover_source(orte_process_name_t *name);
|
|
||||||
static int select_data(char *key, void *object, opal_data_type_t type);
|
|
||||||
static int update(char *key, void *object, opal_data_type_t type);
|
|
||||||
static int delete_data(char *key);
|
|
||||||
|
|
||||||
orte_db_base_module_t orte_db_dbm_module = {
|
|
||||||
init,
|
|
||||||
finalize,
|
|
||||||
insert,
|
|
||||||
set_recover_source,
|
|
||||||
select_data,
|
|
||||||
update,
|
|
||||||
delete_data
|
|
||||||
};
|
|
||||||
|
|
||||||
/* local variables */
|
|
||||||
static DBM *save_dbm=NULL, *recover_dbm=NULL;
|
|
||||||
|
|
||||||
static int init(void)
|
|
||||||
{
|
|
||||||
char *path, *name;
|
|
||||||
|
|
||||||
/* setup the database */
|
|
||||||
if (ORTE_SUCCESS != opal_os_dirpath_create(orte_db_dbm_directory, S_IRWXU)) {
|
|
||||||
orte_show_help("help-db-dbm.txt", "cannot-create-dir", true,
|
|
||||||
orte_db_dbm_directory);
|
|
||||||
return ORTE_ERR_FILE_OPEN_FAILURE;
|
|
||||||
}
|
|
||||||
orte_util_convert_process_name_to_string(&name, ORTE_PROC_MY_NAME);
|
|
||||||
path = opal_os_path(false, orte_db_dbm_directory, name, NULL);
|
|
||||||
free(name);
|
|
||||||
if (NULL == (save_dbm = dbm_open(path, O_CREAT | O_RDWR | O_TRUNC, S_IRWXU))) {
|
|
||||||
orte_show_help("help-db-dbm.txt", "cannot-create-dbm", true, path);
|
|
||||||
free(path);
|
|
||||||
return ORTE_ERR_FILE_OPEN_FAILURE;
|
|
||||||
}
|
|
||||||
free(path);
|
|
||||||
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int finalize(void)
|
|
||||||
{
|
|
||||||
/* if we are normally terminating, remove the recovery file */
|
|
||||||
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int insert(char *inkey, void *object, opal_data_type_t type)
|
|
||||||
{
|
|
||||||
datum key, data;
|
|
||||||
opal_buffer_t buf;
|
|
||||||
orte_job_t *jdata;
|
|
||||||
orte_proc_t *proc;
|
|
||||||
int rc=ORTE_SUCCESS, size;
|
|
||||||
|
|
||||||
/* construct the buffer we will use for packing the data */
|
|
||||||
OBJ_CONSTRUCT(&buf, opal_buffer_t);
|
|
||||||
key.dptr = inkey;
|
|
||||||
key.dsize = strlen(key.dptr);
|
|
||||||
data.dptr = NULL;
|
|
||||||
|
|
||||||
switch (type) {
|
|
||||||
case ORTE_JOB:
|
|
||||||
jdata = (orte_job_t*)object;
|
|
||||||
opal_dss.pack(&buf, &jdata, 1, ORTE_JOB);
|
|
||||||
break;
|
|
||||||
case ORTE_PROC:
|
|
||||||
proc = (orte_proc_t*)object;
|
|
||||||
opal_dss.pack(&buf, &proc, 1, ORTE_PROC);
|
|
||||||
break;
|
|
||||||
default:
|
|
||||||
orte_show_help("help-db-db.txt", "unrecognized-type", true, type);
|
|
||||||
rc = ORTE_ERR_BAD_PARAM;
|
|
||||||
goto cleanup;
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* unload the data */
|
|
||||||
opal_dss.unload(&buf, (void**)&data.dptr, &size);
|
|
||||||
data.dsize = size;
|
|
||||||
OBJ_DESTRUCT(&buf);
|
|
||||||
|
|
||||||
/* put the info into the dbm */
|
|
||||||
if (0 > dbm_store(save_dbm, key, data, DBM_REPLACE)) {
|
|
||||||
orte_show_help("help-db-dbm.txt", "error-writing-dbm", true, (char*)key.dptr, strerror(errno));
|
|
||||||
rc = ORTE_ERR_FILE_WRITE_FAILURE;
|
|
||||||
}
|
|
||||||
|
|
||||||
cleanup:
|
|
||||||
/* cleanup */
|
|
||||||
if (NULL != key.dptr) {
|
|
||||||
free(key.dptr);
|
|
||||||
}
|
|
||||||
if (NULL != data.dptr) {
|
|
||||||
free(data.dptr);
|
|
||||||
}
|
|
||||||
return rc;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int set_recover_source(orte_process_name_t *name)
|
|
||||||
{
|
|
||||||
char *path, *pname;
|
|
||||||
int rc=ORTE_SUCCESS;
|
|
||||||
|
|
||||||
/* setup the database */
|
|
||||||
orte_util_convert_process_name_to_string(&pname, name);
|
|
||||||
path = opal_os_path(false, orte_db_dbm_directory, pname, NULL);
|
|
||||||
free(pname);
|
|
||||||
if (NULL == (recover_dbm = dbm_open(path, O_RDONLY, S_IRWXU))) {
|
|
||||||
orte_show_help("help-db-dbm.txt", "cannot-open-dbm", true, path);
|
|
||||||
free(path);
|
|
||||||
return ORTE_ERR_FILE_OPEN_FAILURE;
|
|
||||||
}
|
|
||||||
free(path);
|
|
||||||
|
|
||||||
return rc;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int select_data(char *inkey, void *object, opal_data_type_t type)
|
|
||||||
{
|
|
||||||
datum key, data;
|
|
||||||
opal_buffer_t buf;
|
|
||||||
orte_job_t *jdata;
|
|
||||||
orte_proc_t *proc;
|
|
||||||
int rc=ORTE_SUCCESS;
|
|
||||||
int32_t n;
|
|
||||||
|
|
||||||
if (NULL == recover_dbm) {
|
|
||||||
orte_show_help("help-db-dbm.txt", "recover-source-undef", true);
|
|
||||||
rc = ORTE_ERR_NOT_FOUND;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* construct the buffer we will use for unpacking the data */
|
|
||||||
OBJ_CONSTRUCT(&buf, opal_buffer_t);
|
|
||||||
key.dptr = inkey;
|
|
||||||
key.dsize = strlen(key.dptr);
|
|
||||||
data.dptr = NULL;
|
|
||||||
|
|
||||||
/* get the specified data */
|
|
||||||
data = dbm_fetch(recover_dbm, key);
|
|
||||||
if (NULL == data.dptr) {
|
|
||||||
orte_show_help("help-db-dbm.txt", "error-reading-dbm", true, (char*)key.dptr, strerror(errno));
|
|
||||||
rc = ORTE_ERR_FILE_READ_FAILURE;
|
|
||||||
goto cleanup;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* populate the recovered info */
|
|
||||||
opal_dss.load(&buf, data.dptr, data.dsize);
|
|
||||||
switch (type) {
|
|
||||||
case ORTE_JOB:
|
|
||||||
n=1;
|
|
||||||
opal_dss.unpack(&buf, &jdata, &n, ORTE_JOB);
|
|
||||||
break;
|
|
||||||
case ORTE_PROC:
|
|
||||||
n=1;
|
|
||||||
opal_dss.unpack(&buf, &proc, &n, ORTE_PROC);
|
|
||||||
break;
|
|
||||||
default:
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
|
|
||||||
cleanup:
|
|
||||||
OBJ_DESTRUCT(&buf);
|
|
||||||
return rc;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int update(char *key, void *object, opal_data_type_t type)
|
|
||||||
{
|
|
||||||
return ORTE_ERR_NOT_IMPLEMENTED;
|
|
||||||
}
|
|
||||||
|
|
||||||
static int delete_data(char *key)
|
|
||||||
{
|
|
||||||
return ORTE_ERR_NOT_IMPLEMENTED;
|
|
||||||
}
|
|
||||||
@ -1,31 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
* $COPYRIGHT$
|
|
||||||
*
|
|
||||||
* Additional copyrights may follow
|
|
||||||
*
|
|
||||||
* $HEADER$
|
|
||||||
*/
|
|
||||||
|
|
||||||
#ifndef ORTE_DB_DBM_H
|
|
||||||
#define ORTE_DB_DBM_H
|
|
||||||
|
|
||||||
#include "orte/mca/db/db.h"
|
|
||||||
|
|
||||||
BEGIN_C_DECLS
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Module open / close
|
|
||||||
*/
|
|
||||||
int orte_db_dbm_component_open(void);
|
|
||||||
int orte_db_dbm_component_close(void);
|
|
||||||
int orte_db_dbm_component_query(mca_base_module_t **module, int *priority);
|
|
||||||
|
|
||||||
|
|
||||||
ORTE_MODULE_DECLSPEC extern orte_db_base_component_t mca_db_dbm_component;
|
|
||||||
ORTE_DECLSPEC extern orte_db_base_module_t orte_db_dbm_module;
|
|
||||||
extern char *orte_db_dbm_directory;
|
|
||||||
|
|
||||||
END_C_DECLS
|
|
||||||
|
|
||||||
#endif /* ORTE_DB_DBM_H */
|
|
||||||
@ -1,91 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|
||||||
* $COPYRIGHT$
|
|
||||||
*
|
|
||||||
* Additional copyrights may follow
|
|
||||||
*
|
|
||||||
* $HEADER$
|
|
||||||
*
|
|
||||||
* These symbols are in a file by themselves to provide nice linker
|
|
||||||
* semantics. Since linkers generally pull in symbols by object
|
|
||||||
* files, keeping these symbols as the only symbols in this file
|
|
||||||
* prevents utility programs such as "ompi_info" from having to import
|
|
||||||
* entire components just to query their version and parameters.
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "orte_config.h"
|
|
||||||
#include "orte/constants.h"
|
|
||||||
|
|
||||||
#include "opal/mca/base/base.h"
|
|
||||||
#include "opal/mca/base/mca_base_param.h"
|
|
||||||
|
|
||||||
#include "orte/util/proc_info.h"
|
|
||||||
|
|
||||||
#include "orte/mca/db/db.h"
|
|
||||||
#include "orte/mca/db/base/base.h"
|
|
||||||
#include "db_dbm.h"
|
|
||||||
|
|
||||||
extern orte_db_base_module_t orte_db_dbm_module;
|
|
||||||
char *orte_db_dbm_directory;
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Instantiate the public struct with all of our public information
|
|
||||||
* and pointers to our public functions in it
|
|
||||||
*/
|
|
||||||
orte_db_base_component_t mca_db_dbm_component = {
|
|
||||||
{
|
|
||||||
ORTE_DB_BASE_VERSION_1_0_0,
|
|
||||||
|
|
||||||
/* Component name and version */
|
|
||||||
"dbm",
|
|
||||||
ORTE_MAJOR_VERSION,
|
|
||||||
ORTE_MINOR_VERSION,
|
|
||||||
ORTE_RELEASE_VERSION,
|
|
||||||
|
|
||||||
/* Component open and close functions */
|
|
||||||
orte_db_dbm_component_open,
|
|
||||||
orte_db_dbm_component_close,
|
|
||||||
orte_db_dbm_component_query
|
|
||||||
},
|
|
||||||
{
|
|
||||||
/* The component is checkpoint ready */
|
|
||||||
MCA_BASE_METADATA_PARAM_CHECKPOINT
|
|
||||||
}
|
|
||||||
};
|
|
||||||
|
|
||||||
|
|
||||||
int
|
|
||||||
orte_db_dbm_component_open(void)
|
|
||||||
{
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
int orte_db_dbm_component_query(mca_base_module_t **module, int *priority)
|
|
||||||
{
|
|
||||||
mca_base_component_t *c = &mca_db_dbm_component.base_version;
|
|
||||||
|
|
||||||
/* retrieve the name of the file to be used */
|
|
||||||
mca_base_param_reg_string(c, "dir",
|
|
||||||
"Name of directory to be used for storing and recovering db information",
|
|
||||||
false, false, NULL, &orte_db_dbm_directory);
|
|
||||||
|
|
||||||
if (NULL != orte_db_dbm_directory) {
|
|
||||||
*priority = 50;
|
|
||||||
*module = (mca_base_module_t*)&orte_db_dbm_module;
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
*priority = 0;
|
|
||||||
*module = NULL;
|
|
||||||
return ORTE_ERROR;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
int
|
|
||||||
orte_db_dbm_component_close(void)
|
|
||||||
{
|
|
||||||
return ORTE_SUCCESS;
|
|
||||||
}
|
|
||||||
|
|
||||||
19
orte/mca/debugger/mpir/configure.m4
Обычный файл
19
orte/mca/debugger/mpir/configure.m4
Обычный файл
@ -0,0 +1,19 @@
|
|||||||
|
# -*- shell-script -*-
|
||||||
|
#
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
# $COPYRIGHT$
|
||||||
|
#
|
||||||
|
# Additional copyrights may follow
|
||||||
|
#
|
||||||
|
# $HEADER$
|
||||||
|
#
|
||||||
|
# MCA_debugger_mpir_CONFIG([action-if-found], [action-if-not-found])
|
||||||
|
# -----------------------------------------------------------
|
||||||
|
AC_DEFUN([MCA_orte_debugger_mpir_CONFIG], [
|
||||||
|
AC_CONFIG_FILES([orte/mca/debugger/mpir/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
|
])
|
||||||
@ -111,7 +111,6 @@
|
|||||||
#include "opal/util/output.h"
|
#include "opal/util/output.h"
|
||||||
#include "opal/util/path.h"
|
#include "opal/util/path.h"
|
||||||
#include "opal/util/os_path.h"
|
#include "opal/util/os_path.h"
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
#include "opal/class/opal_pointer_array.h"
|
#include "opal/class/opal_pointer_array.h"
|
||||||
#include "opal/mca/base/mca_base_param.h"
|
#include "opal/mca/base/mca_base_param.h"
|
||||||
#include "opal/util/opal_getcwd.h"
|
#include "opal/util/opal_getcwd.h"
|
||||||
|
|||||||
19
orte/mca/debugger/mpirx/configure.m4
Обычный файл
19
orte/mca/debugger/mpirx/configure.m4
Обычный файл
@ -0,0 +1,19 @@
|
|||||||
|
# -*- shell-script -*-
|
||||||
|
#
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
# $COPYRIGHT$
|
||||||
|
#
|
||||||
|
# Additional copyrights may follow
|
||||||
|
#
|
||||||
|
# $HEADER$
|
||||||
|
#
|
||||||
|
# MCA_debugger_mpirx_CONFIG([action-if-found], [action-if-not-found])
|
||||||
|
# -----------------------------------------------------------
|
||||||
|
AC_DEFUN([MCA_orte_debugger_mpirx_CONFIG], [
|
||||||
|
AC_CONFIG_FILES([orte/mca/debugger/mpirx/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
|
])
|
||||||
@ -37,7 +37,6 @@
|
|||||||
#include "opal/util/output.h"
|
#include "opal/util/output.h"
|
||||||
#include "opal/util/path.h"
|
#include "opal/util/path.h"
|
||||||
#include "opal/util/os_path.h"
|
#include "opal/util/os_path.h"
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
#include "opal/class/opal_pointer_array.h"
|
#include "opal/class/opal_pointer_array.h"
|
||||||
#include "opal/mca/base/mca_base_param.h"
|
#include "opal/mca/base/mca_base_param.h"
|
||||||
#include "opal/util/opal_getcwd.h"
|
#include "opal/util/opal_getcwd.h"
|
||||||
|
|||||||
19
orte/mca/errmgr/app/configure.m4
Обычный файл
19
orte/mca/errmgr/app/configure.m4
Обычный файл
@ -0,0 +1,19 @@
|
|||||||
|
# -*- shell-script -*-
|
||||||
|
#
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
# $COPYRIGHT$
|
||||||
|
#
|
||||||
|
# Additional copyrights may follow
|
||||||
|
#
|
||||||
|
# $HEADER$
|
||||||
|
#
|
||||||
|
# MCA_errmgr_app_CONFIG([action-if-found], [action-if-not-found])
|
||||||
|
# -----------------------------------------------------------
|
||||||
|
AC_DEFUN([MCA_orte_errmgr_app_CONFIG], [
|
||||||
|
AC_CONFIG_FILES([orte/mca/errmgr/app/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_enable_resilient_code" = 1 -a "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
|
])
|
||||||
19
orte/mca/errmgr/default_app/configure.m4
Обычный файл
19
orte/mca/errmgr/default_app/configure.m4
Обычный файл
@ -0,0 +1,19 @@
|
|||||||
|
# -*- shell-script -*-
|
||||||
|
#
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
# $COPYRIGHT$
|
||||||
|
#
|
||||||
|
# Additional copyrights may follow
|
||||||
|
#
|
||||||
|
# $HEADER$
|
||||||
|
#
|
||||||
|
# MCA_errmgr_default_app_CONFIG([action-if-found], [action-if-not-found])
|
||||||
|
# -----------------------------------------------------------
|
||||||
|
AC_DEFUN([MCA_orte_errmgr_default_app_CONFIG], [
|
||||||
|
AC_CONFIG_FILES([orte/mca/errmgr/default_app/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_enable_resilient_code" = 0 -a "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
|
])
|
||||||
19
orte/mca/errmgr/default_hnp/configure.m4
Обычный файл
19
orte/mca/errmgr/default_hnp/configure.m4
Обычный файл
@ -0,0 +1,19 @@
|
|||||||
|
# -*- shell-script -*-
|
||||||
|
#
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
# $COPYRIGHT$
|
||||||
|
#
|
||||||
|
# Additional copyrights may follow
|
||||||
|
#
|
||||||
|
# $HEADER$
|
||||||
|
#
|
||||||
|
# MCA_errmgr_default_hnp_CONFIG([action-if-found], [action-if-not-found])
|
||||||
|
# -----------------------------------------------------------
|
||||||
|
AC_DEFUN([MCA_orte_errmgr_default_hnp_CONFIG], [
|
||||||
|
AC_CONFIG_FILES([orte/mca/errmgr/default_hnp/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_enable_resilient_code" = 0 -a "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
|
])
|
||||||
@ -28,7 +28,6 @@
|
|||||||
#endif
|
#endif
|
||||||
|
|
||||||
#include "opal/util/output.h"
|
#include "opal/util/output.h"
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
#include "opal/dss/dss.h"
|
#include "opal/dss/dss.h"
|
||||||
|
|
||||||
#include "orte/mca/rml/rml.h"
|
#include "orte/mca/rml/rml.h"
|
||||||
|
|||||||
19
orte/mca/errmgr/default_orted/configure.m4
Обычный файл
19
orte/mca/errmgr/default_orted/configure.m4
Обычный файл
@ -0,0 +1,19 @@
|
|||||||
|
# -*- shell-script -*-
|
||||||
|
#
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
# $COPYRIGHT$
|
||||||
|
#
|
||||||
|
# Additional copyrights may follow
|
||||||
|
#
|
||||||
|
# $HEADER$
|
||||||
|
#
|
||||||
|
# MCA_errmgr_default_orted_CONFIG([action-if-found], [action-if-not-found])
|
||||||
|
# -----------------------------------------------------------
|
||||||
|
AC_DEFUN([MCA_orte_errmgr_default_orted_CONFIG], [
|
||||||
|
AC_CONFIG_FILES([orte/mca/errmgr/default_orted/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_enable_resilient_code" = 0 -a "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
|
])
|
||||||
@ -24,7 +24,6 @@
|
|||||||
#endif
|
#endif
|
||||||
|
|
||||||
#include "opal/util/output.h"
|
#include "opal/util/output.h"
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
#include "opal/dss/dss.h"
|
#include "opal/dss/dss.h"
|
||||||
|
|
||||||
#include "orte/util/error_strings.h"
|
#include "orte/util/error_strings.h"
|
||||||
|
|||||||
19
orte/mca/errmgr/hnp/configure.m4
Обычный файл
19
orte/mca/errmgr/hnp/configure.m4
Обычный файл
@ -0,0 +1,19 @@
|
|||||||
|
# -*- shell-script -*-
|
||||||
|
#
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
# $COPYRIGHT$
|
||||||
|
#
|
||||||
|
# Additional copyrights may follow
|
||||||
|
#
|
||||||
|
# $HEADER$
|
||||||
|
#
|
||||||
|
# MCA_errmgr_hnp_CONFIG([action-if-found], [action-if-not-found])
|
||||||
|
# -----------------------------------------------------------
|
||||||
|
AC_DEFUN([MCA_orte_errmgr_hnp_CONFIG], [
|
||||||
|
AC_CONFIG_FILES([orte/mca/errmgr/hnp/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_enable_resilient_code" = 1 -a "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
|
])
|
||||||
@ -27,7 +27,6 @@
|
|||||||
#endif
|
#endif
|
||||||
|
|
||||||
#include "opal/util/output.h"
|
#include "opal/util/output.h"
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
#include "opal/dss/dss.h"
|
#include "opal/dss/dss.h"
|
||||||
|
|
||||||
#include "orte/mca/rml/rml.h"
|
#include "orte/mca/rml/rml.h"
|
||||||
|
|||||||
19
orte/mca/errmgr/orted/configure.m4
Обычный файл
19
orte/mca/errmgr/orted/configure.m4
Обычный файл
@ -0,0 +1,19 @@
|
|||||||
|
# -*- shell-script -*-
|
||||||
|
#
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
# $COPYRIGHT$
|
||||||
|
#
|
||||||
|
# Additional copyrights may follow
|
||||||
|
#
|
||||||
|
# $HEADER$
|
||||||
|
#
|
||||||
|
# MCA_errmgr_orted_CONFIG([action-if-found], [action-if-not-found])
|
||||||
|
# -----------------------------------------------------------
|
||||||
|
AC_DEFUN([MCA_orte_errmgr_orted_CONFIG], [
|
||||||
|
AC_CONFIG_FILES([orte/mca/errmgr/orted/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_enable_resilient_code" = 1 -a "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
|
])
|
||||||
@ -24,7 +24,6 @@
|
|||||||
#endif
|
#endif
|
||||||
|
|
||||||
#include "opal/util/output.h"
|
#include "opal/util/output.h"
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
#include "opal/dss/dss.h"
|
#include "opal/dss/dss.h"
|
||||||
|
|
||||||
#include "orte/util/error_strings.h"
|
#include "orte/util/error_strings.h"
|
||||||
|
|||||||
@ -57,7 +57,7 @@ AC_DEFUN([MCA_orte_ess_alps_CONFIG],[
|
|||||||
[$orte_mca_ess_alps_have_cnos],
|
[$orte_mca_ess_alps_have_cnos],
|
||||||
[Whether we have CNOS support in alps ess or not])
|
[Whether we have CNOS support in alps ess or not])
|
||||||
|
|
||||||
AS_IF([test "$orte_mca_ess_alps_happy" = "yes"],
|
AS_IF([test "$orte_mca_ess_alps_happy" = "yes" -a "$orte_without_full_support" = 0],
|
||||||
[$1],
|
[$1],
|
||||||
[$2])
|
[$2])
|
||||||
])dnl
|
])dnl
|
||||||
|
|||||||
@ -183,9 +183,12 @@ static int rte_init(void)
|
|||||||
return ORTE_SUCCESS;
|
return ORTE_SUCCESS;
|
||||||
|
|
||||||
error:
|
error:
|
||||||
orte_show_help("help-orte-runtime.txt",
|
if (ORTE_ERR_SILENT != ret && !orte_report_silent_errors) {
|
||||||
"orte_init:startup:internal-failure",
|
orte_show_help("help-orte-runtime.txt",
|
||||||
true, error, ORTE_ERROR_NAME(ret), ret);
|
"orte_init:startup:internal-failure",
|
||||||
|
true, error, ORTE_ERROR_NAME(ret), ret);
|
||||||
|
}
|
||||||
|
|
||||||
return ret;
|
return ret;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
@ -40,7 +40,6 @@
|
|||||||
#include "orte/mca/routed/base/base.h"
|
#include "orte/mca/routed/base/base.h"
|
||||||
#include "orte/mca/errmgr/errmgr.h"
|
#include "orte/mca/errmgr/errmgr.h"
|
||||||
#include "orte/mca/grpcomm/base/base.h"
|
#include "orte/mca/grpcomm/base/base.h"
|
||||||
#include "orte/mca/rmcast/base/base.h"
|
|
||||||
#include "orte/mca/rml/rml.h"
|
#include "orte/mca/rml/rml.h"
|
||||||
#include "orte/mca/odls/odls_types.h"
|
#include "orte/mca/odls/odls_types.h"
|
||||||
#include "orte/mca/plm/plm.h"
|
#include "orte/mca/plm/plm.h"
|
||||||
@ -54,7 +53,6 @@
|
|||||||
#include "orte/util/name_fns.h"
|
#include "orte/util/name_fns.h"
|
||||||
#include "orte/util/show_help.h"
|
#include "orte/util/show_help.h"
|
||||||
#include "orte/mca/notifier/base/base.h"
|
#include "orte/mca/notifier/base/base.h"
|
||||||
#include "orte/mca/db/base/base.h"
|
|
||||||
|
|
||||||
#include "orte/runtime/orte_cr.h"
|
#include "orte/runtime/orte_cr.h"
|
||||||
#include "orte/runtime/orte_globals.h"
|
#include "orte/runtime/orte_globals.h"
|
||||||
@ -107,18 +105,6 @@ int orte_ess_base_app_setup(void)
|
|||||||
goto error;
|
goto error;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* multicast */
|
|
||||||
if (ORTE_SUCCESS != (ret = orte_rmcast_base_open())) {
|
|
||||||
ORTE_ERROR_LOG(ret);
|
|
||||||
error = "orte_rmcast_base_open";
|
|
||||||
goto error;
|
|
||||||
}
|
|
||||||
if (ORTE_SUCCESS != (ret = orte_rmcast_base_select())) {
|
|
||||||
ORTE_ERROR_LOG(ret);
|
|
||||||
error = "orte_rmcast_base_select";
|
|
||||||
goto error;
|
|
||||||
}
|
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Group communications
|
* Group communications
|
||||||
*/
|
*/
|
||||||
@ -229,18 +215,6 @@ int orte_ess_base_app_setup(void)
|
|||||||
goto error;
|
goto error;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* setup the db system */
|
|
||||||
if (ORTE_SUCCESS != (ret = orte_db_base_open())) {
|
|
||||||
ORTE_ERROR_LOG(ret);
|
|
||||||
error = "orte_db_open";
|
|
||||||
goto error;
|
|
||||||
}
|
|
||||||
if (ORTE_SUCCESS != (ret = orte_db_base_select())) {
|
|
||||||
ORTE_ERROR_LOG(ret);
|
|
||||||
error = "orte_db_select";
|
|
||||||
goto error;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* if we are an ORTE app - and not an MPI app - then
|
/* if we are an ORTE app - and not an MPI app - then
|
||||||
* we need to barrier here. MPI_Init has its own barrier,
|
* we need to barrier here. MPI_Init has its own barrier,
|
||||||
* so we don't need to do two of them. However, if we
|
* so we don't need to do two of them. However, if we
|
||||||
@ -288,8 +262,6 @@ int orte_ess_base_app_finalize(void)
|
|||||||
|
|
||||||
/* now can close the rml and its friendly group comm */
|
/* now can close the rml and its friendly group comm */
|
||||||
orte_grpcomm_base_close();
|
orte_grpcomm_base_close();
|
||||||
/* close the multicast */
|
|
||||||
orte_rmcast_base_close();
|
|
||||||
orte_routed_base_close();
|
orte_routed_base_close();
|
||||||
orte_rml_base_close();
|
orte_rml_base_close();
|
||||||
|
|
||||||
|
|||||||
@ -60,8 +60,6 @@
|
|||||||
#include "orte/util/show_help.h"
|
#include "orte/util/show_help.h"
|
||||||
#include "orte/mca/errmgr/base/base.h"
|
#include "orte/mca/errmgr/base/base.h"
|
||||||
#include "orte/mca/notifier/base/base.h"
|
#include "orte/mca/notifier/base/base.h"
|
||||||
#include "orte/mca/rmcast/base/base.h"
|
|
||||||
#include "orte/mca/db/base/base.h"
|
|
||||||
#include "orte/mca/sensor/base/base.h"
|
#include "orte/mca/sensor/base/base.h"
|
||||||
#include "orte/mca/sensor/sensor.h"
|
#include "orte/mca/sensor/sensor.h"
|
||||||
#include "orte/runtime/orte_cr.h"
|
#include "orte/runtime/orte_cr.h"
|
||||||
@ -251,18 +249,6 @@ int orte_ess_base_orted_setup(char **hosts)
|
|||||||
goto error;
|
goto error;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* multicast */
|
|
||||||
if (ORTE_SUCCESS != (ret = orte_rmcast_base_open())) {
|
|
||||||
ORTE_ERROR_LOG(ret);
|
|
||||||
error = "orte_rmcast_base_open";
|
|
||||||
goto error;
|
|
||||||
}
|
|
||||||
if (ORTE_SUCCESS != (ret = orte_rmcast_base_select())) {
|
|
||||||
ORTE_ERROR_LOG(ret);
|
|
||||||
error = "orte_rmcast_base_select";
|
|
||||||
goto error;
|
|
||||||
}
|
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Group communications
|
* Group communications
|
||||||
*/
|
*/
|
||||||
@ -491,18 +477,6 @@ int orte_ess_base_orted_setup(char **hosts)
|
|||||||
goto error;
|
goto error;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* setup the db framework */
|
|
||||||
if (ORTE_SUCCESS != (ret = orte_db_base_open())) {
|
|
||||||
ORTE_ERROR_LOG(ret);
|
|
||||||
error = "orte_db_open";
|
|
||||||
goto error;
|
|
||||||
}
|
|
||||||
if (ORTE_SUCCESS != (ret = orte_db_base_select())) {
|
|
||||||
ORTE_ERROR_LOG(ret);
|
|
||||||
error = "orte_db_select";
|
|
||||||
goto error;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* setup the SENSOR framework */
|
/* setup the SENSOR framework */
|
||||||
if (ORTE_SUCCESS != (ret = orte_sensor_base_open())) {
|
if (ORTE_SUCCESS != (ret = orte_sensor_base_open())) {
|
||||||
ORTE_ERROR_LOG(ret);
|
ORTE_ERROR_LOG(ret);
|
||||||
@ -555,7 +529,6 @@ int orte_ess_base_orted_finalize(void)
|
|||||||
orte_session_dir_cleanup(ORTE_JOBID_WILDCARD);
|
orte_session_dir_cleanup(ORTE_JOBID_WILDCARD);
|
||||||
|
|
||||||
orte_sensor_base_close();
|
orte_sensor_base_close();
|
||||||
orte_db_base_close();
|
|
||||||
orte_notifier_base_close();
|
orte_notifier_base_close();
|
||||||
|
|
||||||
orte_cr_finalize();
|
orte_cr_finalize();
|
||||||
@ -579,8 +552,6 @@ int orte_ess_base_orted_finalize(void)
|
|||||||
|
|
||||||
/* now can close the rml and its friendly group comm */
|
/* now can close the rml and its friendly group comm */
|
||||||
orte_grpcomm_base_close();
|
orte_grpcomm_base_close();
|
||||||
/* close the multicast */
|
|
||||||
orte_rmcast_base_close();
|
|
||||||
orte_routed_base_close();
|
orte_routed_base_close();
|
||||||
orte_rml_base_close();
|
orte_rml_base_close();
|
||||||
|
|
||||||
|
|||||||
@ -28,8 +28,6 @@
|
|||||||
#include <unistd.h>
|
#include <unistd.h>
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
|
|
||||||
#include "orte/mca/errmgr/errmgr.h"
|
#include "orte/mca/errmgr/errmgr.h"
|
||||||
#include "orte/util/show_help.h"
|
#include "orte/util/show_help.h"
|
||||||
#include "orte/runtime/orte_wait.h"
|
#include "orte/runtime/orte_wait.h"
|
||||||
|
|||||||
@ -42,7 +42,6 @@
|
|||||||
#include "orte/util/proc_info.h"
|
#include "orte/util/proc_info.h"
|
||||||
#include "orte/util/session_dir.h"
|
#include "orte/util/session_dir.h"
|
||||||
#include "orte/util/show_help.h"
|
#include "orte/util/show_help.h"
|
||||||
#include "orte/mca/rmcast/base/base.h"
|
|
||||||
|
|
||||||
#include "orte/runtime/orte_cr.h"
|
#include "orte/runtime/orte_cr.h"
|
||||||
#include "orte/runtime/orte_globals.h"
|
#include "orte/runtime/orte_globals.h"
|
||||||
@ -89,18 +88,6 @@ int orte_ess_base_tool_setup(void)
|
|||||||
goto error;
|
goto error;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* multicast */
|
|
||||||
if (ORTE_SUCCESS != (ret = orte_rmcast_base_open())) {
|
|
||||||
ORTE_ERROR_LOG(ret);
|
|
||||||
error = "orte_rmcast_base_open";
|
|
||||||
goto error;
|
|
||||||
}
|
|
||||||
if (ORTE_SUCCESS != (ret = orte_rmcast_base_select())) {
|
|
||||||
ORTE_ERROR_LOG(ret);
|
|
||||||
error = "orte_rmcast_base_select";
|
|
||||||
goto error;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* since I am a tool, then all I really want to do is communicate.
|
/* since I am a tool, then all I really want to do is communicate.
|
||||||
* So setup communications and be done - finding the HNP
|
* So setup communications and be done - finding the HNP
|
||||||
* to which I want to communicate and setting up a route for
|
* to which I want to communicate and setting up a route for
|
||||||
@ -197,7 +184,6 @@ int orte_ess_base_tool_finalize(void)
|
|||||||
orte_iof_base_close();
|
orte_iof_base_close();
|
||||||
}
|
}
|
||||||
orte_routed_base_close();
|
orte_routed_base_close();
|
||||||
orte_rmcast_base_close();
|
|
||||||
orte_rml_base_close();
|
orte_rml_base_close();
|
||||||
|
|
||||||
return ORTE_SUCCESS;
|
return ORTE_SUCCESS;
|
||||||
|
|||||||
6
orte/mca/ess/env/configure.m4
поставляемый
6
orte/mca/ess/env/configure.m4
поставляемый
@ -1,6 +1,8 @@
|
|||||||
# -*- shell-script -*-
|
# -*- shell-script -*-
|
||||||
#
|
#
|
||||||
# Copyright (c) 2007 Sandia National Laboratories. All rights reserved.
|
# Copyright (c) 2007 Sandia National Laboratories. All rights reserved.
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
# $COPYRIGHT$
|
# $COPYRIGHT$
|
||||||
#
|
#
|
||||||
# Additional copyrights may follow
|
# Additional copyrights may follow
|
||||||
@ -13,4 +15,8 @@ AC_DEFUN([MCA_orte_ess_env_PRIORITY], [10])
|
|||||||
# -----------------------------------------------------------
|
# -----------------------------------------------------------
|
||||||
AC_DEFUN([MCA_orte_ess_env_CONFIG], [
|
AC_DEFUN([MCA_orte_ess_env_CONFIG], [
|
||||||
AC_CONFIG_FILES([orte/mca/ess/env/Makefile])
|
AC_CONFIG_FILES([orte/mca/ess/env/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
])
|
])
|
||||||
|
|||||||
10
orte/mca/ess/env/ess_env_module.c
поставляемый
10
orte/mca/ess/env/ess_env_module.c
поставляемый
@ -168,10 +168,12 @@ static int rte_init(void)
|
|||||||
return ORTE_SUCCESS;
|
return ORTE_SUCCESS;
|
||||||
|
|
||||||
error:
|
error:
|
||||||
orte_show_help("help-orte-runtime.txt",
|
if (ORTE_ERR_SILENT != ret && !orte_report_silent_errors) {
|
||||||
"orte_init:startup:internal-failure",
|
orte_show_help("help-orte-runtime.txt",
|
||||||
true, error, ORTE_ERROR_NAME(ret), ret);
|
"orte_init:startup:internal-failure",
|
||||||
|
true, error, ORTE_ERROR_NAME(ret), ret);
|
||||||
|
}
|
||||||
|
|
||||||
return ret;
|
return ret;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
@ -1,6 +1,8 @@
|
|||||||
# -*- shell-script -*-
|
# -*- shell-script -*-
|
||||||
#
|
#
|
||||||
# Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
# Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
# $COPYRIGHT$
|
# $COPYRIGHT$
|
||||||
#
|
#
|
||||||
# Additional copyrights may follow
|
# Additional copyrights may follow
|
||||||
@ -13,4 +15,8 @@ AC_DEFUN([MCA_orte_ess_generic_PRIORITY], [10])
|
|||||||
# -----------------------------------------------------------
|
# -----------------------------------------------------------
|
||||||
AC_DEFUN([MCA_orte_ess_generic_CONFIG], [
|
AC_DEFUN([MCA_orte_ess_generic_CONFIG], [
|
||||||
AC_CONFIG_FILES([orte/mca/ess/generic/Makefile])
|
AC_CONFIG_FILES([orte/mca/ess/generic/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
])
|
])
|
||||||
|
|||||||
@ -327,10 +327,12 @@ static int rte_init(void)
|
|||||||
return ORTE_SUCCESS;
|
return ORTE_SUCCESS;
|
||||||
|
|
||||||
error:
|
error:
|
||||||
orte_show_help("help-orte-runtime.txt",
|
if (ORTE_ERR_SILENT != ret && !orte_report_silent_errors) {
|
||||||
"orte_init:startup:internal-failure",
|
orte_show_help("help-orte-runtime.txt",
|
||||||
true, error, ORTE_ERROR_NAME(ret), ret);
|
"orte_init:startup:internal-failure",
|
||||||
|
true, error, ORTE_ERROR_NAME(ret), ret);
|
||||||
|
}
|
||||||
|
|
||||||
return ret;
|
return ret;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
@ -1,6 +1,8 @@
|
|||||||
# -*- shell-script -*-
|
# -*- shell-script -*-
|
||||||
#
|
#
|
||||||
# Copyright (c) 2007 Sandia National Laboratories. All rights reserved.
|
# Copyright (c) 2007 Sandia National Laboratories. All rights reserved.
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
# $COPYRIGHT$
|
# $COPYRIGHT$
|
||||||
#
|
#
|
||||||
# Additional copyrights may follow
|
# Additional copyrights may follow
|
||||||
@ -13,4 +15,8 @@ AC_DEFUN([MCA_orte_ess_hnp_PRIORITY], [10])
|
|||||||
# -----------------------------------------------------------
|
# -----------------------------------------------------------
|
||||||
AC_DEFUN([MCA_orte_ess_hnp_CONFIG], [
|
AC_DEFUN([MCA_orte_ess_hnp_CONFIG], [
|
||||||
AC_CONFIG_FILES([orte/mca/ess/hnp/Makefile])
|
AC_CONFIG_FILES([orte/mca/ess/hnp/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
])
|
])
|
||||||
|
|||||||
@ -56,8 +56,6 @@
|
|||||||
#include "orte/mca/plm/plm.h"
|
#include "orte/mca/plm/plm.h"
|
||||||
#include "orte/mca/odls/base/base.h"
|
#include "orte/mca/odls/base/base.h"
|
||||||
#include "orte/mca/notifier/base/base.h"
|
#include "orte/mca/notifier/base/base.h"
|
||||||
#include "orte/mca/rmcast/base/base.h"
|
|
||||||
#include "orte/mca/db/base/base.h"
|
|
||||||
#include "orte/mca/sensor/base/base.h"
|
#include "orte/mca/sensor/base/base.h"
|
||||||
#include "orte/mca/sensor/sensor.h"
|
#include "orte/mca/sensor/sensor.h"
|
||||||
#include "orte/mca/debugger/base/base.h"
|
#include "orte/mca/debugger/base/base.h"
|
||||||
@ -311,18 +309,6 @@ static int rte_init(void)
|
|||||||
goto error;
|
goto error;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* multicast */
|
|
||||||
if (ORTE_SUCCESS != (ret = orte_rmcast_base_open())) {
|
|
||||||
ORTE_ERROR_LOG(ret);
|
|
||||||
error = "orte_rmcast_base_open";
|
|
||||||
goto error;
|
|
||||||
}
|
|
||||||
if (ORTE_SUCCESS != (ret = orte_rmcast_base_select())) {
|
|
||||||
ORTE_ERROR_LOG(ret);
|
|
||||||
error = "orte_rmcast_base_select";
|
|
||||||
goto error;
|
|
||||||
}
|
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Group communications
|
* Group communications
|
||||||
*/
|
*/
|
||||||
@ -622,18 +608,6 @@ static int rte_init(void)
|
|||||||
goto error;
|
goto error;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* setup the db framework */
|
|
||||||
if (ORTE_SUCCESS != (ret = orte_db_base_open())) {
|
|
||||||
ORTE_ERROR_LOG(ret);
|
|
||||||
error = "orte_db_open";
|
|
||||||
goto error;
|
|
||||||
}
|
|
||||||
if (ORTE_SUCCESS != (ret = orte_db_base_select())) {
|
|
||||||
ORTE_ERROR_LOG(ret);
|
|
||||||
error = "orte_db_select";
|
|
||||||
goto error;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* setup the SENSOR framework */
|
/* setup the SENSOR framework */
|
||||||
if (ORTE_SUCCESS != (ret = orte_sensor_base_open())) {
|
if (ORTE_SUCCESS != (ret = orte_sensor_base_open())) {
|
||||||
ORTE_ERROR_LOG(ret);
|
ORTE_ERROR_LOG(ret);
|
||||||
@ -693,7 +667,7 @@ static int rte_init(void)
|
|||||||
return ORTE_SUCCESS;
|
return ORTE_SUCCESS;
|
||||||
|
|
||||||
error:
|
error:
|
||||||
if (ORTE_ERR_SILENT != ret) {
|
if (ORTE_ERR_SILENT != ret && !orte_report_silent_errors) {
|
||||||
orte_show_help("help-orte-runtime.txt",
|
orte_show_help("help-orte-runtime.txt",
|
||||||
"orte_init:startup:internal-failure",
|
"orte_init:startup:internal-failure",
|
||||||
true, error, ORTE_ERROR_NAME(ret), ret);
|
true, error, ORTE_ERROR_NAME(ret), ret);
|
||||||
@ -740,7 +714,6 @@ static int rte_finalize(void)
|
|||||||
free(contact_path);
|
free(contact_path);
|
||||||
|
|
||||||
orte_sensor_base_close();
|
orte_sensor_base_close();
|
||||||
orte_db_base_close();
|
|
||||||
orte_notifier_base_close();
|
orte_notifier_base_close();
|
||||||
|
|
||||||
orte_cr_finalize();
|
orte_cr_finalize();
|
||||||
@ -764,9 +737,6 @@ static int rte_finalize(void)
|
|||||||
orte_errmgr_base_close();
|
orte_errmgr_base_close();
|
||||||
orte_grpcomm_base_close();
|
orte_grpcomm_base_close();
|
||||||
|
|
||||||
/* close the multicast */
|
|
||||||
orte_rmcast_base_close();
|
|
||||||
|
|
||||||
/* now can close the rml */
|
/* now can close the rml */
|
||||||
orte_routed_base_close();
|
orte_routed_base_close();
|
||||||
orte_rml_base_close();
|
orte_rml_base_close();
|
||||||
|
|||||||
@ -11,6 +11,8 @@
|
|||||||
# 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) 2007-2010 Cisco Systems, Inc. All rights reserved.
|
# Copyright (c) 2007-2010 Cisco Systems, Inc. All rights reserved.
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
# $COPYRIGHT$
|
# $COPYRIGHT$
|
||||||
#
|
#
|
||||||
# Additional copyrights may follow
|
# Additional copyrights may follow
|
||||||
@ -28,7 +30,7 @@ AC_DEFUN([MCA_orte_ess_lsf_CONFIG],[
|
|||||||
|
|
||||||
# if check worked, set wrapper flags if so.
|
# if check worked, set wrapper flags if so.
|
||||||
# Evaluate succeed / fail
|
# Evaluate succeed / fail
|
||||||
AS_IF([test "$ess_lsf_good" = "1"],
|
AS_IF([test "$ess_lsf_good" = "1" -a "$orte_without_full_support" = 0],
|
||||||
[ess_lsf_WRAPPER_EXTRA_LDFLAGS="$ess_lsf_LDFLAGS"
|
[ess_lsf_WRAPPER_EXTRA_LDFLAGS="$ess_lsf_LDFLAGS"
|
||||||
ess_lsf_WRAPPER_EXTRA_LIBS="$ess_lsf_LIBS"
|
ess_lsf_WRAPPER_EXTRA_LIBS="$ess_lsf_LIBS"
|
||||||
$1],
|
$1],
|
||||||
|
|||||||
@ -138,10 +138,12 @@ static int rte_init(void)
|
|||||||
return ORTE_SUCCESS;
|
return ORTE_SUCCESS;
|
||||||
|
|
||||||
error:
|
error:
|
||||||
orte_show_help("help-orte-runtime.txt",
|
if (ORTE_ERR_SILENT != ret && !orte_report_silent_errors) {
|
||||||
"orte_init:startup:internal-failure",
|
orte_show_help("help-orte-runtime.txt",
|
||||||
true, error, ORTE_ERROR_NAME(ret), ret);
|
"orte_init:startup:internal-failure",
|
||||||
|
true, error, ORTE_ERROR_NAME(ret), ret);
|
||||||
|
}
|
||||||
|
|
||||||
return ret;
|
return ret;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
@ -1,6 +1,8 @@
|
|||||||
# -*- shell-script -*-
|
# -*- shell-script -*-
|
||||||
#
|
#
|
||||||
# Copyright (c) 2009-2011 Cisco Systems, Inc. All rights reserved.
|
# Copyright (c) 2009-2011 Cisco Systems, Inc. All rights reserved.
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
# $COPYRIGHT$
|
# $COPYRIGHT$
|
||||||
#
|
#
|
||||||
# Additional copyrights may follow
|
# Additional copyrights may follow
|
||||||
@ -19,7 +21,7 @@ AC_DEFUN([MCA_orte_ess_pmi_CONFIG],[
|
|||||||
|
|
||||||
# if check worked, set wrapper flags if so.
|
# if check worked, set wrapper flags if so.
|
||||||
# Evaluate succeed / fail
|
# Evaluate succeed / fail
|
||||||
AS_IF([test "$ess_pmi_good" = "1"],
|
AS_IF([test "$ess_pmi_good" = "1" -a "$orte_without_full_support" = 0],
|
||||||
[ess_pmi_WRAPPER_EXTRA_LDFLAGS="$ess_pmi_LDFLAGS"
|
[ess_pmi_WRAPPER_EXTRA_LDFLAGS="$ess_pmi_LDFLAGS"
|
||||||
ess_pmi_WRAPPER_EXTRA_LIBS="$ess_pmi_LIBS"
|
ess_pmi_WRAPPER_EXTRA_LIBS="$ess_pmi_LIBS"
|
||||||
$1],
|
$1],
|
||||||
|
|||||||
@ -272,9 +272,12 @@ static int rte_init(void)
|
|||||||
return ORTE_SUCCESS;
|
return ORTE_SUCCESS;
|
||||||
|
|
||||||
error:
|
error:
|
||||||
orte_show_help("help-orte-runtime.txt",
|
if (ORTE_ERR_SILENT != ret && !orte_report_silent_errors) {
|
||||||
"orte_init:startup:internal-failure",
|
orte_show_help("help-orte-runtime.txt",
|
||||||
true, error, ORTE_ERROR_NAME(ret), ret);
|
"orte_init:startup:internal-failure",
|
||||||
|
true, error, ORTE_ERROR_NAME(ret), ret);
|
||||||
|
}
|
||||||
|
|
||||||
return ret;
|
return ret;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
@ -1,6 +1,8 @@
|
|||||||
# -*- shell-script -*-
|
# -*- shell-script -*-
|
||||||
#
|
#
|
||||||
# Copyright (c) 2007 Sandia National Laboratories. All rights reserved.
|
# Copyright (c) 2007 Sandia National Laboratories. All rights reserved.
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
# $COPYRIGHT$
|
# $COPYRIGHT$
|
||||||
#
|
#
|
||||||
# Additional copyrights may follow
|
# Additional copyrights may follow
|
||||||
@ -13,4 +15,8 @@ AC_DEFUN([MCA_orte_ess_singleton_PRIORITY], [10])
|
|||||||
# -----------------------------------------------------------
|
# -----------------------------------------------------------
|
||||||
AC_DEFUN([MCA_orte_ess_singleton_CONFIG], [
|
AC_DEFUN([MCA_orte_ess_singleton_CONFIG], [
|
||||||
AC_CONFIG_FILES([orte/mca/ess/singleton/Makefile])
|
AC_CONFIG_FILES([orte/mca/ess/singleton/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
])
|
])
|
||||||
|
|||||||
@ -1,7 +1,7 @@
|
|||||||
# -*- shell-script -*-
|
# -*- shell-script -*-
|
||||||
#
|
#
|
||||||
# Copyright (c) 2009 Los Alamos National Security, LLC.
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
# All rights reserved.
|
# All rights reserved.
|
||||||
# $COPYRIGHT$
|
# $COPYRIGHT$
|
||||||
#
|
#
|
||||||
# Additional copyrights may follow
|
# Additional copyrights may follow
|
||||||
@ -14,4 +14,8 @@ AC_DEFUN([MCA_orte_ess_slave_PRIORITY], [10])
|
|||||||
# -----------------------------------------------------------
|
# -----------------------------------------------------------
|
||||||
AC_DEFUN([MCA_orte_ess_slave_CONFIG], [
|
AC_DEFUN([MCA_orte_ess_slave_CONFIG], [
|
||||||
AC_CONFIG_FILES([orte/mca/ess/slave/Makefile])
|
AC_CONFIG_FILES([orte/mca/ess/slave/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
])
|
])
|
||||||
|
|||||||
@ -39,7 +39,6 @@
|
|||||||
#include "opal/mca/base/base.h"
|
#include "opal/mca/base/base.h"
|
||||||
#include "opal/mca/base/mca_base_param.h"
|
#include "opal/mca/base/mca_base_param.h"
|
||||||
#include "opal/util/output.h"
|
#include "opal/util/output.h"
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
#include "opal/util/malloc.h"
|
#include "opal/util/malloc.h"
|
||||||
|
|
||||||
#include "orte/mca/rml/base/base.h"
|
#include "orte/mca/rml/base/base.h"
|
||||||
|
|||||||
@ -11,6 +11,8 @@
|
|||||||
# 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) 2009-2010 Cisco Systems, Inc. All rights reserved.
|
# Copyright (c) 2009-2010 Cisco Systems, Inc. All rights reserved.
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
# $COPYRIGHT$
|
# $COPYRIGHT$
|
||||||
#
|
#
|
||||||
# Additional copyrights may follow
|
# Additional copyrights may follow
|
||||||
@ -28,7 +30,7 @@ AC_DEFUN([MCA_orte_ess_slurm_CONFIG],[
|
|||||||
|
|
||||||
# if check worked, set wrapper flags if so.
|
# if check worked, set wrapper flags if so.
|
||||||
# Evaluate succeed / fail
|
# Evaluate succeed / fail
|
||||||
AS_IF([test "$ess_slurm_good" = "1"],
|
AS_IF([test "$ess_slurm_good" = "1" -a "$orte_without_full_support" = 0],
|
||||||
[ess_slurm_WRAPPER_EXTRA_LDFLAGS="$ess_slurm_LDFLAGS"
|
[ess_slurm_WRAPPER_EXTRA_LDFLAGS="$ess_slurm_LDFLAGS"
|
||||||
ess_slurm_WRAPPER_EXTRA_LIBS="$ess_slurm_LIBS"
|
ess_slurm_WRAPPER_EXTRA_LIBS="$ess_slurm_LIBS"
|
||||||
$1],
|
$1],
|
||||||
|
|||||||
@ -134,10 +134,12 @@ static int rte_init(void)
|
|||||||
return ORTE_SUCCESS;
|
return ORTE_SUCCESS;
|
||||||
|
|
||||||
error:
|
error:
|
||||||
orte_show_help("help-orte-runtime.txt",
|
if (ORTE_ERR_SILENT != ret && !orte_report_silent_errors) {
|
||||||
"orte_init:startup:internal-failure",
|
orte_show_help("help-orte-runtime.txt",
|
||||||
true, error, ORTE_ERROR_NAME(ret), ret);
|
"orte_init:startup:internal-failure",
|
||||||
|
true, error, ORTE_ERROR_NAME(ret), ret);
|
||||||
|
}
|
||||||
|
|
||||||
return ret;
|
return ret;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
@ -11,6 +11,8 @@
|
|||||||
# 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) 2009-2011 Cisco Systems, Inc. All rights reserved.
|
# Copyright (c) 2009-2011 Cisco Systems, Inc. All rights reserved.
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
# $COPYRIGHT$
|
# $COPYRIGHT$
|
||||||
#
|
#
|
||||||
# Additional copyrights may follow
|
# Additional copyrights may follow
|
||||||
@ -28,7 +30,7 @@ AC_DEFUN([MCA_orte_ess_slurmd_CONFIG],[
|
|||||||
|
|
||||||
# if check worked, set wrapper flags if so.
|
# if check worked, set wrapper flags if so.
|
||||||
# Evaluate succeed / fail
|
# Evaluate succeed / fail
|
||||||
AS_IF([test "$ess_slurmd_good" = "1"],
|
AS_IF([test "$ess_slurmd_good" = "1" -a "$orte_without_full_support" = 0],
|
||||||
[ess_slurmd_WRAPPER_EXTRA_LDFLAGS="$ess_slurmd_LDFLAGS"
|
[ess_slurmd_WRAPPER_EXTRA_LDFLAGS="$ess_slurmd_LDFLAGS"
|
||||||
ess_slurmd_WRAPPER_EXTRA_LIBS="$ess_slurmd_LIBS"
|
ess_slurmd_WRAPPER_EXTRA_LIBS="$ess_slurmd_LIBS"
|
||||||
$1],
|
$1],
|
||||||
|
|||||||
@ -403,9 +403,12 @@ static int rte_init(void)
|
|||||||
return ORTE_SUCCESS;
|
return ORTE_SUCCESS;
|
||||||
|
|
||||||
error:
|
error:
|
||||||
orte_show_help("help-orte-runtime.txt",
|
if (ORTE_ERR_SILENT != ret && !orte_report_silent_errors) {
|
||||||
"orte_init:startup:internal-failure",
|
orte_show_help("help-orte-runtime.txt",
|
||||||
true, error, ORTE_ERROR_NAME(ret), ret);
|
"orte_init:startup:internal-failure",
|
||||||
|
true, error, ORTE_ERROR_NAME(ret), ret);
|
||||||
|
}
|
||||||
|
|
||||||
return ret;
|
return ret;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
@ -11,6 +11,8 @@
|
|||||||
# 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) 2009-2010 Cisco Systems, Inc. All rights reserved.
|
# Copyright (c) 2009-2010 Cisco Systems, Inc. All rights reserved.
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
# $COPYRIGHT$
|
# $COPYRIGHT$
|
||||||
#
|
#
|
||||||
# Additional copyrights may follow
|
# Additional copyrights may follow
|
||||||
@ -28,7 +30,7 @@ AC_DEFUN([MCA_orte_ess_tm_CONFIG],[
|
|||||||
|
|
||||||
# if check worked, set wrapper flags if so.
|
# if check worked, set wrapper flags if so.
|
||||||
# Evaluate succeed / fail
|
# Evaluate succeed / fail
|
||||||
AS_IF([test "$ess_tm_good" = "1"],
|
AS_IF([test "$ess_tm_good" = "1" -a test "$orte_without_full_support" = 0],
|
||||||
[ess_tm_WRAPPER_EXTRA_LDFLAGS="$ess_tm_LDFLAGS"
|
[ess_tm_WRAPPER_EXTRA_LDFLAGS="$ess_tm_LDFLAGS"
|
||||||
ess_tm_WRAPPER_EXTRA_LIBS="$ess_tm_LIBS"
|
ess_tm_WRAPPER_EXTRA_LIBS="$ess_tm_LIBS"
|
||||||
$1],
|
$1],
|
||||||
|
|||||||
@ -140,10 +140,12 @@ static int rte_init(void)
|
|||||||
return ORTE_SUCCESS;
|
return ORTE_SUCCESS;
|
||||||
|
|
||||||
error:
|
error:
|
||||||
orte_show_help("help-orte-runtime.txt",
|
if (ORTE_ERR_SILENT != ret && !orte_report_silent_errors) {
|
||||||
"orte_init:startup:internal-failure",
|
orte_show_help("help-orte-runtime.txt",
|
||||||
true, error, ORTE_ERROR_NAME(ret), ret);
|
"orte_init:startup:internal-failure",
|
||||||
|
true, error, ORTE_ERROR_NAME(ret), ret);
|
||||||
|
}
|
||||||
|
|
||||||
return ret;
|
return ret;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
@ -2,6 +2,8 @@
|
|||||||
#
|
#
|
||||||
# Copyright (c) 2007 Sandia National Laboratories. All rights reserved.
|
# Copyright (c) 2007 Sandia National Laboratories. All rights reserved.
|
||||||
# Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
# Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
# $COPYRIGHT$
|
# $COPYRIGHT$
|
||||||
#
|
#
|
||||||
# Additional copyrights may follow
|
# Additional copyrights may follow
|
||||||
@ -14,4 +16,8 @@ AC_DEFUN([MCA_orte_ess_tool_PRIORITY], [10])
|
|||||||
# -----------------------------------------------------------
|
# -----------------------------------------------------------
|
||||||
AC_DEFUN([MCA_orte_ess_tool_CONFIG], [
|
AC_DEFUN([MCA_orte_ess_tool_CONFIG], [
|
||||||
AC_CONFIG_FILES([orte/mca/ess/tool/Makefile])
|
AC_CONFIG_FILES([orte/mca/ess/tool/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
])
|
])
|
||||||
|
|||||||
@ -29,8 +29,6 @@
|
|||||||
#include <unistd.h>
|
#include <unistd.h>
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
|
|
||||||
#include "orte/util/show_help.h"
|
#include "orte/util/show_help.h"
|
||||||
#include "orte/mca/plm/base/base.h"
|
#include "orte/mca/plm/base/base.h"
|
||||||
#include "orte/mca/plm/plm.h"
|
#include "orte/mca/plm/plm.h"
|
||||||
@ -116,10 +114,12 @@ static int rte_init(void)
|
|||||||
return ORTE_SUCCESS;
|
return ORTE_SUCCESS;
|
||||||
|
|
||||||
error:
|
error:
|
||||||
orte_show_help("help-ess-tool.txt",
|
if (ORTE_ERR_SILENT != ret && !orte_report_silent_errors) {
|
||||||
"tool:rte_init:startup:internal-failure",
|
orte_show_help("help-ess-tool.txt",
|
||||||
true, error, ORTE_ERROR_NAME(ret), ret);
|
"tool:rte_init:startup:internal-failure",
|
||||||
|
true, error, ORTE_ERROR_NAME(ret), ret);
|
||||||
|
}
|
||||||
|
|
||||||
return ret;
|
return ret;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
20
orte/mca/filem/rsh/configure.m4
Обычный файл
20
orte/mca/filem/rsh/configure.m4
Обычный файл
@ -0,0 +1,20 @@
|
|||||||
|
# -*- shell-script -*-
|
||||||
|
#
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
# $COPYRIGHT$
|
||||||
|
#
|
||||||
|
# Additional copyrights may follow
|
||||||
|
#
|
||||||
|
# $HEADER$
|
||||||
|
#
|
||||||
|
|
||||||
|
# MCA_ess_env_CONFIG([action-if-found], [action-if-not-found])
|
||||||
|
# -----------------------------------------------------------
|
||||||
|
AC_DEFUN([MCA_orte_filem_rsh_CONFIG], [
|
||||||
|
AC_CONFIG_FILES([orte/mca/filem/rsh/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
|
])
|
||||||
@ -36,7 +36,6 @@
|
|||||||
#include "opal/mca/base/mca_base_param.h"
|
#include "opal/mca/base/mca_base_param.h"
|
||||||
|
|
||||||
#include "opal/mca/event/event.h"
|
#include "opal/mca/event/event.h"
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
|
|
||||||
#include "orte/constants.h"
|
#include "orte/constants.h"
|
||||||
#include "orte/util/show_help.h"
|
#include "orte/util/show_help.h"
|
||||||
|
|||||||
@ -1,6 +1,7 @@
|
|||||||
# -*- shell-script -*-
|
# -*- shell-script -*-
|
||||||
#
|
#
|
||||||
# Copyright (c) 2007 Sandia National Laboratories. All rights reserved.
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
# $COPYRIGHT$
|
# $COPYRIGHT$
|
||||||
#
|
#
|
||||||
# Additional copyrights may follow
|
# Additional copyrights may follow
|
||||||
@ -13,4 +14,8 @@ AC_DEFUN([MCA_orte_grpcomm_bad_PRIORITY], [10])
|
|||||||
# -----------------------------------------------------------
|
# -----------------------------------------------------------
|
||||||
AC_DEFUN([MCA_orte_grpcomm_bad_CONFIG], [
|
AC_DEFUN([MCA_orte_grpcomm_bad_CONFIG], [
|
||||||
AC_CONFIG_FILES([orte/mca/grpcomm/bad/Makefile])
|
AC_CONFIG_FILES([orte/mca/grpcomm/bad/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
])
|
])
|
||||||
|
|||||||
@ -25,7 +25,6 @@
|
|||||||
|
|
||||||
|
|
||||||
#include "opal/dss/dss.h"
|
#include "opal/dss/dss.h"
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
#include "opal/mca/hwloc/base/base.h"
|
#include "opal/mca/hwloc/base/base.h"
|
||||||
|
|
||||||
#include "orte/mca/errmgr/errmgr.h"
|
#include "orte/mca/errmgr/errmgr.h"
|
||||||
|
|||||||
@ -1,6 +1,7 @@
|
|||||||
# -*- shell-script -*-
|
# -*- shell-script -*-
|
||||||
#
|
#
|
||||||
# Copyright (c) 2007 Sandia National Laboratories. All rights reserved.
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
# $COPYRIGHT$
|
# $COPYRIGHT$
|
||||||
#
|
#
|
||||||
# Additional copyrights may follow
|
# Additional copyrights may follow
|
||||||
@ -13,4 +14,8 @@ AC_DEFUN([MCA_orte_grpcomm_hier_PRIORITY], [10])
|
|||||||
# -----------------------------------------------------------
|
# -----------------------------------------------------------
|
||||||
AC_DEFUN([MCA_orte_grpcomm_hier_CONFIG], [
|
AC_DEFUN([MCA_orte_grpcomm_hier_CONFIG], [
|
||||||
AC_CONFIG_FILES([orte/mca/grpcomm/hier/Makefile])
|
AC_CONFIG_FILES([orte/mca/grpcomm/hier/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
])
|
])
|
||||||
|
|||||||
@ -1,6 +1,8 @@
|
|||||||
# -*- shell-script -*-
|
# -*- shell-script -*-
|
||||||
#
|
#
|
||||||
# Copyright (c) 2011 Cisco Systems, Inc. All rights reserved.
|
# Copyright (c) 2011 Cisco Systems, Inc. All rights reserved.
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
# $COPYRIGHT$
|
# $COPYRIGHT$
|
||||||
#
|
#
|
||||||
# Additional copyrights may follow
|
# Additional copyrights may follow
|
||||||
@ -18,7 +20,7 @@ AC_DEFUN([MCA_orte_grpcomm_pmi_CONFIG], [
|
|||||||
|
|
||||||
# if check worked, set wrapper flags if so.
|
# if check worked, set wrapper flags if so.
|
||||||
# Evaluate succeed / fail
|
# Evaluate succeed / fail
|
||||||
AS_IF([test "$grpcomm_pmi_good" = 1],
|
AS_IF([test "$grpcomm_pmi_good" = 1 -a "$orte_without_full_support" = 0],
|
||||||
[grpcomm_pmi_WRAPPER_EXTRA_LDFLAGS="$grpcomm_pmi_LDFLAGS"
|
[grpcomm_pmi_WRAPPER_EXTRA_LDFLAGS="$grpcomm_pmi_LDFLAGS"
|
||||||
grpcomm_pmi_WRAPPER_EXTRA_LIBS="$grpcomm_pmi_LIBS"
|
grpcomm_pmi_WRAPPER_EXTRA_LIBS="$grpcomm_pmi_LIBS"
|
||||||
$1],
|
$1],
|
||||||
|
|||||||
19
orte/mca/iof/hnp/configure.m4
Обычный файл
19
orte/mca/iof/hnp/configure.m4
Обычный файл
@ -0,0 +1,19 @@
|
|||||||
|
# -*- shell-script -*-
|
||||||
|
#
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
# $COPYRIGHT$
|
||||||
|
#
|
||||||
|
# Additional copyrights may follow
|
||||||
|
#
|
||||||
|
# $HEADER$
|
||||||
|
#
|
||||||
|
# MCA_iof_hnp_CONFIG([action-if-found], [action-if-not-found])
|
||||||
|
# -----------------------------------------------------------
|
||||||
|
AC_DEFUN([MCA_orte_iof_hnp_CONFIG], [
|
||||||
|
AC_CONFIG_FILES([orte/mca/iof/hnp/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
|
])
|
||||||
@ -37,7 +37,6 @@
|
|||||||
#endif
|
#endif
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
#include "opal/mca/event/event.h"
|
#include "opal/mca/event/event.h"
|
||||||
|
|
||||||
#include "orte/runtime/orte_globals.h"
|
#include "orte/runtime/orte_globals.h"
|
||||||
|
|||||||
@ -28,7 +28,6 @@
|
|||||||
#include <string.h>
|
#include <string.h>
|
||||||
#endif /* HAVE_STRING_H */
|
#endif /* HAVE_STRING_H */
|
||||||
|
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
#include "opal/dss/dss.h"
|
#include "opal/dss/dss.h"
|
||||||
|
|
||||||
#include "orte/mca/rml/rml_types.h"
|
#include "orte/mca/rml/rml_types.h"
|
||||||
@ -187,7 +186,7 @@ void orte_iof_hnp_read_local_handler(int fd, short event, void *cbdata)
|
|||||||
*/
|
*/
|
||||||
if( ORTE_SUCCESS != (rc = orte_iof_hnp_send_data_to_endpoint(&sink->daemon, &sink->name, ORTE_IOF_STDIN, data, numbytes))) {
|
if( ORTE_SUCCESS != (rc = orte_iof_hnp_send_data_to_endpoint(&sink->daemon, &sink->name, ORTE_IOF_STDIN, data, numbytes))) {
|
||||||
/* if the addressee is unknown, remove the sink from the list */
|
/* if the addressee is unknown, remove the sink from the list */
|
||||||
if( ORTE_ERR_ADDRESSEE_UNKNOWN == OPAL_SOS_GET_ERROR_CODE(rc) ) {
|
if( ORTE_ERR_ADDRESSEE_UNKNOWN == rc ) {
|
||||||
prev_item = opal_list_get_prev(item);
|
prev_item = opal_list_get_prev(item);
|
||||||
opal_list_remove_item(&mca_iof_hnp_component.sinks, item);
|
opal_list_remove_item(&mca_iof_hnp_component.sinks, item);
|
||||||
OBJ_RELEASE(item);
|
OBJ_RELEASE(item);
|
||||||
|
|||||||
@ -35,8 +35,6 @@
|
|||||||
#endif
|
#endif
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
|
|
||||||
#include "orte/mca/rml/rml.h"
|
#include "orte/mca/rml/rml.h"
|
||||||
#include "orte/mca/rml/rml_types.h"
|
#include "orte/mca/rml/rml_types.h"
|
||||||
#include "orte/mca/errmgr/errmgr.h"
|
#include "orte/mca/errmgr/errmgr.h"
|
||||||
|
|||||||
@ -28,8 +28,6 @@
|
|||||||
#include <string.h>
|
#include <string.h>
|
||||||
#endif /* HAVE_STRING_H */
|
#endif /* HAVE_STRING_H */
|
||||||
|
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
|
|
||||||
#include "orte/mca/rml/rml.h"
|
#include "orte/mca/rml/rml.h"
|
||||||
#include "orte/mca/rml/rml_types.h"
|
#include "orte/mca/rml/rml_types.h"
|
||||||
#include "orte/mca/errmgr/errmgr.h"
|
#include "orte/mca/errmgr/errmgr.h"
|
||||||
|
|||||||
19
orte/mca/iof/orted/configure.m4
Обычный файл
19
orte/mca/iof/orted/configure.m4
Обычный файл
@ -0,0 +1,19 @@
|
|||||||
|
# -*- shell-script -*-
|
||||||
|
#
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
# $COPYRIGHT$
|
||||||
|
#
|
||||||
|
# Additional copyrights may follow
|
||||||
|
#
|
||||||
|
# $HEADER$
|
||||||
|
#
|
||||||
|
# MCA_iof_orted_CONFIG([action-if-found], [action-if-not-found])
|
||||||
|
# -----------------------------------------------------------
|
||||||
|
AC_DEFUN([MCA_orte_iof_orted_CONFIG], [
|
||||||
|
AC_CONFIG_FILES([orte/mca/iof/orted/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
|
])
|
||||||
@ -37,8 +37,6 @@
|
|||||||
#endif
|
#endif
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
|
|
||||||
#include "orte/mca/errmgr/errmgr.h"
|
#include "orte/mca/errmgr/errmgr.h"
|
||||||
#include "orte/util/name_fns.h"
|
#include "orte/util/name_fns.h"
|
||||||
#include "orte/runtime/orte_globals.h"
|
#include "orte/runtime/orte_globals.h"
|
||||||
|
|||||||
@ -29,7 +29,6 @@
|
|||||||
#endif /* HAVE_STRING_H */
|
#endif /* HAVE_STRING_H */
|
||||||
|
|
||||||
#include "opal/dss/dss.h"
|
#include "opal/dss/dss.h"
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
|
|
||||||
#include "orte/mca/rml/rml.h"
|
#include "orte/mca/rml/rml.h"
|
||||||
#include "orte/mca/rml/rml_types.h"
|
#include "orte/mca/rml/rml_types.h"
|
||||||
|
|||||||
@ -28,8 +28,6 @@
|
|||||||
#include <string.h>
|
#include <string.h>
|
||||||
#endif /* HAVE_STRING_H */
|
#endif /* HAVE_STRING_H */
|
||||||
|
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
|
|
||||||
#include "orte/mca/rml/rml.h"
|
#include "orte/mca/rml/rml.h"
|
||||||
#include "orte/mca/rml/rml_types.h"
|
#include "orte/mca/rml/rml_types.h"
|
||||||
#include "orte/mca/errmgr/errmgr.h"
|
#include "orte/mca/errmgr/errmgr.h"
|
||||||
|
|||||||
19
orte/mca/iof/tool/configure.m4
Обычный файл
19
orte/mca/iof/tool/configure.m4
Обычный файл
@ -0,0 +1,19 @@
|
|||||||
|
# -*- shell-script -*-
|
||||||
|
#
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
# $COPYRIGHT$
|
||||||
|
#
|
||||||
|
# Additional copyrights may follow
|
||||||
|
#
|
||||||
|
# $HEADER$
|
||||||
|
#
|
||||||
|
# MCA_iof_tool_CONFIG([action-if-found], [action-if-not-found])
|
||||||
|
# -----------------------------------------------------------
|
||||||
|
AC_DEFUN([MCA_orte_iof_tool_CONFIG], [
|
||||||
|
AC_CONFIG_FILES([orte/mca/iof/tool/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
|
])
|
||||||
@ -28,8 +28,6 @@
|
|||||||
#include <string.h>
|
#include <string.h>
|
||||||
#endif /* HAVE_STRING_H */
|
#endif /* HAVE_STRING_H */
|
||||||
|
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
|
|
||||||
#include "orte/mca/rml/rml.h"
|
#include "orte/mca/rml/rml.h"
|
||||||
#include "orte/mca/rml/rml_types.h"
|
#include "orte/mca/rml/rml_types.h"
|
||||||
#include "orte/mca/errmgr/errmgr.h"
|
#include "orte/mca/errmgr/errmgr.h"
|
||||||
|
|||||||
@ -28,8 +28,6 @@
|
|||||||
#include <string.h>
|
#include <string.h>
|
||||||
#endif /* HAVE_STRING_H */
|
#endif /* HAVE_STRING_H */
|
||||||
|
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
|
|
||||||
#include "orte/mca/rml/rml.h"
|
#include "orte/mca/rml/rml.h"
|
||||||
#include "orte/mca/rml/rml_types.h"
|
#include "orte/mca/rml/rml_types.h"
|
||||||
#include "orte/mca/errmgr/errmgr.h"
|
#include "orte/mca/errmgr/errmgr.h"
|
||||||
|
|||||||
@ -23,6 +23,11 @@ headers += \
|
|||||||
libmca_notifier_la_SOURCES += \
|
libmca_notifier_la_SOURCES += \
|
||||||
base/notifier_base_close.c \
|
base/notifier_base_close.c \
|
||||||
base/notifier_base_select.c \
|
base/notifier_base_select.c \
|
||||||
base/notifier_base_wrappers.c \
|
|
||||||
base/notifier_base_events.c \
|
|
||||||
base/notifier_base_open.c
|
base/notifier_base_open.c
|
||||||
|
|
||||||
|
if !ORTE_DISABLE_FULL_SUPPORT
|
||||||
|
libmca_notifier_la_SOURCES += \
|
||||||
|
base/notifier_base_wrappers.c \
|
||||||
|
base/notifier_base_events.c
|
||||||
|
endif
|
||||||
|
|
||||||
|
|||||||
@ -51,13 +51,14 @@ typedef struct {
|
|||||||
|
|
||||||
OBJ_CLASS_DECLARATION(orte_notifier_base_selected_pair_t);
|
OBJ_CLASS_DECLARATION(orte_notifier_base_selected_pair_t);
|
||||||
|
|
||||||
#if !ORTE_DISABLE_FULL_SUPPORT
|
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* function definitions
|
* function definitions
|
||||||
*/
|
*/
|
||||||
ORTE_DECLSPEC int orte_notifier_base_open(void);
|
ORTE_DECLSPEC int orte_notifier_base_open(void);
|
||||||
|
ORTE_DECLSPEC int orte_notifier_base_close(void);
|
||||||
ORTE_DECLSPEC int orte_notifier_base_select(void);
|
ORTE_DECLSPEC int orte_notifier_base_select(void);
|
||||||
|
|
||||||
|
#if !ORTE_DISABLE_FULL_SUPPORT
|
||||||
ORTE_DECLSPEC void orte_notifier_log(orte_notifier_base_severity_t severity,
|
ORTE_DECLSPEC void orte_notifier_log(orte_notifier_base_severity_t severity,
|
||||||
int errcode,
|
int errcode,
|
||||||
const char *msg, ...);
|
const char *msg, ...);
|
||||||
@ -73,7 +74,6 @@ ORTE_DECLSPEC const char* orte_notifier_base_sev2str(orte_notifier_base_severity
|
|||||||
ORTE_DECLSPEC char *orte_notifier_base_peer_log(int errcode,
|
ORTE_DECLSPEC char *orte_notifier_base_peer_log(int errcode,
|
||||||
orte_process_name_t *peer_proc,
|
orte_process_name_t *peer_proc,
|
||||||
const char *msg, va_list ap);
|
const char *msg, va_list ap);
|
||||||
ORTE_DECLSPEC int orte_notifier_base_close(void);
|
|
||||||
|
|
||||||
#if ORTE_WANT_NOTIFIER_LOG_EVENT
|
#if ORTE_WANT_NOTIFIER_LOG_EVENT
|
||||||
|
|
||||||
|
|||||||
@ -2,6 +2,8 @@
|
|||||||
#
|
#
|
||||||
# Copyright (c) 2007 Sandia National Laboratories. All rights reserved.
|
# Copyright (c) 2007 Sandia National Laboratories. All rights reserved.
|
||||||
# Copyright (c) 2009-2010 Cisco Systems, Inc. All rights reserved.
|
# Copyright (c) 2009-2010 Cisco Systems, Inc. All rights reserved.
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
# $COPYRIGHT$
|
# $COPYRIGHT$
|
||||||
#
|
#
|
||||||
# Additional copyrights may follow
|
# Additional copyrights may follow
|
||||||
@ -29,6 +31,6 @@ AC_DEFUN([MCA_orte_notifier_command_CONFIG], [
|
|||||||
AS_IF([test "$THREAD_TYPE" != "none"],
|
AS_IF([test "$THREAD_TYPE" != "none"],
|
||||||
[notifier_happy=yes])])
|
[notifier_happy=yes])])
|
||||||
|
|
||||||
AS_IF([test "$notifier_happy" = "yes"], [$1], [$2])
|
AS_IF([test "$notifier_happy" = "yes" -a "$orte_without_full_support" = 0], [$1], [$2])
|
||||||
OPAL_VAR_SCOPE_POP
|
OPAL_VAR_SCOPE_POP
|
||||||
])
|
])
|
||||||
|
|||||||
19
orte/mca/notifier/file/configure.m4
Обычный файл
19
orte/mca/notifier/file/configure.m4
Обычный файл
@ -0,0 +1,19 @@
|
|||||||
|
# -*- shell-script -*-
|
||||||
|
#
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
# $COPYRIGHT$
|
||||||
|
#
|
||||||
|
# Additional copyrights may follow
|
||||||
|
#
|
||||||
|
# $HEADER$
|
||||||
|
#
|
||||||
|
# MCA_notifier_file_CONFIG([action-if-found], [action-if-not-found])
|
||||||
|
# -----------------------------------------------------------
|
||||||
|
AC_DEFUN([MCA_orte_notifier_file_CONFIG], [
|
||||||
|
AC_CONFIG_FILES([orte/mca/notifier/file/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
|
])
|
||||||
@ -62,7 +62,7 @@ AC_DEFUN([MCA_orte_notifier_ftb_CONFIG], [
|
|||||||
[notifier_ftb_happy="yes"],
|
[notifier_ftb_happy="yes"],
|
||||||
[notifier_ftb_happy="no"])
|
[notifier_ftb_happy="no"])
|
||||||
|
|
||||||
AS_IF([test "$notifier_ftb_happy" = "yes"],
|
AS_IF([test "$notifier_ftb_happy" = "yes" -a "$orte_without_full_support" = 0],
|
||||||
[notifier_ftb_WRAPPER_EXTRA_LDFLAGS="$notifier_ftb_LDFLAGS"
|
[notifier_ftb_WRAPPER_EXTRA_LDFLAGS="$notifier_ftb_LDFLAGS"
|
||||||
notifier_ftb_WRAPPER_EXTRA_LIBS="$notifier_ftb_LIBS"
|
notifier_ftb_WRAPPER_EXTRA_LIBS="$notifier_ftb_LIBS"
|
||||||
$1],
|
$1],
|
||||||
|
|||||||
19
orte/mca/notifier/hnp/configure.m4
Обычный файл
19
orte/mca/notifier/hnp/configure.m4
Обычный файл
@ -0,0 +1,19 @@
|
|||||||
|
# -*- shell-script -*-
|
||||||
|
#
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
# $COPYRIGHT$
|
||||||
|
#
|
||||||
|
# Additional copyrights may follow
|
||||||
|
#
|
||||||
|
# $HEADER$
|
||||||
|
#
|
||||||
|
# MCA_notifier_hnp_CONFIG([action-if-found], [action-if-not-found])
|
||||||
|
# -----------------------------------------------------------
|
||||||
|
AC_DEFUN([MCA_orte_notifier_hnp_CONFIG], [
|
||||||
|
AC_CONFIG_FILES([orte/mca/notifier/hnp/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
|
])
|
||||||
@ -32,6 +32,10 @@ AC_DEFUN([MCA_orte_notifier_smtp_CONFIG], [
|
|||||||
[esmtp],
|
[esmtp],
|
||||||
[smtp_create_session],
|
[smtp_create_session],
|
||||||
[],
|
[],
|
||||||
[$1],
|
[$orte_notifier_want_smtp=1],
|
||||||
[$2])
|
[$orte_notifier_want_smtp=0])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_notifier_want_smtp" = 1 -a "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
])dnl
|
])dnl
|
||||||
|
|||||||
19
orte/mca/notifier/syslog/configure.m4
Обычный файл
19
orte/mca/notifier/syslog/configure.m4
Обычный файл
@ -0,0 +1,19 @@
|
|||||||
|
# -*- shell-script -*-
|
||||||
|
#
|
||||||
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
# $COPYRIGHT$
|
||||||
|
#
|
||||||
|
# Additional copyrights may follow
|
||||||
|
#
|
||||||
|
# $HEADER$
|
||||||
|
#
|
||||||
|
# MCA_notifier_syslog_CONFIG([action-if-found], [action-if-not-found])
|
||||||
|
# -----------------------------------------------------------
|
||||||
|
AC_DEFUN([MCA_orte_notifier_syslog_CONFIG], [
|
||||||
|
AC_CONFIG_FILES([orte/mca/notifier/syslog/Makefile])
|
||||||
|
|
||||||
|
AS_IF([test "$orte_without_full_support" = 0],
|
||||||
|
[$1],
|
||||||
|
[$2])
|
||||||
|
])
|
||||||
@ -10,7 +10,9 @@
|
|||||||
# 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.
|
||||||
dnl Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
# Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
||||||
# $COPYRIGHT$
|
# $COPYRIGHT$
|
||||||
#
|
#
|
||||||
# Additional copyrights may follow
|
# Additional copyrights may follow
|
||||||
@ -23,6 +25,9 @@ dnl Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|||||||
AC_DEFUN([MCA_orte_odls_default_CONFIG],[
|
AC_DEFUN([MCA_orte_odls_default_CONFIG],[
|
||||||
AC_CONFIG_FILES([orte/mca/odls/default/Makefile])
|
AC_CONFIG_FILES([orte/mca/odls/default/Makefile])
|
||||||
|
|
||||||
AC_CHECK_FUNC([fork], [$1], [$2])
|
AC_CHECK_FUNC([fork], [odls_default_happy="yes"], [odls_default_happy="no"])
|
||||||
|
|
||||||
|
AS_IF([test "$odls_default_happy" = "yes" -a "$orte_without_full_support" = 0], [$1], [$2])
|
||||||
|
|
||||||
])dnl
|
])dnl
|
||||||
|
|
||||||
|
|||||||
@ -3,7 +3,9 @@
|
|||||||
# Copyright (c) 2004-2005 The University of Tennessee and The University
|
# Copyright (c) 2004-2005 The University of Tennessee and The University
|
||||||
# of Tennessee Research Foundation. All rights
|
# of Tennessee Research Foundation. All rights
|
||||||
# reserved.
|
# reserved.
|
||||||
dnl Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
# Copyright (c) 2011 Los Alamos National Security, LLC.
|
||||||
|
# All rights reserved.
|
||||||
|
# Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
||||||
# $COPYRIGHT$
|
# $COPYRIGHT$
|
||||||
#
|
#
|
||||||
# Additional copyrights may follow
|
# Additional copyrights may follow
|
||||||
@ -16,5 +18,7 @@ dnl Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
|
|||||||
AC_DEFUN([MCA_orte_odls_process_CONFIG],[
|
AC_DEFUN([MCA_orte_odls_process_CONFIG],[
|
||||||
AC_CONFIG_FILES([orte/mca/odls/process/Makefile])
|
AC_CONFIG_FILES([orte/mca/odls/process/Makefile])
|
||||||
|
|
||||||
AC_CHECK_FUNC([CreateProcess], [$1], [$2])
|
AC_CHECK_FUNC([CreateProcess], [odls_process_happy="yes"], [odls_process_happy="no"])
|
||||||
|
|
||||||
|
AS_IF([test "$odls_process_happy" = "yes" -a "$orte_without_full_support" = 0], [$1], [$2])
|
||||||
])dnl
|
])dnl
|
||||||
|
|||||||
@ -36,7 +36,6 @@
|
|||||||
#include "orte/util/show_help.h"
|
#include "orte/util/show_help.h"
|
||||||
#include "opal/util/sys_limits.h"
|
#include "opal/util/sys_limits.h"
|
||||||
#include "opal/class/opal_pointer_array.h"
|
#include "opal/class/opal_pointer_array.h"
|
||||||
#include "opal/util/opal_sos.h"
|
|
||||||
|
|
||||||
#include "orte/runtime/orte_wait.h"
|
#include "orte/runtime/orte_wait.h"
|
||||||
#include "orte/runtime/orte_globals.h"
|
#include "orte/runtime/orte_globals.h"
|
||||||
|
|||||||
Некоторые файлы не были показаны из-за слишком большого количества измененных файлов Показать больше
Загрузка…
x
Ссылка в новой задаче
Block a user