Add groups to default test page (#2036)

This commit is contained in:
Maxime Besson 2020-02-06 16:55:48 +01:00
parent ae9740f170
commit edc2984c00
2 changed files with 8 additions and 2 deletions

View File

@ -96,10 +96,12 @@
"domain" : "__DNSDOMAIN__",
"exportedHeaders" : {
"test1.__DNSDOMAIN__" : {
"Auth-User" : "$uid"
"Auth-User" : "$uid",
"Auth-Groups" : "$groups"
},
"test2.__DNSDOMAIN__" : {
"Auth-User" : "$uid"
"Auth-User" : "$uid",
"Auth-Groups" : "$groups"
}
},
"exportedVars" : {},

View File

@ -92,6 +92,10 @@ print
print "<li>Connected user: <ul>\n";
print "<li><tt>\$ENV{HTTP_AUTH_USER}</tt>: $ENV{HTTP_AUTH_USER}</li>\n";
print "<li><tt>\$ENV{REMOTE_USER}</tt>: $ENV{REMOTE_USER}</li>\n";
print "</ul><li>Groups: <ul>\n";
for my $grp (split /; /, $ENV{HTTP_AUTH_GROUPS}) {
print "<li>$grp</li>\n";
}
print "</ul></li>\n";
print "</ul>\n";
print