projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fix agent type selection for the simple case, RT#30942, RT#28804
[freeside.git]
/
rt
/
etc
/
upgrade
/
vulnerable-passwords
diff --git
a/rt/etc/upgrade/vulnerable-passwords
b/rt/etc/upgrade/vulnerable-passwords
index
e5b69d0
..
7f278a0
100755
(executable)
--- a/
rt/etc/upgrade/vulnerable-passwords
+++ b/
rt/etc/upgrade/vulnerable-passwords
@@
-1,9
+1,9
@@
-#!/
Users/falcone/perl5/perlbrew
/bin/perl
+#!/
usr
/bin/perl
# BEGIN BPS TAGGED BLOCK {{{
#
# COPYRIGHT:
#
# BEGIN BPS TAGGED BLOCK {{{
#
# COPYRIGHT:
#
-# This software is Copyright (c) 1996-201
1
Best Practical Solutions, LLC
+# This software is Copyright (c) 1996-201
4
Best Practical Solutions, LLC
# <sales@bestpractical.com>
#
# (Except where explicitly superseded by other copyright notices)
# <sales@bestpractical.com>
#
# (Except where explicitly superseded by other copyright notices)
@@
-49,8
+49,8
@@
use strict;
use warnings;
use strict;
use warnings;
-use lib "local/lib";
-use lib "lib";
+use lib "
/opt/rt3/
local/lib";
+use lib "
/opt/rt3/
lib";
use RT;
RT::LoadConfig;
use RT;
RT::LoadConfig;
@@
-89,6
+89,9
@@
push @{$users->{'restrictions'}{ "main.Password" }}, "AND", {
value => '40',
};
value => '40',
};
+# we want to update passwords on disabled users
+$users->{'find_disabled_rows'} = 1;
+
my $count = $users->Count;
if ($count == 0) {
print "No users with unsalted or weak cryptography found.\n";
my $count = $users->Count;
if ($count == 0) {
print "No users with unsalted or weak cryptography found.\n";