Gecko [ contributie.vriendennsm.nl ]

Linux mail.vriendennsm.nl 6.1.0-51-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.1.177-1 (2026-07-16) x86_64
Apache/2.4.68 (Debian)
Server IP : 217.154.75.17 & Your IP : 216.73.216.195
Domains : Cant Read [ /etc/named.conf ]
User : www-data

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
# Delete multiple devices

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

# Get the devices
my @devices;
my @d = split(/\0/, $in{'d'});
foreach my $d (@d) {
	push(@devices, grep { $_->{'type'} eq 'device' &&
			      $_->{'num'} eq $d } @$conf);
	}
@devices || &error($text{'devices_denone'});

# Check if in use
foreach my $device (@devices) {
	my @users = &find_extent_users($conf, $device);
	if (@users) {
		&error(&text('devices_einuse',
			$device->{'type'}.$device->{'num'},
			join(", ", map { &describe_object($_) } @users)));
		}
	}

if ($in{'confirm'}) {
	# Do the deletion
	&lock_file($config{'targets_file'});

foreach my $device (@devices) {
		&save_directive($conf, $device, undef);
		}

&unlock_file($config{'targets_file'});
	if (@devices == 1) {
		&webmin_log('delete', 'device', $devices[0]->{'type'}.
						$devices[0]->{'num'});
		}
	else {
		&webmin_log('delete', 'devices', scalar(@devices));
		}
	&redirect("list_devices.cgi");
	}
else {
	# Ask first
	&ui_print_header(undef, $text{'devices_title'}, "");

print &ui_confirmation_form(
		"delete_devices.cgi",
		&text('devices_drusure',
		      join(" ", map { $_->{'type'}.$_->{'num'} } @devices)),
		[ map { [ "d", $_ ] } @d ],
		[ [ 'confirm', $text{'devices_sure'} ] ],
		);

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