ch4/wait: Optimize wait when requests are local

Optimize progress for a batch of local communication requests by
skipping netmod progress. Shows a 5-10% improvement in ch4/shm
bandwidth measurements on a single node of Cascade Lake.

Author: raffenet

src/mpid/ch4/src/ch4_wait.h

@@ -11,18 +11,23 @@
 MPL_STATIC_INLINE_PREFIX void MPIDI_set_progress_vci(MPIR_Request * req,
                                                      MPID_Progress_state * state)
 {
-    state->flag = MPIDI_PROGRESS_ALL;   /* TODO: check request is_local/anysource */
+    state->flag = MPIDI_PROGRESS_ALL;   /* TODO: check request anysource */
 
     int vci = MPIDI_Request_get_vci(req);
 
     state->vci_count = 1;
     state->vci[0] = vci;
+
+    if (MPIDI_REQUEST(req, is_local)) {
+        state->flag &= ~MPIDI_PROGRESS_NM;
+    }
 }
 
 MPL_STATIC_INLINE_PREFIX void MPIDI_set_progress_vci_n(int n, MPIR_Request ** reqs,
                                                        MPID_Progress_state * state)
 {
-    state->flag = MPIDI_PROGRESS_ALL;   /* TODO: check request is_local/anysource */
+    state->flag = MPIDI_PROGRESS_ALL;   /* TODO: check request anysource */
+    bool nm_progress = false;
 
     int idx = 0;
     for (int i = 0; i < n; i++) {
@@ -45,8 +50,17 @@ MPL_STATIC_INLINE_PREFIX void MPIDI_set_progress_vci_n(int n, MPIR_Request ** re
         if (!found) {
             state->vci[idx++] = vci;
         }
+#ifndef MPIDI_CH4_DIRECT_NETMOD
+        nm_progress |= !MPIDI_REQUEST(reqs[i], is_local);
+#else
+        nm_progress = true;
+#endif
     }
     state->vci_count = idx;
+
+    if (!nm_progress) {
+        state->flag &= ~MPIDI_PROGRESS_NM;
+    }
 }
 
 /* MPID_Test, MPID_Testall, MPID_Testany, MPID_Testsome */