如何使循环的一部分仅在其中一名工人中执行？

Question

我有一个循环打开与远程SFTP服务器的多个连接。每个会话都需要验证远程主机的密钥，但是现有的键列表仅需要加载曾经。

我正在使用的libssh2 API需要一个现有的会话来加载列表，因此在进入循环之前，我无法阅读 - 因为在其中初始化了会话。

是否有布拉格马斯，可以让我这样做：

1. 制作一个线程之一 - 我不在乎，哪一个 - 加载〜/.ssh/nownow_hosts。
2. 使所有其他线程都等待 做到了吗？

我尝试了：

    #pragma omp for
    for (i = 0; i < jobs; i++) {
        sessions[i] = libssh2_session_init();
        ...
        #pragma omp task
        {
            known = load_known_hosts(sessions[i], ...);
        }

        #pragma omp taskwait
        check_known_hosts(known, ...);
        ...
    }

此编译，但无法按预期工作 - 当check_noyne_hosts（）试图使用它时，列表仍未实现。

Answer 1

我的建议是以下内容（类似于 @ deamcrash 建议，但也可以并行进行初始化）

#pragma omp parallel
{
    ...
    #pragma omp for
    for (i = 0; i < jobs; i++) {
    //initialization in parallel
    sessions[i] = libssh2_session_init();
    ...
    }

    #pragma omp single
    {
        // work done by a single thread 
        known = load_known_hosts(...);
        ...
    }

    #pragma omp for
    for (i = 0; i < jobs; i++) {
        //other parallel work
        check_known_hosts(known, ...);
        ....
    }
    ...
}

Answer 2

如果没有更多的上下文，我会去做：

    #pragma omp single
    {
        sessions[0] = libssh2_session_init();
        ...
        known = load_known_hosts(sessions[0], ...);
        ...
        check_known_hosts(known, ...);
        ...
    }

    #pragma omp for
    for (i = 1; i < jobs; i++) {
        sessions[i] = libssh2_session_init();
        ...
        check_known_hosts(known, ...);
        ...
    }

我会从循环中提取第一个迭代，在并行循环之前执行，然后执行循环。为了使其清洁，您可以从每个循环迭代中执行的代码中提取一种方法。

Answer 3

我快速而肮脏的“解决方案”是为第一份工作加载清单 - 如果其他工人在Job-0之前到达这一点，请旋转：

    if (i == 0) {
        known = load_known_hosts(sessions[0], ...);
        if (known == NULL)
            errx(EX_SOFTWARE, "Couldn't load known hosts");
    } else while (known == NULL)
        pthread_yield();

我敢肯定，有一种方法可以做到这一点适当地 - 带有OpenMP pragmas-因此等待适当的答案。