From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 27993 invoked by alias); 2 Sep 2008 22:27:42 -0000 Received: (qmail 27987 invoked by alias); 2 Sep 2008 22:27:42 -0000 X-Spam-Status: No, hits=0.6 required=5.0 tests=AWL,BAYES_20,KAM_MX,SPF_HELO_PASS X-Spam-Check-By: sourceware.org X-Spam-Checker-Version: SpamAssassin 3.2.4 (2008-01-01) on bastion.fedora.phx.redhat.com X-Spam-Level: Subject: master - fence: fixed a fence storm with fence_egenera To: cluster-cvs-relay@redhat.com X-Project: Cluster Project X-Git-Module: cluster.git X-Git-Refname: refs/heads/master X-Git-Reftype: branch X-Git-Oldrev: ecfea14dcceefd01564f42712d81e10cbdea9a76 X-Git-Newrev: 5c4bb52cd4aa851afade847e2f3251205d6d7ee8 From: Chris Feist Message-Id: <20080902222645.102D6C07B7@lists.fedorahosted.org> Date: Tue, 02 Sep 2008 22:28:00 -0000 X-Scanned-By: MIMEDefang 2.58 on 172.16.52.254 Mailing-List: contact cluster-cvs-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Post: List-Help: , Sender: cluster-cvs-owner@sourceware.org X-SW-Source: 2008-q3/txt/msg00365.txt.bz2 Gitweb: http://git.fedorahosted.org/git/cluster.git?p=cluster.git;a=commitdiff;h=5c4bb52cd4aa851afade847e2f3251205d6d7ee8 Commit: 5c4bb52cd4aa851afade847e2f3251205d6d7ee8 Parent: ecfea14dcceefd01564f42712d81e10cbdea9a76 Author: Chris Feist AuthorDate: Wed Aug 27 13:50:06 2008 -0500 Committer: Chris Feist CommitterDate: Tue Sep 2 17:23:47 2008 -0500 fence: fixed a fence storm with fence_egenera 4.8 - bz#437867 4.7.z - bz#459501 Committed on behalf of Jim Parsons (jparsons@redhat.com) --- fence/agents/egenera/fence_egenera.pl | 9 ++++++++- 1 files changed, 8 insertions(+), 1 deletions(-) diff --git a/fence/agents/egenera/fence_egenera.pl b/fence/agents/egenera/fence_egenera.pl index 6970a13..30607fe 100644 --- a/fence/agents/egenera/fence_egenera.pl +++ b/fence/agents/egenera/fence_egenera.pl @@ -284,7 +284,8 @@ sub pserver_shutdown { my $rtrn=1; local *egen_log; - open(egen_log,">/tmp/eglog"); + open(egen_log,">>/tmp/eglog"); + print egen_log "Attempting shutdown at ".`date`."\n"; for (my $trys=0; $trys<20; $trys++) { last if (pserver_status != 0); @@ -303,6 +304,12 @@ sub pserver_shutdown # do I need to do anything here? # We'll just wait for now } + elsif (/^Booting/) + { + # Server is already on the way back up. Do nothing + $rtrn=0; + last; + } elsif (/^Booted\(KDB\)/ || /^Debugging/ ) { print egen_log "shutdown: crash dump being performed. Waiting\n";