#!/bin/ksh93
# IBM_PROLOG_BEGIN_TAG 
# This is an automatically generated prolog. 
#  
# 61haes_r714 src/43haes/lib/ksh93/hacmp/KLIB_HACMP_delete_group.sh 1.2 
#  
# Licensed Materials - Property of IBM 
#  
# COPYRIGHT International Business Machines Corp. 2011 
# All Rights Reserved 
#  
# US Government Users Restricted Rights - Use, duplication or 
# disclosure restricted by GSA ADP Schedule Contract with IBM Corp. 
#  
# IBM_PROLOG_END_TAG 
# @(#)06	1.2  src/43haes/lib/ksh93/hacmp/KLIB_HACMP_delete_group.sh, hacmp.assist, 61haes_r714 6/10/12 15:11:27

# Start of POD-formatted documentation. Viewing suggestions:
#      perldoc <FILENAME>
#      pod2text -c <FILENAME>
#      pod2text -c --code <FILENAME>
#      pod2html <FILENAME>
function devDoc {
    : <<'=cut' >/dev/null 2>&1

=head1 NAME

KLIB_HACMP_delete_group

=head1 VERSION

 Version Number:  1.2
 Last Extracted:  1/31/14 04:41:57
 Last Changed:    6/10/12 15:11:27

 Path, Component, Release(, Level):
 src/43haes/lib/ksh93/hacmp/KLIB_HACMP_delete_group.sh, hacmp.assist, 61haes_r714

=head1 SYNOPSIS

 clmgr delete group <group_name> \
             [ RESOURCE_GROUP=<resource_group> ] \
             [ REGSITRY={files|LDAP} ]

=head1 DESCRIPTION

 Deletes one or more AIX groups from either all the cluster
 nodes, or from those nodes that the specified resource
 group can run on.

=head1 ARGUMENTS

 1. groups [REQUIRED] [string]
    One or more (comma or space separated) groups to attempt
    to delete.

 2. rg [OPTIONAL] [string]
    A resource group label that, if provided, will be used to
    limit which nodes the groups will be removed from.

 3. registry [OPTIONAL] [set]
    Specifies which registry to remove the user from, FILES or LDAP.

=head1 RETURN

 0: no errors were detected; the operation appears to have been successful
 1: a general error has occurred
 2: a specified resource does not exist, or could not be found
 3: some required input was missing
 4: some detected input was incorrect in some way
 5: a required dependency does not exist
 6: a specified search failed to match any data

=head1 COPYRIGHT

COPYRIGHT International Business Machines Corp. 2005,2010
All Rights Reserved

=cut
} # End of POD-formatted documentation.


function KLIB_HACMP_delete_group {
    LINENO=2 . $HALIBROOT/log_entry "$0()" "$CL"
    : version=1.2, src/43haes/lib/ksh93/hacmp/KLIB_HACMP_delete_group.sh, hacmp.assist, 61haes_r714
    : INPUTS: $*

    typeset groups=${1//\"/}
            groups=${groups//,/ }
    typeset rg=${2//\"/}
    typeset registry=${3//\"/}

    [[ $CLMGR_LOGGING == 'med' ]] && set +x  # Only trace param values

    #===================================
    : Declare and initialize variables
    #===================================
    typeset -i rc=$RC_UNKNOWN
    typeset -i i=0
    typeset group=

    #=================
    : Validate input
    #=================
    if [[ -z $groups ]]; then
        /usr/bin/dspmsg -s $CLVT_SET $CLVT_MSGS 100 "\nERROR: a name/label must be provided.\n\n" 1>&2
        rc=$RC_MISSING_INPUT
    fi

    if [[ $rg != *([[:space:]]) ]]; then
        CL=$LINENO KLIB_HACMP_is_known_rg $rg
        if (( $? != RC_SUCCESS )); then
            /usr/bin/dspmsg -s $CLVT_SET $CLVT_MSGS 102 "\nERROR: \"%1\$s\" does not appear to exist!\n\n" "$rg" 1>&2
            /usr/bin/dspmsg -s $CLVT_SET $CLVT_MSGS 154 "Available Resource Groups:\n\n" 1>&2

            typeset available
            CL=$LINENO KLIB_HACMP_list_resourcegroups available
            for (( i=0; i<${#available[*]}; i++ )); do
                if [[ ${available[$i]} != *([[:space:]]) ]]; then
                    print -u2 "\t${available[$i]}"
                fi
            done
            print -u2 ""

            rc=$RC_NOT_FOUND
        fi
    fi

    if [[ $registry != *([[:space:]]) ]]; then
        typeset -u registryUC=$registry
        case $registryUC in
            LD*) registry=LDAP  ;;
            LO*) registry=files ;;
             F*) registry=files ;;
              *) /usr/bin/dspmsg -s $CLVT_SET $CLVT_MSGS 110 '\nERROR: invalid value specified for "%1$s":  "%2$s".\n' REGISTRY "$registry" 1>&2
                 rc=$RC_INCORRECT_INPUT
              ;;
        esac
    fi

    #========================================================
    : Delete the group if no input errors have been detected
    #========================================================
    if (( $rc == RC_UNKNOWN )); then
        for group in $groups; do

            CL=$LINENO KLIB_HACMP_is_known_group "$group"
            if (( $? != RC_SUCCESS )); then
                /usr/bin/dspmsg -s $CLVT_SET $CLVT_MSGS 102 "\nERROR: \"%1\$s\" does not appear to exist!\n\n" "$group" 1>&2
                /usr/bin/dspmsg -s $CLVT_SET $CLVT_MSGS 161 "Available Groups:\n\n" 1>&2

                typeset available
                CL=$LINENO KLIB_HACMP_list_groups available
                for (( i=0; i<${#available[*]}; i++ )); do
                    if [[ ${available[$i]} != *([[:space:]]) ]]; then
                        print -u2 "\t${available[$i]}"
                    fi
                done
                rc=$RC_NOT_FOUND

            else
                typeset rgOpt=
                [[ $rg != *([[:space:]]) ]] && rgOpt=" -cspoc-g $rg"

                typeset -u source=
                if [[ $registry == *([[:space:]]) ]]; then
                    source=$(/usr/sbin/lsgroup -R LDAP -a registry $group 2>>$CLMGR_TMPLOG)
                    source=${source##*=}
                    [[ -n $source ]] && registry=$source

                    source=$(/usr/sbin/lsgroup -R files -a registry $group 2>>$CLMGR_TMPLOG)
                    source=${source##*=}
                    if [[ -n $source ]]; then
                        [[ -n $registry ]] && registry="$registry "
                        registry="$registry$source"
                    fi
                fi

                typeset -i cmd_rc=$RC_UNKNOWN
                for source in $registry; do
                    if [[ $source == "LDAP" ]]; then
                        print -- "$0()[$LINENO]($SECONDS): mode=LDAP $HACSPOC/fix_args nop cl_rmgroup$rgOpt \"$group\"" >>$CLMGR_TMPLOG  # Always log commands
                        mode=LDAP $HACSPOC/fix_args nop cl_rmgroup$rgOpt "$group"
                    else
                        print -- "$0()[$LINENO]($SECONDS): $HACSPOC/fix_args nop cl_rmgroup$rgOpt \"$group\"" >>$CLMGR_TMPLOG  # Always log commands
                        $HACSPOC/fix_args nop cl_rmgroup$rgOpt "$group"
                    fi
                    cmd_rc=$?
                    print -- "$0()[$LINENO]($SECONDS): cl_rmgroup RC: $cmd_rc" >>$CLMGR_TMPLOG

                    if (( $cmd_rc != RC_SUCCESS )); then
                        rc=$RC_ERROR
                        /usr/bin/dspmsg -s $CLVT_SET $CLVT_MSGS 300 "\nERROR: failed to delete \"%1\$s\".\n\n" "$group" 1>&2
                        break
                    else
                        (( $rc != $RC_ERROR )) && rc=$cmd_rc
                    fi
                done
            fi
        done

        (( $rc != RC_SUCCESS )) && print -u2
    fi

    #=======================================================================
    : If a user input error was detected, provide some helpful suggestions
    #=======================================================================
    if (( $rc == RC_MISSING_INPUT || $rc == RC_INCORRECT_INPUT )) && \
       [[ $CLVT_GUI == *([[:space:]]) ]]
    then
        CL=$LINENO cl_dspmsg -s $CLVT_SET $CLVT_MSGS 104 "For more information about available options and syntax, try\n\"$HAUTILS/clmgr %1\$s\". As an\nalternative, if the PowerHA SystemMirror man pages have been installed, invoke\n\"$HAUTILS/clmgr -hv\" (or \"/usr/bin/man clmgr\"),\nsearching for \"%2\$s\" in the displayed text.\n\n" \
        "delete group -h" "GROUP:" "$CLVT_PROGNAME" 1>&2
    fi

    log_return_msg "$rc" "$0()" "$LINENO"
    return $?
} # End of "KLIB_HACMP_delete_group()"