git.lirion.de

Of git, get, and gud

summaryrefslogtreecommitdiffstats
path: root/nagios-plugins-contrib-24.20190301~bpo9+1/debian/patches/check_nfsmounts/nfs_write_location
blob: feb3e237620d64fb0fec06c2c3747b8c3ea36c81 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
--- a/check_nfsmounts/check_nfsmounts
+++ b/check_nfsmounts/check_nfsmounts
@@ -45,6 +45,7 @@
 }
 
 use Time::HiRes qw{time alarm};
+use Sys::Hostname;
 use Getopt::Long;
 use strict;
 
@@ -129,7 +130,8 @@
   if($pid==0) {
     chdir $dir or &bad_mount($dir,$!);
     if($writemode and exists($mountmodes{$dir}->{"rw"})) {
-      open X,"> $dir/.nfscheck" or exit $?;
+      my $check_filename="$dir/.nfscheck_" . hostname;
+      open X,"> $check_filename" or exit $?;
       print X $ENV{HOSTNAME}."\n".localtime()."\n"; # XXX Full disk may fail..
       close X or exit $?;
     }