fence-agents: master - fence_scsi: create /var/run/cluster if necessary

rohara rohara at fedoraproject.org
Tue Mar 1 21:01:15 UTC 2011


Gitweb:        http://git.fedorahosted.org/git/fence-agents.git?p=fence-agents.git;a=commitdiff;h=078934a262d5516c234b65c1b3912789f035ebaf
Commit:        078934a262d5516c234b65c1b3912789f035ebaf
Parent:        a16b8148834dde5925bbc20465ddb8de567a9928
Author:        Ryan O'Hara <rohara at redhat.com>
AuthorDate:    Tue Mar 1 11:46:56 2011 -0600
Committer:     Ryan O'Hara <rohara at redhat.com>
CommitterDate: Tue Mar 1 15:00:44 2011 -0600

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.

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 e6f82e7..9df5c0c 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