summaryrefslogtreecommitdiffstats
path: root/time_wizard
diff options
context:
space:
mode:
Diffstat (limited to 'time_wizard')
-rw-r--r--time_wizard/scripts/NTPConf.pm70
-rwxr-xr-xtime_wizard/scripts/compute_liste.sh36
-rw-r--r--time_wizard/time.wiz647
3 files changed, 0 insertions, 753 deletions
diff --git a/time_wizard/scripts/NTPConf.pm b/time_wizard/scripts/NTPConf.pm
deleted file mode 100644
index efcc838d..00000000
--- a/time_wizard/scripts/NTPConf.pm
+++ /dev/null
@@ -1,70 +0,0 @@
-#!/usr/bin/perl
-
-# NTP Config Parser
-
-# 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 NTPConf;
-require "__WIZ_HOME__/common/scripts/Vareqval.pm";
-use MDK::Common;
-use strict;
-use standalone;
-
-sub chooser4 {
- if ($ENV{chooser4} eq "save_quit") {
- do_it();
- return 1;
- }
- 2;
-}
-
-sub test {
- system("/usr/sbin/ntpdate -q $ENV{server1} $ENV{server2}");
- if (!($? >> 8)) {
- do_it();
- return 1;
- }
- 2;
-}
-
-sub do_it {
- my $file = "/etc/sysconfig/clock";
- MDK::Common::cp_af($file, $file.".orig");
- open(NEW, "> $file") or die "can not open $file: $!";
- print NEW "UTC=true\n";
- print NEW "ZONE=$ENV{wiz_timezone}\n";
- print NEW "ARC=false\n";
- close NEW or die "can not close $file: $!";
- MDK::Common::cp_af("/usr/share/zoneinfo/$ENV{wiz_timezone}", "/etc/localtime");
- -f "/etc/ntp/step-tickers" and MDK::Common::cp_af("/etc/ntp/step-tickers", "/etc/ntp/step-tickers.orig");
- open(NEW, "> /etc/ntp/step-tickers") or die "can not open /etc/ntp/step-tickers: $!";
- print NEW $ENV{server1}."\n";
- print NEW $ENV{server2}."\n";
- close NEW or die "can not close /etc/ntp/step-tickers: $!";
- substInFile { s/(# server clock.via.net)/$1\nserver $ENV{server1}/ } '/etc/ntp.conf' if -f '/etc/ntp.conf';
- standalone::explanations("Wrote /etc/ntp/step-tickers, starting services");
- my @services = qw(crond atd ntpd);
- foreach (@services) {
- system("/etc/rc.d/init.d/$_ stop");
- }
- foreach (reverse @services) {
- system("/etc/rc.d/init.d/$_ start");
- }
- system("/sbin/hwclock --systohc --utc");
- 10;
-}
-1;
diff --git a/time_wizard/scripts/compute_liste.sh b/time_wizard/scripts/compute_liste.sh
deleted file mode 100755
index 287808fb..00000000
--- a/time_wizard/scripts/compute_liste.sh
+++ /dev/null
@@ -1,36 +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 time configuration
-#
-# echo on stdout liste & description (same) of timezone
-
-# zoneinfo directory probably exists, but
-[ -d /usr/share/zoneinfo ] || exit 1
-
-echo_debug "timezone list"
-
-cd /usr/share/zoneinfo && find [A-Z]* -type f | sort
-
diff --git a/time_wizard/time.wiz b/time_wizard/time.wiz
deleted file mode 100644
index ac746ab2..00000000
--- a/time_wizard/time.wiz
+++ /dev/null
@@ -1,647 +0,0 @@
-<?xml version="1.0"?>
-
-
-<Wizard
- name="general"
- libScript="__WIZ_HOME__/common/scripts/functions.sh"
- wizardTitle="Time wizard"
- imagePosition="top"
- defaultImage="__WIZ_HOME__/time_wizard/images/Time.png"
- perlModule="__WIZ_HOME__/time_wizard/scripts/NTPConf.pm"
- rpm="ntp"
- summaryFunc="do_it"
->
-
- <Variable
- name="chooser1"
- shellVariable="chooser1"
- >
- </Variable>
-
- <Variable
- name="varserver1"
- shellVariable="server1"
- >
- </Variable>
-
-
- <Variable
- name="varserver2"
- shellVariable="server2"
- >
- </Variable>
-
-
- <Variable
- name="chooser4"
- shellVariable="chooser4"
- >
- </Variable>
-
- <Variable
- name="wiz_timezone"
- shellVariable="wiz_timezone"
- >
- </Variable>
-
- <Variable
- name="wiz_time_ok"
- shellVariable="wiz_time_ok"
- defaultValue="ok"
- >
- </Variable>
-
- <Page
- helpURL="file:/usr/share/doc/mandrake/${LANG}/ref.html/wiz-time.html"
- name="welcome"
- executionLevel="NORMAL"
- nextFinish="false"
- canBack="true"
- canCancel="true"
- >
-
- <Info
- helpText="This wizard will help you to set the time of your server synchronized with an external time server."
- >
- </Info>
-
- <Info
- helpText="Thus your server will be the local time server for your network."
- >
- </Info>
-
- <Info
- helpText="press next to begin, or cancel to leave this wizard"
- >
- </Info>
- </Page>
-
- <Page
- helpURL="file:/usr/share/doc/mandrake/${LANG}/ref.html/wiz-time.html"
- name="choose_server"
- executionLevel="NORMAL"
- nextFinish="false"
- canBack="true"
- canCancel="true"
- >
-
- <Info
- helpText="Time Servers"
- >
- </Info>
-
-
- <Info
- helpText="Select a primary and secondary server from the list."
- >
- </Info>
-
- <Info
- helpText="(please, choose servers in your geographical area)"
- >
- </Info>
-
-
- <Chooser
- name="chooserserver1"
- variableName="varserver1"
- helpText="Primary Time Server:"
- editable="true"
- >
- <Option
- value="bernina.ethz.ch"
- description="Swiss Fed. Inst. of Technology"
- >
- </Option>
-
- <Option
- value="clock.nc.fukuoka-u.ac.jp"
- description="Fukuoka university, Fukuoka, Japan"
- >
- </Option>
-
- <Option
- value="clock.psu.edu"
- description="Penn State University, University Park, PA"
- >
- </Option>
-
- <Option
- value="clock.tricity.wsu.edu"
- description="Washington State University Tri-Cities, Richland, Wa"
- >
- </Option>
-
- <Option
- value="constellation.ecn.uoknor.edu"
- description="University of Oklahoma, Norman, Oklahoma, USA"
- >
- </Option>
-
- <Option
- value="fartein.ifi.uio.no"
- description="University of Oslo, Norway"
- >
- </Option>
-
- <Option
- value="ntp.adelaide.edu.au"
- description="University of Adelaide, South Australia"
- >
- </Option>
-
- <Option
- value="ntp.cs.strath.ac.uk"
- description="Dept. Computer Science, Strathclyde University, Glasgow, Scotland"
- >
- </Option>
-
- <Option
- value="ntp.shim.org"
- description="Singapore"
- >
- </Option>
-
- <Option
- value="ntp.tmc.edu"
- description="Baylor College of Medicine, Houston, Tx"
- >
- </Option>
-
- <Option
- value="ntp1.cmc.ec.gc.ca"
- description="Canadian Meteorological Centre, Dorval, Quebec, Canada"
- >
- </Option>
-
- <Option
- value="ntp1.cs.wisc.edu"
- description="Computer Science Department, University of Wisconsin-Madison"
- >
- </Option>
-
- <Option
- value="ntp2a.mcc.ac.uk"
- description="University of Manchester, Manchester, England"
- >
- </Option>
-
- <Option
- value="sign.chg.ru"
- description="Scientific Center in Chernogolovka, Moscow region, Russia"
- >
- </Option>
-
- <Option
- value="salmon.maths.tcd.ie"
- description="Trinity College, Dublin, Ireland"
- >
- </Option>
-
- <Option
- value="slug.ctv.es"
- description="Altea (Alicante/SPAIN)"
- >
- </Option>
-
- <Option
- value="time.nrc.ca"
- description="National Research Council of Canada, Ottawa, Ontario, Canada"
- >
- </Option>
-
- <Option
- value="time.nuri.net"
- description="Inet, Inc., Seoul, Korea"
- >
- </Option>
-
- <Option
- value="tock.cs.unlv.edu"
- description="UNLV College of Engineering, Las Vegas, NV"
- >
- </Option>
-
- <Option
- value="timelord.uregina.ca"
- description="University of Regina, Regina, Saskatchewan, Canada"
- >
- </Option>
-
- <Option
- value="bitsy.mit.edu"
- description="MIT Information Systems, Cambridge, MA"
- >
- </Option>
-
- <Option
- value="lock.cuhk.edu.hk"
- description="The Chinese University of Hong Kong"
- >
- </Option>
-
- <Option
- value="ntp.univ-lyon1.fr"
- description="CISM, Lyon, France"
- >
- </Option>
-
- <Option
- value="ntp.laas.fr"
- description="LAAS/CNRS, Toulouse, France"
- >
- </Option>
-
- <Option
- value="ntp.unilim.fr"
- description="SCI, Universite de Limoges, France"
- >
- </Option>
-
- <Option
- value="ntp2.unicaen.fr"
- description="CRIUC, Universite de Caen, France"
- >
- </Option>
-
- <Option
- value="ntp.u-psud.fr"
- description="CRI, Campus d'Orsay, Universite Paris Sud, France"
- >
- </Option>
-
- <Option
- value="ntp.loria.fr"
- description="Loria, Nancy, France"
- >
- </Option>
- </Chooser>
-
- <Chooser
- name="chooserserver2"
- variableName="varserver2"
- helpText="Secondary Time Server:"
- helpFontName="Default"
- helpFontStyle="plain"
- helpFontSize="12"
- editable="true"
- >
-
- <Option
- value="bernina.ethz.ch"
- description="Swiss Fed. Inst. of Technology"
- >
- </Option>
-
- <Option
- value="clock.nc.fukuoka-u.ac.jp"
- description="Fukuoka university, Fukuoka, Japan"
- >
- </Option>
-
- <Option
- value="clock.psu.edu"
- description="Penn State University, University Park, PA"
- >
- </Option>
-
- <Option
- value="clock.tricity.wsu.edu"
- description="Washington State University Tri-Cities, Richland, Wa"
- >
- </Option>
-
- <Option
- value="constellation.ecn.uoknor.edu"
- description="University of Oklahoma, Norman, Oklahoma, USA"
- >
- </Option>
-
- <Option
- value="fartein.ifi.uio.no"
- description="University of Oslo, Norway"
- >
- </Option>
-
- <Option
- value="ntp.adelaide.edu.au"
- description="University of Adelaide, South Australia"
- >
- </Option>
-
- <Option
- value="ntp.cs.strath.ac.uk"
- description="Dept. Computer Science, Strathclyde University, Glasgow, Scotland"
- >
- </Option>
-
- <Option
- value="ntp.shim.org"
- description="Singapore"
- >
- </Option>
-
- <Option
- value="ntp.tmc.edu"
- description="Baylor College of Medicine, Houston, Tx"
- >
- </Option>
-
- <Option
- value="ntp1.cmc.ec.gc.ca"
- description="Canadian Meteorological Centre, Dorval, Quebec, Canada"
- >
- </Option>
-
- <Option
- value="ntp1.cs.wisc.edu"
- description="Computer Science Department, University of Wisconsin-Madison"
- >
- </Option>
-
- <Option
- value="ntp2a.mcc.ac.uk"
- description="University of Manchester, Manchester, England"
- >
- </Option>
-
- <Option
- value="sign.chg.ru"
- description="Scientific Center in Chernogolovka, Moscow region, Russia"
- >
- </Option>
-
- <Option
- value="salmon.maths.tcd.ie"
- description="Trinity College, Dublin, Ireland"
- >
- </Option>
-
- <Option
- value="slug.ctv.es"
- description="Altea (Alicante/SPAIN)"
- >
- </Option>
-
- <Option
- value="time.nrc.ca"
- description="National Research Council of Canada, Ottawa, Ontario, Canada"
- >
- </Option>
-
- <Option
- value="time.nuri.net"
- description="Inet, Inc., Seoul, Korea"
- >
- </Option>
-
- <Option
- value="tock.cs.unlv.edu"
- description="UNLV College of Engineering, Las Vegas, NV"
- >
- </Option>
-
- <Option
- value="timelord.uregina.ca"
- description="University of Regina, Regina, Saskatchewan, Canada"
- >
- </Option>
-
- <Option
- value="bitsy.mit.edu"
- description="MIT Information Systems, Cambridge, MA"
- >
- </Option>
-
- <Option
- value="lock.cuhk.edu.hk"
- description="The Chinese University of Hong Kong"
- >
- </Option>
-
- <Option
- value="ntp.univ-lyon1.fr"
- description="CISM, Lyon, France"
- >
- </Option>
-
- <Option
- value="ntp.laas.fr"
- description="LAAS/CNRS, Toulouse, France"
- >
- </Option>
-
- <Option
- value="ntp.unilim.fr"
- description="SCI, Universite de Limoges, France"
- >
- </Option>
-
- <Option
- value="ntp2.unicaen.fr"
- description="CRIUC, Universite de Caen, France"
- >
- </Option>
-
- <Option
- value="ntp.u-psud.fr"
- description="CRI, Campus d'Orsay, Universite Paris Sud, France"
- >
- </Option>
-
- <Option
- value="ntp.loria.fr"
- description="Loria, Nancy, France"
- >
- </Option>
- <Option
- value="ntp.u-psud.fr"
- description="CRI, Campus d'Orsay, Universite Paris Sud, France"
- >
- </Option>
-
- <Option
- value="ntp.loria.fr"
- description="Loria, Nancy, France"
- >
- </Option>
-
- </Chooser>
-
- <Chooser
- name="chooserwiz_timezone"
- variableName="wiz_timezone"
- defaultOptionScript="get_var wiz_timezone"
- fillScript="__WIZ_HOME__/time_wizard/scripts/compute_liste.sh"
- helpText="Choose a time zone:"
- editable="false"
- >
- </Chooser>
- </Page>
-
- <Page
- helpURL="file:/usr/share/doc/mandrake/${LANG}/ref.html/wiz-time.html"
- name="test_server"
- func="test"
- executionLevel="NORMAL"
- nextFinish="false"
- canBack="true"
- canCancel="true"
- >
-
- <Target
- targetName="server_not_responding"
- jumpIndex="2"
- >
- </Target>
-
- <Target
- targetName="ciao"
- jumpIndex="1"
- >
- </Target>
-
- <Info
- helpText="Testing the time servers availability"
- >
- </Info>
-
-
- <Info
- helpText="If the time server is not immediately available (network or other reason), there will be about a 30 second delay."
- >
- </Info>
-
-
- <Info
- helpText="Press next to start the time servers test."
- >
- </Info>
-
-
- <Freetext
- name="freetext1"
- variableName="varserver1"
- helpText="Primary Time Server:"
- editable="false"
- >
- </Freetext>
-
- <Freetext
- name="freetext2"
- variableName="varserver2"
- helpText="Secondary Time Server:"
- editable="false"
- >
- </Freetext>
-
- <Freetext
- name="freetext3"
- variableName="wiz_timezone"
- helpText="Time zone:"
- editable="false"
- >
- </Freetext>
-
- </Page>
- <Page
- helpURL="file:/usr/share/doc/mandrake/${LANG}/ref.html/wiz-time.html"
- name="server_not_responding"
- executionLevel="NORMAL"
- nextFinish="false"
- canBack="true"
- canCancel="true"
- func="chooser4"
- >
-
-
- <Target
- targetName="ciao"
- jumpIndex="1"
- >
- </Target>
-
- <Target
- targetName="test_server"
- jumpIndex="2"
- >
- </Target>
-
- <Info
- helpText="WARNING"
- >
- </Info>
-
- <Info
- helpText="The time servers are not responding. The causes could be:"
- >
- </Info>
-
- <Info
- helpText="- non existent time servers"
- >
- </Info>
-
- <Info
- helpText="- no outside network"
- >
- </Info>
-
- <Info
- helpText="- other reasons..."
- >
- </Info>
-
-
- <Info
- helpText="You can try again to contact time servers, or save configuration without actually setting time."
- >
- </Info>
-
- <Chooser
- name="chooser4"
- variableName="chooser4"
- helpFontName="Default"
- helpFontStyle="plain"
- helpFontSize="12"
- editable="false"
- >
-
- <Option
- value="try_again"
- description="Try again"
- >
- </Option>
-
- <Option
- value="save_quit"
- description="Save config without test"
- >
- </Option>
- </Chooser>
- </Page>
-
- <Page
- helpURL="file:/usr/share/doc/mandrake/${LANG}/ref.html/wiz-time.html"
- name="ciao"
- nextButtonText="Quit"
- executionLevel="NORMAL"
- nextFinish="true"
- canBack="false"
- canCancel="false"
- >
-
-
- <Info
- helpText="Time server configuration saved"
- >
- </Info>
-
-
- <Info
- helpText="Your server can now act as a time server for your local network."
- >
- </Info>
-
- </Page>
-</Wizard>