From d381270aa94a7ed230dfaee421d1f0e3bad42d5f Mon Sep 17 00:00:00 2001
From: Arnaud Desmons <adesmons@mandriva.com>
Date: Wed, 23 Oct 2002 10:04:57 +0000
Subject: acces restriction

---
 samba_wizard/samba.wiz | 90 +++++++++++++++++++++++++++++++++++++++++++-------
 1 file changed, 78 insertions(+), 12 deletions(-)

(limited to 'samba_wizard/samba.wiz')

diff --git a/samba_wizard/samba.wiz b/samba_wizard/samba.wiz
index e715a8df..c9432332 100644
--- a/samba_wizard/samba.wiz
+++ b/samba_wizard/samba.wiz
@@ -15,6 +15,16 @@
 		shellVariable="wiz_box_list"
 	>				
 	</Variable>
+	<Variable
+		name="hosts_allow"
+		shellVariable="wiz_hosts_allow"
+	>				
+	</Variable>
+	<Variable
+		name="hosts_deny"
+		shellVariable="wiz_hosts_deny"
+	>		
+	</Variable>
 	<Variable
 		name="doFileSharing"
 		comment="true if we do file sharing, false otherwise"
@@ -22,8 +32,8 @@
 	>
 	</Variable>		
 	<Variable
-		name="wiz_samba_net"
-		shellVariable="wiz_samba_net"
+		name="level"
+		shellVariable="wiz_level"
 	>
 	</Variable>
 	<Variable
@@ -42,12 +52,6 @@
 		shellVariable="wiz_do_printer_sharing"
 	>
 	</Variable>
-	<Variable
-		name="printer"
-		comment="true if samba do printer sharing"
-		shellVariable="wiz_printer"
-	>
-	</Variable>
 	<Variable
 		name="doHomes"
 		comment="true if samba do printer sharing"
@@ -139,7 +143,6 @@
 		>
 		</Info>
 
-
 		<Info
 			helpText="Samba need to know the Windows Workgroup it will serve."
 		>
@@ -233,12 +236,23 @@
 	</Page>
 	<Page
 		name="ask_net"
-		jumpPage="ask_services"
+		func="chk_level"
 		executionLevel="NORMAL"
 		nextFinish="false"
 		canBack="true"
 		canCancel="true"
 	>
+		<Target
+			targetName="ask_services"
+			jumpIndex="1"
+		>
+		</Target>
+
+		<Target
+			targetName="ask_netmask"
+			jumpIndex="2"
+		>
+		</Target>
 		<Info
 			helpText="Access control"
 		>
@@ -246,7 +260,8 @@
 
 		<Chooser
 			name="chooser1"
-			variableName="wiz_samba_net"
+			variableName="level"
+			helpText="Access level :"
 		>
 			<Option
 				value="1"
@@ -256,12 +271,63 @@
 
 			<Option
 				value="2"
-				description="Local Network - access for local network (recommended)"
+				description="My rules - Ask me allowed and denied hosts"
 			>
 			</Option>
 		</Chooser>
 	</Page>
+	<Page
+		name="ask_netmask"
+		jumpPage="ask_services"
+		executionLevel="NORMAL"
+		nextFinish="false"
+		canBack="true"
+		canCancel="true"
+		is="level=2"
+	>
+		<Info
+			helpText="Access control"
+		>
+		</Info>
+
+		<Info
+			helpText="* Example 1: allow all IPs in 150.203.*.*; except one\nhosts allow = 150.203. EXCEPT 150.203.6.66"
+		>
+		</Info>
+		<Info
+			helpText="* Example 2: allow hosts that match the given network/netmask\nhosts allow = 150.203.15.0/255.255.255.0"
+		>
+		</Info>
+		<Info
+			helpText="* Example 3: allow a couple of hosts\nhosts allow = lapland, arvidsjaur"
+		>
+		</Info>
+		<Info
+			helpText="* Example 4: allow only hosts in NIS netgroup \qfoonet\q,  but deny access from one particular host\nhosts allow = @foonet\nhosts deny = pirate"
+		>
+		</Info>
+		<Info
+			helpText="Note that access still requires suitable user-level passwords."
+		>
+		</Info>
 
+		<Freetext
+			variableName="hosts_allow"
+			helpText="Allow hosts:"
+			editable="true"
+			fillfunc="get_allow_host"
+			refresh="true"
+		>
+		</Freetext>
+		<Freetext
+			variableName="hosts_deny"
+			helpText="Deny hosts:"
+			editable="true"
+			fillfunc="get_deny_host"
+			refresh="true"
+		>
+		</Freetext>
+	</Page>
 	<Page
 		helpURL="file:/usr/share/doc/mandrake/${LANG}/ref.html/wiz-samba.html"
 		name="ask_services"
-- 
cgit v1.2.1