chiark
/
gitweb
/
~ian
/
cgi-auth-flexible.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
2342dbc
)
blinding: Properly lift _blind and _unblind for "" and undef
author
Ian Jackson
<ian.jackson@eu.citrix.com>
Tue, 27 Oct 2015 15:15:05 +0000
(15:15 +0000)
committer
Ian Jackson
<Ian.Jackson@eu.citrix.com>
Tue, 27 Oct 2015 15:17:25 +0000
(15:17 +0000)
Signed-off-by: Ian Jackson <Ian.Jackson@eu.citrix.com>
cgi-auth-flexible.pm
patch
|
blob
|
history
diff --git
a/cgi-auth-flexible.pm
b/cgi-auth-flexible.pm
index d5a3876b644662b963dbb51ee5a030f6189f89d4..a141877df270f8c6a111fe125ffd85230ad50b57 100644
(file)
--- a/
cgi-auth-flexible.pm
+++ b/
cgi-auth-flexible.pm
@@
-1178,7
+1178,7
@@
sub _blind_combine ($$$) {
sub _blind ($$) {
my ($r, $in) = @_;
- return
undef unless defined
$in;
+ return
$in unless
$in;
my $l = $r->_blind_len($in);
my $mask = $r->_random(($l+1)>>1);
$mask = substr $mask, 0, $l;
@@
-1188,6
+1188,7
@@
sub _blind ($$) {
sub _unblind ($$) {
my ($r, $in) = @_;
+ return $in unless $in;
my ($blound,$mask) = ($in =~ m#^(.*)/([0-9a-f]+)$#) or die "$in ?";
my $l = $r->_blind_len($blound);
$l == length($mask) or die "$in ?";