smsc/xpmem: retry with page upper bound if aligned range cannot be ma…

…pped

The aligned range computed in mca_smsc_xpmem_map_peer_region may
reach past the end of the stack, which may cause the mapping to fail.
Retrying with an actual page as upper bound has a better chance to succeed.

Signed-off-by: Joseph Schuchart <[email protected]>

opal/mca/smsc/xpmem/smsc_xpmem_module.c

@@ -23,6 +23,7 @@
 #include "opal/mca/smsc/base/base.h"
 #include "opal/mca/smsc/xpmem/smsc_xpmem_internal.h"
 #include "opal/util/minmax.h"
+#include "opal/util/sys_limits.h"
 
 OBJ_CLASS_INSTANCE(mca_smsc_xpmem_endpoint_t, opal_object_t, NULL, NULL);
 
@@ -157,8 +158,14 @@ void *mca_smsc_xpmem_map_peer_region(mca_smsc_endpoint_t *endpoint, uint64_t fla
 
             reg->rcache_context = xpmem_attach(xpmem_addr, bound - base, NULL);
             if (OPAL_UNLIKELY((void *) -1 == reg->rcache_context)) {
-                OBJ_RELEASE(reg);
-                return NULL;
+                /* retry with the page as upper bound */
+                bound = OPAL_ALIGN((uintptr_t) remote_ptr + size, opal_getpagesize(), uintptr_t);
+                reg->bound = (unsigned char *) bound;
+                reg->rcache_context = xpmem_attach(xpmem_addr, bound - base, NULL);
+                if (OPAL_UNLIKELY((void *) -1 == reg->rcache_context)) {
+                    OBJ_RELEASE(reg);
+                    return NULL;
+                }
             }
 
             opal_memchecker_base_mem_defined(reg->rcache_context, bound - base);
@@ -307,5 +314,5 @@ mca_smsc_xpmem_module_t mca_smsc_xpmem_module = {
         .copy_from = mca_smsc_xpmem_copy_from,
         .map_peer_region = mca_smsc_xpmem_map_peer_region,
         .unmap_peer_region = mca_smsc_xpmem_unmap_peer_region,
-    }, 
+    },
 };