Recent

« previous next »
Pages: [1]

Author Topic: HMACSHA1Match() function infinite recursion  (Read 3536 times)

zamronypj

  • Full Member
  • ***
  • Posts: 133
    • Fano Framework, Free Pascal web application framework
HMACSHA1Match() function infinite recursion
« on: September 29, 2019, 07:06:44 am »
If you take a look at

https://github.com/graemeg/freepascal/blob/master/packages/hash/src/hmac.pp

Code: Pascal  [Select][+][-]
  1. function HMACSHA1Match(const ADigest1, ADigest2: THMACSHA1Digest): boolean;
  2. begin
  3.   Result := HMACSHA1Match(ADigest1, ADigest2);
  4. end;

HMACSHA1Match() is calling itself. Shouldn't it be calling SHA1Match() instead?
Logged
Fano Framework, Free Pascal web application framework https://fanoframework.github.io
Apache module executes Pascal program like scripting language https://zamronypj.github.io/mod_pascal/
Github https://github.com/zamronypj

marcov

  • Administrator
  • Hero Member
  • *
  • Posts: 11445
  • FPC developer.
Re: HMACSHA1Match() function infinite recursion
« Reply #1 on: September 29, 2019, 12:15:02 pm »
Seems resolved

43087 michael 2019-09-29 08:18:57 +0200 (Sun, 29 Sep 2019)
* Fix bug 000036113
Commit consists out of 1 line

    M /trunk/packages/hash/src/hmac.pp
Logged

zamronypj

  • Full Member
  • ***
  • Posts: 133
    • Fano Framework, Free Pascal web application framework
Re: HMACSHA1Match() function infinite recursion
« Reply #2 on: September 29, 2019, 01:05:07 pm »
That was quick. Kudos to Michael
Logged
Fano Framework, Free Pascal web application framework https://fanoframework.github.io
Apache module executes Pascal program like scripting language https://zamronypj.github.io/mod_pascal/
Github https://github.com/zamronypj
Pages: [1]
« previous next »
 

TinyPortal © 2005-2018