index : msec	distro/mdv2009.0 distro/mdv2009.1 distro/mdv2010.0 distro/mes5 distro/mga5 master topic/MDK-10_0-branch topic/branch-0_32_1mdk
	Mageia Security Tool	git

aboutsummaryrefslogtreecommitdiffstats

log msg author committer range

path: root/share

	Commit message (Expand)	Author	Age	Files	Lines
...
*	implement no password in level 0	Frederic Lepied	2002-02-20	1	-1/+6
*	added enable_password	Frederic Lepied	2002-02-20	1	-0/+13
*	documented changes in versions 0.18 and 0.19	Frederic Lepied	2002-02-20	1	-0/+22
*	added insert_before.	Frederic Lepied	2002-02-20	1	-0/+21
*	/etc/security/msec/security.conf => /var/lib/msec/security.conf	Frederic Lepied	2002-02-19	1	-5/+48
*	use perm file from /usr/share/msec/	Frederic Lepied	2002-02-19	1	-1/+1
*	added generated files	Frederic Lepied	2002-02-15	1	-0/+2
*	use the right string for the prog name	Frederic Lepied	2002-02-15	1	-3/+3
*	allow an extra arg to specify the log to do in enable_console_log	Frederic Lepied	2002-02-15	1	-4/+5
*	only reports an error for an empty wheel group when run interactively.	Frederic Lepied	2002-02-14	1	-1/+1
*	corrected warnings reported by pychecker	Frederic Lepied	2002-02-14	3	-36/+31
*	add a delay in passowrd change before desactiving.	Frederic Lepied	2002-02-05	1	-2/+2
*	handle allowed delay in password changing.	Frederic Lepied	2002-02-05	1	-6/+9
*	use true/false for Browser value in gdm.conf	Frederic Lepied	2002-02-05	1	-2/+2
*	(exists): add an extra arg to really test if the file exists (without testing	Frederic Lepied	2002-02-05	1	-2/+2
*	handle the extra arg for allow_x_connections.	Frederic Lepied	2002-02-05	1	-5/+4
*	corrected issue moving (only when really present).	Frederic Lepied	2002-02-05	1	-12/+66
*	removed debugging trace.	Frederic Lepied	2002-02-05	1	-1/+0
*	pass the same options used for msec.py to Perms.py	Frederic Lepied	2002-02-05	1	-6/+17
*	process the options like msec to be able to log the same way.	Frederic Lepied	2002-02-05	1	-2/+36
*	create the man page for mseclib	Frederic Lepied	2002-02-02	1	-1/+7
*	first version	Frederic Lepied	2002-02-02	1	-0/+66
*	password aging for root too.	Frederic Lepied	2002-01-29	1	-2/+2
*	new option: server_level to set a different server_level from the	Frederic Lepied	2002-01-29	1	-0/+7
*	handle /etc/security/msec/server symlink through create_server_link().	Frederic Lepied	2002-01-29	1	-3/+32
*	report msec instead of msec.py in the error messages.	Frederic Lepied	2002-01-28	1	-4/+4
*	use mseclib to have a way to process a config file before really doing the	Frederic Lepied	2002-01-27	1	-43/+65
*	regroup the on/off funtions in uniq ones with an arg to decide on/off.	Frederic Lepied	2002-01-27	1	-233/+246
*	first version	Frederic Lepied	2002-01-27	2	-0/+102
*	more doc	Frederic Lepied	2002-01-22	1	-1/+5
*	experimental chkrootkit check.	Frederic Lepied	2002-01-22	1	-0/+1
*	document 0.17-13mdk changes	Frederic Lepied	2002-01-21	1	-1/+2
*	log the start of the program in interactive mode.	Frederic Lepied	2002-01-21	1	-0/+2
*	allow current to be specified for permissions too.	Frederic Lepied	2002-01-21	1	-10/+30
*	log errors.	Frederic Lepied	2002-01-21	1	-0/+1
*	protect and log errors on os calls.	Frederic Lepied	2002-01-21	1	-7/+25
*	corrected password_length mismatch.	Frederic Lepied	2002-01-17	1	-3/+3
*	0.17	Frederic Lepied	2002-01-17	11	-0/+1504

• [prev]

generated by cgit v1.2.1 (git 2.21.0) at 2025-02-26 15:18:59 +0000

package install2; # $Id$

use diagnostics;
use strict;
use Data::Dumper;

use vars qw($o $version);

#-######################################################################################
#- misc imports
#-######################################################################################
use common qw(:common :file :system :functional);
use install_any qw(:all);
use install_steps;
use commands;
use lang;
use keyboard;
use mouse;
use fsedit;
use devices;
use partition_table qw(:types);
use modules;
use detect_devices;
use run_program;
use log;
use fs;

$::VERSION = "7.1";
#-$::corporate=1;

#-######################################################################################
#- Steps table
#-######################################################################################
my (%installSteps, @orderedInstallSteps);
{    
    my @installStepsFields = qw(text redoable onError hidden needs); 
    #entered reachable toBeDone next done;
    my @installSteps = (
  selectLanguage     => [ __("Choose your language"), 1, 1, '' ],
  selectInstallClass => [ __("Select installation class"), 1, 1, '' ],
  setupSCSI          => [ __("Hard drive detection"), 1, 0, '' ],
  selectMouse        => [ __("Configure mouse"), 1, 1, '', "selectInstallClass" ],
  selectKeyboard     => [ __("Choose your keyboard"), 1, 1, '', "selectInstallClass" ],
  miscellaneous      => [ __("Miscellaneous"), 1, 1, '$::beginner' ],
  doPartitionDisks   => [ __("Setup filesystems"), 1, 0, '', "selectInstallClass" ],
  formatPartitions   => [ __("Format partitions"), 1, -1, '', "doPartitionDisks" ],
  choosePackages     => [ __("Choose packages to install"), 1, -2, '$::beginner', "formatPartitions" ],
  installPackages    => [ __("Install system"), 1, -1, '', ["formatPartitions", "selectInstallClass"] ],
  configureNetwork   => [ __("Configure networking"), 1, 1, '', "formatPartitions" ],
#-  installCrypto      => [ __("Cryptographic"), 1, 1, '!$::expert', "configureNetwork" ],
  configureTimezone  => [ __("Configure timezone"), 1, 1, '', "installPackages" ],
  configureServices  => [ __("Configure services"), 1, 1, '!$::expert', "installPackages" ],
  configurePrinter   => [ __("Configure printer"), 1, 0, '', "installPackages" ],
  setRootPassword    => [ __("Set root password"), 1, 1, '', "installPackages" ],
  addUser            => [ __("Add a user"), 1, 1, '', "installPackages" ],
arch() !~ /alpha/ ? (
  createBootdisk     => [ __("Create a bootdisk"), 1, 0, '', "installPackages" ],
) : (),
  setupBootloader    => [ __("Install bootloader"), 1, 1, '', "installPackages" ],
  configureX         => [ __("Configure X"), 1, 1, '', ["formatPartitions", "setupBootloader"] ],
arch() !~ /alpha/ ? (
  generateAutoInstFloppy => [ __("Auto install floppy"), 1, 1, '!$::expert || $o->{lnx4win}', "installPackages" ],
) : (),
  exitInstall        => [ __("Exit install"), 0, 0, '$::beginner && !$::live' ],
);
    for (my $i = 0; $i < @installSteps; $i += 2) {
	my %h; @h{@installStepsFields} = @{ $installSteps[$i + 1] };
	$h{next}    = $installSteps[$i + 2];
	$h{entered} = 0;
	$h{onError} = $installSteps[$i + 2 * $h{onError}];
	$h{reachable} = !$h{needs};
	$installSteps{ $installSteps[$i] } = \%h;
	push @orderedInstallSteps, $installSteps[$i];
    }
    $installSteps{first} = $installSteps[0];
}
#-#####################################################################################
#-INTERNAL CONSTANT
#-#####################################################################################

my @install_classes = qw(normal developer server);

#-#####################################################################################
#-Default value
#-#####################################################################################
#- partition layout
my %suggestedPartitions = (
arch() =~ /^sparc/ ? (
  normal => [
    { mntpoint => "/",     size => 150 << 11, type => 0x83, ratio => 1, maxsize =>1000 << 11 },
    { mntpoint => "swap",  size =>  64 << 11, type => 0x82, ratio => 1, maxsize => 250 << 11 },
    { mntpoint => "/usr",  size => 300 << 11, type => 0x83, ratio => 4, maxsize =>3000 << 11 },
    { mntpoint => "/home", size => 300 << 11, type => 0x83, ratio => 3 },
  ],
) : (
  normal => [