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
# raid_form.cgi
# Display a form for creating a raid device

require './raid-lib.pl';
&foreign_require("mount");
&foreign_require("lvm");
&ReadParse();
$conf = &get_raidtab();

# Create initial object
foreach $c (@$conf) {
	if ($c->{'value'} =~ /md(\d+)$/) {
		$taken{$1} = 1;
		}
	}
$max = 0;
while($taken{$max}) {
	$max++;
	}
$raid = { 'value' => "/dev/md$max",
	  'members' => [ { 'name' => 'raid-level',
			   'value' => $in{'level'} },
			 { 'name' => 'persistent-superblock',
			   'value' => 1 }
		       ] };

&ui_print_header(undef, $text{'create_title'}, "");

# Find available partitions
@disks = &find_free_partitions(undef, 1, 1);
if (!@disks) {
	print "<p><b>$text{'create_nodisks'}</b> <p>\n";
	&ui_print_footer("", $text{'index_return'});
	exit;
	}

print &ui_form_start("create_raid.cgi");
print &ui_hidden("idx", $in{'idx'});
print &ui_table_start($text{'create_header'}, undef, 2);

# Device name
print &ui_table_row($text{'create_device'}, "<tt>$raid->{'value'}</tt>");
print &ui_hidden("device", $raid->{'value'});

# RAID level
$lvl = &find_value('raid-level', $raid->{'members'});
print &ui_table_row($text{'create_level'},
	$lvl eq 'linear' ? $text{'linear'} : $text{"raid$lvl"});
print &ui_hidden("level", $lvl);

# Create superblock?
$super = &find_value('persistent-superblock', $raid->{'members'});
print &ui_table_row($text{'create_super'},
	&ui_yesno_radio("super", $super ? 1 : 0));

# Layout
if ($lvl == 5 || $lvl == 6) {
	$layout = &find_value('parity-algorithm', $raid->{'members'});
	print &ui_table_row($text{'create_parity'},
		&ui_select("layout", $layout,
			[ [ '', $text{'default'} ],
			  'left-asymmetric', 'right-asymmetric',
			  'left-symmetric', 'right-symmetric',
			  'parity-first', 'parity-last' ]));
	}

if ($lvl == 10) {
	$layout = &find_value('parity-algorithm', $raid->{'members'});
	print &ui_table_row($text{'create_parity'},
		&ui_select("layout", $layout,
			[ [ '', $text{'default'} ],
			  [ 'n2', $text{'create_n2_layout'} ],
			  [ 'f2', $text{'create_f2_layout'} ],
			  [ 'o2', $text{'create_o2_layout'} ],
			  [ 'n3', $text{'create_n3_layout'} ],
			  [ 'f3', $text{'create_f3_layout'} ],
			  [ 'o3', $text{'create_o3_layout'} ] ]));
	}

# Chunk size
$chunk = &find_value('chunk-size', $raid->{'members'});
push(@chunks, [ '', $text{'default'} ]);
for($i=4; $i<=4096; $i*=2) { push(@chunks, [ $i, $i." kB" ]); }
print &ui_table_row($text{'create_chunk'},
	&ui_select("chunk", $chunk, \@chunks));

# Display partitions in raid, spares and parity
print &ui_table_row($text{'create_disks'},
	&ui_select("disks", undef, \@disks, 4, 1));

if ($lvl == 1 || $lvl == 4 || $lvl == 5 || $lvl == 6 || $lvl == 10) {
	print &ui_table_row($text{'create_spares'},
		&ui_select("spares", undef, \@disks, 4, 1));
	}

if ($lvl == 4 && $raid_mode ne 'mdadm') {
	print &ui_table_row($text{'create_pdisk'},
		&ui_select("pdisk", '', [ [ '', $text{'create_auto'} ],
					  @disks ], 4, 1));
	}

# Missing disk option
if ($lvl == 1 && $raid_mode eq 'mdadm') {
	print &ui_table_row($text{'create_missing'},
		&ui_yesno_radio("missing", 0));
	}

# Spare-group name option
if ($raid_mode eq 'mdadm') {
	@opts = ( [ 0, $text{'create_nogroup'} ] );
	@groups = ( );
	foreach $c (@$conf) {
		$sg = &find_value("spare-group", $c->{'members'});
		push(@groups, $sg) if ($sg);
		}
	if (@groups) {
		push(@opts, [ 1, $text{'create_oldgroup'},
			      &ui_select("group", undef, \@groups) ]);
		}
	push(@opts, [ 2, $text{'create_newgroup'},
		      &ui_textbox("newgroup", undef, 30) ]);
	print &ui_table_row($text{'create_group'},
		&ui_radio_table("group_mode", 0, \@opts, 1));
	}

# Force creation
print &ui_table_row($text{'create_force'},
	&ui_yesno_radio("force", 0));

# Assume clean
if ($raid_mode eq 'mdadm') {
	print &ui_table_row($text{'create_assume'},
		&ui_yesno_radio("assume", 0));
	}

print &ui_table_end();
print &ui_form_end([ [ undef, $text{'create'} ] ]);

&ui_print_footer("", $text{'index_return'});