Sha2_512HMac.cs

using System;
using System.Collections.Generic;
using Waher.Script.Abstraction.Elements;
using Waher.Script.Exceptions;
using Waher.Script.Model;
using Waher.Script.Objects;
using Waher.Security;
 
namespace Waher.Script.Cryptography.Functions.HashFunctions
{
    public class Sha2_512HMac : FunctionTwoVariables
    {
        public Sha2_512HMac(ScriptNode Data, ScriptNode Key, int Start, int Length, Expression Expression)
            : base(Data, Key, Start, Length, Expression)
        {
        }
 
        public override string FunctionName => nameof(Sha2_512HMac);
 
        public override IElement Evaluate(IElement Argument1, IElement Argument2, Variables Variables)
        {
            if (!(Argument1.AssociatedObjectValue is byte[] Data))
                throw new ScriptRuntimeException("Binary data expected.", this);
 
            if (!(Argument2.AssociatedObjectValue is byte[] Key))
                throw new ScriptRuntimeException("Binary key expected.", this);
 
            return new ObjectValue(Hashes.ComputeHMACSHA512Hash(Key, Data));
        }
 
    }
}