bcrypt

Bcrypt

Una biblioteca para ayudarlo a hash contraseñas. Puede leer sobre Bcrypt en Wikipedia, así como en el siguiente artículo: cómo almacenar de manera segura una contraseña

Instalación

Vía Boss

Para facilitar, recomiendo usar el jefe (administrador de dependencias para Delphi) para la instalación, simplemente ejecutando el comando a continuación en un terminal (Windows PowerShell, por ejemplo):

 boss install https://github.com/viniciussanchez/bcrypt

Manual

Si elige instalar manualmente, simplemente agregue las siguientes carpetas a su proyecto, en Proyecto> Opciones> Compilador de recursos> Directorios y condicionales> Incluir Ruta de búsqueda de archivos

 ../bcrypt/src

Uso

Generar hash

 var
  LHash: string;
begin
  LHash := TBCrypt.GenerateHash(password, cost, type );
end ;

Dónde

• password es la contraseña que se debe tener
• type es uno de thashtype.php, thashtype.bsd o thashtype.default, thashtype.bsd es el valor predeterminado $ 2a $
• cost es un número entre 10 y 30, el valor predeterminado es 10

Comparar hash

 var
  LVerify : Boolean;
begin
  LVerify := TBCrypt.CompareHash(password, hash);
end ;

Dónde

• password es la contraseña a verificar
• hash es un hash generado, similar a $2y$12$GuC.Gk2YDsp8Yvga.IuSNOWM0fxEIsAEaWC1hqEI14Wa.7Ps3iYFq

Obtener información hash

 var
  LHashInfo: THashInfo;
  LSalt, LHash: string;
  LHashType: THashType;
  LCost: Word;
begin
  LHashInfo := TBCrypt.GetHashInfo(hash);
  LCost := LHashInfo.Cost;
  LSalt := LHashInfo.Salt;
  LHash := LHashInfo.Hash;
  LHashType := LHashInfo.& Type ;

Dónde

• hash es un hash generado

Necesita rehacer

 var
  LNeeds : Boolean;
begin
  LNeeds := TBCrypt.NeedsRehash(hash, cost);
end ;

Dónde

• hash es un hash, similar a $2y$12$GuC.Gk2YDsp8Yvga.IuSNOWM0fxEIsAEaWC1hqEI14Wa.7Ps3iYFq
• cost es un número entre 10 y 30, el valor predeterminado es 10

Información hash

Los caracteres que comprenden el hash resultante son:

 ./ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789

Los hashs resultantes tendrán 60 caracteres.

Créditos

El código para esto proviene de algunas fuentes:

• Pascal gratis bcrypt
• Bcrypt para Delphi