Hi, I have an encrypted text
How can I decrypt it?
Hash Function => HMACSHA 256
text => "test TEXT for coding"
key => "12345"
Hashed Output => "656F4247466CD5876A72AB41D23398AD646F51DC06F8E5D71236A42063801A7B"
I made this code as follows
How can I decrypt it?
Hash Function => HMACSHA 256
text => "test TEXT for coding"
key => "12345"
Hashed Output => "656F4247466CD5876A72AB41D23398AD646F51DC06F8E5D71236A42063801A7B"
I made this code as follows
B4X:
Dim message As String
Dim secret_key As String
message="test TEXT for coding"
secret_key="12345"
Dim k As KeyGenerator
k.Initialize("HMACSHA256")
k.KeyFromBytes(secret_key.GetBytes("UTF8"))
Dim m As Mac
m.Initialise("HMACSHA256", k.Key)
m.Update(message.GetBytes("UTF8"))
Dim b() As Byte
b = m.Sign
Log("text => "&message)
Log("key => "&secret_key)
Log("Hash Function => "&"HMACSHA 256")
Dim bc As ByteConverter
Log("Hashed Output => "&bc.HexFromBytes(b))