Gecko [ contributie.vriendennsm.nl ]

Name	Size	Permission	Date
help	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
images	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
lang	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
CHANGELOG	106 B	-rw-r--r--	2026-07-17 21:17
atboot.cgi	959 B	-rwxr-xr-x	2026-07-17 21:22
backup_config.pl	677 B	-rwxr-xr-x	2026-07-17 21:17
config	192 B	-rw-r--r--	2026-07-17 21:17
config-freebsd	179 B	-rw-r--r--	2026-07-17 21:17
config.info	238 B	-rw-r--r--	2026-07-17 21:17
config.info.ca	298 B	-rw-r--r--	2026-07-17 21:17
config.info.de	265 B	-rw-r--r--	2026-07-17 21:17
config.info.no	250 B	-rw-r--r--	2026-07-17 21:17
delete_devices.cgi	1.48 KB	-rwxr-xr-x	2026-07-17 21:22
delete_extents.cgi	1.48 KB	-rwxr-xr-x	2026-07-17 21:22
delete_targets.cgi	1.2 KB	-rwxr-xr-x	2026-07-17 21:22
delete_users.cgi	858 B	-rwxr-xr-x	2026-07-17 21:22
edit_device.cgi	1.84 KB	-rwxr-xr-x	2026-07-17 21:22
edit_extent.cgi	3.16 KB	-rwxr-xr-x	2026-07-17 21:22
edit_manual.cgi	654 B	-rwxr-xr-x	2026-07-17 21:22
edit_opts.cgi	1.03 KB	-rwxr-xr-x	2026-07-17 21:22
edit_target.cgi	2.15 KB	-rwxr-xr-x	2026-07-17 21:22
edit_user.cgi	1.33 KB	-rwxr-xr-x	2026-07-17 21:22
index.cgi	1.78 KB	-rwxr-xr-x	2026-07-17 21:22
install_check.pl	353 B	-rwxr-xr-x	2026-07-17 21:17
iscsi-server-lib.pl	12.27 KB	-rw-r--r--	2026-07-17 21:17
list_devices.cgi	1.31 KB	-rwxr-xr-x	2026-07-17 21:22
list_extents.cgi	1.21 KB	-rwxr-xr-x	2026-07-17 21:22
list_targets.cgi	1.46 KB	-rwxr-xr-x	2026-07-17 21:22
list_users.cgi	1.02 KB	-rwxr-xr-x	2026-07-17 21:22
log_parser.pl	682 B	-rwxr-xr-x	2026-07-17 21:17
module.info	214 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	179 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	191 B	-rw-r--r--	2026-07-17 21:17
module.info.ca	149 B	-rw-r--r--	2026-07-17 21:17
module.info.cs	0 B	-rw-r--r--	2026-07-17 21:17
module.info.cs.auto	123 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	122 B	-rw-r--r--	2026-07-17 21:17
module.info.de	126 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	226 B	-rw-r--r--	2026-07-17 21:17
module.info.es	0 B	-rw-r--r--	2026-07-17 21:17
module.info.es.auto	145 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	122 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	188 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	120 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	147 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	128 B	-rw-r--r--	2026-07-17 21:17
module.info.hu	0 B	-rw-r--r--	2026-07-17 21:17
module.info.hu.auto	152 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	140 B	-rw-r--r--	2026-07-17 21:17
module.info.ja	0 B	-rw-r--r--	2026-07-17 21:17
module.info.ja.auto	179 B	-rw-r--r--	2026-07-17 21:17
module.info.ko	0 B	-rw-r--r--	2026-07-17 21:17
module.info.ko.auto	160 B	-rw-r--r--	2026-07-17 21:17
module.info.ms	144 B	-rw-r--r--	2026-07-17 21:17
module.info.nl	0 B	-rw-r--r--	2026-07-17 21:17
module.info.nl.auto	133 B	-rw-r--r--	2026-07-17 21:17
module.info.no	122 B	-rw-r--r--	2026-07-17 21:17
module.info.pl	0 B	-rw-r--r--	2026-07-17 21:17
module.info.pl.auto	127 B	-rw-r--r--	2026-07-17 21:17
module.info.pt	0 B	-rw-r--r--	2026-07-17 21:17
module.info.pt.auto	131 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	137 B	-rw-r--r--	2026-07-17 21:17
module.info.ru	0 B	-rw-r--r--	2026-07-17 21:17
module.info.ru.auto	218 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	121 B	-rw-r--r--	2026-07-17 21:17
module.info.sv	0 B	-rw-r--r--	2026-07-17 21:17
module.info.sv.auto	115 B	-rw-r--r--	2026-07-17 21:17
module.info.tr	0 B	-rw-r--r--	2026-07-17 21:17
module.info.tr.auto	135 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	202 B	-rw-r--r--	2026-07-17 21:17
module.info.zh	0 B	-rw-r--r--	2026-07-17 21:17
module.info.zh.auto	116 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW	0 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW.auto	122 B	-rw-r--r--	2026-07-17 21:17
restart.cgi	355 B	-rwxr-xr-x	2026-07-17 21:22
save_device.cgi	1.96 KB	-rwxr-xr-x	2026-07-17 21:22
save_extent.cgi	2.45 KB	-rwxr-xr-x	2026-07-17 21:22
save_manual.cgi	456 B	-rwxr-xr-x	2026-07-17 21:22
save_opts.cgi	1.14 KB	-rwxr-xr-x	2026-07-17 21:22
save_target.cgi	1.85 KB	-rwxr-xr-x	2026-07-17 21:22
save_user.cgi	1.06 KB	-rwxr-xr-x	2026-07-17 21:22
start.cgi	332 B	-rwxr-xr-x	2026-07-17 21:22
stop.cgi	307 B	-rwxr-xr-x	2026-07-17 21:22

Rename

#!/usr/bin/perl
# Show a form to edit or create an device

use strict;
use warnings;
no warnings 'redefine';
no warnings 'uninitialized';
require './iscsi-server-lib.pl';
our (%text, %in);
my $conf = &get_iscsi_config();
&ReadParse();

# Get the device, or create a new one
my $device;
if ($in{'new'}) {
	&ui_print_header(undef, $text{'device_create'}, "");
	$device = { 'num' => &find_free_num($conf, 'device'),
		    'type' => 'device',
		    'mode' => 'raid0',
		    'start' => 0 };
	}
else {
	$device = &find($conf, "device", $in{'num'});
	$device || &text('device_egone', $in{'num'});
	&ui_print_header(undef, $text{'device_edit'}, "");
	}

# Show editing form
print &ui_form_start("save_device.cgi", "post");
print &ui_hidden("new", $in{'new'});
print &ui_hidden("num", $in{'num'});
print &ui_table_start($text{'device_header'}, undef, 2);

# Device name/number
print &ui_table_row($text{'device_name'},
		    $device->{'type'}.$device->{'num'});

# Combination mode
print &ui_table_row($text{'device_mode'},
		    &ui_radio("mode", $device->{'mode'},
			      [ [ 'raid0', $text{'devices_mode_raid0'} ],
				[ 'raid1', $text{'devices_mode_raid1'} ] ]));

# Component devices / extents
my @poss = map { [ $_->{'type'}.$_->{'num'}, &describe_object($_) ] }
		grep { $_ ne $device }
			( &find($conf, 'extent'), &find($conf, 'device') );
my @got = map { my $name = $_;
		my ($g) = grep { $_->[0] eq $name } @poss;
		$g || [ $name, $name ] } @{$device->{'extents'}};
print &ui_table_row($text{'device_extents'},
	&ui_multi_select("extents", \@got, \@poss, 10, 1, 0,
			 $text{'device_poss'}, $text{'device_got'}, 300));

print &ui_table_end();
if ($in{'new'}) {
	print &ui_form_end([ [ undef, $text{'create'} ] ]);
	}
else {
	print &ui_form_end([ [ undef, $text{'save'} ],
			     [ 'delete', $text{'delete'} ] ]);
	}

&ui_print_footer("list_devices.cgi", $text{'devices_return'});