translated into perl

4 files changed, 0 insertions, 201 deletions

diff --git a/samba_wizard/scripts/check_banner.sh b/samba_wizard/scripts/check_banner.sh
deleted file mode 100755
index 42aed456..00000000
--- a/samba_wizard/scripts/check_banner.sh
+++ /dev/null
@@ -1,39 +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: Jerome Dumonteil, Maurizio De Cecco, Enzo Maggi
-# icons: Helene Durosini <ln@mandrakesoft.com>
-# <corporate@mandrakesoft.com> http://www.mandrakesoft.com
-
-# script for wizard samba configuration
-#
-# checking if the provided server banner is correct :
-
-
-if [ -z "${wiz_banner}" ] ;then
-	echo_debug "wiz_banner is empty, should not."
-	exit 1
-fi
-
-
-# all seems to be ok
-exit 10
-
diff --git a/samba_wizard/scripts/check_services.sh b/samba_wizard/scripts/check_services.sh
deleted file mode 100755
index 802bc320..00000000
--- a/samba_wizard/scripts/check_services.sh
+++ /dev/null
@@ -1,44 +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: Jerome Dumonteil, Maurizio De Cecco, Enzo Maggi
-# icons: Helene Durosini <ln@mandrakesoft.com>
-# <corporate@mandrakesoft.com> http://www.mandrakesoft.com
-
-# script for wizard samba configuration
-#
-# checking if the provided services are correct :
-
-
-if [ -z "${wiz_do_file_sharing}" ] ;then
-	echo_debug "wiz_do_file_sharing is empty, should not."
-	exit 1
-fi
-
-if [ -z "${wiz_do_printer_sharing}" ] ;then
-	echo_debug "wiz_do_file_sharing is empty, should not."
-	exit 1
-fi
-
-
-# all seems to be ok
-exit 10
-
diff --git a/samba_wizard/scripts/check_workgroup.sh b/samba_wizard/scripts/check_workgroup.sh
deleted file mode 100755
index db70ec8b..00000000
--- a/samba_wizard/scripts/check_workgroup.sh
+++ /dev/null
@@ -1,38 +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: Jerome Dumonteil, Maurizio De Cecco, Enzo Maggi
-# icons: Helene Durosini <ln@mandrakesoft.com>
-# <corporate@mandrakesoft.com> http://www.mandrakesoft.com
-
-# script for wizard samba configuration
-#
-# checking if the provided server workgroup is correct :
-
-
-if [ -z "${wiz_workgroup}" ] ;then
-	echo_debug "wiz_banner is empty, should not."
-	exit 1
-fi
-
-
-# all seems to be ok
-exit 10
diff --git a/samba_wizard/scripts/do_it_samba.sh b/samba_wizard/scripts/do_it_samba.sh
deleted file mode 100755
index 2f3fc0be..00000000
--- a/samba_wizard/scripts/do_it_samba.sh
+++ /dev/null
@@ -1,80 +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: Jerome Dumonteil, Maurizio De Cecco, Enzo Maggi
-# icons: Helene Durosini <ln@mandrakesoft.com>
-# <corporate@mandrakesoft.com> http://www.mandrakesoft.com
-
-#
-# set up the config for samba
-# assuming all dependencies are ok
-
-file=/etc/sysconfig/mdk_serv
-
-# store the variables
-
-chg_val ${file} wiz_banner ${wiz_banner} s
-chg_val ${file} wiz_workgroup ${wiz_workgroup} s
-chg_val ${file} wiz_do_printer_sharing ${wiz_do_printer_sharing} s
-chg_val ${file} wiz_do_file_sharing ${wiz_do_file_sharing} s
-
-
-ip=`get_var wiz_ip_net`
-
-
-echo_debug "printer  ${wiz_do_printer_sharing}" 
-echo_debug "file share   ${wiz_do_file_sharing}" 
-echo_debug "banner  ${wiz_banner}" 
-echo_debug "workgr  ${wiz_workgroup}" 
-
-
-# samba configuration file
-config="/etc/samba/smb.conf"
-if [ ! -f ${config} ]; then
-	echo_debug "no smb.conf configuration file found ! exiting."
-	exit 2
-fi
-
-bck_file ${config}
-
-cat ${CWD}/scripts/smb.conf.default > ${config}
-
-${CWD}/scripts/smbconfig.pl --set-hosts-allow="${ip%.*}. 127." \
---set-workgroup="${wiz_workgroup}" --set-banner="${wiz_banner}"
-
-if [ "${wiz_do_file_sharing}" == "true" ]; then
-	echo_debug "enabling file sharing"
-	${CWD}/scripts/smbconfig.pl --remove-homes --enable-public --set-security-share
-fi
-
-if [ "${wiz_do_printer_sharing}" == "enabled" ]; then
-	echo_debug "enabling printer access"
-	${CWD}/scripts/smbconfig.pl --enable-printer-access
-fi
-
-
-echo_debug "restarting service smb"
-# restarting service
-#/etc/rc.d/init.d/smb restart >/dev/null 2>&1
-
-
-# exiting ok
-exit 1