| 1 |
diff -up e-smith-lib-2.2.0/root/usr/lib/perl5/site_perl/esmith/util.pm.lib64 e-smith-lib-2.2.0/root/usr/lib/perl5/site_perl/esmith/util.pm |
| 2 |
--- e-smith-lib-2.2.0/root/usr/lib/perl5/site_perl/esmith/util.pm.lib64 2008-10-07 11:36:09.000000000 -0600 |
| 3 |
+++ e-smith-lib-2.2.0/root/usr/lib/perl5/site_perl/esmith/util.pm 2010-02-04 11:44:59.000000000 -0700 |
| 4 |
@@ -576,7 +576,11 @@ sub validatePassword($$) |
| 5 |
$reason = 'it does not contain special characters' if (not $password =~ /\W|_/); |
| 6 |
return $reason if ($reason ne 'ok' && $strength eq 'strong'); |
| 7 |
|
| 8 |
- $reason = fascist_check($password, '/usr/lib/cracklib_dict'); |
| 9 |
+ if ( -f '/usr/lib64/cracklib_dict.pwd' ) { |
| 10 |
+ $reason = fascist_check($password, '/usr/lib64/cracklib_dict'); |
| 11 |
+ } else { |
| 12 |
+ $reason = fascist_check($password, '/usr/lib/cracklib_dict'); |
| 13 |
+ } |
| 14 |
$reason ||= 'the password check failed'; |
| 15 |
|
| 16 |
return 'ok' if (lc($reason) eq 'ok'); |
Parent Directory
| 
Revision Log
| 
Revision Graph
