From 4286b7adb9260425e80e67d496f67e1c0bf75d2e Mon Sep 17 00:00:00 2001 From: Ralph Castain Date: Mon, 9 Feb 2009 20:39:05 +0000 Subject: [PATCH] Deal with unknown return address for ompi-top option This commit was SVN r20489. --- orte/orted/orted_comm.c | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/orte/orted/orted_comm.c b/orte/orted/orted_comm.c index 6fb6baa547..98c1af14b2 100644 --- a/orte/orted/orted_comm.c +++ b/orte/orted/orted_comm.c @@ -1051,6 +1051,7 @@ SEND_ANSWER: hnp_accounted_for = false; n = 1; + return_addr = NULL; while (ORTE_SUCCESS == opal_dss.unpack(buffer, &proc, &n, ORTE_NAME)) { /* the jobid provided will, of course, have the job family of * the requestor. We need to convert that to our own job family @@ -1195,6 +1196,12 @@ SEND_ANSWER: OBJ_RELEASE(answer); answer = relay_msg; } + /* if we don't have a return address, then we are helpless */ + if (NULL == return_addr) { + ORTE_ERROR_LOG(ORTE_ERR_COMM_FAILURE); + ret = ORTE_ERR_COMM_FAILURE; + break; + } if (0 > orte_rml.send_buffer_nb(return_addr, answer, ORTE_RML_TAG_TOOL, 0, send_callback, NULL)) { ORTE_ERROR_LOG(ORTE_ERR_COMM_FAILURE);