alterator-datetime-0.8/ 0000755 0000000 0000000 00000000000 11140065354 0015145 5 ustar 00root root 0000000 0000000 alterator-datetime-0.8/Makefile 0000644 0000000 0000000 00000000306 11140065354 0016604 0 ustar 00root root 0000000 0000000 NAME=datetime
all:
clean:
install: install-module install-data
include /usr/share/alterator/build/module.mak
install-data:
install -d $(datadir)/install2
cp -a preinstall.d $(datadir)/install2
alterator-datetime-0.8/applications/ 0000755 0000000 0000000 00000000000 11140065354 0017633 5 ustar 00root root 0000000 0000000 alterator-datetime-0.8/applications/datetime.desktop 0000644 0000000 0000000 00000000265 11140065354 0023025 0 ustar 00root root 0000000 0000000 [Desktop Entry]
Type=Application
Categories=X-Alterator-System
Icon=datetime
Terminal=false
Name=Date/Time
X-Alterator-URI=/datetime
X-Alterator-Weight=20
X-Alterator-Help=datetime
alterator-datetime-0.8/backend3/ 0000755 0000000 0000000 00000000000 11140065354 0016617 5 ustar 00root root 0000000 0000000 alterator-datetime-0.8/backend3/datetime 0000755 0000000 0000000 00000003501 11140065354 0020340 0 ustar 00root root 0000000 0000000 #!/bin/sh
alterator_api_version=1
ntpd_file=/etc/ntpd.conf
datadir=/usr/share/alterator-datetime/
default_pool_file="$datadir/pools"
rdelim='[[:space:]]\+'
wdelim=' '
. alterator-sh-functions
. shell-config
read_pool()
{
shell_config_get "$ntpd_file" "servers" "$rdelim"|head -n1
}
write_pool()
{
shell_config_del "$ntpd_file" "server" "$rdelim"
shell_config_del "$ntpd_file" "servers" "$rdelim"
shell_config_set "$ntpd_file" "servers" "$1" "$rdelim" "$wdelim"
}
read_runlevel()
{
sed -nr '/:initdefault:$/ {s,^id:([^:]+):.*,\1,;p}' /etc/inittab
}
on_message()
{
case "$in_action" in
type)
write_type_item ntp_pool hostname
write_type_item date date
write_type_item time time
;;
read)
#date&time
write_string_param 'date' "$(date +%F)"
write_string_param 'time' "$(date +%T)"
#ntp
write_string_param ntp_pool "$(read_pool)"
! [ "$(/usr/sbin/control ntpd)" = "server" ]
write_bool_param ntp_accept "$?"
local runlevel="$(read_runlevel)"
! LANG=C /sbin/chkconfig --list ntpd 2>/dev/null|fgrep -qsw "$runlevel:on"
write_bool_param ntp_status "$?"
;;
write)
#date&time
if [ -n "$in_date" -a -n "$in_time" ] &&
! date --set="$in_date $in_time" 2>/dev/null >/dev/null; then
write_error "`_ "unable to setup time"`"
return
fi
#ntp
[ -z "$in_ntp_pool" ] || write_pool "$in_ntp_pool"
if test_bool "$in_ntp_accept";then
/usr/sbin/control ntpd server >/dev/null 2>/dev/null
else
/usr/sbin/control ntpd client >/dev/null 2>/dev/null
fi
if test_bool "$in_ntp_status"; then
/sbin/chkconfig ntpd on
/sbin/service ntpd start >/dev/null 2>/dev/null
else
/sbin/chkconfig ntpd off
/sbin/service ntpd condstop >/dev/null 2>/dev/null
fi
/sbin/service clock sync >/dev/null 2>/dev/null
;;
esac
}
message_loop
alterator-datetime-0.8/help/ 0000755 0000000 0000000 00000000000 11140065354 0016075 5 ustar 00root root 0000000 0000000 alterator-datetime-0.8/help/ru_RU/ 0000755 0000000 0000000 00000000000 11140065354 0017131 5 ustar 00root root 0000000 0000000 alterator-datetime-0.8/help/ru_RU/datetime.html 0000644 0000000 0000000 00000005705 11140065354 0021622 0 ustar 00root root 0000000 0000000
Дата и время
Дата и время
Системное время в Linux зависит от следующих факторов:
- Часы в BIOS — часы, встроенные в компьютер; они
работают, даже если он выключен.
- Системное время — часы в ядре операционной
системы. Во время работы системы все процессы пользуются именно этими
часами.
- Часовые пояса — регионы Земли, в каждом из
которых принято единое местное время.
При запуске системы происходит активация системных часов и их
синхронизация с аппаратными, кроме того, в определённых случаях учитывается
значение часового пояса. При завершении работы системы происходит обратный
процесс.
Аппаратные часы компьютера не идеальны, минимум раз в год придётся их
«подводить». Но если у вас есть доступ к серверу точного
времени, то рекомендуется им воспользоваться. Для этого достаточно отметить
пункт «Получать точное время с NTP-сервера» и указать имя
сервера.
В большинстве случаев вас устроит сервер pool.ntp.org. Tсть аналогичные
серверы для целых регионов, например:
- ru.pool.ntp.org — для России
- ua.pool.ntp.org — для Украины
За более подробной информацией обращайтесь на сайт
http://www.pool.ntp.org/.
Если синхронизация времени с NTP-сервером настроена, то ваш компьютер
сможет сам работать как сервер точного времени. Для этого достаточно
отметить соответствующий пункт «Работать как NTP-сервер».
alterator-datetime-0.8/preinstall.d/ 0000755 0000000 0000000 00000000000 11140065354 0017544 5 ustar 00root root 0000000 0000000 alterator-datetime-0.8/preinstall.d/20-datetime.sh 0000755 0000000 0000000 00000002031 11140065354 0022112 0 ustar 00root root 0000000 0000000 #!/bin/sh -efu
# ***** BEGIN LICENSE BLOCK *****
# * Copyright (C) 2007 Alexey Gladkov
# *
# * 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.
# *
# * 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA.
# ***** END LICENSE BLOCK *****
. install2-init-functions
[ ! -f /etc/ntpd.conf ] ||
cp -af /etc/ntpd.conf "$destdir/etc/"
! chkconfig --list ntpd |grep -qs '[0-9]:on' || run_chroot chkconfig ntpd on || :
alterator-datetime-0.8/templates/ 0000755 0000000 0000000 00000000000 11140065354 0017143 5 ustar 00root root 0000000 0000000 alterator-datetime-0.8/templates/datetime/ 0000755 0000000 0000000 00000000000 11140065354 0020737 5 ustar 00root root 0000000 0000000 alterator-datetime-0.8/templates/datetime/index.html 0000644 0000000 0000000 00000002772 11140065354 0022744 0 ustar 00root root 0000000 0000000
alterator-datetime-0.8/ui/ 0000755 0000000 0000000 00000000000 11140065354 0015562 5 ustar 00root root 0000000 0000000 alterator-datetime-0.8/ui/datetime/ 0000755 0000000 0000000 00000000000 11140065354 0017356 5 ustar 00root root 0000000 0000000 alterator-datetime-0.8/ui/datetime/index.scm 0000644 0000000 0000000 00000004121 11140065354 0021167 0 ustar 00root root 0000000 0000000 (document:surround "/std/frame")
(define (update-datetime data)
(date-set value (woo-get-option data 'date))
(time-set value (woo-get-option data 'time)))
(define (write-datetime)
(woo-catch/message
(thunk
(woo-write "/datetime"
'date (date-set value)
'time (time-set value)
'ntp_status (ntp-status value)
'ntp_accept (ntp-accept value)
'ntp_pool (ntp-pool value))
(update-datetime (woo-read-first "/datetime")))))
(gridbox columns "50;50"
margin 20
(gridbox
columns "50;50"
colspan 2
align "left"
(document:id ntp-status (checkbox text (_ "Get time from NTP server:") name "ntp_status"))
(hbox (label name "ntp_pool" text (_ "NTP server:") visibility #f)
(document:id ntp-pool (edit name "ntp_pool"))))
(document:id ntp-accept (checkbox text (_ "Work as NTP server") widget-name "ntp_accept" name "ntp_accept"))
(spacer)
(separator colspan 2)
(label text (_ "Current date:") align "center" name "date")
(label text (_ "Current time:") align "center" name "time")
(document:id date-set (dateedit expanded #t name "date"))
(document:id time-set (timeedit expanded #t name "time"))
(label colspan 2)
(if (global 'frame:next-button)
(spacer)
(document:id apply-button
(button text (_ "Apply") align "left"
(when clicked (write-datetime)))))
(spacer))
(frame:on-next (thunk (or (write-datetime) 'cancel)))
(frame:on-back (thunk (or (write-datetime) 'cancel)))
(effect-disable "ntp_pool" "ntp_status" #f)
(effect-disable "ntp_accept" "ntp_status" #f)
(effect-disable "date" "ntp_status" #t)
(effect-disable "time" "ntp_status" #t)
(document:root
(when loaded
(let ((data (woo-read-first "/datetime")))
(ntp-status value (woo-get-option data 'ntp_status))
(ntp-pool value (woo-get-option data 'ntp_pool))
(ntp-accept value (woo-get-option data 'ntp_accept))
(update-datetime data)
(init-effect))))