Explorar o código

Fixed bug on GetSafebox Request

Bug caused but AnsiString to TRawBytes incorrect comparation
PascalCoin %!s(int64=6) %!d(string=hai) anos
pai
achega
b355761954
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      src/core/UNetProtocol.pas

+ 1 - 1
src/core/UNetProtocol.pas

@@ -3105,7 +3105,7 @@ begin
       end;
       antPos := sbStream.Position;
       TPCSafeBox.LoadSafeBoxStreamHeader(sbStream,sbHeader);
-      If sbHeader.safeBoxHash<>_safeboxHash then begin
+      If Not TBaseType.Equals(sbHeader.safeBoxHash,_safeboxHash) then begin
         DisconnectInvalidClient(false,Format('Invalid safeboxhash on GetSafeBox request (Real:%s > Requested:%s)',[TCrypto.ToHexaString(sbHeader.safeBoxHash),TCrypto.ToHexaString(_safeboxHash)]));
         exit;
       end;