From 6318a0a59186c3a7e0a9f69a9caa66ab3fb0161b Mon Sep 17 00:00:00 2001
From: Achim Gsell <achim.gsell@psi.ch>
Date: Thu, 6 May 2021 14:23:55 +0200
Subject: [PATCH] modulecmd: sub-cmd avail: group argument added

It's now possible to list available modules in certain groups only.
---
 Pmodules/modulecmd.bash.in | 25 ++++++++++++++++++-------
 1 file changed, 18 insertions(+), 7 deletions(-)

diff --git a/Pmodules/modulecmd.bash.in b/Pmodules/modulecmd.bash.in
index 2534bab..fa4cf9b 100644
--- a/Pmodules/modulecmd.bash.in
+++ b/Pmodules/modulecmd.bash.in
@@ -917,18 +917,15 @@ subcommand_avail() {
 	}
 	local pattern=()
 	local output_function='human_readable_output'
-	local opt_all_groups='no'
 	local opt_use_releases="${UsedReleases}"
+	local -A opt_groups=()
+	local val=''
 	while (($# > 0)); do
 		case $1 in
-                        -H | --help )
+                        -H | --help | -\? )
                                 print_help "${subcommand}"
                                 ;;
-			-a | --all )
-				opt_all_groups='yes'
-				opt_use_releases="${PMODULES_DEFINED_RELEASES}"
-				;;
-			--all-releases )
+			-a | --all | --all-releases )
 				opt_use_releases="${PMODULES_DEFINED_RELEASES}"
 				;;
 			-h | --human )
@@ -943,6 +940,15 @@ subcommand_avail() {
 			-m | --machine )
 				output_function='machine_output'
 				;;
+			-g | --group | --group=* )
+				if [[ $1 == --group=* ]]; then
+					val="${1/--group=}"
+				else
+					val="$2"
+					shift
+				fi
+				opt_groups[${val}]=1
+				;;
 			-- | '' )
 				;;
 			* )
@@ -960,6 +966,11 @@ subcommand_avail() {
         local string
 	for string in "${pattern[@]}"; do
 		for dir in "${modulepath[@]}"; do
+			local group="${dir/${PMODULES_ROOT}\/}"
+			group="${group%%/*}"
+			if (( ${#opt_groups[@]} > 0 )) && [[ ! -v opt_groups[${group}] ]]; then
+				continue
+			fi
 			get_available_modules \
 				mods \
 				"${string}" \