Hash a Password with Argon2 (Defaults)

Demonstrates Crypt2.Argon2HashPassword, which hashes a password with Argon2 and returns a PHC-format string. Passing an empty options string uses all defaults, including a random salt.

integer li_rc
oleobject loo_Crypt
string ls_Password
string ls_PhcHash

loo_Crypt = create oleobject
li_rc = loo_Crypt.ConnectToNewObject("Chilkat.Crypt2")
if li_rc < 0 then
    destroy loo_Crypt
    MessageBox("Error","Connecting to COM object failed")
    return
end if

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

//  Hash the password using all defaults by passing an empty options string.  The defaults are
//  Argon2id, version 19, 3 iterations, 64 MB of memory, 1 lane, a 32-byte hash, and a 16-byte random
//  salt.  A random salt is generated automatically, which is what should normally happen.
ls_PhcHash = loo_Crypt.Argon2HashPassword(ls_Password,"")
if loo_Crypt.LastMethodSuccess = 0 then
    Write-Debug loo_Crypt.LastErrorText
    destroy loo_Crypt
    return
end if

//  The returned PHC-format string records the variant, version, cost parameters, salt, and hash --
//  everything needed to verify the password later.  Store the whole string.
Write-Debug ls_PhcHash


destroy loo_Crypt