You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

27 lines
906 B

11 years ago
{
my $llng = $DB->get("lemonldap") ||
$DB->new_record("lemonldap", { type => "service" });
my @soapaccess = split(/[;,]/, ($llng->prop('SoapAllowFrom') || ''));
my $internal = $DB->get('InternalInterface')->prop('IPAddress');
push @soapaccess, $internal if (!grep {$internal eq $_} @soapaccess);
$llng->set_prop('SoapAllowFrom', join(',',@soapaccess));
# httpd-admin handler
my @reload = split(/[;,]/, ($llng->prop('Reload') || ''));
my $reloadurl = 'localhost:980=http://localhost:980/lm-reload';
push @reload, $reloadurl if (!grep {$reloadurl eq $_} @reload);
# httpd-pki handler
$reloadurl = 'localhost:940=http://localhost:940/lm-reload';
my $phpki = $DB->get('httpd-pki');
if($phpki){
my $status = $phpki->prop('status') || 'disabled';
push @reload, $reloadurl if ((!grep {$reloadurl eq $_} @reload) && ($status eq 'enabled'));
}
$llng->set_prop('Reload', join(',',@reload));
}