← Back
Editing: restart_zone.cgi
#!/usr/bin/perl # restart_zone.cgi # Apply changes to one zone only using the ndc command use strict; use warnings; no warnings 'redefine'; no warnings 'uninitialized'; our (%access, %text, %in); require './bind8-lib.pl'; ## no critic &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'}); &redirect(&redirect_url($zone->{'type'}, $in{'zone'}, $in{'view'}));
Save File
Cancel