test/mpi: Add non-collective sessions init test

Add a test to verify the non-collective behavior of
MPI_Session_init. First, run a collective init/finalize sequence over
all launched processes. Second, try to re-initialize and finalize a new
session from just a single process.

Author: raffenet

test/mpi/.gitignore

@@ -1530,6 +1530,7 @@
 /session/session_psets
 /session/session_self
 /session/session_bsend
+/session/session_non_coll
 /spawn/concurrent_spawns
 /spawn/disconnect
 /spawn/disconnect2

test/mpi/session/Makefile.am

@@ -16,7 +16,8 @@ noinst_PROGRAMS = \
     session_re_init \
     session_psets \
     session_self \
-    session_bsend
+    session_bsend \
+    session_non_coll
 
 session_mult_init_SOURCES = session.c
 session_mult_init_CPPFLAGS = -DMULT_INIT $(AM_CPPFLAGS)

test/mpi/session/session_non_coll.c

@@ -0,0 +1,30 @@
+/*
+ * Copyright (C) by Argonne National Laboratory
+ *     See COPYRIGHT in top-level directory
+ */
+
+#include "mpi.h"
+#include "stdio.h"
+
+int main(int argc, char *argv[])
+{
+    int ret;
+    MPI_Session session;
+    MPI_Group group;
+    int rank;
+
+    MPI_Session_init(MPI_INFO_NULL, MPI_ERRORS_ABORT, &session);
+    MPI_Group_from_session_pset(session, "mpi://world", &group);
+    MPI_Group_rank(group, &rank);
+    MPI_Group_free(&group);
+    MPI_Session_finalize(&session);
+
+    /* second init from a single process to verify non-collective behavior */
+    if (rank == 0) {
+        MPI_Session_init(MPI_INFO_NULL, MPI_ERRORS_RETURN, &session);
+        MPI_Session_finalize(&session);
+        printf("No Errors\n");
+    }
+
+    return 0;
+}

test/mpi/session/testlist

@@ -5,3 +5,4 @@ session_re_init 4
 session_psets 1
 session_self 1
 session_bsend 2
+session_non_coll 4