#!/bin/ksh93 # IBM_PROLOG_BEGIN_TAG # This is an automatically generated prolog. # # 61haes_r714 src/43haes/lib/ksh93/hacmp/KLIB_HACMP_is_known_interface.sh 1.3 # # Licensed Materials - Property of IBM # # COPYRIGHT International Business Machines Corp. 1990,2010 # 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 # @(#)67 1.3 src/43haes/lib/ksh93/hacmp/KLIB_HACMP_is_known_interface.sh, hacmp.assist, 61haes_r714 6/10/12 15:32:32 # 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_is_known_interface =head1 VERSION Version Number: 1.3 Last Extracted: 1/31/14 04:41:44 Last Changed: 6/10/12 15:32:32 Path, Component, Release(, Level): src/43haes/lib/ksh93/hacmp/KLIB_HACMP_is_known_interface.sh, hacmp.assist, 61haes_r714 =head1 SYNOPSIS KLIB_HACMP_is_known_interface =head1 DESCRIPTION Determines if the specified interface is configured within the cluster. =head1 ARGUMENTS 1. interface [REQUIRED] [string] The label of the interface that is to searched for within the cluster. =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_is_known_interface { LINENO=2 . $HALIBROOT/log_entry "$0()" "$CL" : version=1.3, src/43haes/lib/ksh93/hacmp/KLIB_HACMP_is_known_interface.sh, hacmp.assist, 61haes_r714 : INPUTS: $* typeset interface=${1//\"/} [[ $CLMGR_LOGGING == 'med' ]] && set +x # Only trace param values #=================================== : Declare and initialize variables #=================================== typeset -i rc=$RC_UNKNOWN typeset value= if_names= if_addr= LINE= typeset name= type= nw= nettype= attr= node= ipaddr= haddr= if= typeset gname= netmask= hb_addr= site= prefix= family= remainder= #================================================== : Convert the provided interface into its network : names and aliases, as well as its IP address. #================================================== value=$(LANG=C LC_ALL=C /usr/bin/host $interface) if_addr=${value%%,*} if_addr=${if_addr##*+([[:space:]])} if_names=${value##*:} if_names=${if_names//,/} #================= : Validate input #================= if [[ -z $interface ]]; 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 #===================================================== : Make sure to use the label of the interface, since : it might have been passed in as an IP address. #===================================================== print -- "$0()[$LINENO]($SECONDS): $HAUTILS/cllsif -pcS" >>$CLMGR_TMPLOG # Always log commands $HAUTILS/cllsif -pcS |\ while read LINE; do : Handle possible IPv6 address typeset IPv6= if [[ $LINE == *\[* ]]; then IPv6=${LINE##*\[} IPv6=${IPv6%%\]*} LINE=${LINE/\[$IPv6\]/[${IPv6//:/_}]} fi print -- "$LINE" | IFS=: read name type nw nettype attr node ipaddr haddr if gname netmask hb_addr site prefix family remainder : Handle possible IPv6 address ipaddr=${ipaddr//_/:} ipaddr=${ipaddr/\[/} ipaddr=${ipaddr/\]/} for value in $interface $if_addr $if_names; do if [[ $value == @($name|$ipaddr) ]]; then rc=$RC_SUCCESS break fi done (( rc == $RC_SUCCESS )) && break done (( $rc != RC_SUCCESS )) && rc=$RC_ERROR print "odmget RC: $rc" >>$CLMGR_TMPLOG # Always log command result fi log_return_msg "$rc" "$0()" "$LINENO" return $? } # End of "KLIB_HACMP_is_known_interface()"