Gecko [ contributie.vriendennsm.nl ]

Name	Size	Permission	Date
images	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
lang	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
CHANGELOG	2.21 KB	-rw-r--r--	2026-07-17 21:17
backup_config.pl	721 B	-rwxr-xr-x	2026-07-17 21:17
cgi_args.pl	243 B	-rwxr-xr-x	2026-07-17 21:17
config	63 B	-rw-r--r--	2026-07-17 21:17
config-debian-linux-3.1-ALL	69 B	-rw-r--r--	2026-07-17 21:17
config.info	219 B	-rw-r--r--	2026-07-17 21:17
config.info.bg	382 B	-rw-r--r--	2026-07-17 21:17
config.info.ca	243 B	-rw-r--r--	2026-07-17 21:17
config.info.cs	232 B	-rw-r--r--	2026-07-17 21:17
config.info.de	247 B	-rw-r--r--	2026-07-17 21:17
config.info.es	265 B	-rw-r--r--	2026-07-17 21:17
config.info.fr	271 B	-rw-r--r--	2026-07-17 21:17
config.info.hu	0 B	-rw-r--r--	2026-07-17 21:17
config.info.nl	222 B	-rw-r--r--	2026-07-17 21:17
config.info.no	227 B	-rw-r--r--	2026-07-17 21:17
config.info.pl	76 B	-rw-r--r--	2026-07-17 21:17
config.info.ru	147 B	-rw-r--r--	2026-07-17 21:17
config.info.sv	76 B	-rw-r--r--	2026-07-17 21:17
config.info.tr	78 B	-rw-r--r--	2026-07-17 21:17
config.info.uk	140 B	-rw-r--r--	2026-07-17 21:17
config.info.zh	62 B	-rw-r--r--	2026-07-17 21:17
config.info.zh_TW	72 B	-rw-r--r--	2026-07-17 21:17
create_raid.cgi	2.75 KB	-rwxr-xr-x	2026-07-17 21:22
index.cgi	3.72 KB	-rwxr-xr-x	2026-07-17 21:22
install_check.pl	428 B	-rwxr-xr-x	2026-07-17 21:17
log_parser.pl	1.52 KB	-rwxr-xr-x	2026-07-17 21:17
mkfs.cgi	957 B	-rwxr-xr-x	2026-07-17 21:22
module.info	180 B	-rw-r--r--	2026-07-17 21:17
module.info.ar	0 B	-rw-r--r--	2026-07-17 21:17
module.info.ar.auto	152 B	-rw-r--r--	2026-07-17 21:17
module.info.bg	0 B	-rw-r--r--	2026-07-17 21:17
module.info.bg.auto	148 B	-rw-r--r--	2026-07-17 21:17
module.info.ca	117 B	-rw-r--r--	2026-07-17 21:17
module.info.ca.auto	13 B	-rw-r--r--	2026-07-17 21:17
module.info.cs	19 B	-rw-r--r--	2026-07-17 21:17
module.info.cs.auto	103 B	-rw-r--r--	2026-07-17 21:17
module.info.da	0 B	-rw-r--r--	2026-07-17 21:17
module.info.da.auto	114 B	-rw-r--r--	2026-07-17 21:17
module.info.de	107 B	-rw-r--r--	2026-07-17 21:17
module.info.de.auto	13 B	-rw-r--r--	2026-07-17 21:17
module.info.el	0 B	-rw-r--r--	2026-07-17 21:17
module.info.el.auto	181 B	-rw-r--r--	2026-07-17 21:17
module.info.es	22 B	-rw-r--r--	2026-07-17 21:17
module.info.es.auto	100 B	-rw-r--r--	2026-07-17 21:17
module.info.eu	0 B	-rw-r--r--	2026-07-17 21:17
module.info.eu.auto	114 B	-rw-r--r--	2026-07-17 21:17
module.info.fa	0 B	-rw-r--r--	2026-07-17 21:17
module.info.fa.auto	173 B	-rw-r--r--	2026-07-17 21:17
module.info.fi	0 B	-rw-r--r--	2026-07-17 21:17
module.info.fi.auto	119 B	-rw-r--r--	2026-07-17 21:17
module.info.fr	0 B	-rw-r--r--	2026-07-17 21:17
module.info.fr.auto	131 B	-rw-r--r--	2026-07-17 21:17
module.info.hr	0 B	-rw-r--r--	2026-07-17 21:17
module.info.hr.auto	115 B	-rw-r--r--	2026-07-17 21:17
module.info.hu	19 B	-rw-r--r--	2026-07-17 21:17
module.info.hu.auto	114 B	-rw-r--r--	2026-07-17 21:17
module.info.it	0 B	-rw-r--r--	2026-07-17 21:17
module.info.it.auto	115 B	-rw-r--r--	2026-07-17 21:17
module.info.ja	20 B	-rw-r--r--	2026-07-17 21:17
module.info.ja.auto	127 B	-rw-r--r--	2026-07-17 21:17
module.info.ko	23 B	-rw-r--r--	2026-07-17 21:17
module.info.ko.auto	111 B	-rw-r--r--	2026-07-17 21:17
module.info.ms	98 B	-rw-r--r--	2026-07-17 21:17
module.info.ms.auto	13 B	-rw-r--r--	2026-07-17 21:17
module.info.nl	19 B	-rw-r--r--	2026-07-17 21:17
module.info.nl.auto	98 B	-rw-r--r--	2026-07-17 21:17
module.info.no	19 B	-rw-r--r--	2026-07-17 21:17
module.info.no.auto	103 B	-rw-r--r--	2026-07-17 21:17
module.info.pl	25 B	-rw-r--r--	2026-07-17 21:17
module.info.pl.auto	96 B	-rw-r--r--	2026-07-17 21:17
module.info.pt	22 B	-rw-r--r--	2026-07-17 21:17
module.info.pt.auto	103 B	-rw-r--r--	2026-07-17 21:17
module.info.pt_BR	0 B	-rw-r--r--	2026-07-17 21:17
module.info.pt_BR.auto	134 B	-rw-r--r--	2026-07-17 21:17
module.info.ru	19 B	-rw-r--r--	2026-07-17 21:17
module.info.ru.auto	129 B	-rw-r--r--	2026-07-17 21:17
module.info.sk	0 B	-rw-r--r--	2026-07-17 21:17
module.info.sk.auto	117 B	-rw-r--r--	2026-07-17 21:17
module.info.sv	19 B	-rw-r--r--	2026-07-17 21:17
module.info.sv.auto	97 B	-rw-r--r--	2026-07-17 21:17
module.info.tr	19 B	-rw-r--r--	2026-07-17 21:17
module.info.tr.auto	99 B	-rw-r--r--	2026-07-17 21:17
module.info.uk	0 B	-rw-r--r--	2026-07-17 21:17
module.info.uk.auto	146 B	-rw-r--r--	2026-07-17 21:17
module.info.zh	27 B	-rw-r--r--	2026-07-17 21:17
module.info.zh.auto	96 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW	30 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW.auto	102 B	-rw-r--r--	2026-07-17 21:17
raid-lib.pl	22.25 KB	-rwxr-xr-x	2026-07-17 21:17
raid_form.cgi	3.88 KB	-rwxr-xr-x	2026-07-17 21:22
save_mdadm.cgi	939 B	-rwxr-xr-x	2026-07-17 21:22
save_raid.cgi	4.15 KB	-rwxr-xr-x	2026-07-17 21:22
view_raid.cgi	7.15 KB	-rwxr-xr-x	2026-07-17 21:22

Rename

#!/usr/bin/perl
# create_raid.cgi
# Create raid set

require './raid-lib.pl';
&ReadParse();
&lock_raid_files();
$conf = &get_raidtab();

# Build config file structure
&error_setup($text{'create_err'});
$raid = { 'name' => 'raiddev',
	  'value' => $in{'device'},
	  'members' => \@members };
push(@members, { 'name' => 'raid-level',
		 'value' => $in{'level'} } );
push(@members, { 'name' => 'persistent-superblock',
		 'value' => $in{'super'} } );
if ($in{'layout'}) {
	push(@members, { 'name' => 'parity-algorithm',
			 'value' => $in{'layout'} } );
	}
if ($in{'chunk'}) {
	push(@members, { 'name' => 'chunk-size',
			 'value' => $in{'chunk'} } );
	}

# Add RAID disks
@disks = split(/\0/, $in{'disks'});
if (!@disks) {
	&error($text{'create_edisks'});
	}
elsif ($in{'level'} == 1 && scalar(@disks)+$in{'missing'} < 2) {
	&error($text{'create_edisks2'});
	}
push(@members, { 'name' => 'nr-raid-disks',
		 'value' => scalar(@disks)+($in{'pdisk'} ? 1 : 0) } );
for($i=0; $i<@disks; $i++) {
	push(@members, { 'name' => 'device',
			 'value' => $disks[$i],
			 'members' => [ { 'name' => 'raid-disk',
					  'value' => $i } ] } );
	}

# Add spares
@spares = split(/\0/, $in{'spares'});
if (@spares) {
	push(@members, { 'name' => 'nr-spare-disks',
			 'value' => scalar(@spares) } );
	for($i=0; $i<@spares; $i++) {
		if (&indexof($spares[$i], @disks) != -1) {
			&error(&text('create_espare', $spares[$i]));
			}
		push(@members, { 'name' => 'device',
				 'value' => $spares[$i],
				 'members' => [ { 'name' => 'spare-disk',
						  'value' => $i } ] } );
		}
	}

# Add parity disk
if ($in{'pdisk'}) {
	&indexof($in{'pdisk'}, @disks) < 0 || &error($text{'create_epdisk'});
	push(@members, { 'name' => 'device',
			 'value' => $in{'pdisk'},
			 'members' => [ { 'name' => 'parity-disk',
					  'value' => 0 } ] } );
	}

# Parse spare group
if ($in{'group_mode'} == 1) {
	push(@members, { 'name' => 'spare-group',
			 'value' => $in{'group'} });
	}
elsif ($in{'group_mode'} == 2) {
	$in{'newgroup'} =~ /^[a-z0-9\_]+$/i ||
		&error($text{'create_enewgroup'});
	push(@members, { 'name' => 'spare-group',
			 'value' => $in{'newgroup'} });
	}

if ($raid_mode eq "raidtools") {
	# Create config before actually creating RAID.
	&create_raid($raid);
	}

if ($err = &make_raid($raid, $in{'force'}, $in{'missing'}, $in{'assume'})) {
	if ($raid_mode eq "raidtools") {
		&delete_raid($raid);
		}
	&error($err);
	}
elsif ($raid_mode eq "mdadm") {
	# Create config after actually creating RAID to be able to get UUID.
	$uuid = &get_uuid($raid);
	&create_raid($raid, $uuid);
	if ($in{'level'} != 0) {
		# Set RAID to read/write mode after creation except for RAID0 which is automatically set to read/write.
		&readwrite_raid($raid);
		}
	}

&unlock_raid_files();

&webmin_log("create", undef, $in{'device'}, \%in);
&redirect("");