#!/bin/ksh93 # ALTRAN_PROLOG_BEGIN_TAG # This is an automatically generated prolog. # # Copyright (C) Altran ACT S.A.S. 2020,2021. All rights reserved. # # ALTRAN_PROLOG_END_TAG # # IBM_PROLOG_BEGIN_TAG # This is an automatically generated prolog. # # 61haes_r714 src/43haes/lib/ksh93/hacmp/KLIB_HACMP_delete_service_ip.sh 1.3 # # Licensed Materials - Property of IBM # # Restricted Materials of IBM # # COPYRIGHT International Business Machines Corp. 2006,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 # @(#) 7d4c34b 43haes/lib/ksh93/hacmp/KLIB_HACMP_delete_service_ip.sh, 726, 2147A_aha726, Feb 05 2021 09:50 PM # Start of POD-formatted documentation. Viewing suggestions: # perldoc # pod2text -c # pod2text -c --code # pod2html function devDoc { : <<'=cut' >/dev/null 2>&1 =head1 NAME KLIB_HACMP_delete_service_ip =head1 VERSION Version Number: 1.3 Last Extracted: 1/31/14 04:40:43 Last Changed: 6/10/12 15:11:39 Path, Component, Release(, Level): src/43haes/lib/ksh93/hacmp/KLIB_HACMP_delete_service_ip.sh, hacmp.assist, 61haes_r714 =head1 SYNOPSIS clmgr delete service_ip {[,,,...] | ALL} =head1 DESCRIPTION Removes one or more shared or node-bound service IP from the cluster configuration. =head1 ARGUMENTS 1. service_ips [REQUIRED] [string] One or more (comma or space separated) service IPs to attempt to delete. =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_service_ip { LINENO=2 . $HALIBROOT/log_entry "$0()" "$CL" : version=@(#) 7d4c34b 43haes/lib/ksh93/hacmp/KLIB_HACMP_delete_service_ip.sh, 726, 2147A_aha726, Feb 05 2021 09:50 PM : INPUTS: $* typeset service_ips=${1//\"/} service_ips=${service_ips//,/ } [[ $CLMGR_LOGGING == 'med' ]] && set +x # Only trace param values #=================================== : Declare and initialize variables #=================================== typeset -i rc=$RC_UNKNOWN typeset -i i=0 typeset service_ip= #================================================================ : Check for a defined cluster. No need to continue without one. #================================================================ CL=$LINENO isClusterDefined if (( $? != RC_SUCCESS )); then rc=$RC_MISSING_DEPENDENCY #================= : Validate input #================= elif [[ -z $service_ips ]]; 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 else typeset -u uctext=$service_ips if [[ $uctext == "ALL" ]]; then service_ips= typeset available CL=$LINENO KLIB_HACMP_list_service_ip available for (( i=0; i<${#available[*]}; i++ )); do service_ips="$service_ips ${available[$i]}" done if [[ $service_ips == *([[:space:]]) ]]; then /usr/bin/dspmsg -s $CLVT_SET $CLVT_MSGS 331 "Warning: there are no service IPs to delete.\n" rc=$RC_SUCCESS fi fi fi #============================================================== : Delete the service IP if no input errors have been detected #============================================================== if (( $rc == RC_UNKNOWN )); then for service_ip in $service_ips; do #================================================================== : If the service_ip is in IP address format, convert to its label. : clrmnode will not accept a service_ip in address format. #================================================================== if [[ $service_ip == *@(\.|:)* ]]; then service_ip=$($HAUTILS/clodmget -q identifier=$service_ip -n -f ip_label HACMPadapter) fi CL=$LINENO KLIB_HACMP_is_known_service_ip "$service_ip" if (( $? != RC_SUCCESS )); then /usr/bin/dspmsg -s $CLVT_SET $CLVT_MSGS 102 "\nERROR: \"%1\$s\" does not appear to exist!\n\n" "$service_ip" 1>&2 /usr/bin/dspmsg -s $CLVT_SET $CLVT_MSGS 156 "Available Service IPs:\n\n" 1>&2 typeset available CL=$LINENO KLIB_HACMP_list_service_ip 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 print -- "$0()[$LINENO]($SECONDS): $HAUTILS/clrmnode -a \"$service_ip\"" >>$CLMGR_TMPLOG # Always log commands $HAUTILS/clrmnode -a "$service_ip" rc=$? if (( $rc != RC_SUCCESS )); then rc=$RC_ERROR /usr/bin/dspmsg -s $CLVT_SET $CLVT_MSGS 300 "\nERROR: failed to delete \"%1\$s\".\n\n" "$service_ip" 1>&2 break fi 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 service_ip -h" "SERVICE IP/LABEL:" "$CLVT_PROGNAME" 1>&2 fi log_return_msg "$rc" "$0()" "$LINENO" return $? } # End of "KLIB_HACMP_delete_service_ip()"