diff options
Diffstat (limited to 'nfs_wizard/scripts')
| -rw-r--r-- | nfs_wizard/scripts/NFSConf.pm | 67 | ||||
| -rwxr-xr-x | nfs_wizard/scripts/do_it_nfs.sh | 52 |
2 files changed, 0 insertions, 119 deletions
diff --git a/nfs_wizard/scripts/NFSConf.pm b/nfs_wizard/scripts/NFSConf.pm deleted file mode 100644 index 580aa9ef..00000000 --- a/nfs_wizard/scripts/NFSConf.pm +++ /dev/null @@ -1,67 +0,0 @@ -#!/usr/bin/perl - -# Drakwizard - -# Copyright (C) 2002 MandrakeSoft Arnaud Desmons (adesmons@mandrakesoft.com) -# -# This program is free software; you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2, or (at your option) -# any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with this program; if not, write to the Free Software -# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. - -package NFSConf; -use lib "/usr/lib/libDrakX"; -require "__WIZ_HOME__/common/scripts/Vareqval.pm"; -require "__WIZ_HOME__/common/scripts/IFCFG.pm"; -use MDK::Common; -use services; -use strict; - -my $o = IFCFG->new(); - -sub network_mask { - my $wiz_ip_server = $o->itf_get("IPADDR"); - my $mask = $o->itf_get("NETMASK"); - $mask = $mask ? $mask : "255.255.255.0"; - $wiz_ip_server = $wiz_ip_server ? $wiz_ip_server : "192.168.1.0"; - "$1.$2.$3.0/$mask" if $wiz_ip_server =~ /(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})/; -} - -sub chooser { - $ENV{wiz_nfs_level}; -} - -sub do_it { - my $line; - my $file = "/etc/exports"; - chomp($ENV{wiz_nfs_dir}); - -f $file and cp_af($file, $file.".orig"); - if ($ENV{wiz_nfs_level} == 2) { - my $mask = $o->itf_get("NETMASK"); - $line = "$ENV{wiz_nfs_dir} $ENV{wiz_netmask}(rw,no_root_squash)\n"; - } - else { - $line = "$ENV{wiz_nfs_dir} *(rw,no_root_squash)\n"; - } - my $t; - foreach (cat_($file)) { - if (/^(?!\#).*$ENV{wiz_nfs_dir}\s.*/) { - $t = $_; - last; - } - } - substInFile { s|^(?!\#).*$ENV{wiz_nfs_dir}\s.*|\#$&|} $file; - append_to_file($file, $line); - system("/usr/sbin/exportfs -a"); - services::is_service_running('nfs') and services::start('nfs'); - 10 -} diff --git a/nfs_wizard/scripts/do_it_nfs.sh b/nfs_wizard/scripts/do_it_nfs.sh deleted file mode 100755 index 917d838d..00000000 --- a/nfs_wizard/scripts/do_it_nfs.sh +++ /dev/null @@ -1,52 +0,0 @@ -#!/bin/bash -# -# Wizard -# -# Copyright (C) 2000 Mandrakesoft. -# -# This program is free software; you can redistribute it and/or -# modify it under the terms of the GNU General Public License -# as published by the Free Software Foundation; either version 2 -# of the License, or (at your option) any later version. -# See file LICENSE for further informations on licensing terms. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with this program; if not, write to the Free Software -# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. -# -# Authors: Philippe Vivien, Jerome Dumonteil, Maurizio De Cecco, Enzo Maggi -# <corporate@mandrakesoft.com> http://www.mandrakesoft.com - -# script for wizard nfs configuration -# -# modify default nfs configuration -# assuming all dependencies are ok -# -# WARNING : just using /etc/exports for nfs configuration, assuming -# other files are close to standard configuration - -nfs_file="/etc/exports" - -echo "${wiz_nfs_dir} ${wiz_ip_net} ${wiz_ip_netmask}" -echo "wiz_ip_net:${wiz_ip_net}" >t.log -echo "wiz_ip_netmask:${wiz_ip_netmask}" >>t.log - -echo "dir:${wiz_nfs_dir}" >>t.log -echo "clt:${wiz_ip_net}/${wiz_ip_netmask}" >>t.log - -echo "export :\n">>t.log -echo "${wiz_nfs_dir} ${wiz_ip_net}/${wiz_ip_netmask}(rw,no_root_squash)" >> t.log -echo "${wiz_nfs_dir} ${wiz_ip_net}/${wiz_ip_netmask}(rw,no_root_squash)" > ${nfs_file} - -/usr/sbin/exportfs -a - -# all is ok -exit 10 - - - |