MPI_Allgather 产生不一致的结果

Question

我在一个大型软件的一部分中遇到了 MPI_Allgather 问题。

下面的函数传递了每个节点上不同的双精度和相关标志，然后该函数应该找到全局最小双精度，并将所有节点设置为相应的值。

void set_dt_to_global_min (double *dt, int *flag) {
    int ierr, size;
    ierr = MPI_Comm_size(MPI_COMM_WORLD, &size);

    if (size == 1)
        return;

    typedef struct DT_FLAG_ {
        double dt;
        int flag;
    } DT_FLAG;

    DT_FLAG local;
    DT_FLAG *gathered = (DT_FLAG *) malloc(size * sizeof(*gathered));

    local.dt = *dt;
    local.flag = *flag;

    MPI_Allgather(&local, sizeof(DT_FLAG), MPI_BYTE, gathered, sizeof(DT_FLAG), MPI_BYTE, MPI_COMM_WORLD);

    int i, imin;
    for (imin = 0, i = 1; i < size; ++i) {
        if (gathered[imin].dt > gathered[i].dt) {
            imin = i;
        }
    }

    *dt = gathered[imin].dt;
    *flag = gathered[imin].flag;

    free(gathered);
}

我目前在 6 个节点上运行此程序，发现以下错误仅发生在节点 5（其 dt 值最小）上：

• gathered[0] 被 gathered[2] 替换
• gathered[1] 的真实值被 gathered[3] 替换

我想也许这有与某事有关MPI_COMM_WORLD，因为可能会调用 MPI_Comm_Split()；然而，到目前为止，我还不明白这部分代码。

有人有什么想法吗？

-- 编辑：更新了问题以反映我们实际上需要保留一个也与 dt 相关联的标志 -- 这意味着 @suszterpatt 建议对于我最初的问题来说非常有用，但实际上不会为此工作（我不认为）。

Answer 1

最近对 mpi-default-dev 的更新似乎已经解决了这个问题——当我弄清楚哪些更改可能解决了这个问题时，我将发布更多详细信息。