#!/bin/ksh93
# IBM_PROLOG_BEGIN_TAG 
# This is an automatically generated prolog. 
#  
# 61haes_r714 src/43haes/lib/ksh93/hacmp/KLIB_HACMP_remove_node_from_group.sh 1.5 
#  
# Licensed Materials - Property of IBM 
#  
# Restricted Materials of IBM 
#  
# COPYRIGHT International Business Machines Corp. 2005,2012 
# 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 
# @(#)04	1.5 src/43haes/lib/ksh93/hacmp/KLIB_HACMP_remove_node_from_group.sh, hacmp.assist, 61haes_r714 6/11/12 09:03:50

# 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_remove_node_from_group

=head1 VERSION

 Version Number:  1.5
 Last Extracted:  1/31/14 04:40:15
 Last Changed:    6/11/12 09:03:50

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

=head1 SYNOPSIS

KLIB_HACMP_remove_node_from_group

=head1 DESCRIPTION

Removes the specified node from a resource group, if the last node from
a resource group is removed, then the entire resource group is removed from
the HACMP configuration.  This is as defined in libclres/clwritecf

=head1 ARGUMENTS

 1. rg [REQUIRED] [string]
    The name of the resource group that is to be modified.

 2. rmnode [REQUIRED] [string]
    The name of the node that is to be removed from the specified
    resource group.

=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_remove_node_from_group {
    LINENO=2 . $HALIBROOT/log_entry "$0()" "$CL"
    : version=1.5, src/43haes/lib/ksh93/hacmp/KLIB_HACMP_remove_node_from_group.sh, hacmp.assist, 61haes_r714
    : INPUTS: $*

    typeset rg=${1//\"/}
    typeset rmnode=${2//\"/}

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

    #===================================
    : Declare and initialize variables
    #===================================
    typeset -A newnodes
    typeset -i rc=$RC_UNKNOWN

    CL=$LINENO KLIB_HACMP_get_group_policy $rg startup fallover fallback
    (( $? != RC_SUCCESS )) && rc=$RC_ERROR

    if (( $rc == RC_UNKNOWN )); then
        CL=$LINENO KLIB_HACMP_get_group_nodes $rg nodes
        (( $? != RC_SUCCESS )) && rc=$RC_ERROR
    fi

    if (( $rc == RC_UNKNOWN )); then
        for node in $nodes; do
            if [[ "$rmnode" != "$node" ]]; then
                newnodes[$node]=:
            fi
        done

        print "$0()[$LINENO]($SECONDS): $HAUTILS/clchgrp -g $rg -n \"${!newnodes[*]}\" -S $startup -O $fallover -B $fallback" >>$CLMGR_TMPLOG  # Always log commands
        $HAUTILS/clchgrp -g $rg -n "${!newnodes[*]}" -S $startup -O $fallover -B $fallback
        rc=$?
        print "clchgrp RC: $rc" >>$CLMGR_TMPLOG  # Always log command result
        (( $rc != RC_SUCCESS )) && rc=$RC_ERROR
    fi

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