added password weakness check (require >= drakx-12.45)

2 files changed, 7 insertions, 0 deletions

diff --git a/NEWS b/NEWS
index 366c0c7..72e2b70 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,5 @@
+- added password weakness check (require >= drakx-12.45)
+
 Version 1.9.1 - 15 April 2009, Thierry Vignaud
 
 - translation updates
diff --git a/userdrake b/userdrake
index b2163e6..12bcffb 100755
--- a/userdrake
+++ b/userdrake
@@ -679,6 +679,11 @@ sub BuildUui {
 	    );
     $us->{o}{shells}->set_popdown_strings(@{$ctx->GetUserShells});
     $us->{o}{shells}->entry->set_text("/bin/bash");
+    $us->{o}{passwd}->signal_connect(changed => sub {
+	require authentication;
+	my $password_weakness = authentication::compute_password_weakness($us->{o}{passwd}->get_text);
+	$us->{o}{passwd}->modify_base('GTK_STATE_NORMAL', interactive::gtk::get_weakness_color($password_weakness));
+      });
     $vbox;
 }