use perl module

1 files changed, 752 insertions, 0 deletions

diff --git a/client_wizard/client.wiz b/client_wizard/client.wiz
new file mode 100644
index 00000000..3cf654a6
--- /dev/null
+++ b/client_wizard/client.wiz
@@ -0,0 +1,752 @@
+<?xml version="1.0"?>
+
+
+<Wizard
+	name="general"
+	libScript="__WIZ_HOME__/common/scripts/functions.sh"
+	wizardTitle="wizdrake: Client wizard"
+	imagePosition="top"
+	defaultImage="__WIZ_HOME__/images/DNS.jpg"
+	height="400"
+	width="525"
+	hasDb="true"
+	dbPositions="2"
+	dbFilename="/var/log/wizards/client.wiz"
+	referenceLength="425"
+	referenceHeight="13"
+	perlModule="__WIZ_HOME__/client_wizard/scripts/Clientconf.pm"
+>
+
+	<Variable
+		name="wiz_client_ip"
+		shellVariable="wiz_client_ip"
+		persistent="true"
+		dbPosition="0"
+		key="false"
+	>
+	</Variable>
+
+	<Variable
+		name="wiz_client_name"
+		shellVariable="wiz_client_name"
+		persistent="true"
+		dbPosition="1"
+		key="false"
+	>
+	</Variable>
+
+	<Page
+		helpURL="file:/usr/share/doc/mandrake/${LANG}/ref.html/wiz.html"
+		name="Welcome"
+		jumpScript="__WIZ_HOME__/common/scripts/check.sh root wiz_ip_net"
+		executionLevel="NORMAL"
+		nextFinish="false"
+		canBack="true"
+		canCancel="true"
+	>
+
+		<Target
+			targetName="CLIENT"
+			jumpIndex="0"
+		>
+		</Target>
+
+		<Target
+			targetName="error_need_root"
+			jumpIndex="1"
+		>
+		</Target>
+
+		<Target
+			targetName="error_need_net"
+			jumpIndex="2"
+		>
+		</Target>
+
+		<Info
+			name="welcomeTitle"
+			alignement="Center"
+			helpText="DNS Client Wizard"
+			guiType="label"
+			fontName="Default"
+			fontStyle="bold"
+			fontSize="14"
+		>
+		</Info>
+
+		<Info
+			name="info13"
+			alignement="Center"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info10"
+			alignement="Center"
+			helpText="A client of your local network is a machine connected to the"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info1"
+			alignement="Center"
+			helpText="network having its own name and IP number."
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info30"
+			alignement="Center"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info14"
+			alignement="Center"
+			helpText="This wizard will help you in adding a new client in your local DNS."
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info28"
+			alignement="Center"
+			helpText="The server will use the informations you enter here to make the name"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info29"
+			alignement="Center"
+			helpText="of the client available to other machines into your network."
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info"
+			alignement="Center"
+			helpText="Press next to begin, or Cancel to leave this wizard."
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+	</Page>
+
+	<Page
+		helpURL="file:/usr/share/doc/mandrake/${LANG}/ref.html/wiz.html"
+		name="CLIENT"
+		jumpScript="__WIZ_HOME__/client_wizard/scripts/test_client.sh"
+		executionLevel="NORMAL"
+		nextFinish="false"
+		canBack="true"
+		canCancel="true"
+	>
+
+		<Target
+			targetName="doit"
+			jumpIndex="10"
+		>
+		</Target>
+
+		<Target
+			targetName="Error"
+			jumpIndex="1"
+		>
+		</Target>
+
+		<Target
+			targetName="warning"
+			jumpIndex="2"
+		>
+		</Target>
+
+		<Info
+			name="clientTitle"
+			alignement="Center"
+			helpText="Client identification:"
+			guiType="label"
+			fontName="Default"
+			fontStyle="bold"
+			fontSize="14"
+		>
+		</Info>
+
+		<Info
+			name="info2"
+			alignement="Center"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info3"
+			alignement="East"
+			helpText="Your client on the network will be identified by  name, as in"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info6"
+			alignement="East"
+			helpText="clientname.company.net. Every machine on the network must have"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info4"
+			alignement="East"
+			helpText="an (unique) IP address, in the usual dotted syntax."
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info12"
+			alignement="East"
+			helpText="(you don't need to type the domain after the name)"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info15"
+			alignement="Center"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Freetext
+			name="wiz_client_name"
+			variableName="wiz_client_name"
+			alignement="Fill"
+			helpText="Name of the machine :"
+			guiType="textfield"
+			editable="true"
+			fontName="Default"
+			fontStyle="bold"
+			fontSize="11"
+			proportional="2"
+			ratio="30"
+			length="40"
+		>
+		</Freetext>
+
+		<Freetext
+			name="wiz_client_ip"
+			variableName="wiz_client_ip"
+			alignement="Fill"
+			helpText="IP number of the machine :"
+			guiType="textfield"
+			editable="true"
+			fontName="Default"
+			fontStyle="bold"
+			fontSize="11"
+			proportional="2"
+			ratio="30"
+			length="40"
+		>
+		</Freetext>
+
+		<Info
+			name="info16"
+			alignement="Center"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info5"
+			alignement="East"
+			helpText="Note that the given IP number and client name should be unique in the network."
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+	</Page>
+
+	<Page
+		helpURL="file:/usr/share/doc/mandrake/${LANG}/ref.html/wiz.html"
+		name="warning"
+		jumpPage="doit"
+		executionLevel="NORMAL"
+		nextFinish="false"
+		canBack="true"
+		canCancel="true"
+	>
+
+		<Info
+			name="info21"
+			alignement="Center"
+			helpText="Warning:"
+			guiType="label"
+			fontName="Default"
+			fontStyle="bold"
+			fontSize="14"
+		>
+		</Info>
+
+		<Info
+			name="info20"
+			alignement="Center"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info202"
+			alignement="Center"
+			helpText="You have entered a machine name or an IP number already used."
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info203"
+			alignement="Center"
+			helpText="Press next if you want to change the already existing value,"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info22"
+			alignement="Center"
+			helpText="or back to correct your choice."
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+	</Page>
+
+	<Page
+		helpURL="file:/usr/share/doc/mandrake/${LANG}/ref.html/wiz.html"
+		name="Error"
+		jumpPage="CLIENT"
+		executionLevel="NORMAL"
+		nextFinish="false"
+		canBack="true"
+		canCancel="true"
+	>
+
+		<Info
+			name="info7"
+			alignement="Center"
+			guiType="label"
+			fontName="Default"
+			fontStyle="bold"
+			fontSize="14"
+		>
+		</Info>
+
+		<Info
+			name="info8"
+			alignement="Center"
+			helpText="This is not a valid address... press next to continue"
+			guiType="label"
+			fontName="Default"
+			fontStyle="bold"
+			fontSize="14"
+		>
+		</Info>
+	</Page>
+
+	<Page
+		helpURL="file:/usr/share/doc/mandrake/${LANG}/ref.html/wiz.html"
+		name="error_need_net"
+		subWizard="__WIZ_HOME__/server_wizard/server.wiz"
+		executionLevel="NORMAL"
+		nextFinish="false"
+		canBack="false"
+		canCancel="true"
+	>
+
+		<Info
+			name="errorLabel"
+			alignement="Center"
+			helpText="Network not configured yet"
+			guiType="label"
+			fontName="Default"
+			fontStyle="bold"
+			fontSize="14"
+		>
+		</Info>
+
+		<Info
+			name="info23"
+			alignement="Center"
+			guiType="label"
+			fontName="Default"
+			fontStyle="bold"
+			fontSize="14"
+		>
+		</Info>
+
+		<Info
+			name="info22"
+			alignement="Center"
+			helpText="You have to configure the basic network parameters before launch this wizard."
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info25"
+			alignement="Center"
+			helpText="Press next to configure these parameters now, or Cancel to exit this wizard."
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info26"
+			alignement="Center"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info24"
+			alignement="Center"
+			helpText="If you choose to configure now, you will automatically continue"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info27"
+			alignement="Center"
+			helpText="with the Client configuration"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+	</Page>
+
+	<Page
+		helpURL="file:/usr/share/doc/mandrake/${LANG}/ref.html/wiz.html"
+		name="server launcher"
+		jumpPage="CLIENT"
+		executionLevel="DEBUG"
+		nextFinish="false"
+		canBack="true"
+		canCancel="true"
+	>
+	</Page>
+
+	<Page
+		helpURL="file:/usr/share/doc/mandrake/${LANG}/ref.html/wiz.html"
+		name="doit"
+		func="do_it"
+		nextButtonText="Configure"
+		executionLevel="NORMAL"
+		nextFinish="false"
+		canBack="true"
+		canCancel="true"
+	>
+
+		<Target
+			targetName="done"
+			jumpIndex="10"
+		>
+		</Target>
+
+		<Target
+			targetName="system_error"
+			jumpIndex="1"
+		>
+		</Target>
+
+		<Info
+			name="ClientTitle"
+			alignement="Center"
+			helpText="Adding a new client to your network"
+			guiType="label"
+			fontName="Default"
+			fontStyle="bold"
+			fontSize="14"
+		>
+		</Info>
+
+		<Info
+			name="info2"
+			alignement="Center"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info3"
+			alignement="East"
+			helpText="The wizard collected the following parameter"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info6"
+			alignement="East"
+			helpText="needed to add a client to your network:"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info15"
+			alignement="Center"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Freetext
+			name="wiz_client_name"
+			variableName="wiz_client_name"
+			alignement="Fill"
+			helpText="Client name"
+			guiType="textfield"
+			editable="false"
+			fontName="Default"
+			fontStyle="bold"
+			fontSize="11"
+			proportional="2"
+			ratio="30"
+			length="40"
+		>
+		</Freetext>
+
+		<Freetext
+			name="wiz_client_ip"
+			variableName="wiz_client_ip"
+			alignement="Fill"
+			helpText="Client IP:"
+			guiType="textfield"
+			editable="false"
+			fontName="Default"
+			fontStyle="bold"
+			fontSize="11"
+			proportional="2"
+			ratio="30"
+			length="40"
+		>
+		</Freetext>
+
+		<Info
+			name="info16"
+			alignement="Center"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info5"
+			alignement="East"
+			helpText="To accept these values, and add your client, click on"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info17"
+			alignement="East"
+			helpText="\qConfigure\q or use the Back button to correct them."
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+	</Page>
+
+	<Page
+		helpURL="file:/usr/share/doc/mandrake/${LANG}/ref.html/wiz.html"
+		name="done"
+		nextButtonText="Quit"
+		executionLevel="NORMAL"
+		nextFinish="true"
+		canBack="false"
+		canCancel="false"
+	>
+
+		<Info
+			name="congratulationTitle"
+			alignement="Center"
+			helpText="Congratulations"
+			guiType="label"
+			fontName="Default"
+			fontStyle="bold"
+			fontSize="14"
+		>
+		</Info>
+
+		<Info
+			name="info11"
+			alignement="Center"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info18"
+			alignement="Center"
+			helpText="The wizard successfully added the client."
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+
+		<Info
+			name="info19"
+			alignement="Center"
+			guiType="label"
+			fontName="Default"
+			fontStyle="plain"
+			fontSize="11"
+		>
+		</Info>
+	</Page>
+
+	<Page
+		helpURL="file:/usr/share/doc/mandrake/${LANG}/ref.html/wiz.html"
+		name="error_need_root"
+		nextButtonText="OK"
+		executionLevel="NORMAL"
+		nextFinish="true"
+		canBack="false"
+		canCancel="true"
+	>
+
+		<Info
+			name="errorLabel"
+			alignement="Center"
+			helpText="You need to be root to run this wizard"
+			guiType="label"
+			fontName="Default"
+			fontStyle="bold"
+			fontSize="14"
+		>
+		</Info>
+	</Page>
+
+	<Page
+		helpURL="file:/usr/share/doc/mandrake/${LANG}/ref.html/wiz.html"
+		name="system_error"
+		nextButtonText="OK"
+		executionLevel="NORMAL"
+		nextFinish="true"
+		canBack="false"
+		canCancel="true"
+	>
+
+		<Info
+			name="errorLabel"
+			alignement="Center"
+			helpText="System error, no configuration done"
+			guiType="label"
+			fontName="Default"
+			fontStyle="bold"
+			fontSize="14"
+		>
+		</Info>
+	</Page>
+</Wizard>