1
1
/*
2
- * Copyright (c) 2016-2018 IBM Corporation. All rights reserved.
2
+ * Copyright (c) 2016-2020 IBM Corporation. All rights reserved.
3
3
* $COPYRIGHT$
4
4
*
5
5
* Additional copyrights may follow
@@ -68,11 +68,11 @@ const ompi_hook_base_component_1_0_0_t mca_hook_comm_method_component = {
68
68
69
69
int mca_hook_comm_method_verbose = 0 ;
70
70
int mca_hook_comm_method_output = -1 ;
71
- bool hook_comm_method_enable_mpi_init = false;
72
- bool hook_comm_method_enable_mpi_finalize = false;
73
- int hook_comm_method_max = 12 ;
74
- int hook_comm_method_brief = 0 ;
75
- char * hook_comm_method_fakefile = NULL ;
71
+ bool mca_hook_comm_method_enable_mpi_init = false;
72
+ bool mca_hook_comm_method_enable_mpi_finalize = false;
73
+ int mca_hook_comm_method_max = 12 ;
74
+ int mca_hook_comm_method_brief = 0 ;
75
+ char * mca_hook_comm_method_fakefile = NULL ;
76
76
77
77
static int ompi_hook_comm_method_component_open (void )
78
78
{
@@ -113,23 +113,23 @@ static int ompi_hook_comm_method_component_register(void)
113
113
/*
114
114
* If the component is active for mpi_init / mpi_finalize
115
115
*/
116
- hook_comm_method_enable_mpi_init = false;
116
+ mca_hook_comm_method_enable_mpi_init = false;
117
117
(void ) mca_base_component_var_register (& mca_hook_comm_method_component .hookm_version , "enable_mpi_init" ,
118
118
"Enable comm_method behavior on mpi_init" ,
119
119
MCA_BASE_VAR_TYPE_BOOL , NULL ,
120
120
0 , 0 ,
121
121
OPAL_INFO_LVL_3 ,
122
122
MCA_BASE_VAR_SCOPE_READONLY ,
123
- & hook_comm_method_enable_mpi_init );
123
+ & mca_hook_comm_method_enable_mpi_init );
124
124
125
- hook_comm_method_enable_mpi_finalize = false;
125
+ mca_hook_comm_method_enable_mpi_finalize = false;
126
126
(void ) mca_base_component_var_register (& mca_hook_comm_method_component .hookm_version , "enable_mpi_finalize" ,
127
127
"Enable comm_method behavior on mpi_finalize" ,
128
128
MCA_BASE_VAR_TYPE_BOOL , NULL ,
129
129
0 , 0 ,
130
130
OPAL_INFO_LVL_3 ,
131
131
MCA_BASE_VAR_SCOPE_READONLY ,
132
- & hook_comm_method_enable_mpi_finalize );
132
+ & mca_hook_comm_method_enable_mpi_finalize );
133
133
134
134
// User can set the comm_method mca variable too
135
135
int hook_comm_method = -1 ;
@@ -142,10 +142,10 @@ static int ompi_hook_comm_method_component_register(void)
142
142
& hook_comm_method );
143
143
144
144
if ( 1 == hook_comm_method ) {
145
- hook_comm_method_enable_mpi_init = true;
145
+ mca_hook_comm_method_enable_mpi_init = true;
146
146
}
147
147
else if ( 2 == hook_comm_method ) {
148
- hook_comm_method_enable_mpi_finalize = true;
148
+ mca_hook_comm_method_enable_mpi_finalize = true;
149
149
}
150
150
151
151
// comm_method_max
@@ -155,15 +155,15 @@ static int ompi_hook_comm_method_component_register(void)
155
155
0 , 0 ,
156
156
OPAL_INFO_LVL_3 ,
157
157
MCA_BASE_VAR_SCOPE_READONLY ,
158
- & hook_comm_method_max );
158
+ & mca_hook_comm_method_max );
159
159
// comm_method_brief
160
160
(void ) mca_base_var_register ("ompi" , NULL , NULL , "comm_method_brief" ,
161
161
"Only print the comm method summary, skip the 2d table." ,
162
162
MCA_BASE_VAR_TYPE_INT , NULL ,
163
163
0 , 0 ,
164
164
OPAL_INFO_LVL_3 ,
165
165
MCA_BASE_VAR_SCOPE_READONLY ,
166
- & hook_comm_method_brief );
166
+ & mca_hook_comm_method_brief );
167
167
168
168
// comm_method_fakefile is just for debugging, allows complete override of all the
169
169
// comm method in the table
@@ -173,7 +173,7 @@ static int ompi_hook_comm_method_component_register(void)
173
173
0 , 0 ,
174
174
OPAL_INFO_LVL_3 ,
175
175
MCA_BASE_VAR_SCOPE_READONLY ,
176
- & hook_comm_method_fakefile );
176
+ & mca_hook_comm_method_fakefile );
177
177
178
178
return OMPI_SUCCESS ;
179
179
}
0 commit comments