Skip to content

Commit

Permalink
contrib/cap_sasl.pl: rename state to step as other SASL implement…
Browse files Browse the repository at this point in the history
…ations call it
  • Loading branch information
grawity committed Feb 23, 2014
1 parent 2a21af6 commit ad1725d
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions contrib/cap_sasl.pl
Original file line number Diff line number Diff line change
Expand Up @@ -54,7 +54,7 @@ sub event_cap {
$server->print('', "CLICAP: now enabled:$caps");
if ($caps =~ / sasl /i) {
$sasl_auth{$server->{tag}}{buffer} = '';
$sasl_auth{$server->{tag}}{state} = 0;
$sasl_auth{$server->{tag}}{step} = 0;
if($mech{$sasl_auth{$server->{tag}}{mech}}) {
$server->send_raw_now("AUTHENTICATE " . $sasl_auth{$server->{tag}}{mech});
Irssi::timeout_add_once(7500, \&timeout, $server->{tag});
Expand Down Expand Up @@ -364,8 +364,8 @@ sub in_path {
my($sasl, $data) = @_;
my $u = $sasl->{user};
my $k = $sasl->{password};
my $state = ++$sasl->{state};
if ($state == 1) {
my $step = ++$sasl->{step};
if ($step == 1) {
if (length $data) {
my $signpayload = encode_base64($data);
my $payload = $ecdsa_sign->($k, $signpayload);
Expand All @@ -374,7 +374,7 @@ sub in_path {
return $u."\0".$u;
}
}
elsif ($state == 2) {
elsif ($step == 2) {
my $signpayload = encode_base64($data);
my $payload = $ecdsa_sign->($k, $signpayload);
return decode_base64($payload);
Expand Down

0 comments on commit ad1725d

Please sign in to comment.