[mpich2-commits] r7735 - mpich2/trunk/src/pm/hydra/pm/pmiserv

[balaji at mcs.anl.gov]

Author: balaji
Date: 2011-01-18 13:55:58 -0600 (Tue, 18 Jan 2011)
New Revision: 7735

Modified:
   mpich2/trunk/src/pm/hydra/pm/pmiserv/pmip_cb.c
Log:
Make sure the end of the pipe used by the proxy is closed by the
application.

Modified: mpich2/trunk/src/pm/hydra/pm/pmiserv/pmip_cb.c
===================================================================
--- mpich2/trunk/src/pm/hydra/pm/pmiserv/pmip_cb.c	2011-01-18 00:45:53 UTC (rev 7734)
+++ mpich2/trunk/src/pm/hydra/pm/pmiserv/pmip_cb.c	2011-01-18 19:55:58 UTC (rev 7735)
@@ -651,8 +651,11 @@
                     status = HYDT_dmx_register_fd(1, &pmi_fds[0], HYD_POLLIN, NULL, pmi_cb);
                     HYDU_ERR_POP(status, "unable to register fd\n");
 
+                    status = HYDU_sock_cloexec(pmi_fds[0]);
+                    HYDU_ERR_POP(status, "unable to set socket to close on exec\n");
+
+                    HYD_pmcd_pmip.downstream.pmi_fd[process_id] = pmi_fds[0];
                     str = HYDU_int_to_str(pmi_fds[1]);
-                    HYD_pmcd_pmip.downstream.pmi_fd[process_id] = pmi_fds[0];
                 }
 
                 status = HYDU_append_env_to_list("PMI_FD", str, &force_env);