summaryrefslogtreecommitdiffstats
path: root/perl-install/Makefile.config
Commit message (Expand)AuthorAgeFilesLines
* add drakx-finish-installPascal Rigaux2004-11-301-1/+1
* Introducing TMPDIRRafael Garcia-Suarez2004-09-231-0/+1
* Reverted accidentally uploaded file.Till Kamppeter2004-09-131-1/+1
* Fixed "dynamic()" in scannerdrake to do not contain anything interactive.Till Kamppeter2004-09-131-1/+1
* add listsupportedprintersThierry Vignaud2004-08-251-1/+1
* add autosetupprintqueuesThierry Vignaud2004-08-231-1/+1
* - don't use compssUsers anymore, use compssUsers.plPascal Rigaux2004-08-131-1/+1
* install drakroamThierry Vignaud2004-08-111-1/+1
* adapt to new directories layout:Pascal Rigaux2004-07-261-13/+2
* add bootloader-config (tested for adding and removing in simple cases)Pascal Rigaux2004-06-291-1/+1
* - added net_appletDaouda Lo2004-06-211-1/+1
* list service_harddrake_confirm tooThierry Vignaud2004-04-011-1/+1
* reput back drakupsThierry Vignaud2004-03-181-1/+1
* add drakvpnThierry Vignaud2004-02-131-1/+1
* move Xtest() and setMouseLive() out of c/stuff to xf86misc::mainPascal Rigaux2004-02-081-2/+2
* livedrake is deprecated/removedPascal Rigaux2004-01-071-1/+1
* obsolete livedrake, live_install, live_updatePascal Rigaux2004-01-061-1/+1
* add drakupsThierry Vignaud2003-11-261-1/+1
* install drakclockThierry Vignaud2003-11-141-1/+1
* fixing keyboard focus during install:Pascal Rigaux2003-09-081-1/+1
* add drakauthPascal Rigaux2003-08-011-1/+1
* don't install share/advertising/*.pl files inPascal Rigaux2003-03-071-2/+2
* add drakedmThierry Vignaud2003-02-061-1/+2
* added drakpxeFrancois Pons2003-01-201-1/+1
* - add drakhelpDaouda Lo2003-01-161-1/+1
* service_harddrake.sh is not a PM, so i remove it from STANDALONEPMS_Pascal Rigaux2002-12-101-1/+1
* live_install is a shell script, do not pretend it's perl ;pPascal Rigaux2002-12-101-1/+1
* - add missing printer directoryThierry Vignaud2002-11-151-1/+1
* split harddrake part that configure a module into modules::interactiveThierry Vignaud2002-09-241-1/+1
* move back draksec's files in drakxtoolsThierry Vignaud2002-09-101-1/+1
* move back draksec to drakxtoolsThierry Vignaud2002-09-101-1/+1
* add drakperm!Thierry Vignaud2002-09-041-1/+1
* - s/tinyfirewall/drakfirewall/Daouda Lo2002-09-021-1/+1
* new prog drakupdate_fstabPascal Rigaux2002-08-281-1/+1
* add draksound to standalone tools listThierry Vignaud2002-08-211-1/+1
* adding draksplash in STANDALONEPMS_Jonathan Gotti2002-08-201-1/+1
* remove dir securityPascal Rigaux2002-08-191-2/+2
* - Move xf86Wacom.so modules to {i386,ppc}-specific filelistGwenolé Beauchesne2002-08-051-0/+6
* drakconf is deadThierry Vignaud2002-08-011-1/+1
* add XconfigPascal Rigaux2002-07-241-1/+1
* add PMS_DIRS in Makefile.config and use it everywherePascal Rigaux2002-07-241-1/+2
* g Move 2: partition table: hierarchyThierry Vignaud2002-07-231-1/+1
* - Big Move 1: interactive::* hierarchyThierry Vignaud2002-07-231-1/+1
* replace drakconnet with drakconnect :-(Pascal Rigaux2002-07-111-1/+1
* replace draknet with drakconnetPascal Rigaux2002-07-111-1/+1
* add harddrake service wrapper to installed filesThierry Vignaud2002-07-091-1/+1
* - add drakbugDaouda Lo2002-07-081-1/+1
* add the harddrake service which was missingThierry Vignaud2002-07-061-1/+1
* standalone/drakbug doesn't exist! (why did deush add it???)Pascal Rigaux2002-07-061-1/+1
* it is standalone/harddrake2, not standalone/harddrake (poor deush must be loo...Pascal Rigaux2002-07-061-1/+1
/span>\n"); $adjtime[2] = $t->{UTC} ? "UTC\n" : "LOCAL\n"; output_p($adjtime_file, @adjtime); } sub reload_sys_clock { my ($t) = @_; require run_program; any::disable_x_screensaver(); run_program::run('hwclock', '--hctosys', ($t->{UTC} ? '--utc' : '--localtime')); any::enable_x_screensaver(); } #- best guesses for a given country my %c2t = ( 'AM' => 'Asia/Yerevan', 'AR' => 'America/Buenos_Aires', 'AT' => 'Europe/Vienna', 'AU' => 'Australia/Sydney', 'BA' => 'Europe/Sarajevo', 'BE' => 'Europe/Brussels', 'BG' => 'Europe/Sofia', 'BR' => 'Brazil/East', #- most people live on the east coast 'BY' => 'Europe/Minsk', 'CA' => 'Canada/Eastern', 'CH' => 'Europe/Zurich', 'CN' => 'Asia/Beijing', 'CZ' => 'Europe/Prague', 'DE' => 'Europe/Berlin', 'DK' => 'Europe/Copenhagen', 'EE' => 'Europe/Tallinn', 'ES' => 'Europe/Madrid', 'FI' => 'Europe/Helsinki', 'FR' => 'Europe/Paris', 'GB' => 'Europe/London', 'GE' => 'Asia/Yerevan', 'GL' => 'Arctic/Longyearbyen', 'GR' => 'Europe/Athens', 'HR' => 'Europe/Zagreb', 'HU' => 'Europe/Budapest', 'ID' => 'Asia/Jakarta', 'IE' => 'Europe/Dublin', 'IL' => 'Asia/Tel_Aviv', 'IN' => 'Asia/Calcutta', 'IR' => 'Asia/Tehran', 'IS' => 'Atlantic/Reykjavik', 'IT' => 'Europe/Rome', 'JP' => 'Asia/Tokyo', 'KR' => 'Asia/Seoul', 'LT' => 'Europe/Vilnius', 'LV' => 'Europe/Riga', 'MK' => 'Europe/Skopje', 'MT' => 'Europe/Malta', 'MX' => 'America/Mexico_City', 'MY' => 'Asia/Kuala_Lumpur', 'NL' => 'Europe/Amsterdam', 'NO' => 'Europe/Oslo', 'NZ' => 'Pacific/Auckland', 'PL' => 'Europe/Warsaw', 'PT' => 'Europe/Lisbon', 'RO' => 'Europe/Bucharest', 'RU' => 'Europe/Moscow', 'SE' => 'Europe/Stockholm', 'SI' => 'Europe/Ljubljana', 'SK' => 'Europe/Bratislava', 'TH' => 'Asia/Bangkok', 'TJ' => 'Asia/Dushanbe', 'TR' => 'Europe/Istanbul', 'TW' => 'Asia/Taipei', 'UA' => 'Europe/Kiev', 'US' => 'America/New_York', 'UZ' => 'Asia/Tashkent', 'VN' => 'Asia/Saigon', 'YU' => 'Europe/Belgrade', 'ZA' => 'Africa/Johannesburg', ); sub fuzzyChoice { my ($b, $count) = bestMatchSentence($_[0], keys %c2t); $count ? $b : ''; } sub bestTimezone { $c2t{fuzzyChoice($_[0])} || 'GMT' } our %ntp_servers; sub get_ntp_server_tree { my ($zone) = @_; map { $ntp_servers{$zone}{$_} => ( exists $ntp_servers{$_} ? $zone ? translate($_) . "|" . N("All servers") : N("All servers") : translate($zone) . "|" . translate($_) ), get_ntp_server_tree($_); } keys %{$ntp_servers{$zone}}; } sub ntp_servers() { +{ get_ntp_server_tree() }; } sub dump_ntp_zone { my ($zone) = @_; map { if_(/\[\d+\](.+) -- (.+\.ntp\.org)/, $1 => $2) } `lynx -dump http://www.pool.ntp.org/zone/$zone`; } sub print_ntp_zone { my ($zone, $name) = @_; my %servers = dump_ntp_zone($zone); print qq(\$ntp_servers{"$name"} = {\n); print join('', map { qq( N_("$_") => "$servers{$_}",\n) } sort(keys %servers)); print "};\n"; \%servers; } sub print_ntp_servers() { print_ntp_zone(); my $servers = print_ntp_zone('@', "Global"); foreach my $name (sort(keys %$servers)) { my ($zone) = $servers->{$name} =~ /^(.*?)\./; print_ntp_zone($zone, $name); } } # perl -Mtimezone -e 'timezone::print_ntp_servers()' $ntp_servers{""} = { N_("Global") => "pool.ntp.org", }; $ntp_servers{"Global"} = { N_("Africa") => "africa.pool.ntp.org", N_("Asia") => "asia.pool.ntp.org", N_("Europe") => "europe.pool.ntp.org", N_("North America") => "north-america.pool.ntp.org", N_("Oceania") => "oceania.pool.ntp.org", N_("South America") => "south-america.pool.ntp.org", }; $ntp_servers{"Africa"} = { N_("South Africa") => "za.pool.ntp.org", N_("Tanzania") => "tz.pool.ntp.org", }; $ntp_servers{"Asia"} = { N_("Bangladesh") => "bd.pool.ntp.org", N_("China") => "cn.pool.ntp.org", N_("Hong Kong") => "hk.pool.ntp.org", N_("India") => "in.pool.ntp.org", N_("Indonesia") => "id.pool.ntp.org", N_("Iran") => "ir.pool.ntp.org", N_("Israel") => "il.pool.ntp.org", N_("Japan") => "jp.pool.ntp.org", N_("Korea") => "kr.pool.ntp.org", N_("Malaysia") => "my.pool.ntp.org", N_("Philippines") => "ph.pool.ntp.org", N_("Singapore") => "sg.pool.ntp.org", N_("Taiwan") => "tw.pool.ntp.org", N_("Thailand") => "th.pool.ntp.org", N_("Turkey") => "tr.pool.ntp.org", N_("United Arab Emirates") => "ae.pool.ntp.org", }; $ntp_servers{"Europe"} = { N_("Austria") => "at.pool.ntp.org", N_("Belarus") => "by.pool.ntp.org", N_("Belgium") => "be.pool.ntp.org", N_("Bulgaria") => "bg.pool.ntp.org", N_("Czech Republic") => "cz.pool.ntp.org", N_("Denmark") => "dk.pool.ntp.org", N_("Estonia") => "ee.pool.ntp.org", N_("Finland") => "fi.pool.ntp.org", N_("France") => "fr.pool.ntp.org", N_("Germany") => "de.pool.ntp.org", N_("Greece") => "gr.pool.ntp.org", N_("Hungary") => "hu.pool.ntp.org", N_("Ireland") => "ie.pool.ntp.org", N_("Italy") => "it.pool.ntp.org", N_("Lithuania") => "lt.pool.ntp.org", N_("Luxembourg") => "lu.pool.ntp.org", N_("Netherlands") => "nl.pool.ntp.org", N_("Norway") => "no.pool.ntp.org", N_("Poland") => "pl.pool.ntp.org", N_("Portugal") => "pt.pool.ntp.org", N_("Romania") => "ro.pool.ntp.org", N_("Russian Federation") => "ru.pool.ntp.org", N_("Slovakia") => "sk.pool.ntp.org", N_("Slovenia") => "si.pool.ntp.org", N_("Spain") => "es.pool.ntp.org", N_("Sweden") => "se.pool.ntp.org", N_("Switzerland") => "ch.pool.ntp.org", N_("Ukraine") => "ua.pool.ntp.org", N_("United Kingdom") => "uk.pool.ntp.org", N_("Yugoslavia") => "yu.pool.ntp.org", }; $ntp_servers{"North America"} = { N_("Canada") => "ca.pool.ntp.org", N_("Guatemala") => "gt.pool.ntp.org", N_("Mexico") => "mx.pool.ntp.org", N_("United States") => "us.pool.ntp.org", }; $ntp_servers{"Oceania"} = { N_("Australia") => "au.pool.ntp.org", N_("New Zealand") => "nz.pool.ntp.org", }; $ntp_servers{"South America"} = { N_("Argentina") => "ar.pool.ntp.org", N_("Brazil") => "br.pool.ntp.org", N_("Chile") => "cl.pool.ntp.org", }; 1;