Blame SOURCES/0001-Revert-ucx-check-supported-transports-and-devices-fo.patch

101965
From 63c80c7692e55f634cbca6f67cc5c9cdef3a04d2 Mon Sep 17 00:00:00 2001
101965
From: Honggang Li <honli@redhat.com>
101965
Date: Mon, 28 Jun 2021 21:38:13 +0800
101965
Subject: [PATCH] Revert "ucx: check supported transports and devices for
101965
 setting priority"
101965
101965
This reverts commit c36d7459b6331c4da825cad5a64326e7c1a272aa.
101965
---
101965
 contrib/platform/mellanox/optimized.conf |   2 -
101965
 ompi/mca/pml/ucx/pml_ucx_component.c     |  15 +-
101965
 opal/mca/common/ucx/common_ucx.c         | 202 +----------------------
101965
 opal/mca/common/ucx/common_ucx.h         |  15 --
101965
 opal/mca/common/ucx/configure.m4         |   2 -
101965
 5 files changed, 2 insertions(+), 234 deletions(-)
101965
101965
diff --git a/contrib/platform/mellanox/optimized.conf b/contrib/platform/mellanox/optimized.conf
101965
index 543fd8d1e224..b86b37c9e2fa 100644
101965
--- a/contrib/platform/mellanox/optimized.conf
101965
+++ b/contrib/platform/mellanox/optimized.conf
101965
@@ -61,8 +61,6 @@
101965
 coll = ^ml
101965
 hwloc_base_binding_policy = core
101965
 btl = self
101965
-pml_ucx_tls = any
101965
-pml_ucx_devices = any
101965
 # Basic behavior to smooth startup
101965
 mca_base_component_show_load_errors = 0
101965
 orte_abort_timeout = 10
101965
diff --git a/ompi/mca/pml/ucx/pml_ucx_component.c b/ompi/mca/pml/ucx/pml_ucx_component.c
101965
index 6aed6c41d11d..ed9cc6573e8e 100644
101965
--- a/ompi/mca/pml/ucx/pml_ucx_component.c
101965
+++ b/ompi/mca/pml/ucx/pml_ucx_component.c
101965
@@ -107,26 +107,13 @@ static mca_pml_base_module_t*
101965
 mca_pml_ucx_component_init(int* priority, bool enable_progress_threads,
101965
                            bool enable_mpi_threads)
101965
 {
101965
-    opal_common_ucx_support_level_t support_level;
101965
     int ret;
101965
 
101965
-    support_level = opal_common_ucx_support_level(ompi_pml_ucx.ucp_context);
101965
-    if (support_level == OPAL_COMMON_UCX_SUPPORT_NONE) {
101965
-        return NULL;
101965
-    }
101965
-
101965
     if ( (ret = mca_pml_ucx_init(enable_mpi_threads)) != 0) {
101965
         return NULL;
101965
     }
101965
 
101965
-    /*
101965
-     * If found supported devices - set to the configured (high) priority.
101965
-     * Otherwise - Found only supported transports (which could be exposed by
101965
-     *             unsupported devices), so set a priority lower than ob1.
101965
-     */
101965
-    *priority = (support_level == OPAL_COMMON_UCX_SUPPORT_DEVICE) ?
101965
-                ompi_pml_ucx.priority : 19;
101965
-    PML_UCX_VERBOSE(2, "returning priority %d", *priority);
101965
+    *priority = ompi_pml_ucx.priority;
101965
     return &ompi_pml_ucx.super;
101965
 }
101965
 
101965
diff --git a/opal/mca/common/ucx/common_ucx.c b/opal/mca/common/ucx/common_ucx.c
101965
index ac7a17d799a5..ae8e66877ab6 100644
101965
--- a/opal/mca/common/ucx/common_ucx.c
101965
+++ b/opal/mca/common/ucx/common_ucx.c
101965
@@ -14,11 +14,8 @@
101965
 #include "opal/mca/base/mca_base_framework.h"
101965
 #include "opal/mca/pmix/pmix.h"
101965
 #include "opal/memoryhooks/memory.h"
101965
-#include "opal/util/argv.h"
101965
 
101965
 #include <ucm/api/ucm.h>
101965
-#include <fnmatch.h>
101965
-#include <stdio.h>
101965
 
101965
 /***********************************************************************/
101965
 
101965
@@ -28,8 +25,7 @@ opal_common_ucx_module_t opal_common_ucx = {
101965
     .verbose             = 0,
101965
     .progress_iterations = 100,
101965
     .registered          = 0,
101965
-    .opal_mem_hooks      = 0,
101965
-    .tls                 = NULL
101965
+    .opal_mem_hooks      = 0
101965
 };
101965
 
101965
 static void opal_common_ucx_mem_release_cb(void *buf, size_t length,
101965
@@ -40,15 +36,10 @@ static void opal_common_ucx_mem_release_cb(void *buf, size_t length,
101965
 
101965
 OPAL_DECLSPEC void opal_common_ucx_mca_var_register(const mca_base_component_t *component)
101965
 {
101965
-    static const char *default_tls     = "rc_verbs,ud_verbs,rc_mlx5,dc_mlx5,cuda_ipc,rocm_ipc";
101965
-    static const char *default_devices = "mlx*";
101965
     static int registered = 0;
101965
     static int hook_index;
101965
     static int verbose_index;
101965
     static int progress_index;
101965
-    static int tls_index;
101965
-    static int devices_index;
101965
-
101965
     if (!registered) {
101965
         verbose_index = mca_base_var_register("opal", "opal_common", "ucx", "verbose",
101965
                                               "Verbose level of the UCX components",
101965
@@ -69,29 +60,6 @@ OPAL_DECLSPEC void opal_common_ucx_mca_var_register(const mca_base_component_t *
101965
                                            OPAL_INFO_LVL_3,
101965
                                            MCA_BASE_VAR_SCOPE_LOCAL,
101965
                                            &opal_common_ucx.opal_mem_hooks);
101965
-
101965
-        opal_common_ucx.tls  = malloc(sizeof(*opal_common_ucx.tls));
101965
-        *opal_common_ucx.tls = strdup(default_tls);
101965
-        tls_index = mca_base_var_register("opal", "opal_common", "ucx", "tls",
101965
-                                          "List of UCX transports which should be supported on the system, to enable "
101965
-                                          "selecting the UCX component. Special values: any (any available). "
101965
-                                          "A '^' prefix negates the list. "
101965
-                                          "For example, in order to exclude on shared memory and TCP transports, "
101965
-                                          "please set to '^posix,sysv,self,tcp,cma,knem,xpmem'.",
101965
-                                          MCA_BASE_VAR_TYPE_STRING, NULL, 0, 0,
101965
-                                          OPAL_INFO_LVL_3,
101965
-                                          MCA_BASE_VAR_SCOPE_LOCAL,
101965
-                                          opal_common_ucx.tls);
101965
-
101965
-        opal_common_ucx.devices  = malloc(sizeof(*opal_common_ucx.devices));
101965
-        *opal_common_ucx.devices = strdup(default_devices);
101965
-        devices_index = mca_base_var_register("opal", "opal_common", "ucx", "devices",
101965
-                                              "List of device driver pattern names, which, if supported by UCX, will "
101965
-                                              "bump its priority above ob1. Special values: any (any available)",
101965
-                                              MCA_BASE_VAR_TYPE_STRING, NULL, 0, 0,
101965
-                                              OPAL_INFO_LVL_3,
101965
-                                              MCA_BASE_VAR_SCOPE_LOCAL,
101965
-                                              opal_common_ucx.devices);
101965
         registered = 1;
101965
     }
101965
     if (component) {
101965
@@ -107,14 +75,6 @@ OPAL_DECLSPEC void opal_common_ucx_mca_var_register(const mca_base_component_t *
101965
                                       component->mca_type_name,
101965
                                       component->mca_component_name,
101965
                                       "opal_mem_hooks", 0);
101965
-        mca_base_var_register_synonym(tls_index, component->mca_project_name,
101965
-                                      component->mca_type_name,
101965
-                                      component->mca_component_name,
101965
-                                      "tls", 0);
101965
-        mca_base_var_register_synonym(devices_index, component->mca_project_name,
101965
-                                      component->mca_type_name,
101965
-                                      component->mca_component_name,
101965
-                                      "devices", 0);
101965
     }
101965
 }
101965
 
101965
@@ -163,166 +123,6 @@ OPAL_DECLSPEC void opal_common_ucx_mca_deregister(void)
101965
     opal_output_close(opal_common_ucx.output);
101965
 }
101965
 
101965
-#if HAVE_DECL_OPEN_MEMSTREAM
101965
-static bool opal_common_ucx_check_device(const char *device_name, char **device_list)
101965
-{
101965
-    char sysfs_driver_link[PATH_MAX];
101965
-    char driver_path[PATH_MAX];
101965
-    char *ib_device_name;
101965
-    char *driver_name;
101965
-    char **list_item;
101965
-    ssize_t ret;
101965
-
101965
-    /* mlx5_0:1 */
101965
-    ret = sscanf(device_name, "%m[^:]%*d", &ib_device_name);
101965
-    if (ret != 1) {
101965
-        return false;
101965
-    }
101965
-
101965
-    sysfs_driver_link[sizeof(sysfs_driver_link) - 1] = '\0';
101965
-    snprintf(sysfs_driver_link, sizeof(sysfs_driver_link) - 1,
101965
-             "/sys/class/infiniband/%s/device/driver", ib_device_name);
101965
-    free(ib_device_name);
101965
-
101965
-    driver_path[sizeof(driver_path) - 1] = '\0';
101965
-    ret = readlink(sysfs_driver_link, driver_path, sizeof(driver_path) - 1);
101965
-    if (ret < 0) {
101965
-        MCA_COMMON_UCX_VERBOSE(2, "readlink(%s) failed: %s", sysfs_driver_link,
101965
-                               strerror(errno));
101965
-        return false;
101965
-    }
101965
-
101965
-    driver_name = basename(driver_path);
101965
-    for (list_item = device_list; *list_item != NULL; ++list_item) {
101965
-        if (!fnmatch(*list_item, driver_name, 0)) {
101965
-            MCA_COMMON_UCX_VERBOSE(2, "driver '%s' matched by '%s'",
101965
-                                   driver_path, *list_item);
101965
-            return true;
101965
-        }
101965
-    }
101965
-
101965
-    return false;
101965
-}
101965
-#endif
101965
-
101965
-OPAL_DECLSPEC opal_common_ucx_support_level_t
101965
-opal_common_ucx_support_level(ucp_context_h context)
101965
-{
101965
-    opal_common_ucx_support_level_t support_level = OPAL_COMMON_UCX_SUPPORT_NONE;
101965
-    static const char *support_level_names[] = {
101965
-        [OPAL_COMMON_UCX_SUPPORT_NONE]      = "none",
101965
-        [OPAL_COMMON_UCX_SUPPORT_TRANSPORT] = "transports only",
101965
-        [OPAL_COMMON_UCX_SUPPORT_DEVICE]    = "transports and devices"
101965
-    };
101965
-#if HAVE_DECL_OPEN_MEMSTREAM
101965
-    char *rsc_tl_name, *rsc_device_name;
101965
-    char **tl_list, **device_list, **list_item;
101965
-    bool is_any_tl, is_any_device;
101965
-    bool found_tl, negate;
101965
-    char line[128];
101965
-    FILE *stream;
101965
-    char *buffer;
101965
-    size_t size;
101965
-    int ret;
101965
-#endif
101965
-
101965
-    is_any_tl     = !strcmp(*opal_common_ucx.tls, "any");
101965
-    is_any_device = !strcmp(*opal_common_ucx.devices, "any");
101965
-
101965
-    /* Check for special value "any" */
101965
-    if (is_any_tl && is_any_device) {
101965
-        MCA_COMMON_UCX_VERBOSE(1, "ucx is enabled on any transport or device",
101965
-                               *opal_common_ucx.tls);
101965
-        support_level = OPAL_COMMON_UCX_SUPPORT_DEVICE;
101965
-        goto out;
101965
-    }
101965
-
101965
-#if HAVE_DECL_OPEN_MEMSTREAM
101965
-    /* Split transports list */
101965
-    negate  = ('^' == (*opal_common_ucx.tls)[0]);
101965
-    tl_list = opal_argv_split(*opal_common_ucx.tls + (negate ? 1 : 0), ',');
101965
-    if (tl_list == NULL) {
101965
-        MCA_COMMON_UCX_VERBOSE(1, "failed to split tl list '%s', ucx is disabled",
101965
-                               *opal_common_ucx.tls);
101965
-        goto out;
101965
-    }
101965
-
101965
-    /* Split devices list */
101965
-    device_list = opal_argv_split(*opal_common_ucx.devices, ',');
101965
-    if (device_list == NULL) {
101965
-        MCA_COMMON_UCX_VERBOSE(1, "failed to split devices list '%s', ucx is disabled",
101965
-                               *opal_common_ucx.devices);
101965
-        goto out_free_tl_list;
101965
-    }
101965
-
101965
-    /* Open memory stream to dump UCX information to */
101965
-    stream = open_memstream(&buffer, &size);
101965
-    if (stream == NULL) {
101965
-        MCA_COMMON_UCX_VERBOSE(1, "failed to open memory stream for ucx info (%s), "
101965
-                               "ucx is disabled", strerror(errno));
101965
-        goto out_free_device_list;
101965
-    }
101965
-
101965
-    /* Print ucx transports information to the memory stream */
101965
-    ucp_context_print_info(context, stream);
101965
-
101965
-    /* Rewind and read transports/devices list from the stream */
101965
-    fseek(stream, 0, SEEK_SET);
101965
-    while ((support_level != OPAL_COMMON_UCX_SUPPORT_DEVICE) &&
101965
-           (fgets(line, sizeof(line), stream) != NULL)) {
101965
-        rsc_tl_name = NULL;
101965
-        ret = sscanf(line,
101965
-                     /* "# resource 6  :  md 5  dev 4  flags -- rc_verbs/mlx5_0:1" */
101965
-                     "# resource %*d : md %*d dev %*d flags -- %m[^/ \n\r]/%m[^/ \n\r]",
101965
-                     &rsc_tl_name, &rsc_device_name);
101965
-        if (ret != 2) {
101965
-            free(rsc_tl_name);
101965
-            continue;
101965
-        }
101965
-
101965
-        /* Check if 'rsc_tl_name' is found  provided list */
101965
-        found_tl = is_any_tl;
101965
-        for (list_item = tl_list; !found_tl && (*list_item != NULL); ++list_item) {
101965
-            found_tl = !strcmp(*list_item, rsc_tl_name);
101965
-        }
101965
-
101965
-        /* Check if the transport has a match (either positive or negative) */
101965
-        assert(!(is_any_tl && negate));
101965
-        if (found_tl != negate) {
101965
-            if (is_any_device ||
101965
-                opal_common_ucx_check_device(rsc_device_name, device_list)) {
101965
-                MCA_COMMON_UCX_VERBOSE(2, "%s/%s: matched both transport and device list",
101965
-                                    rsc_tl_name, rsc_device_name);
101965
-                support_level = OPAL_COMMON_UCX_SUPPORT_DEVICE;
101965
-            } else {
101965
-                MCA_COMMON_UCX_VERBOSE(2, "%s/%s: matched transport list but not device list",
101965
-                                    rsc_tl_name, rsc_device_name);
101965
-                support_level = OPAL_COMMON_UCX_SUPPORT_TRANSPORT;
101965
-            }
101965
-        } else {
101965
-            MCA_COMMON_UCX_VERBOSE(2, "%s/%s: did not match transport list",
101965
-                                   rsc_tl_name, rsc_device_name);
101965
-        }
101965
-
101965
-        free(rsc_device_name);
101965
-        free(rsc_tl_name);
101965
-    }
101965
-
101965
-    MCA_COMMON_UCX_VERBOSE(2, "support level is %s", support_level_names[support_level]);
101965
-    fclose(stream);
101965
-    free(buffer);
101965
-
101965
-out_free_device_list:
101965
-    opal_argv_free(device_list);
101965
-out_free_tl_list:
101965
-    opal_argv_free(tl_list);
101965
-out:
101965
-#else
101965
-    MCA_COMMON_UCX_VERBOSE(2, "open_memstream() was not found, ucx is disabled");
101965
-#endif
101965
-    return support_level;
101965
-}
101965
-
101965
 void opal_common_ucx_empty_complete_cb(void *request, ucs_status_t status)
101965
 {
101965
 }
101965
diff --git a/opal/mca/common/ucx/common_ucx.h b/opal/mca/common/ucx/common_ucx.h
101965
index 92cdd738ef98..202131ac8907 100644
101965
--- a/opal/mca/common/ucx/common_ucx.h
101965
+++ b/opal/mca/common/ucx/common_ucx.h
101965
@@ -88,8 +88,6 @@ typedef struct opal_common_ucx_module {
101965
     int  progress_iterations;
101965
     int  registered;
101965
     bool opal_mem_hooks;
101965
-    char **tls;
101965
-    char **devices;
101965
 } opal_common_ucx_module_t;
101965
 
101965
 typedef struct opal_common_ucx_del_proc {
101965
@@ -97,23 +95,10 @@ typedef struct opal_common_ucx_del_proc {
101965
     size_t   vpid;
101965
 } opal_common_ucx_del_proc_t;
101965
 
101965
-typedef enum {
101965
-    /* No supported transports found (according to configured list of supported
101965
-       transports) */
101965
-    OPAL_COMMON_UCX_SUPPORT_NONE,
101965
-
101965
-    /* Have supported transports but not supported devices */
101965
-    OPAL_COMMON_UCX_SUPPORT_TRANSPORT,
101965
-
101965
-    /* Have both supported transports and supported devices */
101965
-    OPAL_COMMON_UCX_SUPPORT_DEVICE,
101965
-} opal_common_ucx_support_level_t;
101965
-
101965
 extern opal_common_ucx_module_t opal_common_ucx;
101965
 
101965
 OPAL_DECLSPEC void opal_common_ucx_mca_register(void);
101965
 OPAL_DECLSPEC void opal_common_ucx_mca_deregister(void);
101965
-OPAL_DECLSPEC opal_common_ucx_support_level_t opal_common_ucx_support_level(ucp_context_h context);
101965
 OPAL_DECLSPEC void opal_common_ucx_mca_proc_added(void);
101965
 OPAL_DECLSPEC void opal_common_ucx_empty_complete_cb(void *request, ucs_status_t status);
101965
 OPAL_DECLSPEC int opal_common_ucx_mca_pmix_fence(ucp_worker_h worker);
101965
diff --git a/opal/mca/common/ucx/configure.m4 b/opal/mca/common/ucx/configure.m4
101965
index af8628a889c6..27e07c2005b2 100644
101965
--- a/opal/mca/common/ucx/configure.m4
101965
+++ b/opal/mca/common/ucx/configure.m4
101965
@@ -18,8 +18,6 @@ AC_DEFUN([MCA_opal_common_ucx_CONFIG],[
101965
                [common_ucx_happy="yes"],
101965
                [common_ucx_happy="no"])
101965
 
101965
-    AC_CHECK_DECLS([open_memstream], [], [], [[#include <stdio.h>]])
101965
-
101965
     AS_IF([test "$common_ucx_happy" = "yes"],
101965
           [$1],
101965
           [$2])
101965
-- 
101965
2.31.1
101965