在 Windows (1.4.1p1) 中使用 MPICH 学习 MPI 时,我发现了一些示例代码here。最初,当我运行服务器时,我必须复制生成的port_name
并用它启动客户端。这样,客户端就可以连接到服务器了。我修改它以包括MPI_Publish_name()
而是在服务器中。启动名称为的服务器后aaaa
,我启动失败的客户端MPI_Lookup_name()
with
Invalid service name (see MPI_Publish_name), error stack:
MPID_NS_Lookup(87): Lookup failed for service name aaaa
以下是代码片段:
server.c
MPI_Comm client;
MPI_Status status;
char port_name[MPI_MAX_PORT_NAME];
char serv_name[256];
double buf[MAX_DATA];
int size, again;
int res = 0;
MPI_Init( &argc, &argv );
MPI_Comm_size(MPI_COMM_WORLD, &size);
MPI_Open_port(MPI_INFO_NULL, port_name);
sprintf(serv_name, "aaaa");
MPI_Publish_name(serv_name, MPI_INFO_NULL, port_name);
while (1)
{
MPI_Comm_accept( port_name, MPI_INFO_NULL, 0, MPI_COMM_WORLD, &client );
/*...snip...*/
}
client.c
MPI_Comm server;
double buf[MAX_DATA];
char port_name[MPI_MAX_PORT_NAME];
memset(port_name,'\0',MPI_MAX_PORT_NAME);
char serv_name[256];
memset(serv_name,'\0',256);
strcpy(serv_name, argv[1] )
MPI_Lookup_name(serv_name, MPI_INFO_NULL, port_name);
MPI_Comm_connect( port_name, MPI_INFO_NULL, 0, MPI_COMM_WORLD, &server );
MPI_Send( buf, 0, MPI_DOUBLE, 0, tag, server );
MPI_Comm_disconnect( &server );
MPI_Finalize();
return 0;
我找不到任何有关更改已发布名称的可见性的信息,如果这确实是问题的话。 MPICH 似乎没有使用 MPI_INFO 实现任何内容。我想尝试 openMPI,但我在构建它时遇到了麻烦。有什么建议么?