ports/openmpi
ports/openmpi
1
1
Форкнуть 0
Код Релизы Активность

Merge pull request #8256 from rhc54/cmr41/fix

Просмотр исходного кода 
v4.1.x: Fix the verbose output in ess base
Этот коммит содержится в:
Jeff Squyres 2020-11-26 09:26:14 -05:00 коммит произвёл GitHub
родитель 6e2c8cfcba 09e9fe0178
Коммит ab3fc05101
Не найден ключ, соответствующий данной подписи
Идентификатор ключа GPG: 4AEE18F83AFDEB23
1 изменённых файлов: 72 добавлений и 23 удалений
Показать статистику Скачать Patch файл Скачать Diff файл Показать все файлы Свернуть все файлы

95
orte/mca/ess/base/ess_base_fns.c
Просмотреть файл

@ -74,19 +74,43 @@ int orte_ess_base_proc_binding(void)
} }
OPAL_MODEX_RECV_VALUE_OPTIONAL(ret, OPAL_PMIX_CPUSET, OPAL_MODEX_RECV_VALUE_OPTIONAL(ret, OPAL_PMIX_CPUSET,
ORTE_PROC_MY_NAME, &orte_process_info.cpuset, OPAL_STRING); ORTE_PROC_MY_NAME, &orte_process_info.cpuset, OPAL_STRING);
/* try to get our locality as well */
map = NULL; if (opal_hwloc_report_bindings || 4 < opal_output_get_verbosity(orte_ess_base_framework.framework_output)) {
OPAL_MODEX_RECV_VALUE_OPTIONAL(ret, OPAL_PMIX_LOCALITY_STRING, /* try to get our locality as well so we avoid pulling in the hwloc topology tree */
ORTE_PROC_MY_NAME, &map, OPAL_STRING); map = NULL;
if (OPAL_SUCCESS == ret && NULL != map) { OPAL_MODEX_RECV_VALUE_OPTIONAL(ret, OPAL_PMIX_LOCALITY_STRING,
/* we were - no need to pull in the topology */ ORTE_PROC_MY_NAME, &map, OPAL_STRING);
if (opal_hwloc_report_bindings || 4 < opal_output_get_verbosity(orte_ess_base_framework.framework_output)) { if (OPAL_SUCCESS == ret && NULL != map) {
opal_output(0, "MCW rank %s bound to %s", /* we were - no need to pull in the topology */
ORTE_VPID_PRINT(ORTE_PROC_MY_NAME->vpid), map); opal_output(0, "MCW rank %s bound to %s",
ORTE_VPID_PRINT(ORTE_PROC_MY_NAME->vpid), map);
free(map);
} else if (OPAL_SUCCESS == ret && NULL == map) {
opal_output(0, "MCW rank %s not bound", ORTE_VPID_PRINT(ORTE_PROC_MY_NAME->vpid));
} else {
/* they want the binding report, so we will have to obtain the
* topology since locality wasn't given to us */
if (OPAL_SUCCESS != opal_hwloc_base_get_topology()) {
/* there is nothing we can do, so just return */
return ORTE_SUCCESS;
}
mycpus = hwloc_bitmap_alloc();
if (hwloc_get_cpubind(opal_hwloc_topology,
mycpus, HWLOC_CPUBIND_PROCESS) < 0) {
opal_output(0, "MCW rank %d is not bound",
ORTE_PROC_MY_NAME->vpid);
} else {
char tmp1[1024], tmp2[1024];
if (OPAL_ERR_NOT_BOUND == opal_hwloc_base_cset2str(tmp1, sizeof(tmp1), opal_hwloc_topology, mycpus)) {
opal_output(0, "MCW rank %d is not bound (or bound to all available processors)", ORTE_PROC_MY_NAME->vpid);
} else {
opal_hwloc_base_cset2mapstr(tmp2, sizeof(tmp2), opal_hwloc_topology, mycpus);
opal_output(0, "MCW rank %d bound to %s: %s",
ORTE_PROC_MY_NAME->vpid, tmp1, tmp2);
}
}
hwloc_bitmap_free(mycpus);
} }
free(map);
} else {
opal_output(0, "MCW rank %s not bound", ORTE_VPID_PRINT(ORTE_PROC_MY_NAME->vpid));
} }
return ORTE_SUCCESS; return ORTE_SUCCESS;
} else if (NULL != getenv(OPAL_MCA_PREFIX"orte_externally_bound")) { } else if (NULL != getenv(OPAL_MCA_PREFIX"orte_externally_bound")) {
@ -99,18 +123,43 @@ int orte_ess_base_proc_binding(void)
OPAL_MODEX_RECV_VALUE_OPTIONAL(ret, OPAL_PMIX_CPUSET, OPAL_MODEX_RECV_VALUE_OPTIONAL(ret, OPAL_PMIX_CPUSET,
ORTE_PROC_MY_NAME, &orte_process_info.cpuset, OPAL_STRING); ORTE_PROC_MY_NAME, &orte_process_info.cpuset, OPAL_STRING);
/* see if we also have our locality - this is the one we require */
map = NULL; if (opal_hwloc_report_bindings || 4 < opal_output_get_verbosity(orte_ess_base_framework.framework_output)) {
OPAL_MODEX_RECV_VALUE_OPTIONAL(ret, OPAL_PMIX_LOCALITY_STRING, /* try to get our locality as well so we avoid pulling in the hwloc topology tree */
ORTE_PROC_MY_NAME, &map, OPAL_STRING); map = NULL;
if (OPAL_SUCCESS == ret && NULL != map) { OPAL_MODEX_RECV_VALUE_OPTIONAL(ret, OPAL_PMIX_LOCALITY_STRING,
/* we were - no need to pull in the topology */ ORTE_PROC_MY_NAME, &map, OPAL_STRING);
if (opal_hwloc_report_bindings || 4 < opal_output_get_verbosity(orte_ess_base_framework.framework_output)) { if (OPAL_SUCCESS == ret && NULL != map) {
opal_output(0, "MCW rank %s bound to %s", /* we were - no need to pull in the topology */
ORTE_VPID_PRINT(ORTE_PROC_MY_NAME->vpid), map); opal_output(0, "MCW rank %s bound to %s",
ORTE_VPID_PRINT(ORTE_PROC_MY_NAME->vpid), map);
free(map);
} else if (OPAL_SUCCESS == ret && NULL == map) {
opal_output(0, "MCW rank %s not bound", ORTE_VPID_PRINT(ORTE_PROC_MY_NAME->vpid));
} else {
/* they want the binding report, so we will have to obtain the
* topology since locality wasn't given to us */
if (OPAL_SUCCESS != opal_hwloc_base_get_topology()) {
/* there is nothing we can do, so just return */
return ORTE_SUCCESS;
}
mycpus = hwloc_bitmap_alloc();
if (hwloc_get_cpubind(opal_hwloc_topology,
mycpus, HWLOC_CPUBIND_PROCESS) < 0) {
opal_output(0, "MCW rank %d is not bound",
ORTE_PROC_MY_NAME->vpid);
} else {
char tmp1[1024], tmp2[1024];
if (OPAL_ERR_NOT_BOUND == opal_hwloc_base_cset2str(tmp1, sizeof(tmp1), opal_hwloc_topology, mycpus)) {
opal_output(0, "MCW rank %d is not bound (or bound to all available processors)", ORTE_PROC_MY_NAME->vpid);
} else {
opal_hwloc_base_cset2mapstr(tmp2, sizeof(tmp2), opal_hwloc_topology, mycpus);
opal_output(0, "MCW rank %d bound to %s: %s",
ORTE_PROC_MY_NAME->vpid, tmp1, tmp2);
}
}
hwloc_bitmap_free(mycpus);
} }
free(map);
return ORTE_SUCCESS;
} }
/* the topology system will pickup the binding pattern */ /* the topology system will pickup the binding pattern */
} }