[mpich2-commits] r4090 - mpich2/trunk/src/pm/hydra/utils/launch

balaji at mcs.anl.gov balaji at mcs.anl.gov
Mon Mar 16 13:20:16 CDT 2009


Author: balaji
Date: 2009-03-16 13:20:16 -0500 (Mon, 16 Mar 2009)
New Revision: 4090

Modified:
   mpich2/trunk/src/pm/hydra/utils/launch/launch.c
Log:
Give out a better error message when the file is not found.

Modified: mpich2/trunk/src/pm/hydra/utils/launch/launch.c
===================================================================
--- mpich2/trunk/src/pm/hydra/utils/launch/launch.c	2009-03-16 18:15:43 UTC (rev 4089)
+++ mpich2/trunk/src/pm/hydra/utils/launch/launch.c	2009-03-16 18:20:16 UTC (rev 4090)
@@ -40,8 +40,16 @@
         if (in && (dup2(inpipe[0], 0) < 0))
             HYDU_ERR_SETANDJUMP1(status, HYD_SOCK_ERROR, "dup2 error (errno: %d)\n", errno);
 
-        if (execvp(client_arg[0], client_arg) < 0)
-            HYDU_ERR_SETANDJUMP(status, HYD_INTERNAL_ERROR, "execvp error\n");
+        if (execvp(client_arg[0], client_arg) < 0) {
+            if (errno == ENOENT) {
+                HYDU_ERR_SETANDJUMP1(status, HYD_INTERNAL_ERROR,
+                                     "execvp error: file %s not found\n", client_arg[0]);
+            }
+            else {
+                HYDU_ERR_SETANDJUMP1(status, HYD_INTERNAL_ERROR,
+                                     "execvp error (errno: %d)\n", errno);
+            }
+        }
     }
     else {      /* Parent process */
         close(outpipe[1]);



More information about the mpich2-commits mailing list