mirror of
https://github.com/webmin/webmin.git
synced 2026-02-08 00:12:14 +00:00
24267b8afd
..otherwise, every second click on the link from the same page, will result in 'too many redirects' error, as referer will equal initial restart target on the second go, ending-up broken
28 lines
830 B
Perl
Executable File
28 lines
830 B
Perl
Executable File
#!/usr/local/bin/perl
|
|
# restart_zone.cgi
|
|
# Apply changes to one zone only using the ndc command
|
|
use strict;
|
|
use warnings;
|
|
our (%access, %text, %in);
|
|
|
|
require './bind8-lib.pl';
|
|
&ReadParse();
|
|
$access{'ro'} && &error($text{'restart_ecannot'});
|
|
$access{'apply'} || &error($text{'restart_ecannot'});
|
|
my $zone = &get_zone_name_or_error($in{'zone'}, $in{'view'});
|
|
&can_edit_zone($zone) || &error($text{'restart_ecannot'});
|
|
my $err = &restart_zone($zone->{'name'}, $zone->{'view'});
|
|
&error($err) if ($err);
|
|
&webmin_log("apply", $zone->{'name'});
|
|
|
|
my $tv = $zone->{'type'};
|
|
my $redir_targ = ($tv eq "master" ? "edit_master.cgi" :
|
|
$tv eq "forward" ? "edit_forward.cgi" : "edit_slave.cgi");
|
|
if ($in{'return'}) {
|
|
&redirect($redir_targ . "?zone=$in{'zone'}");
|
|
}
|
|
else {
|
|
&redirect($redir_targ . "?zone=$in{'zone'}&view=$in{'view'}");
|
|
}
|
|
|