require 'htpasswd-file-lib.pl';
# acl_security_form(&options)
# Output HTML for editing security options for the passwd module
sub acl_security_form
{
print "
$text{'acl_repeat'} \n";
printf " $text{'yes'}\n",
$_[0]->{'repeat'} ? "checked" : "";
printf " $text{'no'} \n",
$_[0]->{'repeat'} ? "" : "checked";
print "$text{'acl_create'} \n";
printf " $text{'yes'}\n",
$_[0]->{'create'} ? "checked" : "";
printf " $text{'no'} \n",
$_[0]->{'create'} ? "" : "checked";
print " $text{'acl_rename'} \n";
printf " $text{'yes'}\n",
$_[0]->{'rename'} ? "checked" : "";
printf " $text{'no'} \n",
$_[0]->{'rename'} ? "" : "checked";
print "$text{'acl_delete'} \n";
printf " $text{'yes'}\n",
$_[0]->{'delete'} ? "checked" : "";
printf " $text{'no'} \n",
$_[0]->{'delete'} ? "" : "checked";
print " $text{'acl_enable'} \n";
printf " $text{'yes'}\n",
$_[0]->{'enable'} ? "checked" : "";
printf " $text{'no'} \n",
$_[0]->{'enable'} ? "" : "checked";
print "$text{'acl_sync'} \n";
printf " $text{'yes'}\n",
$_[0]->{'sync'} ? "checked" : "";
printf " $text{'no'} \n",
$_[0]->{'sync'} ? "" : "checked";
print " $text{'acl_single'} \n";
printf " $text{'yes'}\n",
$_[0]->{'single'} ? "checked" : "";
printf " $text{'no'} \n",
$_[0]->{'single'} ? "" : "checked";
print " \n";
}
# acl_security_save(&options)
# Parse the form for security options for the bind8 module
sub acl_security_save
{
$_[0]->{'repeat'} = $in{'repeat'};
$_[0]->{'create'} = $in{'create'};
$_[0]->{'rename'} = $in{'rename'};
$_[0]->{'delete'} = $in{'delete'};
$_[0]->{'enable'} = $in{'enable'};
$_[0]->{'sync'} = $in{'sync'};
$_[0]->{'single'} = $in{'single'};
}