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

Use a table to display SREG parameters confirmation

Browse Source
This commit is contained in:
Clément Oudot 2010-10-04 13:04:38 +00:00
parent 3b0ea0dd30
commit 0bfe3b95df
2 changed files with 27 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/OpenID/SREG.pm
View File

@ -9,6 +9,7 @@ package Lemonldap::NG::Portal::OpenID::SREG;
use strict;
use Lemonldap::NG::Common::Regexp;
use Lemonldap::NG::Portal::Simple;
use utf8;
## @method protected hash sregHook(hash prm)
# Hook called to add SREG parameters to the OpenID response
@ -170,21 +171,40 @@ sub sregHook {
# else build message and return 0
else {
# No choice for requested parameters: just an information
$self->{_openIdTrustExtMsg} .=
"<p>" . &Lemonldap::NG::Portal::_i18n::msg(PM_OPENID_AP) . "</p><ul>";
"<h3>" . &Lemonldap::NG::Portal::_i18n::msg(PM_OPENID_AP) . "</h3>\n";
$self->{_openIdTrustExtMsg} .= "<table class=\"openidsreg\">\n";
# No choice for requested parameters: just an information
foreach my $k (@req) {
$self->{_openIdTrustExtMsg} .= "<li>$k: $r{$k}</li>";
$self->{_openIdTrustExtMsg} .=
"<tr class=\"required\">\n" . "<td>"
. "<input type=\"checkbox\" disabled=\"disabled\" checked=\"checked\"/>"
. "</td>\n"
. "<td>$k</td>\n" . "<td>"
. utf8::decode( $r{$k} )
. "</td>\n"
. "</tr>\n";
}
# For optional parameters: checkboxes are displayed
$self->{_openIdTrustExtMsg} .= '</ul>';
foreach my $k (@opt) {
$self->{_openIdTrustExtMsg} .=
qq#<input type="checkbox" value="OK"#
"<tr class=\"optional\">\n"
. "<td>\n"
. "<input type=\"checkbox\" value=\"OK\""
. ( $ag{$k} ? 'checked="checked"' : '' )
. qq# name="sreg_$k" /> $k: $r{$k}<br />#;
. " name=\"sreg_$k\" />"
. "</td>\n"
. "<td>$k</td>\n" . "<td>"
. utf8::decode( $r{$k} )
. "</td>\n"
. "</tr>\n";
}
$self->{_openIdTrustExtMsg} .= "</table>\n";
$self->lmLog( 'Building validation form', 'debug' );
return ( 0, $prm );
}

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

@ -396,7 +396,7 @@ sub msg_en {
'Update Common Domain Cookie',
'Parameter %s requested for federation isn\'t available',
'Data usage policy is available at',
'Do you agree to provide the following parameters&nbsp;?',
'Do you agree to provide the following parameters?',
];
}