Xbase++ Requires Chilkat v11.6.0+

Hash a Password with Argon2 (Tuned Options)

Demonstrates Crypt2.Argon2HashPassword with explicit options: the cost parameters, saltLen (how many random salt bytes to generate when no salt is given), and an optional secret (pepper).

Background. For hashing, the salt is optional — when omitted, a random salt of saltLen bytes (default 16) is generated, which is the normal case. A secret or ad is not stored in the PHC string; the same values must be supplied to Argon2VerifyPassword for the password to verify.

Chilkat Xbase++ Downloads

Download Chilkat for Xbase++

Xbase++

LOCAL oCrypt
LOCAL cPassword
LOCAL oJson
LOCAL cPhcHash

oCrypt := CreateObject("Chilkat.Crypt2")

//  The password should come from a secure source rather than being hard-coded.
cPassword := "correct horse battery staple"

//  The Argon2 options are the same members as Argon2DeriveKey, except the salt is optional for
//  hashing.  When no "salt" is given, a random salt is generated; "saltLen" (default 16, range 8..1024)
//  sets how many random bytes to use.
oJson := CreateObject("Chilkat.JsonObject")
oJson:UpdateString("variant", "argon2id")
oJson:UpdateInt("memoryCostKb", 131072)
oJson:UpdateInt("iterations", 4)
oJson:UpdateInt("parallelism", 2)
oJson:UpdateInt("saltLen", 16)

//  A secret (pepper) and/or ad may be used, but neither is stored in the returned PHC string.  The
//  same values must be supplied to Argon2VerifyPassword for the password to verify.
oJson:UpdateString("secret", "application-wide-pepper")
oJson:UpdateString("secretEncoding", "utf-8")

cPhcHash := oCrypt:Argon2HashPassword(cPassword, oJson:Emit())
IF (oCrypt:LastMethodSuccess == 0)
    ? oCrypt:LastErrorText
    oCrypt:destroy()
    oJson:destroy()
    RETURN
ENDIF

? cPhcHash

oCrypt:destroy()
oJson:destroy()