<div style="line-height:1.7;color:#000000;font-size:14px;font-family:arial"><div style="color: rgb(34, 34, 34); font-size: small; line-height: normal;">I'm trying to spawn several processes on two node. When the number of child processes is small, it works fine, such as less than 80. However, when I tried to spawn 90+ processes, mpirun told me "Segmentation fault (core dumped)". Is something I did wrong or I didn't do?</div><div style="color: rgb(34, 34, 34); font-size: small; line-height: normal;"><br></div><div style="color: rgb(34, 34, 34); font-size: small; line-height: normal;">My MPICH compile command: </div><div style="color: rgb(34, 34, 34); font-size: small; line-height: normal;"><br></div><div style="color: rgb(34, 34, 34); font-size: small; line-height: normal;"><pre style="font-family: Menlo, Monaco, 'Courier New', monospace; padding: 8.5px; font-size: 12px; color: rgb(68, 68, 68); border-top-left-radius: 4px; border-top-right-radius: 4px; border-bottom-right
-radius: 4px; border-bottom-left-radius: 4px; margin-top: 0px; margin-bottom: 9px; line-height: 18px; background-color: rgb(245, 245, 245); border: 1px solid rgba(0, 0, 0, 0.14902); word-break: break-all;"><code style="font-family: Menlo, Monaco, 'Courier New', monospace; padding: 0px; color: inherit; border-top-left-radius: 3px; border-top-right-radius: 3px; border-bottom-right-radius: 3px; border-bottom-left-radius: 3px; background-color: transparent; border: 0px;">$ ./configure --prefix=/opt/mpich3 --with-device=ch3:nemesis --with-pm=hydra --enable-fast=none --enable-g=dbg CFLAGS=-fPIC --disable-f77 --disable-fc</code></pre><div style="color: rgb(34, 34, 34); font-size: small; line-height: normal;"><br></div>Here is my source code:</div><div style="color: rgb(34, 34, 34); font-size: small; line-height: normal;"><br></div><div style="color: rgb(34, 34, 34); font-size: small; line-height: normal;"><pre style="font-family: Menlo, Monaco, 'Courier New', monospace; padding: 8.
5px; font-size: 12px; color: rgb(68, 68, 68); border-top-left-radius: 4px; border-top-right-radius: 4px; border-bottom-right-radius: 4px; border-bottom-left-radius: 4px; margin-top: 0px; margin-bottom: 9px; line-height: 18px; background-color: rgb(245, 245, 245); border: 1px solid rgba(0, 0, 0, 0.14902); word-break: break-all;"><code style="font-family: Menlo, Monaco, 'Courier New', monospace; padding: 0px; color: inherit; border-top-left-radius: 3px; border-top-right-radius: 3px; border-bottom-right-radius: 3px; border-bottom-left-radius: 3px; background-color: transparent; border: 0px;"> #include "mpi.h"
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
int main( int argc, char *argv[] ) {
int HLEN=2;
char *host[]={"node1","node2"};
char name[65];
int count;
if(argc==2)
count=atoi(argv[1]);
else
count=2;
int root=0;
char* array_of_commands[count];
int array_of_maxprocs[count];
int errcodes[count];
MPI_Info array_of_info[count];
MPI_Comm parentcomm, intercomm;
int i;
MPI_Init( &argc, &argv );
for(i=0; i< count; i++){
array_of_commands[i]="/home/mpitest/spawn";
array_of_maxprocs[i]=1;
MPI_Info_create(&array_of_info[i]);
MPI_Info_set(array_of_info[i],"host",host[i % HLEN]);
}
MPI_Comm_get_parent( &parentcomm );
if (parentcomm == MPI_COMM_NULL) {
MPI_Comm_spawn_multiple( count, array_of_commands, MPI_ARGVS_NULL /*array_of_argv*/,
array_of_maxprocs, array_of_info, root, MPI_COMM_WORLD, &intercomm, errcodes );
printf("I'm the parent.\n");
} else {
gethostname(name, sizeof(name));
printf("I'm the spawned at %s.\n",name);
}
fflush(stdout);
MPI_Finalize();
return 0;
} </code></pre><div><code style="font-family: Menlo, Monaco, 'Courier New', monospace; padding: 0px; color: inherit; border-top-left-radius: 3px; border-top-right-radius: 3px; border-bottom-right-radius: 3px; border-bottom-left-radius: 3px; background-color: transparent; border: 0px;"><br></code></div></div></div><br><br><span title="neteasefooter"><span id="netease_mail_footer"></span></span>