dani/lemonldap-ng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Manage exported variables for WebID (#636)

Browse Source
This commit is contained in:
Clément Oudot 2014-02-18 16:34:08 +00:00
parent 7b9a5b1887
commit c4f277c8c8
5 changed files with 21 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lemonldap-ng-common/lib/Lemonldap/NG/Common/Conf/Attributes.pm
View File

@ -1400,6 +1400,13 @@ has 'webIDAuthnLevel' => (
documentation => 'WebID authentication level',
);
has 'webIDExportedVars' => (
is => 'rw',
isa => 'HashRef',
default => sub { return {}; },
documentation => 'WebID exported variables',
);
has 'whatToTrace' => (
is => 'rw',
isa => 'Str',

1
lemonldap-ng-common/lib/Lemonldap/NG/Common/Conf/Serializer.pm
View File

@ -132,6 +132,7 @@ sub unserialize {
|samlStorageOptions
|sessionDataToRemember
|vhostOptions
|webIDExportedVars
)$/
and $v ||= {} and not ref($v)
)

14
lemonldap-ng-manager/lib/Lemonldap/NG/Manager/_Struct.pm
View File

@ -599,10 +599,16 @@ sub struct {
# WebID
webIDParams => {
_nodes => [qw(webIDAuthnLevel webIDWhitelist)],
_help => 'authWebID',
webIDAuthnLevel => 'int:webIDAuthnLevel',
webIDWhitelist => 'text:/webIDWhitelist',
_nodes =>
[qw(webIDAuthnLevel cn:webIDExportedVars webIDWhitelist)],
_help => 'authWebID',
webIDAuthnLevel => 'int:webIDAuthnLevel',
webIDExportedVars => {
_nodes => ['hash:/webIDExportedVars:vars:btext'],
_js => 'hashRoot',
_help => 'authWebID',
},
webIDWhitelist => 'text:/webIDWhitelist',
},
# DBI

2
lemonldap-ng-manager/lib/Lemonldap/NG/Manager/_i18n.pm
View File

@ -389,6 +389,7 @@ sub en {
virtualHosts => 'Virtual Hosts',
warning => 'Warning',
webIDAuthnLevel => 'Authentication level',
webIDExportedVars => 'Exported variables',
webIDParams => 'WebID parameters',
webIDWhitelist => 'WebID whitelist',
whatToTrace => "REMOTE_USER",
@ -880,6 +881,7 @@ sub fr {
virtualHosts => 'Hôtes virtuels',
warning => 'Attention',
webIDAuthnLevel => 'Niveau d\'authentification',
webIDExportedVars => 'Variables exportées',
webIDParams => 'Paramètres WebID',
webIDWhitelist => 'Liste blanche WebID',
whatToTrace => "REMOTE_USER",

2
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/UserDBWebID.pm
View File

@ -45,7 +45,7 @@ sub setSessionInfo {
return PE_ERROR;
}
while ( my ( $k, $v ) = each %{ $self->{exportedVars} } ) {
while ( my ( $k, $v ) = each ( %{ $self->{exportedVars} } , %{ $self->{webIDExportedVars} } ) ) {
my $attr = $k;
my $req;
$attr =~ s/^!// and $req = 1;