Gecko [ 122.154.134.11 ]

Name	Size	Permission
help	[ DIR ]	drwxr-xr-x
images	[ DIR ]	drwxr-xr-x
lang	[ DIR ]	drwxr-xr-x
CHANGELOG	106 B	-rw-r--r--
atboot.cgi	906 B	-rwxr-xr-x
backup_config.pl	672 B	-rwxr-xr-x
config	192 B	-rw-r--r--
config-freebsd	179 B	-rw-r--r--
config.info	238 B	-rw-r--r--
config.info.ca	294 B	-rw-r--r--
config.info.ca.UTF-8	298 B	-rw-r--r--
config.info.de	265 B	-rw-r--r--
config.info.de.UTF-8	265 B	-rw-r--r--
config.info.no	258 B	-rw-r--r--
config.info.no.UTF-8	258 B	-rw-r--r--
delete_devices.cgi	1.43 KB	-rwxr-xr-x
delete_extents.cgi	1.43 KB	-rwxr-xr-x
delete_targets.cgi	1.15 KB	-rwxr-xr-x
delete_users.cgi	805 B	-rwxr-xr-x
edit_device.cgi	1.79 KB	-rwxr-xr-x
edit_extent.cgi	3.11 KB	-rwxr-xr-x
edit_manual.cgi	601 B	-rwxr-xr-x
edit_opts.cgi	1002 B	-rwxr-xr-x
edit_target.cgi	2.09 KB	-rwxr-xr-x
edit_user.cgi	1.28 KB	-rwxr-xr-x
index.cgi	1.72 KB	-rwxr-xr-x
install_check.pl	348 B	-rwxr-xr-x
iscsi-server-lib.pl	12.22 KB	-rw-r--r--
list_devices.cgi	1.25 KB	-rwxr-xr-x
list_extents.cgi	1.16 KB	-rwxr-xr-x
list_targets.cgi	1.41 KB	-rwxr-xr-x
list_users.cgi	994 B	-rwxr-xr-x
log_parser.pl	677 B	-rwxr-xr-x
module.info	214 B	-rw-r--r--
module.info.ca	148 B	-rw-r--r--
module.info.ca.UTF-8	161 B	-rw-r--r--
module.info.de	134 B	-rw-r--r--
module.info.de.UTF-8	146 B	-rw-r--r--
module.info.ms_MY	150 B	-rw-r--r--
module.info.ms_MY.UTF-8	162 B	-rw-r--r--
module.info.no	122 B	-rw-r--r--
module.info.no.UTF-8	134 B	-rw-r--r--
restart.cgi	302 B	-rwxr-xr-x
save_device.cgi	1.91 KB	-rwxr-xr-x
save_extent.cgi	2.4 KB	-rwxr-xr-x
save_manual.cgi	403 B	-rwxr-xr-x
save_opts.cgi	1.09 KB	-rwxr-xr-x
save_target.cgi	1.8 KB	-rwxr-xr-x
save_user.cgi	1.01 KB	-rwxr-xr-x
start.cgi	279 B	-rwxr-xr-x
stop.cgi	254 B	-rwxr-xr-x

Code Editor : edit_extent.cgi

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

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

# Get the extent, or create a new one
my $extent;
if ($in{'new'}) {
	&ui_print_header(undef, $text{'extent_create'}, "");
	$extent = { 'num' => &find_free_num($conf, 'extent'),
		    'type' => 'extent',
		    'start' => 0 };
	}
else {
	$extent = &find($conf, "extent", $in{'num'});
	$extent || &text('extent_egone', $in{'num'});
	&ui_print_header(undef, $text{'extent_edit'}, "");
	}

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

# Extent name/number
print &ui_table_row($text{'extent_name'},
		    $extent->{'type'}.$extent->{'num'});

# Device to share, starting with disk partitions
my @opts;
my $part_found = 0;
my $sel = &fdisk::partition_select("part", $extent->{'device'}, 0,
				   \$part_found);
push(@opts, [ 'part', $text{'extent_part'}, $sel ]);

# Then add RAID devices
my $rconf = &raid::get_raidtab();
my @ropts;
my $raid_found = 0;
foreach my $c (@$rconf) {
	if ($c->{'active'}) {
		push(@ropts, [ $c->{'value'},
			       &text('extent_md',
				     substr($c->{'value'}, -1)) ]);
		$raid_found = 1 if ($extent->{'device'} eq $c->{'value'});
		}
	}
if (@ropts) {
	push(@opts, [ 'raid', $text{'extent_raid'},
		      &ui_select("raid", $extent->{'device'}, \@ropts) ]);
	}

# Then add LVM logical volumes
my @vgs = sort { $a->{'name'} cmp $b->{'name'} } &lvm::list_volume_groups();
my @lvs;
foreach my $v (@vgs) {
	push(@lvs, sort { $a->{'name'} cmp $b->{'name'} }
			&lvm::list_logical_volumes($v->{'name'}));
	}
my @lopts;
my $lvm_found = 0;
foreach my $l (@lvs) {
	push(@lopts, [ $l->{'device'},
		       &text('extent_lv', $l->{'vg'}, $l->{'name'}) ]);
	$lvm_found = 1 if (&same_file($extent->{'device'}, $l->{'device'}));
	}
if (@lopts) {
	push(@opts, [ 'lvm', $text{'extent_lvm'},
		      &ui_select("lvm", $extent->{'device'}, \@lopts) ]);
	}

# Then add other file mode
my $mode = $part_found ? 'part' :
	   $raid_found ? 'raid' :
	   $lvm_found ? 'lvm' : 'other';
push(@opts, [ 'other', $text{'extent_other'},
	      &ui_textbox("other",
			  $mode eq 'other' ? $extent->{'device'} : "", 50).
	      " ".&file_chooser_button("other") ]);

print &ui_table_row($text{'extent_device'},
	&ui_radio_table("mode", $mode, \@opts));

# Byte offset for start
print &ui_table_row($text{'extent_start'},
	&ui_bytesbox("start", $extent->{'start'}));

# Byte size to share
print &ui_table_row($text{'extent_size'},
	&ui_radio("size_def",
		  $in{'new'} ? 1 :
		  &get_device_size($extent->{'device'}, $mode) ==
		    $extent->{'size'} ? 1 : 0,
		  [ [ 1, $text{'extent_size_def1'} ],
		    [ 0, $text{'extent_size_def0'} ] ])." ".
	&ui_bytesbox("size", $extent->{'size'}));

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_extents.cgi", $text{'extents_return'});

${this.title}

Code Editor : edit_extent.cgi