FIX: KAScrypt - TDCP_blockcipher128.IncCounter

This commit is contained in:
Alexander Koblov 2025-11-02 13:51:09 +03:00
commit 1f0fe20177

View file

@ -459,6 +459,7 @@ end;
procedure TDCP_blockcipher128.IncCounter;
begin
Inc(PQWord(@CV[0])^);
if (PQWord(@CV[0])^ = 0) then Inc(PQWord(@CV[8])^);
end;
class function TDCP_blockcipher128.GetBlockSize: integer;