projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
import NP and *LK* from shadow file as * (no password)
[freeside.git]
/
bin
/
passwd.import
diff --git
a/bin/passwd.import
b/bin/passwd.import
index
dbd424f
..
78413c8
100755
(executable)
--- a/
bin/passwd.import
+++ b/
bin/passwd.import
@@
-1,5
+1,5
@@
#!/usr/bin/perl -Tw
#!/usr/bin/perl -Tw
-# $Id: passwd.import,v 1.5.4.
2 2003-06-12 14:06:09
ivan Exp $
+# $Id: passwd.import,v 1.5.4.
4 2004-12-24 23:27:35
ivan Exp $
use strict;
use vars qw(%part_svc);
use strict;
use vars qw(%part_svc);
@@
-14,7
+14,7
@@
use FS::part_svc;
my $user = shift or die &usage;
adminsuidsetup $user;
my $user = shift or die &usage;
adminsuidsetup $user;
-push @FS::svc_acct::shells, qw(/bin/sync /sbin/shutdown /bin/halt); #others?
+push @FS::svc_acct::shells, qw(/bin/sync /sbin/shutdown /bin/halt
/sbin/halt
); #others?
my($spooldir)="/usr/local/etc/freeside/export.". datasrc;
my($spooldir)="/usr/local/etc/freeside/export.". datasrc;
@@
-76,6
+76,8
@@
while (<SHADOW>) {
my($username,$password)=split(/:/);
#$password =~ s/^\!$/\*/;
#$password =~ s/\!+/\*SUSPENDED\* /;
my($username,$password)=split(/:/);
#$password =~ s/^\!$/\*/;
#$password =~ s/\!+/\*SUSPENDED\* /;
+ $password =~ s/^NP$/\*/;
+ $password =~ s/^\*LK\*$/\*/;
$password{$username}=$password;
}
$password{$username}=$password;
}