Subversion Repositories web_pages

Rev

Rev 16 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 16 Rev 17
Line 295... Line 295...
295
   hostname  => $config->{'hostname'}, 
295
   hostname  => $config->{'hostname'}, 
296
);
296
);
297
 
297
 
298
# get the VPN users. This is a hashref keyed by cert name, value is username
298
# get the VPN users. This is a hashref keyed by cert name, value is username
299
my $vpnCerts = $opnsense->getVpnUsers();
299
my $vpnCerts = $opnsense->getVpnUsers();
300
 
-
 
-
 
300
#die Dumper($vpnCerts);
301
# convert the cert-"user" to username->certs, array ref of certs as not sure if multiple certs per user allowed
301
# convert the cert-"user" to username->certs, array ref of certs as not sure if multiple certs per user allowed
302
foreach my $cert ( keys %$vpnCerts ) {
302
foreach my $cert ( keys %$vpnCerts ) {
303
   push @{$users->{$router}->{'users'}->{$vpnCerts->{$cert}}->{'certs'}}, $cert;
303
   push @{$users->{$router}->{'users'}->{$vpnCerts->{$cert}}->{'certs'}}, $cert;
304
}
304
}
305
 
305