cluster: RHEL6 - fence_scsi: create /var/run/cluster if necessary

Fabio M. Di Nitto fabbione at fedoraproject.org
Mon May 23 14:17:40 UTC 2011


Gitweb:        http://git.fedorahosted.org/git/cluster.git?p=cluster.git;a=commitdiff;h=c83bad4dc6824463e455ed886f00d14a118f7e5f
Commit:        c83bad4dc6824463e455ed886f00d14a118f7e5f
Parent:        c2921da56ca003c30fc5af54b5bd65cd8131a5d6
Author:        Ryan O'Hara <rohara at redhat.com>
AuthorDate:    Tue Mar 1 11:46:56 2011 -0600
Committer:     Fabio M. Di Nitto <fdinitto at redhat.com>
CommitterDate: Mon May 23 16:17:03 2011 +0200

fence_scsi: create /var/run/cluster if necessary

Before writing to fence_scsi.key or fence_scsi.dev, check to see if
/var/run/cluster directory exists. If not, create it.

Resolves: rhbz#673575

Signed-off-by: Ryan O'Hara <rohara at redhat.com>
---
 fence/agents/scsi/fence_scsi.pl |    9 +++++++++
 1 files changed, 9 insertions(+), 0 deletions(-)

diff --git a/fence/agents/scsi/fence_scsi.pl b/fence/agents/scsi/fence_scsi.pl
index 591dc66..2751bed 100644
--- a/fence/agents/scsi/fence_scsi.pl
+++ b/fence/agents/scsi/fence_scsi.pl
@@ -2,6 +2,7 @@
 
 use Cwd 'realpath';
 use File::Basename;
+use File::Path;
 use Getopt::Std;
 use POSIX;
 
@@ -359,6 +360,10 @@ sub dev_write ($)
     my $file = "/var/run/cluster/fence_scsi.dev";
     my $dev = shift;
 
+    if (! -d "/var/run/cluster") {
+	mkpath ("/var/run/cluster");
+    }
+
     open (\*FILE, ">>$file") or die "$!\n";
     print FILE "$dev\n";
     close (FILE);
@@ -385,6 +390,10 @@ sub key_write ($)
     my $file = "/var/run/cluster/fence_scsi.key";
     my $key = shift;
 
+    if (! -d "/var/run/cluster") {
+	mkpath ("/var/run/cluster");
+    }
+
     open (\*FILE, ">$file") or die "$!\n";
     print FILE "$key\n";
     close (FILE);


More information about the cluster-commits mailing list