diff options
| author | ivan <ivan> | 2001-10-24 15:29:31 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2001-10-24 15:29:31 +0000 |
| commit | e6b57805f6b3e76448ab9b6d280f2c53bc1410f3 (patch) | |
| tree | e05b4074ba546fa07a0da0587fb048b48ae21e23 /bin/svc_acct.export | |
| parent | 40927c9cd9472719a3720270256f4300b81ebc98 (diff) | |
preliminary web config editor
new config files: username-ampersand, passwordmax
fs-setup updates
get rid of old and crufty and unused registries/ config foo
documentation updates
Diffstat (limited to 'bin/svc_acct.export')
| -rwxr-xr-x | bin/svc_acct.export | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/bin/svc_acct.export b/bin/svc_acct.export index bc27f7f02..727186085 100755 --- a/bin/svc_acct.export +++ b/bin/svc_acct.export @@ -1,6 +1,6 @@ #!/usr/bin/perl -w # -# $Id: svc_acct.export,v 1.25 2001-10-16 20:33:02 jeff Exp $ +# $Id: svc_acct.export,v 1.26 2001-10-24 15:29:30 ivan Exp $ # # Create and export password, radius and vpopmail password files: # passwd, passwd.adjunct, shadow, acp_passwd, acp_userinfo, acp_dialup @@ -254,7 +254,8 @@ foreach $svc_domain (sort {$a->domain cmp $b->domain} @svc_domain) { foreach $svc_acct (qsearch('svc_acct', {'domsvc' => $svc_domain->svcnum})) { my($password)=$svc_acct->getfield('_password'); my($cpassword,$rpassword); - if ( ( length($password) <= 8 ) + #if ( ( length($password) <= 8 ) + if ( ( length($password) <= 12 ) && ( $password ne '*' ) && ( $password ne '!!' ) && ( $password ne '' ) |