X-Git-Url: http://git.onelab.eu/?a=blobdiff_plain;f=factory%2Fnfsmount;fp=factory%2Fnfsmount;h=0000000000000000000000000000000000000000;hb=b81d4faa0fd65a42ae4a9a0191b4684d3aa7ff62;hp=04115dce12c00a6c02fb1c7bcdfd604e96b47156;hpb=8d38d04aebf97cd4f5a9bc8d1c6586b3daef4685;p=vsys.git

diff --git a/factory/nfsmount b/factory/nfsmount
deleted file mode 100755
index 04115dc..0000000
--- a/factory/nfsmount
+++ /dev/null
@@ -1,51 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-
-my $slicename=$ARGV[0];
-my $already_mounted_testfile = "/tmp/$slicename"."_nfsmounted";
-
-my $slice_dir="/vservers/$slicename/";
-
-if (-f $already_mounted_testfile) {
-	die("Sorry, only one successful NFS mount allowed per slice!");
-}
-
-my $remotepath = <STDIN>;
-my $localpath = <STDIN>;
-chomp($localpath);
-chomp($remotepath);
-$localpath=~s/\.\.//g;
-
-$localpath=$slice_dir.$localpath;
-
-unless (-d $localpath) {
-	die("Localpath does not exist, please create it first.");
-}
-
-my $hostexpr="(?=^.{1,254}$)(^(?:(?!\d+\.|-)[a-zA-Z0-9_\-]{1,63}(?<!-)\.?)+(?:[a-zA-Z]{2,})$)";
-my $pathexpr="\/?[\w\d]+\/[\w\d]*\/?";
-my $nfshost;
-my $nfspath;
-
-($nfshost,$nfspath)=split ':',$remotepath;
-
-if ($nfshost!~/(?=^.{1,254}$)(^(?:(?!\d+\.|-)[a-zA-Z0-9_\-]{1,63}(?<!-)\.?)+(?:[a-zA-Z]{2,})$)/) {
-	die("The hostname $nfshost does not seem to be right.");
-}
-
-if ($nfspath!~/^(((\.\.){1}\/)*|(\/){1})?(([a-zA-Z0-9]*)\/)*([a-zA-Z0-9]*)+$/) {
-	die("The remote path $nfspath does not seem to be right.");
-} 
-
-my $mntcmd="/bin/mount $remotepath $localpath";
-system($mntcmd);
-
-if ($?) {
-    print "Mount failed: $?";
-}
-else {
-    open FIL, ">$already_mounted_testfile";
-    print FIL "$remotepath $localpath";
-    close FIL;
-}