163 строки
6.7 KiB
C
163 строки
6.7 KiB
C
/* -*- Mode: C; c-basic-offset:4 ; indent-tabs-mode:nil -*- */
|
|
/*
|
|
* Copyright (c) 2004-2005 The Trustees of Indiana University and Indiana
|
|
* University Research and Technology
|
|
* Corporation. All rights reserved.
|
|
* Copyright (c) 2004-2005 The University of Tennessee and The University
|
|
* of Tennessee Research Foundation. All rights
|
|
* reserved.
|
|
* Copyright (c) 2004-2005 High Performance Computing Center Stuttgart,
|
|
* University of Stuttgart. All rights reserved.
|
|
* Copyright (c) 2004-2005 The Regents of the University of California.
|
|
* All rights reserved.
|
|
* Copyright (c) 2006 Voltaire. All rights reserved.
|
|
* Copyright (c) 2007-2009 Cisco Systems, Inc. All rights reserved.
|
|
* Copyright (c) 2012-2015 NVIDIA Corporation. All rights reserved.
|
|
* Copyright (c) 2015 Los Alamos National Security, LLC. All rights
|
|
* reserved.
|
|
*
|
|
* $COPYRIGHT$
|
|
*
|
|
* Additional copyrights may follow
|
|
*
|
|
* $HEADER$
|
|
*/
|
|
|
|
#define OPAL_DISABLE_ENABLE_MEM_DEBUG 1
|
|
#include "opal_config.h"
|
|
#include "opal/mca/base/base.h"
|
|
#include "mpool_rgpusm.h"
|
|
#ifdef HAVE_UNISTD_H
|
|
#include <unistd.h>
|
|
#endif
|
|
#ifdef HAVE_MALLOC_H
|
|
#include <malloc.h>
|
|
#endif
|
|
|
|
/*
|
|
* Local functions
|
|
*/
|
|
static int rgpusm_open(void);
|
|
static int rgpusm_close(void);
|
|
static int rgpusm_register(void);
|
|
static mca_mpool_base_module_t* rgpusm_init(struct mca_mpool_base_resources_t* resources);
|
|
|
|
static int opal_mpool_rgpusm_verbose = 0;
|
|
|
|
mca_mpool_rgpusm_component_t mca_mpool_rgpusm_component = {
|
|
{
|
|
/* First, the mca_base_component_t struct containing meta
|
|
information about the component itself */
|
|
|
|
.mpool_version = {
|
|
MCA_MPOOL_BASE_VERSION_2_0_0,
|
|
|
|
.mca_component_name = "rgpusm",
|
|
MCA_BASE_MAKE_VERSION(component, OPAL_MAJOR_VERSION, OPAL_MINOR_VERSION,
|
|
OPAL_RELEASE_VERSION),
|
|
.mca_open_component = rgpusm_open,
|
|
.mca_close_component = rgpusm_close,
|
|
.mca_register_component_params = rgpusm_register,
|
|
},
|
|
.mpool_data = {
|
|
/* The component is checkpoint ready */
|
|
MCA_BASE_METADATA_PARAM_CHECKPOINT
|
|
},
|
|
|
|
.mpool_init = rgpusm_init
|
|
}
|
|
};
|
|
|
|
/**
|
|
* component open/close/init function
|
|
*/
|
|
static int rgpusm_open(void)
|
|
{
|
|
mca_mpool_rgpusm_component.output = opal_output_open(NULL);
|
|
opal_output_set_verbosity(mca_mpool_rgpusm_component.output, opal_mpool_rgpusm_verbose);
|
|
|
|
return OPAL_SUCCESS;
|
|
}
|
|
|
|
|
|
static int rgpusm_register(void)
|
|
{
|
|
mca_mpool_rgpusm_component.rcache_name = "vma";
|
|
(void) mca_base_component_var_register(&mca_mpool_rgpusm_component.super.mpool_version,
|
|
"rcache_name",
|
|
"The name of the registration cache the mpool should use",
|
|
MCA_BASE_VAR_TYPE_STRING, NULL, 0, 0,
|
|
OPAL_INFO_LVL_9,
|
|
MCA_BASE_VAR_SCOPE_READONLY,
|
|
&mca_mpool_rgpusm_component.rcache_name);
|
|
mca_mpool_rgpusm_component.rcache_size_limit = 0;
|
|
(void) mca_base_component_var_register(&mca_mpool_rgpusm_component.super.mpool_version,
|
|
"rcache_size_limit",
|
|
"the maximum size of registration cache in bytes. "
|
|
"0 is unlimited (default 0)",
|
|
MCA_BASE_VAR_TYPE_UNSIGNED_LONG_LONG, NULL, 0, 0,
|
|
OPAL_INFO_LVL_9,
|
|
MCA_BASE_VAR_SCOPE_READONLY,
|
|
&mca_mpool_rgpusm_component.rcache_size_limit);
|
|
|
|
mca_mpool_rgpusm_component.leave_pinned = 1;
|
|
(void) mca_base_component_var_register(&mca_mpool_rgpusm_component.super.mpool_version,
|
|
"leave_pinned",
|
|
"Whether to keep memory handles around or release them when done. ",
|
|
MCA_BASE_VAR_TYPE_INT, NULL, 0, 0,
|
|
OPAL_INFO_LVL_9,
|
|
MCA_BASE_VAR_SCOPE_READONLY,
|
|
&mca_mpool_rgpusm_component.leave_pinned);
|
|
|
|
mca_mpool_rgpusm_component.print_stats = false;
|
|
(void) mca_base_component_var_register(&mca_mpool_rgpusm_component.super.mpool_version,
|
|
"print_stats",
|
|
"print pool usage statistics at the end of the run",
|
|
MCA_BASE_VAR_TYPE_BOOL, NULL, 0, 0,
|
|
OPAL_INFO_LVL_9,
|
|
MCA_BASE_VAR_SCOPE_READONLY,
|
|
&mca_mpool_rgpusm_component.print_stats);
|
|
|
|
/* Set different levels of verbosity in the rgpusm related code. */
|
|
opal_mpool_rgpusm_verbose = 0;
|
|
(void) mca_base_component_var_register(&mca_mpool_rgpusm_component.super.mpool_version,
|
|
"verbose", "Set level of mpool rgpusm verbosity",
|
|
MCA_BASE_VAR_TYPE_INT, NULL, 0, 0,
|
|
OPAL_INFO_LVL_9,
|
|
MCA_BASE_VAR_SCOPE_READONLY,
|
|
&opal_mpool_rgpusm_verbose);
|
|
|
|
/* Force emptying of entire registration cache when it gets full */
|
|
mca_mpool_rgpusm_component.empty_cache = false;
|
|
(void) mca_base_component_var_register(&mca_mpool_rgpusm_component.super.mpool_version,
|
|
"empty_cache", "When set, empty entire registration cache when it is full",
|
|
MCA_BASE_VAR_TYPE_BOOL, NULL, 0, 0,
|
|
OPAL_INFO_LVL_5,
|
|
MCA_BASE_VAR_SCOPE_READONLY,
|
|
&mca_mpool_rgpusm_component.empty_cache);
|
|
|
|
return OPAL_SUCCESS;
|
|
}
|
|
|
|
|
|
static int rgpusm_close(void)
|
|
{
|
|
return OPAL_SUCCESS;
|
|
}
|
|
|
|
|
|
static mca_mpool_base_module_t* rgpusm_init(
|
|
struct mca_mpool_base_resources_t *resources)
|
|
{
|
|
mca_mpool_rgpusm_module_t* mpool_module;
|
|
|
|
mpool_module =
|
|
(mca_mpool_rgpusm_module_t*)malloc(sizeof(mca_mpool_rgpusm_module_t));
|
|
|
|
mpool_module->resources = *resources;
|
|
|
|
mca_mpool_rgpusm_module_init(mpool_module);
|
|
|
|
return &mpool_module->super;
|
|
}
|