Skip to content

Commit c7939ae

Browse files
author
Ralph Castain
committed
Pickup some minor debugging changes
Signed-off-by: Ralph Castain <rhc@open-mpi.org>
1 parent f18954d commit c7939ae

File tree

2 files changed

+15
-6
lines changed

2 files changed

+15
-6
lines changed

opal/mca/pmix/pmix4x/pmix/src/mca/pnet/opa/pnet_opa.c

Lines changed: 12 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -251,12 +251,13 @@ static pmix_status_t allocate(pmix_nspace_t *nptr,
251251
return PMIX_ERR_TAKE_NEXT_OPTION;
252252
}
253253

254-
if (0 == strncmp(info->key, PMIX_SETUP_APP_ENVARS, PMIX_MAX_KEYLEN)) {
254+
if (PMIX_CHECK_KEY(info, PMIX_SETUP_APP_ENVARS)) {
255255
envars = PMIX_INFO_TRUE(info);
256-
} else if (0 == strncmp(info->key, PMIX_SETUP_APP_ALL, PMIX_MAX_KEYLEN)) {
256+
} else if (PMIX_CHECK_KEY(info, PMIX_SETUP_APP_ALL)) {
257257
envars = PMIX_INFO_TRUE(info);
258258
seckeys = PMIX_INFO_TRUE(info);
259-
} else if (0 == strncmp(info->key, PMIX_SETUP_APP_NONENVARS, PMIX_MAX_KEYLEN)) {
259+
} else if (PMIX_CHECK_KEY(info, PMIX_SETUP_APP_NONENVARS) ||
260+
PMIX_CHECK_KEY(info, PMIX_ALLOC_NETWORK_SEC_KEY)) {
260261
seckeys = PMIX_INFO_TRUE(info);
261262
}
262263

@@ -362,6 +363,14 @@ static pmix_status_t setup_local_network(pmix_nspace_t *nptr,
362363
return PMIX_ERR_NOMEM;
363364
}
364365
pmix_value_xfer(kv->value, &info[n].value);
366+
if (PMIX_ENVAR == kv->value->type) {
367+
pmix_output_verbose(2, pmix_pnet_base_framework.framework_output,
368+
"pnet:opa:setup_local_network adding %s=%s to environment",
369+
kv->value->data.envar.envar, kv->value->data.envar.value);
370+
} else {
371+
pmix_output_verbose(2, pmix_pnet_base_framework.framework_output,
372+
"pnet:opa:setup_local_network loading blob");
373+
}
365374
pmix_list_append(&nptr->setup_data, &kv->super);
366375
}
367376
}

opal/mca/pmix/pmix4x/pmix/src/mca/pnet/tcp/pnet_tcp.c

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -329,8 +329,8 @@ static pmix_status_t allocate(pmix_nspace_t *nptr,
329329
/* check directives to see if a crypto key and/or
330330
* network resource allocations requested */
331331
PMIX_CONSTRUCT(&mylist, pmix_list_t);
332-
if (0 == strncmp(info->key, PMIX_SETUP_APP_ENVARS, PMIX_MAX_KEYLEN) ||
333-
0 == strncmp(info->key, PMIX_SETUP_APP_ALL, PMIX_MAX_KEYLEN)) {
332+
if (PMIX_CHECK_KEY(info, PMIX_SETUP_APP_ENVARS) ||
333+
PMIX_CHECK_KEY(info, PMIX_SETUP_APP_ALL)) {
334334
if (NULL != mca_pnet_tcp_component.include) {
335335
pmix_output_verbose(2, pmix_pnet_base_framework.framework_output,
336336
"pnet: tcp harvesting envars %s excluding %s",
@@ -342,7 +342,7 @@ static pmix_status_t allocate(pmix_nspace_t *nptr,
342342
return rc;
343343
}
344344
return PMIX_SUCCESS;
345-
} else if (0 != strncmp(info->key, PMIX_ALLOC_NETWORK, PMIX_MAX_KEYLEN)) {
345+
} else if (PMIX_CHECK_KEY(info, PMIX_ALLOC_NETWORK)) {
346346
/* not a network allocation request */
347347
return PMIX_SUCCESS;
348348
}

0 commit comments

Comments
 (0)