{"thread":{"id":"24282","subject":"[PATCH 3/4] git-cvsserver: do not try to descramble empty password","startedAt":"2010-07-03T21:23:29Z","lastAt":"2010-07-03T21:23:29Z","messageCount":1,"participants":["Áshin László"],"isPatch":true,"patchVersion":1,"patchTotal":4},"messages":[{"id":"144759","messageId":"AANLkTikUyBMOASPSQeyMLa_Vhp0QdP__c0kIsCMarY8L@mail.gmail.com","threadId":"24282","inReplyTo":"-1644121413921817001@unknownmsgid","subject":"[PATCH 3/4] git-cvsserver: do not try to descramble empty password","fromName":"Áshin László","fromEmail":"ashinlaszlo@gmail.com","sentAt":"2010-07-03T21:23:29Z","receivedAt":"2010-07-03T21:23:29Z","isPatch":true,"sender":{"key":"ashinlaszlo@gmail.com","avatar":null},"body":" git-cvsserver.perl |    6 +++++-\n 1 files changed, 5 insertions(+), 1 deletions(-)\n\ndiff --git a/git-cvsserver.perl b/git-cvsserver.perl\nindex 46e5fdb..01c5b21 100755\n--- a/git-cvsserver.perl\n+++ b/git-cvsserver.perl\n@@ -235,11 +235,15 @@ if ($state->{method} eq 'pserver') {\n            exit 1;\n        }\n\n+        if (length($password) > 0) {\n+            $password = descramble($password);\n+        }\n+\n        my $auth_ok;\n        open my $passwd, \"<\", $authdb or die $!;\n        while (<$passwd>) {\n            if (m{^\\Q$user\\E:(.*)}) {\n-                if (crypt($user, descramble($password)) eq $1) {\n+                if (crypt($user, $password) eq $1) {\n                    $auth_ok = 1;\n                }\n            };\n--\n1.7.2.rc1.dirty\n"}]}