每个通信器都有一个关联的进程组,可通过调用MPI_COMM_GROUP(C 绑定中的MPI_Comm_group)获得。一旦获得comm 的进程组,就可以使用MPI_GROUP_TRANSLATE_RANKS 将comm 组中的rank 列表转换为MPI_COMM_WORLD 组中的相应rank。必须经过翻译过程,因为在comm这个组中,参与的进程的等级从0到MPI_COMM_SIZE(comm)-1不等。
这是一个示例实现:
void print_comm_ranks(MPI_Comm comm)
{
MPI_Group grp, world_grp;
MPI_Comm_group(MPI_COMM_WORLD, &world_grp);
MPI_Comm_group(comm, &grp);
int grp_size;
MPI_Group_size(grp, &grp_size);
int *ranks = malloc(grp_size * sizeof(int));
int *world_ranks = malloc(grp_size * sizeof(int));
for (int i = 0; i < grp_size; i++)
ranks[i] = i;
MPI_Group_translate_ranks(grp, grp_size, ranks, world_grp, world_ranks);
for (int i = 0; i < grp_size; i++)
printf("comm[%d] has world rank %d\n", i, world_ranks[i]);
free(ranks); free(world_ranks);
MPI_Group_free(&grp);
MPI_Group_free(&world_grp);
}
这是一个示例用法:
int rank;
MPI_Comm comm;
MPI_Comm_rank(MPI_COMM_WORLD, &rank);
MPI_Comm_split(MPI_COMM_WORLD, rank % 2, rank, &comm);
if (rank == 0)
{
printf("Rank 0 view:\n");
print_comm_ranks(comm);
}
else if (rank == 1)
{
printf("Rank 1 view:\n");
print_comm_ranks(comm);
}
以及对应的7个进程的输出:
Rank 0 view:
comm[0] has world rank 0
comm[1] has world rank 2
comm[2] has world rank 4
comm[3] has world rank 6
Rank 1 view:
comm[0] has world rank 1
comm[1] has world rank 3
comm[2] has world rank 5
(排名0和1在拆分后最终在不同的传播者中)
请注意,您只能枚举当前进程知道的通信器的内容,因为通信器由它们的句柄引用,并且这些是每个进程的本地值。