[Netpass-devel] NetPass/www/components/Admin FormAuthLDAP,1.1,1.2 FormAuthRadius,1.1,1.2
Brought to you by:
jeffmurphy
From: jeff m. <jef...@us...> - 2005-06-08 16:35:50
|
Update of /cvsroot/netpass/NetPass/www/components/Admin In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4634/www/components/Admin Modified Files: FormAuthLDAP FormAuthRadius Log Message: bug fixes to editor, auth methods UI feature Index: FormAuthRadius =================================================================== RCS file: /cvsroot/netpass/NetPass/www/components/Admin/FormAuthRadius,v retrieving revision 1.1 retrieving revision 1.2 diff -u -d -r1.1 -r1.2 --- FormAuthRadius 3 Jun 2005 19:41:22 -0000 1.1 +++ FormAuthRadius 8 Jun 2005 16:35:41 -0000 1.2 @@ -4,7 +4,10 @@ </%doc> <%args> $prefix => ''; + $server => ''; </%args> +<script language='JavaScript'> +var <%$prefix%>radiusSecrets = new Object(); <%perl> my $rs_ = $np->cfg->getRadius(); my $rs = (ref($rs_) eq "ARRAY") ? $rs_ : []; @@ -12,15 +15,34 @@ my $ml = length($WH); foreach my $server (@$rs) { $ml = ($ml > length($server)) ? $ml : length($server); + my $sh = $np->cfg->getRadius($server); + if (ref($sh) eq "HASH") { + print qq{//$server\n}; + print qq{${prefix}radiusSecrets['$server'] = '$sh->{secret}';\n}; + } } $ml = int($ml * 1.5); $WH = "-" x $ml; </%perl> -<table border=0> -<tr><th>Radius Servers</th><th>Secret</th></tr> +</script> +<table border=0 id='<%$prefix%>FormAuthRadius'> +<tr><th>Radius Servers</th><th colspan=2>Options</th></tr> <tr><td><%$q->scrolling_list(-id => $prefix.'radiusServer', -name => $prefix.'radiusServer', - -size => 4, -values => [ $WH, @$rs ])%></td> - <td><input size=16 id='<%$prefix%>radiusSecret'></td> + -onchange => 'radius_onchange_radiusServer();' + -size => 4, -values => [ $WH, @$rs ])%><BR> + <input size=16 id='radiusAddServer' name='radiusAddServer' + onfocus='radius_onfocus_addServer('<%$prefix%>');' + onblur='radius_onblur_addServer('<%$prefix%>');' + value="Add Server..." + > + <input type='submit' onclick='radius_onclick_delServer(); return false;' + value='Delete Server'> + </td> + <td align='right' valign='top'>Secret:</td> + <td align='left' valign='top'> + <input size=16 id='<%$prefix%>radiusSecret'><BR> + + </td> </tr> </table> Index: FormAuthLDAP =================================================================== RCS file: /cvsroot/netpass/NetPass/www/components/Admin/FormAuthLDAP,v retrieving revision 1.1 retrieving revision 1.2 diff -u -d -r1.1 -r1.2 --- FormAuthLDAP 3 Jun 2005 19:41:47 -0000 1.1 +++ FormAuthLDAP 8 Jun 2005 16:35:41 -0000 1.2 @@ -4,7 +4,12 @@ </%doc> <%args> $prefix => ''; + $server => ''; </%args> +<script language='JavaScript'> +var <%$prefix%>ldapBase = new Object(); +var <%$prefix%>ldapFilter = new Object(); +var <%$prefix%>ldapPField = new Object(); <%perl> my $rs_ = $np->cfg->getLDAP(); my $rs = (ref($rs_) eq "ARRAY") ? $rs_ : []; @@ -16,13 +21,28 @@ $ml = int($ml * 1.5); $WH = "-" x $ml; </%perl> -<table border=0> +</script> + +<table border=0 id='<%$prefix%>FormAuthLDAP'> <tr><th>LDAP Servers</th><th>Options</th></tr> -<tr><td><%$q->scrolling_list(-id => $prefix.'ldapServer', -name => $prefix.'ldapServer', - -size => 4, -values => [ $WH, @$rs ])%></td> - <td><input size=16 id='<%$prefix%>ldapBase'> - <input size=16 id='<%$prefix%>ldapFilter'> - <input size=16 id='<%$prefix%>ldapPasswordField'> +<tr><td align='center' valign='top'> + <%$q->scrolling_list(-id => $prefix.'ldapServer', -name => $prefix.'ldapServer', + -onchange => 'ldap_onchange_ldapServer();', + -size => 4, -values => [ $WH, @$rs ])%><BR> + <input size=16 id='ldapAddServer' name='ldapAddServer' + onfocus='ldap_onfocus_addServer('<%$prefix%>');' + onblur='ldap_onblur_addServer('<%$prefix%>');' + value="Add Server..." + > + <input type='submit' onclick='ldap_onclick_delServer(); return false;' + value='Delete Server'> + </td> + <td align='right' valign='top'> + <table border='0'> + <tr><td align='right' valign='top'>Base:</td><td align='left' valign='top'><input size=16 id='<%$prefix%>ldapBase'></td></tr> + <tr><td align='right' valign='top'>Filter:</td><td align='left' valign='top'><input size=16 id='<%$prefix%>ldapFilter'></td></tr> + <tr><td align='right' valign='top'>Password Field:</td><td align='left' valign='top'><input size=16 id='<%$prefix%>ldapPasswordField'></td></tr> + </table> </td> </tr> </table> |