Provided by: liblemonldap-ng-portal-perl_1.4.6-3_all
NAME
Lemonldap::NG::Portal::SharedConf - Module for building Lemonldap::NG compatible portals using a central configuration database.
SYNOPSIS
use Lemonldap::NG::Portal::SharedConf; my $portal = new Lemonldap::NG::Portal::SharedConf( { configStorage => { type => 'DBI', dbiChain => "dbi:mysql:...", dbiUser => "lemonldap", dbiPassword => "password", dbiTable => "lmConfig", }, # Activate SOAP service Soap => 1 } ); if($portal->process()) { # Write here the menu with CGI methods. This page is displayed ONLY IF # the user was not redirected here. print $portal->header('text/html; charset=utf-8'); # DON'T FORGET THIS (see L<CGI(3)>) print "..."; # or redirect the user to the menu print $portal->redirect( -uri => 'https://portal/menu'); } else { # Write here the html form used to authenticate with CGI methods. # $portal->error returns the error message if athentification failed # Warning: by defaut, input names are "user" and "password" print $portal->header('text/html; charset=utf-8'); # DON'T FORGET THIS (see L<CGI(3)>) print "..."; print '<form method="POST">'; # In your form, the following value is required for redirection print '<input type="hidden" name="url" value="'.$portal->param('url').'">'; # Next, login and password print 'Login : <input name="user"><br>'; print 'Password : <input name="password" type="password" autocomplete="off">'; print '<input type="submit" value="go" />'; print '</form>'; } SOAP mode authentication (client) : #!/usr/bin/perl -l use SOAP::Lite; use Data::Dumper; my $soap = SOAP::Lite->proxy('http://auth.example.com/') ->uri('urn:/Lemonldap::NG::Common::::CGI::SOAPService'); my $r = $soap->getCookies( 'user', 'password' ); # Catch SOAP errors if ( $r->fault ) { print STDERR "SOAP Error: " . $r->fault->{faultstring}; } else { my $res = $r->result(); # If authentication failed, display error if ( $res->{error} ) { print STDERR "Error: " . $soap->error( $res->{error} )->result(); } # print session-ID else { print "Cookie: lemonldap=" . $res->{cookies}->{lemonldap}; } }
DESCRIPTION
Lemonldap::NG::Portal::SharedConf is the base module for building Lemonldap::NG compatible portals using a central database configuration. You have to use by inheritance. See Lemonldap::NG::Portal::SharedConf for a complete example.
METHODS
Same as Lemonldap::NG::Portal::Simple, but Lemonldap::NG::Portal::SharedConf adds a new sub: • scanexpr: used by setGroups to read combined LDAP and Perl expressions. See Lemonldap::NG::Portal for more. Args Lemonldap::NG::Portal::SharedConf use the same arguments than Lemonldap::NG::Portal::Simple, but you can set them either using local variables passed to "new()" or using variables issued from the database. EXPORT Constants Same as Lemonldap::NG::Portal::Simple.
SEE ALSO
Lemonldap::NG::Portal, Lemonldap::NG::Portal::SharedConf, Lemonldap::NG::Handler, Lemonldap::NG::Manager, <http://lemonldap-ng.org/>
AUTHOR
Clement Oudot, <clem.oudot@gmail.com> François-Xavier Deltombe, <fxdeltombe@gmail.com.> Xavier Guimard, <x.guimard@free.fr>
BUG REPORT
Use OW2 system to report bug or ask for features: <http://jira.ow2.org>
DOWNLOAD
Lemonldap::NG is available at <http://forge.objectweb.org/project/showfiles.php?group_id=274>
COPYRIGHT AND LICENSE
Copyright (C) 2006, 2007, 2008, 2009, 2010 by Xavier Guimard, <x.guimard@free.fr> Copyright (C) 2012 by François-Xavier Deltombe, <fxdeltombe@gmail.com.> Copyright (C) 2006, 2009, 2010, 2011, 2012 by Clement Oudot, <clem.oudot@gmail.com> This library is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see <http://www.gnu.org/licenses/>.