diff options
author | ivan <ivan> | 2001-12-12 19:42:21 +0000 |
---|---|---|
committer | ivan <ivan> | 2001-12-12 19:42:21 +0000 |
commit | aa0a7b4128ed5cf56684378c9cb6ebc1c3ec8c1a (patch) | |
tree | 100f18dcfdd6d5c1bf225ecbae15122c49051071 /httemplate/edit/svc_acct.cgi | |
parent | aa858d1764680bb3a195a574e7daec0feb206dbf (diff) |
allow >8 character passwords in web interface
Diffstat (limited to 'httemplate/edit/svc_acct.cgi')
-rwxr-xr-x | httemplate/edit/svc_acct.cgi | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/httemplate/edit/svc_acct.cgi b/httemplate/edit/svc_acct.cgi index 4911e0ffd..ec4f66e20 100755 --- a/httemplate/edit/svc_acct.cgi +++ b/httemplate/edit/svc_acct.cgi @@ -1,9 +1,10 @@ <% -#<!-- $Id: svc_acct.cgi,v 1.12 2001-10-30 14:54:07 ivan Exp $ --> +#<!-- $Id: svc_acct.cgi,v 1.13 2001-12-12 19:42:21 ivan Exp $ --> use strict; use vars qw( $conf $cgi @shells $action $svcnum $svc_acct $pkgnum $svcpart - $part_svc $svc $otaker $username $password $ulen $ulen2 $p1 + $part_svc $svc $otaker $username $password $ulen $ulen2 + $pmax $pmax2 $p1 $popnum $domsvc $uid $gid $finger $dir $shell $quota $slipip %svc_domain ); use CGI; @@ -100,6 +101,9 @@ if ( $svc_acct->_password ) { $ulen = $svc_acct->dbdef_table->column('username')->length; $ulen2 = $ulen+2; +$pmax = $conf->config('passwordmax') || 8; +$pmax2 = $pmax+2; + $p1 = popurl(1); print header("$action $svc account"); @@ -121,7 +125,7 @@ print &itable("#cccccc",2), <<END; <TR><TD ALIGN="right">Username</TD> <TD><INPUT TYPE="text" NAME="username" VALUE="$username" SIZE=$ulen2 MAXLENGTH=$ulen></TD></TR> <TR><TD ALIGN="right">Password</TD> -<TD><INPUT TYPE="text" NAME="_password" VALUE="$password" SIZE=10 MAXLENGTH=8> +<TD><INPUT TYPE="text" NAME="_password" VALUE="$password" SIZE=$pmax2 MAXLENGTH=$pmax> (blank to generate)</TD> </TR> END |