This is the mail archive of the
cluster-cvs@sourceware.org
mailing list for the cluster.
fence-agents: master - fence_vmware: Fix VMware helper script toforce stdout close
- From: Jan Friesse <honzaf at fedoraproject dot org>
- To: cluster-cvs-relay at redhat dot com
- Date: Fri, 20 Feb 2009 08:19:50 +0000 (UTC)
- Subject: fence-agents: master - fence_vmware: Fix VMware helper script toforce stdout close
Gitweb: http://git.fedorahosted.org/git/fence-agents.git?p=fence-agents.git;a=commitdiff;h=172523ace63c4c07dd8f4b24135eca2299797432
Commit: 172523ace63c4c07dd8f4b24135eca2299797432
Parent: fe01865cf8a2f8535c865c4332952863230c2718
Author: Jan Friesse <jfriesse@redhat.com>
AuthorDate: Fri Feb 20 09:19:05 2009 +0100
Committer: Jan Friesse <jfriesse@redhat.com>
CommitterDate: Fri Feb 20 09:19:05 2009 +0100
fence_vmware: Fix VMware helper script to force stdout close
This feature is advise from Jim Meyering. On the beginning
of script, we register end callback, which close stdout and
show error, if this wasn't successful.
---
fence/agents/vmware/fence_vmware_helper.pl | 9 +++++++++
1 files changed, 9 insertions(+), 0 deletions(-)
diff --git a/fence/agents/vmware/fence_vmware_helper.pl b/fence/agents/vmware/fence_vmware_helper.pl
index 5715d55..815728d 100644
--- a/fence/agents/vmware/fence_vmware_helper.pl
+++ b/fence/agents/vmware/fence_vmware_helper.pl
@@ -3,6 +3,15 @@
use strict;
use warnings;
+my $ME = $0;
+
+END {
+ defined fileno STDOUT or return;
+ close STDOUT and return;
+ warn "$ME: failed to close standard output: $!\n";
+ $? ||= 1;
+}
+
my ($RELEASE_VERSION, $REDHAT_COPYRIGHT, $BUILD_DATE);
#BEGIN_VERSION_GENERATION