fence-agents: master - fence_mcdata: Fix unexpected port state

fence-agents: master - fence_mcdata: Fix unexpected port state

[Jan Friesse]

Gitweb:        http://git.fedorahosted.org/git/fence-agents.git?p=fence-agents.git;a=commitdiff;h=01dd364e60046856b3d46d0d6c9df822d3178aff
Commit:        01dd364e60046856b3d46d0d6c9df822d3178aff
Parent:        a57dc167d4b8e7fb38360d95b97b4a26f09d1bae
Author:        Jan Friesse <jfriesse@redhat.com>
AuthorDate:    Wed Mar 4 15:29:31 2009 +0100
Committer:     Jan Friesse <jfriesse@redhat.com>
CommitterDate: Wed Mar 4 15:29:31 2009 +0100

fence_mcdata: Fix unexpected port state

Current versions of fence_mcdata wait for "Blocked:
(true|false)", but newer models (like Sphereon 4500) return
"Blocked:  (Blocked|Unblocked)" on the port show command.

The attached patch adds the necessary bits to make the
script recognize that it has indeed done the request action.

This patch long lives in RHEL 4 branch, but never
arrived to RHEL5/master/STABLE2/STABLE3.

RHBZ#470983
---
 fence/agents/mcdata/fence_mcdata.pl |    4 +++-
 1 files changed, 3 insertions(+), 1 deletions(-)

diff --git a/fence/agents/mcdata/fence_mcdata.pl b/fence/agents/mcdata/fence_mcdata.pl
index 96ab681..7a01d1d 100644
--- a/fence/agents/mcdata/fence_mcdata.pl
+++ b/fence/agents/mcdata/fence_mcdata.pl
@@ -265,7 +265,9 @@ foreach my $line (@lines)
    }
    next unless ( $field eq "Blocked" );
    if ( ($block && $b_state eq "true") ||
-        (!$block && $b_state eq "false") )
+        (!$block && $b_state eq "false") ||
+        ($block && $b_state eq "Blocked") ||
+        (!$block && $b_state eq "Unblocked") )
    {
       $fail = 0;
    }