From 1014650f0fe9a424ac3382d565b6dbfe5785475f Mon Sep 17 00:00:00 2001
From: Rich Graham <richardg@mellanox.com>
Date: Fri, 13 Feb 2004 16:41:53 +0000
Subject: [PATCH] implement mpi_group_rank mpi_group_size.

This commit was SVN r781.
---
 src/mpi/group/group.h            | 21 +++++++++++++++++++++
 src/mpi/interface/c/group_rank.c |  2 ++
 src/mpi/interface/c/group_size.c |  2 ++
 3 files changed, 25 insertions(+)

diff --git a/src/mpi/group/group.h b/src/mpi/group/group.h
index 5a1479b446..4f98ed09b5 100644
--- a/src/mpi/group/group.h
+++ b/src/mpi/group/group.h
@@ -57,4 +57,25 @@ int lam_group_init(void);
  */
 int lam_group_finalize(void);
 
+/**
+ * Get group size
+ *
+ * @param group Pointer to lam_group_t structute (IN)
+ *
+ * @return Group size
+ */
+static inline int lam_group_size(lam_group_t *group){
+    return group->grp_proc_count;
+}
+
+/**
+ * Get group rank
+ *
+ * @param group Pointer to lam_group_t structute (IN)
+ *
+ * @return Group rank
+ */
+static inline int lam_group_rank(lam_group_t *group){
+    return group->grp_proc_count;
+}
 #endif /* LAM_GROUP_H */
diff --git a/src/mpi/interface/c/group_rank.c b/src/mpi/interface/c/group_rank.c
index 439a5675fa..e64f7272e9 100644
--- a/src/mpi/interface/c/group_rank.c
+++ b/src/mpi/interface/c/group_rank.c
@@ -6,11 +6,13 @@
 
 #include "mpi.h"
 #include "mpi/interface/c/bindings.h"
+#include "mpi/group/group.h"
 
 #if LAM_HAVE_WEAK_SYMBOLS && LAM_PROFILING_DEFINES
 #pragma weak MPI_Group_rank = PMPI_Group_rank
 #endif
 
 int MPI_Group_rank(MPI_Group group, int *rank) {
+    *rank=lam_group_rank((lam_group_t *)group);
     return MPI_SUCCESS;
 }
diff --git a/src/mpi/interface/c/group_size.c b/src/mpi/interface/c/group_size.c
index 216d7e6e4c..53fefb13ee 100644
--- a/src/mpi/interface/c/group_size.c
+++ b/src/mpi/interface/c/group_size.c
@@ -6,11 +6,13 @@
 
 #include "mpi.h"
 #include "mpi/interface/c/bindings.h"
+#include "mpi/group/group.h"
 
 #if LAM_HAVE_WEAK_SYMBOLS && LAM_PROFILING_DEFINES
 #pragma weak MPI_Group_size = PMPI_Group_size
 #endif
 
 int MPI_Group_size(MPI_Group group, int *size) {
+    *size=lam_group_size((lam_group_t *)group);
     return MPI_SUCCESS;
 }